Ir para conteúdo
  • Cadastre-se

jcdatrindade

Membros
  • Total de ítens

    142
  • Registro em

  • Última visita

Tudo que jcdatrindade postou

  1. Me parece que existe a possibilidade de você converter essa impressora em não fiscal. Veja com o pessoal da Daruma
  2. O que ocorreu comigo é a solicitação do banco que seja fornecida uma mostra com no mínimo 10 e no máximo 20 boletos conforme indicado abaixo. Portanto o erro estava na minha amostra e não nos dígitos gerados pelo componente
  3. Eu homologuei sem problemas, embora não esteja usando atualmente. A empresa negociou com o banco Itaú, onde também consegui homologar. Para a Caixa Federal veio somente a observação de corrigir a mensagem de Autenticação para Autenticação Mecânica Os demais ajustes fiz por minha conta, não foram solicitados pelo banco, e vale salientar que foram somente ajustes visuais, nada em processamento ou correções do tipo. Somente visual!!! Está homologado na Caixa sim SigCB,
  4. Apenas uma opnião Linhas 52 e 53 vOutro=+0.00 Talvez esse sinal de + esteja causando o erro?????? vDesc=+0.00
  5. Vacilo meu Instalei a impressora nova e não reiniciei o ACBrMonitorPlus Caso resolvido e encerrado!!!!!
  6. Como eu disse, são somente alterações visuais, para salientar e/ou realinhar algumas informações A formatação do CNPJ/CPF do pagador, que fiz no evento beforeprint do componente, essa a única alteração no código-fonte O Texto Autenticação Mecânica - Ficha de Compensação, que foi por solicitação da Caixa Federal Da forma com que está, foi homologado pela Caixa Federal e Pelo Banco Itau Esse comentário não procede mais, está funcionando corretamente, favor desconsiderar. *** Em tempo: A ficha de protocolo de entrega do boleto parece não estar funcionando a contento, então forcei a barra incluindo uma linha apoós a linha 534 da unit ACBrBoletoFCFortesFr onde se lê RLBand4.Visible := TRUE ; /* a banda RLBand4 é a banda de relatório que imprime o protocolo de entrega do boleto */ ***
  7. Pessoal Estou com um problema e não estou achando meu erro. Estou tentando direcionar a impressao da DANFE para uma determinada impressora, através do comando NFE.ImprimirDANFE Acontece que sai sempre na mesma impressora O manual diz NFE.ImprimirDanfe(cArqXML,[cImpressora],[nNumCopias],[cProtocolo],[bMostrarPreview],[cMarcaDagua],[bViaConsumidor],[bSimplificado]) O meu programa comanda NFE.ImprimirDANFE("N:\rasn\pedidos\NFE\201704\NFE\31170404631337000158550010000262001284613415-nfe.xml","NPIB0A3E1 (HP LaserJet Professional M1212nf MFP)","1") OK: Danfe Impresso com sucesso NFE.ImprimirDANFE("N:\rasn\pedidos\NFE\201704\NFE\31170404631337000158550010000262001284613415-nfe.xml","HP LaserJet M1005","1") OK: Danfe Impresso com sucesso NFE.ImprimirDANFE("N:\rasn\pedidos\NFE\201704\NFE\31170404631337000158550010000262001284613415-nfe.xml","HP LaserJet Professional M1212nf MFP","1") OK: Danfe Impresso com sucesso NFE.ImprimirDANFE("N:\rasn\pedidos\NFE\201704\NFE\31170404631337000158550010000262001284613415-nfe.xml","HP LaserJet Professional M1212nf MFP","1") OK: Danfe Impresso com sucesso São varios comandos ImprimirDANFE, e sai sempre na mesma impressora. na HP LaserJet M1005 que é a impressora padrao do computador. Onde pode estar meu erro?? Já antecipado agradeço a ajuda. Em tempo, As impressoras estão corretamente instaladas e imprimindo também corretamente de outros aplicativos. Excel por exemplo Obrigado
  8. Esse realmente é um problema, eu nao diria problema, uma limitação, de trabalhar com svn As alterações que fazemos nem sempre são publicadas ou então demoram um pouco pra isso. Eu estou às voltas com o Boleto. Mas tem que ser assim, senão vira bagunça. Tem que ter um mediador mesmo. Vamos levando ...
  9. Deletar o componente e incluir novamente não resolveu então Alterei a o conteudo da propriedade Servico. Passei para [ Tps10030CARTASIMPLES ] compilei e rodou legal Obrigado
  10. Pessoal Compilando a versão atual do SVN revisão 13292 deu um erro na Unit ACBrMonitor1.pas Quando executamos o ACBrMonitorPlus dá o seguinte erro de execução. Atualizei ainda a pouco e recompilei, então o erro surgiu! Não sei se deveria ter aberto um novo tópico, como é um erro no Trunck2, postei por aqui mesmo. Obrigado desde já
  11. As alterações foram feitas no programa fonte mais atual. Seguem o programa fonte e o formulário conforme solicitado. ACBrBoletoFCFortesFr.lfm ACBrBoletoFCFortesFr.pas
  12. Obrigado pela pronta resposta Sendo isso me despreocupo. A alteração que fiz "forçando a barra" já não existe mais, excluí a linha 534 e os dois tipos de boleto, modelo 0, sem o canhoto de entrega modelo 3, com o canhoto de entrega; estão funcionando corretamente. Somente fica um comentário que eu acredito que deva ser levado em conta: - Corriji o texto "Autenticação Mecanica - Ficha de compensação" por solicitação da Caixa Federal No mais, tranquilidade. Somente fiz alterações em tamanhos de fontes e alguns negritos, itálicos e realinhamentos de campos nada que comprometa o funcionamento com outros bancos. Sou muito grato por suas considerações
  13. Juliomar, Achei importante seus comentários. Quanto a não poder disponibilizar até não vejo problema, mas quando diz que simplesmente me esqueci de outros bancos, me preocupa, uma vez que, como eu disse, foram apenas modificações visuais e consegui homologar os boletos no Banco Itaú e Caixa Federal. O que seria o "esquecer de outros bancos", mesmo porque isso pode me acarretar um problema futuro. As modificações visuais que fiz foram por solicitação de um cliente. Mas claramente eu entendo que o aplicativo tem que atender a todas as necessidades, sem particularidades, embora tenham sido somente alterações visuais. Peço essa elucidação para que eu possa me corrigir e desde ja Sou muito grato pelas observações.
  14. Tive o mesmo problema e resolvi recompilando pelo SVN, e hoje tenho homologado pela Caixa e Banco Itau. Fiz umas outras melhorias de lay-out e ainda do canhoto de comprovante de entrega O Boleto com o lay-out autorizado está nesse tópico:
  15. Anexo estão os fontes!! ACBrBoletoFCFortesFr.lfm ACBrBoletoFCFortesFr.pas
  16. Aos responsáveis pelo ACBrBoleto Eu fiz pequenas alterações visuais no boleto Fortes, do tipo - Evidenciei valor do titulo e vencimento com negrito e itálico - Reduzi um pouco as linhas de informaçoes do cedente e coloquei em negrito de maneira que agora cabem 9 linhas onde antes eram 6 - Corriji o texto "Autenticação Mecanica - Ficha de compensação" por solicitação da Caixa Federal - Diminui em um ponto as duas linhas com os dados do cedente - Realinhei o texto que fala que o boleto foi pago com cheque e aguardar compensação e tals - Realinhei alguns campos na ficha de protocolo de entrega do boleto De maneira que achamos que ficou visualmente mais agradável. Talvez seja interessante publicar no ACBr Sendo assim, caso haja interesse remeto os arquivos correspondentes para tal publicação e compartinhamento Em tempo: A ficha de protocolo de entrega do boleto parece não estar funcionando a contento, então forcei a barra incluindo uma linha apoós a linha 534 da unit ACBrBoletoFCFortesFr onde se lê RLBand4.Visible := TRUE ; /* a banda RLBand4 é a banda de relatório que imprime o protocolo de entrega do boleto */ Obrigado desde já!
  17. Rafael, Estou com os boletos do Banco Itaú homologados. Obtive a resposta ontem segue ai o meu arquivo que possuem os dados do cliente eu chamo-o de cedente341.ini ***************** inicio do ini *************************** [Cedente] Nome=NOME DO MEU CLIENTE CNPJCPF=99.999.999/9999-99 Logradouro=ENDERECO - RUA Numero=380 Bairro=Centro Cidade=ARAXA CEP=38183198 Complemento= UF=MG RespEmis=0 TipoPessoa=1 LayoutBol=0 CaracTitulo=0 CodigoCedente= Carteira=109 Modalidade= CodTransmissao= Convenio= [Conta] Conta=99999 DigitoConta=8 Agencia=0944 DigitoAgencia=0 [Banco] Numero=341 Sigla=ITAU CNAB=1 IndiceACBr=6 [Mensagem] PrazoParaProtesto=5 LinhaLocalPagamento=ATE O VENCIMENTO PAGAR PREFERENCIALMENTE NO ITAU, APOS O VENCIMENTO SOMENTE NO ITAU Linha1=NOTA FISCAL No. ##NUMERONOTAFISCAL## Linha2= Linha3= Linha4= Linha5= Linha6= Linha7= Linha8= Linha9= Linha10= Linha11= Linha12= Linha13= Linha14= Linha15= LinhaAA=APOS VENCIDO COBRAR JUROS DE R$ ##JURODIARIO## AO DIA LinhaBB=PROTESTAR APOS 5 (CINCO) DIAS DE VENCIDO LinhaCC=PODE SER PAGO NA ##NOMEFANTASIA## ATE ##DATALIMITEPGTOLOCAL## ************* final do ini ********************************** Esse é o arquivo INI que uso para a cobrança do Itau Espero que auxilie voce. passe o codigo do cedente em branco, o programa do ACBrBoleto que trata o banco Itau faz o tratamento dessa informação corretamente.
  18. Estou às voltas com a Caixa Federal, aguardando resultado de um segundo envio para homologação. Deixo aqui algumas sugestões de alteração, eu fiz no meu ACBr e recompilei, na unit ACBrBoletoFCFortesFr.pas 1) na ficha de compensação do boleto está a mensagem "Autenticação-Ficha de Compensação" e a pedido deles alterar para "Autenticação Mecânica - Ficha de compensação" 2) nas instruções de cobrança, diminuí a fonte para fSize=7 e fsBold= true Notei que cabem mais instruções e ficou mais legivel pelo negrito 3) aparentemente um erro, não está imprimindo o canhoto/comprovante de entrega qualquer que seja o parametro [TipoImpressao] no arquivo .ini do titulo então nessa mesma unit eu forcei a barra com /// RLBand4.Visible := (fBoletoFC.LayOut = lPadraoEntrega) ; RLBand4.Visible := (True) ; na linha 530 da unit fora isso tudo tranquilo. Estou aguardando o retorno da caixa Valeu!!
  19. O texto do email que utilizamos por aqui é o seguinte: **************** inicio ****************************** Correspondencia gerada automaticamente, favor nao responder. Segue anexo arquivo XML de nota fiscal eletrônica: Dados do Emitente: [EmitNome] [EmitFantasia] CNPJ: [EmitCNPJCPF] IE: [EmitIE] Dados do Destinatário: [DestNome] CNPJ: [DestCNPJCPF] IE: [DestIE] Dados da NF-e: Chave de Acesso: [ChaveNFe] Numero da Nota Fiscal: [NumeroNF] Valor da Nota Fiscal: R$ [ValorNF] Data de Emissão: [dtEmissao] A autenticidade dessa nota fiscal pode ser verificada em http://www.nfe.fazenda.gov.br/ **************** final ****************************** e o assunto: NF-e no. [NumeroNF] emitida por [EmitNome] fica a sugestão . . .
  20. Pessoal Estou homologando meus boletos com a Caixa Federal. Por um pequeno detalhe, eles recusaram o boleto impresso. 1.2 - A ficha de compensação deve possuir na parte inferior, à direita, a expressão: "Autenticação Mecânica-Ficha de Compensação" - Está "Autenticação-Ficha de Compensação" Creio que essa mensagem dependa de uma nova compilação! É um pequeno detalha mas irá afetar qualquer homologação na CEF.
  21. Troquei a maquina e o problema resolveu. Bug do Windows!!!
  22. O certificado gravado no cartão é tão frágil quanto o gravado em disco. Por um momento até pensei que a gravação, o certificado gravado fosse em uma região Read Only do cartão, mas não é. O Certificado é passível de um ataque de vírus, de um erro de leitura, de um mal funcionamento de um periférico. Qualquer coisa pode danificar o certificado. Assim é o que percebi. Troquei o computador por um novo com leitora nova e tudo mais. Mas como você comentou, o "medo" fica, dada a fragilidade da gravação. Uma coisa eu penso ter certeza, o ACBr, seus componentes e até mesmo o ACBrMonitorPlus não consomem com o certificado, não apagam o certificado. O problema está na fragilidade do arquivo.
  23. Valeu Ricardo, Esse foi um dos primeiros testes que fiz. Usei o Bloco de notas, Coreldraw, Word e Excel.E saem duas e até mais cópias. O problema só está ocorrendo, aparentemente com o ACBrMonitor
  24. Como citado acima, o programa que gerencia o cartão solicita sua inserção, a senha não pedida nesse momento, o gerenciador solicita a inserção do cartão, você insere e ... ... ... PAU ... ... ... assim se deu aqui,
  25. Salve senhores, Procurei por aqui e não encontrei, Por sugestão de vocês estou usando múltiplas impressoras com o ACBrMonitorPlus com sucesso O número de vías é que não está funcionando corretamente, em impressora de rede Uso o comando NFE.CriarEnviarNFe. Segue abaixo o trecho do programa em Harbour 3.2 cNomeImpressora :=IniGet(mIniNFE,"NFE","Impressora",.f.) cCopias :=IniGet(mIniNFE,"NFE","Copias" ,.f.) cCopias :=if(val(cCopias)=0,"1",cCopias) ?? 'NFE.CriarEnviarNFe("'+mPathIniNfe+"NF"+zerar(str(_NumNF,6),6)+'.ini",'+; &&& Ini da NFE '"'+alltrim(str(_NumNF))+'",'+; &&& Numero do lote '"1",'+; &&& Se imprime danfe '"0",'+; &&& Se transmite sincrono '"'+cNomeImpressora+'",'+; &&& Nome da Impressora '"0",'+; &&& Se mostra o preview da nota '"'+cCopias+'",'+; &&& Numero de copias '"0")' &&& Se gera pdf da nota o valor de cCopias e cNomeDaImpressora está em um arquivo .INI do sistema a saber: [NFE] PathNFE=\\servidor\drive-f\rasn\pedidos\NFE\ PathINI=\\servidor\drive-f\rasn\pedidos\NFE\INI\ PathPDF=\\servidor\drive-f\rasn\pedidos\NFE\PDF\ PathXML=\\servidor\drive-f\rasn\pedidos\NFE\ PathCanceladas:=\\servidor\drive-f\rasn\pedidos\NFE\CAN\ ArquivoEntrada=Ent.txt ArquivoSaida=Sai.txt ArquivoLock=ACBRLock.txt Impressora=HP LaserJet M1005 em crediario1-pc Copias=2 [NFE-jctn] PathNFE=\\servidor\drive-f\rasn\pedidos\NFE\ PathINI=\\servidor\drive-f\rasn\pedidos\NFE\INI\ PathPDF=\\servidor\drive-f\rasn\pedidos\NFE\PDF\ PathXML=\\servidor\drive-f\rasn\pedidos\NFE\ PathCanceladas:=\\servidor\drive-f\rasn\pedidos\NFE\CAN\ ArquivoEntrada=Ent.txt ArquivoSaida=Sai.txt ArquivoLock=ACBRLock.txt Impressora=HP LaserJet Professional P 1102w Copias=2 quando cNomeDaImpressora é uma impressora local, o numero de vías é respeitado, por exemplo Impressora=HP LaserJet M1005 &&& imprime as cCopias vias Impressora=HP LaserJet M1005 em crediario1-pc &&& imprime somente uma via independente do valor de cCopias Impressora=\\crediario1-pc\HP LaserJet M1005 &&& imprime somente uma via independente do valor de cCopias Conto com a ajuda de vocês Valeu desde já
×
×
  • 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.