Ir para conteúdo
  • Cadastre-se

Lucio Bittes

Membros
  • Total de ítens

    256
  • Registro em

  • Última visita

  • Days Won

    1

Tudo que Lucio Bittes postou

  1. Nada que eu fiz não deu certo, isso so acontece de vez em quando.
  2. dmDados.NFe.Configuracoes.Arquivos.Salvar := True; dmDados.NFe.Configuracoes.Arquivos.PastaMensal := True; dmDados.NFe.Configuracoes.Arquivos.AdicionarLiteral := True; dmDados.NFe.Configuracoes.Arquivos.PathNFe := edtPathLogs.Text; //C:\Autorizadas\ dmDados.NFe.Configuracoes.Arquivos.PathCan := edtPathLogs.Text; //C:\Autorizadas\ dmDados.NFe.Configuracoes.Arquivos.PathInu := edtPathLogs.Text; //C:\Autorizadas\ dmDados.NFe.Configuracoes.Arquivos.PathCCe := edtPathLogs.Text; //C:\Autorizadas\ dmDados.NFe.Configuracoes.Arquivos.PathEvento := edtPathLogs.Text //C:\Autorizadas\; Faço o envio e ele salva automático. Ele salva o arquivo do xml primeiro e depois do retorno ele atualiza, mas o que está acontecendo e que ele não tá atualizando o xml.
  3. Arquivo XML está sem a tag de autorização, essa parte que não estou entendendo, se retorna o cstat = 100 e aparece o preview como já expliquei, porque ele não está dando certo com o xml? <protNFe versao="2.00"> <infProt> <tpAmb>2</tpAmb> <verAplic>GO3.0</verAplic> <chNFe>52141106076739000163550010000009001000009000</chNFe> <dhRecbto>2014-11-05T10:50:22</dhRecbto> <nProt>152140012536489</nProt> <digVal>SP8SX72XAWUGjKfDAcM+d9W+VfI=</digVal> <cStat>100</cStat> <xMotivo>Autorizado o uso da NF-e</xMotivo> </infProt> </protNFe> Não esta adicionando essa parte no arquivo original do XML.
  4. Bom dia! Estou com uma dúvida e não sei se e programação ou no componente, já tentei encontrar e não consigo. Uso o componente da NF-e no meu sistema e está ocorrendo o seguinte problema. Quando vou enviar uma nota ele enviar normalmente e pego o protocolo e data hora do protocolo. iCodigo := dmDados.NFe.WebServices.Retorno.NFeRetorno.ProtNFe.Items[iConfirmada].cStat; vsProtocolo := dmDados.NFe.WebServices.Retorno.NFeRetorno.ProtNFe.Items[iConfirmada].nProt; vsDataHoraProt := DateTimeToStr(dmDados.NFe.WebServices.Retorno.NFeRetorno.ProtNFe.Items[iConfirmada].dhRecbto); vsChaveNFE := dmDados.NFe.WebServices.Retorno.NFeRetorno.ProtNFe.Items[iConfirmada].chNFe; Se ele trouxe o cStat = 100 quer dizer que está tudo ok, que foi aceito e me retorna o protocolo, cStat, DataHora recebimento e salvo no banco e ele aparece o preview (MostrarPreview = True) pra mandar imprimir, imprimo o danfe tudo tranquilo, até aqui tudo certo. No outro dia tenho uma empresa que está imprimindo o danfe novamente pra deixar uma via na loja e quando ela manda imprimir esta saindo SEM VALIDADE FISCAL (TARJA), Como se não estivesse atualizando o arquivo xml com a tag de autorização no final do arquivo. Tentei pesquisar no fórum sobre o assunto e não achei nada referente.
  5. If nfe.Det[i].Prod.vDesc > 0 Then Gerador.wCampo(tcDe2, 'I17 ', 'vDesc ', 00, 15, 0, nfe.Det[i].Prod.vDesc, DSC_VDESC); Coloquei assim e mesmo assim gerou o campo vindo com o valor 0.00. Debuguei achando que o valor estava vindo quebrado pra ver se passava e ele não passou na linha.
  6. Aqui no escritório não da nenhum problema. Já debuguei o sistema e aqui não da nenhum problema. Peguei o banco de dados do cliente e troquei o numero da nota pra enviar e foi sem nenhum problema. Já passei umas 3 vezes essa unit. Não sei se você observou o xml mas o campo está sendo gerado mesmo com o valor 0.
  7. São só 2 casas decimais. Anexei o xml. Já estou sem ideia de como resolver.
  8. Ja verifiquei e está normal. Até redefinir as configurações regionais e mesmo assim o erro persiste.
  9. Boa tarde. Estou enfrentando um problema com um cliente que não sei o que está acontecendo, fiz o mesmo teste aqui no escritório e a nota foi sem problema. A principio pensei que fosse o schemas e ja atualizei de imediato e mesmo assim persistiu o erro. "vDesc with value '0.00' failed to parse." Segue o erro junto com o xml. Alguém já passou por isso? Obrigado! 52141008143615000189550010000013811000013816-NFe.xml
  10. Italo, boa tarde. Tem uma URL que ficou errado. Recepção de evento. Segue os links corretos. Desculpe pela falta de atenção. case ALayOut of LayNfeRecepcao : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeRecepcao2', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/NfeRecepcao2?wsdl'); LayNfeRetRecepcao : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeRetRecepcao2', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/NfeRetRecepcao2?wsdl'); LayNfeCancelamento : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeCancelamento2', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/NfeCancelamento2?wsdl'); LayNfeInutilizacao : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeInutilizacao2', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/NfeInutilizacao2?wsdl'); LayNfeConsulta : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeConsulta2', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/NfeConsulta2?wsdl'); LayNfeStatusServico : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeStatusServico2', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/NfeStatusServico2?wsdl'); LayNfeCadastro : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/CadConsultaCadastro2', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/CadConsultaCadastro2?wsdl'); LayNFeCCe, LayNFeEvento : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeRecepcaoEvento', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/RecepcaoEvento?wsdl'); LayNfeAutorizacao : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeAutorizacao', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/NfeAutorizacao?wsdl'); LayNfeRetAutorizacao : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeRetAutorizacao', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/NfeRetAutorizacao?wsdl'); end; Obrigado!
  11. Obrigado pela atenção.
  12. Italo, boa tarde. No fonte original esta sem o "?wsdl" e sem ele o cancelamento não e feito, no site de homologação a url completa está com "?wsdl" e depois que eu adicionei e tentei cancelar novamente foi tranquilo. Sempre que eu acho essas coisas posto aqui para que não precise ficar alterando a cada vez que atualizo o repositório. Também não entendi porque até na semana retrasada estava funcionando normal. Deste já agradeço. Em anexo segue o print que tirei do erro falando que não conseguiu localizar o url.
  13. Bom dia pessoal. Estava testando umas coisas da NFe e me deparei com um problema que imaginei que era da própria sefaz de Goiânia/GO, mas hoje quando cheguei ao escritório e fui tentar efetuar o cancelamento da nota ela persistiu no erro e não estava conseguindo. Não estava conseguindo achar o URL da webservice de homologação. Segue em anexo o erro. Entrei no site para ver a URL da webservice de homologação e vi que não estava completo, fiz a alteração e a nota foi cancelada com sucesso. Segue o código antes e depois. Pode me informar se e possível alterar no código para que eu possa atualizar meu repositório. obrigado! Antes. class function NotaUtil.GetURLGO(AAmbiente: Integer; ALayOut: TLayOut; AModeloDF: TpcnModeloDF = moNFe; AVersaoDF: TpcnVersaoDF = ve200): WideString; begin if AModeloDF = moNFe then begin case ALayOut of LayNfeRecepcao : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeRecepcao2', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/NfeRecepcao2'); LayNfeRetRecepcao : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeRetRecepcao2', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/NfeRetRecepcao2'); LayNfeCancelamento : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeCancelamento2', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/NfeCancelamento2'); LayNfeInutilizacao : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeInutilizacao2', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/NfeInutilizacao2'); LayNfeConsulta : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeConsulta2', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/NfeConsulta2'); LayNfeStatusServico : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeStatusServico2', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/NfeStatusServico2'); LayNfeCadastro : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/CadConsultaCadastro2', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/CadConsultaCadastro2'); LayNFeCCe, LayNFeEvento : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeRecepcaoEvento', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/NfeRecepcaoEvento'); LayNfeAutorizacao : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeAutorizacao', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/NfeAutorizacao'); LayNfeRetAutorizacao : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeRetAutorizacao', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/NfeRetAutorizacao'); end; end else begin case ALayOut of LayNfeRecepcao, LayNfeAutorizacao : Result := DFeUtil.SeSenao(AAmbiente=1, '', ''); LayNfeRetRecepcao, LayNfeRetAutorizacao : Result := DFeUtil.SeSenao(AAmbiente=1, '', ''); LayNfeInutilizacao : Result := DFeUtil.SeSenao(AAmbiente=1, '', ''); LayNfeConsulta : Result := DFeUtil.SeSenao(AAmbiente=1, '', ''); LayNfeStatusServico : Result := DFeUtil.SeSenao(AAmbiente=1, '', ''); LayNFeCCe, LayNFeEvento : Result := DFeUtil.SeSenao(AAmbiente=1, '', ''); end; end; end; Depois da alteração. class function NotaUtil.GetURLGO(AAmbiente: Integer; ALayOut: TLayOut; AModeloDF: TpcnModeloDF = moNFe; AVersaoDF: TpcnVersaoDF = ve200): WideString; begin if AModeloDF = moNFe then begin case ALayOut of LayNfeRecepcao : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeRecepcao2', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/NfeRecepcao2?wsdl'); LayNfeRetRecepcao : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeRetRecepcao2', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/NfeRetRecepcao2?wsdl'); LayNfeCancelamento : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeCancelamento2', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/NfeCancelamento2'); LayNfeInutilizacao : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeInutilizacao2', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/NfeInutilizacao2?wsdl'); LayNfeConsulta : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeConsulta2', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/NfeConsulta2?wsdl'); LayNfeStatusServico : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeStatusServico2', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/NfeStatusServico2?wsdl'); LayNfeCadastro : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/CadConsultaCadastro2', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/CadConsultaCadastro2?wsdl'); LayNFeCCe, LayNFeEvento : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeRecepcaoEvento', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/RecepcaoEvento?wsdl'); LayNfeAutorizacao : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeAutorizacao', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/NfeAutorizacao?wsdl'); LayNfeRetAutorizacao : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.go.gov.br/nfe/services/v2/NfeRetAutorizacao', 'https://homolog.sefaz.go.gov.br/nfe/services/v2/NfeRetAutorizacao?wsdl'); end; end else begin case ALayOut of LayNfeRecepcao, LayNfeAutorizacao : Result := DFeUtil.SeSenao(AAmbiente=1, '', ''); LayNfeRetRecepcao, LayNfeRetAutorizacao : Result := DFeUtil.SeSenao(AAmbiente=1, '', ''); LayNfeInutilizacao : Result := DFeUtil.SeSenao(AAmbiente=1, '', ''); LayNfeConsulta : Result := DFeUtil.SeSenao(AAmbiente=1, '', ''); LayNfeStatusServico : Result := DFeUtil.SeSenao(AAmbiente=1, '', ''); LayNFeCCe, LayNFeEvento : Result := DFeUtil.SeSenao(AAmbiente=1, '', ''); end; end; end;
  14. Juliomar, isso mesmo garoto. Obrigado! A quem estiver passando pelo mesmo problema, aqui vai a solução.. Ache a linha $(BDS)\RaveReports\Lib Troque por C:\Program Files\CodeGear\RAD Studio\5.0\RaveReports\Lib
  15. Pessoal, bom dia! Sempre atualizo o repositorio do ACBr e sempre utilizei o instalador para fazer isso. Mas hoje quando fui atualizar me deparei com um erro que não estou conseguindo resolver. 1-) Com a versão antiga do ACBrInstalador instala sem problema. 2-) Está dando erro nesses dois pacotes, mas quando abro o dpk e instalo manual, ele instala sem problema. Verifiquei o log de instalação e os dois está dando o mesmo erro. ACBrNFeDanfeRV.dpk(80) Fatal: E2202 Required package 'Rave75VCL' not found Mas o engraçado e que quando eu mando instalar manual ele compila sem erro. Obrigado pela atenção. Bom dia!
  16. Certo. Obrigado pela explicação, irei fazer as alterações que me indicou. Obrigado!
  17. Bom dia. Tinha lido não lembro onde que os eventos de confirmação pode ter mais do que 1 para a mesma confirmação. Então a confirmação pode ser feita somente uma única vez? No caso da confirmação errada?
  18. Bom dia. Estou implementando a opção de confirmações de destinatário da MDF-e e estou com o seguinte erro, na primeira sequencia eu conseguir enviar e quando coloco a sequencia 2 me da o seguinte erro. <cStat>594</cStat> <xMotivo>Rejeicao: O numero de sequencia do evento informado e maior que o permitido</xMotivo> Os eventos de confirmação não são sequenciais? O último substitui a anterior? Obrigado! 521401025956260001135500100043190610043190602102001-procEventoNFe.xml 521401025956260001135500100043190610043190602102002-procEventoNFe.xml
  19. Certo, achei que tinha algum patch referente a isso, mas mesmo assim, muito obrigado! Irei utilizar esse método.
  20. Sim, tinha visto esse topico, mas queria saber como salvar o xml gerado também.
  21. Bom dia! Estou com uma dúvida em relação ao componente da NFe que não conseguir encontrar no forum. Pois bem. Gostaria de saber como configurar o componente para salvar 2 tipos de XML, a autorizada e a gerada. Por exemplo: Quando clicar em criar e enviar ele salva o arquivo gerado da NFe em uma pasta especifica separado por ano e mês e apos a autorização ele faz a mesma coisa. Pasta Autorizada com separação de ano e mês. Pasta Enviada com separação de ano e mês. Sobre a autorizada eu sei que tem como, mas fiquei em dúvida de como configurar certo. Deste já agradeço.
  22. Italo, bom dia! Irei testar. Obrigado!
  23. Como a classe era virtual e os provedores override, tive que alterar em todos os provedores. Fico a disposição para quaisquer dúvidas. Mais uma vez, obrigado!
  24. Bom dia! Pesquisei aqui no fórum sobre algum tópico de alterações mas não achei. Então... Estou implementado o NFS-e para Goiânia e achei um pequeno problema que tive que fazer adaptação do componente, para não efetuar toda vez que eu atualizar o mesmo gostaria que fosse avaliado para implantação definitiva. Segue alterações. Para pegar o GetLinkNFSe era passado os parâmetros. (ACodMunicipio, ANumeroNFSe: Integer; ACodVerificacao: String; AAmbiente: Integer) Para Goiânia temos que passar a IM para a consulta, mas para essa alteração tive que alterar essa procedure em todos os provedores. Com a alteração a nova procedure ficou assim. (ACodMunicipio, ANumeroNFSe: Integer; ACodVerificacao, AInscricaoM: String; AAmbiente: Integer) A classe TNFSeLinkNFSe Ficou Assim. TNFSeLinkNFSe = Class(TWebServicesBase) private FNotasFiscais : TNotasFiscais; FNumeroNFSe: integer; FCodVerif: String; FLink: String; FIM: string; public function Executar: Boolean; override; constructor Create(AOwner : TComponent; ANotasFiscais : TNotasFiscais); reintroduce; property NumeroNFSe: integer read FNumeroNFSe; property CodVerif: String read FCodVerif; property Link: String read FLink; property IM: string read FIM; end; Classe TACBrNFSe foi alterado a função. function LinkNFSe(ANumeroNFSe: Integer; ACodVerificacao, AInscricaoM: String): String; Classe TNFSeGerarLoteRps foi alterado a função. function LinkNFSeGerada(ANumeroNFSe: Integer; ACodVerificacao, AInscricaoM: String): String; Provedor de Goiãnia foi alterado. function TProvedorGoiania.GetLinkNFSe(ACodMunicipio, ANumeroNFSe: Integer; ACodVerificacao, AInscricaoM: String; AAmbiente: Integer): String; Var vUrlNota : string; begin vUrlNota := 'http://www2.goiania.go.gov.br/sistemas/snfse/asp/snfse00200w0.asp?inscricao=' + AInscricaoM; vUrlNota := vUrlNota + '&nota=' + IntToStr(ANumeroNFSe) + '&verificador=' + ACodVerificacao; Result := vUrlNota; end; Segue em anexo as alterações. Obs: Meu repositorio estava atualizado. Fico aguardando retorno para alteração para atualizar novamente. Obrigado! ACBrNFSe.rar ACBrNFSe.rar
  25. Já fiz essas alterações. Copilei o projeto da NF-e com a funão GetUTG e pega o horário de verão coloca -2:00 e temos clientes de cidades que não estão e pega o -03:00, mas mesmo assim consultando o serviço de status com o retorno data e hora as vezes da a data do processo não pode ser maior a que do evento. O que eu faço, já não sei mais o que fazer...
×
×
  • 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.