Histórico da Página

Apresentação dos dados do Contato.

PWSC050.PRW

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

aReturn(array_of_record)
• Array contendo os campos a serem apresentados.

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