-
Total de ítens
257 -
Registro em
-
Última visita
-
Days Won
1
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Tudo que FabioMachado postou
-
Dest.indiedest (Rejeição 232 Ie Do Destinatário Não Informada)
FabioMachado replied to FabioMachado's tópico in ACBrNFe
É exatamente isso, o cliente tem cnpj e não tem IE (ou seja é isento), e eu deixei em branco ( Dest.IE:= ''; ) e o campo Dest.indIEDest defini como inIsento, mas da rejeição e eu não to entendendo o pq, uma vez que, a rejeição é exatamente por deixar em branco o IE. <xMotivo>Rejeicao: IE do destinatario nao informada</xMotivo> E se eu definir com ISENTO não valida. -
Dest.indiedest (Rejeição 232 Ie Do Destinatário Não Informada)
FabioMachado replied to FabioMachado's tópico in ACBrNFe
o problema não é a consulta, há clientes que tem cnpj sem a necessidade de ter IE, ou seja isentos como é o caso da Policia Militar e outros. A questão é a rejeição vejam que no xml a opção está 2 isento mais ta rejeitando e eu não sei o pq. -
Dest.indiedest (Rejeição 232 Ie Do Destinatário Não Informada)
FabioMachado replied to FabioMachado's tópico in ACBrNFe
O erro ocorre em ambiente de produção, o ambiente de homologação da demonstração é apenas para os meus testes e a rejeição é a mesma nos dois ambientes. -
Dest.indiedest (Rejeição 232 Ie Do Destinatário Não Informada)
um tópico no fórum postou FabioMachado ACBrNFe
Boa Noite galera, essa semana começou a dar esse erro quando o destinatário é contribuinte e isento de IE. Utilizei o seguinte código; if ((Trim(sqlClienteCLI_CNPJ.AsString)<>'') AND (sqlClienteCLI_IE.AsString<>'')) then begin Dest.indIEDest := inContribuinte; Dest.IE := sqlClienteCLI_IE.AsString; end; if (sqlClienteCLI_IE.AsString='ISENTO') OR (sqlClienteCLI_IE.AsString='') then begin Dest.indIEDest := inIsento; Dest.IE := ''; end; if (Trim(sqlClienteCLI_CPF.AsString)<>'') and (Trim(sqlClienteCLI_CNPJ.AsString)='') then begin Dest.indIEDest := inNaoContribuinte; Dest.IE := ''; end; E gera o XML em anexo. O que ta errado? 14150407198515000197550010000005001000005002-nfe.xml 14150407198515000197550010000005001000005002-nfe.xml -
Não Gera O Xml
FabioMachado replied to FabioMachado's tópico in NFC-e - Nota Fiscal do Consumidor Eletrônica
fiz diversos testes aqui, inclusive atualizei o acbr e está acontecendo exatamente isso, quando ha rejeição não gera ou apaga o xml e quando transmite normal o xml fica na pasta correta. -
Boa noite, hoje me deparei com algo curioso, fui testar umas mudanças na NFCe e deu rejeição, blz fui olhar o xml e descobri que o mesmo não foi gerado e no lugar do xml gerou um pdf. É isso mesmo?
-
Ok, OK!! problema resolvido. Executar em modo administrador o arquivo ApagaACBr.bat que fica na pasta principal do componente e depois disso instala-lo novamente.
- 1 reply
-
- 1
-
-
Bom dia! Nem sei na realidade reportar o erro, e talvez seja isso que eu não tenha encontrado aqui no forum a solução. Mas tenho o seguinte problema: Apesar de realizar a instalação sem problemas com o instalador do acbr, na hora de abrir o delphi ocorre o erro da imagem anexa e não consigo dar continuidade aos trabalhos. Tenho certeza que alguem ja resolveu o problema, mas eu sinceramente não consegui encontrar. Segue anexo o arquivo de log e da imagem. só pra referencia do topico: ACBrHTTPReqResp Desde ja agradeço. log_Delphi_XE7.txt
-
Boa Noite, eu utiliza o componente boleto do quickreport mas por uma serie de fatores estou deixando-o e passei a utilizar o do fast, nao estou localizando a opcao para nao imprimir o comprovante de entrega que eu acho que serie o aceite e mesmo colocando assim: Aceite := atNao; o danado aparece sempre.
-
Agora deu certo. Mas não me pergunte pq.
-
Sim o Sistema operacional na unidade C e os fontes do ACBr na unidade D, mas sempre foi assim, sempre fiz assim. Não possuo o ACBr em mais de um local.
-
Estou tendo o mesmo problema, e mesmo executando o arquivo .bat sitado por Juliomar não resolveu. Tambem pesquisei algum arquivo bpl solto como disso o nosso amigo e não o encontrei. Mais alguma coisa que posso fazer?
-
Arquivos De Instalação Do Danfe Nfce
FabioMachado replied to FabioMachado's tópico in NFC-e - Nota Fiscal do Consumidor Eletrônica
O instalador tb da erro pra tudo que é lado, e não instala os pacotes. Estou testando o XE6 com quickreport 506 -
Arquivos De Instalação Do Danfe Nfce
um tópico no fórum postou FabioMachado NFC-e - Nota Fiscal do Consumidor Eletrônica
Bom dia, a uns dias atras eu tinha instalado o danfe nfce (ACBrDANFCeFortesFr) só que tive um problema no pc e tive formatar, agora não encontro mais as units para instalação , nem a do quickreport; -
Consegui resolver essa pendencia mudando de "QR5RunDXE6" para " QR506RunDXE6" apenas inclui o 06 por causa da versão do quick 5.06
-
[Resolvido]Acbrboleto - Arquivo De Remessa
FabioMachado replied to Djalma Junior's tópico in ACBrBoleto
Deixa eu te perguntar, você conseguiu o envio o arquivo remessa e a leitura do arquivo retorno do banco itau?- 2 replies
-
- acbrboleto
- arquivo
- (e 4 mais)
-
Boa Noite! Estou tentando recepcionar os arquivos de retorno do banco Itaú mais me retorna o erro CNPJ\CPF do Arquivo Inválido. Ja olhei no arquivo e está correto. Estou fazendo algo errado? ACBrBoletoRetorno.Cedente.TipoInscricao:=pFisica; ACBrBoletoRetorno.Cedente.Nome:=sqlCadBAN_NOME_CEDENTE.AsString; ACBrBoletoRetorno.Cedente.CodigoCedente:=sqlCadBAN_CODIGO_CEDENTE.AsString; ACBrBoletoRetorno.Cedente.Agencia:=sqlCadBAN_AGENCIA.AsString; ACBrBoletoRetorno.Cedente.AgenciaDigito:=sqlCadBAN_AGENCIA_DIGITO.AsString; ACBrBoletoRetorno.Cedente.Conta:=sqlCadBAN_CONTA.AsString; ACBrBoletoRetorno.Cedente.ContaDigito:=sqlCadBAN_DIGITO_CONTA.AsString; ACBrBoletoRetorno.Cedente.CNPJCPF:=sqlCadBAN_CPF_CNPJ_CEDENTE.AsString; ACBrBoletoRetorno.Banco.Nome:=sqlCadBAN_NOME.AsString; ACBrBoletoRetorno.Banco.Numero:=sqlCadBAN_NR.AsInteger; dlgOpen1.FileName := ''; dlgOpen1.Title := 'Selecione o arquivo de retorno'; if dlgOpen1.Execute then begin ACBrBoletoRetorno.DirArqRetorno := ExtractFilePath(dlgOpen1.FileName); ACBrBoletoRetorno.NomeArqRetorno := ExtractFileName(dlgOpen1.FileName); end; ACBrBoletoRetorno.LerRetorno; CN03074A.txt
-
Não consigo fazer o cancelamento do CT-e segue código. procedure TfrmCTe.btnCancelaNFeClick(Sender: TObject); var vAux, MemoResp : String; begin if (Trim(objCTE_CHAVE_ACESSO.Text) = '') then begin MessageDlg('CTe não foi autorizada', mtInformation, [mbOK], 0); objCTE_CHAVE_ACESSO.SetFocus; Exit; end; if (objCTE_Numero_LOTE.EditValue = 0) then begin MessageDlg('Entre com o número do lote', mtInformation, [mbOK], 0); objCTE_Numero_LOTE.SetFocus; Exit; end; if (Trim(objCTE_MOTIVO_CANCELAMENTO.Text) = '') then begin MessageDlg('Entre com o motivo do cancelamento', mtInformation, [mbOK], 0); objCTE_MOTIVO_CANCELAMENTO.SetFocus; Exit; end; ACBrCTe1.Conhecimentos.Clear; OpenDialog1.Title := 'Selecione o CTe'; OpenDialog1.DefaultExt := '*'+objCTE_CHAVE_ACESSO.Text+'*-cte.xml'; OpenDialog1.Filter := 'Arquivos CTe ('+objCTE_CHAVE_ACESSO.Text+'-cte.xml)|'+ objCTE_CHAVE_ACESSO.Text+'-cte.xml|Arquivos XML (*' + '.xml)|'+objCTE_CHAVE_ACESSO.Text+'.xml'; OpenDialog1.InitialDir := ACBrCTe1.Configuracoes.Geral.PathSalvar; if OpenDialog1.Execute then begin ACBrCTe1.Conhecimentos.LoadFromFile(OpenDialog1.FileName); ACBrCTe1.Cancelamento(objCTE_MOTIVO_CANCELAMENTO.Text); objCTE_PROTOCOLO_CANCELAMENTO.Text:= ACBrCTe1.WebServices.Cancelamento.Protocolo; ShowMessage(IntToStr(ACBrCTe1.WebServices.Cancelamento.cStat)); ShowMessage(ACBrCTe1.WebServices.Cancelamento.Protocolo); end; end;
-
Segue link do post:
-
Boa Noite, a uns 6 meses mais ou menos eu postei aqui no forum os fontes do boleto em quickreport com as alterações necessários para fazer a geração do PDF. Porém na ultima atualização o problema ainda permanecia. Há alguem responsavel pelos boletos em quickreport? Gostaria das implementações. Não to sabendo o que fazer .. pode ser que haja outras correções necessários que não tenham sido implementadas.
-
Boa Noite, estou tendo um problema com a transmissão da NFe. Ta dando rejeição em todas elas Rejeição 103 - Segue arquivo XML. 14140407198515000197550010000001031000001030-nfe.xml
-
O demo ta assim: if ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.tpEmis = teDPEC then begin ACBrNFe1.WebServices.ConsultaDPEC.NFeChave := ACBrNFe1.NotasFiscais.Items[0].NFe.infNFe.ID; ACBrNFe1.WebServices.ConsultaDPEC.Executar; ACBrNFe1.DANFE.ProtocoloNFe := ACBrNFe1.WebServices.ConsultaDPEC.nRegDPEC +' '+ DateTimeToStr(ACBrNFe1.WebServices.ConsultaDPEC.dhRegDPEC); end; Igual acabei de atualizar inclusive e o Anti-virus pegou um virus vindo do SVN.
-
Quando vou imprimir o DANFE novamente não está saindo protocolo eu estou usando assim mais não da resultado sai em branco. ACBNFe.DANFE.ProtocoloNFe := ACBNFe.WebServices.ConsultaDPEC.nRegDPEC +' '+ DateTimeToStr(ACBNFe.WebServices.ConsultaDPEC.dhRegDPEC);
-
Renato Lucas Pandolfo, eu ja espero esse layout a um bom tempo .. e até onde sei não há previsão... principalmente se for pra quickreport. você poderia fazer desenvolvimento utilizando os fontes ja existentes e assim que estivesse ok, postasse aqui pra ver se algum administrador incluia no svn.