Jhonlenon Ribeiro

Eu não sou muito bom em tributação...mais segundo a calculadora da Reforma Tributaria o calculo ta certo.....

Vou postar meu codigo pra vc ver se entendi como estou fazendo...deixei fixo as aliquotas pra melhor entender... // REFORMA TRIBUTARIA if REFORMA_TRIBUTARIA = 'SIM' then begin AliqIBSUF := 0.1; // exemplo de partilha dentro do 0,1% (estado) AliqCBS := 0.9; // CBS federal AliqCredPres := 0; // só se legislação definir Imp.vTotDFe := TotalPrestacao.Value; Imp.IBSCBS.CST := cst000; Imp.IBSCBS.cClassTrib := '000001'; // Base de cálculo Imp.IBSCBS.gIBSCBS.vBC := TotalPrestacao.Value; // ======================================================================= // IBS Estadual (UF) Imp.IBSCBS.gIBSCBS.gIBSUF.pIBS := AliqIBSUF; // 0.10 (já em %) Imp.IBSCBS.gIBSCBS.gIBSUF.vIBS := SimpleRoundTo(TotalPrestacao.Value * (AliqIBSUF / 100), -2); // IBS Municipal Imp.IBSCBS.gIBSCBS.gIBSMun.pIBS := 0;//AliqIBSMun; Imp.IBSCBS.gIBSCBS.gIBSMun.vIBS := 0;//RoundTo(TotalPrestacao.Value * AliqIBSMun / 100, -2); // CBS Federal Imp.IBSCBS.gIBSCBS.gCBS.pCBS := AliqCBS; // 0.90 Imp.IBSCBS.gIBSCBS.gCBS.vCBS := SimpleRoundTo(TotalPrestacao.Value * (AliqCBS / 100), -2); Imp.IBSCBS.gIBSCBS.vIBS := SimpleRoundTo(Imp.IBSCBS.gIBSCBS.gIBSUF.vIBS + Imp.IBSCBS.gIBSCBS.gIBSMun.vIBS, -2); // ======================================================================= // Créditos Presumidos // ======================================================================= Imp.IBSCBS.gIBSCBS.gIBSCredPres.pCredPres := 0;//AliqCredPres; Imp.IBSCBS.gIBSCBS.gIBSCredPres.vCredPres := 0;//RoundTo(TotalPrestacao.Value * AliqCredPres / 100, -2); // Crédito Condicional/Suspenso (se aplicável) Imp.IBSCBS.gIBSCBS.gIBSCredPres.vCredPresCondSus := 0;//Imp.IBSCBS.gIBSCBS.gIBSCredPres.vCredPres; // ======================================================================= // Compra Governamental (se for o caso) // ======================================================================= Imp.IBSCBS.gIBSCBS.gTribCompraGov.pAliqIBSUF := 0;//AliqIBSUF; Imp.IBSCBS.gIBSCBS.gTribCompraGov.vTribIBSUF := 0;//RoundTo(TotalPrestacao.Value * AliqIBSUF / 100, -2); Imp.IBSCBS.gIBSCBS.gTribCompraGov.pAliqIBSMun := 0;//AliqIBSMun; Imp.IBSCBS.gIBSCBS.gTribCompraGov.vTribIBSMun := 0;//RoundTo(TotalPrestacao.Value * AliqIBSMun / 100, -2); Imp.IBSCBS.gIBSCBS.gTribCompraGov.pAliqCBS := 0;//AliqCBS; Imp.IBSCBS.gIBSCBS.gTribCompraGov.vTribCBS := 0;//RoundTo(TotalPrestacao.Value * AliqCBS / 100, -2); end;

Mais fica errado porque as Aliquota IBS 0.1 e CBS 0.9 são essas para 2026....eu Autorizei o XML em homologação

Sim...ai em 2026 não soma IBS e CBS

@DevAgrotis Parece que sim....peguei do demo ACBrCT-e... // Reforma Tributária if rgReformaTributaria.ItemIndex = 0 then begin Imp.vTotDFe := 100; Imp.IBSCBS.CST := cst000; Imp.IBSCBS.cClassTrib := ct000001; Imp.IBSCBS.gIBSCBS.vBC := 100; Imp.IBSCBS.gIBSCBS.gIBSUF.pIBS := 5; Imp.IBSCBS.gIBSCBS.gIBSUF.gDif.pDif := 5; Imp.IBSCBS.gIBSCBS.gIBSUF.gDif.vDif := 50; Imp.IBSCBS.gIBSCBS.gIBSUF.gDevTrib.vDevTrib := 50; Imp.IBSCBS.gIBSCBS.gIBSUF.gRed.pRedAliq := 5; Imp.IBSCBS.gIBSCBS.gIBSUF.gRed.pAliqEfet := 5; Imp.IBSCBS.gIBSCBS.gIBSUF.vIBS := 50; Imp.IBSCBS.gIBSCBS.gIBSMun.pIBS := 5; Imp.IBSCBS.gIBSCBS.gIBSMun.gDif.pDif := 5; Imp.IBSCBS.gIBSCBS.gIBSMun.gDif.vDif := 50; Imp.IBSCBS.gIBSCBS.gIBSMun.gDevTrib.vDevTrib := 50; Imp.IBSCBS.gIBSCBS.gIBSMun.gRed.pRedAliq := 5; Imp.IBSCBS.gIBSCBS.gIBSMun.gRed.pAliqEfet := 5; Imp.IBSCBS.gIBSCBS.gIBSMun.vIBS := 50; Imp.IBSCBS.gIBSCBS.gCBS.pCBS := 5; Imp.IBSCBS.gIBSCBS.gCBS.gDif.pDif := 5; Imp.IBSCBS.gIBSCBS.gCBS.gDif.vDif := 50; Imp.IBSCBS.gIBSCBS.gCBS.gDevTrib.vDevTrib := 50; Imp.IBSCBS.gIBSCBS.gCBS.gRed.pRedAliq := 5; Imp.IBSCBS.gIBSCBS.gCBS.gRed.pAliqEfet := 5; Imp.IBSCBS.gIBSCBS.gCBS.vCBS := 50; Imp.IBSCBS.gIBSCBS.gTribRegular.CSTReg := cst000; Imp.IBSCBS.gIBSCBS.gTribRegular.cClassTribReg := ct000001; Imp.IBSCBS.gIBSCBS.gTribRegular.pAliqEfetRegIBSUF := 5; Imp.IBSCBS.gIBSCBS.gTribRegular.vTribRegIBSUF := 50; Imp.IBSCBS.gIBSCBS.gTribRegular.pAliqEfetRegIBSMun := 5; Imp.IBSCBS.gIBSCBS.gTribRegular.vTribRegIBSMun := 50; Imp.IBSCBS.gIBSCBS.gTribRegular.pAliqEfetRegCBS := 5; Imp.IBSCBS.gIBSCBS.gTribRegular.vTribRegCBS := 50; Imp.IBSCBS.gIBSCBS.gIBSCredPres.cCredPres := cp01; Imp.IBSCBS.gIBSCBS.gIBSCredPres.pCredPres := 5; Imp.IBSCBS.gIBSCBS.gIBSCredPres.vCredPres := 50; Imp.IBSCBS.gIBSCBS.gIBSCredPres.vCredPresCondSus := 50; Imp.IBSCBS.gIBSCBS.gCBSCredPres.cCredPres := cp01; Imp.IBSCBS.gIBSCBS.gCBSCredPres.pCredPres := 5; Imp.IBSCBS.gIBSCBS.gCBSCredPres.vCredPres := 50; Imp.IBSCBS.gIBSCBS.gCBSCredPres.vCredPresCondSus := 50; // Tipo Tributação Compra Governamental Imp.IBSCBS.gIBSCBS.gTribCompraGov.pAliqIBSUF := 5; Imp.IBSCBS.gIBSCBS.gTribCompraGov.vTribIBSUF := 50; Imp.IBSCBS.gIBSCBS.gTribCompraGov.pAliqIBSMun := 5; Imp.IBSCBS.gIBSCBS.gTribCompraGov.vTribIBSMun := 50; Imp.IBSCBS.gIBSCBS.gTribCompraGov.pAliqCBS := 5; Imp.IBSCBS.gIBSCBS.gTribCompraGov.vTribCBS := 50; end;

@DevAgrotis eu consegui aqui....vou postar parte do xml... <IBSCBS> <CST>000</CST> <cClassTrib>000001</cClassTrib> <gIBSCBS> <vBC>500.00</vBC> <gIBSUF> <pIBSUF>0.1000</pIBSUF> <vIBSUF>0.50</vIBSUF> </gIBSUF> <gIBSMun> <pIBSMun>0.0000</pIBSMun> <vIBSMun>0.00</vIBSMun> </gIBSMun> <vIBS>0.50</vIBS> <gCBS> <pCBS>0.9000</pCBS> <vCBS>4.50</vCBS> </gCBS> </gIBSCBS> </IBSCBS> <vTotDFe>500.00</vTotDFe>

Boa tarde....estou com mesmo problema no CT-e

Bom dia @Victor H. Gonzales - Panda testei os fontes do SVN e pareceu está OK tanto na API de cobrança com qrcode e sem qrcode e também API legado mais antiga, o pessoal vai ter dificuldade para testar em homologação porque o json do bradesco em homologação sempre foi confuso mesmo. Agora é só arrochar em produção mesmo.

Sim...

Bom dia @Victor H. Gonzales - Panda lhe enviei no e-mail [email protected] as credenciais e certificado em homologação tanto da Cobrança com QRCODE e sem QRCODE via site developers.

@Victor H. Gonzales - Panda fiz algumas alterações nas units ai está gerando o token e tentando registrar, mais dá erro de validação no json. Isso para API de cobrança com qrcode e sem qrcode via site developers bradesco. A outro API de cobrança hibrida mais antiga ainda não tive tempo de testar. Vou anexar as units que alterei. ACBrBoletoW_Bradesco.pas ACBrBoletoRet_Bradesco.pas

.crt e .key teria que rever o processo porque não está pegando o token, nas 2 unit que eu alterei estava OK o token e o registro.

@Victor H. Gonzales - Panda eu testei usando a API do de cobrança com qrcode do site do developers bradesco ai dá erro ai tentar pegar o token. Testei o certificado e o problema não é no certificado.

Eu vi que ultima a unit anexada no post já estava alterada para atender tanto a API antiga quando a mais novo...então pode desconsiderar esse comentário.

Bom dia...pelo que vi os end point mais antigo da API de Cobrança hibrida Bradesco foi comentada. No meu ponto de vista teria que permancer os end point antigo....sei que API de cobrança hibrida bradesco via solicitação...essa que agente abre o chamando pedindo a liberação de uso da API será descontinuada e só vai permancer as API de cobrança com qrcode e sem qrcode via site developers bradesco. Mais era bom manter a unit alterior, seria bom criar uma nova e ou compatilizar a unit atual com as 2 API de cobrança hibrido. Afinal tem alguns usuario que estão usando API mais antiga. Eu tinha já implementado a API de cobrança com qrcode bradesco do site developers...só fiz foi criar uma novo unit...sem mexer na unit atual.... Então ficaria assim...para API de cobrança com qrcode developers bradesco seria essas ACBrBoleto.Cedente.CedenteWS.ClientID := 'seu client_id'; ACBrBoleto.Cedente.CedenteWS.ClientSecret :='seu client secret'; ACBrBoleto.Cedente.CedenteWS.IndicadorPix :=True; ACBrBoleto.Configuracoes.WebService.SSLCryptLib := cryWinCrypt; ACBrBoleto.Configuracoes.WebService.SSLHTTPLib := httpOpenSSL; AcBrBoleto.Configuracoes.WebService.SSLType := LT_TLSv1_2; ACBrBoleto.Configuracoes.WebService.TimeOut := 50000; ACBrBoleto.Configuracoes.WebService.VersaoDF := 'V2'; ACBrBoleto.Configuracoes.WebService.UseCertificateHTTP := True; ACBrBoleto.Configuracoes.WebService.ArquivoCRT := 'seu certificado.crt; ACBrBoleto.Configuracoes.WebService.ArquivoKEY := 'seu certificado.key'; e para API de Cobrança Hibrida Bradesco via solicitação seria essas abaixo. ACBrBoleto.Cedente.CedenteWS.ClientID := 'seu client_id'; ACBrBoleto.Cedente.CedenteWS.ClientSecret := 'seu client_id''; ACBrBoleto.Cedente.CedenteWS.Scope := ''; ACBrBoleto.Cedente.CedenteWS.KeyUser := ''; ACBrBoleto.Cedente.CedenteWS.IndicadorPix := True; ACBrBoleto.Configuracoes.WebService.SSLCryptLib := cryWinCrypt; ACBrBoleto.Configuracoes.WebService.SSLHTTPLib := httpOpenSSL; AcBrBoleto.Configuracoes.WebService.SSLType := LT_TLSv1_2; ACBrBoleto.Configuracoes.WebService.TimeOut := 50000; ACBrBoleto.Configuracoes.WebService.UseCertificateHTTP := False; ACBrBoleto.Configuracoes.WebService.ArquivoCRT := 'seu certificado.crt; ACBrBoleto.Configuracoes.WebService.ArquivoKEY := 'seu certificado.key'; ACBrBoletoWS.pas ACBrBoletoW_Bradesco_V2.pas ACBrBoletoRet_Bradesco_V2.pas