When to use PROCEDURE-POINTER phrase?

OS/VS COBOL, COBOL II, Enterprise COBOL for z/OS. OpenCOBOL and OOCobol.
Previous topicNext topic

Topic Author
Neeraj N
Registered Member
Posts: 46
Joined: Tue Aug 20, 2013 12:49 pm

When to use PROCEDURE-POINTER phrase?

Post by Neeraj N » Wed Jul 12, 2017 1:57 pm

In one of the programs I've seen that they are using PROCEDURE-POINTER phrase. Have read about it here: https://www.ibm.com/support/knowledgece ... ddepro.htm but I could not really understand when do we really made a decision to make use of PROCEDURE-POINTER? Could someone please guide me on this.



User avatar

Robert Sample
Global Moderator
Global Moderator
Posts: 1352
Joined: Fri Jun 28, 2013 1:22 am
Location: Dubuque Iowa
Zodiac: Virgo

Re: When to use PROCEDURE-POINTER phrase?

Post by Robert Sample » Wed Jul 12, 2017 5:05 pm

A PROCEDURE-POINTER is needed if AND ONLY IF you need the starting address of a program. This is needed for certain LE functions. The PROCEDURE-POINTER is rarely used.




Topic Author
Neeraj N
Registered Member
Posts: 46
Joined: Tue Aug 20, 2013 12:49 pm

Re: When to use PROCEDURE-POINTER phrase?

Post by Neeraj N » Sat Nov 25, 2017 8:50 am

Thanks Robert. Is this pointer is like the pointers we use C?



User avatar

Robert Sample
Global Moderator
Global Moderator
Posts: 1352
Joined: Fri Jun 28, 2013 1:22 am
Location: Dubuque Iowa
Zodiac: Virgo

Re: When to use PROCEDURE-POINTER phrase?

Post by Robert Sample » Sat Nov 25, 2017 5:17 pm

Most likely, someone read about the PROCEDURE-POINTER and decided to implement it in your application without really having a need for it. Many new features of COBOL get used just so people can say they've used the feature, not because the need exists for the feature in that application. A PROCEDURE-POINTER would come in handy in only a very few circumstances -- such as when you have nested COBOL programs and want to know the original program name, for example.



Previous topicNext topic

Return to “IBM COBOL, GnuCOBOL (OpenCOBOL), OOCobol.”