
FelipeLopes
Membros-
Total de ítens
70 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Tudo que FelipeLopes postou
-
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
-
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
-
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
-
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
-
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
-
Resolvido, tem momentos que estamos tão atarefados que nao conseguimos enxergar um simples erro. Obrigado a todos..
-
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
-
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
-
bom dia, qual a propriedade do ACBrMDFE que diz respeito ou local do arquivo temp.xml?
-
Não realizei esse teste.
-
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,
-
estou anexao o erro que apresenta. ainda nao consegue solucionar.
-
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
-
Meus fontes são de 16/07/2019, somente atualizar ou terei que remover e instalar novamente?
-
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
-
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?
-
Então, os SChemas foram atualizados no final do 08/2018 Esse é o erro que ocorre:
-
Galera, bom dia. Ja estou tendo problemas com as novas placas(padrão mercosul), como podemos resolver isso? Atenciosamente,
-
Dados Pagamento (Fatura, Cobrança, Pagamento)
FelipeLopes replied to edvilson.chaves's tópico in ACBrNFe
Sim, o pagamento é boleto que tem acrescimo financeiro e nao na venda. o cliente cobra o valor da tarifa da emissao do boleto; -
Dados Pagamento (Fatura, Cobrança, Pagamento)
FelipeLopes replied to edvilson.chaves's tópico in ACBrNFe
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 -
Dados Pagamento (Fatura, Cobrança, Pagamento)
FelipeLopes replied to edvilson.chaves's tópico in ACBrNFe
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? -
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
-
Bom dia, esta atualizado sim.
-
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
-
Boa tarde, a estrutura das pastas esta conforme se baixa do repositorio