That's a pretty slick trick, Karen! Dennis McGrath
From: [email protected] [mailto:[email protected]] On Behalf Of Karen Tellef Sent: Tuesday, December 09, 2014 1:42 PM To: RBASE-L Mailing List Subject: [RBASE-L] - Re: printer name Once again, I'd use a manual PRNSETUP, select the tray you want. Then do a set var vtext = (CVAL('PRN_Source')) Make sure it matches what you have Karen -----Original Message----- From: Jim Belisle <[email protected]<mailto:[email protected]>> To: RBASE-L Mailing List <[email protected]<mailto:[email protected]>> Sent: Tue, Dec 9, 2014 12:43 pm Subject: [RBASE-L] - Re: printer name Has anyone ever encountered the following. I have a simple code for printing specific reports from the bypass tray. Below is one of the codes I use. OPTION PRINTER + |TRAY BYPASS TRAY + |COLLATION OFF + |COPIES 1 + |PRINTER_NAME \\K-FS1\KONICA<file:///\\K-FS1\KONICA> MINOLTA C364SeriesPCL Prior to having our server restarted over the weekend, the reports were printing as expected, drawing the paper from the bypass tray. However ever since the server restart, the report prints from the proper printer but will not take from the bypass tray. I did not touch the code. One other piece of information that may or may not make a difference. The new printer was installed recently but the reports were working properly after installation. The change occurred over the weekend. James Belisle Making Information Systems People Friendly Since 1990 [cid:[email protected]<mailto:[email protected]>] From: [email protected]<mailto:[email protected]> [mailto:[email protected]<mailto:[email protected]?>] On Behalf Of Albert Berry Sent: Tuesday, December 09, 2014 11:35 AM To: RBASE-L Mailing List Subject: [RBASE-L] - Re: printer name 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]<mailto:[email protected]>><mailto:[email protected]<mailto:[email protected]?>> To: RBASE-L Mailing List <[email protected]<mailto:[email protected]>><mailto:[email protected]<mailto:[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<file:///\\K-FS1\KONICA<file:///\\K-FS1\KONICA%3cfile:\K-FS1\KONICA>> MINOLTA C364seriesPCL James Belisle Making Information Systems People Friendly Since 1990 [cid:[email protected]<mailto:[email protected]><mailto:[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
