Search the Community
Showing results for tags 'acbr'.
-
Pessoal, sei que este assunto já foi debatido aqui em outros momentos a partir das lives no Discord, mas vira e mexe este assunto retorna e vai continuar. O tema de inteligência artificial é muito recorrente, é assunto com frequência nos principais sites de tecnologia e sempre há alguma empresa trazendo inovação, automatização de alguma tarefa e etc. Não é algo que dá para correr, não é um hype, é o futuro e ou nos adaptamos ou ficamos para trás. Estou sempre lendo sobre tecnologia e principalmente IA, nisto eu cheguei a brincar um pouco com o Gemini em uma imersão da Alula, fiz uma ou outra coisinha simples com o Chatgpt, mas algo funcional, ou seja, algo que realmente traz valor e resolve um problema ou melhora alguma coisa, ainda não. Tenho a intenção de criar uma api onde envio as perguntas dos meus clientes que receberei pelo whatsapp e respondo de acordo com minha base de conhecimento e desta forma resolver mais rápido as dúvidas dos meus clientes e diminuir a demanda do suporte. Fora isto, gostaria de colocar para fazer análise na minha base de dados de clientes, mas não sei ao certo o que eu poderia fazer e este é o grande ponto, por que creio que muitos da comunidade do ACBr, também não sabem. Eu gostaria muito de discutir mais este tema aqui na ACBr, de forma a compartilharmos ideias, experiências, talvez até criar um componente ACBr e ACBrLib também. Então pessoal, em que vocês usam IA em seus sistemas? Como usam? Quais análises fazem? Quais automações fazem? Etc.
- 15 replies
-
- 6
-
- ia
- inteligência
-
(and 4 more)
Tagged with:
-
Atenção comunidade ! Recebemos informações do Banco Inter que no dia 31/10/2024 a API Cobrança (V2) Será DESCONTINUADA! A API V3 já está funcionando, para quem nunca utilizou, basta ler este post, clique aqui. Não deixe seus testes para a ultima hora, realize os testes com antecedência para que isso não tenha impacto negativo na sua aplicação.
-
Olá pessoal! Nos últimos dias temos recebidos diversos relatos de membros de nossa comunidade com problemas para realizar o processo de Manifestação do Destinatário, seja realizando o envio de evento ou a consulta de DistribuicaoDFe. Todos os relatos tinham em comum o fato de estarem conseguindo consumir os webservices de transmissão da NF-e normalmente, mas estarem recebendo as mensagens: Erro Interno: -2146893815 Erro HTTP: 0 URL: https://www.nfe.fazenda.gov.br/NFeRecepcaoEvento4/NFeRecepcaoEvento4.asmx Erro: 2148073481 Ou: Erro: WebService Distribuição DFe: - Inativo ou inoperante tente novamente. Erro interno: -2146893815 Erro HTTP: 0 URL: https://www1.nfe.fazenda.gov.br/NFeDistribuicaoDFe/NFeDistribuicaoDFe.asmx Erro: 2148073481 - Em casos assim, é sempre válido abrir um Fale Conosco junto ao fisco para que o mesmo fique ciente de que há algo errado. Abaixo reproduzido na íntegra temos a resposta que foi fornecida pelo membro de nossa comunidade @Jhonathan na qual ele demonstra um passo a passo que executou para resolver um erro semelhante que havia enfrentado anteriormente com NFC-e e que também de acordo com múltiplos relatos de colegas da comunidade resolveu o problema agora com a manifestação do destinatário: 1- Vá até o Painel de Controle do Windows. 2- Escolha a Opção "Opções da Internet"; 3- Vá até a aba “Avançadas”; 4- No bloco “Configurações”, vá até as últimas opções e deixe configurado como na imagem abaixo: 5- Vá em executar, digite certlm.msc para abrir a interface de certificados, caso esse comando não funcione, utilize o comando certmgr.msc. Remova estes certificados listados na imagem abaixo: 6- Execute como Administrador o InstaladorCadeias_1.0.2.0.exe, clique em Instalar e aguarde até que o processo seja finalizado. 7- Execute o FixCrypto_TLS1_2_Windows.reg. 8- Descompacte o CA.zip e execute o ac soluti ssl ev.cer e o Raiz-icp-brasil v10.cer. 9- Reinicie a máquina e teste novamente a comunicação com a Sefaz.
-
- 17
-
- problema
- manifestacaodestinatario
- (and 8 more)
-
Olá pessoal! Primeiro de tudo, se você na verdade está perdido e com dificuldades para utilizar a Lib em um ambiente Azure, é importante que siga as orientações do tópico abaixo: Depois de seguidas as orientações deste tópico, será possível utilizar o ACBrLib no App Service da Azure. No entanto, alguns podem encontrar certas diferenças nas formas como os impressos são gerados no ambiente Linux da nuvem Azure e do Windows. Isso pode ocorrer devido a falta das fontes Microsoft. Abaixo temos algumas linhas e a explicação do que elas fazem, que ao serem adicionadas no script criado no tópico mencionado anteriormente, provaram resolver o problema. Um agradecimento ao membro de nossa comunidade @Rodrigo - Digibyte por mais está dica valiosa.
-
Olá, ao realizar a devolução tanto de Entrada como de Saida, informo o Valor do IPIDevol em cada item, ele soma no Rodapé da nota, porém mesmo informando e garantindo que não seria 0, mesmo assim no XML é gerado como 0. Não localizei nos Exemplos do ACBr algo relacionado. Teria um exemplo para devoluções?
-
Boa noite. Utilizo Delphi XE6 e fui atualizar o ACBr e acontece um erro ao compilar os pacotes FastReport. Pelo que pude perceber os componentes estão com Required de fs29.bpl (FastReport 2023.2) porém a versão do meu FastReport contém as BPLs fs20.bpl. Não existe uma forma de configurar os componentes essa dependência das BPLs do FastReport? Como devo fazer para corrigir o problema? Segue trecho do log de erro: Versao Instalador: 2.16.0.21 Versão do delphi: Delphi XE6 Win32 Dir. Instalação : D:\Desenvolvimento\ACBr\ Dir. Bibliotecas: D:\Desenvolvimento\ACBr\Lib\Delphi\LibD20\Win32 Cleaning package cache for ACBr_NFeDanfeFR.bpl Cleaning ok Compiling package D:\Desenvolvimento\ACBr\Pacotes\Delphi\ACBrDFe\ACBrNFe\DANFE\NFe\Fast\ACBr_NFeDanfeFR.dpk "C:\Program Files (x86)\Embarcadero\Studio\14.0\bin\dcc32.exe" "D:\Desenvolvimento\ACBr\Pacotes\Delphi\ACBrDFe\ACBrNFe\DANFE\NFe\Fast\ACBr_NFeDanfeFR.dpk" Embarcadero Delphi for Win32 compiler version 27.0 Copyright (c) 1983,2014 Embarcadero Technologies, Inc. ACBr_NFeDanfeFR.dpk(76) Fatal: E2202 Required package 'fs29' not found Compilation failure Erro ao compilar o pacote "ACBr_NFeDanfeFR.dpk". Abortando... Ocorreram erros na compilação dos pacotes.
- 5 replies
-
- erro
- instalação
-
(and 3 more)
Tagged with:
-
Tenho uma duvida a respeito do acbrposprinter em questão da margem, estou tentando imprimir umas informações em uma impressora termica, porém a margem tanto para esquerda como para direita está ficando de certa forma "grande". O componete possui alguma propriedade que faça essas margens diminuir e impressão pegar melhor a largura do papel ? Ja tentei aumentar o numero de colunas, porém não resolveu
- 3 replies
-
- acbrposprinter
- acbr
- (and 3 more)
-
A principio conforme documentação da lib, precismos ter instalado libxml2 com links simbólicos. Mas neste caso, o link ficou quebrado e o usuário procedeu da seguinte forma: “fui até a raiz da instalação "/usr/lib/x86_64-linux-gnu/" localizei a dependência instalada, no meu caso, "libxml2.so.2.9.10" e refiz o link, "ln -s libxml2.so.2.9.10 libxml2.so", daí ele conseguiu localizar e rodar. “ Outro ponto importante, sabemos que precisamos do xvfb para virtualização, isso porque existem dependências gráficas na DLL. Como ele faz a distribuição com Spring + Maven, em um servidor VPS com Tomcat, para funcionar com o emulador gráfico ele precisou adicionar um “execution” junto aos plugins, no pom.xml, segue o arquivo com este “add execution” que ele esta contribuindo com a comunidade. Arquivo: add_pom.xml Obrigado @Ricardo Isono por estas colaborações e informações que é de extrema valia a comunidade.
-
Conforme instruido no TXT de configuração para o uso da API de Boletos do Banco do Brasil, foi configurado o componente, porem o retorno do envio da remessa pela api retorna com a mensagem "Tipo do convênio inválido", dentro do proprio projeto AcbrBoletoDemo tambem me gera a mesma resposta. RetornoRegistro.txt
- 5 replies
-
- boleto
- acbrboleto
-
(and 3 more)
Tagged with:
-
Boa tarde senhores, PC Novo. Tudo instalado do zero. Adquiri o Delphi 12 hoje. Instalei tudo normalmente. Baixei o Trunk do SVN ACBR. Inclusive deu uns erros pra instalar pra Delphi 12 32bits LibD29. Pra compilar o componente "Pacotes\Delphi\ACBrDFe\ACBrNF3e\ACBr_NF3e.dpk" está dando erro e tive que colocar uns arquivos da versão anterior do ACBR pra compilar. Veja o print abaixo com todos os arquivos necessários pra compilar (Pasta: Fontes\ACBrDFe\ACBrNF3e\Base\Servicos) Pronto! Compilei o DPK e instalei o ACBR completo sem erro. Abri meu projeto e dei um Build pra ele fazer todo o reprocessamento dos componentes ACBR. Sistema rodou legal. Mas me veio esse erro quando vou instanciar o componente ACBRNFSEX. Veja o print abaixo: Espero ter ajudado a resolver este problema pra amigos desenvolvedores também. Abraço a todos!
-
Lembrei disso hoje... e decidi procurar se o Post n.1 ainda existe... SIM, ele ainda está no Fórum da DevMedia, o qual eu frequentei por um bom tempo, e foi o espírito de cooperação dos usuários do fórum, que me motivou a criação do Projeto ACBr... Reparem no Post, que ainda não há menção do nome ACBr, e a ideia inicial, era fazer uma classe de Suportes a ECF (Emissor de Cupom Fiscal)... https://www.devmedia.com.br/forum/classe-para-acesso-direto-a-ecf-em-linux-windows/229474 Na abertura do último Dia do ACBr, eu menciono um pouco sobre a criação do Projeto... Classe para acesso Direto a ECF em Linux/Windows 03/05/2004 Ola, para todos.... Estou desenvolvendo uma Classe Multiplataforma para acesso direto a diversas Impressoras Fiscais. Na verdade o projeto ainda está engatinhando, mas já tive sucesso em Comunicação com a Bematech em Windows e Linux. Entretanto, como muitos programadores também necessitam ou já fazem acesso a ECF, resolvi usar a ideia de tornar isso um projeto OpenSource. P1 - Porque fazer mais uma biblioteca de acesso a ECF ? A ideia é fazer uma Classe que possa rodar em Linux / Windows. algo que nao existe hoje.... Alem de não exigir nenhuma DLL ou SO, a fim de evitar o ´inferno das DLL´s´ P2 - Como fazer acesso aos ECFs ? Como a classe deve rodar em Linux, fica descartado o uso de DLL´s... Todas as impressoras fiscais (pelo menos as que já programei) possuem manuais descrevendo os codigos de comandos e protocolos seriais. Atualmente acesso as impressoras: Bematech, Daruma, Schalter, Sweda, Mecaf (e compativeis) de forma direta, em DOS, usando a linguagem CLIPPER 5.02e.+Clipper Tools... O Executável não depende de nenhum arquivo externo ou device driver no CONFIG.SYS. A ideia é migrar as funçoes de Clipper para Delphi, usando um componente de acesso a Serial. P3 - Qual componente fará acesso a serial ? Dos que testei, apenas a classe SynaSer http://www.ararat.cz/synapse/ é multiplataforma (Kylix) P4 - Porque rodar em Linux ? Já pensou oferecer para os seus clientes uma solução de Aplicacação Comercial totalmente legalizada ? e sem pagar uma fortuna por isso ? Sem falar na estabilidade e segurança do Linux.... Qual usuário consegue apagar o sistema ? (alem do Root é claro Caracteristicas do projeto: - Deve ser OpenSource e com a distribuição dos fontes: - Deve ser Multi-plataforma (Windows ( CLX / VCL ) / Linux) - Nao deve depender de nehuma DLL ou SO. - Deve suportar as diferença entre os diversos modelos de ECF - As Classes Filhas devem tratar de forma transparente as pequenas diferenças na programaçao de Versoes diferente do mesmo Modelo de ECF. Ex: A classe TECFBematech deve ser capaz de trabalhar com todas as versoes da Bematech FI Vantagens do Projeto: - Total controle da Aplicação: Já vi DLL´s que simplesmente param o processamento do programa (Quem já homologou TEF discado, sabe o que eu quero dizer...) - Facil distribuição: Não precisa distribuir e instalar nenhuma DLL - Livre-se do Inferno das DLL´s Quando o usuário instala outro programa que usa a mesma DLL que você usa, porém em uma versão antiga (causando Bugs no seu programa) - Multiplataforma: Linux / Windows - Programação Limpa e Clara. Basta criar uma classe TECF com o modelo apropriado. O Codigo fonte sempre se refere a Classe criada, sem se preocupar com o Modelo Desvantagens do Projeto: - Se o hardware mudar, ficamos dependendo de novas informaçoes do fabricante, ou até mesmo de um modelo do equipamento para testes... - Geralmente as DLL´s incorporam novos Hardwares do mesmo fabricante.... Aqui teremos que implementar um novo filho da classe TECF para cada Hardware novo (somente se o novo hardware nao for compativel com o antigo) Estou lançando a ideia para ver a aceitação... Existe algum disposto a colaborar ? Posso enviar os fontes por e-mail para que estiver interessado... Em breve farei uma pagina para download do projeto... (Ou se alguem estiver disposto a fazer... ) A ser desenvolvido: - Terminar a implementação da Classe TECFBematech - Implementar as demais Classes (Daruma, Schalter, Sweda, Mecaf) - Criar Classe para Manupilação de TEF Discado para interagir com TECF Na verdade, nunca fiz nenhum projeto OpenSource... Gostaria de sugestões... Duvidas: - Como / Onde hospedar o projeto ? - Como cordernar ?.... - Como fica a questão legal de OpenSource ? É preciso registrar isso em cartório ? Ps: Srs Moderadores, desculpe postar essa msg em 2 áreas, mas acredito que seja do interesse...
-
Bom dia pessoal, tudo bem? Ao imprimir NFS-e no padrão nacional cortava a chave de acesso, só imprimia os 50 primeiros caracteres, ai verifiquei que era na criação do ClientDataSet (na linha 443 do arquivo em anexo), então ajustei conforme o arquivo em anexo, se acaso acharem pertinente subir esse código, em anexo tem o fr3 que estou usando com alguns ajustes também. ATT. ACBrNFSeXDANFSeFR.pas DANFSe_EL.fr3
- 7 replies
-
- 1
-
- nfsex
- padraonacional
-
(and 1 more)
Tagged with:
-
Ao tentar gerar o Boleto em PDF, o seguinte erro é emitido. Segue abaixo em trecho da config. cobranca.ACBrBoletoFC := TACBrBoletoFCFR.Create(nil); if cobranca.ACBrBoletoFC is TACBrBoletoFCFR then TACBrBoletoFCFR(cobranca.ACBrBoletoFC).FastReportFile :=ExtractFilePath(Application.ExeName)+'Boleto.fr3'; if Assigned(cobranca.ACBrBoletoFC) then cobranca.ACBrBoletoFC.DirLogo := ExtractFilePath(Application.ExeName)+'Logos\Colorido\'; cobranca.ACBrBoletoFC.CalcularNomeArquivoPDFIndividual := False; if not DirExists(ExtractFilePath(Application.ExeName)+'Boletos\PDF') then MkDir(ExtractFilePath(Application.ExeName)+'Boletos\PDF'); cobranca.ACBrBoletoFC.NomeArquivo := ExtractFilePath(Application.ExeName)+'Boletos\PDF\Boleto_'+sNumeroBoleto; cobranca.ACBrBoletoFC.AcbrBoleto.GerarPDF; Os diretorios estão corretos, seria alguma configuração pendente? Verifiquei as configs da Demo, e está sendo informado da mesma forma Utilizo Delphi Seattle
-
Primeiramente, espero que todos estejam bem e já agradeço a ajuda reportada! Estou criando um app simples, que terá como uma funcionalidade principal a leitura do código de barras de um produto e em sequencia, a impressão da etiqueta do mesmo. Para a impressão da etiqueta, utilizamos a impressora Zebra ZT230, que está compartilhada em rede '\\IPCOMPUTADOR\ZebraFilial'. Em testes realizados compilando direto no windows, consigo realizar o envio e impressão da etiqueta na impressora. Quando faço a compilação utilizando o android, abro o app e tendo fazer o envio para impressora, recebo o seguinte erro: 'PORTA NÃO DEFINIDA'. Pesquisando aqui no fórum, encontrei alguns tópicos com algumas dicas e tentei implementar, mas ainda assim o problema persiste. Tentativas de definição da propriedade PORTA do componente ETQ: 1ª: \\IPCOMPUTADOR\ZebraFilial -> Erro: 'PORTA NÃO DEFINIDA' 2ª: RAW:\\IPCOMPUTADOR\ZebraFilial -> Erro: 'PORTA NÃO ENCONTRADA' 3ª: RAW:ZebraFilial -> Erro: 'PORTA NÃO ENCONTRADA' 4ª: USB:Zebra, ZT230 -> Erro: 'NÃO IMPRIME A ETIQUETA' apesar de ativar a impressora, passar todos os parametros e finalizar a impressão. 5ª UBS:\\IPCOMPUTADOR\ZebraFilial -> Erro: 'NÃO IMPRIME A ETIQUETA' apesar de ativar a impressora, passar todos os parametros e finalizar a impressão. Alguém poderia me ajudar nessa questão? Desde já serei muito grato pelo ajuda e tempo solicito.
-
Ao inicializar o Delphi Seattle, uma serie de erros nas dpl são exibidos, que se estende a todas as dpls existentes na pasta Lib. O Path está sendo referenciado. Realizei a reinstalação do ACbr. Rodei o "apagarAcbr.bat" e realizei novamente a reinstalação. Cheguei a limpar a pasta e puxar novamente tudo do SVN para realizar a reinstalação. Esta situação está ocorrendo deste ontem, nada foi alterado na maquina para que isto acontecesse, apenas iniciei minha manhã de ontem com este erro. Alguma ideia de como solucionar ? (PS: Mesmo apagando tudo da pasta ACBr e puxando do SVN, as Pastas EXEMPLO e FONTES vieram como alterados, não sei se isto teria algo relacionado)
-
Pessoal, eu tinha procurado aqui no grupo uma forma de gerar o arquivo FCI, mas não achei nenhum código, portanto eu criei o código e testei a geração, está funcionando e validando. A leitura do arquivo de retorno eu não testei, pois não tenho um arquivo de retorno ainda, mas já disponibilizo o meu código para vocês utilizarem e implementarem no ACBr também. Além da unit "ACBrFCI.pas", tem um Demo também. FCI.zip
- 7 replies
-
- 5
-
- fci
- ficha de conteúdo de importação
- (and 4 more)
-
Olá, a logo da DACTE e DAMDFE não esta aparecendo. Estou informando a imagem seguindo os exemplos do acbr sobre o CTe e MDFe, segue abaixo: // MDFE ACBrMDFe1.DAMDFe.Logo := sDir + logoJPG; // CTE ACBrCTe1.DACTE.Logo := sDir + logoJPG; Como tambem, tentei informar a logo pelo componente dacte, como possui um campo chamado logo, resolvi testar (apenas no caso do CTe):ACBrCTeDACTEFR.Logo := sDir + logoJPG; Para NF-e, consegui homologar as imagens JPG de 100x100 ate 600x600 seguindo esse exemplo (ACBrCTe1.DACTE.Logo := sDir + logoJPG;) Alguma informação de como proceder nesse caso? Algo esta faltando?
-
Olá, a logo da DACTE e DAMDFE não esta aparecendo. Estou informando a imagem seguindo os exemplos do acbr sobre o CTe e MDFe, segue abaixo: // MDFE ACBrMDFe1.DAMDFe.Logo := sDir + logoJPG; // CTE ACBrCTe1.DACTE.Logo := sDir + logoJPG; Como tambem, tentei informar a logo pelo componente dacte, como possui um campo chamado logo, resolvi testar (apenas no caso do CTe):ACBrCTeDACTEFR.Logo := sDir + logoJPG; Para NF-e, consegui homologar as imagens JPG de 100x100 ate 600x600 seguindo esse exemplo (ACBrCTe1.DACTE.Logo := sDir + logoJPG;) Alguma informação de como proceder nesse caso? Algo esta faltando?
-
Pessoal, estou esperando o recurso do Registro Online de Boletos para o Sicoob ficar pronto. Eu vi que teve uma contribuição e ela está em análise no TK-3540. Como faço para saber se este recurso já foi disponibilizado? Outra coisa, tem como eu baixar e instalar somente o componente ACBrBoleto? Link:
- 3 replies
-
- acbr
- atualização
-
(and 6 more)
Tagged with:
-
Olá! Após fazer o update pelo svn, executei o instalador e ele travou. Depois de reiniciar a instalação do componente agora aparece a mensagem: invalid document: unexpected text in file prolog at position 1 Segue o log log_Delphi_10.2_Tokyo_Win32.txt
-
Bom dia a todos, gostaria de saber se existe algum componente ou rotina do ACBr, que possui algo que gere o código de associação, onde é feito o vinculo do CNPJ da Software House com o CNPJ do Contribuinte e com essa combinação, gere o código para vinculação do SAT. Pesquisei no fórum e dei uma olhada no fonte do ACBr, não encontrei nada nesse sentido; Se caso não houver, alguém sabe me dizer como eu poderia criar e gerar essa chave? Atualmente, uso um Software de terceiros para gerar esse código, mas gostaria de fazer diretamente no meu software; Obrigado a todos.
-
Saudações a todos, Estou utilizando o componente NfeSe com o provedor Betha, ocorre que eu não consigo adicionar mais de um serviço na emissão do RPS, mesmo que eu preencha as tags que estão dentro de "Servico.ItemServico.Add", a nota fiscal chega no ambiente de testes do Fly e-nota com apenas um serviço. Em resumo não consigo mandar mais de um serviço na minha nfese, estou tentando da seguinte forma dentro do Demo_ACBrNFSe: with Servico.ItemServico.Add do begin Descricao := 'SERVICO 1'; Quantidade := 1; ValorUnitario := 15.00; ValorServicos := 15; ValorDeducoes := 0.01; ValorIss := 0.01; Aliquota := 1; BaseCalculo := 0.01; DescontoCondicionado := 0.01; DescontoIncondicionado := 0.01; Discriminacao := 'Discriminacao teste'; end; with Servico.ItemServico.Add do begin Descricao := 'SERVICO 2'; Quantidade := 2; ValorUnitario := 15.00; ValorServicos := 15; ValorDeducoes := 0.01; ValorIss := 0.01; Aliquota := 1; BaseCalculo := 0.01; DescontoCondicionado := 0.01; DescontoIncondicionado := 0.01; Discriminacao := 'Discriminacao teste'; end; Olhando dentro da unit pnfsNFSeW.pas eu reparei que para alguns provedores é utilizado um loop para leitura dos itens da coleção ItemServico, mas o Betha não está entre esses provedores. Alguem já passou por algum problema semelhante? Eu posso emitir vários itens na nota quando ela é do provedor betha? Se posso alguem pode me orientar como devo proceder? Desde já agradeço a atenção de todos. Leandro Bovi
- 18 replies
-
Olá Pessoal, estou tendo problemas ao atribuir valor para a tag OptanteSimplesNacional eu tentei usar OptanteSimplesNacional := 'S'; e tbm OptanteSimplesNacional := 1; Pelos XMLs que vi na internet esse campo é atribuido o valor 1 ou 2 Mas não aceita Valores inteiros sera que alguém pode me ajudar?? o fonte está assim: IdentificacaoRps.Numero := notaservico.FieldByName('numero').AsString; IdentificacaoRps.Serie := 'A'; IdentificacaoRps.Tipo := '1'; DataEmissao := emissao.DataBinding.Field.AsDateTime; if parametro.FieldByname('simplesnacional').asstring = 'S' then OptanteSimplesNacional := 1; else OptanteSimplesNacional := 0; Obrigado Desde Já!
-
Prezados, bom dia. Utilizando o validador de arquivos do site do Bradesco para o serviço de Pagamento a Fornecedores disponível neste link https://banco.bradesco/html/pessoajuridica/solucoes-integradas/outros/layout-de-arquivo.shtm Realizei as seguintes alterações em Units do ACBrPagFor. ACBrPagForGravarTXT.pas Alterei a procedure GeraRegistro1 para que quando o banco seja o Bradesco e o lote correspondente for de segmentos O preencha o Layout do Lote como 012. Modifiquei a procedure GeraRegistro1 para que quando o banco seja o Bradesco e o lote correspondente for de segmentos O preencha o indicativo de forma de pagamento (P014 no manual) como 01. Modifiquei o case da procedure GeraSegmentoO para que quando o banco for Bradesco gere o Segmento conforme é para o Santander, Sicredi e Safra, colocando 20 posições para o Nosso Número(conforme é no manual) ao invés de 19. ACBrPagForLerTXT.pas Adicionei um no Case da procedure LerSegmentoO uma opção específica para o Bradesco. ACBrPagForConversao.pas Alterei na procedure BancoToDesc para que o resultado quando Bradesco seja BANCO BRADESCO S.A; Adicionei uma procedure DescricaoRetornoBancoBradesco. As coloco a disposição da comunidade para validação e possível inclusão. ACBrPagForConversao.pas ACBrPagForGravarTxt.pas ACBrPagForLerTxt.pas
-
Bom amigos, Estou tentando pegar o numero de série do meu certificado, já consigo fazer isso usando o método : Porém esse método não pede a senha do meu certificado para pegar o numero de série do mesmo(no caso certificado A3) gostaria de saber se existe algum outro metódo que apenas carregue o numero de serie más que peça a senha antes de carregar ! Desde já agradeço.
- 9 replies
-
- acbr
- certificado
-
(and 1 more)
Tagged with: