valter gomes

N total fiz desta forma............... with Total.IBSCBSTot do begin vBCIBSCBS := totalBaseIBSCBS; // preenche gIBS gIBS.gIBSUFtot.vIBSUF := total_vIBSUF; gIBS.gIBSMuntot.vIBSMun := total_vIBSMun; gIBS.vIBS := total_vIBSUF + total_vIBSMun; // só UF + Mun, sem CBS // preenche gCBS gCBS.vCBS := total_vCBS; // zere campos adicionais gIBS.gIBSUFtot.vDif := 0; gIBS.gIBSUFtot.vDevTrib := 0; gIBS.gIBSMuntot.vDif := 0; gIBS.gIBSMuntot.vDevTrib := 0; gCBS.vDif := 0; gCBS.vDevTrib := 0; gIBS.vCredPres := 0; gIBS.vCredPresCondSus := 0; gCBS.vCredPres := 0; gCBS.vCredPresCondSus := 0; end;

Boa tarde Pessoal, fiz um teste de NFce homologação hoje, deu certo, segue as tags do XML <IBSCBS> <CST>000</CST> <cClassTrib>000001</cClassTrib> <gIBSCBS> <vBC>58.00</vBC> <gIBSUF> <pIBSUF>0.1000</pIBSUF> <vIBSUF>0.05</vIBSUF> </gIBSUF> <gIBSMun> <pIBSMun>0.0000</pIBSMun> <vIBSMun>0.00</vIBSMun> </gIBSMun> <vIBS>0.05</vIBS> <gCBS> <pCBS>0.9000</pCBS> <vCBS>0.52</vCBS> </gCBS> </gIBSCBS> </IBSCBS> //------------------------------------------------------------------------ with IBSCBS do begin CST := cst000; cClassTrib := '000001'; with gIBSCBS do begin vBC := var_base_cbs; // 115.00 // Alíquota de homologacao: IBS UF = 0.1000 (0,1%), CBS = 0.9000 (0,9%) with gIBSUF do begin pIBSUF := 0.1000; vIBSUF_calc := var_base_cbs * pIBSUF / 100; // não arredonda aqui vIBSUF := Trunca2Casas(vIBSUF_calc); end; with gIBSMun do begin pIBSMun := 0.0000; vIBSMun := 0.00; vIBSMun_calc := 0.00; end; with gCBS do begin pCBS := 0.9000; vCBS_calc := var_base_cbs * pCBS / 100; // idem vCBS := Trunca2Casas(vCBS_calc); end; IBSCBS.gIBSCBS.vIBS := Trunca2Casas(vIBSUF_calc + vIBSMun_calc); // 1,14 end; end; // acumula para totais totalBaseIBSCBS := totalBaseIBSCBS + var_base_cbs; total_vIBSUF := total_vIBSUF + IBSCBS.gIBSCBS.gIBSUF.vIBSUF; total_vIBSMun := total_vIBSMun + IBSCBS.gIBSCBS.gIBSMun.vIBSMun; total_vCBS := total_vCBS + IBSCBS.gIBSCBS.gCBS.vCBS; total_vIBS := total_vIBS + IBSCBS.gIBSCBS.vIBS; //-------------------------------------------------------------------------