Jhonlenon Ribeiro

Boa tarde amigo! Antonio Gomes como você está alimento o componente ACBrBoleto pra sair esse zero antes das letras? no meu caso o 6 já é o digito da conta...

Bom dia, foi homologado outros clientes do sicoob sem problema, mais em um cliente está recusando a remessa e boleto impressão, o gerente fala que a linha digitável do boleto impresso está diferente da linha digitável do arquivo de remessa, vou anexo o arquivos que tenho, aguardo retorno erro sisbr remessa.pdf boleto_teste.pdf CB507022019.REM

Comparei os links ai tava igual....agora está funcionando normalmente...pode encerrar o topico..Obrigado pela atenção

Boa tarde, estou com problema na leitura do QR Code Versão 2.00 da NFC-e, Autoriza a NFC-e normal, verifico na sefaz o NFC-e está lá normal, mais na hora de ler o QR Code direciona para o link da sefaz do meu estado e dá imagem invalida, antes de alterar o versão do QR code tava normal, já viz com a sefaz aqui do meu estado e eles disseram que está normal que era pra mim ver no meu sistema...alguém já passou por esses problema os fontes do componentes ACBr está atualizado eu uso o DANFe do Fast Report

Obrigado pela ajuda..agora entendi fiz um teste é isso mesmo, quando coloco a COD_SIT = 08 passa no PVA sem exigir o C176, agora quando o COD_SIT = 00 ai sim se informar o C170, tem que informar o C176.....assunto encerrado

Eu já tinha visto essa regra...mais o que eu não entendi foi como esse arquivo que vou te mandar em anexar foi gerado só com C100, C190 e C170, o PAVA não exigiu o C176....já sei que o problema não está no componente ACBrSPED, isso ficou bem claro depois dos testes...só valida esse arquivo no PVA e ver como está o C170 sem o PVA exigir o C176....mais desde já agradeço pela atenção... EFD07112018213453_2.TXT

Estranho que fiz 2 teste aqui só gera o C176 quando tem NF-e para dentro do estado....fiz o teste colocando breakpoint function TBloco_C.RegistroC176New: TRegistroC176; e não chama essa função ...mais o estranho é que quando vou rodar rodar no PVA ICMS/IPI mostra lá o em dito C176 sem registros, fiz um teste com NF-e para fora do estado ai não gerou.....vou postar meu txt pra você dá uma olha....se puder validar no PVA SPED_ICMS_IPI_112018.txt

Já olhei ai aqui e não encontrei nada..até apaguei o que tinha comentado e mesmo assim ta gerando...vc chegou a validar no PVA?

Boa tarde, preciso gerar os itens da saida da NF-e no SPED que fica no registro C170, mais quando gero o C170 mesmo não gerando o C176 ele gera com as informações fazia....sendo que o C176 é pra Ressacimento de ST, ai dá erro do PVA e o erro é porque está gerando o C176, um contador me enviou um arquivo do SPED e nesse tava o C170 sem o C176 normal e valiando no PDV sem erro ai fiquei sem entender, fiz um teste gerando apenas o C100 e C190 não deu erro....mais os contadores disse que precisa dos itens no SPED na saida, tem alguma forma de gerar o C170, sem gerar o C176?

Boa noite, vi em outro tópico onde falava que o componente ACBr já estava com os campos onde informa a empresa desenvolvedora do software no MDF-e....ainda não é obrigatório, mais estou procurando esses campos e não encontro no componente ACBr, alguém já implementou pra mostrar como se chama esses campos no ACBr?

Bom dia! teria como sair a descrição PAGAMENTO À VISTA igual era antes na NF-e, agora na NF-e 4.00 sai só a descrição DADOS DA FATURA quando a venda é à prazo até ai ta tranquilo, mais eu tava precisando que mostra a informação PAGAMENTO À VISTA igual era antes, fontes ACBr atualizado, mesmo assim não, não queria colocar em informações complementar fica mais dificil pro cliente ver...ali destacava melhor.

Bom dia! como faço pra abrir uma gaveta conectada a impressora não fiscal usando ACBrPosPrinter...não encontrei o no exemplo da ACBrPosPrinter

Bom dia Marcelo...aqui como não funcionou troquei a unts ACBrNCMs e reinstalei a ACBr sem atualizar usando usa untis mesmo assima a validação não funcionou....testei o demo também e não funcionou comigo..será porque?

Estou testando e não consegui

Boa noite, até a semana passada estava tudo OK..eu consegui fazer o dawnloads os NCMs usando o componente ACBrNCMs....mais essa semana eu não estou conseguindo nem fazer o dawnloads e nem consultar....o que houve mesmo?

Boa tarde, estou gerando um boleto usando ACBrBoleto mais não está lendo o código de barras....se eu digitar a linha digital dá certo....uso o fast report e estou gerando os boletos pelo Banco Bradesco....o que pode ser isso, meus fontes está atualizado......

Pode encerrar o top....era só isso mesmo....troquei CSC e deu certo....eu não tinha mudado...estava usando o homologação em ambiente de produção Valeu @BigWings

@BigWings estou fazendo isso agora..pode ser só vacilo meu mesmo.....já te falo

Boa tarde, eu estou testando a emissão de NF-e e NFC-e na 4.00...eu já estava realizando os testes em ambiente de homologação...mais agora que já liberou o ambiente de produção fui testar novamente mais agora em ambiente de produção, na NF-e foi de boa...mais na NFC-e tá dando um erro....não sei como resolver isso....em homologação passa de boa..mais em produção dá esse erro no print abaixo

Não entendi muito essa função......

Isso Italo...o que preciso é a manifesto do destinatário mesmo....já aproveitando...estou querendo pegar o numero da NF-e pela consulta de NFe....mais não sem onde fica...já consigo a chave de acesso, valor e data emissão...mais falta o numero da NF-e...meu codigo j := DM.ACBrNFE1.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Count -1; for i := 0 to j do begin //NR_NFE := DM.ACBrNFE1.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe. VALOR_NFE := DM.ACBrNFE1.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.vNF; CHAVE := DM.ACBrNFE1.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.chNFe; DATA := DM.ACBrNFE1.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.dhEmi; case DM.ACBrNFE1.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.cSitNFe of snAutorizado : STATUS := 'AUTORIZADA'; snDenegado : STATUS := 'DENEGADA'; snCancelado : STATUS := 'CANCELADA'; end; if CHAVE <> '' then GravaNotaBanco(CHAVE, STATUS, VALOR_NFE, DATA); end;

Já resolvi o problema com esse codigo..... procedure TF_manifesta_nfe.EnviaEventoDownload(ChNFE: string); var Ret : String; begin DM.TB_empresa.Open; DM.ACBrNFe1.DistribuicaoDFePorChaveNFe(UFtoCUF(DM.sUF), DM.TB_empresaCNPJ.AsString, ChNFE); sXML :=ACBrNFe1.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[0].XML; if DM.ACBrNFe1.WebServices.DistribuicaoDFe.retDistDFeInt.cStat <> 138 then begin //Ret := DM.ACBrNFe1.WebServices.DistribuicaoDFe.retDistDFeInt.xMotivo; //ShowMessage(Ret); end else begin end; end;

Boa tarde, estou com dúvidas sobre meu código....estou fazendo a manifestação da NF-e pra poder baixar o XML e dá entrada....depois de muitas falha no processo de baixar o xml sem certificado digital, acabei abandonando esse processo, minha duvidas é o seguinte na minha procedure de baixar o xml....tenho que manifestar a NF-e e depois tenho que aguardar uns 15 segundos pra poder baixar o xml...tentei fazer isso no mesmo processo mais dá documento não encontrando.......eu manifesto pelo chave de acesso...meu Código abaixo.. procedure TF_manifesta_nfe.ButBaixarXMLClick(Sender: TObject); var ChNota: String; var IDLote : String; var CaminhoXML : String; var MES_ANO : String; begin MES_ANO :=''; ChNota :=''; MES_ANO :=FormatDateTime('yyyymm',Date); if EditChave.Text = '' then begin if Application.MessageBox('Atenção...não existe chave de acesso para realizar o manifesto', 'Sistema de Vendas - SYSPDV', MB_OK) = IDOK then EditChave.SetFocus; Abort; end; if ContarCaracteres(EditChave.Text) <> 44 then begin if Application.MessageBox ('Atenção...NF-e não tem 44 digitos...verifique a chave de acesso','SYSPDV', MB_OK) = IDOK then Abort; end; if Application.MessageBox('Para realizar o Download do XML da NF-e, será necessário fazer' + ' a manifestação da nota. A SEFAZ entenderá que você recebeu a mercadoria!' + ' Essa é uma operação que não poderá ser desfeita, deseja continuar?', 'Atenção!',mb_iconquestion+mb_yesno)=idyes then if not (DirectoryExists(ExtractFilePath(ParamStr(0)) +'XML\XML_NFE_DESTINADA\'+MES_ANO)) then begin forceDirectories(ExtractFilePath(ParamStr(0)) +'XML\XML_NFE_DESTINADA\'+MES_ANO); end; begin ChNota := Trim(EditChave.Text); DM.ACBrNFe1.Configuracoes.Arquivos.DownloadNFe.PathDownload := ExtractFilePath(ParamStr(0)) +'XML\XML_NFE_DESTINADA\'+MES_ANO; ManifestaNota(ChNota); EnviaEventoDownload(ChNota); ProgressBar1.Visible:=False; end; //--------Aqui é código da procedure ManifestaNota(ChNota); procedure TF_manifesta_nfe.ManifestaNota(ChNFE: string); var lMsg : String; var sCNPJ : String; begin sCNPJ :=''; DM.TB_empresa.Open; sCNPJ :=DM.TB_empresaCNPJ.AsString; DM.ACBrNFe1.EventoNFe.Evento.Clear; with DM.ACBrNFe1.EventoNFe.Evento.Add do begin InfEvento.cOrgao := 91; InfEvento.chNFe := Trim(EditChave.Text); InfEvento.CNPJ := sCNPJ; InfEvento.dhEvento := Now; InfEvento.tpEvento := teManifDestConfirmacao; InfEvento.versaoEvento :='1.00'; end; DM.ACBrNFe1.EnviarEvento(1); if DM.ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.xMotivo <> '573' then begin //ShowMessage('Duplicidade de Evento!'); //Abort; end else if DM.ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.xMotivo <> '135' then begin with DM.ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento do begin lMsg:= 'Id: '+Id+#13+ 'tpAmb: '+TpAmbToStr(tpAmb)+#13+ 'verAplic: '+verAplic+#13+ 'cOrgao: '+IntToStr(cOrgao)+#13+ 'cStat: '+IntToStr(cStat)+#13+ 'xMotivo: '+xMotivo+#13+ 'chNFe: '+chNFe+#13+ 'tpEvento: '+TpEventoToStr(tpEvento)+#13+ 'xEvento: '+xEvento+#13+ 'nSeqEvento: '+IntToStr(nSeqEvento)+#13+ 'CNPJDest: '+CNPJDest+#13+ 'emailDest: '+emailDest+#13+ 'dhRegEvento: '+DateTimeToStr(dhRegEvento)+#13+ 'nProt: '+nProt; end; ShowMessage(lMsg); end end; //-------Aqui Download XML apois manifestar----------- procedure TF_manifesta_nfe.EnviaEventoDownload(ChNFE: string); var Ret : String; begin DM.TB_empresa.Open; DM.ACBrNFe1.DistribuicaoDFePorChaveNFe(UFtoCUF(DM.sUF), DM.TB_empresaCNPJ.AsString, ChNFE); if DM.ACBrNFe1.WebServices.DistribuicaoDFe.retDistDFeInt.cStat <> 138 then begin Ret := DM.ACBrNFe1.WebServices.DistribuicaoDFe.retDistDFeInt.xMotivo; ShowMessage(Ret); end else begin end; end;

Julionar eu uso o fast report no DAMDF

Não entendi o questionamento do colega ai em cima...de DAMDF retrato e paisagem.....em conversa com uns dos fiscais o mesmo disse que o valor da mercadoria pode ir sim no DAMDF....ai questionei a ele sobre os outros fiscais de outro estado...ai ele me disse que isso dependi do estado...se já vai no xml não problema em ir no DAMDF...tava vendo o DAMDF de um empresa que usa o report build e informação valor da carga vai do DAMDF...se não tiver com alterar ai vou ter que colocar nas informações complementar...só não vou deixar o cliente ser multado como ele já foi uma vez...