Histórico da Página

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

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

/*/ ↓↓ Variaveis a serem utilizadas ↓↓ /*/
Local cGerenc := Alltrim(TXC->TXC_GERENC)
Local cTipounicTipomov := "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_TIPOUNITIPOMOV", cTipounicTipomov , Nil} )
Aadd(aItens[1], {"D3_OBSERVAEMAIL", cEmail , Nil} )

Return {aCabec, aItens}