Linha Microsiga Protheus.

Home

Linha Microsiga Protheus

Páginas filhas
  • P010GD5 - Validação da aba Componentes na Composição

Ponto-de-Entrada: P010GD5 - Validação da aba Componentes na Composição
Abrangências: Microsiga Protheus 10 , Microsiga Protheus 11
Versões: Microsiga Protheus 10 , Microsiga Protheus 11
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Português (Brasil)
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:
Nome Tipo Descrição Default Obrigatório Referência
aCols Array of Record Contém os registros da aba Componentes.
aHeader array_of_record Contém os campos do cabeçalho da aba Componentes.
Retorno
    lRetorno(logico)
  • Retorno lógico, que indicará se a operação será validada( .t. ) ou será bloqueada (.f. )
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
Nome Tipo Escopo Pode Alterar descrição
oGD Objeto Privado Não Objeto com as informações das abas.