Histórico da Página

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.

PMSA010.prw

P010GD5 - Validação da aba Componentes na Composição ( [ aCols ], [ aHeader ] ) --> lRetorno

lRetorno(logico)
• Retorno lógico, que indicará se a operação será validada( .t. ) ou será bloqueada (.f. )

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