mgsoft

Posts: 422

Joined: Mon Aug 17, 2009 12:18 PM

ERROR WITH REPORT when no Printers are instaled
Posted: Tue Jun 08, 2010 06:19 PM

Hi,

This is the error:

Descripcion del Error: Error BASE/1005 No existe la variable de instancia: NTITLEUPLINE
Args:
[ 1] = U
[ 2] = N 1

Stack Calls

Called from: => _NTITLEUPLINE(0)
Called from: c:\misoft\PROGRAMAS\Tpv\ARTICULO.PRG => LISTARARTICULOS(1241)

Thanks

Saludos,

Eduardo

James Bott

Posts: 4840

Joined: Fri Nov 18, 2005 04:52 PM

Re: ERROR WITH REPORT when no Printers are instaled
Posted: Sat Jun 12, 2010 03:50 PM

I had the code below in my notes. Perhaps it will help.

James

Code (fw): Select all Collapse

// The next few lines automate protection from a GPF if printer not available... 
// Author: Roger Seiler
// Date: 11/07/08


hDC  := GetPrintDefault( GetActiveWindow() ) 
SysRefresh() 

IF hDC = 0 // Handle rare case where computer has no printer. 
   cParam := "X"   // (Previously, this param had to be manually entered when 
ENDIF              // launching the app.) 

IF EMPTY(cParam) .OR. cParam # "X" 
                  // The following may cause a crash if the workstation's 
                  // default network printer is unavailable... 
   cOldPrinter := PrnGetName() 
ELSE // cParam = "X"... 
   MsgInfo("To correct a problem with default printer, on the "+CRLF+; 
           "next dialog box, select the printer you want to use.","Fix printer selection...") 
   PrinterSetup() 
   SysRefresh() 
   cOldPrinter := PrnGetName() 
ENDIF

FWH 18.05/xHarbour 1.2.3/BCC7/Windows 10

FiveTech Support Forums

Stack Calls

Continue the discussion