Ir para conteúdo
  • Cadastre-se

Waldir Paim

Moderadores
  • Total de ítens

    620
  • Registro em

  • Última visita

  • Days Won

    4

Tudo que Waldir Paim postou

  1. Use o modelo modToledoMGV5 Mesmo fazendo referencia ao MGV5 ele funciona certinho com MGV6.
  2. Qual a mensagem de erro?
  3. Atualize seu Fortes Reportes por favor.
  4. Seus fontes do ACBr estão desatualizados.
  5. Exatamente a mesma, apenas um recurso que existe pra que não consegue baixar via svn.
  6. Sem atualizar o fortes você não tem essa UnlimitedHeight propriedade nele. Essa sua afirmação não faz muito sentido.
  7. Pode fazer o download do Zip https://github.com/fortesinformatica/fortesreport-ce/archive/master.zip
  8. Sua rotina de compactação que está com problema. Da uma conferida no código que usa usa o winrar.
  9. Você consegue corrigir e enviar a unit?
  10. declara essa unit no uses; pcnConversaoNFe;
  11. Não devemos mudar de assunto, o pessoal aqui é bem rigoroso quanto a isso. Faça uma busca no fórum e se não encontrar abra um outro tópico com sua duvida.
  12. Sim. Fiquei curioso! Você já gerar nota antes da atualização?
  13. Não, veja a resposta aqui: http://portalfiscal.inf.br/nfe}pag Ele tá querendo que você informe o pagamento dessa nota.
  14. Só informar o Endereço do Destinatário no campo enderDest que ele deve gera seu XML. Eu sempre faço a validação dos dados antes de gerar o XML, faça isso que acredito que vá facilitar sua vida.
  15. Faz um favor pra mim, da uma olhada em ACBrNFe1.NotasFiscais.Alertas para ver se tem alguma coisa nele Se tiver posta o resultado aqui. Outra coisa simplifica seu código assim: Se você já tem o caminho do xml em result então usa ele direto.
  16. Se puder cola aqui o código desse cara aqui : Gerar_XML
  17. Certo, mas você passou o CFOP tambem 999, confere lá que vai dar certo.
  18. Aqui: ACBrNFe1.NotasFiscais.LoadFromFile(sXML); Faz assim: ACBrNFe1.NotasFiscais.LoadFromFile(sXML, True); Dessa forma resolve. Depois que escrevi eu vi essa condição aqui: IF FileExists(sXML) THEN BEGIN Ele só entra ali se já existir um xml. Da uma olhada o que vem em : sXML pra ver se o caminho não está diferente do que você está esperando. precisa ver se esse cara aqui: Gerar_XML está gerando o xml, com certeza o problema está nele.
  19. Dá uma conferida aqui : http://www.sped.fazenda.gov.br/spedtabelas/AppConsulta/publico/aspx/ConsultaTabelasExternas.aspx?CodSistema=SpedFiscal Não existe esse CFOP 999 por esse motivo o erro apresentado. Escolha primeiro : Tabelas Globais em seguida: Tabela Código Fiscal de Operação (CFOP)
  20. Como você está gerando o XML? foi feito uma alteração nesse moetodo: TNotasFiscais.LoadFromFile(const CaminhoArquivo: String; AGerarNFe: Boolean) ; Antes o parametro AGerarNFe por padrão era True agora por padrão ele vem como False; Da uma conferida ai por favor onde você chama para Gravar seu XML.
  21. @ALA O pessoal é bem rigoroso nessa questão de misturar dois assuntos ou mais no mesmo tópico. Mas uma olhadinha no exemplo do TEF ali tem tudo:
  22. Bom dia @ALA O ACBr utiliza para gravar os arquivos de logs. Ali na sua imagem mostra que na finalização do TEF ele está passando esse parâmetro vazio e gerando esse erro.
  23. @ALA Eu percebi na sua na imagem que o conteúdo do ArqTXT está vazio e com isso ele tenta criar uma pasta vazia. Aplica essa correção no metodo: procedure WriteToTXT(const ArqTXT: String; ABinaryString: AnsiString; const AppendIfExists: Boolean; const AddLineBreak: Boolean; const ForceDirectory: Boolean); var FS : TFileStream ; LineBreak : AnsiString ; VDirectory : String; begin if Trim(ArqTXT) = '' then Exit; if ForceDirectory then begin VDirectory := ExtractFileDir(ArqTXT); if not DirectoryExists(VDirectory) then ForceDirectories(VDirectory); end; FS := TFileStream.Create( ArqTXT, IfThen( AppendIfExists and FileExists(ArqTXT), Integer(fmOpenReadWrite), Integer(fmCreate)) or fmShareDenyWrite ); try FS.Seek(0, {$IFDEF COMPILER23_UP}soEnd{$ELSE}soFromEnd{$ENDIF}); // vai para EOF FS.Write(Pointer(ABinaryString)^,Length(ABinaryString)); if AddLineBreak then begin LineBreak := sLineBreak; FS.Write(Pointer(LineBreak)^,Length(LineBreak)); end ; finally FS.Free ; end; end; Com isso se ArqTXT estiver vazio ele vai ignorar e não gera o problema de criar uma pasta vazia.
  24. @EduXml Se você realmente precisar do binding para pascal nós podemos fazer pra ti. E garantimos o funcionamento 100% da lib conforme especificação do fabricante. Veja se a PagSeguro patrocina já que eles não tem especialista no pascal.
  25. Encontrei esse outro link que pode te ajudar : http://www.pibernat.com.br/index.php/noticias/845-aduaneiras-retorno-de-produtos-exportados.html
×
×
  • 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.