Re: Cobol Subprocedures, Prototype definitions and interfaces, etc.

I'd point you to the manual page but it seems to only be available in pdf form these days.

It is the same in both OPM and ILE COBOL.

Example:

77 FileName Pic X(10).
77 Libname Pic X(10).

01 FullName.
05 file like FileName.
05 library like LibName.

Very similar to the RPG LIKE keyword or RPG400's *LIKE DEFN.


Jon Paris

www.Partner400.com
www.SystemiDeveloper.com



On Aug 19, 2010, at 2:34 AM, <geir.kildal@xxxxxxxxxx> <geir.kildal@xxxxxxxxxx > wrote:

Hi Jon.

Could you please describe the statement format(s)for using the keyword 'LIKE' in COBOL?


Mvh.

Geir.

"Keep it simple!"


-----Opprinnelig melding-----
Fra: cobol400-l-bounces@xxxxxxxxxxxx [mailto:cobol400-l-bounces@xxxxxxxxxxxx ] På vegne av Jon Paris
Sendt: 19. august 2010 02:11
Til: COBOL Programming on the iSeries/AS400
Emne: Re: [COBOL400-L] Cobol Subprocedures, Prototype definitions and interfaces, etc.

Hey - if you're generating it it doesn't matter how easy the code is for anybody to read and if you have to gen unwanted return variables who cares!

In defence of the COBOL team, it is really hard to introduce this kind of feature (subprocs or prototypes for example) because you a) Have to get permission from the internal IBM COBOL council and b) Have to ensure that nothing you do will leave you with a problem in implementing future ANSI standards.

It took us over 12 months of work and research to get agreement to adding the LIKE keyword to COBOL!


Jon Paris

www.Partner400.com
www.SystemiDeveloper.com



On Aug 18, 2010, at 7:26 PM, steelville wrote:

Geez. And they wanted everybody to do EGL and generate Cobol?! Wow.
Not
that I should have been surprised, though.

--
This is the COBOL Programming on the iSeries/AS400 (COBOL400-L) mailing list To post a message email: COBOL400-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/cobol400-l
or email: COBOL400-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at http://archive.midrange.com/cobol400-l .

--
This is the COBOL Programming on the iSeries/AS400 (COBOL400-L) mailing list
To post a message email: COBOL400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/cobol400-l
or email: COBOL400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/cobol400-l.