MVSFORUMS.com

ramu_mohan21 · Posted: Sat Sep 17, 2005 6:08 am Post subject: Delete Call in IMS - DLET

HI Board,
I have 3 segments in heirarchical order. For Example:

Database Structure
----------------------
Seg-1 is the Root Segment
Seg-2 is the Child to Seg-1
Seg-3 is the Child to Seg-2

Possibility
-----------
For Every Occurence of Seg-1 there will be ONLY one Occurence of Seg-2
For Every Occurence of Seg-2 there may be many Occurence of Seg-3

To delete a record from IMS Database -
We are Passing a Key for Seg-1 and Seg-2
And we are calling GHU call until Seg-2.

Call 'CBLTDLI' Ws-GHU
PCB
IO-AREA
Qualified-SSA-For-Seg-1
Qualified-SSA-For-Seg-2

Then We are issuing a DLET call like below:

Call 'CBLTDLI' WS-DLET
PCB
IO-AREA

I'm quiet confident that Seg-1 and Seg-2 occurence can be deleted.
But is this possible to delete Seg-1 and Seg-2 Occurences without deleting Seg-3 Occurences in IMS?

If possible - If Seg-1 and Seg-2 Occurence deleted then what would happend to Seg-3 Occrences?

I searched in the FORUM. But I didn't get any information regarding Delete Call. Any one can clarify.
_________________
Best Regards,
----------------
Rammohan Pabba
Software Engineer

kolusu · Posted: Sun Sep 18, 2005 9:24 am Post subject:

ramu_mohan21,

When you issue the DLET call, IMS deletes the held segment, along with all its physical dependents from the database, regardless of whether your program is sensitive to all of these segments. IMS rejects the DLET call if the preceding call for the PCB was not a Get Hold, REPL, or DLET call. If the DLET call is successful, the previously retrieved segment and all of its dependents are removed from the database and cannot be retrieved again.

If the Get Hold call that precedes the DLET call is a path call, and you do not want to delete all the retrieved segments, you must indicate to IMS which of the retrieved segments (and its dependents, if any) you want deleted; to do this, specify an unqualified SSA for that segment.Deleting a segment this way automatically deletes all dependents of the segment. .

Hope this helps...

Cheers

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu

ANIL SARATHY · Posted: Mon Sep 19, 2005 1:28 am Post subject:

Quote :
-------------------------------------------------------------------------------------
I'm quiet confident that Seg-1 and Seg-2 occurence can be deleted.
But is this possible to delete Seg-1 and Seg-2 Occurences without deleting Seg-3 Occurences in IMS?
-------------------------------------------------------------------------------------

seg-1 will not get deleted . Only seg-2 will get deleted. (there is no path call)

If really seg-1 and seg-2 should be deleted, then delete seg-1 only , that in turn wil all its dependents. (why unnecessary additional ssa's)

No need to use seg-2 ssa, bcoz seg2 is dependet on seg-1.

quote:
-------------------------------------------------------------------------------------
If possible - If Seg-1 and Seg-2 Occurence deleted then what would happend to Seg-3 Occrences?
-------------------------------------------------------------------------------------

Dependents will get deleted.

this is for information
quote:
-------------------------------------------------------------------------------------For Every Occurence of Seg-1 there will be ONLY one Occurence of Seg-2
-------------------------------------------------------------------------------------
How are u able to say this. Is the pointer realtion between seg-1 and seg-2 is NOTWIN.
_________________
Anil Sarathy

ramu_mohan21 · Posted: Mon Sep 19, 2005 9:01 am Post subject:

Hi Anil,
You are right. I forget to Keep that is a Path call.

For Every Occurence of Seg-1 there will be ONLY one Occurence of Seg-2
Reply:
They don't have any such conditions like NOTWIN. But as per the functionality the data will be inserted in this way(I mean Initial Load Programs and Further Insert Programs has been written like this).
_________________
Best Regards,
----------------
Rammohan Pabba
Software Engineer

ANIL SARATHY · Posted: Mon Sep 19, 2005 10:57 pm Post subject:

This is just for information only

"For Every Occurence of Seg-1 there will be ONLY one Occurence of Seg-2"

This can be achievd by a programming logic. But from DBD , ie design point of view also can be achieved using NOTWIN.
_________________
Anil Sarathy