Histórico da Página

User Function CT010Atu()

//o Array ParamIxb possui os elementos: {aHeader,aCols,nCont,nTipo}, onde
//aHeader	- Tipo: Array. Cabeçalho da MsGetDados
//aCols		- Tipo: Array. Dados da MSGetDados
//nCont		- Tipo: Numérico. Nro da Linha atual do aCols
//nTipo		- Tipo: Numérico. Qual é o tipo de manipulação efetuada no PE: 
//					1 - Leitura de Dados - carga do aCols; 
//					2 - Persistência do dado em seu relativo campo - criado por usuário.
Local aMyHeader := aClone(ParamIxb[1])	//aHeader
Local aMyCols	:= aClone(ParamIxb[2])	//aCols

Local nItem		:= ParamIxb[3]	//Linha do aCols
Local nTipo		:= ParamIxb[4]	//Tipo de manipulação de dado (1 - Carga do aCols; 2- Salvamento na tabela)
Local nPxTeste	:= aScan(aMyHeader,{|x| Alltrim(x[2]) == "CTG_XTESTE" })

If ( nPxTeste > 0 .And. nTipo == 2 )
	Replace CTG_XTESTE With aMyCols[nItem,nPxTeste]
ElseIf (nPxTeste > 0)	
	aMyCols[nItem,nPxTeste] := IIf(Empty(CTG->CTG_XTESTE),space(Len(CTG->CTG_XTESTE)),CTG->CTG_XTESTE)
EndIf

//Essencial Clonar o array para o aCols (array de escopo privado)
aCols := aClone(aMyCols)

Return()

<!-- esconder o menu --> 


<style>
div.theme-default .ia-splitter #main {
    margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
    display: none;
}
#main {
    padding-left: 10px;
    padding-right: 10px;
    overflow-x: hidden;
}

.aui-header-primary .aui-nav,  .aui-page-panel {
    margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
    margin-left: 0px !important;
}
</style>