Finding the name of the program that called the current COBOL 5 or 6 program

You can find the name of the calling programs from a COBOL 5 or 6 program at run time by using the LE service CEETBCK. For more information, see the z/OS® Language Environment® Vendor Interfaces.