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

CICS Call error


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

New User


Joined: 23 Dec 2009
Posts: 3
Location: hyd

PostPosted: Fri Oct 05, 2012 12:01 am
Reply with quote

Hi,

We have vb.net front end calling cics ..which inturn calls Cobol db2 when this Cobol db2 program changed compiled and ran bind job still it is giving 805 but as I chkd the plan is fine , so my question is that is there any need for CICS region to be refreshed whenever there is a change,, there is no change to cics program the change is only to called Cobol db2 program... Any suggestions would be appreciated
Thanks
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA

PostPosted: Fri Oct 05, 2012 12:38 am
Reply with quote

If the program is defined to CICS, any changes will not be picked up until a NEWCOPY is done against the program, or the CICS region comes down and back up.
Back to top
View user's profile Send private message
holmeroad

New User


Joined: 23 Dec 2009
Posts: 3
Location: hyd

PostPosted: Fri Oct 05, 2012 1:05 am
Reply with quote

Thanks Robert ..can you help me in detail understanding this...the program is a dynamic called cobol db2 program so it will be having PPT entry.. So as this is not a new program ..I just changed it so can you help me understand if I promote the change package to one region ..that load will be getting picked up while this region up down happen?
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 Oct 05, 2012 1:17 am
Reply with quote

Hello,

A NEWCOPY and a "new program" are Not the same thing.

When the region is re-cycled (down/up), the copy of the code in the library will be used.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA

PostPosted: Fri Oct 05, 2012 1:21 am
Reply with quote

CICS loads a program into memory only one time -- when it is first used. Therefore, if you change that program in any way, CICS will not recognize the changes until the next time it loads the program into memory. NEWCOPY is a CICS short cut that causes CICS to load the program from disk back into memory instead of relying upon the copy already in memory.
Back to top
View user's profile Send private message
holmeroad

New User


Joined: 23 Dec 2009
Posts: 3
Location: hyd

PostPosted: Fri Oct 05, 2012 1:44 am
Reply with quote

Pardon me for not putting my thought clearly.. This NEWCOPY required for CICS PROGRAM isn't it ..the program I changed was a pure COBOL db2 program doesn't have any exec cics statements.. It's just getting called from a CICS program thats it
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 Oct 05, 2012 1:47 am
Reply with quote

Hello,

Quote:
This NEWCOPY required for CICS PROGRAM isn't it ..
I suspect it probably is . . .

If a cics program calls this code from within a cics session, the code has to be loaded before it can be executed . . . It will either be loaded when the cics region is started or later when first referenced.

Maybe there is something i am missing.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Fri Oct 05, 2012 2:23 am
Reply with quote

if
Quote:
it will be having PPT entry

then a newcopy is required to reload the module into the cics internal loadlib which is in memory and not on disk.

before you ask another question, how about reading???

had you tried the newcopy, instead of wasting space in the forum with questions,
you would have resolved the question of whether the newcopy
corrects you -805 problem.

but instead of trying something, you have wasted hours debating a subject
of which you have little knowledge.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA

PostPosted: Fri Oct 05, 2012 6:53 am
Reply with quote

Quote:
Pardon me for not putting my thought clearly.. This NEWCOPY required for CICS PROGRAM isn't it ..the program I changed was a pure COBOL db2 program doesn't have any exec cics statements.. It's just getting called from a CICS program thats it
As was mentioned, if a program has a PPT entry (as you mentioned in your second post), then changes will NOT be picked up by CICS until a NEWCOPY is done.
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 Oct 05, 2012 8:00 am
Reply with quote

Hello,

Have you looked at why/how a -805 is raised?

When do you see the -805? What action caused this?

You need to determine the cause of the -805. I suspect all of the dialog about the NEWCOPY has nothing to do with the -805.

When you read about the -805 in the documentation, you should find:
Quote:
-805 DBRM OR PACKAGE NAME
location-name.collection-id.dbrm-name.consistency -token NOT FOUND
IN PLAN plan-name. REASON reason
You need to post the diagnostic info that has not yet been posted.
Back to top
View user's profile Send private message
Bill O'Boyle

CICS Moderator


Joined: 14 Jan 2008
Posts: 2501
Location: Atlanta, Georgia, USA

PostPosted: Fri Oct 05, 2012 9:46 am
Reply with quote

Is the sub-program statically-called? I get the impression that it is as you elude to the program not having a PPT entry. If it did, then it would be a CICS Dynamic-Call.

If it's statically called, then ANY potential modified storage should be passed to the sub-program by the re-entrant Caller as a parm or accessed directly if it's defined as EXTERNAL in the Caller's WS.

If there are different logic paths in the statically-called sub-program and the Caller's RESCOUNT > 1, then each task can be trampling on each others modified non-reentrant storage. This would need to be fixed in a single TCB ("QR") environment and wreak all sorts of havoc in a multiple/concurrent TCB environment ("L8's") known as Threadsafe/DB2.
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 Error to read log with rexx CLIST & REXX 11
No new posts Error when install DB2 DB2 2
No new posts CLIST - Virtual storage allocation error CLIST & REXX 5
No new posts Calling an Open C library function in... CICS 1
Search our Forums:

Back to Top