Qual Schema Utilizar (Nfe)?

[wanderok]

Bom dia!

se estiver ganhando tela azul com certeza absoluta a instalação do componente ou o ACBrInstall é que não causam isso!

possui o desktop de casa, meu notebook mais o micro da empresa utilizando o ACBrInstall!

 

possui junto o delphi 7, xe3, xe6 e xe7 e não tenho nenhum problema com o instalador

acredito que esteja fazendo algo errado!

limpou mesmo seu micro dos arquivos do ACBr? viu que tem um .bat dentro do svn para efetuar a limpeza?

lembre-se de limpar em todos os locais!

Oi Juliomar, com certeza não é o ACBrInstall que está causando a tela azul do windows, até porque jamais causou isto.

Mas com certeza é quando eu o estou usando que a tela do windows aparece rsssss

Sim, vi o bat e o usei. Limpou até a instalação do Delphi6 que estava funcionando perfeitamente (uso PAF/ECF no D6).

Isto eu já sabia que ia desisntalar do D6 tb rsss

Mas mesmo fazendo todos os procedimentos aos quais estou acostumado a anos, desta vez não está indo.

Há algo novo?

 

Uso PAF/ECF no D6.

Uso NFe no D7.

 

Estou tentando migrar de NFe2.00 para NFe3.00 e nada....

Editado 29 Outubro, 2014 por wanderok

[wanderok]

Nova tentativa de instalação do ACBr.

 

1) Executei o arquivo apagarAcbr.bat

Não sobrou nenhum vestígio do ACBr em minha máquina que só possui um HD (C:), não particionado, não está em rede e não possui nada nas unidades de cd/dvd/usb. Portanto não existe outra unidade de disco além da C: em que pudesse haver arquivos dcu, bpl, dcp do ACBr.

 

cd\

del ACBr*.bpl /s

del ACBr*.dcp /s

del ACBr*.dcu /s

del PCN*.bpl  /s

del PCN*.dcp  /s

del PCN*.dcu  /s

del SYNA*.bpl /s

del SYNA*.dcp /s

del SYNA*.dcu /s

 

 

2) Atualizei o ACBr via svn 

Atualizou para a versão 7719

 

3) Executei o ACBrInstall.exe

Para Delphi7.

 

Caminho: C:\ACBR_NFE300D7

Versão do delphi: Delphi 7 (2)

Plataforma: Win32(0)

================================================================================

Setando parâmetros de plataforma...

Setando parâmetros de plataforma...

Criando diretórios de bibliotecas...

Adicionando libray paths...

 

Quando ganhei tela azul do windows... PAGE_FAULT_IN_NONPAGED_AREA

 

Só instalou ACBrComu.bpl e ACBrDiversos.bpl.

 

Se quiserem tenho o log aqui.

 

Minha máquina possui processador Intel Core2Duo T6600 2.20Ghz 4GbRam Windows XP Professional 2002 Service Pack 3 hd 1 Tera com 70% livre.

 

4) Removi os pacotes instalados pelo ACBrInstall.exe

5) Fechei td no D7

6) Abri synapse.dpk, compilei - ok

7) Abri ACBrComum.dpk, , compilei e instalei - ok

8) Abri ACBrDiversos.dpk, compilei e instalei - ok

9) Abri ACBrCapicom.dpk, compilei - ok

10) Abri PCN2.dpk, compilei - ok

11) Abri ACBr_NFe2.dpk, compilei e deu erro : ACBrOpenSSL requerido!

12) Abri ACBrOpenSSL.dpk, compilei e instalei - ok

13) Abri ACBr_NFe2.dpk, compilei e instalei - ok

14) Abri ACBrNFeDanfeRV.dpk, compilei e deu erro: 

 

unit ACBrNFeDANFERave;

procedure TACBrNFeDANFERave.ImprimirDANFE(NFE : TNFe = nil);

 

  dmDanfe.RvSystem1.SystemPrinter.LinesPerInch:=8;

  dmDanfe.RvSystem1.SystemPrinter.StatusFormat:='Imprimindo página %p';

  dmDanfe.RvSystem1.SystemPrinter.Title:= 'NFe - Impressão do DANFE';

  dmDanfe.RvSystem1.SystemPrinter.Units:=unMM;

 

<<<<<<< .mine                                                (Wander: LINHA 922)

//  {$IFNDEF RAVE50VCL} //JuaumKiko-Teste

//    dmDanfe.RvSystem1.SystemPrinter.Collate:=true;

//  {$ENDIF}

=======

 

15) tem esta linha <<<<<<< .mine

no código....

 

E agora?

 

Isto aparece em 2 lugares do código.

 

 

16) Exclui as linhas estranhas do código

17) Compilei - instalei sem problemas.

18) Fechei tudo sem gravar

19) Abri minha aplicação

20) Compilei

21) Ganhei erro : [Fatal Error] Required Packege 'Rave100VCL' not found

 

E agora?

 

22) Exclui os arquivos da pasta C:\ACBR_NFE300D7\Fontes\ACBrNFe2\:

ACBrNFeDANFERave.pas

ACBrNFeDANFERave.dcu

 

23) Atualizei novamente pelo SVN

24) Eliminei ACBrNFeDanfeRV.bpl da IDE do D7

25) Abri C:\ACBR_NFE300D7\Pacotes\Delphi\ACBrNFe2ACBrNFeDanfeRV.dpk

26) Compilei, instalei - ok

27) Abri meu aplicativo

28) Compilei

29) Travou tudo rssss

30) Deixei processando... 5 minutos...

31) Meu aplicativo abriu normalmente

32) Gerei uma nota fiscal

33) Transmiti para o governo

34) Deu mensagem de erro VAZIA EM BRANCO ( '' ) em 

 

unit ACBrNFeWebServices;

function TWebServices.Envia(ALote: String; const ASincrono: Boolean): Boolean;

  self.Enviar.FLote := ALote;

  self.Enviar.FSincrono := ASincrono;

 

  if not(Self.Enviar.Executar) then

     begin

       if Assigned(TACBrNFe( FACBrNFe ).OnGerarLog) then

          TACBrNFe( FACBrNFe ).OnGerarLog(Self.Enviar.Msg);

       raise EACBrNFeException.Create(Self.Enviar.Msg);

     end;

 

35) Gerou XML sem autorização de uso

 

36) Alterei   self.Enviar.FSincrono := ASincrono

para   self.Enviar.FSincrono := False;

Compilei, executei, gerei nota, transmiti- não autorizada sem msg de erro do mesmo jeito.

 

37) Alterei   self.Enviar.FSincrono := False

para   self.Enviar.FSincrono := True;

Compilei, executei, gerei nota, transmiti- não autorizada sem msg de erro do mesmo jeito.

 

 

Editado 29 Outubro, 2014 por wanderok

[wanderok]

Bom dia

senão me engano o problema citado por você já foi discutido em outro tópico! então o bom é usar a pesquisa que existe no canto superior direito e fazer !

 

verificou se o webservice que está enviando a nota funciona no modo assíncrono!

Boa tarde

 

Alterei  self.Enviar.FSincrono := ASincrono;

 

para self.Enviar.FSincrono := False;  --> deu o mesmo erro. Mensagem da sefaz vazia e nota não autorizada.

 

Alterei para self.Enviar.FSincrono := True;  --> deu o mesmo erro. Mensagem da sefaz vazia e nota não autorizada.

 

 

É só aqui que devo mudar ?

[wanderok]

Tem razão. Há um tópico específico. Me desculpe.