RE: Display Files in Cobol/400

[Vernon Hamberg <vhamberg@xxxxxxxxx>]

As you suggest, a subfile can be seen as just an array of data 'records'
with associated attributes. It can include fields that won't be displayed
(hidden) but are needed for some reason - like a code that will be
returned, while its description is displayed.

The display shows a window on this array, and there's no reason this can't
be done, including rollup/down, Bottom, More..., etc., activity. The one
area that could be a problem is, you might run out of indicators for
display attributes. Subfiles store them in the record when you write it.

At 07:38 AM 3/20/02 -0500, you wrote:
>As far as I know, the only way to accomplish this would be to define the
>fields on the screen using numeric extensions.  You could then use arrays in
>COBOL or a work file to load the screen fields.  I guess it would be
>something like:
>FIELDA1, FIELDA2, FIELDA3...FIELDA10 in the DDS.
>
>Having written COBOL on the AS/400, I'll tell you that my experience with
>subfiles in that language was that of someone wondering what the compiler
>writer was thinking.  Subfiles are significantly more difficult to manage in
>COBOL than RPG on the AS/400.
>
>Hope that helps and good luck.
>
>Donald R. Fisher, III
>Project Manager
>The Roomstore Furniture Company
>(804) 784-7600 ext. 2124
>DFisher@roomstoreeast.com
>
><clip>
>If we use subfiles, then the programs will have to be rewritten. Is there
>a way of having multiple records on the screen without having to code
>subfiles?
><clip>
>_______________________________________________
>This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
>To post a message email: MIDRANGE-L@midrange.com
>To subscribe, unsubscribe, or change list options,
>visit: http://lists.midrange.com/cgi-bin/listinfo/midrange-l
>or email: MIDRANGE-L-request@midrange.com
>Before posting, please take a moment to review the archives
>at http://archive.midrange.com/midrange-l.