Re: WSCST object INITPRT

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