Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

OS/VS cobol to Enterprise cobol conversion - BLL CELLS

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
santhosh552

New User


Joined: 04 Jun 2009
Posts: 1
Location: hyderabad,india

PostPosted: Mon Jun 08, 2009 11:44 am    Post subject: OS/VS cobol to Enterprise cobol conversion - BLL CELLS
Reply with quote

As part of Enterprise Cobol 3.1v upgradation i am trying to remove the "BLL CELLS" from a CICS program. This program is being called from a NATURAL program. I have removed the code in RED color as BLL cells are not supported in enterprise cobol.But i am not sure what statements i have to use in place of BLL CELLS to maintain the addressability of linkage section variables . Can anyone please guide me on this ?

LINKAGE SECTION.
01 BLL-CELLS.
05 BLL-PTR PIC S9(8) COMP.
05 TWA-PTR PIC S9(8) COMP.
05 PTR-LIST-PTR PIC S9(8) COMP.
05 PSCOMM-PTR PIC S9(8) COMP.

01 TWA.
05 TWA-ADDRESS PIC S9(8) COMP.

01 PTR-LIST.
05 COMM-ADDRESS PIC S9(8) COMP.

01 INPUT-OUTPUT-DATA.
05 IO-VINA PIC X(515).
05 IO-VRAP-SW PIC X(1).
05 IO-VRAP-CODE PIC X(1).
05 IO-ANTI-LOCK-BRAKE-CODE PIC X.
05 IO-BRAKE-RETURN-CODE PIC X.
05 IO-DAY-RUN-LIGHTS PIC X.
PROCEDURE DIVISION.
0000-MAINLINE.

PERFORM 1000-ESTABLISH-ADDRESSABILITY
THRU 1000-EXIT.

PERFORM 2000-MAIN
THRU 2001-MAIN-EXIT.

0000-EXIT.
EXEC CICS RETURN END-EXEC.
GOBACK.

1000-ESTABLISH-ADDRESSABILITY.
SERVICE RELOAD BLL-CELLS.
EXEC CICS ADDRESS TWA (TWA-PTR)
END-EXEC.
SERVICE RELOAD TWA.
MOVE TWA-ADDRESS TO PTR-LIST-PTR.
SERVICE RELOAD PTR-LIST.
MOVE COMM-ADDRESS TO PSCOMM-PTR.
SERVICE RELOAD INPUT-OUTPUT-DATA.
1000-EXIT.
EXIT..
Back to top
View user's profile Send private message

Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7936
Location: Bellevue, IA

PostPosted: Mon Jun 08, 2009 4:45 pm    Post subject:
Reply with quote

Google is your friend.

A search on "os/vs cics conversion" rapidly found this link: http://publib.boulder.ibm.com/infocenter/pdthelp/v1r1/index.jsp?topic=/com.ibm.entcobol.doc_3.4/igym1c11.htm which talks about the steps to take to convert OS/VS code to Enterprise COBOL.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
This topic is locked: you cannot edit posts or make replies. Full Time COBOL Software Development ... shally Mainframe Jobs 0 Fri Jan 20, 2017 5:24 am
This topic is locked: you cannot edit posts or make replies. COBOL Software Development Lead at Fi... shally Mainframe Jobs 0 Fri Jan 20, 2017 5:21 am
No new posts Executing OO COBOL program invoking J... Virendra Shambharkar COBOL Programming 2 Tue Jan 10, 2017 6:37 pm
No new posts OO COBOL compile error Virendra Shambharkar COBOL Programming 3 Tue Jan 10, 2017 6:05 pm
No new posts Need Suggestion on COBOL program vickey_dw COBOL Programming 5 Thu Jan 05, 2017 10:55 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us