XMLENV01 - Manipular os dados dos arrays para a geração do XML único

Este ponto de entrada foi disponibilizado para o cliente manipular as informações dos arrays com os dados do XML de envio da NFSe

nfsexmlenv.prw

XMLENV01 - Manipular os dados dos arrays para a geração do XML único ( [ PARAMIXB ] )

User Function XMLENV01()

Local aParam := {}
Local aProd := PARAMIXB[1] // Dados do produto
Local aDest := PARAMIXB[4] // Dados do tomador
Local aNota := PARAMIXB[5] // Dados da nota
Local aDupl := PARAMIXB[6] // Dados da duplicata
Local aDeduz := PARAMIXB[7] // Valores
Local aTotal := PARAMIXB[8] // Valor total
Local aISSQN := PARAMIXB[9] // Valor dos impostos
Local aAIDF := PARAMIXB[10] // Dados tabela AIDF
Local aInterm := PARAMIXB[11] // Dados do intermediário
Local aRetido := PARAMIXB[12] // Valores retidos
Local aDeducao := PARAMIXB[13] // Valores dedução
Local aConstr := PARAMIXB[14] // Dados construção civil

Local cMensCli := PARAMIXB[2] // Mensagem cliente
Local cMensFis := PARAMIXB[3] // Mensagem fiscal

Local nX := 0 // Contador for

For nX := 1 to len( aProd )
aProd[nX][4] := "NFSE MODIFICADA - " + strzero(nX,2) // Descrição do produto
Next

aDest[2] := "NFSE MODIFICADA - TESTE"

cMensCli := "CLIENTE MODIFICADO"

aParam := {aProd,cMensCli,cMensFis,aDest,aNota,aDupl,aDeduz,aTotal,aISSQN,aAIDF,aInterm,aRetido,aDeducao,aConstr}

Return aParam