AW: Retrieving # of Records in RPG

I notice the field is 159B, not 159I? Would that make a difference I
wonder?

Yes, if there are more than 999,999,999 records in the physical file.
If you define your fields as B(Binary) it will be converted into a packed
field that cannot hold the possible range.
That means in your definition the maximum records will be 999,999,999 if
your file has more records your program will fail with something like this:
"Receiver Variable too small ...". If the field is defined as (I) integer,
it will not be converted into a packed fied and can hold the complete range
from -2.1 Billion to +2.1 Billion. But also Integer is not the best
definition, using U (unsigned integer will be a better solution. Maximum
number of columns a physical file can hold is 4.2 Billion records (or 1.7
Tera Byte), which is the maximum value of 10U 0 (or in your cas 156 159U
0).

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!"

-----Ursprüngliche Nachricht-----
Von: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] Im Auftrag von Booth Martin
Gesendet: Saturday, December 08, 2007 00:10
An: Midrange Systems Technical Discussion
Betreff: Re: Retrieving # of Records in RPG


I use this:

** * INFDS for database file. FileSize will contain the number
* of records in the file when the file is opened.
DINFDS DS
D FILESIZE 156 159B 0 **

I notice the field is 159B, not 159I? Would that make a difference I
wonder?

Jim Waymire wrote:

I would like to have the # of records in a file that is being
processed, thought the program data structure would return this. I
know I can get it in a cl, but prefer not to use cl's.

When I run with debug, here is the value that is being returned from
the program data structure. Any ideas what this represents? The
actual number of the file being read is 17,038.

Jim Waymire
Tallyho Systems, Inc.


NBRRCD = 1077952576

D sds
D errmsg 91 170
D userid 254 263
D date 276 281
D pgmid 324 333
D rtime 282 287 0
D nbrrcd 156 159i 0