Ir para conteúdo
  • Cadastre-se

Filippe

Membros
  • Total de ítens

    67
  • Registro em

  • Última visita

Tudo que Filippe postou

  1. Consegui entender aqui .. se alguem tiver com duvida .. fiz assim: ACBrDadosNFe := CriarNFeNaLista; ACBrDadosNFe.NumNFe := dSetNFCabecalhoNUMNF.AsString; ACBrDadosNFe.ValorNFe := dSetNFCabecalhoVLRTOTNF.AsFloat; ACBrDadosNFe.EmissaoNFe := dSetNFCabecalhoDATAEMI.AsDateTime; ACBrDadosNFe.ChaveNFe := dSetNFCabecalhoNFE_CHAVE.AsString;
  2. Olá... Estou precisando usar essa função .. não estou sabendo utiliza-la. .. Alguém consegue colocar um exemplo por favor ? grato,
  3. Filippe

    MDe Silencioso é possível ?

    Bom dia. Consigo fazer o manifesto silencioso ? Queria deixar fazendo o download automático, porem dentro do ACBR tem alguns Except que manda a mensagem, ai meu sistema fica parado esperando o OK. grato,
  4. Boa Kiko ... Resolvido era apenas este item .. no demo ele apresenta qual o item ? ou voce achou no olho ? Muito Obrigado.
  5. Trabalho junto com o Artur Guerra que postou .. Segue o XML se puderem ajudar ... grato 35190803037909000102550010000638411207074928-nfe.xml
  6. Filippe

    Problema Arredondamento

    Boa tarde, Estou com um problema no arredondamento. o acbr esta arredondando 1,275 pra 1,27 e não como 1,28 que seria o correto. Para exemplificar fiz uma NF. No debug conferi, passei tudo o valor de 1,275 Ai quando gero a NF o XML fica como 1,27. sei que trabalha com uma casa decimal. porem para arredondar teria que ficar 1,28 XML autenticado e validado. Ai nesta NF tenho 2 itens que tem 1,275 de imposto ai o total não bate com digitado no sistema. fica 0,01 de diferença por conta deste arredondamento.
  7. no arquivo C:\ACBR\Pacotes\Delphi\ACBrIntegrador\ACBr_Integrador.dpk ?? Vou apagar o arquivo e mandar atualizar .... Sucesso .. Obrigado...
  8. Fiz conforme recomendado ... E apresentou mesmo erro ...
  9. Atualizei meu acbr agora e esta apresentando este erro.. Compiling package C:\ACBR\Pacotes\Delphi\ACBrIntegrador\ACBr_Integrador.dpk "C:\Program Files (x86)\Embarcadero\Studio\19.0\bin\dcc32.exe" "C:\ACBR\Pacotes\Delphi\ACBrIntegrador\ACBr_Integrador.dpk" Embarcadero Delphi for Win32 compiler version 32.0 Copyright (c) 1983,2017 Embarcadero Technologies, Inc. ACBr_Integrador.dpk(30) Error: E2038 Illegal character in input file: '|' (#$7C) Compilation failure Erro ao compilar o pacote "ACBr_Integrador.dpk". Abortando... Ocorreram erros na compilação dos pacotes. é erro na atualização do acbr ? Estou anexando o log completo .. log_Delphi_10.2_Tokyo.txt
  10. Quando coloco o modelo 19 da esse problemas... Fiz 2 alterações no PAS function TACBrBancoBrasil.MontarCampoCarteira(const ACBrTitulo: TACBrTitulo ? String; begin //Alterado Filippe 14/01/2019 //Alterado para sempre Sair apenas a Carteira // Result := IfThen(ACBrTitulo.ACBrBoleto.Cedente.Modalidade = '', // ACBrTitulo.Carteira, // ACBrTitulo.Carteira + '/' + ACBrTitulo.ACBrBoleto.Cedente.Modalidade ); Result := ACBrTitulo.Carteira; end; { Pegando o tipo de EspecieDoc } //Alteração Filippe Maymone - 14/01/2019 // Guardo a especie do DOC para depois da geração do arquivo // retornar para Especie AEspecieDoc := EspecieDoc; if EspecieDoc = 'DM' then EspecieDoc := '02' else if EspecieDoc = 'RC' then EspecieDoc := '17' else if EspecieDoc = 'NP' then EspecieDoc := '12' else if EspecieDoc = 'NS' then EspecieDoc := '16' else if EspecieDoc = 'ND' then EspecieDoc := '19' else if EspecieDoc = 'DS' then EspecieDoc := '04' else EspecieDoc := EspecieDoc; Depois no final da rotina eu volto a especie { Pegando o tipo de EspecieDoc } //Retornando a especie EspecieDoc := AEspecieDoc; Segue o arquivo ACBRBancoBrasil.pas ACBrBancoBrasil.pas
  11. é eu peguei a pasta de um colega de trabalho aqui que atualizou as 13:00 e instalou certinho aqui ... depois atualizo .. Obrigado
  12. Desculpa ... o print saiu fora do lugar...
  13. Juliana.. Estou usando modalide Modalidade := '019'; Estou passando assim: Carteira := 17 ; Modalidade := '019'; EspecieDoc := 'DM';
  14. Agora fui atualizar o ACBR para instalar no Delphi 2010; deu o erro abaixo.. acho que algum erro na versão ? versão da Revisão... erro
  15. Galera bom dia. Estou gerando o boleto do BB. O arquivo CNAB ja esta OK o banco validou. porem estou com alguns problemas na impressão... O campo Carteira . tem que sair 17 e esta saindo errado.. O campo especie esta saindo 02 e teria que sair DM que é o que estou informando .. Agora o por que esta saindo desta forma ? Toquei de fast para fortes .. ai no fortes a carteira fica 17/019 mas mesmo assim esta errado...
  16. Boa tarde, Atualizei o ACBR hoje e esta dando o seguinte erro para instalar. Error: E2003 Undeclared identifier: 'ImprimeValor' Delphi Tokyo Atualizei o Fortes antes de instalar... log_Delphi_10.2_Tokyo.txt
  17. Atualizei o acbr resolveu ....
  18. Filippe

    BB 240 Sequencial

    Bom dia. Estou testando o envio de remessa pra o BB CNAB 240. Ao manda apresentou erro no sequencial... Realmente ele pula alguns sequenciais ... sabem o por que ?? Segue rejeição do banco.. > Estrutura do Arquivo Linha 0006, Lote 0001, Segmento P: Erro no sequencial do segmento. informado '00005'. Correto '00004' Linha 0007, Lote 0001, Segmento Q: Erro no sequencial do segmento. informado '00006'. Correto '00005' Linha 0008, Lote 0001, Segmento R: Erro no sequencial do segmento. informado '00007'. Correto '00006' Linha 0009, Lote 0001, Segmento P: Erro no sequencial do segmento. informado '00009'. Correto '00007' Linha 0010, Lote 0001, Segmento Q: Erro no sequencial do segmento. informado '00010'. Correto '00008' Linha 0011, Lote 0001, Segmento R: Erro no sequencial do segmento. informado '00011'. Correto '00009' Linha 0012, Lote 0001, Segmento P: Erro no sequencial do segmento. informado '00013'. Correto '00010' Linha 0013, Lote 0001, Segmento Q: Erro no sequencial do segmento. informado '00014'. Correto '00011' Linha 0014, Lote 0001, Segmento R: Erro no sequencial do segmento. informado '00015'. Correto '00012' Linha 0015, Lote 0001, Segmento P: Erro no sequencial do segmento. informado '00017'. Correto '00013' Linha 0016, Lote 0001, Segmento Q: Erro no sequencial do segmento. informado '00018'. Correto '00014' Linha 0017, Lote 0001, Segmento R: Erro no sequencial do segmento. informado '00019'. Correto '00015' Linha 0018, Lote 0001, Segmento P: Erro no sequencial do segmento. informado '00021'. Correto '00016' Linha 0019, Lote 0001, Segmento Q: Erro no sequencial do segmento. informado '00022'. Correto '00017' Linha 0020, Lote 0001, Segmento R: Erro no sequencial do segmento. informado '00023'. Correto '00018'
  19. NOssa .. ja tinha olhado 1 milhão de vezes e não tinha visto.. O cadastro do produto estava sem o CSOSN... agora coloquei um IF, se não tiver preencher com 102 Obrigado
  20. Galera. Estou gerando um sat e deu erro não identificado. ja tentei de tudo e nada foi. segue o log se alguem puder ajudar .... ACBrSAT.log
  21. Consegui fazer mais tive que fazer uma alteração no ACBrNFSeNotasFiscais.pas Tirei um if da linha 600 vou colocar o pas em anexo . .se alguem puder da uma olhada se tem alguma solução sem precisar modificar o ACBR ... OU se acertei na modificação, se puderem subir abraços, ACBrNFSeNotasFiscais.pas
  22. Estou tentando mandar um NFse sem tomador para São Paulo. Esta apresentando o erro abaixo: Coloquei da seguinte forma: Se Não tiver CNPJ ou CPF eu não incluo nenhuma informação do tomador é isso ?? {TOMADOR} if frdm.TiraCharIlegalNumerico(dsetnfservicoCNPJCLIENTE.AsString) <> '' then begin Tomador.IdentificacaoTomador.CpfCnpj := frdm.TiraCharIlegalNumerico(dsetnfservicoCNPJCLIENTE.AsString); Tomador.RazaoSocial := dsetnfservicoNOMECLIENTE.asstring; Tomador.Endereco.Endereco := dSetClienteENDERECO.AsString; Tomador.Endereco.Numero := dSetClienteNUMERO.AsString; Tomador.Endereco.Complemento := dSetClienteCOMPLEMENTO.AsString; Tomador.Endereco.Bairro := dSetClienteBAIRRO.AsString; Tomador.Endereco.CodigoMunicipio := intToStr(dSetClienteID_CIDADE.AsInteger); Tomador.Endereco.UF := dsetClienteEstado.AsString; Tomador.Endereco.CodigoPais := 1058; // Brasil Tomador.Endereco.CEP := dsetclienteCEP.AsString; Tomador.Endereco.xPais := 'BRASIL'; if frdm.TiraCharIlegalNumerico(dsetclienteIECLI.asstring) <> '' then Tomador.IdentificacaoTomador.InscricaoEstadual := frdm.TiraCharIlegalNumerico(dsetclienteIECLI.asstring); Tomador.Contato.Telefone := dsetclienteFONE1CLI.AsString; Tomador.Contato.Email := dsetclienteMAILCLI.AsString; end; se eu colocar o CNPJ ele emiti a NFs certinho sem problemas....
  23. Tem que ser pelo sistema....
  24. Galera bom dia. No meu sistema eu salvo o XML direto no banco, apos ele ser validado. Porem agora ocorreu um problema que foi o cliente fez o envio chegou na receita, porem no meio do caminho caiu a internet e o sistema não conseguiu pegar o retorno. Portanto a NF-e foi para a sefaz mais não peguei o retorno que esta OK entao não tenho o xml na base. Eu consigo fazer a consulta pela chave ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.WebServices.Consulta.NFeChave := vChave; ACBrNFe1.WebServices.Consulta.Executar; Eu consigo pegar que esta na sefaz qual o protocolo, hora .. tudo certinho .. mais não o XML. Alguem sabe alguma rotina pra me ajudar ????? Obrigado
×
×
  • 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.

The popup will be closed in 10 segundos...