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

DL/I status code AK for GU call using secondary index


IBM Mainframe Forums -> IMS DB/DC
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Shruthi Y S

New User


Joined: 25 Mar 2015
Posts: 2
Location: India

PostPosted: Wed May 18, 2022 3:18 pm
Reply with quote

Hello All,

I am new to IMS DB. My requirement is to write a program that deletes specific data from IMS DB. For example, Assume a DB2 table called Worktable. This table has list of employeeIDs, employee names, salaries and so on. My requirement is I have to read the worktable, take every employeeID and delete it from IMS DB. In IMS DB, employeeID is not primary key, but it is secondary index.

To first make sure if my keys are right, I am trying to read these values from IMS DB and write them into a file. If everything is correct then I want to proceed with get hold and deletion.

So I am trying to make a DL/I call with function GU by populating the key values for secondary index employeeID.

It is in the below format :

SEGMENT_NAME---(KEY_NAME= employeeID)

but I am getting PCB Status AK for this call with segment number 01. I am not understanding what is wrong here. Can anyone please help me?

Best Regards,
Shruthi
Back to top
View user's profile Send private message
isakshields

New User


Joined: 09 Aug 2021
Posts: 3
Location: Sweden

PostPosted: Thu May 19, 2022 3:59 pm
Reply with quote

Hi Shruthi,

When status code 'AK' there is usually something wrong with your SSA.
How does the DBD source look compared with your qualified SSA?
All fields used in the program, do the compare up with the DBD?

From the IBM manual about status code 'AK': www.ibm.com/docs/en/ims/15.2.0?topic=explanations-ak


//Isak
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 -> IMS DB/DC

 


Similar Topics
Topic Forum Replies
No new posts run rexx code with jcl CLIST & REXX 15
No new posts Execute secondary panel of sdsf with ... CLIST & REXX 1
No new posts Compile rexx code with jcl CLIST & REXX 6
No new posts Job completes in JES, but the status ... IBM Tools 1
No new posts REXX code to expand copybook in a cob... CLIST & REXX 2
Search our Forums:

Back to Top