Ir para conteúdo
  • Cadastre-se

Grupo FS

Membros
  • Total de ítens

    36
  • Registro em

  • Última visita

Posts postados por Grupo FS

  1. Sim.. estao atualizado com a data de Hoje... 

    mas.. ao Atribuir o codigo 3 ao a.Titulo.CodigoMora := '3';

    o Fluxo... Vai para o ACBrBoleto (Imagem1)

    image.thumb.png.8f5e28763af9fb561d6f7f0a0cc1a092.png

    e que vai para o teste

    function TACBrBanco.GetCodigosMoraAceitos: String;
    begin
      Result := BancoClass.CodigosMoraAceitos;
    end;

    e a Lista dos CodigoMoraAceitos... q estão na Unit ACBrBancoBancoob

    por isso que a correção esta ali ( ACBrBancoBancoob )... é claro.. q seguindo o fluxo do Debug... 

     

  2. Bom dia Senhoras e Senhores...

    Identificado um equivoco na lista dos Código de Mora Aceitos para a API do Sicoob ( Bancoob )

    fpCodigosMoraAceitos:= '123'; segundo a Documentação da API.. os valores aceitos são 123 ... atualmente esta 012. Conforme imagem da documentação

    image.thumb.png.1aefa89ffca24f7f7b46382f6a73aca6.png

    ACBrBancoBancoob.pas

  3. Bom dia Senhoras e Senhores

    e Recente homologação do arquivo de Pagamentos da Caixa, houve a rejeição por causa do HEADER ( Registro 0 ) do arquivo

    segue correção de acordo com o Manual da Caixa ( pagina 9 ), imagem da parte da alteração

    image.thumb.png.289fe984fea67ba64f0d6774da831ee9.png

     

    para essa correção foi alterado a Unit ACBrPagForClass

    na Classe Registro0, adicionado a Variável FCodigoVAN: String; // Tamanho 3 - Usando pela CaixaEconomicaFederal

    Alterado a Unit PagFor.Caixa.GravarTxtRemessa

    Procededure GeraRegistro0 com a programação compativel com o Manual

    image.png.835fc8a48ee3ed66b02914eb5ddbb990.png

     

    em Anexo as units 

    Abraços e Obrigado pelo Excelente trabalho de vocês.

    Pablo Cerbaro

    ACBrPagForClass.pas PagFor.Caixa.GravarTxtRemessa.pas

    esqueci do Manual da Caixa... Pagamento_CaixaEconomica.pdf

    Esqueci na criação adicionar o Manual da Caixa.

    Pagamento_CaixaEconomica.pdf

    • Obrigado 1
  4. Por necessidade tivemos que desenvolver o arquivo de Pagamentos para o Banco Unicred (Cooperativa)

    Em conversa om o pessoal do banco e o link do site para download das especificações (particularidades) do CNAB240 é direcionado ao Manual do FEBRABAN 10.3

    Fiz a criação das units

    PagFor.UnicredCooperativa.GravarTxtRemessa.pas; PagFor.UnicredCooperativa.LerTxtRetorno.pas; PagFor.UnicredCooperativa.Provider.pas

    uACBrPagForProviderManager.pas na Unit

     

    na Unit ACBrPagForProviderManager
    Adicionado a Uses   PagFor.UnicredCooperativa.Provider

    Adicionado na Function o Provider do UnicredCooperativa
    class function TACBrPagForProviderManager.GetProvider(ACBrPagFor: TComponent): IACBrPagForProvider;

     

    Tentei gerar o arquivo utilizando as procedures do CNAB240.GravarTxtRemessa, porém deu incompatibilidade no SegmentoB, ai foi criado os Blocos dentro da Classe.

    PagFor.UnicredCooperativa.GravarTxtRemessa.pas PagFor.UnicredCooperativa.LerTxtRetorno.pas PagFor.UnicredCooperativa.Provider.pas ACBrPagForProviderManager.pas

    • Curtir 1
    • Obrigado 1
  5. Por necessidade tivemos que desenvolver o arquivo de Pagamentos para o Banrisul

    Conseguimos a ultima versão do Manual 10.7 cujo já contempla os Pagamentos por PIX.

    em Anexo os arquivos 

    Manul do Banco Versao 10.7

    PagFor.Banrisul.GravarTxtRemessa.pas; PagFor.Banrisul.LerTxtRetorno.pas; PagFor.Banrisul.Provider.pas

    uACBrPagForProviderManager.pas 

    na Unit ACBrPagForProviderManager
    Adicionado a Uses   PagFor.Banrisul.Provider

    Adicionado na Function o Provider do Banrisul
    class function TACBrPagForProviderManager.GetProvider(ACBrPagFor: TComponent): IACBrPagForProvider;

     

    uACBrPagForConversao.pas

    na Unit uACBrPagForConvesçao foram Adicionados o novo tipo de PIX, de acordo com o Manual do Banco ( tcpDadosBancarios )
    TTipoChavePix = (tcpNenhum, tcpTelefone, tcpEmail, tcpCPFCNPJ, tcpAleatoria, tcpDadosBancarios);

    Adicionado o Tipo tcpDadosBancario nas functions 
    TipoChavePixToStr 
    StrToTipoChavePIX
     

    PagFor.Banrisul.GravarTxtRemessa.pas PagFor.Banrisul.LerTxtRetorno.pas PagFor.Banrisul.Provider.pas Pagamento_Banrisul.pdf ACBrPagForProviderManager.pas ACBrPagForConversao.pas

    • Obrigado 1
  6. Em Recente homologação, foi rejeitado minha homolação pelo Código da Versão incorreta.

    em analise esta setado algumas Formas de Lancamento para cada versão.

    para solucionar, foi adicionado novas formas de lançamento para as versões ( que o banco retornou como errado ).

    Alterado a unit PagFor.Sicoob.GravarTxtRemessa;
    procedure TArquivoW_Sicoob.GeraRegistro1(I: Integer);
    Adicionado ao Controle de Versão novas FormaLancamento
    Para a Versao 045: flTEDOutraTitularidade, flTEDMesmaTitularidade: 
    Para a Versao 040: flLiquidacaoTitulosProprioBanco

    demais arquivo de Retorno, e o Provider Não mexidos.

    PagFor.Sicoob.GravarTxtRemessa.pas

    • Obrigado 1
  7. Em 01/03/2023 at 11:22, Daniel InfoCotidiano disse:

    @Grupo FS
    Bom dia !
    Nossa equipe estava analisando a contribuição e as alterações pode impactar outros usuários que utilizam o mesmo banco.

    Na documentação enviada não tem nenhuma referencia a câmera de compensação para 246 e ao banco BCO ABC Brasil.

    Você consegue anexar a documentação onde consta essas informações, pois a implementação está alterando a câmera de compensação de 033 para 246, sendo assim, preciso da documentação que foi embasado o mesmo;

    Obrigado

    Boa Tarde.. Desculpe a demora...

    Espero.. poder ajudar na contribuição.

     

    Link do Validador

    https://wwws.abcbrasil.com.br/ABCBrasil.ValidadorCNAB.Externo.Angular/login

     

     

    LayoutCobrancaABCBrasil_MAIO2020.pdf

     

  8. Boa tarde Senhoras e Senhores

    Venho contribuir com a correção do CNAB 400 do Banco ACB Brasil.

    o mesmo tinha como base o Banco Santander ( 033 ) e na remessa do CNAB 400 estava incorreto.. referenciando o banco Santander

    fiz os Ajustes conforme manual e a validação do arquivo no Validador do Banco

    em Anexo, os Manuais e o Fonte Alterado.

     

     

    ACBrBancoABCBrasil.pas AUTK_CNAB400NOVO.pdf 400_MANUAL BOLETOS BANCO ABC 2021.zip

  9. Bom dia Senhoras e Senhores... 

    A remessa esta validada. OK, Porem... o retorno não esta lendo correto a propriedade Nosso Numero.

    Vi que foi alterado para uma metrica global a identificação do Nosso Numero.... porém no caso do Cresol ( Manual em anexo )

    a Posição Inicial do Nosso Número é a 38...  e na nova função esta setado para 46

    Na unit ACBrBoleto

    function TACBrBancoClass.DefinePosicaoNossoNumeroRetorno: Integer;
    begin
      if ACBrBanco.ACBrBoleto.LayoutRemessa = c240 then
        Result := 46
      else
        Result := 71;
    end;

    Assim.. fazendo a Leitura incorreta do Nosso Numero.... 

    como não tenho entendimento, da magnitude, desta alteração .... apenas, no meu fonte, adicionei a linha

               NossoNumero    := DefineNossoNumeroRetorno(Linha);
               NossoNumero    := copy(Linha, 38, 20);

    para a correta leitura.

    desde ja obrigado pelos excelentes componentes.

    Abraços 

    Pablo Cerbaro

     

    Manuais-CNAB.zip

  10. Bom dia Senhoras e Senhores.. após a atualização dos fontes do ACBR em 06/07/2022 tive o seguinte problema nas remessas do Banco Cresol ( Banco 133 ) image.png

    Alerado a Linha 413 do Fonte AcbrBancoCresol.pas de 

    '0000000000 '; para '00000000000'; ou seja alterado o espaço em branco por 0 (zero) no final.

    Desde ja Obrigado pela parceria e pelos excelentes componentes.

    Pablo Cerbaro

    ACBrBancoCresol.pas

    image.png

    • Curtir 1
  11. Bom dia. Ao atualizar cliente de Guaporé / RS estava retornado o erro "Versão do modelo ABRASF indicada não está vigente"

    Alterado a Versao de 2.02 para 1.00 e corrigiu a emissão.

    [4309407]
    ; Atualizado em 18/08/2022
    Nome=Guapore
    UF=RS
    Provedor=Pronim
    Versao=1.00
    ProRecepcionar=http://guapore-portais.govcloud.com.br/nfse.portal.integracao/services.svc
    HomRecepcionar=http://guapore-portais.govcloud.com.br/nfse.portal.integracao.teste/services.svc
    ACBrNFSeXServicos.ini

  12. Boa Tarde.

    Segue a solicitação para adicionar 2 Cidades no arquivo "ACBrNFSeXServicos.ini" Componente ACBrNFSeX

    em Anexo.. Arquivo ACBrNFSeXServicos.ini e linhas adicionadas


    [4318424]
    ; Incluído em 09/08/2022
    Nome=Sao Joao Da Urtiga
    UF=RS
    Provedor=Citta
    Versao=2.03
    ProRecepcionar=https://sjurtiga.cittaweb.com.br/nfse/services/nfseSOAP
    ;
    HomLinkURL=https://sjurtiga.cittaweb.com.br/nfse/api/public/documento/report/%CodVerif%

     

    [4309902]
    ; Incluído em 09/08/2022
    Nome=Ibiraiaras
    UF=RS
    Provedor=Pronim
    Versao=2.02
    ProRecepcionar=http://189.14.227.196:8084/nfse.portal.integracao/services.svc
    HomRecepcionar=http://189.14.227.196:8084/nfse.portal.integracao.teste/services.svc

    O Link da homologação não esta funcionando.. nem acessando pelo portal da prefeitura.

    o Link produção esta 100% funcional.

    https://www.ibiraiaras.rs.gov.br/servicos-on-line/ opção


    NOTA FISCAL ELETRÔNICA AMBIENTE DE TESTE

    ACBrNFSeXServicos.ini

  13. Alterado o Componente do ACBrExtenso para abranger a seleção de Idioma.

    o Padrão deixe como Português BR, mas tive a necessidade de converão dos valores para o Espanhol e Inglês.

    para isso de uma nova Propriedade de Idioma de tradução.

    Também foi adicionado no Formato, a opção de extPeso, para que o componente retorne os "Descritivos" de Peso em Quilos

    Grato desde já pelo excente gama de componentes do ACBR. 

    desejo que aprovado esta alteração para um bom uso dos demais membros da Familia ACBR.

    ACBrExtenso.pas

    Abraços

    Pablo Cerbaro

  14. Bom dia, Venho contribuir com um Ajuste da Unit do Boleto do Banco do Brasil.

    em relação aos Tipos de remessa, no qual esta a instrução de Desconto Incorreto, e adicionado novos tipo, de acordo com o Manual do Banco.

    Bloco de alteração, na Linha 507 até a 524. ( Cnab 240 );

    Bloco de alteração, na Linha 922 até a 942. ( Cnab 400 );

    Desde já Obrigado pelo excelência do Componente.

    Pablo Cerbaro.

     

    ACBrBancoBrasil.pas

  15. Boa Tarde... apos Atualização do Fontes do Boletos...

    Esta ocorrendo PROBLEMA no Registro dos Boletos CNAB 400.

    Pela erro retornando pelo gerente do Banco o erro esta na Formatação do Registro Detalhe.

    Analisando o código fonte... vi que foi REMOVIDO a Concatenação do Digito Verificado da Agencia;

    image.png.eb34a27c69062c418dc23040e7771a29.png

    assim alterando as configuração da Agencia.... 

    vejo que ser Existe as propriedades separadas...  Devemos todos utilizá-las

    Agencia, para Agencia

    e Agencia Digito para  o Digito da Agencia.

     

    Segue Fonte para Analise.

    ACBrBancoSafra.pas

    • Triste 1
  16. Após atualização do componente ( MDFe ) no dia 13/05/2020

    foi constatado uma falha no envio do MDFe, quando o Responsável pelo Seguro é o Emitente.

    Visto que a Regra foi Alterado... Deixando assim..

    image.png.e62a51d9ce8c8d213e04c1be77460b45.png

    . da o Seguinte Erro

    image.thumb.png.c267260da1c30964456f11db31c2ab81.png

    image.thumb.png.3d2ecb23f2f9ca5457755184ab9f6e90.png

    Voltado o Fonte ao teste Original. e funcionou

    Segue o Fonte para Analise.

    Abraços

     

     

    pmdfeMDFeW.pas

  17. Bom dia Italo,

    Verificando o Manual do eSocial x Componente,

    encontrei uma pequena falha. no que diz respeito ao Bloco S-2300 na parte da remuneracao da sessão infoComplementares ( Pagina 121 do manual Versão 2.4.02 )

    esta variavel (vrSalFx  ) deve ser 0,00 quando o undSalFixo ( for 6 ou 7 ), porem no fonte pcesS2300 ( na função GerarInfoComplementares )

    tem um teste que só escreve este bloco se o Remuneracao.VrSalFx for > 0.

    se puder ajustar o teste, fico grato!

    desde já obrigado ( fiz a atualizacao dos Fonte no dia 08/06/2018 )

    sugestão de correcao adicionar o teste abaixo

    procedureTEvtTSVInicio.GerarInfoComplementares(obj: TinfoComplementares);

    (obj.Remuneracao.UndSalFixo = sfNaoaplicavel ) or

    procedure TEvtTSVInicio.GerarRemuneracao(obj: TRemuneracao);

    if (obj.vrSalFx > 0) or (obj.UndSalFixo = sfNaoaplicavel ) then

     

×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...