Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

AS/400 & HP5Si wscst

338 views
Skip to first unread message

Mat

unread,
Dec 20, 1996, 3:00:00 AM12/20/96
to

Can anyone tell me where I could get the source for a workstation
customizing object to suit a hp5si, or perhaps where I can find
instructions on modifying existing ones. I have tried the IBM supplied
*HP4 object, but it seems there are a few differences required for the
HP5 which cause random characters to be output to the print in place of
control codes.

Thanks in advance
Mat Chan


Wolfgang Bröker

unread,
Dec 22, 1996, 3:00:00 AM12/22/96
to

Mat schrub am Fri, 20 Dec 1996 00:37:19 -0800:

Mat,

I hope the original author, GeraldPreteau, doesn't mind when I repost a
IMHO useful message wrt. TCP/IP printing and WSCST objects in general.

HTH - Wolfgang


==========
comp/sys.ibm.as400.misc #3162, from Gerald_Preteau, 8308 chars, Sun 11 Aug
1996 22:53:06 -0100
Comment to 3132.
----------
Path:
news.isys.net!news.maz.net!unlisys!news.DBresearch-berlin.de!janitor.DBresearc
h-berlin.de!debis.de!Dortmund.Germany.EU.net!main.Germany.EU.net!EU.net!enews.
sgi.com!news.mathworks.com!newsfeed.internetmci.com!news.inc.net!arclight.uore
gon.edu!dispatch.news.demon.net!demon!uk-lond.demon.co.uk
From: Gerald Preteau <preteau_gerald/co...@cargill.com>
Newsgroups: comp.sys.ibm.as400.misc
Subject: Re: AS/400 LPR Problems - Letter/A4, Banner P
Date: Sun, 11 Aug 1996 22:53:06 -0100
Lines: 174
Message-ID: <320E72...@cargill.com>
References: <4ufjoi$2...@hermes.is.co.za> <4ui8as$g...@newsbf02.news.aol.com>
NNTP-Posting-Host: uk-lond.demon.co.uk
X-NNTP-Posting-Host: uk-lond.demon.co.uk
X-Mailer: Mozilla 2.02 (Win16; I)
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit

Gooner T wrote:
>
> Hi.
> I am having a similar problem with tcp/ip printing.Every time a splf is
> sent to the rmtwtr the printer insists on changing the form type to
> LETTER, this happens for every single page. Can any one help?
> The current set is as follows:
> The writer is defined in the CFGTCP table.
> The writer is started using thhe strrmtwtr command.
> All splfs are sent to the wtr using a standard outq that is alocated to
> the wtr.
> Any info will be greatly appreciated.

Here is something I wrote that solves several issues including LOAD LETTER

Customizing printing from the AS/400 to IP printers

In order to print an AS400 report on a PC type of printer (like an HP laser
printer, or a Epson dot matrix) the AS400 will use it technique it calls
"host transformation". This process involves converting the internal AS400
format of a spool file into an ASCII file with print control codes that can
be understood by the destination printer. These codes will tell the printer
the page size & orientation, the font to use etc.... This process generally
performs a good job of translating an AS400 report. However the translation
does not always meet everyones needs. To handle this situation IBM allows
you to specify a "work station customisation object" (WSCST) to allow you
to control what printer control codes will be used in the transformation
process. This has recently been used by several sites who are using the
AS400 to do IP printing to a print serving device such as a Intel Netport
or a HP Jet Direct. (Note: The system create a large temporary file owned
by the user during this host transformation process. Make sure the user
profile has MAXSTG set high enough to allow the user to own the temporary
work file).

The following document explains how to retrieve and modify the WSCST object
for a HPIV laser printer. This same process can be easily tailored to use
for any printer once you understand the basic concepts.

The steps involved in the process are:

1) Retrieve standard Work Station Customisation (WSCST) object for the
specified printer.

2) Modify WSCST source according to what changes you require

3) Create Updated Work Station customisation object

4) Create Output Queue specifying the changed WSCST

5) Start the remote writer

1)Use RTVWSCST command to retrieve the standard source used for Host table
transform. (Note: > indicated changed parms)

Retrieve WSCST source (RTVWSCST)
Type choices, press Enter.
>Device type . . . . . . . . . . > *TRANSFORM *TRANSFORM, 3101,
>Manufacturer type and model . . *hp4
>Source member . . . . . . . . . HP4 Name
Source file . . . . . . . . . . QTXTSRC Name
> Library . . . . . . . . . . . gpreteau Name, *CURLIB, *LIBL

Text 'description' . . . . . . . *BLANK

(Note: You can use a ? in the Manufacturer type and model to see a list of
valid devices).

2) Edit the source member just created. Below I will show how to change
various section to accomplish the following changes:

* change the default paper size from US Letter to A4 (for Europe)
* fix a problem experience by some sites printing more than 66 lines per
page.

a) The system seems to always send a default page size of US Letter This
causes the printer to put out the message "Change Paper to Letter", the
user must manually press CONTINUE to print every document. To change the
default paper size from US Letter to A4 change the first PAGSIZE section as
indicated below.

0001.52 :DWRSLT
0001.53 DRAWER=DRAWER2
0001.54 DATA ='1B266C3448'X.
0001.55 :PAGLENL
0001.56 VAROFFSET= 3
0001.57 VARLEN= 3
0001.58 VARTYPE=CHRDEC
0001.59 DATA ='1B266C00000050'X.
0001.60 :PAGSIZXFM.
0001.61 :PAGSIZE
>0001.62 PAGWTH= 8352 < Change to 11952
>0001.63 PAGLEN=11952 < Change to 16848
>0001.64 DATA ='1B266C303141'X. < Change to '1B266C323641'X
0001.65 :PAGSIZE
0001.66 PAGWTH=10368
0001.67 PAGLEN=14544
0001.68 DATA ='1B266C303141'X.
0001.69 :PAGSIZE
: :
V V

b) It was found that if the AS400 tries to print more than 66 lines on a HP
laser printer, the printer will force the continue button to be pressed
before each page. This seems to be caused by the bug in the host
transformation process which does not generate the codes for this section
correctly. The fix we used was to remove the page length section from
source. This has the effect of allowing the page length to default to
whatever is specified in the printer setup parmeters.

Delete 5 lines of PAGLENL section show below This will handle the 68 lines
per page (or anything greater than 66)

0001.52 :DWRSLT
0001.53 DRAWER=DRAWER2
0001.54 DATA ='1B266C3448'X.
>0001.55 :PAGLENL
>0001.56 VAROFFSET= 3
>0001.57 VARLEN= 3
>0001.58 VARTYPE=CHRDEC
>0001.59 DATA ='1B266C00000050'X.
0001.60 :PAGSIZXFM.

3) Create the updated Work Station Customisation object with the

source above.

Create WSCST (CRTWSCST)
Type choices, press Enter.
WSCST name . . . . . . . . . . . > HP4 Name
Library . . . . . . . . . . . > GPRETEAU Name, *CURLIB
Source member . . . . . . . . . *WSCST Name, *WSCST
Text 'description' . . . . . . . *SRCMBRTXT
Additional Parameters
Source file . . . . . . . . . . QTXTSRC Name
Library . . . . . . . . . . . gpreteau Name, *CURLIB
Authority . . . . . . . . . . . *LIBCRTAUT Name, *LIBCRTAUT,
Replace object . . . . . . . . . *YES *YES, *NO

4) Create the output queue as in the command below.

Create Output Queue (CRTOUTQ)
Type choices, press Enter.
>Output queue . . . . . . . . . . > TCPIPPRT Name
>Library . . . . . . . . . . . > GPRETEAU Name, *CURLIB
Maximum spooled file size:
Number of pages . . . . . . . *NONE Number, *NONE
Starting time . . . . . . . . Time
Ending time . . . . . . . . . Time
Order of files on queue . . . . *FIFO *FIFO, *JOBNBR
>Remote system . . . . . . . . . > *INTNETADR
>Remote printer queue . . . . . . > PASSTHRU
Writers to autostart . . . . . . *NONE 1-10, *NONE
Queue for writer messages . . . QSYSOPR Name
Library . . . . . . . . . . . *LIBL Name, *LIBL, *CURLIB
>Connection type . . . . . . . . > *IP *SNA, *IP
>Destination type . . . . . . . . > *OTHER *OS400, *OS400V2,
Transform SCS to ASCII . . . . . *YES *YES, *NO
>Manufacturer type and model . . > *WSCST
>Workstation customizing object > HP4 Name, *NONE
Library . . . . . . . . . . . > GPRETEAU Name, *LIBL, *CURLIB
>Internet address . . . . . . . . > '172.31.4.100'
Destination options . . . . . . *NONE
> Text 'description' . . . . . . . > 'Test remote Printr description'

5) Start the remote writer

STRRMTWTR OUTQ(TCPIPPRT)


LET ME KNOW WHAT YOU THINK

CHEERS

gerald_preteau@c argill.com


--
*** This message was swisstimed by sntp://bernina.ethz.ch ***
*** Sun, 22 Dec 1996 18:16 +0100 ***
*** Usually, I'm sure the Internet wasn't designed to drive ***
*** me crazy, but there are times when I wonder. JerryP 96 ***


0 new messages