fschunig

OK Italo, verei o que posso fazer por aqui. Grato pela atenção Fabio Schunig

Bom dia Italo! Sim, eu sei como resolver o erro e compilar o pacote. Mas minha intenção não era essa ao apresentar o problema. O problema é que o pacote ficou incompatível com a versão nativa do QuickReport. E acredito que esse não seja um dos objetivos do projeto ACBr, até porque (acho que) a maioria dos desenvolvedores não tenha o QuickReport em versões superiores, causando grande transtorno aos usuários do projeto. Além disso, ficar alterando partes do projeto apenas na minha cópia de trabalho acaba dificultando manter os fontes do ACBr atualizados. E, como foi uma alteração que mexeu em algo que estava funcionando, acredito que possa haver uma correção para isso via diretivas de compilação, ou até o retorno do código antigo para manter a compatibilidade. Grato pela sua ajuda. Fabio Schunig

Boa noite! Caros Francis e Isaque, depois da revisão 5785, os pacotes "ACBr_BoletoFC_Quick.dpk" e "ACBrCTeDacteQRpkg.dpk" não compilam mais. No Delphi 7, o QuickReport nativo é a versão 3, então não é possível utilizar a unit "QR5RunD7". Como podemos proceder nesse caso? Abraços Fabio Schunig

Utiliza a função que a Juliana te indicou no outro post. Exemplo: ACBrBoleto1.Banco.MontarCampoNossoNumero(Titulo); Abraços Fabio Schunig

Boa tarde! Consegui simular seu problema aqui. Pelo que pude notar, você configura o boleto depois de adicionar os dados. Tente trocar pelo seguinte: procedure imprimeboletos (Sender: Object); // impresão dos boletos begin for w := 1 to NrTitulos do begin // aqui configura o banco e cedente *antes* de incluir o título ConfiguraACBR; Titulo := ACBrBoleto1.CriarTituloNaLista; with Titulo do begin Vencimento := sdsboletosVENCIMENTO.AsDateTime; DataDocumento := sdsboletosEMISSAO.AsDateTime; NumeroDocumento := sdsboletosNR_DUPLICATA.AsString; EspecieDoc := 'DM'; Aceite := atNao; DataProcessamento := now; NossoNumero := sdsboletosNR_BANCARIO.AsString; // valor do campo = 310 Carteira := '1'; end; sdsboletos.next; end; ACBrBoletoFCFR1.ACBrBoleto.Imprimir; // Imprime o boleto com nossonumero: 00000003.45 end; Não conheço seu programa, mas deduzi que a linha "ConfiguraACBR" faz a configuração. Ela deve ficar antes da inclusão dos títulos. Talvez até antes de começar o loop da variável "w", aí depende de você analisar. Favor testar e informar se deu certo. Abraços! Fabio Schunig

Boa tarde Tive esse mesmo problema, e cheguei a conclusão que era a versão do Quick Report "padrão", que vem com o Delphi 7. Como não tinha muito tempo para ver isso, acabei usando a impressão pelo Fast Reports, e ficou tudo OK. Então recomendo você utilizar pelo Fast, caso você possua o componente. Ou talvez pelo Fortes Reports, que é gratuito. Abraços! Fabio Schunig

Boa tarde Gerei um boleto em meu sistema com o "Nosso número" igual a 310. No boleto apareceu o valor "00000310.38". E no arquivo de remessa o valor "0000031038" nas posições 63-72 Me parece que já no boleto seu programa está fazendo errado. Você tentou debugar sua aplicação? Poderia postar para nós um techo do seu código para nós analisarmos? Abraços Fabio Schunig

Bom dia Eu consegui homologar o arquivo de remessa sem problemas. Inclusive fiz algumas modificações e inclui alguns campos. Qual dificuldade você está tendo? Abraços Fabio Schunig

Bom dia! OK Juliana. Já baixei a atualização no SVN e está tudo funcionando. Obrigado! Abraços, Fabio Schunig

Boa tarde! Obrigado pelas informações! Entrei em contato com eles no começo da tarde, e eles me passaram o link para os manuais: http://www.nfs-e.net/ No menu da esquerda tem a opção "manuais". E no menu de cima as opções "XML" e "Downloads". Ainda estou estudando o conteúdo, mas, como você comentou, realmente não parece ser muito complicado. Enfim, agradeço pela ajuda por enquanto. Qualquer problema retorno ao fórum Abraços! Fabio Schunig

Bom dia! Estou precisando desenvolver a NFSe para a cidade de Videira/SC. Pelo que pesquisei até agora, é preciso integrar com o software da empresa "IPM". Alguém já desenvolveu alguma coisa para eles? Estou começando a mexer agora com a NFSe. Qualquer dica é bem-vinda. Abraços Fabio Schunig

Olá Juliana e Jairo! Removi os anexos da minha última mensagem. Mesclei eles com as alterações do colega Jairo e adicionei no seguinte tópico: Att, Fabio Schunig

Boa tarde! Jairo, obrigado pelas alterações! Mesclei elas junto com as minhas e estou enviando em anexo. Juliana, as units que estou enviando tem as alterações que mencionei no outro tópico e as alterações do colega Jairo. Por favor, verifique e nos avise de qualquer problema Att, Fabio Schunig ACBrBancoBanrisul.pas ACBrBoleto.pas ACBrBancoBanrisul.pas ACBrBoleto.pas

Boa tarde Refiz algumas coisas na geração do boleto e do arquivo de remessa do Banrisul. Enviei os arquivos em anexo nesse tópico: Com esses arquivos passei na homologação do banco. Att, Fabio Schunig

Boa tarde Juliana Em anexo, estou enviando as modificações que passaram na homologação com o Banrisul. 1) Precisei adicionar o campo "CodigoMora" na unit ACBrBoleto, pois estava com texto fixo. Essas alterações identifiquei com meu nome na unit, caso seja necessário localizar. 2) Na unit ACBrBancoBanrisul: - modifiquei a montagem do campo livre, colocando a agência com 4 caracteres - revisei a indentação em algumas partes do código - arrumei o campo "Instrucao1" que estava fixo como "09" - adicionado o campo "CodigoMora" - adicionei a utilização dos campos "DataDesconto", "ValorDesconto", "ValorIOF", "ValorAbatimento" - arrumei o campo "CPF", que estava sendo usado como alfanumérico, e o correto é campo numérico com zeros à esquerda - arrumei o campo "Dias para protesto" que estava fixo como "04" - adicionei comentários que achei relevantes Por favor, analise as alterações e qualquer problema me avise _____ Removi os anexos. Explicação na minha próxima mensagem mais abaixo _____ Att, Fabio Schunig

Boa tarde Juliana Fiz uma pequena modificação na unit ACBrBancoBanrisul, que estou mandando em anexo. Apenas modifiquei para que a agência fique com 4 dígitos, e me pareceu que agora está fechando tanto o código de barras, quanto a linha digitável. Farei alguns testes aqui com meus clientes, mas só terei o resultado se funcionou na semana que vem. Abraços! Fabio Schunig ACBrBancoBanrisul.zip

Boa tarde Juliana! O manual que tenho aqui é igual a esse que você me passou. Por favor, verifique na página 40, o seguinte texto: Ao comparar a linha digitável acima com a linha que o ACBrDemoBoleto gerou: 04192.14275 85282.001230 45678.40162 6 56300000012345 Podemos ver que não está batendo. Verifiquei o seguinte: - na posição 11, deveria existir mais um dígito da agência, mas já começa o nº da conta - devido a isso, os outros blocos estão "adiantados" um dígito - no 6º bloco, deveria começar com o último dígito do "nosso número", mas começa com o texto fixo '40' Estou analisando os fontes para tenta "fechar" a linha digitável, mas ainda não tenho nada pronto. Mas gostaria de saber: estou mais ou menos no caminho certo ou estou totalmente equivocado? Obrigado! Fabio Schunig

Boa tarde Juliana! Primeiramente, não consegui encontrar o manual utilizado no SVN. Poderia me informar a localização? Além disso, antes do commit 4620, meus clientes conseguiam pagar os boletos sem problemas. Mas agora, trocado o texto fixo para '40', eles não conseguem. Isso me parece um indicativo de que algo não está 100%, concorda? No mais, baixei 2 manuais no site do Banrisul, e estou tentanto bater a linha digitável com eles, mas não estou conseguindo. Utilizei o programa "ACBrDemoBoleto" do diretório exemplos para gerar um boleto do Banrisul. As modificações que fiz no demo foram as seguintes: - ACBrBoleto1.Banco.TipoCobranca = cobBanrisul - ACBrBoleto1.Banco.Numero = 41 - ACBrBoleto1.Cedente.CodigoCedente = '852820020' - ACBrBoleto1.Cedente.Agencia = '0427' - ACBrBoleto1.Cedente.AgenciaDigito = '57' - ACBrBoleto1.Cedente.Conta = '8528200' - ACBrBoleto1.Cedente.ContaDigito = '20' - ACBrBoleto1.Cedente.Modalidade = '2' - ACBrBoleto1.Cedente.Convenio = '1' Utilizando esses dados acima, inclui um boleto no demo como segue: - nosso número = 12345678 - valor = 123,45 - emissao = 07/02/13 - vencimento = 07/03/13 - data multa juros = 08/03/13 O programa me gerou um boleto com a seguinte linha digitável: 04192.14275 85282.001230 45678.40162 6 56300000012345 Ou seja, não está fechando também com aquilo que você me passou em sua última resposta. Estou fazendo alguma coisa errada? Agradeço a atenção! Abraços Fabio Schunig

Boa tarde! Verifiquei que durante a troca do servidor, o anexo que havia enviado foi corrompido. Estou enviando novamente nessa mensagem Abraços! Fabio Schunig 214-Ap3.01.zip

Boa tarde! Estou com o mesmo problema. No commit 4620, do dia 09/01/13, foi alterada a linha 207 do arquivo "ACBrBancoBanrisul.pas", trocando o texto fixo de '041' para '40'. Com isso, nossos boletos começaram a gerar apenas 5 dígitos no sexto bloco da linha digitável. Com essa alteração, os boletos não passam mais no banco. É isso mesmo? Esta alteração está correta? Obrigado! Fabio Schunig

Não sei te ajudar nisso, e sugiro que você abra um tópico específico para sua dúvida. Talvez você consiga mais ajuda. Abraços Fabio Schunig

Obrigado Daniel. Tinha visto alguns tópicos (antigos) aqui no fórum, e achei que não suportava PPLB. Abraços! Fabio Schunig

Boa tarde! Entrei em contato com o suporte da Argox, e eles me enviaram um arquivo que "baixa" a PPLA para a impressora. Estou enviando ele em anexo. Importante: eles me comunicaram que esse procedimento pode queimar a placa da impressora se houver queda de luz ou qualquer complicação no processo. Se alguém for usar, use por sua conta e risco Eu fiz o procedimento e ficou tudo OK. Segue abaixo o passo-a-passo que me foi passado: 1- Descompacte os arquivos em uma pasta em seu micro; 2- Conecte a impressora na porta paralela de seu micro e a mantenha ligada com etiqueta e ribbon; 3- Através de comandos pelo DOS, acesse a pasta onde foi descompactado os arquivos em anexo e execute o arquivo "ppla.bat" e siga as instruções na tela; 4- Aguarde a mensagem de atualização concluída, desligue a impressora e em seguida, imprima as configurações da mesma verificando se o firmware foi atualizado. Detalhe: também mandei um "reset" na impressora após o processo, como o BAT solicitava. Lembrando que para outros modelos deve ser um firmware diferente. Obrigado! Abraços Fabio Schunig

Bom dia pessoal Estou com uma impressora Argox 214 plus, mas pelos meus testes, ela está configurada para usar apenas a linguagem PPLB. Pesquisando por aí, vi este tópico: http://www.forumweb.com.br/foruns/topic/73180-componente-acbretq/page__st__15 Que indica que posso baixar a PPLA na impressora. Ele indica esse commit do SVN: https://acbr.svn.sourceforge.net/svnroot/acbr/tools/Argox/ Fiz o procedimento para baixar a linguagem, mas ainda assim não está reconhecendo os comandos. Alguém saberia me dizer como posso fazer para "trocar" a linguagem e usar somente PPLA? Obrigado! Fabio Schunig

Boa tarde pessoal Meu cliente está emitindo as notas fiscais sem problemas. Era só problema na Capicom mesmo. Tópico resolvido. Obrigado pela atenção. Abraços! Fabio