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

Problem in loading a program


IBM Mainframe Forums -> CICS
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
venuhunev

New User


Joined: 26 May 2007
Posts: 70
Location: chennai

PostPosted: Wed Jun 04, 2008 5:28 pm
Reply with quote

Hi,

I have modified a COBOL CICS DB2 program and the corresponding map.
Modification is, there will be four options in the main menu. I have removed the third option and thus changing the fourth option to third.
So in the application, if i give 3, it should select the appropriate map.

To refresh the changes incorporated, i have used the following command.
Code:

CEMT SET PROG(XC80020A,XC8002M) NEW


Code:

 STATUS:  RESULTS - OVERTYPE TO MODIFY                               
 Prog(XC80020A) Leng(0000009208) Cob Pro Ena Pri     Ced     NORMAL
    Res(000) Use(0000000004) Bel Uex Ful Qua Cic                   
 Prog(XC8002M ) Leng(0000000600)     Map Ena Pri             NORMAL
    Res(000) Use(0000000004)             Qua Cic                   


But only the map changes are reflected. If i give option 3, the screen is getting hanged for a longer time.
Back to top
View user's profile Send private message
Craq Giegerich

Senior Member


Joined: 19 May 2007
Posts: 1512
Location: Virginia, USA

PostPosted: Wed Jun 04, 2008 6:12 pm
Reply with quote

Did you compile the program and put it in the proper loadlib?
Back to top
View user's profile Send private message
venuhunev

New User


Joined: 26 May 2007
Posts: 70
Location: chennai

PostPosted: Wed Jun 04, 2008 6:46 pm
Reply with quote

Ya. I use changeman. I have compiled it as i do for a COBOL program and placed it in loadlibb. Any special compilation needed ? icon_eek.gif
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2146
Location: At my coffee table

PostPosted: Wed Jun 04, 2008 6:53 pm
Reply with quote

CEMT SET PROG(value) NEW
(value) specifies a program identifier (1-8 characters), which is the name of a specific program entry in the table of installed program definitions.
Back to top
View user's profile Send private message
venuhunev

New User


Joined: 26 May 2007
Posts: 70
Location: chennai

PostPosted: Wed Jun 04, 2008 7:35 pm
Reply with quote

I used CEMT SET PROG(value) NEW only to get the code changes into the transaction. I am unable to find the reason why the application is getting hanged.
Back to top
View user's profile Send private message
Aaru

Senior Member


Joined: 03 Jul 2007
Posts: 1287
Location: Chennai, India

PostPosted: Wed Jun 04, 2008 8:16 pm
Reply with quote

venu,

Try this command.

Code:
CECI LOAD PROG(pgmname)

and then CEMT SET PROG(pgmname) NEW


I am not sure but give it a try.
Back to top
View user's profile Send private message
venuhunev

New User


Joined: 26 May 2007
Posts: 70
Location: chennai

PostPosted: Thu Jun 05, 2008 9:23 am
Reply with quote

Code:

LOAD PROG(LS80020A)                     
STATUS:  ABOUT TO EXECUTE COMMAND       
 EXEC CICS  LOad                       
  Program( 'LS80020A' )                 
  < Set() >                             
  < Length() | Flength() >             
  < Entry() >                           
  < Hold >                             



SET PROG(LS80020A) NE                                                 
STATUS:  RESULTS - OVERTYPE TO MODIFY                                 
 Prog(LS80020A) Leng(0000009208) Cob Pro Ena Pri     Ced     NORMAL   
    Res(000) Use(0000000004) Bel Uex Ful Qua Cic                     
                                                                     


But no use. It is getting hanged.

The program is in active status in changeman. I think it doesnt have any errors wen compiling. I dont know why the prob exists.
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2146
Location: At my coffee table

PostPosted: Thu Jun 05, 2008 2:41 pm
Reply with quote

venuhunev wrote:
But no use. It is getting hanged.
Not real descriptive.....
Debug, debug, debug!!!!

CEDF the transaction.
Once started, drop into CECI and load the program, copy the load address and swtich to displat working storage, paste the load address and look at the bind date and time, comfirm it is the version you want.
Then do the same for the map.
Then let the CEDF transaction continue until it 'hangs'.
You will then know why.

Confirm the prog and map are the new ones and then debug your programming problem.
Back to top
View user's profile Send private message
shagnwrx

New User


Joined: 07 Jul 2006
Posts: 17
Location: Birmingham, AL

PostPosted: Fri Jun 06, 2008 1:49 am
Reply with quote

venuhunev wrote:
Ya. I use changeman. I have compiled it as i do for a COBOL program and placed it in loadlibb. Any special compilation needed ? icon_eek.gif


This is just a hunch.. but "loadlibb"? That sounds like a naming convention for a batch loadlib. Sounds like you're compiling into the wrong loadlib. Is there a loadlibo? ( o for online).
Back to top
View user's profile Send private message
Craq Giegerich

Senior Member


Joined: 19 May 2007
Posts: 1512
Location: Virginia, USA

PostPosted: Fri Jun 06, 2008 3:53 am
Reply with quote

Is it compiled as a CICS program?
Back to top
View user's profile Send private message
venuhunev

New User


Joined: 26 May 2007
Posts: 70
Location: chennai

PostPosted: Fri Jun 06, 2008 10:11 am
Reply with quote

How to compile it as a cics program. is there any option in changeman ?

I have compiled liek a COBOL program compilation only.
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Fri Jun 06, 2008 7:14 pm
Reply with quote

Hello,

Talk with your peers or your cics support people. There is probably a standard cics compile process and you should use it.
Back to top
View user's profile Send private message
venuhunev

New User


Joined: 26 May 2007
Posts: 70
Location: chennai

PostPosted: Fri Jun 06, 2008 7:59 pm
Reply with quote

I wil try to check icon_smile.gif
Thanks guys for the support
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 -> CICS

 


Similar Topics
Topic Forum Replies
No new posts Using API Gateway from CICS program CICS 0
No new posts Map Vols and Problem Dataset All Other Mainframe Topics 2
No new posts DB2 Event passed to the Application P... DB2 1
No new posts How to pass the PARM value to my targ... COBOL Programming 8
No new posts REXX code to expand copybook in a cob... CLIST & REXX 2
Search our Forums:

Back to Top