Ir para conteúdo
  • Cadastre-se

FelipeLopes

Membros
  • Total de ítens

    70
  • Registro em

  • Última visita

Tudo que FelipeLopes postou

  1. Senhores, bom dia Saiu uma Resolução da ANM(Agência nacional de mineração) onde as empresas de mineração serão obrigadas a identificar no campo especifico o CNPJ da ANM-DF como participante nos arquivos xml. Procurei isso nos foruns e nao encontrei. Alguem pode me orientar como que se preenche no ACBRNFE? Desde já agradeço
  2. bom dia, estou tendo algumas dificuldades com a validação junto ao banco ABC brasil. Seguites erros: 1º Carteira posicao 108 a 108 - conteudo 0 - utilizo o mesmo procedimento para os outros bancos e nao tenho esse tipo de problema, alguem sabe me explicar se muda alguma coisa para o banco ABC? Os outros erros irei enviar como anexo. Alguem pode me ajudar? TESTE009.txt
  3. Muito obrigado, na hora que iria posta que consegui resolver, vi sua resposta. fiz bem parecido com o que me passou. Estou com outra situação no abc, irei finalizar esse topico e abrir outro muitoooo obrigado pela ajuda
  4. Bom dia, obrigado pelo retorno. Ainda sem conseguir usar, ListaDadosNFe.Add(TACBrDadosNFe) Essa function receber um objeto do tipo TACBrDadosNFe e retorna um integer. nao estou sabendo usar, poderia me ajudar? Atenciosamente, Felipe Lopes
  5. FelipeLopes

    Dados da nfe

    Boa tarde, estou tendo uma dificuldade para homologar o boleto com o banco ABC pois estao pedindo os dados da nfe(chavedeacesso) . O acbrboleto atende a esse requisito? Se sim, como posso proceder? Atenciosamente
  6. Resolvido, tem momentos que estamos tão atarefados que nao conseguimos enxergar um simples erro. Obrigado a todos..
  7. Bom dia, estou tendo uma dificuldade em gerar o bloco K200, estou alimentando o bloco com mais de 400 itens, porem apos gera o arquivo, so aparece 1 item. Alguem pode me dar um caminho para a correção? Irei colocar o codigo da criação e em anexo o arquivo txt. with ACBrSPEDFiscal1.Bloco_K do begin cdsgrupoproduto.Filtered := True; with RegistroK001New do begin IND_MOV := imComDados; with RegistroK100New do begin DT_INI := cbde.Date; DT_FIN := cbate.Date; with RegistroK200New do begin xsql := 'select '+ 'a.codmanual, a.cidchaves, a.descricao, a.tipoestoqueproduto, a.cidchavesproprietarioproduto, '+ 'd.sigla, c.codigoreceita, '+ 'sum(e.quantidade) as saldo '+ 'from '+ 'tblprodutos a, tblgrupoproduto b, tbltipoprodutos c, tblunidadedemedida d, tblhistoricoproduto e '+ 'where '+ 'a.cidchavesgrupodeproduto=b.cidchaves and '+ 'b.cidchavestipo=c.cidchaves and '+ 'a.cidchaves=e.cidchavesproduto and '+ 'a.cidchavesunidademedida=d.cidchaves and '+ 'e.data<=:data and '; if cdsgrupoproduto.RecordCount>0 then begin cdsgrupoproduto.First; xsql := xsql +' ( '; while not cdsgrupoproduto.Eof do begin xsql := xsql+'B.cidchaves='+cdsgrupoprodutocidchaves.AsString+' or '; cdsgrupoproduto.Next; end; xsql := copy(xsql,1,length(xsql)-3); xsql := xsql +' )'; end else xsql := copy(xsql,1,length(xsql)-4); xsql := xsql+'group by a.cidchaves having sum(e.quantidade)>0 order by a.descricao '; qryk200.Close; qryk200.SQL.Clear; qryk200.SQL.Add(xsql); qryk200.ParamByName('data').AsDate :=cbate.Date; qryk200.Open; qryk200.First; while not qryk200.Eof do begin COD_ITEM := qryk200cidchaves.AsString; QTD := qryk200saldo.AsFloat; Case qryk200tipoestoqueproduto.AsInteger Of 0 : begin IND_EST := estPropInformantePoder; COD_PART := ''; end; 1 : begin IND_EST := estPropInformanteTerceiros; COD_PART := qryk200cidchavesproprietarioproduto.AsString; end; 2 : begin IND_EST := estPropTerceirosInformante; COD_PART := qryk200cidchavesproprietarioproduto.AsString; end; End; DT_EST := cbate.Date; qryk200.Next; end; {with RegistroK220New do begin DT_MOV := ACBrSPEDFiscal1.DT_INI; COD_ITEM_ORI := '000008'; COD_ITEM_DEST := '000010'; QTD := 1; QTD_DEST := 1; end; } end; end; end; cdsgrupoproduto.Filtered := False; end; SpedFiscal.txt
  8. Bom dia, estou com uma dificuldade ao gerar o bloco K200, o mesmo bloco esta sendo gerado apenas com 1 registro, porem eu alimento o bloco com mais de 400 registros. Estou enviando a copia do codigo e o arquivo TXT gerado, alguém já passou por isso? OBS: APAGUEI UMA PARTE DO ARQUIVO CONTENDO OS DADOS DAS EMPRESAS. with ACBrSPEDFiscal1.Bloco_K do begin cdsgrupoproduto.Filtered := True; with RegistroK001New do begin IND_MOV := imComDados; with RegistroK100New do begin DT_INI := cbde.Date; DT_FIN := cbate.Date; with RegistroK200New do begin xsql := 'select '+ 'a.codmanual, a.cidchaves, a.descricao, a.tipoestoqueproduto, a.cidchavesproprietarioproduto, '+ 'd.sigla, c.codigoreceita, '+ 'sum(e.quantidade) as saldo '+ 'from '+ 'tblprodutos a, tblgrupoproduto b, tbltipoprodutos c, tblunidadedemedida d, tblhistoricoproduto e '+ 'where '+ 'a.cidchavesgrupodeproduto=b.cidchaves and '+ 'b.cidchavestipo=c.cidchaves and '+ 'a.cidchaves=e.cidchavesproduto and '+ 'a.cidchavesunidademedida=d.cidchaves and '+ 'e.data<=:data and '; if cdsgrupoproduto.RecordCount>0 then begin cdsgrupoproduto.First; xsql := xsql +' ( '; while not cdsgrupoproduto.Eof do begin xsql := xsql+'B.cidchaves='+cdsgrupoprodutocidchaves.AsString+' or '; cdsgrupoproduto.Next; end; xsql := copy(xsql,1,length(xsql)-3); xsql := xsql +' )'; end else xsql := copy(xsql,1,length(xsql)-4); xsql := xsql+'group by a.cidchaves having sum(e.quantidade)>0 order by a.descricao '; qryk200.Close; qryk200.SQL.Clear; qryk200.SQL.Add(xsql); qryk200.ParamByName('data').AsDate :=cbate.Date; qryk200.Open; qryk200.First; while not qryk200.Eof do begin COD_ITEM := qryk200cidchaves.AsString; QTD := qryk200saldo.AsFloat; Case qryk200tipoestoqueproduto.AsInteger Of 0 : begin IND_EST := estPropInformantePoder; COD_PART := ''; end; 1 : begin IND_EST := estPropInformanteTerceiros; COD_PART := qryk200cidchavesproprietarioproduto.AsString; end; 2 : begin IND_EST := estPropTerceirosInformante; COD_PART := qryk200cidchavesproprietarioproduto.AsString; end; End; DT_EST := cbate.Date; qryk200.Next; end; {with RegistroK220New do begin DT_MOV := ACBrSPEDFiscal1.DT_INI; COD_ITEM_ORI := '000008'; COD_ITEM_DEST := '000010'; QTD := 1; QTD_DEST := 1; end; } end; end; end; cdsgrupoproduto.Filtered := False; end; Atenciosamente, SpedFiscal.txt
  9. bom dia, qual a propriedade do ACBrMDFE que diz respeito ou local do arquivo temp.xml?
  10. Não realizei esse teste.
  11. Bom dia, obrigado pelo retorno. Exatamente, porém não sei qual a propriedade do componente para que eu possa alterar o local de arquivo Temp.xml Atenciosamente,
  12. estou anexao o erro que apresenta. ainda nao consegue solucionar.
  13. FelipeLopes

    Erro ao Encerrar Mdfe

    Bom dia, Ao tentar encerrar um manifesto eletronico, esta ocorrendo o seguinte erro: Não possivel criar o arquivo temp.xml. Esse arquivo esta sendo criando na mesma pasta que se encontra o sistema, ressaltando que a pasta esta com as permissões totais. Como posso solucionar essa questão? como posso alterar a o local de criação do arquivo? Ateciosamente, Felipe Lopes
  14. Meus fontes são de 16/07/2019, somente atualizar ou terei que remover e instalar novamente?
  15. Boa tarde, Não estamos conseguindo autorizar o manifesto justamento pelo motivo do qrcod. Não consegui identificar como que se preenche ou habilita a Tag qrCodMDFe. Poderiam me ajudar? Atenciosamente, Felipe Lopes
  16. Senhores, bom dia. Tenho um cenário no cliente que é o seguinte, o setor de faturamento passou a realizar a emissão dos boletos no ato da emissão da nota. Porém o arquivo remessa só é gerado posteriormente pelo financeiro da empresa, e com os números dos boletos estão saindo diferentes do que foi juntamente com a nota fiscal. Como posso corrigir essa situação?
  17. Então, os SChemas foram atualizados no final do 08/2018 Esse é o erro que ocorre:
  18. FelipeLopes

    Novo padrão de placa

    Galera, bom dia. Ja estou tendo problemas com as novas placas(padrão mercosul), como podemos resolver isso? Atenciosamente,
  19. Sim, o pagamento é boleto que tem acrescimo financeiro e nao na venda. o cliente cobra o valor da tarifa da emissao do boleto;
  20. Bom dia, fiz exatamente o que foi sugerido e retornou o seguinte erro da SEFAZ: Reijeiao: valor da fatura maior que o valor total da NFe. Segue o xml 33180601374419000257550020000012881000012884-nfe.xml
  21. Boa tarde, Implementei a versão 4.0 no sistema aqui na empresa, porém esbarramos em um problema. Antes, com a versão da 3.1, na opção de pagamento boleto bancario quando escolhida, o sistema acrescentava automaticamente na fatura a tarifa bancária ou seja, o valo da futura ficava diferente do valor total da nota. agora na versão 4.0 o SEFAZ não esta autorizando. Como proceder?
  22. Sim eu li, porém ainda não alterei essa parte, estava tentando transmitir para ver os erros. Vou acrescentar essa parte e testar. Obrigado
  23. Bom dia, esta atualizado sim.
  24. FelipeLopes

    Erro ao validar

    Bom dia senhores, comecei a realizar as alterações necessarias do sistema aqui da empresa para atender a NF4.0 como o prazo é curto, estou tendo algumas dificuldades na validação. Configurações, SSLCrypLib = cryCapicom SSLHttpLib = httpWinINet SSLLib = libCapicom SSLXmlSignLib = xsMsXmlCapicom SSType = LT_TLSv1_2 Poderiam me ajudar? Atenciosamente, Segue o erro e o xml 33180601374419000176550020000253911000253915-nfe.xml
  25. Boa tarde, a estrutura das pastas esta conforme se baixa do repositorio
×
×
  • 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...
The popup will be closed in 10 segundos...