Re: WSCST object INITPRT

["Peter Dow" <pcdow@xxxxxxxxx>]

Hi Carl,

They're on V4R4M0 and current on PTF's, and not likely to move up anytime
soon. Thanks for responding.

Peter Dow
Dow Software Services, Inc.
909 425-0194 voice
909 425-0196 fax

----- Original Message -----
From: "Carl Galgano" <cgalgano2@ediconsulting.com>
To: <midrange-l@midrange.com>
Sent: Wednesday, September 19, 2001 2:44 PM
Subject: RE: WSCST object INITPRT


> Peter:
> I have had similar problems, not using an overlay, but mixing font sizes
in
> a single document.  I THINK my problem was corrected in v5.1.  What OS
> version are you running?
> cjg
>
>
> Carl J. Galgano
> EDI Consulting Services, Inc.
> 550 Kennesaw Avenue, Suite 800
> Marietta, GA  30060
> (770) 422-2995 - voice
> (419) 730-8212 - fax
> mailto:cgalgano@ediconsulting.com
> http://www.ediconsulting.com
> AS400 EDI, Networking, E-Commerce and Communications Consulting and
> Implementation
> http://www.icecreamovernight.com
> Premium Ice Cream Brands shipped Overnight
> FREE AS/400 Timesharing Service -
> http://www.ediconsulting.com/timeshare.html
> "You ain't gonna learn what you don't want to know" - rw
>
> -----Original Message-----
> From: midrange-l-admin@midrange.com
> [mailto:midrange-l-admin@midrange.com]On Behalf Of Peter Dow
> Sent: Wednesday, September 19, 2001 4:24 PM
> To: MIDRANGE-L@midrange.com
> Subject: WSCST object INITPRT
>
>
> Hi Everyone,
>
> I have a customer who is trying to use a Kyocera laser jet in HP emulation
> mode to print an overlay along with *SCS data from the AS/400.  He has a
PC
> program that loads the overlay, and wants to simply have the AS/400 turn
on
> overlays.  So we retrieved the source for the *HP6 workstation
customization
> object:
>
>  RTVWSCST DEVTYPE(*TRANSFORM) MFRTYPMDL(*HP6) SRCMBR(ERPRT)
>   SRCFILE(HS#LIBR/HSSSRC) TEXT('ER printer HP6 custom for Kyocera
printer')
>
> and modified it with SEU to look like this (note that we trimmed out a
bunch
> of stuff):
>
> :WSCST DEVCLASS=TRANSFORM.
>
>     :TRNSFRMTBL.
>     :PRTDTASTRM
>       DATASTREAM=HPPCL5.
>     :INITPRT
>       DATA ='1B267330431B59'X         /* esc E RESET printer */
>             '1B266631793458'X         /* esc & f 1 y 4 X  -- enable MACRO
1
> for OVERLAY */
>             '1B2A7030783231313459'X   /* position to 0 x 2114 Y */
>             '1B28733070'X             /* esc ( s 0 p -- fixed-pitch font
*/
>                   '313068'X           /*         1 0 h -- 10cpi */
>                   '313276'X           /*         1 0 v -- 10pt font */
>                   '3073'X             /*         0 s -- style upright */
>                   '3354'X             /*         3 T -- COURIER typeface
*/
>     :RESETPRT
>       DATA ='1B45'X.      /* esc E -- reset printer */
>     :BELL
>       DATA ='07'X.
>     :SPACE
>       DATA ='20'X.
>     :CARRTN
>       DATA ='0D'X.
>     :FORMFEED
>       DATA ='0C'X.
>     :LINEFEED
>       DATA ='0A'X.
> :EWSCST.
>
> Then we created the new WCST
>
>  CRTWSCST WSCST(HS#LIBR/ERPRT) SRCFILE(HS#LIBR/HSSSRC)
>
> and an outqueue that uses it
>
>  CRTOUTQ OUTQ(HS#LIBR/ERPRT) RMTSYS(ERPRT) RMTPRTQ(KYOCERA) CNNTYPE(*IP)
>   DESTTYPE(*OTHER) MFRTYPMDL(*HP6) WSCST(HS#LIBR/ERPRT)
>   TEXT('ER Kyocera printer emulating HP6') DSPDTA(*YES)
>
> started the writer
>
>  QSYS/STRRMTWTR OUTQ(ERPRT)
>
> and started testing it.  The overlay works just fine, but the font is
> changed to a 16.67cpi font, in spite of the font selections on teh printer
> file and in the WCST object (see the INITPRT section).  When we turned on
> the dump mode (PCL Esc-Y) it shows our INITPRT just fine, but it's
followed
> by five (count them, 5) repetitions of PCL that sets the font to 16.67cpi.
> We've tried changing the PAGRTT to zero, the CPI to 10, to no avail. What
> are we missing?
>
> tia,
> Peter Dow
> Dow Software Services, Inc.
> 909 425-0194 voice
> 909 425-0196 fax
>
>
>
> _________________________________________________________
> Do You Yahoo!?
> Get your free @yahoo.com address at http://mail.yahoo.com
>
> _______________________________________________
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
> To post a message email: MIDRANGE-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/midrange-l
> or email: MIDRANGE-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/midrange-l.
>
> _______________________________________________
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
> To post a message email: MIDRANGE-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/midrange-l
> or email: MIDRANGE-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/midrange-l.


_________________________________________________________
Do You Yahoo!?
Get your free @yahoo.com address at http://mail.yahoo.com