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
 

 

Explain OBTAIN CALC USERREC ALLOW ('0326') in IDMS

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

New User


Joined: 30 Oct 2006
Posts: 7

PostPosted: Thu Jan 04, 2007 5:40 pm    Post subject: Explain OBTAIN CALC USERREC ALLOW ('0326') in IDMS
Reply with quote

Can anyone explain the command
OBTAIN CALC USERREC ALLOW ('0326') in ADSO/IDMS
Back to top
View user's profile Send private message

Rupa.P.V
Warnings : 1

New User


Joined: 04 Jul 2006
Posts: 30

PostPosted: Tue Jan 09, 2007 12:25 pm    Post subject: Re: Can anyone explain OBTAIN CALC USERREC ALLOW ('0326')
Reply with quote

That means
if the particular record is not found in database and u have statement like
PERFORM IDMS-STATUS then the program will not abend with 0326'.
If anything otherthan record not found occurs like dead lock etc then the program abends.

But if u dont code ALLOW('0326')
and use PERFOM IDMS-STATUS then the program will abend when the record is not found or whenever the ERROR-STATUS is not = 0.....

Hope i am clear to u.
Back to top
View user's profile Send private message
vijayakumar.yellala

New User


Joined: 19 Apr 2006
Posts: 63
Location: Chennai

PostPosted: Wed Jan 31, 2007 9:07 pm    Post subject: Re: Can anyone explain OBTAIN CALC USERREC ALLOW ('0326')
Reply with quote

Hi, if the record not found in the Data base, it has to execute, its doesnt have to Abend, Am I right?

Insted of this, you can write a like this also right...

OBTAIN CALC USERREC
if DB-REC-NOT-FOUND
CONTINUE.
Back to top
View user's profile Send private message
Rupa.P.V
Warnings : 1

New User


Joined: 04 Jul 2006
Posts: 30

PostPosted: Thu Feb 01, 2007 1:25 pm    Post subject: Re: Explain OBTAIN CALC USERREC ALLOW ('0326')
Reply with quote

Ya we can code in the way also....
Because we just want to skip when the record is not found in the database...We can just have a display statement stating that particular record is not
found...









Thanks
Rupa....
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 GETMAIN / FREEMAIN versus STORAGE OBT... steve-myers PL/I & Assembler 8 Wed Feb 01, 2017 1:45 am
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


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