In either way I'd define variables for holding relative record no as Uns(10)
or 10U 0 because, the maximum value (4.2 Billion) of the data type is also
the maximum number of rows a physical file or SQL table can hold.
Defining a column holding relative record no as Int(10) or 10I 0 cannot hold
the record no for (very) large tables.
Mit freundlichen Grüßen / Best regards
Birgitta Hauser
"Shoot for the moon, even if you miss, you'll land among the stars." (Les
Brown)
"If you think education is expensive, try ignorance." (Derek Bok)
"What is worse than training your staff and losing them? Not training them
and keeping them!"
?Train people well enough so they can leave, treat them well enough so they
don't want to.? (Richard Branson)
-----Ursprüngliche Nachricht-----
Von: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] Im Auftrag von Glenn
Gundermann
Gesendet: Wednesday, 10.8 2016 22:40
An: RPG programming on the IBM i (AS/400 and iSeries)
Betreff: Re: Fully freeform file information DS
Hi Jeff,
Even in fixed form, an integer of 4,0 wouldn't be allowed so your dilemna
isn't restricted to free-form.
Others with more knowledge might very well correct me if I'm wrong but my
notes have the following:
int(3) ranges from -128 to 127
int(5) ranges from -32768 to 32767
int(10) ranges from -2147483648 to 2147483647
Cheers,
Yours truly,
Glenn Gundermann
Email: glenn.gundermann@xxxxxxxxx
Work: (416) 675-9200 ext. 89224
Cell: (416) 317-3144
On 9 August 2016 at 15:17, Jeff Crosby <jlcrosby@xxxxxxxxxxxxxxxx> wrote:
Having a brain fart.
I want a fully freeform file information DS to get the number of
records, something like this:
dcl-ds dsFile;
NumRcds Int(?) Pos(156);
end-Ds;
The RPG reference has it in fixed form, like this:
D NUM_RCDS 156 159I 0
I can't define Int(4) because it says that's not a valid length for Int().
What am I missing?
Thanks.
--
Jeff Crosby
VP Information Systems
UniPro FoodService/Dilgard
P.O. Box 13369
Ft. Wayne, IN 46868-3369
260-422-7531
www.dilgardfoods.com
The opinions expressed are my own and not necessarily the opinion of
my company. Unless I say so.
--
This is the RPG programming on the IBM i (AS/400 and 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.
Please contact support@xxxxxxxxxxxx for any subscription related questions.
midrange.com
