How to find a program that updates the IMS DB

girias · New User Joined: 09 Feb 2007 Posts: 26 Location: Chennai

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.

Devzee · Posted: Sat May 05, 2007 2:26 am

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

Bitneuker · Posted: Wed May 09, 2007 2:05 am

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.

girias · New User Joined: 09 Feb 2007 Posts: 26 Location: Chennai

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

rameshfoa · New User Joined: 05 Apr 2007 Posts: 27 Location: chennai

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.

Bitneuker · Posted: Thu May 10, 2007 12:33 am

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.

ahr · New User Joined: 24 Apr 2007 Posts: 14 Location: India

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.

Bitneuker · Posted: Fri May 11, 2007 11:13 pm

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.