Re: COBOL user-defined functions

Joel

I'm not sure what you mean by user-defined functions in RPG - there are procedures that are callable with parameters - is this what you mean. But these are never considered to be commands as such - commands are a command line thing.

I've never done much with COBOL, obviously, except to make a couple small changes to handle precision of results of intermediate calculations - about 19 years ago!! And to make a kind of copy book for our RPG2SQL product stuff.

Regards
Vern

On 5/1/2012 1:33 PM, Stone, Joel wrote:

Thanks, but I am inquiring about USER-DEFINED functions, not ibm defined functions.

In RPG and all other modern widely-used languages, user-defined functions are the cornerstone of what makes the language popular and powerful - ie users can create their own commands to utilize.

Why doesn't COBOL/400 or COBOL/ILE support used defined functions? Is it just being left to die? Or is there some reason that it doesn't??


-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Winchester Terry
Sent: Tuesday, May 01, 2012 1:20 PM
To: 'Midrange Systems Technical Discussion'
Subject: RE: COBOL user-defined functions


The V5R4 Reference Manual is located here. See Chapter 15 - Intrinsic Functions

http://publib.boulder.ibm.com/infocenter/iseries/v5r4/topic/books/sc092539.pdf

Terry

-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Stone, Joel
Sent: Tuesday, May 01, 2012 10:12 AM
To: 'Midrange Systems Technical Discussion'
Subject: COBOL user-defined functions

Does COBOL/400 or COBOL /ILE support user-defined functions
in any fashion (like RPG and all other modern languages)?

For example,

Move DayOfWeek(Date-input) to print-line

Where DayOfWeek is a user-defined function returning "Monday"
or "Tuesday" or etc.

If not, why not?

Thanks!



______________________________________________________________________
This outbound email has been scanned for all viruses by the
MessageLabs Skyscan service.
For more information please visit http://www.symanteccloud.com
______________________________________________________________________
--
This is the Midrange Systems Technical Discussion
(MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.

Confidentiality Notice:

The preceding e-mail message (including any attachments) contains information that may be confidential, protected by applicable legal privileges, or constitute non-public information. It is intended to be conveyed only to the designated recipient(s). If you are not an intended recipient of this message, please notify the sender by replying to this message and then delete it from your system. Use, dissemination, distribution or reproduction of this message by unintended recipients is
not authorized and may be unlawful.