Ir para conteúdo
  • Cadastre-se

Painel de líderes

Conteúdo popular

Showing content with the highest reputation on 12-08-2018 em todas as áreas

  1. Robson, Os títulos serão gerados no seu sistema e para o ACBrMonitor voce envia por um arquivo .ini com os títulos, passando ao ACBr o comando para incluir os títulos. E depois disso, via outro comando a remessa sera gerada de acordo com os parametros informados Para incluir os títulos algo mais ou menos assim: Essas são minhas linhas de programa Harbour ************************************************************************************* *** *** cNomeDoIni: Nome do arquivo .ini que tem os titulos *** cProcesso.: de acordo com o ACBr: "P" - Gera PDF <-- Aqui o comando que o ACBr dará de destino quando da inclusão do título na lista *** "I" - Imprime <-- Aqui o comando que o ACBr dará de destino quando da inclusão do título na lista *** "E" - Envia por email <-- Aqui o comando que o ACBr dará de destino quando da inclusão do título na lista *** "" - somente inclui <-- Aqui o comando que o ACBr dará de destino quando da inclusão do título na lista *** function IncluiTitulosNoACBr(cNomeDoIni,cProcesso) *** *** Informar os titulos ao ACBr *** pausa(24,"Gerando titulos",".") LigaPRN(cComandoEntrada) ?? 'Boleto.IncluirTitulos("'+cNomeDoIni+'"'+if(cProcesso=NIL,'',',"'+cProcesso+'"')+')' <--- aqui o comando que inclui os títulos DesligaPRN() Note que passo o comando para o ACBr para incluir os títulos gerando pdf, imprimindo, enviando por email ou somente incluindo na lista para depois comandar a geração da remessa e depois disso, já com os títulos na fila do ACBr, comando a geração da remessa ao banco *** *** Gerar a remessa dos titulos *** pausa(24,"Gerando arquivo de remessa . . .",".") LigaPRN(cComandoEntrada) ?? 'Boleto.GerarRemessa("'+cPathRemessa+'")' DesligaPRN() pausa(24,"",".") Aqui parte do procedimento de gerar a remessa. O tratamento do retorno do ACBr faço abaixo, mas isso não interessa aqui PORTANTO, Todo o tratamento dos títulos é feito no seu sistema Resumidamente Seu sistema 1- Gerar os titulos, com vencimentos como voce queira 2- Comandar o ACBr na seguinte ordem a) Limpar Lista De Boletos: comando ao acbr -> Boleto.LimparLista b) Configurar Cedente: comando ao acbr -> Boleto.ConfigurarDados - aqui uso um arquivo .ini com os dados do cedente: c) Incluir Titulos na Lista/Fila: comando ao acbr -> Boleto.IncluirTitulos - aqui uso um arquivo .ini com os títulos d) Gerar o arquivo de remssa: comando ao acbr -> Boleto.GerarRemessa("'+cPathRemessa+'")' - o parametro que passo é onde o arquivo de remessa será gerado O Post ficou um pouco longo mas espero ter ajudado de alguma forma. Valeu
    1 ponto
  2. Amigo, já passei por esse problema. se Salvar a NFCe em PDF, antes de imprimir e mandar imprimir, ele corta também? No meu caso, quando mandava o PDF, ela imprimia sem cortar. No meu caso eu liguei no Suporte da Bematech e eles instalação um driver que não estava disponível para download e resolveu o problema.
    1 ponto
  3. Amigo post seus código de como vc está incluindo títulos Primeiro você cria um arquivo com os boletos adiciona BOLETO.IncluirTitulos('ArquivoBoleto.ini'); Os boletos são registrados no acbr conforme o arquivo, se estão iguais é provavel que seu arquivo esteja igual. https://acbr.sourceforge.io/ACBrMonitor/BOLETOIncluirTitulos.html Feito isso você pode enviar o comando que gera a remessa
    1 ponto
  4. Ok Fernando, muito obrigado pela atenção.
    1 ponto
  5. Bom dia Só pra registrar, ao testar hoje, foi encontrado um BUG no projeto: Nas divisas de "ES" estava "MS" ao invés de "MG". Aproveitando o UP, estas mesmas regras também valem para o infPercurso do documento CT-e OS modelo 67. Em anexo código corrigido, junto com o "project1.exe" compilado. Att Ricardo valida_percurso_lazarus-2018.zip
    1 ponto
×
×
  • 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.