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
 

 

How to reload a sub moudle in a main line program?

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS
View previous topic :: :: View next topic  
Author Message
bryan-yang

New User


Joined: 16 Apr 2006
Posts: 16
Location: BeiJing, China

PostPosted: Sat Jul 28, 2007 8:36 am    Post subject: How to reload a sub moudle in a main line program?
Reply with quote

Main line PGM: BR0000, a application main line PGM
Sub_PGM : BR0026

Main line PGM is permanently resident in CICS. Now any changes in PGM BR0026, we all need to link the PGM BR0026 to BR0000, then bring down BR0000 and newcopy BR0000, bring up BR0000 again. In this period, we can't process any transactions.

When I change the PGM BR0026, how to release the PGM BR0026 from CICS, only new copy the PGM BR0026, no need bring down the application BR0000.
Back to top
View user's profile Send private message

bryan-yang

New User


Joined: 16 Apr 2006
Posts: 16
Location: BeiJing, China

PostPosted: Sat Jul 28, 2007 8:41 am    Post subject:
Reply with quote

The PGM BR0026 in main line PGM BR0000 as the below:
...
01 WA-PGM-BR0026 PIC X(8) VALUE "BR0026 ".
...
CALL WA-PGM-BR0026 USING STARTAREA

...
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3158
Location: Tucson AZ

PostPosted: Sat Jul 28, 2007 12:31 pm    Post subject:
Reply with quote

Is there a CEMT I PROG(BR0026) entry?
What does it show?
Back to top
View user's profile Send private message
bryan-yang

New User


Joined: 16 Apr 2006
Posts: 16
Location: BeiJing, China

PostPosted: Sun Jul 29, 2007 6:58 am    Post subject:
Reply with quote

Here is the Info. of CEMT I PROG(BR0026).

I PROG(BR0026)
STATUS: RESULTS - OVERTYPE TO MODIFY
Prog(BR0026 ) Leng(0000000000) Cob Pro Ena Pri Ced Dyn
Res(000) Use(0000000000) Any Uex Ful Qua Cic
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3158
Location: Tucson AZ

PostPosted: Sun Jul 29, 2007 3:03 pm    Post subject:
Reply with quote

Have you tried to CEMT S PROG(BR0026) NEWC to newcopy the module?
Back to top
View user's profile Send private message
bryan-yang

New User


Joined: 16 Apr 2006
Posts: 16
Location: BeiJing, China

PostPosted: Tue Jul 31, 2007 2:51 pm    Post subject:
Reply with quote

Since the PGM BR0016 is called by main line PGM BR0000(The main task don't end untill EOD), it's rescount > 1. I can't newcopy it. So main problem is how to set the rescount to ZERO.
Back to top
View user's profile Send private message
Mickeydusaor

Active User


Joined: 24 May 2006
Posts: 258
Location: Salem, Oregon

PostPosted: Wed Aug 01, 2007 12:19 am    Post subject:
Reply with quote

Get rid of the CALL and make it a CICS LINK, then you will be able to
make changes and do a newcopy without any problems.
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 -> CICS All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Writing a file using online program grvtomar PL/I & Assembler 3 Fri Jun 30, 2017 1:06 pm
No new posts pre-compiler for program in an HFS Pedro DB2 0 Fri Jun 23, 2017 11:13 pm
No new posts Compiling program in endeavor for tra... RALAKKAL Compuware & Other Tools 4 Mon Jun 05, 2017 8:27 pm
No new posts COBOL DB2 program - zIIP eligible vasanthz COBOL Programming 7 Wed May 31, 2017 5:12 am
No new posts DB2 Program abending without giving a... rahulgarg14 DB2 7 Mon May 29, 2017 8:10 pm


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