- Code: Select all Expand view
Falhou Em: PRINTER.prg => PRINTEND( 1254 )
Masters,
¿Cómo evitar este error?
Gracias, saludos
Falhou Em: PRINTER.prg => PRINTEND( 1254 )
IF FWVERSION = "FWHX 16.08" .OR. FWVERSION = "FWHX 16.10" // EM PRV2PDF.PRG
// By Gilmer via Skype.
PrintEnd() // GERACAO DO PDF EM PRINTER.PRG VERSAO: FWH16.08
ENDIF
// PARA NAO QUEBRAR O METAFILE NA IMPRESSAO DO DANFE. FWHX13.06
IF ::oPrn:lMeta // CORRECAO NA CLASSE DO GILMER EM: 11/03/2016 Joao
::oPrn:Preview()
ELSE
::oPrn:End()
ENDIF
::End()
Caminho e Nome: C:\INST_NFE\GERAPNFE.EXE (32 bits)
Tamanho: 2,964,992 bytes
Pasta do Pleno: P:
Espaco Livre no HD do Servidor: 146.566.303.744 Bytes Livres
Versao do Compilador: xHarbour 1.2.3 Intl. (SimpLex) (Build 20150603)
Versao do FiveWin...: FWHX 16.08 (c) FiveTech Software, 1993-2016
NF-e, Versão: 3.83g
Memoria Disponivel: 3,74 GB Free -> Em Windows de 64 Bits, Minimo: 8 Gbs de RAM.
Empresa: DEFAL COM ATAC BEBIDAS ALIMENTOS LTDA
Nome da Rede......: WINDOWS-PC
Versao do Windows...: 6.1, Build 7601 Service Pack 1 - 7 64 Bits
Tempo de Execucao: 0 hours 0 mins 44 secs
Erro ocorrido em: 06/12/2016, 13:49:10
ENVIE O ERROR.LOG PARA O SUPORTE POR EMAIL POR FAVOR. Desligue o Preview
Para: contato@pleno.com.br ou joao@pleno.com.br
Click no Botao <Enviar Email> na Tela de Erro a Seguir,
Para Enviar o Erro. Ou Copie e Cole no Corpo do Seu Email,
ou Envie Pelo Skype: joao@pleno.com.br - Veja o Erro Abaixo:
Na Tela de Erro do Programa, Informe um Email Para Resposta do Suporte.
Feche Este Preview(Tela) Para Ver a Tela de Erro do Programa e Enviar o Email.
DESCRICAO DO ERRO: Error BASE/1004 Class: 'NIL' has no exported method: LMETA
function PrintEnd()
if oPrinter == nil // nuevo
return nil // nuevo
endif // nuevo
if oPrinter:lMeta
...
function PrintEnd()
// viewtopic.php?f=6&t=33290
// by Antonio Linares
// Para nao quebrar o Preview quando RAM = 4 Gbs. em windows de 64 bits.
// Modificado em: 07/12/2016 - Joao
if oPrinter == nil // nuevo
return nil // nuevo
endif // nuevo
if oPrinter:lMeta
if Empty( oPrinter:cFile )
oPrinter:Preview()
elseif "pdf" $ Lower( oPrinter:cFile )
FWSavePreviewToPDF( oPrinter, If( Lower( cFileExt( oPrinter:cFile ) ) == "pdf", ;
oPrinter:cFile, nil ), oPrinter:lPreview )
oPrinter:End()
elseif "emf" $ Lower( oPrinter:cFile )
CopyFile( oPrinter:aMeta[ 1 ], oPrinter:cFile, 0 )
If oPrinter:lPreview
oPrinter:Preview()
else
oPrinter:End()
endif
endif
else
oPrinter:End()
endif
oPrinter := nil
return nil
Return to FiveWin para Harbour/xHarbour
Users browsing this forum: EASYSOFT and 30 guests