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

bryan-yang · Posted: Sat Jul 28, 2007 8:36 am

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.

bryan-yang · Posted: Sat Jul 28, 2007 8:41 am

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

...

William Thompson · Posted: Sat Jul 28, 2007 12:31 pm

Is there a CEMT I PROG(BR0026) entry?
What does it show?

bryan-yang · Posted: Sun Jul 29, 2007 6:58 am

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

William Thompson · Posted: Sun Jul 29, 2007 3:03 pm

Have you tried to CEMT S PROG(BR0026) NEWC to newcopy the module?

bryan-yang · Posted: Tue Jul 31, 2007 2:51 pm

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.

Mickeydusaor · Posted: Wed Aug 01, 2007 12:19 am

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.