Works for me this way, too. In one system I wrote, I created a DB Lookup Combo Box in the Company Information table and store the current computer in the equivalent to R:Azzak's FormTable. The "On Before Start" form EEP reads like this. The database uses double quotes. In this case, a duplex capable printer must be used for invoices and packing slips to print a disclaimer on the reverse. A series of PRNSETUP are used in the report "On Before Generate" to set the printer to duplex, print the report, and in the "On After Generate" to return the printer back to simplex

-- Create a temporary table with all the available printers in it
  SET VAR vAvailablePrinters TEXT = NULL
  SET VAR vAvailablePrinters = (CVAL("Printers"))
  SET VAR vPrinterCount INTEGER = (ITEMCNT(.vAvailablePrinters))
  SET ERROR MESSAGE 2038 OFF
  DROP TABLE `tmpPrinterList`
  SET ERROR MESSAGE 2038 ON
  CREATE TEMP TAB `tmpPrinterList` (`PrinterName` TEXT (50))
  SET VAR vPrinterName TEXT = NULL
  WHILE vPrinterCount > 0 THEN
    SET VAR vPrinterName TEXT = (SSUB(.vAvailablePrinters,.vPrinterCount))
    INSERT INTO tmpPrinterList (PrinterName) +
      VALUES (.vPrinterName)
    SET VAR vPrinterCount = (.vPrinterCount - 1)
  ENDWHILE -- (vPrinterCount)
  -- SET VAR vDefaultPrinter = (CVAL("WindowsPrinter"))
  CLEAR VAR vAvailablePrinetrs,vPrinterName
RETURN

Albert

On 12/8/2014 1:19 PM, Karen Tellef wrote:
I've always used the latter, refering the print server name and whatever would show up if you select it in PRNSETUP. Usually what I do is put up a PRNSETUP, choose my printer, then do a CVAL('currentprinter') and that's what I put in my code

Karen


-----Original Message-----
From: Jim Belisle <[email protected]>
To: RBASE-L Mailing List <[email protected]>
Sent: Mon, Dec 8, 2014 2:15 pm
Subject: [RBASE-L] - printer name


When adding a specific printer to the print code, do we use the printer name or
the printer address?
Illustration:
Printer name
KONICA MINOLTA C364seriesPCL on K-FS1
Printer address
\\K-FS1\KONICA MINOLTA C364seriesPCL

James Belisle

Making Information Systems People Friendly Since 1990
[cid:[email protected]  <mailto:[email protected]>]


--
A democracy ..." can only exist until the majority discovers it can vote itself 
largess out of the public treasury."
Attributed to Alexander Fraser Tytler 1747-1813

Reply via email to