Linha Microsiga Protheus.

Home

Linha Microsiga Protheus

Páginas filhas
  • PEC045 - Dados do Contato

Ponto-de-Entrada: PEC045 - Dados do Contato
Abrangências: Microsiga Protheus 10
Versões: Microsiga Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todas TotvsDbAccess
Idiomas: Português (Brasil)
Descrição: 
Apresentação dos dados do Contato.
Programa Fonte 
PWSC050.PRW
Sintaxe

PEC045 - Dados do Contato ( [ cParam ] ) --> aReturn

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
cParam Array of Record Array contendo qual dado deve ser apresentado:1-Dados do contato2-Endereço
Retorno
    aReturn(array_of_record)
  • Array contendo os campos a serem apresentados.
Observações
Somente permitido a retirada de campos.
Exemplos 
User Function PEC045()Local cParam 	:= PARAMIXB[1]Local aReturn 	:= {}Do Case	Case cParam == 1		//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿		//³ Campos a serem mostrados             									³		//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ		aadd( aReturn, "NAME" )		aadd( aReturn, "FEDERALID" )		aadd( aReturn, "EMAIL" )		aadd( aReturn, "HOMEPAGE" )		aAdd( aReturn, { "POSITION", "N", { "GETPOSITION", ;											{ "CPOSITION", "CCODE" };										}, ;										{ "CCODE", "CDESCRIPTION", "NVALUE" } } )		aadd( aReturn, { "POSITIONDESCRIPTION", "D" } )		aAdd( aReturn, { "GROUP", "N", { "GETGROUP", ;											{ "CGROUP", "CCODE" };										}, ;										{ "CCODE", "CDESCRIPTION", "NVALUE" } } )		aadd( aReturn, { "GROUPDESCRIPTION", "D" } )		aAdd( aReturn, { "DEPARTMENT", "N", { "GETDEPARTMENT", ;											{ "CDEPARTMENT", "CCODE" };										}, ;										{ "CCODE", "CDESCRIPTION", "NVALUE" } } )		aadd( aReturn, { "DEPARTMENTDESCRIPTION", "D" } )	Case cParam == 2		//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿		//³ Campos a serem mostrados             									³		//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ                     		aadd( aReturn, "ADDRESS" )		aadd( aReturn, "ADDRESSNUMBER" )		aadd( aReturn, "DISTRICT" )		aAdd( aReturn, { "STATE", "N", { "GETUF", ;											{ "CSTATE_1", "CCODE" };										}, ;										{ "CCODE", "CDESCRIPTION" } } )		aadd( aReturn, "ZIPCODE" )		aadd( aReturn, "ZONE" )EndCase    Conout('ponto de entrada PEC045  ' +str(cParam))Return aReturn
Variáveis
Nome Tipo Escopo Pode Alterar descrição
Array of Record Global Não