× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.


  1.  Home
  2. RPG400-L
  3. July 2005

RE: 3UP LAbels Revisited

Marco,

Thanks for the example. !!! 

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Marco Facchinetti
Sent: Wednesday, July 13, 2005 03:53
To: RPG programming on the AS400 / iSeries
Subject: RE: 3UP LAbels Revisited

>From DDS (printer) manual:

The following example shows how to specify the POSITION keyword.
|...+....1....+....2....+....3....+....4....+....5....+....
A*
A R REC1
A FLD1 6S 2 POSITION(2.0 1.983)
A*
A FLD2 42A POSITION(&FLD2A &FLD2B)
A FLD2A 5S 3P
A FLD2B 5S 3P
A* Note: The UOM parameter on the CRTPRTF command determines the units
of measure for the parameter values.

This is a very flexible solution, only remember to use an offset (x,y)
approach in you programs.

HTH
Marco
--- Tom Elam <TElam@xxxxxxxxxxxxxxxx> wrote:

> I'm not familiar with position ???? 
> 
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of 
> MWalter@xxxxxxxxxxxxxxx
> Sent: Tuesday, July 12, 2005 13:05
> To: RPG programming on the AS400 / iSeries
> Subject: RE: 3UP LAbels Revisited
> 
> You may need to create an external printer file using the POSITION 
> keyword instead of spacing.
> 
> Thanks,
> 
> Mark
> 
> Mark D. Walter
> Senior Programmer/Analyst
> NYW, Mesh Products Division
> mwalter@xxxxxxxxxxxxxxx
> http://www.hanoverwire.com
> 
> 
>  
> 
>              "Tom Elam"
> 
>              <TElam@greeneheal
> 
>              th.org>
> To 
>              Sent by:                  "RPG programming
> on the AS400 /
> 
>              rpg400-l-bounces@         iSeries"
> <rpg400-l@xxxxxxxxxxxx>
> 
>              midrange.com
> cc
>  
> 
>  
> Subject 
>              07/12/2005 12:56          RE: 3UP LAbels
> Revisited
> 
>              PM
> 
>  
> 
>  
> 
>              Please respond to
> 
>               RPG programming
> 
>               on the AS400 /
> 
>                   iSeries
> 
>              <rpg400-l@midrang
> 
>                   e.com>
> 
>  
> 
>  
> 
> 
> 
> 
> 
> Sorry, I forgot to add to my post. I created a duplicate of qsysprt in

> my libe. Configured it as both *ASPDS and *IPDS. Both produced the 
> same affect. Around the 5 or 6 row the print starts to creep up the 
> label.
> 
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Ed Murphy
> Sent: Tuesday, July 12, 2005 12:45
> To: RPG programming on the AS400 / iSeries
> Subject: RE: 3UP LAbels Revisited
> 
> When compiling the PRTF, you have to specify "Printer device type" of 
> *AFPDS *SCS will not work.
> 
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Booth Martin
> Sent: Tuesday, July 12, 2005 11:34 AM
> To: RPG programming on the AS400 / iSeries
> Subject: RE: 3UP LAbels Revisited
> 
> Why are you showing a page size of 60?  Isn't the page 66?  Also, the 
> 180 degree rotation can be (0).
> 
> 
> 
> I went back to look at my old code but it was too far back; its 
> disappeared.
> 
> 
> 
> 
> Someone mentioned the *AFPDS/*IPDS setting for printer device type.
> That jingled some bells.  Something makes me think the answer lies 
> there?  Worth trying both ways, see what happens.
> 
> 
> 
> ---------------------------------
> 
> Booth Martin
> 
> http://www.martinvt.com
> 
> ---------------------------------
> 
> -------Original Message-------
> 
> 
> 
> From: RPG programming on the AS400 / iSeries
> 
> Date: 07/12/05 10:15:15
> 
> To: RPG programming on the AS400 / iSeries
> 
> Subject: RE: 3UP LAbels Revisited
> 
> 
> 
> Latest update,
> 
> 
> 
> Have modified the code to print 10 rows of 3 column
> labels, all at 1
> 
> time. The spacing of 3 before and 1 after, for the first
> line and 1
> 
> after for the next 2 lines (3 lines total for each label)
> appears to
> 
> line up, if you do the match according to the actual
> label form (Avery
> 
> 5260)
> 
> 
> 
> When it actually prints though, all is well until about
> the 5th row
> 
> (labels 13,14 and 15) then you can really start to notice
> the "CREEP".
> 
> By the time Im at label 27, 28 and 29, the first line is
> printing
> 
> bewteen the label group above and the last 3 labels.
> 
> 
> 
> Im using the IBM default of Qsysprt for the print file
> and using the
> 
> following over ride in a cl
> 
> OVRPRTF    FILE(*PRTF) PAGESIZE(60) FORMFEED(*AUTOCUT) +
> 
>              PAGRTT(180) OUTQ(MISP01) SAVE(*YES)
> 
> 
> 
> Thanks to everyone for all your help
> 
> STUMPED !!!!!!
> 
> 
> 
> 
> 
> --
> 
> 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.
> 
> 
> 
> 
> 
> .
> --
> 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.
> 
> 
> --
> 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.
> 
> 
> --
> 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.
> 
> 
> 
> --
> 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.
> 
> 
> -- 
> 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.
> 
> 



                
____________________________________________________
Start your day with Yahoo! - make it your home page
http://www.yahoo.com/r/hs

As an Amazon Associate we earn from qualifying purchases.

This thread ...
Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.