mkyx Posted May 21, 2019 Report Share Posted May 21, 2019 Bom dia para o caso acima, que começou a vigorar agora, qual o procedimento correto, pois ao solicitar ajuda pra flexdoc, eles disseram que os valores devem ter duas casas decimais, e a classe do Gilmer não colocar casas decimais para valor zerados. como preencho os valor: :CSOSN:="500" :vBCSTRet :=0.00 :vICMSSTRet :=0.00 :pST :=0.00 :vBCFCPSTRet :=0.00 :pFCPSTRet :=0.00 :vFCPSTRet :=0.00 :vICMSSubstituto:=0.00 como está na classe: aadd( axArray, {"ICMSSN500" , {}, 1 } ); nPos := len(axArray) aadd( axArray[nPos][2], {"orig" , TVoNFeItem():New("N", 1, 1, 1 ,,,oItem:orig ) } ) aadd( axArray[nPos][2], {"CSOSN" , TVoNFeItem():New("N", 1, 1, 3 ,,,oItem:CSOSN ) } ) * if nfc_e="#" aadd( axArray[nPos][2], {"vBCSTRet" , TVoNFeItem():New("N", 1, 1, 15,2 ,,oItem:vBCSTRet ) } ) aadd( axArray[nPos][2], {"pST" , TVoNFeItem():New("N", 1, 1, 15,2 ,,oItem:pST ) } ) aadd( axArray[nPos][2], {"vICMSSTRet" , TVoNFeItem():New("N", 1, 1, 15,2,,oItem:vICMSSTRet ) } ) aadd( axArray[nPos][2], {"vICMSSubstituto", TVoNFeItem():New("N", 1, 1, 15,2 ,,oItem:vICMSSubstituto ) } ) aadd( axArray[nPos][2], {"vBCFCPSTRet" , TVoNFeItem():New("N", 1, 1, 15,2 ,,oItem:vBCFCPSTRET ) } ) aadd( axArray[nPos][2], {"pFCPSTRet" , TVoNFeItem():New("N", 1, 1, 6 ,2 ,,oItem:pFCPSTRET ) } ) aadd( axArray[nPos][2], {"vFCPSTRet" , TVoNFeItem():New("N", 1, 1, 15,2 ,,oItem:vFCPSTRET ) } ) e como a classe gera o xml: <imposto> <vTotTrib>13.71</vTotTrib> <ICMS> <ICMSSN500> <orig>0</orig> <CSOSN>500</CSOSN> <vBCSTRet>0</vBCSTRet> <pST>0</pST> <vICMSSTRet>0</vICMSSTRet> <vICMSSubstituto>0</vICMSSubstituto> <vBCFCPSTRet>0</vBCFCPSTRet> <pFCPSTRet>0</pFCPSTRet> <vFCPSTRet>0</vFCPSTRet> </ICMSSN500> </ICMS> Alguém poderia dar alguma dica? Obrigado. Quote Link to comment Share on other sites More sharing options...
gilmer Posted May 21, 2019 Report Share Posted May 21, 2019 Bom Dia, Existe ma falha na classe, mas se você passar em string irá ficar as casas decimais vICMSSubstituto := Str(0,15,2) Quote Link to comment Share on other sites More sharing options...
mkyx Posted May 22, 2019 Author Report Share Posted May 22, 2019 boa noite pessoal, mudei a forma de atribuição e agora está aparecendo as duas casas decimais. mas, mesmo assim, continua com o erro: <ICMS> <ICMSSN500> <orig>0</orig> <CSOSN>500</CSOSN> <vBCSTRet>0.00</vBCSTRet> <pST>0.00</pST> <vICMSSTRet>0.00</vICMSSTRet> <vICMSSubstituto>0.00</vICMSSubstituto> <vBCFCPSTRet>0.00</vBCFCPSTRet> <pFCPSTRet>0.00</pFCPSTRet> <vFCPSTRet>0.00</vFCPSTRet> </ICMSSN500> </ICMS> agora está indicando que a tag <vICMSSubstituto> não deveria existir, mas, se eu não coloco aparece a mensagem de erro que diz que falta essa tag e as demais relacionadas. Alguém tem algum idéia? Obrigado. Quote Link to comment Share on other sites More sharing options...
mkyx Posted May 22, 2019 Author Report Share Posted May 22, 2019 Olá usuário SISTEM funcionou. Muito Grato. José/Pompeo/Mkyx Guaratinguetá, SP Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.