SistemasMais
Membro Pro Verificado-
Total de ítens
62 -
Registro em
-
Última visita
Sobre SistemasMais

Últimos Visitantes
1.395 visualizações
SistemasMais's Achievements
-
to execultando essa rotina na maquina do dev e funciona quando vou fazer em outra maquina da (Access violation at address 00F842DB in module 'OmniNFSe.exe'. Read of address 00000000), pelo que vi tem haver com ele ACBrNFSeXDANFSeFR1 := TACBrNFSeXDANFSeFR.Create(Self); procedure TfrmACBrNFSe.exibirDanfe(xml_nfse,situacao:String); var chNFSe, PathNFSe : String; XMLStream : TStringStream; bEmitirNfce:Boolean; ACBrNFSeXDANFSeFR1: TACBrNFSeXDANFSeFR; begin if not Assigned(ACBrNFSeX1) then raise Exception.Create('ACBrNFSeX ainda não foi criado'); ACBrNFSeXDANFSeFR1 := TACBrNFSeXDANFSeFR.Create(Self); ACBrNFSeXDANFSeFR1.AcbrNFSE := ACBrNFSeX1; case rgDanfe.ItemIndex of 0:ACBrNFSeXDANFSeFR1.FastFile:=extractFilePath(Paramstr(0))+'\Danfe\DANFSE.fr3'; 1:ACBrNFSeXDANFSeFR1.FastFile:=extractFilePath(Paramstr(0))+'\Danfe\DANFSeBrasiliaDF.fr3'; 2:ACBrNFSeXDANFSeFR1.FastFile:=extractFilePath(Paramstr(0))+'\Danfe\DANFSeIturama.fr3'; 3:ACBrNFSeXDANFSeFR1.FastFile:=extractFilePath(Paramstr(0))+'\Danfe\DANFSeNovo.fr3'; 4:ACBrNFSeXDANFSeFR1.FastFile:=extractFilePath(Paramstr(0))+'\Danfe\DANFSEPadrao.fr3'; 5:ACBrNFSeXDANFSeFR1.FastFile:=extractFilePath(Paramstr(0))+'\Danfe\DANFSeProvedorEL_ProvedorNacional.fr3'; 6:ACBrNFSeXDANFSeFR1.FastFile:=extractFilePath(Paramstr(0))+'\Danfe\DANFSEProvedorGinfes.fr3'; 7:ACBrNFSeXDANFSeFR1.FastFile:=extractFilePath(Paramstr(0))+'\Danfe\DANFSeProvedorISSDSF.fr3'; 8:ACBrNFSeXDANFSeFR1.FastFile:=extractFilePath(Paramstr(0))+'\Danfe\DANFSeSarandi.fr3'; 9:ACBrNFSeXDANFSeFR1.FastFile:=extractFilePath(Paramstr(0))+'\Danfe\DANFSeVitoriaES_2.fr3'; end; EsperaComMsg(True,'Buscando nota'); try XMLStream := TStringStream.Create(xml_nfse); XMLStream.Position := 0; frmACBrNFSe.ACBrNFSeX1.NotasFiscais.Clear; frmACBrNFSe.ACBrNFSeX1.NotasFiscais.LoadFromStream(XMLStream); finally XMLStream.free; end; // ACBrNFSeX1.NotasFiscais.Items[0].NFSe.OutrasInformacoes := 'Outras Informações 1;Outras Informações 2'; frmACBrNFSe.ACBrNFSeX1.NotasFiscais.Imprimir; frmACBrNFSe.ACBrNFSeX1.NotasFiscais.ImprimirPDF; if frmACBrNFSe.ACBrNFSeX1.NotasFiscais.Items[0].NomeArqRps <> '' then frmACBrNFSe.memoLog.Lines.Add('Arquivo Carregado de: ' + frmACBrNFSe.ACBrNFSeX1.NotasFiscais.Items[0].NomeArqRps) else frmACBrNFSe.memoLog.Lines.Add('Arquivo Carregado de: ' + frmACBrNFSe.ACBrNFSeX1.NotasFiscais.Items[0].NomeArq); frmACBrNFSe.memoLog.Lines.Add('Chave do DPS.........: ' + frmACBrNFSe.ACBrNFSeX1.NotasFiscais.Items[0].NFSe.InfID.ID); frmACBrNFSe.memoLog.Lines.Add('Nota Numero..........: ' + frmACBrNFSe.ACBrNFSeX1.NotasFiscais.Items[0].NFSe.Numero); frmACBrNFSe.memoLog.Lines.Add('Código de Verificação: ' + frmACBrNFSe.ACBrNFSeX1.NotasFiscais.Items[0].NFSe.CodigoVerificacao); frmACBrNFSe.memoLog.Lines.Add('Data de Emissão......: ' + DateToStr(frmACBrNFSe.ACBrNFSeX1.NotasFiscais.Items[0].NFSe.DataEmissao)); frmACBrNFSe.memoLog.Lines.Add('Prestador............: ' + frmACBrNFSe.ACBrNFSeX1.NotasFiscais.Items[0].NFSe.Prestador.RazaoSocial); frmACBrNFSe.memoLog.Lines.Add('Tomador..............: ' + frmACBrNFSe.ACBrNFSeX1.NotasFiscais.Items[0].NFSe.Tomador.RazaoSocial); if frmACBrNFSe.ACBrNFSeX1.NotasFiscais.Items[0].NFSe.SituacaoNfse = ACBrNFSeXConversao.snCancelado then begin frmACBrNFSe.memoLog.Lines.Add('A Nota encontra-se Cancelada.'); if situacao<>'Cancelado' then end; frmACBrNFSe.pgRespostas.ActivePageIndex := 0; EsperaComMsg(False,'fim. Buscando nota'); ACBrNFSeXDANFSeFR1.Free; end;
-
fiz o teste e recebi isso - na consulta de status CONEXÃO FALHOU! SISTEMA FICARÁ EM MODO DE CONTINGÊNCIA - ERRO INTERNO: 0 ERRO HTTP: 404 URL: HTTPS://HOMNFCE.SEFAZ.AM.GOV.BR/NFCE-SERVICES/SERVICES/NFESTATUSSERVICO4 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 DRAFT//EN"> <HTML> <HEAD> <TITLE>ERROR 404--NOT FOUND</TITLE> </HEAD> <BODY BGCOLOR="WHITE"> <FONT FACE=HELVETICA><BR CLEAR=ALL> <TABLE BORDER=0 CELLSPACING=5><TR><TD><BR CLEAR=ALL> <FONT FACE="HELVETICA" COLOR="BLACK" SIZE="3"><H2>ERROR 404--NOT FOUND</H2> </FONT></TD></TR> </TABLE> <TABLE BORDER=0 WIDTH=100% CELLPADDING=10><TR><TD VALIGN=TOP WIDTH=100% BGCOLOR=WHITE><FONT FACE="COURIER NEW"><FONT FACE="HELVETICA" SIZE="3"><H3>FROM RFC 2068 <I>HYPERTEXT TRANSFER PROTOCOL -- HTTP/1.1</I>:</H3> </FONT><FONT FACE="HELVETICA" SIZE="3"><H4>10.4.5 404 NOT FOUND</H4> </FONT><P><FONT FACE="COURIER NEW">THE SERVER HAS NOT FOUND ANYTHING MATCHING THE REQUEST-URI. NO INDICATION IS GIVEN OF WHETHER THE CONDITION IS TEMPORARY OR PERMANENT.</P><P>IF THE SERVER DOES NOT WISH TO MAKE THIS INFORMATION AVAILABLE TO THE CLIENT, THE STATUS CODE 403 (FORBIDDEN) CAN BE USED INSTEAD. THE 410 (GONE) STATUS CODE SHOULD BE USED IF THE SERVER KNOWS, THROUGH SOME INTERNALLY CONFIGURABLE MECHANISM, THAT AN OLD RESOURCE IS PERMANENTLY UNAVAILABLE AND HAS NO FORWARDING ADDRESS.</FONT></P> </FONT></TD></TR> </TABLE> </BODY> </HTML> Hambiente homologação
-
Olá, estamos passando pela mesma dificuldade com NFC-e, já envie e-mail para sefaz-am perguntando se o servidor de produção estava passando algum tipo de instabilidade, mas segundo eles está tudo normal. Quando testamos em homologação funciona normalmente, mas basta colocar em produção e apenas consultar o status de uma nota que o sistema já retorna timeOut.
-
Nós também estamos com essa mesma dificuldade em nossos módulos fiscais. Mesmo configurando o ACBr com os parâmetros abaixo o sistema retorna modo: Assincrono ou Sincrono SSLLib=Wincrypt, CryptLib=WinCrypt, HTTPLib=Winhttp, XMLSign=MsXML, Timeout=30000 e Tantivas=4 Mesmo assim continuamos tendo problemas com a maioria dos nossos clientes.
-
Preciso salvar o texto da impressão da DANFE para ser enviada na tag ImpressãoFiscal da RespostaFiscal do MFe existe uma maneira de fazer isso? estou usando ESCPOS do AcbrMonitor, mas ele não retorna nenhum texto.
-
NFCe 4.0 AM Erro Interno: 0 Erro HTTP: 500
SistemasMais replied to SistemasMais 's tópico in ACBrNFe
Já havia visto este tópico e não resolveu. Hoje voltou a funcionar normalmente. : ) Obrigada. -
NFCe 4.0 AM Erro Interno: 0 Erro HTTP: 500
SistemasMais replied to SistemasMais 's tópico in ACBrNFe
uso certificado próprio e sou do amazonas -
Comecei a testar a versão 4.0 do nfce e está retornando este erro. Erro Interno: 0 Erro HTTP: 500
-
List Index Out Of Bounds (-1)
SistemasMais replied to Germano dos Santos Solter's tópico in Dúvidas Gerais sobre o ACBr
Olá pessoal, estou com o mesmo problema citado no tópico. No meu caso já reinstalei várias vezes o Delphi 7, gostaria que alguém apontasse a forma correta de instalar o Delphi! -
Configurações de SSL e TLS
SistemasMais replied to SistemasMais 's tópico in NFC-e - Nota Fiscal do Consumidor Eletrônica
Como faço pra usar com OpenSSL André?...
