(FILECREATED "25-Apr-86 12:45:16" ("compiled on " {ERIS}SOURCES>PUPPRINT.;2) "11-Apr-86 21:56:10" recompiled exprs: \STOREPLIST PUP.PRINTER.STATUS PUP.PRINTER.PROPERTIES in "Xerox Lisp 11-Apr-86 ..." dated "11-Apr-86 23:54:48") (FILECREATED "25-Apr-86 12:44:52" {ERIS}SOURCES>PUPPRINT.;2 23375 changes to: (VARS PUPPRINTCOMS) (FNS \STOREPLIST PUP.PRINTER.STATUS PUP.PRINTER.PROPERTIES) previous date: "28-Mar-85 18:56:47" {ERIS}SOURCES>PUPPRINT.;1) EFTPA0001 D1 (NAME ERRORSET P 34Q IPUP P 33Q CAPABILITIES P 32Q CLOSER P 31Q ABORTER P 30Q PRESSDATAPAGE# P 27Q THISPAGELENGTH P 26Q LENGTH P 25Q LASTPAGELENGTH P 24Q LASTPAGE# P 23Q SOC P 22Q ID P 21Q CURPAGE# P 20Q NEWSTATUS P 17Q STATUS P 16Q HOSTNAME P 15Q NC P 14Q USERNAMESTRING P 13Q ENDING P 12Q RESULT P 11Q DATA P 10Q STREAM P 7 CRDATE P 6 DOCNAME P 5 #COPIES P 4 #SIDES P 3 OPUP P 2 CHECKSTATUS P 1 TIMEOUT P 0 HOSTPORT F 41Q PRINTOPTIONS F 42Q RESETVARSLST F 43Q HOST F 44Q FILE F 45Q RESETY) `!WFg `WB WHd`g _gOh_4hhWDcDOg _,n_*O,_(WBO*joWH O(k_0WBdg'WBg'^GWBg']MjkWBg'_dOo _hdi _ _l"Okl 4 l3Nkl3 N lOhi _ OoO _g_&hhhWDcDKHllmO&i gO&Kh_2hhWDcDO"`o` j_$O"j/O j"O Oj O4O g _j_"KlL3 O6oH _ BOlVhH _6Ujd` o` WF` o` h_Ojd` O _` ` gO6 lTSLkgO6 lT?Kl(_nOnKgLkgghhOl lm_"WFi oi i O"O(O*ji_&KO*_.lO(O"Kn_.li_OKlKlfK O$_OKl(__<6_:Ok_@O>J9H _ d/O)jd` O _` Odldk`YhO&KhdI _8WBO$jiO@k԰dl5O8 O8 O$O$k_$O"k_"OKO$ O&K UlC`o` O8(O8 dlgO8l 6dl` 1l+O8 hOO2gOOcJijd` o` WF` o` (2133Q PRIN1 2120Q PRIN1 2107Q PRIN1 2074Q TAB 2024Q RELEASE.PUP 2006Q DISMISS 1767Q GETPUPSTRING 1746Q RELEASE.PUP 1734Q PRIN1 1706Q SENDPUP 1640Q RELEASE.PUP 1571Q EXCHANGEPUPS 1532Q PRIN1 1516Q TAB 1474Q PUP.PRINTER.STATUS 1436Q SetBcplString 1420Q SetBcplString 1405Q SetBcplString 1165Q TERPRI 1160Q PRIN1 1147Q PRIN1 1124Q \STOREPLIST 1037Q CHCON1 1013Q CHCON1 775Q BLOCK 764Q PRIN1 750Q TAB 724Q PRIN1 711Q PRIN1 700Q PRIN1 665Q TAB 651Q PUP.PRINTER.PROPERTIES 627Q PUP.PRINTER.STATUS 571Q OPENSTREAM 563Q CLOSEF 551Q SETFILEPTR 542Q RANDACCESSP 531Q GETFILEPTR 511Q PRIN1 441Q SETUPPUP 403Q OPENPUPSOCKET 372Q CONCAT 354Q NCHARS 347Q ETHERHOSTNAME 333Q MKSTRING 326Q SUBSTRING 313Q NCHARS 306Q SUBSTRING 267Q NCHARS 262Q USERNAME 251Q GDATE 147Q HELP 103Q GETFILEINFO 44Q OPENSTREAM 17Q ALLOCATE.PUP 7 BESTPUPADDRESS) (2130Q PROMPTWINDOW 2115Q PROMPTWINDOW 2104Q PROMPTWINDOW 2071Q PROMPTWINDOW 2050Q STREAM 2041Q * 2003Q \EFTP.LONGTIMEOUT 1760Q REJECT 1731Q PUPTRACEFILE 1721Q PUPTRACEFLG 1553Q \EFTP.LONGTIMEOUT 1527Q PROMPTWINDOW 1513Q PROMPTWINDOW 1450Q \MAXETHERTRIES 1325Q FDEV 1320Q STREAM 1107Q TRUE 1103Q FALSE 1074Q DUPLEX 1027Q DUPLEX 1003Q PRINT-INSTANCE 772Q \EFTP.TIMEOUT 761Q PROMPTWINDOW 745Q PROMPTWINDOW 721Q PROMPTWINDOW 706Q PROMPTWINDOW 675Q PROMPTWINDOW 662Q PROMPTWINDOW 566Q INPUT 506Q PUPTRACEFILE 476Q PUPTRACEFLG 445Q \ABORT.EFTP 400Q CLOSEPUPSOCKET 230Q DOCUMENT.CREATION.DATE 210Q #COPIES 177Q DOCUMENT.NAME 170Q #SIDES 100Q LENGTH 52Q CLOSEF 41Q INPUT 34Q STREAMTYPE# 12Q \EFTP.TIMEOUT 4 ERROR) ( 2125Q "]" 2101Q "[No response from " 1726Q "[abort]" 1154Q " does not support #sides specification" 716Q "]" 672Q "[No response from " 503Q " (restarting)" 365Q " on " 246Q (DATEFORMAT TIME.ZONE) 142Q "Press file with non-integral number of pages?") EFTP D1 (P 2 RESETZ P 1 RESETY P 0 LISPXHIST I 2 PRINTOPTIONS I 1 FILE I 0 HOST F 3 LISPXHIST F 4 RESETVARSLST) "S!Tog hgZ JI(35Q ERROR! 30Q RESETRESTORE 16Q EFTPA0001) (24Q ERROR 13Q INTERNAL) ( 10Q (EFTPA0001)) \ABORT.EFTP D1 (I 1 PUP I 0 SOC) AlAlAk(@A (23Q SENDPUP) NIL () \STOREPLIST D1 (P 6 CH P 3 PAIR P 2 X P 1 PRE P 0 CNT I 2 LIMIT I 1 BASE I 0 LST) j1Ajl(@~dl(KhdAHkXIǿl jJB Mdl#M_Mk\M_MCjh!ilCM__M jh_Lk\O'AHkXl)ǿAHkXl)HkM ]OOLOL^l(Nl)Ndl'AHkXl'ǿNlAHkXNǰoJ (333Q ERROR 232Q MKSTRING) NIL ( 327Q "Attempt to store fat string in thin plist") PUP.PRINTER.STATUS D1 (P 4 IPUP P 3 RESULT P 2 OPUP P 1 SOC P 0 HOSTPORT I 0 PRINTER) @` CHhJHllhI `k^MJIJhi \9dlL(Ll L 9l`L` L "L Nk԰`o` ` J K(214Q RELEASE.PUP 207Q TERPRI 200Q PRIN1 153Q RELEASE.PUP 145Q RELEASE.PUP 140Q PRINTERRORPUP 116Q RELEASE.PUP 110Q GETPUPSTRING 60Q EXCHANGEPUPS 37Q SETUPPUP 14Q ALLOCATE.PUP 11Q \GETMISCSOCKET 6 BESTPUPADDRESS) (204Q PUPTRACEFILE 175Q PUPTRACEFILE 164Q PUPTRACEFLG 135Q PUPTRACEFILE 130Q PUPTRACEFLG 42Q \MAXETHERTRIES 3 PROMPTWINDOW) ( 172Q "Printer status request timed out") PUP.PRINTER.PROPERTIES D1 (P 4 IPUP P 3 RESULT P 2 OPUP P 1 SOC P 0 HOSTPORT I 0 PRINTER) @` CHhJHllhI `k^M7IJhi \Nk԰dlL [+l`"L` `o` ` LL K(173Q RELEASE.PUP 164Q TERPRI 155Q PRIN1 134Q PRINTERRORPUP 110Q READPLIST 105Q GETPUPSTREAM 60Q EXCHANGEPUPS 37Q SETUPPUP 14Q ALLOCATE.PUP 11Q \GETMISCSOCKET 6 BESTPUPADDRESS) (161Q PUPTRACEFILE 152Q PUPTRACEFILE 141Q PUPTRACEFLG 131Q PUPTRACEFILE 123Q PUPTRACEFLG 42Q \MAXETHERTRIES 3 PROMPTWINDOW) ( 147Q "Printer capability request timed out") (PRETTYCOMPRINT PUPPRINTCOMS) (RPAQQ PUPPRINTCOMS ((FNS EFTP \ABORT.EFTP \STOREPLIST PUP.PRINTER.STATUS PUP.PRINTER.PROPERTIES) ( DECLARE: DONTCOPY (CONSTANTS * EFTPPUPTYPES) (CONSTANTS * EFTPCONSTANTS) (ADDVARS * (LIST (CONS (QUOTE PUPTYPES) EFTPPUPTYPES))) (GLOBALVARS \EFTP.TIMEOUT \EFTP.LONGTIMEOUT)) (INITVARS (\EFTP.TIMEOUT 5000 ) (\EFTP.LONGTIMEOUT 15000)))) (RPAQ? \EFTP.TIMEOUT 5000) (RPAQ? \EFTP.LONGTIMEOUT 15000) (PUTPROPS PUPPRINT COPYRIGHT ("Xerox Corporation" 1985 1986)) NIL