import.css=/download/attachments/327912/newLayout.css |
Ponto-de-Entrada: P010GD5 - Validação da aba Componentes na Composição
Descrição:
Validação da aba Componentes no cadastro de composições, no momento da inclusão, alteração e exclusão após a validação padrão do sistema.
Programa Fonte
PMSA010.prw
Sintaxe
P010GD5 - Validação da aba Componentes na Composição ( [ aCols ], [ aHeader ] ) --> lRetorno
Parâmetros:
Retorno
Exemplos
User Function P010GD5Local nPosCod := aScan(paramixb[ 2 ],{|x|AllTrim(x[2])=="ADV_CODMEM"})Local nPosMem := aScan(paramixb[ 2 ],{|x|AllTrim(x[2])=="ADV_IMPMEM"})Local x := 0 Local Retornof := 0For x := 1 to Len( paramixb[ 1 ] ) If Empty( paramixb[ 1 ][x][nPosCod] ) .And. Alltrim( paramixb[ 1 ][x][nPosMem] ) == "1" Retornof += 1 EndIf Next If Retornof > 0 Alert( " PARA IMPRESSÃO DO MEMO É NECESSÁRIO PREENCHER O CAMPO COMPLEMENTO " ) Return .f.Else Return .t.EndIf
Variáveis
|