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
 

 

What Does IDMS_STATUS do in IDMS?

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IDMS/ADSO
View previous topic :: :: View next topic  
Author Message
sandeep_yadav_in
Currently Banned

New User


Joined: 26 May 2007
Posts: 13
Location: Noida, India

PostPosted: Fri Jan 11, 2008 5:27 pm    Post subject: What Does IDMS_STATUS do in IDMS?
Reply with quote

Hi Guys,

What Does IDMS_STATUS do in IDMS?

If we are using IDMS_STATUS like
CALL IDMS_STATUS;

What Basically is happening when this statements gets executed?


Thanks,
Sandy
Back to top
View user's profile Send private message

NOWAR

New User


Joined: 20 Feb 2007
Posts: 11
Location: Houthalen, Belgium

PostPosted: Thu Jan 24, 2008 1:11 pm    Post subject: Reply to: What Does IDMS_STATUS do in IDMS?
Reply with quote

This statement is checking de result of a idms-statement (obtain/modify/store/find/erase)

It calls a procedure (section) that must be imported in your cobol-source:

Code:
******************************************************************
*-----------  I D M S - S T A T U S   C O P Y B O O K -----------*
******************************************************************
 COPY IDMS IDMS-STATUS.
 IDMS-ABORT SECTION.
Back to top
View user's profile Send private message
sandeep_yadav_in
Currently Banned

New User


Joined: 26 May 2007
Posts: 13
Location: Noida, India

PostPosted: Fri Jan 25, 2008 11:16 am    Post subject: Reply to: What Does IDMS_STATUS do in IDMS?
Reply with quote

Hi Nowar,

Thanks a Lot for that information.

It means it(IDMS_STATUS) is working as SQLCODE in DB2. In DB2 After a querry is executed we check for its SQLCODE. If it is 0 then the Querry was executed successfully and if it is less than 0 than there were some errors.

Is my understanding correct?
Back to top
View user's profile Send private message
NOWAR

New User


Joined: 20 Feb 2007
Posts: 11
Location: Houthalen, Belgium

PostPosted: Fri Jan 25, 2008 12:34 pm    Post subject: Reply to: What Does IDMS_STATUS do in IDMS?
Reply with quote

Yes, with DB2 you test on the sql-code and in IDMS you test the error-status, with is a result of PERFORM IDMS-STATUS

For example :
Retrieving a record-occurence with a calc-key (like Primairy key in DB2)

Code:
OBTAIN CALC <db-record>
PERFORM IDMS-STATUS
IF ERROR-STATUS = 0326 (= this means there is no record found)
THEN
  <do something>
END-IF


It also can be written like :

Code:
OBTAIN CALC <db-record>
PERFORM IDMS-STATUS
IF DB-REC-NOT-FOUND
THEN
  <do something>
END-IF


Search on the web for 'programming quick reference & CA-IDMS', maybe you will find a reference.

Rudi
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: Sat Jan 26, 2008 1:26 am    Post subject:
Reply with quote

This item should be moved to IDMS icon_wink.gif
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 -> IDMS/ADSO All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts IDMS/DC-COBOL program - SNAP error wh... rakeshsekar1987 IDMS/ADSO 5 Tue Sep 13, 2016 8:28 pm
No new posts ADS 3270 Batch simulator for IDMS rel... gpowell382 IDMS/ADSO 1 Thu May 05, 2016 8:02 pm
No new posts ALTER of an IDMS AREA with NEW/OLD pa... Awanti IDMS/ADSO 2 Mon Mar 14, 2016 10:01 pm
This topic is locked: you cannot edit posts or make replies. Sticky: CA IDMS v18.5 Manuals Pandora-Box IDMS/ADSO 0 Sun Dec 13, 2015 5:37 pm
No new posts Need documents or links to understand... sherlinpraveenkumar IDMS/ADSO 5 Wed Oct 28, 2015 4:40 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us