RE: generic file display program was: (no subject)

This is a multipart message in MIME format.
--
[ Picked text/plain from multipart/alternative ]
Buck, in a similar situation I have defined a Hidden field on the Subfile
record line that is either a datastructure with EXTNAME(RealFile)  or a
hidden field that is 1,024 columns long and has the needed data Eval'd in
to it. Then the original record's data is there for refresh, for
comparisons, and for identifying whence & whither.  This leaves me with 2
parms (Original & newChanges) that can be passed from & to a
validity/processing program with ease.

----------------------------------------------------------------
Booth Martin, 802-454-8315 x235
Goddard College Information Services
http://www.Goddard.edu
----------------------------------------------------------------




Buck Calabro <Buck.Calabro@commsoft.net>
Sent by: rpg400-l-admin@midrange.com
08/31/01 10:41 AM
Please respond to rpg400-l


        To:     rpg400-l@midrange.com
        cc:
        Subject:        RE: generic file display program   was: (no subject)


john smith wrote:

> One interesting use would be to have a 'calleable
> generic file display program'. Thus the generic field
> could be a , say, 70 char line on a subfile display.
> Then calling this generic pgm with a file name as parm
> (from within another interactive pgm) would display a
> sub-file screen with the records of the file being
> displayed. This generic pgm could then return the
> record being selected from the subfile to the original
> pgm for further processing. I hope you get the idea.

Yes, I get the idea, but I'm too dim to grasp what useful processing can
occur on the returned string.  Without a key to tie the record back to the
database, I'm stumped.  Not the first time though! <g>

Anyway, David Morris posted some very illuminating code snippets on using
the SQLDA to the MIDRANGE-L list on 3 Oct 1997.  I think that would be a
great place to start your exploration.  I'd love to hear how it turned
out.

Buck Calabro
Commsoft; Albany, NY
Visit the Midrange archives and FAQ at http://www.midrange.com
"For every complex problem, there is a solution that is simple, neat, and
wrong."
 -- HL Mencken
_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.