Histórico da Página

#INCLUDE 'protheus.ch'
#INCLUDE 'parmtype.ch'
#INCLUDE "FWMVCDEF.CH"

User Function At894Cpo()
Local aCabec := PARAMIXB[1] //Recebe o primeiro parâmetro "Cabeçalho" ou Nil
Local aItens := PARAMIXB[2] //Recebe o primeirosegundo parâmetro "Itens" ou Nil

/*/ ↓↓ Variaveis a serem utilizadas ↓↓ /*/
Local cGerenc := Alltrim(TXC->TXC_GERENC)
Local cTipomov := "Uniforme"
Local cEmail := "[email protected]"

// Adicionando campos no array aCabec
Aadd(aCabec, {"D3_GERENC", cGerenc , Nil} )

// Adicionando campos no array aItens
Aadd(aItens[1], {"D3_TIPOMOV", cTipomov , Nil} )
Aadd(aItens[1], {"D3_EMAIL", cEmail , Nil} )

Return {aCabec, aItens}