I've done this without using the p-fields for RPG II panels, since they have no concept of such: Create a field with an extra byte in the front. By setting the hex value and moving it into that first byte, you can set the special conditions, such as underlining, colors, etc. Might work for printer files, but I've never tried it there. Might have to have a byte at the end to reset the hex value, otherwise once the underline hex value was set, for example, it might keep underlining the fields that follow. I know that I had to add a "stop" byte at the end of the display fields.
Again, I've never tried this for printer files, but it might be possible to just have separate "indicator" and "stop" bytes on the printer definition since, unlike display files, one isn't required to have a space between fields. And I'm not even sure if the hex codes that apply to the 5250 datastream would work for printers, nor where to find out what they might be. Even if it's possible, it seems like a lot of work.
Jerry C. Adams
IBM System i Programmer/Analyst
B&W Wholesale
office: 615-995-7024
email: jerry@xxxxxxxxxxxxxxx
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Gene Burns
Sent: Wednesday, October 15, 2008 10:36 AM
To: RPG programming on the AS400 / iSeries
Subject: Re: More than 99 indicators needed
Sorry. You said printer not display, never mind.
On Wed, Oct 15, 2008 at 10:35 AM, Gene Burns <burns.gene@xxxxxxxxx> wrote:
Use the DSPATR with a program field.
A FLD1 R B 22 15REFFLD(FILE/FLD119)
A DSPATR(&PTPFLDS)
A PTPFLDS 1 P
On Wed, Oct 15, 2008 at 9:38 AM, Thomas Garvey <tgarvey@xxxxxxxxxx> wrote:
Anyone have any ideas on how to accommodate a printer file that requires
attributes that would exceed using 99 indicators? For example, if I need
to
specify the HIGHLIGHT attribute individually on more than 100 fields on a
print line, how could it be done, considering there's the practical limit
of
99 indicators?
Best Regards,
Thomas Garvey
--
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.
As an Amazon Associate we earn from qualifying purchases.