:WSCST DEVCLASS=TRANSFORM.

:TRNSFRMTBL.
:PRTDTASTRM
DATASTREAM=HPPCL5.
:NOPRTBDR
OPTION=TOP
ORIENT=PORTRAIT
DATA = 240.
:NOPRTBDR
OPTION=LEFT
ORIENT=PORTRAIT
DATA = 360.
:NOPRTBDR
OPTION=RIGHT
ORIENT=PORTRAIT
DATA = 360.
:NOPRTBDR
OPTION=BOTTOM
ORIENT=PORTRAIT
DATA = 240.
/*------------------------------------------------------------*/
/* You may want to increase the top margin if you are hole */
/* punching to 1040. Default is 240 */
/*------------------------------------------------------------*/
:NOPRTBDR
OPTION=TOP
ORIENT=LANDSCAPE
DATA = 240.
:NOPRTBDR
OPTION=LEFT
ORIENT=LANDSCAPE
DATA = 288.
:NOPRTBDR
OPTION=RIGHT
ORIENT=LANDSCAPE
DATA = 288.
:NOPRTBDR
OPTION=BOTTOM
ORIENT=LANDSCAPE
DATA = 240.
/*-------------START OF INITIALIZATION CODE-------------------*/
/* Data between the star-slash combo is comment data. */
/* I have separated each block of commands with a ''X which */
/* is blank test. [CR][LF] indicates a carriage return-line */
/* feed combination. To remove commands we don't need, delete */
/* the code for the block that corresponds to the command. */
/* Command blocks and what they do: */
/* 1: [ESC]%-12345X */
/* Command to set up and UEL (Universal Escape Language that */
/* begins and ends every PJL job. Note lack of CRLF. */
/* DO NOT REMOVE */
/* */
:INITPRT
DATA ='1B252D313233343558'X
/* */
/* 2: @PJL JOB NAME="AS400 Print Job" [CR][LF] */
/* Sets job name to AS400 Print Job. DO NOT REMOVE */
/* */
'40504A4C204A4F42204E414D453D224153343030205072696E74204A6F6222'X
'0D0A'X
/* */
/* 3: @PJL COMMENT DSSC PRINT COLLATE=1 [CR][LF] */
/* Turns on collation, required for hole punch and staple */
/* Should be no problem to leave it on all of the time. */
/* */
'40504A4C20434F4D4D454E542044535343205052494E5420434F4C4C415445'X
'3D310D0A'X
/* */
/* 4: @PJL COMMENT DSSC PRINT RENDERMODE=GRAYSCALE [CR][LF] */
/* Forces Grayscale printing. Required if dept codes are set */
/* to color only, also makes jobs print faster by not */
/* requiring autodetection. DO NOT REMOVE unless explicitly */
/* sending color codes */
/* */
'40504A4C20434F4D4D454E542044535343205052494E542052454E4445524D'X
'4F44453D475241595343414C450D0A'X
/* */
/* 5a: @PJL COMMENT DSSC PRINT STAPLING=1 [CR][LF] */
/* Enables corner stapling. Remove this block if you don't */
/* Want the jobs to staple. Choose only one of these stapling */
/* methods. This staple setting is for portrait jobs */
/* */
/*'40504A4C20434F4D4D454E542044535343205052494E5420535441504C494E'X*/
/*'473D310D0A'X*/
/* */
/* 5b: @PJL COMMENT DSSC PRINT STAPLING=33027 [CR][LF] */
/* Enables corner stapling. Remove this block if you don't */
/* Want the jobs to staple. This setting is for Landscape */
/* jobs. */
/* */
/*'40504A4C20434F4D4D454E542044535343205052494E5420535441504C494E'X*/
/*'473D33333032370D0A'X*/
/* */
/* 5c: @PJL COMMENT DSSC PRINT STAPLING=33280 [CR][LF] */
/* Enables double stapling. Remove this block if you don't */
/* Want the jobs to staple. THis setting is for Landscape */
/* jobs and staples on the side and requires Letter-R paper. */
/* */
/*'40504A4C20434F4D4D454E542044535343205052494E5420535441504C494E'X*/
/*'473D33333238300D0A'X*/
/* */
/* 5d: @PJL COMMENT DSSC PRINT STAPLING=2 [CR][LF] */
/* Enables double stapling. Remove this block if you don't */
/* Want the jobs to staple. THis setting is for Landscape */
/* jobs and staples across the top. */
/* */
/*'40504A4C20434F4D4D454E542044535343205052494E5420535441504C494E'X*/
/*'473D320D0A'X*/
/* */
/* 6: @PJL COMMENT DSSC PRINT HOLEPUNCH=1 [CR][LF] */
/* Enables hole punch. Remove this block if you don't want */
/* jobs hole punched. A value of 4 is for 2-hole punch. */
/* */
/*'40504A4C20434F4D4D454E542044535343205052494E5420484F4C4550554E'X*/
/*'43483D310D0A'X*/
/* */
/* 7: @PJL SET OUTBIN=OPTIONALOUTBIN2 [CR][LF] */
/* On some models, we may need to specify a finisher tray to */
/* staple or hole punch. Otherwise, there are exit bins later */
/* on in the customization object that can be driven by the */
/* driver, and this block may be removed to use the driver- */
/* driven commands. Look for OUTBINTBLE in the code. */
/* */
'40504A4C20534554204F555442494E3D4F5054494F4E414C4F555442494E32'X
'0D0A'X
/* */
/* 8. @PJL COMMENT DSSC PRINT USERLOGIN=AS400 [CR][LF] */
/* Sets the username to AS400 for job logs and private print */
/* jobs. May be changed if desired. */
/* */
/*'40504A4C20434F4D4D454E542044535343205052494E5420555345524C4F47'X*/
/*'494E3D41533430300D0A'X*/
/* */
/* 9. @PJL COMMENT DSSC PRINT PRINTMODE=PRIVATE [CR][LF] -AND-*/
/* @PJL COMMENT DSSC PRINT PRIVPRINT=12345 [CR][LF] */
/* Sends jobs to private print. Look for the user specified */
/* by USERLOGIN above. The password is the number. We will */
/* usually remove this block. */
/* */
/*'40504A4C20434F4D4D454E542044535343205052494E54205052494E544D4F'X*/
/*'44453D505249564154450D0A40504A4C20434F4D4D454E5420445353432050'X*/
/*'52494E5420505249565052494E543D31323334350D0A'X*/
/* */
/* 10. @PJL COMMENT DSSC PRINT ACCESSCODE=12345 [CR][LF] */
/* Puts in a department code of 12345. This can be replaced */
/* with whatever we want. If there is no department code, it */
/* may be removed, but it won't harm anything if it is left */
/* in. */
/* */
/*'40504A4C20434F4D4D454E542044535343205052494E542041434345535343'X*/
/*'4F44453D31323334350D0A'X*/
/* */
/* 11. [ESC]E */
/* PCL reset, signals the start of PCL code. The code from */
/* the print stream starts immediately afterwards. Note that */
/* there is no CRLF. DO NOT REMOVE */
/* Note that the last line must end in a period after the X. */
/* */
'1B45'X.
/*--------------END OF INITIALIZATION CODE--------------------*/
/* */
/* This indicates the end of the initialization string. */
/* The last X MUST be followed by a period. */
/* */
/*------------------------------------------------------------*/

/*--------------START OF RESET-CLEANUP CODE-------------------*/
/* */
/* This code ends the print job. The EOJ was added to keep */
/* multiple duplexed jobs from all being duplexed together. */
/* 1. [ESC]E */
/* Printer reset. Prints rest of page, form feeds and resets */
/* Note that there is no CRLF. DO NOT REMOVE. */
/* */
/* 2. [ESC]%-12345X */
/* Another UEL (Universal Escape Language Sequence) to */
/* indicate the next command is PJL. Note that there is no */
/* CRLF. DO NOT REMOVE. */
/* */
/* 3. @PJL EOJ [CR][LF] */
/* Ends the PJL job. Do not Remove. */
/* */
/* 4. [ESC]%-12345X */
/* Final UEX to end the job. No CRLF. DO NOT REMOVE. */
/* */
/*------------------------------------------------------------*/
:RESETPRT
DATA ='1B45'X
''X
'1B252D313233343558'X
''X
'40504A4C20454F4A0D0A'X
''X
'1B252D313233343558'X.
/*---------------END OF RESET-CLEANUP CODE--------------------*/
/* */
/* This indicates the end of the RESET string. */
/* The last X MUST be followed by a period. */
/* */
/*------------------------------------------------------------*/

:BELL
DATA ='07'X.
:SPACE
DATA ='20'X.
:CARRTN
DATA ='0D'X.
:FORMFEED
DATA ='0C'X.
:LINEFEED
DATA ='0A'X.
:VERRMOV
DIRECTION=UP
VAROFFSET= 4
VARLEN= 5
VARTYPE=CHRDEC
CNVNUM= 1
CNVDEN= 720
DATA ='1B26612D000000000056'X.
:VERRMOV
DIRECTION=DOWN
VAROFFSET= 4
VARLEN= 5
VARTYPE=CHRDEC
CNVNUM= 1
CNVDEN= 720
DATA ='1B26612B000000000056'X.
:HORRMOV
DIRECTION=FWD
VAROFFSET= 4
VARLEN= 5
VARTYPE=CHRDEC
CNVNUM= 1
CNVDEN= 720
DATA ='1B26612B000000000048'X.
:HORRMOV
DIRECTION=BCK
VAROFFSET= 4
VARLEN= 5
VARTYPE=CHRDEC
CNVNUM= 1
CNVDEN= 720
DATA ='1B26612D000000000048'X.
:STRBOLD
DATA ='1B28733342'X.
:ENDBOLD
DATA ='1B28733042'X.
:STRSUBS
DATA ='1B26612B2E3352'X.
:ENDSUBS
DATA ='1B26612D2E3352'X.
:STRSUPS
DATA ='1B26612D2E3352'X.
:ENDSUPS
DATA ='1B26612B2E3352'X.
:STRUS
DATA ='1B26643044'X.
:ENDUS
DATA ='1B266440'X.
/*------------------------------------------------------------*/
/* This sets the value of the line spacing. A lower value of */
/* CNVDEN yields less space between lines. You might want to */
/* decrease this value if you increase the margin to allow */
/* for hole punching. The default is 48 */
/*------------------------------------------------------------*/
:VARLSPC
VAROFFSET= 3
VARLEN= 3
VARTYPE=CHRDEC
CNVNUM= 1
CNVDEN= 48
DATA ='1B266C00000043'X.
/*------------------------------------------------------------*/
/* The value of the FNTWTH parameter governs the size of */
/* the font used. The CPI listed is the font size in the */
/* spool file. The larger the FNTWTH number, the larger the */
/* font. The defaults for both 10 and 12 CPI are 84. */
/*------------------------------------------------------------*/
:CPICOR
CPI=10
ASCIIFNT= 255
FNTWTH= 84
FNTATR= 1
DATA =''X.
:CPICOR
CPI=12
ASCIIFNT= 255
FNTWTH= 84
FNTATR= 1
DATA =''X.
:PRTORIENT
ORIENT=PORTRAIT
DATA ='1B266C304F'X.
/*------------------------------------------------------------*/
/* I reversed the settings for landscape and 270 degree */
/* rotation to get the staples into the right position */
/*------------------------------------------------------------*/
:PRTORIENT
ORIENT=LANDSCAPE
DATA ='1B266C314F'X.
:PRTORIENT
ORIENT=RTT180
DATA ='1B266C324F'X.
:PRTORIENT
ORIENT=RTT270
DATA ='1B266C334F'X.
/*--------------------DUPLEXING CODE--------------------------*/
/* */
/* The code in the SMPXPRT section will be used if the user */
/* specifies no duplexing, which is the default. We can */
/* force duplexing by choosing one of the other values and */
/* copying the code into the SMPXPRT section. The values in */
/* DUPXPRT correspond to book-style duplexing, while the */
/* values in the TUMDUPXPRT section correspond to tablet- */
/* style duplexing. */
/* */
/*------------------------------------------------------------*/
:SMPXPRT
DATA ='1B266C3053'X.
:DUPXPRT
DATA ='1B266C3153'X.
:TUMDUPXPRT
DATA ='1B266C3253'X.
/*------------------TRAY SELECTION CODE-----------------------*/
/* */
/* Each one of these sets corresponds to what happens when a */
/* user selects a paper drawer on the AS400. The first option */
/* called paper is what happens when autoselect is chosen in */
/* the driver on the AS400. (This very rarely happens because */
/* the AS/400 driver defaults to drawer 1. If we look at */
/* the section that reads DRAWER=DRAWER1, we can change the */
/* codes sent to remap tray 1 to any paper source we want. */
/* It is very common to map tray 1 to one of the large */
/* capacity tray or to autoselect. */
/* */
/* The code sent is [ESC]&l[#]H, with the [#] repaced by the */
/* number of the paper drawer. In hexadecimal, this takes */
/* the form 1B266C[##]48 and the [##] is the hexadecimal code */
/* for the tray we want to use. In this case, for tray 1, */
/* we would use 31, and we can substitute in the following */
/* virtual tray values for other specific drawers as follows: */
/* */
/* ========================================================= */
/* = Tray = Virtual Tray Number = */
/* = =(All values in Hexadecimal) = */
/* ========================================================= */
/* = Tray 1 = 31 = */
/* = Tray 2 = 34 = */
/* = Tray 3 or internal LCT = 35 = */
/* = Tray 4 = 3231 = */
/* = External LCT = 3230 = */
/* = Bypass = 32 = */
/* = Autoselect = 37 = */
/* ========================================================= */
/* */
/* Note that this section only includes trays 1 and 2 and the */
/* other trays are listed in a section called ADDDRWTBL. The */
/* same rules and codes apply there as well. */
/* */
/*------------------------------------------------------------*/
:DWRSLT
DRAWER=PAPER
DATA ='1B266C3548'X.
:DWRSLT
DRAWER=ENVELOPE
DATA ='1B266C3668314F'X.
:DWRSLT
DRAWER=DRAWER1
DATA ='1B266C3548'X.
:DWRSLT
DRAWER=DRAWER2
DATA ='1B266C3548'X.
:JOGOUTTRAY
DATA ='1B266C3467'X.
:PAGLENL
VAROFFSET= 3
VARLEN= 3
VARTYPE=CHRDEC
DATA ='1B266C00000050'X.
:PAGSIZXFM.
:PAGSIZE
PAGWTH= 8390
PAGLEN=11338
DATA ='1B266C373241'X.
:PAGSIZE
PAGWTH= 8352
PAGLEN=11952
DATA ='1B266C303141'X.
:PAGSIZE
PAGWTH=11952
PAGLEN=16848
DATA ='1B266C323641'X.
:PAGSIZE
PAGWTH=16838
PAGLEN=23811
DATA ='1B266C323741'X.
:PAGSIZE
PAGWTH=10368
PAGLEN=14544
DATA ='1B266C343541'X.
:PAGSIZE
PAGWTH=14570
PAGLEN=20636
DATA ='1B266C343641'X.
:PAGSIZE
PAGWTH=10440
PAGLEN=15120
DATA ='1B266C303141'X.
:PAGSIZE
PAGWTH=12240
PAGLEN=15840
DATA ='1B266C3241'X.
:PAGSIZE
PAGWTH=12240
PAGLEN=20160
DATA ='1B266C3341'X.
:PAGSIZE
PAGWTH=15840
PAGLEN=24480
DATA ='1B266C3641'X.
:EPAGSIZXFM.
:ENVSIZXFM.
:ENVSIZE
ENVWTH=10800
ENVLEN= 5580
DATA ='1B266C383041'X.
:ENVSIZE
ENVWTH=12780
ENVLEN= 5580
DATA ='1B266C383141'X.
:ENVSIZE
ENVWTH=13680
ENVLEN= 5940
DATA ='1B266C383141'X.
:ENVSIZE
ENVWTH=12472
ENVLEN= 6236
DATA ='1B266C393041'X.
:ENVSIZE
ENVWTH=12983
ENVLEN= 9184
DATA ='1B266C393141'X.
:ENVSIZE
ENVWTH=14173
ENVLEN= 9978
DATA ='1B266C31303041'X.
:ENVSIZE
ENVWTH= 8390
ENVLEN= 5670
DATA ='1B266C373141'X.
:ENVSIZE
ENVWTH=11340
ENVLEN= 8390
DATA ='1B266C373241'X.
:EENVSIZXFM.
:FNTGRP.
:FNTGRPE
MINFID= 154
MAXFID= 200
FNTSTR='1B28733170313276307330623431303154'X
FNTEND=''X
FNTWTH=
/* -0-1-2-3-4-5-6-7-8-9-A-B-C-D-E-F */
'22ADAEA78FBEA777EFABEF7F696869AA'X /* 00- */
'62624A48635892514E4EADAD93AD6B6B'X /* 01- */
'48526E7878D3BB52525278D352525252'X /* 02- */
'787878787878787878785252F0D3F06A'X /* 03- */
'D3AD95A3B29590ADB2525BA895D8B2AD'X /* 04- */
'8BAD9E8295B2ADE2ADAD9A5252527878'X /* 05- */
'786A786A786A52787843437843BB7878'X /* 06- */
'7878565B437878AD78786A6A786A78F0'X /* 07- */
'A3786A6A6A6A6A6A6A6A6A434343ADAD'X /* 08- */
'959ED3787878787878ADB2787878D378'X /* 09- */
'6A43787878B278786AD3D3D3D3526060'X /* 0A- */
'78AD7878A36AB178526A787878787878'X /* 0B- */
'6A6A78786A6A78786A6A78786A6A7878'X /* 0C- */
'AD43ADD36A43789EAD43ADB1954378AD'X /* 0D- */
'907890909078876A9EAD906AF0905BF0'X /* 0E- */
'F0D3F0F0ADADD3F0785252AD78567848'X /* 0F- */
EURODATA=''X.
:EFNTGRP.
:INDFNT.
:INDFNTE
FID= 186
POINTSIZE= 0
FNTSTR='1B28733170313276307330623431303154'X
FNTEND=''X
FNTWTH=
/* -0-1-2-3-4-5-6-7-8-9-A-B-C-D-E-F */
'22ADAEA78FBEA777EFABEF7F696869AA'X /* 00- */
'62624A48635892514E4EADAD93AD6B6B'X /* 01- */
'48526E7878D3BB52525278D352525252'X /* 02- */
'787878787878787878785252F0D3F06A'X /* 03- */
'D3AD95A3B29590ADB2525BA895D8B2AD'X /* 04- */
'8BAD9E8295B2ADE2ADAD9A5252527878'X /* 05- */
'786A786A786A52787843437843BB7878'X /* 06- */
'7878565B437878AD78786A6A786A78F0'X /* 07- */
'A3786A6A6A6A6A6A6A6A6A434343ADAD'X /* 08- */
'959ED3787878787878ADB2787878D378'X /* 09- */
'6A43787878B278786AD3D3D3D3526060'X /* 0A- */
'78AD7878A36AB178526A787878787878'X /* 0B- */
'6A6A78786A6A78786A6A78786A6A7878'X /* 0C- */
'AD43ADD36A43789EAD43ADB1954378AD'X /* 0D- */
'907890909078876A9EAD906AF0905BF0'X /* 0E- */
'F0D3F0F0ADADD3F0785252AD78567848'X /* 0F- */
EURODATA=''X.
:INDFNTE
FID= 187
POINTSIZE= 0
FNTSTR='1B28733170313276307333623431303154'X
FNTEND=''X
FNTWTH=
/* -0-1-2-3-4-5-6-7-8-9-A-B-C-D-E-F */
'22ADAEA78FBEA777EFABEF7F696869AA'X /* 00- */
'62625162635A92515656ADAD93AD6B6B'X /* 01- */
'48526E7878D3C452525278D352525252'X /* 02- */
'787878787878787878785252F0D3F078'X /* 03- */
'D3AD9EADAD9E90BBBB5B74BB9EE2ADBB'X /* 04- */
'90BBAD879EADADF0ADAD9E5252527878'X /* 05- */
'7878876A876A56788743528743C48778'X /* 06- */
'87876A5B528778AD78786A78787878F0'X /* 07- */
'AD876A787878786A6A6A6A434343ADAD'X /* 08- */
'9EADFC787878878778BBAD787878EA78'X /* 09- */
'7843788787AD787878D3D3D3D3526666'X /* 0A- */
'C7EFEF107F7F96967F963C9696967F7F'X /* 0B- */
'7FEFEF7FEFEF7F969696EFEF96EFEFEF'X /* 0C- */
'EFEFEF967F7F96EFEF7F7FEFEF7878EF'X /* 0D- */
'908790909078876A9EAD906AF0905BF0'X /* 0E- */
'F0D3F0F0ADADD3F0785252AD78567848'X /* 0F- */
EURODATA=''X.
:INDFNTE
FID= 188
POINTSIZE= 0
FNTSTR='1B28733170313276317330623431303154'X
FNTEND=''X
FNTWTH=
/* -0-1-2-3-4-5-6-7-8-9-A-B-C-D-E-F */
'22ADAEA78FBEA777EFABEF7F696869AA'X /* 00- */
'62624A64635892514E4EADAD93AD6B6B'X /* 01- */
'48526E7878D3BB52525278D352525252'X /* 02- */
'787878787878787878785252F0D3F078'X /* 03- */
'D390909EAD908BADAD526A9E87C69EAD'X /* 04- */
'90AD907887AD90C69087875252527878'X /* 05- */
'7878786A786A43787843436A43AD7878'X /* 06- */
'78785B5B43786A9E6A6A5B6A786A78F0'X /* 07- */
'9E786A787878786A6A6A6A4343439090'X /* 08- */
'909ED378787878786AADAD787878CF78'X /* 09- */
'78437878789E787878D3D3D3D3526F6F'X /* 0A- */
'C7EFEF107F7F96967F963C9696967F7F'X /* 0B- */
'7FEFEF7FEFEF7F969696EFEF96EFEFEF'X /* 0C- */
'EFEFEF967F7F96EFEF7F7FEFEF7878EF'X /* 0D- */
'907890909078876A9EAD906AF0905BF0'X /* 0E- */
'F0D3F0F0ADADD3F0785252AD78567848'X /* 0F- */
EURODATA=''X.
:INDFNTE
FID= 189
POINTSIZE= 0
FNTSTR='1B28733170313276317333623431303154'X
FNTEND=''X
FNTWTH=
/* -0-1-2-3-4-5-6-7-8-9-A-B-C-D-E-F */
'22ADAEA78FBEA777EFABEF7F696869AA'X /* 00- */
'62625184635A92515656ADAD93AD6B6B'X /* 01- */
'485B7E7878D3BB52525278D352525252'X /* 02- */
'787878787878787878785252F0D3F078'X /* 03- */
'D39E9E9EAD9E90ADBB5B789E90D3ADAD'X /* 04- */
'90A89E8790AD9ED39E90905252527878'X /* 05- */
'7878786A786A56788743437843BB8778'X /* 06- */
'78785B5B43876A9E786A5B78787878F0'X /* 07- */
'9E876A787878786A6A6A6A4343439E9E'X /* 08- */
'9EA8DD78787887876AADAD787878D378'X /* 09- */
'7843788787AC787878D3D3D3D35B6A6A'X /* 0A- */
'C7EFEF107F7F96967F963C9696967F7F'X /* 0B- */
'7FEFEF7FEFEF7F969696EFEF96EFEFEF'X /* 0C- */
'EFEFEF967F7F96EFEF7F7FEFEF7878EF'X /* 0D- */
'907890909078876A9EAD906AF0905BF0'X /* 0E- */
'F0D3F0F0ADADD3F0785252AD78527848'X /* 0F- */
EURODATA=''X.
:EINDFNT.
:EBCASCTBL.
:EBCASCTBLE
EBCDICCP= 1140
ASCIICP= 1252
DATA =''X.
:EBCASCTBLE
EBCDICCP= 1141
ASCIICP= 1252
DATA =''X.
:EBCASCTBLE
EBCDICCP= 1142
ASCIICP= 1252
DATA =''X.
:EBCASCTBLE
EBCDICCP= 1143
ASCIICP= 1252
DATA =''X.
:EBCASCTBLE
EBCDICCP= 1144
ASCIICP= 1252
DATA =''X.
:EBCASCTBLE
EBCDICCP= 1145
ASCIICP= 1252
DATA =''X.
:EBCASCTBLE
EBCDICCP= 1146
ASCIICP= 1252
DATA =''X.
:EBCASCTBLE
EBCDICCP= 1147
ASCIICP= 1252
DATA =''X.
:EBCASCTBLE
EBCDICCP= 1148
ASCIICP= 1252
DATA =''X.
:EBCASCTBLE
EBCDICCP= 1149
ASCIICP= 1252
DATA =''X.
:EEBCASCTBL.
:ASCCPINFO.
:CODEPAGE
CODEPAGE= 437
DATA ='1B28313055'X.
:CODEPAGE
CODEPAGE= 850
DATA ='1B28313255'X.
:CODEPAGE
CODEPAGE= 852
DATA ='1B28313755'X.
:CODEPAGE
CODEPAGE= 1252
DATA ='1B28313955'X.
:CODEPAGE
CODEPAGE= 1250
DATA ='1B283945'X.
:CODEPAGE
CODEPAGE= 1254
DATA ='1B283554'X.
:EASCCPINFO.
:PRTRSLTN
RESOLUTION= 300.
:HORAMOV
VAROFFSET= 3
VARLEN= 5
VARTYPE=CHRDEC
CNVNUM= 1
CNVDEN= 720
DATA ='1B2661000000000048'X.
:VERAMOV
VAROFFSET= 3
VARLEN= 5
VARTYPE=CHRDEC
CNVNUM= 1
CNVDEN= 720
DATA ='1B2661000000000056'X.
:TOPMARGINI
VAROFFSET= 8
VARLEN= 4
VARTYPE=CHRDEC
CNVNUM= 1
CNVDEN= 48
DATA ='1B266C31431B266C0000000045'X.
:TEXTLENL
VAROFFSET= 3
VARLEN= 4
VARTYPE=CHRDEC
DATA ='1B266C00000000461B26613052'X.
:PRTNXTCHR
DATA ='1B26703158'X.
:RASEND
DATA ='1B2A7242'X.
:PRTANGLE
ANGLE=0
DATA ='1B26613050'X.
:PRTANGLE
ANGLE=90
DATA ='1B266132373050'X.
:PRTANGLE
ANGLE=180
DATA ='1B266131383050'X.
:PRTANGLE
ANGLE=270
DATA ='1B2661393050'X.

/*----------EXIT AND FINISHER TRAY SELECTION CODE-------------*/
/* */
/* Each one of these sets corresponds to what happens when a */
/* user selects a paper drawer on the AS400. The default on */
/* the AS400 is OUTBINTBLE 0, so whichever tray we assign it */
/* to will be the default if the user doesn't specify an exit */
/* tray in the driver. This takes the form of */
/* [ESC]&l[#]H, where the number represented by [#] */
/* corresponds to the number of the exit tray. In */
/* hexadecimal, this takes the form 1B266C[XX]67 where [XX] */
/* is replaced by a two digit code below corresponding to the */
/* exit tray where we want the jobs to go. Note that users */
/* usually want their jobs to exit into the finisher, so we */
/* have set this customization object to map the default exit */
/* tray (OUTBINTBLE 0) to map to finisher tray 2. Also note */
/* that if the user doesn't have a finisher, jobs will still */
/* print successfully to the internal tray. */
/* */
/* ====================================================== */
/* = Exit Tray = Virtual Exit Tray Number= */
/* = = (values in hexadecimal)= */
/* ====================================================== */
/* = Finisher Tray 1 = 33 = */
/* = Finisher Tray 2 = 34 = */
/* = Internal Tray = 30 = */
/* ====================================================== */
/* */
/*------------------------------------------------------------*/
:OUTBINTBL.
:OUTBINTBLE
NUMBER= 0
DATA ='1B266C3447'X.
:OUTBINTBLE
NUMBER= 1
DATA ='1B266C3347'X.
:OUTBINTBLE
NUMBER= 2
DATA ='1B266C3447'X.
:OUTBINTBLE
NUMBER= 3
DATA ='1B266C3047'X.
:OUTBINTBLE
NUMBER= 4
DATA ='1B266C3747'X.
:OUTBINTBLE
NUMBER= 5
DATA ='1B266C3647'X.
:OUTBINTBLE
NUMBER= 6
DATA ='1B266C3747'X.
:OUTBINTBLE
NUMBER= 7
DATA ='1B266C3847'X.
:OUTBINTBLE
NUMBER= 8
DATA ='1B266C3947'X.
:OUTBINTBLE
NUMBER= 9
DATA ='1B266C313047'X.
:OUTBINTBLE
NUMBER= 10
DATA ='1B266C313147'X.
:EOUTBINTBL.
:ADDDRWTBL.
:ADDDRWTBLE
NUMBER= 3
DATA ='1B266C3548'X.
:ADDDRWTBLE
NUMBER= 4
DATA ='1B266C3548'X.
:EADDDRWTBL.
:RASTERMODE
SCS=NO
AFP=NO.
:EUROSYMBOL
RESIDENT=NO.
:SO
DATA = '00'X.
:EWSCST.