IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

What is an entry point in a cobol program


IBM Mainframe Forums -> COBOL Programming
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
rajasekhar reddy

New User


Joined: 17 Jan 2006
Posts: 10

PostPosted: Mon May 08, 2006 11:30 am
Reply with quote

hi all,
can i know in detail what is an entry point in a cobol program?
i have gone thru many articles but i cant get a clear view of it.

Thanks in advance
Rajasekhar Reddy.K
Back to top
View user's profile Send private message
dneufarth

Active User


Joined: 27 Apr 2005
Posts: 420
Location: Inside the SPEW (Southwest Ohio, USA)

PostPosted: Mon May 08, 2006 5:40 pm
Reply with quote

It's the line of code that starts execution of the program when given control after loading by the operating system or when control is passed from module to module in a statically linked program
Back to top
View user's profile Send private message
rajasekhar reddy

New User


Joined: 17 Jan 2006
Posts: 10

PostPosted: Tue May 09, 2006 10:18 am
Reply with quote

hi ,
Thanks for the response.
can you make it a bit clear.

Thanks in advance
Back to top
View user's profile Send private message
Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1353
Location: Israel

PostPosted: Fri May 19, 2006 2:03 am
Reply with quote

Entry points are used by subprograms to specify different subfunctions.
Here is a sample, with 3 entry points:

Code:
ID DIVISION.
PROGRAM-ID. PROGNM1.

LINKAGE SECTION.
01  LK-PARM1  PIC X(8).
01  LK-PARM2  PIC X(130).

PROCEDURE DIVISION USING LK-PARM1.
    PERFORM 1A-PROCESS-OPTION1.
ENTRY PROGNM2 USING LK-PARM1 LK-PARM2.
    PERFORM 2A-PROCESS-OPTION2.
ENTRY PROGNM3 USING LK-PARM1.
    PERFORM 3A-PROCESS-OPTION3.


The main program will be able to do:
Code:
    CALL 'PROGNM1' USING WS-PARM1
    CALL 'PROGNM2' USING WS-PARM1 WS-PARM2
    CALL 'PROGNM3' USING WS-PARM1


The DATA DIVISION is shared by all the entry points, which means, for example, that the file opened by OPENA can be closed by CLOSEA.
Back to top
View user's profile Send private message
vijayamadhuri

Active User


Joined: 06 Apr 2005
Posts: 180

PostPosted: Wed May 31, 2006 2:22 am
Reply with quote

please refer to the link http://publibfp.boulder.ibm.com/cgi-bin/bookmgr/BOOKS/dfsapdg1/1.3.16?SHELF=&DT=20040902183355
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> COBOL Programming

 


Similar Topics
Topic Forum Replies
No new posts Replace each space in cobol string wi... COBOL Programming 3
No new posts Using API Gateway from CICS program CICS 0
No new posts COBOL -Linkage Section-Case Sensitive COBOL Programming 1
No new posts COBOL ZOS Web Enablement Toolkit HTTP... COBOL Programming 0
No new posts Calling DFSORT from Cobol, using OUTF... DFSORT/ICETOOL 5
Search our Forums:

Back to Top