Ir para conteúdo
  • Cadastre-se

darlananogueira

Membros
  • Total de ítens

    293
  • Registro em

  • Última visita

  • Days Won

    2

Tudo que darlananogueira postou

  1. Prezados, alguns cliente tem reclamado que as NF-e destinadas a ele não estão retornando na consulta. Faço o processo enquanto não possuir mais documentos, conforme abaixo. Por acaso alguém esta vivenciando essa situação? repeat .... ... until ACBrNFe1.WebServices.ConsNFeDest.retConsNFeDest.indCont = icNaoPossuiMaisDocumentos; Darlana
  2. Cria a pasta ACBr novamente, e faz o download total, foi assim que consegui. 3 minutinhos apenas
  3. Leandro Chmereha, por gentileza tem como você salvar o email, e postar pra gente no forum, para documentarmos esse percalso junto aos clientes, pois se enviar o email para a sefaz/mg, somente em 48horas terei o retorno. Ficarei grata se puder fazer essa gentileza. Darlana Nogueira
  4. Erro ao enviar e-mail do Yahoo Prezados, até a ultima quinta-feira a rotina utilzada para enviar e-mail funcionava normalmente, e por algum motivo não esta mais enviando. Alguém pode me dar algum orientação porque não esta entrando na rotina para autenticar o email, especificamente do yahoo? Erro Apresentado: --------------------------- Debugger Exception Notification --------------------------- Project NFE.exe raised exception class EIdProtocolReplyError with message '5.7.1 Authentication required '. Process stopped. Use Step or Run to continue. --------------------------- Rotina usada: try Mail.Host := dm.SQLQry3.FieldByName('SMTP').AsString; Mail.Port := dm.SQLQry3.FieldByName('PORTA').AsInteger; Mail.Username := dm.SQLQry3.FieldByName('USUARIO').AsString; Mail.Password := dm.SQLQry3.FieldByName('SENHAEMAIL').AsString; Mail.AuthenticationType := atNone; Mail.Connect(6000); if not Mail.Connected then raise Exception.Create('Erro de conexão com o servidor de e-mail. '); try if lcAUTENTICA = 'S' then begin if Mail.AuthSchemesSupported.IndexOf('LOGIN') > -1 then // Ocorre o erro aqui - Não entra no if, e logo não define o requer autenticação e o erro é apresentado begin Mail.AuthenticationType := atLogin; Mail.Authenticate; end; end; Sleep(2000); MailMessage.Body.Clear; MailMessage.Recipients.EMailAddresses := LowerCase(DbEmail.Text); MailMessage.Subject := 'Notificação de Recebimento NF-e'; MailMessage.Body.Add(''); MailMessage.Body.Add('Segue anexo sua Nota Fiscal Eletrônica (NF-e).'); MailMessage.Body.Add('Desenvolvido por: www.vbcautomacao.com.br'); MailMessage.Sender.Name := 'VBC AUTOMACAO'; MailMessage.From.Address := '[email protected] MailMessage.From.Name := 'VBC Automacao'; Mail.Send(MailMessage); finally Mail.Disconnect; MailMessage.MessageParts.Clear; end; except on E: Exception do begin Application.Messagebox(Pchar('Falha ao enviar e-mail.'+E.Message),'Erro',0+16); Mail.Disconnect; MailMessage.MessageParts.Clear; end; end;
  5. Segue um checklist que uso com minha equipe de suporte... algumas coisas parecem ser simples, mas tem sido eficaz ate a presente data. Espero que resolva. Checklist Versão 7.pdf
  6. Cerco fechando... mercado de trabalho em ascensão...
  7. Italo, ja realizo esse procedimento repeat .... ... until ACBrNFe1.WebServices.ConsNFeDest.retConsNFeDest.indCont = icNaoPossuiMaisDocumentos; Nesse cliente em especifico, a consulta fica cerca de uma hora processando. Por fim tentamos o procedimento manual, inseri os dados da chave e cnpj da NF-e destinada que estavamos com ela em mãos, e enviamos o manifesto, e o evento foi registrado. Ou seja mesmo a NF-e não retornada pelo site da SEFAZ conseguimos manifestar. E não sei se pior ou melhor, também conseguimos manifestar NF-e destinadas fora do prazo da manifestação. Grata, Darlana Nogueira
  8. Italo, acredito que de fato ocorra a questão do atraso no sincronismo dos dados, mas tenho cliente com notas de dia 02, 03 e 04 julho que não retornam na consulta do manifesto. E também pedi ao suporte para verificar se ocorre o retorno no software disponibilizado pela sefaz de SP, e como ja esperado não retorna. As nfe do dia 02 e 03 ja não serão mais retornadas mesmo, pois ultrapassam os 15dias, ressalto que estamos ha 3dias tentando consultar, e elas não retornam, e a nfe existe, o cliente esta com o Danfe em mãos, consulta a chave no portal a nfe autorizada, tudo normal... Enviei para a sefaz/MG o questionamento a respeito, visto que o atendimento telefonico não soube me responder. Mais alguma luz...
  9. Prezados, estou com alguns clientes que ao consultar as NF-e destinadas a ele, algumas não estão retornadas pelas sefaz. Porem o cliente ja esta com a NF-e em mãos, posso realizar a manifestação desta NF-e mesmo ela não constando na consulta do Manifesto do Destinatário? Atenciosamente, Darlana Nogueira
  10. Sosystem, Pois então fiz o testes em homologação... passou... emiti tres notas... com o mesmo coo e não bloqueou... porem eu estou em MG, e so tempo certificado de MG... o meu cliente é de GO... estou tentando entrar em contato com a SEFAZ/GO e nada... Por acaso alguém de GO, esta passando com esse problema... Grata... Otimo dia pra todos
  11. Graça, de acordo com o pessoal do suporte, haviam cancelado a NF-e, por algum motivo que não entrei em detalhe, e agora estão tentando transmitir novamente, com outro numero de NF-e, porem não esta permitindo... esta dando a duplicidade... existe sim uma outra nota que referencia, mas está cancelada. Darlana
  12. Prezados, estou com o seguinte problema: --------------------------- NF-e (Nota Fiscal Eletrônica) --------------------------- Nota(s) não confirmadas: 2338->Rejeicao: Duplicidade de Cupom Fiscal referenciado (Modelo, Numero e Ordem e COO) Conforme o arquivo anexo, o Modelo, Numero e Ordem e COO não se repetem... Alguém pode me auxiliar o que pode ser feito? 52130603800242000158550010000023381101982650-NFe.xml
  13. Caros companheiros, tenho que concordar com os administradores, nossa o uso esta indiscriminado mesmo. Vamos tentar concentrar e organizar, pois senão fica dificil, principalmente em uma situação com atual, fomos informados que estaria ativo a partir do dia 01/06/2013 e até então nada. Gostaria de saber qual UF ja está conseguindo emitir NF-e usando as tag da lei da transparencia? Conto com a contribuição de cada um...
  14. Zedaraguaia, qual schemas você conseguiu transmitir NF-e em produção no estado de GO, PL_006r. ? Atenciosamente, Darlana Nogueira
  15. Pessoal, estou em MG e estava conseguindo mandar em modo de homologação até quinta. Sexta e hoje, em modo de homologação fica so lote em processamento... Em produção nada... não tenho como testar, estou aguardando o inicio do expediente, pra verificar se algum cliente da sinal de vida. Tomara que de tudo certo.. Preocupada com isso hj... pleno inicio de mes, faturamento... Boa Sorte ai, mantenham-nos informados
  16. Pessoal, desde de ontem a SEFAZ/MG tem retornado Lote em Processamento nos testes que tenho feito em modo de homologação, mas alguém, especialmente em Minas Gerais, esta passando pelo mesmo problema? Preocupada com o comportamento da Lei da Transparencia iniciada hoje em modo de produção... Otimo final de semana, abraços, Darlana
  17. Bom dia pessoal, alguém ja esta conseguindo enviar NF-e em modo de produção com o campo vtottrib? ou so a partir de amanha mesmo? Obrigado
  18. Gente so pra verificar, mesmo... Alguém conseguindo emitir NF-e em modo de homologação em MG hoje (23/05/2013)? ps: "Abençoada a SeFaz/MG"
  19. Agora, aproveitando o mesmo topico, estou com problemas ao salvar o download da NF-e, apos a confirmação da operação no manifesto do destinatário. O XML está apresentando erro. Estou fazendo da seguinte forma: ACBrNFe1.DownloadNFe.Download.CNPJ := DbCNPJCPFEmpresa.Text; ACBrNFe1.DownloadNFe.Download.Chaves.Add.chNFe := lcChave; ACBrNFe1.Download; lcNomeArquivo := ACBrNFe1.Configuracoes.Arquivos.PathNFe+'\Dwn'+lcChave+'-nfe.xml'; ACBrNFe1.Configuracoes.Geral.Save(lcNomeArquivo,FrmPrincipal.ACBrNFe1.WebServices.DownloadNFe.retDownloadNFe.XML); Segue o arquivo que esta salvo em anexo. Alguém pode ajudar nisso. Grata, Darlana Nogueira Dwn31130505229436000170550020000136411387764414-nfe.xml Dwn31130505229436000170550020000136411387764414-nfe.xml
  20. Paulo, se eu não entendi errado, segue ai ACBrNFe1.Configuracoes.Geral.Save(NomeArquivo, DadosArquivo); Darlana
  21. Pessoal, estou com algumas duvidas a respeito da nota tecnica NT2013.003_v1.00a_Lei_Transparencia, onde informa que o campo nfref foi reduzido para 500 ocorrencias: Duvida 1: Isso fica entendido que poderei adicionar a uma NF-e até 500 cupons? Duvida 2: Ao usar o CFOP 5929 - Emissão de NF proveniente de cupom fiscal, sou obrigada a enviar a tag nfref no xml da nota? Duvida 3: Meus clientes emitem NF-e ha mais de 1 ano, e quase todas com o CFOP 5929, e a tag nfref nunca foi informada, porem sempre constou nas informações adicionais o numero de serie da impressora fiscal, modelo, marca e o numero do cupom. Isso configura irregularidade? Atenciosamente, Darlana Nogueira
  22. Marcos, eu somente consegui transmiti utilizando o orgão 91, como minha aplicação ainda não foi pra o modo de produção, coloquei o orgão parametrizado, logo imagino que em modo de produção deva estar funcionando corretamente, portando senão estiver, creio que o mais sensato a fazer é enviar e-mail para a secretaria da fazenda de origem e verificar o que dizem. Aproveitando, alguém em Minas, conseguiu transmitir com orgão diferente de 91? E em modo de homologação? Darlana Nogueira
  23. Marcos e ArqBox... não deu pra melhorar o codigo ai pra vcs não... mas analise ai que vão encontrar a solução lcultimoNSU := '0'; indNFe := '0'; ndEmi := '0'; with FrmPrincipal.ACBrNFe1.WebServices.ConsNFeDest.retConsNFeDest do begin repeat Application.ProcessMessages; FrmPrincipal.ACBrNFe1.ConsultaNFeDest(CNPJ, StrToIndicadorNFe(lbok,indNFe), StrToIndicadorEmissor(lbok,IndEmi), lcultimoNSU); for i := 0 to FrmPrincipal.ACBrNFe1.WebServices.ConsNFeDest.retConsNFeDest.ret.Count - 1 do begin lcultimoNSU := FrmPrincipal.ACBrNFe1.WebServices.ConsNFeDest.retConsNFeDest.ultNSU; // Retorno NF-e with FrmPrincipal.ACBrNFe1.WebServices.ConsNFeDest.retConsNFeDest do begin if trim(ret.Items.resNFe.chNFe) <> '' then begin if ret.Items.resNFe.cSitNFe <> snCancelada then begin dm.cdsManifesto.Append; dm.cdsManifestoID.AsInteger := 0; dm.cdsManifestoIDMANICONSULTA.AsInteger := lnIDManiConsulta; dm.cdsManifestoVERSAO.AsString := versao; dm.cdsManifestoAMBIENTE.AsString := sAmbiente; dm.cdsManifestoVERSAPLICATIVO.AsString := verAplic; dm.cdsManifestoSTATUS.AsInteger := cStat; dm.cdsManifestoMOTIVO.AsString := xMotivo; dm.cdsManifestoDATACONSULTA.AsDateTime := StrToDate(formatdatetime('dd/mm/yyyy',dhResp)); dm.cdsManifestoHORACONSULTA.AsDateTime := StrToTime(formatdatetime('hh:mm:ss',dhResp)); dm.cdsManifestoDATAMANIFESTO.AsDateTime := StrToDate(formatdatetime('dd/mm/yyyy',dhResp)); dm.cdsManifestoHORAMANIFESTO.AsDateTime := StrToTime(formatdatetime('hh:mm:ss',dhResp)); dm.cdsManifestoNSU.AsString := ret.Items.resNFe.NSU; dm.cdsManifestoCHAVENFE.AsString := ret.Items.resNFe.chNFe; dm.cdsManifestoCNPJCPF.AsString := ret.Items.resNFe.CNPJCPF; dm.cdsManifestoNOMEEMITENTE.AsString := ret.Items.resNFe.xNome; dm.cdsManifestoIE.AsString := ret.Items.resNFe.IE; dm.cdsManifestoDATAEMISSAO.AsDateTime := StrToDate(formatdatetime('dd/mm/yyyy',ret.Items.resNFe.dEmi)); dm.cdsManifestoTIPONFE.AsString := sTiponfe; dm.cdsManifestoTOTANFE.AsFloat := ret.Items.resNFe.vNF; dm.cdsManifestoDIGVAL.AsString := ret.Items.resNFe.digVal; dm.cdsManifestoDATAAUTORIZACAO.AsDateTime := StrToDate(formatdatetime('dd/mm/yyyy',ret.Items.resNFe.dhRecbto)); dm.cdsManifestoHORAAUTORIZACAO.AsDateTime := StrToTime(formatdatetime('hh:nn:ss',ret.Items.resNFe.dhRecbto)); dm.cdsManifestoSITUNFEVALOR.AsString := SituacaoNFe('',SNFE); dm.cdsManifestoSITUNFE.AsString := sNFE; dm.cdsManifestoSITUMANIVALOR.AsString := SituacaoManifesto('',sManifesto); dm.cdsManifestoSITUMANIFESTO.AsString := sManifesto; dm.cdsManifestoCCE.AsString := 'N'; dm.cdsManifesto.Post; end; end; end; // Retorno NF-e Cancelada with FrmPrincipal.ACBrNFe1.WebServices.ConsNFeDest.retConsNFeDest do begin if trim(ret.Items.resCanc.chNFe) <> '' then begin dm.cdsManifesto.Append; dm.cdsManifestoID.AsInteger := 0; dm.cdsManifestoIDMANICONSULTA.AsInteger := lnIDManiConsulta; dm.cdsManifestoVERSAO.AsString := versao; dm.cdsManifestoAMBIENTE.AsString := sAmbiente; dm.cdsManifestoVERSAPLICATIVO.AsString := verAplic; dm.cdsManifestoSTATUS.AsInteger := cStat; dm.cdsManifestoMOTIVO.AsString := xMotivo; dm.cdsManifestoDATACONSULTA.AsDateTime := StrToDate(formatdatetime('dd/mm/yyyy',dhResp)); dm.cdsManifestoHORACONSULTA.AsDateTime := StrToTime(formatdatetime('hh:mm:ss',dhResp)); dm.cdsManifestoDATAMANIFESTO.AsDateTime := StrToDate(formatdatetime('dd/mm/yyyy',dhResp)); dm.cdsManifestoHORAMANIFESTO.AsDateTime := StrToTime(formatdatetime('hh:mm:ss',dhResp)); dm.cdsManifestoNSU.AsString := ret.Items.resCanc.NSU; dm.cdsManifestoCHAVENFE.AsString := ret.Items.resCanc.chNFe; dm.cdsManifestoCNPJCPF.AsString := ret.Items.resCanc.CNPJCPF; dm.cdsManifestoNOMEEMITENTE.AsString := ret.Items.resCanc.xNome; dm.cdsManifestoIE.AsString := ret.Items.resCanc.IE; dm.cdsManifestoDATAEMISSAO.AsDateTime := StrToDate(formatdatetime('dd/mm/yyyy',ret.Items.resCanc.dEmi)); dm.cdsManifestoTIPONFE.AsString := sTiponfe; dm.cdsManifestoTOTANFE.AsFloat := ret.Items.resCanc.vNF; dm.cdsManifestoDIGVAL.AsString := ret.Items.resCanc.digVal; dm.cdsManifestoDATAAUTORIZACAO.AsDateTime := StrToDate(formatdatetime('dd/mm/yyyy',ret.Items.resCanc.dhRecbto)); dm.cdsManifestoHORAAUTORIZACAO.AsDateTime := StrToTime(formatdatetime('hh:nn:ss',ret.Items.resCanc.dhRecbto)); dm.cdsManifestoSITUNFEVALOR.AsString := SituacaoNFE('',sNFE); dm.cdsManifestoSITUNFE.AsString := sNFE; dm.cdsManifestoSITUMANIVALOR.AsString := SituacaoManifesto('',sManifesto); dm.cdsManifestoSITUMANIFESTO.AsString := sManifesto; dm.cdsManifestoCCE.AsString := 'N'; dm.cdsManifesto.Post; end; // Retorno da Carta de Correção // Retorno Manifesto do Destinatario quando Carta de Correção // Retorno CC-e Carta de Correção with FrmPrincipal.ACBrNFe1.WebServices.ConsNFeDest.retConsNFeDest do begin if trim(ret.Items.resCCe.chNFe) <> '' then begin dm.cdsManifesto.Append; dm.cdsManifestoID.AsInteger := 0; dm.cdsManifestoIDMANICONSULTA.AsInteger := lnIDManiConsulta; dm.cdsManifestoVERSAO.AsString := versao; dm.cdsManifestoAMBIENTE.AsString := sAmbiente; dm.cdsManifestoVERSAPLICATIVO.AsString := verAplic; dm.cdsManifestoSTATUS.AsInteger := cStat; dm.cdsManifestoMOTIVO.AsString := xMotivo; dm.cdsManifestoDATACONSULTA.AsDateTime := StrToDate(formatdatetime('dd/mm/yyyy',dhResp)); dm.cdsManifestoHORACONSULTA.AsDateTime := StrToTime(formatdatetime('hh:mm:ss',dhResp)); dm.cdsManifestoNSU.AsString := ret.Items.resCCe.NSU; dm.cdsManifestoCHAVENFE.AsString := ret.Items.resCCe.chNFe; dm.cdsManifestoCNPJCPF.AsString := ''; dm.cdsManifestoNOMEEMITENTE.AsString := ''; dm.cdsManifestoIE.AsString := ''; dm.cdsManifestoDATAEMISSAO.AsDateTime := StrToDate(formatdatetime('dd/mm/yyyy',ret.Items.resCCe.dhEvento)); dm.cdsManifestoTIPONFE.AsString := sTiponfe; dm.cdsManifestoTOTANFE.AsFloat := 0; dm.cdsManifestoDIGVAL.AsString := ''; dm.cdsManifestoDATAAUTORIZACAO.AsDateTime := StrToDate(formatdatetime('dd/mm/yyyy',ret.Items.resCCe.dhEvento)); dm.cdsManifestoHORAAUTORIZACAO.AsDateTime := StrToTime(formatdatetime('hh:nn:ss',ret.Items.resCCe.dhEvento)); dm.cdsManifestoSITUNFEVALOR.AsString := SituacaoNFE('',sNFE); dm.cdsManifestoSITUNFE.AsString := sNFE; dm.cdsManifestoSITUMANIVALOR.AsString := SituacaoManifesto('',sManifesto); dm.cdsManifestoSITUMANIFESTO.AsString := sManifesto; dm.cdsManifestoCCE.AsString := 'S'; dm.cdsManifesto.Post; // Grava Consulta CC-e no banco de dados try dm.cdsCCE.Append; dm.cdsCCENSU.AsString := ret.Items.resCCe.NSU; dm.cdsCCECHAVNFE.AsString := ret.Items.resCCe.chNFe; dm.cdsCCEDATAEVENTO.AsDateTime := StrToDate(formatdatetime('dd/mm/yyyy',ret.Items.resCCe.dhEvento)); if sTiponfe = 'E' then dm.cdsCCETIPONFE.AsString := '0' else dm.cdsCCETIPONFE.AsString := '1'; dm.cdsCCEDESCRICAO.AsString := ret.Items.resCCe.descEvento; dm.cdsCCECORRECAO1.AsString := Copy(ret.Items.resCCe.xCorrecao,1,200); dm.cdsCCECORRECAO2.AsString := Copy(ret.Items.resCCe.xCorrecao,201,400); dm.cdsCCECORRECAO3.AsString := Copy(ret.Items.resCCe.xCorrecao,401,600); dm.cdsCCECORRECAO4.AsString := Copy(ret.Items.resCCe.xCorrecao,601,800); dm.cdsCCECORRECAO5.AsString := Copy(ret.Items.resCCe.xCorrecao,801,1000); dm.cdsCCEDATAAUTORIZACAO.AsDateTime := StrToDate(formatdatetime('dd/mm/yyyy',ret.Items.resCCe.dhEvento)); dm.cdsCCEHORAAUTORIZACAO.AsDateTime := StrToTime(formatdatetime('HH:NN:SS',ret.Items.resCCe.dhEvento)); dm.cdsCCE.Post; except end; end; end; end; if trim(lcultimoNSU) = '' then lcultimoNSU := '0'; end; until FrmPrincipal.ACBrNFe1.WebServices.ConsNFeDest.retConsNFeDest.indCont = icNaoPossuiMaisDocumentos; end;
×
×
  • 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.