AW: Retrieving # of Records in RPG

["BirgittaHauser" <Hauser@xxxxxxxxxxxxxxx>]

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