|
Well...crud. That's what I was afraid of that it was something like that.
Its use is in a central function of the "system" I am working on that is
fairly integral and used all the time, mixed into a really really long
RPG-II style program. I think it will just be easier now and for future
maintenance, if I rewrite the functionality into a new program for all new
useages, rather than try to trace the logic cycle breaks and other crap in
there that drives me nuts to look at. Then the old stuff can continue to
use that mess since it does work for what it was intended for, and I can
better control the output from the new stuff.
It would be nice if IBM would come out with the CVTRPGMRCL (Convert RPG II
Code Into RPGILE Using A Miracle) command to fix old stuff like this.
Thanks All
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Scott Schollenberger
Sent: Tuesday, October 16, 2007 4:38 PM
To: RPG programming on the AS400 / iSeries
Subject: RE: RPG II question
Record address files were typically produced by #GSORT on S/34 or S/36
(FMTDTA equivalent) by defining the sort specification as HSORTA rather
than HSORTR (or HSORTRS).
Only control fields were included in the sort specifications; no data
(FDC) fields.
#GSORT (or FMTDTA) creates a file containing the binary RRNOs of the
records included in the sort and the ordering applied by the sort. The
record address file is used to process the primary file by RRNO to
present the data in the selected/sorted order.
As previously mentioned, record address files could be used as a limits
file also.
I didn't do much of this, but I think you created one record in the file
that contained the low and high values of the keys you wanted to process
and the primary file would be read and only present records within those
key limits.
________________________________
Scott A. Schollenberger
Director, R&D
Harris School Solutions
Phone: (610) 239-9988 ext. 305
Fax: (610) 239-9995
Email: sschollenberger@xxxxxxxxxxxxxxxxxx
2011 Renaissance Blvd., Suite 100
King of Prussia, PA 19406
This message and any attachments are confidential to the ordinary user
of the e-mail address to which it was addressed and may also be
privileged. If you are not the addressee you may not copy, forward,
disclose or use any part of the message or its attachments and if you
have received this message in error, please notify the sender
immediately by return e-mail and delete it from your system. The sender
does not accept liability for any errors or omissions in the context of
this message that arise as a result of Internet transmission. Any
opinions contained in this message are those of the author and are not
given or endorsed by the Harris company or office through which this
message is sent unless otherwise clearly indicated in this message and
the authority of the author to so bind the Harris entity referred to is
duly verified.
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Dave Boettcher
Sent: Tuesday, October 16, 2007 5:29 PM
To: 'RPG programming on the AS400 / iSeries'
Subject: Re: RPG II question
>From the manual with WDSC it is a Record Address File. ONly used it a
few times, years ago.
Record Address File (RAF)
A record-address file is a sequentially organized file used to select
records from another file. Only one file in a program can be specified
as a record-address file. This file is described on the file description
specification and not on the input specifications. A record-address file
must be program-described; however, a record-address file can be used to
process a program described file or an externally described file.
The file processed by the record-address file must be a primary,
secondary, or full-procedural file, and must also be specified as the
parameter to the RAFDATA keyword on the file description specification
of the record-address file.
You cannot specify a record-address file for the device SPECIAL.
UCS-2 fields are not allowed as the record address type for record
address files.
A record-address file that contains relative-record numbers must also
have a T specified in position 35 and an F in position 22.
Quoted from the RPG reference
hth
Dave B
Hi,"Shannon ODonnell" <sodonnell@xxxxxxxxxxxxxxxxxxxxxxxxx> 10/16/07 4:21 PM >>>
What does the file type of "R" mean in an RPGII file spec? It's
position 18 of the "F" spec (where you might put a "P" for primary or
"I" for Input).
I so rarely use RPGII that I can no longer remember these old codes.
Thanks,
Shannon O'Donnell
--
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.
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.
midrange.com
