Paulo Henrique Abrantes

Eu faco assim.. : vou salvando todos os comando do acbr em um arquivinho.txt ex: nome_arquivo := ExtractFilePath(Application.ExeName) + 'Temp\servico.txt'; AssignFile(arquivo_texto, nome_arquivo); entao vou usando esse "arquivo texto para ir armazenando meus comandos" ex: Writeln(arquivo_texto, 'CNPJ=' + cnpj_emitente); Writeln(arquivo_texto, 'IE=' + inscricao_estadual); ai blz... depois que tiver acabado de passar todos os dados para o arquvo_texto eu fecho ele... CloseFile(arquivo_texto); agora meu arquivo 'Temp\servico.txt' esta alimentado... agora eu uso assim.. CopyFile(PChar(nome_arquivo), PChar(dmFuncoes.caminho_entrada_nfe + 'ENTNFE.TXT'), true); com isso o acbr gera o xml e me retorna o caminho que gerou no arquivo 'SAINFE.TXT' dessa forma eu pego o caminho gerado nesse arquivo e passo em seguida o comando de enviar a nota... espero que tenha ajudado...

Amigo .. vou aproveitar seu forum para postar minha duvida tambem... Eu envio o comando de cancelamento para o acbr pelo arquivo 'ENTNFE.TXT' onde envio da seguinte forma : Writeln(arquivo_texto, 'NFE.CANCELARNFE("' + _chave_acesso + '","' + _justificativa + '")'); CloseFile(arquivo_texto); CopyFile(PChar(nome_arquivo), PChar(caminho_entrada_nfe + 'ENTNFE.TXT'), true); Com isso meu cancelamento esta funcionando normalmente.... ai ouvi dizer que nao vou ter que alterar o cancelamento para ser por evento , que o acbr vai fazer isso automatico, so que vou ter que enviar a impressao disso, andei lendo nos foruns e encontrei o seguinte esquema: NFE.IMPRIMIREVENTO (cPathXMLEvento, cPathXMLNFe); beleza... entao o esqueleto da minha programcao ficou assim.... 1º- Enivo meu cancelamento para o arquivo 'ENTNFE.TXT'; 2º- Fico aguardando dentro de um While ate que o arquivo seja cancelado e o 'SAINFE.TXT' receba o 'OK' (ate esse ponto eu ja fazia) 3º- agora tento fazer a impressao : Writeln(arquivo_texto2, 'NFE.IMPRIMIREVENTO("' + 'C:\ACBrNFeMonitor\Eventos\' + _chave_acesso + '-nfe.xml' + '")'); CloseFile(arquivo_texto2); CopyFile(PChar(nome_arquivo), PChar(caminho_entrada_nfe + 'ENTNFE.TXT'), true); a resposta que tenho do acbr é essa : NFE.IMPRIMIREVENTO("C:\ACBrNFeMonitor\Logs\35130202922932000117550000000030171000030178-nfe.xml") ERRO: Comando inválido (NFE.IMPRIMIREVENTO("C:\ACBrNFeMonitor\Logs\35130202922932000117550000000030171000030178-nfe.xml")) estou usando a versao 0.7.2.1 do acbr , aguem sabe como fazer isso .. agradeço....