phares3757/open-insight
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

pre cutover push

Browse Source
This commit is contained in:
Infineon\StieberD
2024-09-04 20:33:41 -07:00
parent 6ea6969f4b
commit 7762b129af
2072 changed files with 130000 additions and 95295 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
LSL2/STPROC/PRINTER_SELECT.txt
View File

@ -14,14 +14,13 @@ $INSERT PRINTSETUP_EQUATES
2/4/2000 by jch * * * *
*/
*IF @UserName = 'DAN_CR' then debug
IF NOT(ASSIGNED(PrinterID)) THEN PrinterID = ''
IF NOT(ASSIGNED(RetDefault)) THEN RetDefault = ''
Printers = ''
Default = ''
PrintCount = PrintSetup(PRN_GET$,'',Printers,Default) ;* OI routine returns printer names, driver, port information
DefPrinter = Default[1,',']
DefPort = FIELD(Default,',',3)
DefLine = DefPrinter:' on ':DefPort