Paul was very kind to comment earlier in this long thread. Hopefully, there is a
way to accommodate both. Otherwise the option is to re-write the program, which
is difficult on a legacy system to do this quickly.
--- On Thu, 5/22/08, Jerry Adams <Jerry@xxxxxxxxxxxxxxx> wrote:
From: Jerry Adams <Jerry@xxxxxxxxxxxxxxx>
Subject: RE: A Printer File (PRTF) and the O-Specs in the same program?
To: "RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
Date: Thursday, May 22, 2008, 6:04 PM
Adam,
Do you mean within a single program (say, PGMA) retaining the program-described
printer file and adding am externally-described printer file and getting both to
print on the same report/document (piece of
paper)?
If so, I don't think you can do that. Each printer file (program- and
externally-described), I think, would have to be a separate F-spec. At least,
I have never seen or heard of part of a printer file being internal and another
part being external. When one defines the file in the F-spec, one has to
indicate whether the file (printer, disk, or whatever) is externally-described
or not. But there are people on the list that do magical things (Paul?) with
RPG IV.
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 Adam West
Sent: Thursday, May 22, 2008 12:28 PM
To: RPG programming on the AS400 / iSeries
Subject: A Printer File (PRTF) and the O-Specs in the same program?
I was thinking on my
flight, that is it possible to combine the Prtf which I
really only need one field to be Barcode, instead of re-writing the legacy to a
PRTF, which is very cumbersome for the following reasons:
there is alot of formats conditioned by various indicators, using the same
field
name but it won't compile as a PRTF unless you make new format names for
each
case. \
2. I am still not happy replacing the Overflow logic controlled by the cycle
with some kind of line counting.
So can I have the PRTF by itself, just the one field and I think I can get it
to
print on first line, it really just has to be on the printout for use for UPS
Worldship?
Will this work coexisting ?
Tot Ziens,
Adam
--- On Wed, 5/21/08, Kevin Bucknum <Kevin@xxxxxxxxxxxxxxxxxxx> wrote:
From: Kevin Bucknum <Kevin@xxxxxxxxxxxxxxxxxxx>
Subject: RE: Can someone post basic PRTF COde?
To: "RPG
programming on the AS400 / iSeries"
<rpg400-l@xxxxxxxxxxxx>
Date: Wednesday, May 21, 2008, 1:38 PM
Check the infocenter for specs and examples, but the dds spec is at
http://publib.boulder.ibm.com/infocenter/iseries/v5r4/topic/rzakd/rzakd.
pdf
A*--- Report heading
A*---
A R HDR1 SKIPB(04)
A SPACEA(1)
A*
A 1'DATE:'
A +1DATE EDTWRD('0 / / ')
A CTPRNC R 46REFFLD(RMCTL/CTPRNC *LIBL/MCTL)
A CTPRCD R 119REFFLD(RMCTL/CTPRCD *LIBL/MCTL)
A 123'PAGE'
A +1
A 09 PAGNBR
A EDTCDE(Z)
A*
A 1'TIME:'
A
SPACEB(1)
A +1TIME EDTWRD('0 : : ')
A @PTTL1 30 51
A $PGM 10 123
A SPACEA(1)
A*
A 1'USER:'
A $USER 10 +1
A @PTTL2 30 51
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Adam West
Sent: Wednesday, May 21, 2008 7:58 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: Can someone post basic PRTF COde?
I am not getting off the ground. Perhaps there is some code to look
at?
Can't find the IBM manual either.
200 A R HDG
300 A SKIPB(005)
400 A*
SPACEA(001)
500 A*
600 A 'MY TECHNOLOGIES
INC.
CPD7486-*
--
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.
ATTENTION:
The information contained in this message and/or attachments is intended only
for the person or entity to which it is addressed and may contain confidential
and/or privileged material. Any review, retransmission, dissemination or other
use of, or taking of any action in reliance upon, this information by persons
or
entities other than the
intended recipient is prohibited. If you received this
in error, please contact the sender and delete the material from any system
and
destroy any copies.
--
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
