RE: Retrieving SFLPAG Value

[Brian Johnson <brian@xxxxxxxxxxxxxxx>]

You can use the file information data structure.  Field *STATUS is set to   
13 when the subfile record that matches SFLSIZ is written.  So if you set   
SFLSIZ to twice SFLPAG, you can write until *STATUS is 13, and you've   
built your two pages.  Divide the Subfile RRN by two and you've got the   
value of SFLPAG.  It's not hard coded, but you do have to know the   
relationship between the values assigned to SFLSIZ and SFLPAG in the DDS.   
   


Brian Johnson
Help/Systems, Inc.
brian@helpsystems.com
www.helpsystems.com
(612) 563-1627

 -----Original Message-----
From: Ladutko, Bob
Sent: Friday, December 04, 1998 14:22
To: brian; 'mail@uucp <MIDRANGE-L@midrange.com>'
Subject: Retrieving SFLPAG Value

Does anyone know if you can retrieve the SFLPAG value for a subfile   
within
an RPG program?

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---