Conta vinculada no Banco do Brasil!

[Márcio Antônio]

Olá, estou tendo problemas com a emissão de boletos híbridos no banco do brasil, o meu cliente tem uma conta vinculada, cadastrada no banco, informei no código como abaixo?

                ACBrBoleto.Cedente.CaracTitulo := tcVinculada

Sendo que os boletos estão sendo gerados como conta simples, mesmo informando o código acima. Falei com o suporte do banco, e o mesmo me informou que estou passando o código 1, no registro do banco, quando fui analisar os fontes, encontrei isso abaixo, está setado de forma fixa o código "1", tem alguma atualização para isso?

     Gerador.wCampo(tcStr, '#04', PrefixTag('codigoModalidadeTitulo'), 1, 1, 1, '1' , DSC_CODIGO_MODALIDADE);

Em anexo a documentação do banco, para esse tipo de registro.

[Márcio Antônio]

Fiz essa alteração para atender o meu cliente...

    if Boleto.Cedente.CaracTitulo = tcSimples then
      Gerador.wCampo(tcStr, '#04', PrefixTag('codigoModalidadeTitulo'), 1, 1, 1, '1' , DSC_CODIGO_MODALIDADE)
    else
      Gerador.wCampo(tcStr, '#04', PrefixTag('codigoModalidadeTitulo'), 1, 1, 1, '4' , DSC_CODIGO_MODALIDADE);
 

[Victor H. Gonzales - Panda]

Bom dia, certeza que é por SOAP que voce está fazendo o registro ?

eles tem 2 produtos, a foto que você enviou é por API, o trecho de código enviado é via SOAP.

[Márcio Antônio]

Boa tarde, Panda. Eu tinha feito a alteração nas duas units do acbr, e mandei apenas o trecho via SOAP, segue abaixo o da API.

      if Boleto.Cedente.CaracTitulo = tcSimples then
        Json.Add('codigoModalidade').Value.AsInteger                    := 1
      else
        Json.Add('codigoModalidade').Value.AsInteger                    := 4;
 

Mas obrigado pelo retorno.

[Victor H. Gonzales - Panda]

8 minutos atrás, Márcio Antônio disse:

Boa tarde, Panda. Eu tinha feito a alteração nas duas units do acbr, e mandei apenas o trecho via SOAP, segue abaixo o da API.

      if Boleto.Cedente.CaracTitulo = tcSimples then
        Json.Add('codigoModalidade').Value.AsInteger                    := 1
      else
        Json.Add('codigoModalidade').Value.AsInteger                    := 4;
 

Mas obrigado pelo retorno.

eu só queria entender se você estava realmente usando SOAP, porque a documentação ali era via API.

vou corrigir aqui ambas para essa mesma regra

[Márcio Antônio]

Ah, entendi... estou usando API.... mas fiz logo nas duas.... valeu panda!

[Victor H. Gonzales - Panda]

Por favor atualize seus fontes, pelo SVN do ACBr... 

Já subimos para o nosso repositório de fontes, modificações que podem corrigir algum dos itens referentes a esse tópico...

Por favor atualize seus fontes, faça testes, e se possível comente em uma nova resposta, se o problema foi resolvido...

Dúvidas, sobre o uso do SVN ?  Clique aqui e veja um vídeo

[Márcio Antônio]

Problema resolvido, obrigado panda!