||Descrição|| Este PE é usado para definir os tipos das colunas incluídas pelo PE FI040CPTN
||Observações||
||Exemplos||#INCLUDE "FINC040.CH"
#Include "PROTHEUS.CH"
User Function FI040TPCP()
Local aCampos := ParamIxb // Array recebido do FINC040
aCampos := {{"OK","N",1,0},;
{"DATAX", "D", 08, 0 }, ;
{ "JUROS ", "N", 16, 2 }, ;
{ "MULTA ", "N", 16, 2 }, ;
{ "CORRECAO ", "N", 16, 2 }, ;
{ "DESCONTOS ", "N", 16, 2 }, ;
{ "VALORRECEB", "N", 16, 2 }, ;
{ "MOTIVO ", "C", 03, 0 }, ;
{ "HISTORICO ", "C", 40 ,0 }, ;
{ "DATACONT ", "D", 08, 0 }, ;
{ "DATADISP ", "D", 08, 0 }, ;
{ "LOTE ", "C", 08, 0 }, ;
{ "BANCO ", "C", 03, 0 }, ;
{ "AGENCIA ", "C", 05, 0 }, ;
{ "CONTA ", "C", 10, 0 }, ;
{ "DOCUMENTO ", "C", 50, 0 }, ;
{ "FILIAL ", "C", 02, 0 }, ; // Observe se o tamanho da sua Filial é 02
{ "RECONC ", "C", 01, 0 } }
AADD(aCampos,{ "E5_BENEF ", "C", 30, 0 } ) // Tipo e tamanho do campo 1 inserido
AADD(aCampos,{ "E5_AUTBCO ", "C", 25, 0 } ) // Tipo e tamanho do campo 2 inserido
// Tipo e tamanho do campo n inserido
Return aCampos
||Preview||
||Veja também||
||Idioma|| Português(Brasil)
||Versões|| Microsiga_Protheus11
||Sistemas Operacionais Suportados||Todos
||Compatível com as Bases de Dados||Todas
||Updates||
||Parâmetros||
||Retorno|| aCampos - array contendo os tipos das colunas incluídas no aBrowse
||Eventos de chamada do Ponto de Entrada||
||Variáveis|| aCampos - array contendo os tipos das colunas incluídas no aBrowse
||Programa Fonte|| FINC040 |