SPDF120

 Array

Deve ser criado e alimentado um alias temporário exatamente na seguinte estrutura.

AADD(aStru,{"BEM" ,"C" ,TamSx3("N4_CBASE")[1],0})
AADD(aStru,{"ITEM" ,"C" ,TamSx3("N4_ITEM")[1],0})
AADD(aStru,{"DESCRI" ,"C" ,TamSx3("N1_DESCRIC")[1],0})
AADD(aStru,{"BASE" ,"N" ,013,2})
AADD(aStru,{"VRET" ,"N" ,013,2})
AADD(aStru,{"DTAPR" ,"D" ,008,0})
AADD(aStru,{"NATBCCRED" ,"C" ,002,0})
AADD(aStru,{"INDBEMIMOB" ,"C" ,002,0})
AADD(aStru,{"INDORIGCRD" ,"C" ,001,0})
AADD(aStru,{"INDUTILBEM" ,"C" ,001,0})
AADD(aStru,{"CSTPIS" ,"C" ,002,0})
AADD(aStru,{"VLRBCEXC" ,"N" ,018,2})
AADD(aStru,{"VLRBCPIS" ,"N" ,018,2})
AADD(aStru,{"ALIQPIS" ,"N" ,008,4})
AADD(aStru,{"VLRPIS" ,"N" ,018,2})
AADD(aStru,{"CSTCOFINS" ,"C" ,002,0})
AADD(aStru,{"VLRBCCOFIN" ,"N" ,018,2})
AADD(aStru,{"ALIQCOFINS" ,"N" ,008,4})
AADD(aStru,{"VLRCOFINS" ,"N" ,018,2})
AADD(aStru,{"CODCONTA" ,"C" ,TamSx3("N3_CCONTAB")[1],0})
AADD(aStru,{"CODCCUSTO" ,"C" ,TamSx3("N3_CCUSTO")[1],0})
AADD(aStru,{"DESCBEMIMO" ,"C" ,250,0})
AADD(aStru,{"NOTAFISCAL" ,"C" ,Len(SN1->N1_NFISCAL),0})
AADD(aStru,{"SERIE" ,"C" ,Len(SN1->N1_NSERIE),0})
AADD(aStru,{"FORNECEDOR" ,"C" ,Len(SN1->N1_FORNEC),0})
AADD(aStru,{"LOJA" ,"C" ,Len(SN1->N1_LOJA ),0})
AADD(aStru,{"NUMPRO" ,"C" ,10,0})
AADD(aStru,{"INDPRO" ,"C" ,1,0})

OBS: Os nomenclatura das colunas deve ser exatamente a nomenclatura acima.

O ponto de entrada deve retornar um array de duas posições, onde:

A primeira - É o nome do arquivo de trabalho, retorno da função CriaTrab()

A Segunda - É o alias do arquivo de trabalho.

 Sim