RE: 3UP LAbels Revisited

Hi Charles,

If its no trouble would you mine passing me the code you have ??? 

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Wilt, Charles
Sent: Tuesday, July 12, 2005 08:19
To: RPG programming on the AS400 / iSeries
Subject: RE: 3UP LAbels Revisited

Tom,

Looks like you've gotten some good information.  But I didn't see anyone
mention my technique...

What I've done is create a printer file that has 1 row worth of fields.
The fields all have the DDS keyword POSITION defined using a variable
field instead of a static value.

The printer file needs to be defined as DEVTYPE(*AFPDS), but PSF/400
isn't needed unless you are printing to *IPDS printers.  If you are
printer to LAN attached ASCII printers, like an HP, Host print transform
will convert the *AFPDS to ASCII without trouble.

When I did this, I was in fact printing 3up Avery labels to a HP
printer.

I could probably get you a copy of the code & DDS if you are interested.

HTH,

Charles Wilt
--
iSeries Systems Administrator / Developer Mitsubishi Electric Automotive
America
ph: 513-573-4343
fax: 513-398-1121
 

> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Tom Elam
> Sent: Monday, July 11, 2005 12:56 PM
> To: rpg400-l@xxxxxxxxxxxx
> Subject: 3UP LAbels Revisited
> 
> 
> I'm in need of converting our lagacy RPG (AS400) label program from a 
> tractor fed 3 up/across label to a laser cut sheet (Avery 5260).
> 
> Each label down the sheet creeps further up the label. By the time the

> end of the sheet is reached, the first print line is either on the 
> margin or the previous label.
> 
> Have tried several different approaches but all attempts seem to yield

> disasterous results or the "creeping" affect.
> 
> Can someone assist ???
> 
>  
> 
> Thanks in advance, Tom
> 
>  
> --
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing 
> list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe, 
> unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx Before posting, please take a 
> moment to review the archives at http://archive.midrange.com/rpg400-l.
> 
>