HP3000-L Archives

August 2001, Week 1

HP3000-L@RAVEN.UTC.EDU
Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
Cobol Question
From:
Tony Summers <[log in to unmask]>
Reply To:
Tony Summers <[log in to unmask]>
Date:
Tue, 7 Aug 2001 11:27:52 +0100
Content-Type:
text/plain
Parts/Attachments:
text/plain (32 lines) 
(Posted to Cobol list earlier on). 

Is anyone aware of a pre-defined cobol variable (like Time and Date) which will complete the following puzzle.   What I'ld like is My-Variable to contain is the name of the entry point - i.e to contain "M4ABCD" at (1) and "M4EFGH" at (2). 


ENTRY "M4ABCD" USING X,Y,Z,,,,,etc 
M4ABCD-FIRST-ENTRY-POINT SECTION.  
*
 ABCD-ENTER.
* 
    MOVE ???????????? TO MY-VARIABLE.    
*   (1)

 ABCD-EXIT. 
     EXIT. 

ENTRY "M4EFGH" USING X,Y,Z,,,,,etc 
M4EFGH-FIRST-ENTRY-POINT SECTION.  
*
 EFGH-ENTER.
   
    MOVE ???????????? TO MY-VARIABLE.  
*    (2)

 EFGH-EXIT. 
     EXIT. 

   

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2