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 find a program that updates the IMS DB

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IMS DB/DC
View previous topic :: :: View next topic  
Author Message
girias

New User


Joined: 09 Feb 2007
Posts: 26
Location: Chennai

PostPosted: Fri May 04, 2007 7:20 pm    Post subject: How to find a program that updates the IMS DB
Reply with quote

Hi,

I have a Program which will select the ITEM Description from the IMS DB based on the ITEM #. The Job is getting abended as the ITEM Description is not there in the database.

I need to find which Job/Program is updating the IMS database. Is there any method to find that?

Please advise.

Thanks in advance
-Giri.
Back to top
View user's profile Send private message

Devzee

Active Member


Joined: 20 Jan 2007
Posts: 684
Location: Hollywood

PostPosted: Sat May 05, 2007 2:26 am    Post subject:
Reply with quote

You can first search which PSB has Update option for that segment.

Or you can search program which has ISRT or REPL IMS functions.
and then narrow your search to your database/ segment
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Wed May 09, 2007 2:05 am    Post subject:
Reply with quote

girias,

You should explain a bit more about your problem. Was this ITEM# present in the database (prooved by status code blank at a GET call) and then disappeared? If so did you perform a HOLD call? If so have a look at the command codes preserving updating until you release it. Search for command codes in the first link of my signature.
Back to top
View user's profile Send private message
girias

New User


Joined: 09 Feb 2007
Posts: 26
Location: Chennai

PostPosted: Wed May 09, 2007 1:18 pm    Post subject:
Reply with quote

George,

I will explain the issue in a better way.

The business need is, the program B should abend if the Item description for the particular Item # is not thr in the DB. There is another Program A which inserts the Item # and the Item description into the DB. Program A inserted the Item # but failed to insert the Item Description alone.
I need to find which the Job A.

Hope this is clear.

-Giri
Back to top
View user's profile Send private message
rameshfoa

New User


Joined: 05 Apr 2007
Posts: 27
Location: chennai

PostPosted: Wed May 09, 2007 4:34 pm    Post subject:
Reply with quote

Then..you need to follow what Devzee has told...search the segment with PROCOPT = I or A in the PSB library and from the list of program find the exact program which updates the field.
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Thu May 10, 2007 12:33 am    Post subject:
Reply with quote

Well, looks like the problem is now clear to me. There might be two problem causing programs; program A as well as program B.

A is supposed to insert an ITEM# (probably the root) and subsequently insert a dependend of child segment ITEM_DESCRIPTION. The ITEM# is inserted indeed but the dependent might be inserted somewhere else if positioning or SSA's are not in order.

B is supposed to find the ITEM# and the ITEM_DESCRIPTION subsequently. It failes to obtain a status-code blank for the ITEM_DESCRIPTION. This might be caused by a wrongly coded GET call.

It's not taken for granted program B operates correctly. First we need to know whether the structure of the GET call performed by B and if the values of the SSA's are correct (also compared to the PCB; is the ITEM_DESCRIPTION a sensetive segment to the program). Is it a GU followed by GNP or a GU with multiple SSA's? The key feedback area could tell us more about the successfull level and key. And what is the status-code returned by IMS? Is it a GE indeed or an invalid or not-sensetive segment type in the subsequent SSA? If we make sure B operates correctly then we can start tracing A. This might be done by a simple 3.14 in ISPF for locating the source and/or PSB.

I would start checking out B.
Back to top
View user's profile Send private message
ahr

New User


Joined: 24 Apr 2007
Posts: 14
Location: India

PostPosted: Fri May 11, 2007 12:16 pm    Post subject: Re: How to find a program that updates the IMS DB
Reply with quote

The quicket way is first look at your PSB/PCB and verify the PROC options, find out which databases are getting updated and then search your program for ISRT and REPL IMS calls.

The above explanation is coincides with the first answer in this post.
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Fri May 11, 2007 11:13 pm    Post subject:
Reply with quote

When you want to know which program updates a database you are right. But the problem goes beyond the question. A segment couldn't be found while it was expected to be there. In that case old fashioned troubleshooting starts were it should start.
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 -> IMS DB/DC 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