PEC041 - Visualização de dados cadastrais

O ponto de entrada PEC041 adiciona ou remove campos para apresentação dos dados cadastrais.

PWSC040.PRW

PEC041 - Visualização de dados cadastrais ( [ ] ) --> aWebCols

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

User Function PEC041()Local cParam 	:= PARAMIXB[1]Local aReturn 	:= {}   conout("PEC041")Do Case	Case cParam == 1		//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿		//³ Campos a serem mostrados             									³		//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ		aAdd( aReturn, { "CUSTOMERCODE", "D" } )		aAdd( aReturn, { "UNITCUSTOMERCODE", "D" } )		aAdd( aReturn, "NAME" )		aAdd( aReturn, "NICKNAME" )		aAdd( aReturn, "FEDERALID" )		aAdd( aReturn, "STATEID" )		aAdd( aReturn, "DISTRICTID" )		aAdd( aReturn, "HOMEPAGE" )	  	aAdd( aReturn, "EMAIL" )   			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" )	Case cParam == 3		//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿		//³ Campos a serem mostrados             									³		//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ		aAdd( aReturn, "ADDRESS" )		aAdd( aReturn, "ADDRESSNUMBER" )		aAdd( aReturn, "DISTRICT" )		aAdd( aReturn, { "STATE", "N", { "GETUF", ;						{ "CSTATE_2", "CCODE" };						}, ;						{ "CCODE", "CDESCRIPTION" } } )		aAdd( aReturn, "ZIPCODE" )		aAdd( aReturn, "ZONE" )			Case cParam == 4		//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿		//³ Campos a serem mostrados             									³		//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ		aAdd( aReturn, "ADDRESS" )		aAdd( aReturn, "ADDRESSNUMBER" )		aAdd( aReturn, "DISTRICT" )		aAdd( aReturn, { "STATE", "N", { "GETUF", ;						{ "CSTATE_3", "CCODE" };						}, ;						{ "CCODE", "CDESCRIPTION" } } )		aAdd( aReturn, "ZIPCODE" )		aAdd( aReturn, "ZONE" )		Case cParam == 5		//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿		//³ Campos a serem mostrados             									³		//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ		aAdd( aReturn, "COUNTRYAREACODE" )		aAdd( aReturn, "LOCALAREACODE" )		aAdd( aReturn, "PHONENUMBER" )    			Case cParam == 6		//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿		//³ Campos a serem mostrados             									³		//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ		aAdd( aReturn, "PHONENUMBER" )EndCaseReturn aReturn