Re: If statements again..

[John Carr <74711.77@xxxxxxxxxxxxxx>]

Message text written by INTERNET:MIDRANGE-L@midrange.com
>
>> "Now I would tell the idea behind my question which I have been waiting
>>since the RPGLE have %ADDR function.  Because I have a project to build a
>>RPG program which can make decisions, and users can dymamically set up
the
>>rules.  Therefore, I would like to know if is there any function it
return
>>an?object like
>>

>  ojbect = %ObjectOf('CUSTID')" <<
.
>There are no plans that I know of to do this kind of thing, but you can in
fact
>effectively do it today.
>
>You simply (?) need to use the APIs to obtain the list of fields for the
>requested files.  Open the file under program control,  with the record
program
>described as one enormous character field.  Then present the extracted
field
>names to the user and use the field's offset position within the record to
>extract those fields requested.
>
>I know I've seen an example doing just this recently, I think it was in
the
>code that Julian Moneypenny published in the December (?) News/400.  The
code
>is on their web-site.  I'm afraid I can't check it out right now but if
you
>have problems finding it, send me an e-mail.
>
>Retrieve the list
>
>Jon Paris <


Jon 

I wrote a utility like that one back in '85 on the Sys/38.  I read in the
DSPFFD outfile(Sys/38 API)
of the file I wanted and also read in the real file as a program described
file.   I chunked thru the 
program described file byte by byte as per the DSPFFD info and presented
the data by RRN
with the real field name.    easy stuff.

John Carr 
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to "MIDRANGE-L@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
+---