luciano_f

Pessoal estou fazendo boletos para a Caixa com a Unit "ACBrCaixaEconomicaSICOB.pas" e gostaria de saber essa unit foi alterada ?? Pois o "nosso numero" sem o Registro para esse banco sempre eu emiti com 10 digitos fora com o DV inclusive liguei para o banco para perguntar se tinha mudado e me disseram que não em anexo um arquivo retorno desse banco com o nosso Numero. Porém na ultima vez que alterei o Acbr percebi que os boletos gerados pelo meu sistema não estão mais com o 82 como codigo de Inicio. A função Function TACBrCaixaEconomicaSICOB.CalcularTamMaximoNossoNumero( const Carteira: String; NossoNumero: String): Integer; var wTamNossoNumero: Integer; begin Result := 15; // essa linha acredito estar errada o correto seria Result := length(NossoNumero); // pois da forma atual eu não consigo gerar nosso numero valido com codigo de inicio 82 // pois da forma atual eu tenho que ter o tamanho maximo 9 e não posso fazer isso tem que maior que 9 e menor que 15 e com inicio 82 wTamNossoNumero := length(NossoNumero); if ((wTamNossoNumero >= 8) and (wTamNossoNumero <= 10)) or ((wTamNossoNumero >= 14) and (wTamNossoNumero <= 15)) then Result := wTamNossoNumero; end; RETORNOCEF1429.cmp.txt RETORNOCEF1429.cmp.txt

Me desculpe minha ignorancia mais qual function que me traria o DV se eu passe o NossoNumero na hora da captura ? Grato.

Hum entendi o motivo, então vou aguardar essa implementação você sabe me dizer se já tem alguem trabalhando nesse DV separado ?

Outros usuarios podem estar usando sem o DV, não acredito nisso visto que ninguem se manifestou a esse respeito, sendo que esse é o segundo post que aludo sobre esse problema, até porque não entendo como alguém pode usar uma captura sem o DV sendo que ele faz parte do corpo do Nosso Numero no arquivo de retorno do Banco, assim se formos checar todos os DVs existentes como CPF, Codigo de Barras Etc... sempre o DV vai estar embutido no numero trabalhar sem eles não entendo como seria possivel só aqui essa situação existe. Sobre a Questão de criar uma propriedade especifica para ele já reforça o fato que venho discutindo sobre a necessidade desse numero, só não acho necessidade de se criar uma propriedade só para isso, pois é só acrescentar ele em tudo no sistema e pronto muito mais simples facil é correto de ser feito. Me desculpem se estou sendo chato mais até agora eu não consegui entender a logica de se trabalhar sem esse numero sendo que como já disse acima os DVs sempre vão fazer parte dos numeros, se você vai pagar um boleto no banco e tem um DV e você omite ele não vai conseguir, o mesmo ocorre para um codigo de Barras etc..

Olá por favor algum Administrador pode colocar a unit que alterei no projeto pois novamente fiz uma atualização da minha versão do ACBR e tive que alterar o componente, eu não entendo o porque de deixar o DV fora sendo que ele faz parte do Nosso numero como já disse é muito mais facil controlar no programa se não quiser ele dar um copy e deixar ele de lado do que ter que ficar alterando os fontes do projeto toda vez que tiver que trocar o componente, se vocês checar todos os outros componentes de boletos existentes como RLBoleto tem o DV junto com o Nosso Numero. Grato.

Entendo mais não existe motivo de usar o Nosso numero sem o DV pois ele faz parte do nosso numero. e se tiver que usar sem o DV basta dar um copy dentro da aplicação sem ter a necessidade alterar o componente mais da forma como está eu sempre tenho que alterar o componente.

os Administradores vão alterar a Unit que postei ???

Quando vou fazer uma captura para o cliente o arquivo de retorno que vem do banco com a extenão "CMP" algo parecido com isso "RETORNOCEF1230.cmp" já vem com o Nosso numero acompanhado do digito verificador eu preciso do numero completo para apresentar para o cliente e fazer a baixa no sistema, até porque o digito verificador faz parte do nosso numero e toda vez que faço uma atualização do ACBR tenho que ficar alterando essa unit. Grato.

no Arquivo "ACBrCaixaEconomicaSICOB.Pas" na linha 881 está assim NossoNumero := Copy(Copy(Linha,47,10), Length(Copy(Linha,47,10)) - TamanhoMaximoNossoNum, TamanhoMaximoNossoNum); o correto é assim NossoNumero := Copy(Copy(Linha,47,11), Length(Copy(Linha,47,11)) - TamanhoMaximoNossoNum, TamanhoMaximoNossoNum); No RLBoleto é assim NossoNumero := Copy(Linha,47,11); Pois o Digito verificador faz parte do Nosso numero Anexei a unit alterada para os Administradores alterar o componente. ACBrCaixaEconomicaSICOB.pas

Existe alguma perspetiva para um Danfe em Fast-Report no futuro ???

Pessoal como faço para adicionar uma nova cidade para o provedor Simpliss Cidade de Astorga http://187.45.245.217/astorga_contrib/ Grato a todos

O colega disse que tem provedor que fez o suporte a mais de um serviço por NFSe nesse caso o ACBR teria suporte a isso ??

Pessoal como faço uma Nota com dois "ItemListaServico" diferente pelo que estou vendo eu precisarei fazer duas notas caso o Prestador de serviços preste mais de uma serviço com esse campo diferente existe alguma possibilidade de fazer uma mesma nota com dois tipos diferentes ???

Vixi que coisa chata isso fica tudo desorganizado, pois o cliente coloca a quantidade do serviço prestado e o valor unitario e valor total mais nessa NFSe fica tudo misturado e confuso, me desculpe dizer mais esses analista que inventaram esses layouts estavão com algum parafuso solto. Sobre esse codigo do serviço você diz é aquela lista de atividades prestadas ou existe outro codigo dos serviços onde posso achar essa tabela ???

Hum entendi e sobre esse fato ::

Pessoal em primeiro lugar parabelizo a todos os desenvolvedores desse Projeto. Eu estou começando a imprementar a Nota Fiscal de Serviços e não estou conseguindo entender a logica do Demo Na Unit "ACBrNFSeDANFSeQRRetrato.Pas" para mostrar os dados de quem emitiou a NFSe é usado os campos com base na estruturar "PrestadorServico" mais para gerar não encontrei nada que acesse essa estrutura Porém eu só vi acesso a "Prestador" e não a "PrestadorServico" qual a diferença entre os dois ??? vi que cada um tem uma acesso diferente usando TDadosPrestador e TIdentificacaoPrestador Não estou conseguindo entender o Demo que apesar de estar todo comentado para mim está meio confuso alguem teria alguma outra rotina de geração da NFSe para me ajudar ??? Estou meio que perdido pois acredito que deveria ser assim : Dados da Nota como Numero da Nota Data de Emissão, Numero do RPS Etc... Emitente da Nota Destinatario da Nota Serviços Totais Impostos Outras Informações. Outra coisa que percebi na Danfe não exite colunas certinhas para o codigo do Serviço, Descrição, Quantidade, Valor Unitario e Valor Total está tudo junto em um Memo só isso não fica extranho ?? não seria melhor ser tudo organizado por colunas como é no Danfe da NFe ? Se algum puder me ajudar ficarei muito grato.

Outra questão eu posso usar a mesma Danfe da NFE para NFSe ??? pois a Danfe da NFE tem os campos de impostos do ISSQN

Pessoal alguem já fez a Danfe da nota de serviços para o Fast-Report ??? Grato a todos.

Pessoal já encontrei o problema estava faltando esse codigo if (not CartaoTEF.TEF.Inicializado) and // Está na inicialização ? (Operacao = ineEstadoECF) and // Quer Saber o estado do ECF ? (mas se chegou aqui é pq o ECF já está com problemas) (CartaoTEF.GPAtual in [gpCliSiTef, gpVeSPague]) then Begin dentro do evento InfoECF(Operacao: TACBrTEFDInfoECF; var RetornoECF: string); begin

Pessoal a sequencia 38 diz o seguinte - Realizar uma transação com cartão de Crédito magnético - Selecionar a opção á vista - Quando receber o retorno de aprovação e começar a imprimir o cupom TEF, desligar o computador (reset) e em seguida desligar a impressora. - Ligar novamente o computador e não ligar a impressora - Ao entrar na aplicação, enviar a função “Finaliza” confirmando a transação. - Somente após tratar o TEF, ligar a impressora - Entrar na função de Transações Gerenciais (110) e selecionar a opção de Reimpressão do último comprovante. - Imprimir o cupom normalmente. a mensagem espera é “Transação TEF efetuada. Favor re-imprimir último cupom”. porém estou recebendo a mensagem “Transação não foi efetuada. Favor reter o Cupom.” O que estou fazendo de errado Grato a todos.

Eu desistalei o ACBR completo retirando e apagando todos os BPLs e DCP peguei a ultima versão hoje quanto tento instalar a ultima versão da o seguinte erro Undeclared Identifier : TpcnTpEvento Linha 84 da unit pcnEnvEventoNFe.pas "FTpEvento: TpcnTpEvento;" o interessante que a Pasta PCN2 esta declarada na library do meu delphi

Hum acabei de receber uma ligação do suporte que estava aguardando e o interessante foi que o suporte me disse que o Digito verificador faz parte do nosso numero assim como em todos os documento que tem tem digito verificador como "Codigo de Barras", CPF etc. Então eu acredito que não terá problemas com outros usuarios pois o Digito verificador da forma como foi feito no RLBoleto ao ver do suporte não é correto pois ele está inerente ao NossoNumero assim como já foi feito na função "MontarCampoNossoNumero".

Correto vou dar uma olhada se consigo criar uma propriedade para o digito do nosso numero, e com respeito aos exeptions não seria melhor colocar uma messagedlg de aviso para o usuario no lugar de erro, eu liguei para o banco e o mesmo me disse que por se tratar de um cliente antigo que emite boletos a mais de 7 anos o retorno dele é assim mesmo.

Sim isso seria bom mais acredito que apenas pegando no retorno o digito com a função Copy(Linha,47,11); já resolve. pois na hora de gerar eu já consigo pegar o digito verificador com a função MontarCampoNossoNumero agora se for analisar o RLBoleto ele realmente te um propriedade de retorno especifica só para o digito verificador. Grato.

não é necessario remover a validação mais meu cliente recebe os retornos sem esses dados e dai como proceder ??? e sobre o digito verificador que tive que aumentar de 10 para 11 o retorno ? Copy(Linha,47,11);