Construindo você mesmo Postado 7 Julho Postado 7 Julho Bom dia senhores. Estou tentando gerara as tags de IBS e CBS na NFCOM segue abaixo: IBSCBS.CST := cst000; IBSCBS.cClassTrib := '000001'; IBSCBS.indDoacao := tieNenhum; //tieNenhum; IBSCBS.gIBSCBS.vBC := tbNfeTOTAL_NOTA.Value; IBSCBS.gIBSCBS.gIBSUF.pIBS := tbNfeItemALIQUOTA_IBS.Value; IBSCBS.gIBSCBS.gIBSUF.vIBS := tbNfeItemVALOR_IBS.Value; IBSCBS.gIBSCBS.gCBS.pCBS := tbNfeItemALIQUOTA_CBS.Value; IBSCBS.gIBSCBS.gCBS.vCBS := tbNfeItemVALOR_CBS.Value; e dá o seguinte erro: Rejeição: Total de IBS difere do calculado[nItem:1] Segue anexo ainda o xml: 41260780889637000110620010000003121042284120-NFCom.xml
Construindo você mesmo Postado 8 Julho Autor Postado 8 Julho Resolvi com se segue abaixo. Isto com a cst000. TotalBC := 0; TotalIBSUF := 0; TotalIBS := 0; TotalCBS := 0; with IBSCBS do begin cClassTrib := '000001'; indDoacao := tieNao; //tieNenhum; with gIBSCBS do begin case tbNfeItemCST_IBS_CBS.Value of vBC := tbNfeItemTOTAL_ITEM.Value; gIBSUF.pIBS := tbNfeItemALIQUOTA_IBS.Value; gIBSUF.vIBS := tbNfeItemTOTAL_ITEM.Value * tbNfeItemALIQUOTA_IBS.Value / 100; //tbNfeItemVALOR_IBS.Value; gCBS.pCBS := tbNfeItemALIQUOTA_CBS.Value; gCBS.vCBS := tbNfeItemTOTAL_ITEM.Value * tbNfeItemALIQUOTA_CBS.Value / 100; //tbNfeItemVALOR_CBS.Value; vIBS := gIBSUF.vIBS; gIBSMun.pIBS := 0; gIBSMun.gDif.pDif := 0; gIBSMun.gDif.vDif := 0; gIBSMun.gDevTrib.vDevTrib := 0; gIBSMun.gRed.pRedAliq := 0; gIBSMun.gRed.pAliqEfet := 0; gIBSMun.vIBS := 0; TotalBC := vBC; TotalIBSUF := gIBSUF.vIBS; TotalIBS := vIBS; TotalCBSUF := gCBS.vCBS; end; end; //================================================================== // TOTALIZAÇÃO // Total.vTotDFe := TotalBC; Total.IBSCBSTot.vBCIBSCBS := TotalBC; Total.IBSCBSTot.gIBS.gIBSUFTot.vIBSUF := TotalIBSUF; Total.IBSCBSTot.gIBS.vIBS := TotalIBS; Total.IBSCBSTot.gCBS.vCBS := TotalCBSUF; // // Total.IBSCBSTot.gIBS.gIBSUFTot.vDif := 0; Total.IBSCBSTot.gIBS.gIBSUFTot.vDevTrib := 0; Total.IBSCBSTot.gCBS.vDif := 0; Total.IBSCBSTot.gCBS.vDevTrib := 0; Total.IBSCBSTot.gIBS.gIBSMunTot.vDif := 0; Total.IBSCBSTot.gIBS.gIBSMunTot.vDevTrib := 0; Total.IBSCBSTot.gIBS.gIBSMunTot.vIBSMun := 0; end; 1
Consultores juliomar.marchetti Postado 8 Julho Consultores Postado 8 Julho Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico. Juliomar Marchetti Ajude o Projeto ACBr crescer - Seja Pro discord: juliomar telegram: juliomar e-mail: [email protected] http://www.juliomarmarchetti.com.br Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!
Recommended Posts