Eric,
You can control the bold printing your self by repeating a line print
with zero spacing on the 1st print.
I would move only the highlighted fields to the print area and print
once without spacing. Then I would move all of the fields to the print
line with normal spacing. This should print the double printed fields
in bold.
Or have two print lines and put the errors in one and all fields in the
other and print one with 0 spacing.
I have used this for double printing on many occasions.
This has even worked for me on Laser printer.
Thanks, Chuck
Chuck Sallee
CIS Manager
Lexington Division of Police
-----Original Message-----
From: DeLong, Eric [mailto:EDeLong@xxxxxxxxxxxxxxx]
Sent: Wednesday, October 15, 2008 12:16 PM
To: RPG programming on the AS400 / iSeries
Subject: RE: More than 99 indicators needed
No, that won't work for printer files... There is no such attribute
byte in a print stream. Printers support highlighting through
overstrike (print the characters more than once, on an impact printer)
or pixel offset in the case of page printers.
The OP indicates that a single line of the report could have more than
100 fields, exceeding his ability to control output individually... I
suppose that the REAL limit is > 100 fields in a single record format,
which means that he *could* break that line into more than one format.
If you broke this down into three formats, such as SegLeft, SegMid, and
SegRight, where Left and Mid do not advance paper, then you could set
the indicators for each ling segment before you WRITE the format....
Not a good solution, maybe, but its all I've got....
Eric DeLong
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Jerry Adams
Sent: Wednesday, October 15, 2008 10:52 AM
To: RPG programming on the AS400 / iSeries
Subject: RE: More than 99 indicators needed
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.
--
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.
midrange.com
