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
 

 

IDMS Auto-status not active error

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

New User


Joined: 18 Mar 2010
Posts: 5
Location: Pune

PostPosted: Thu Mar 18, 2010 11:33 am    Post subject: IDMS Auto-status not active error
Reply with quote

Hi,
When I am compiling a DC-Batch code, I am getting below error, Can anyone pls help me out with this!

E DML063 AUTOSTATUS Not Active For Mode
Back to top
View user's profile Send private message

sudhar santosh

New User


Joined: 08 Dec 2009
Posts: 7
Location: Chennai

PostPosted: Thu Mar 18, 2010 11:59 am    Post subject: Its a problem with Anystatus
Reply with quote

Hi Saquib,

Do you check the IDMS status after any command as ON ANYSTATUS.

If that is the case then there is the problem.

Can you say us what you have given in the IDMS-CONTROL SECTION.

If possible please provide us on which IDMS statement it giving the error.
Back to top
View user's profile Send private message
Saquib_008

New User


Joined: 18 Mar 2010
Posts: 5
Location: Pune

PostPosted: Thu Mar 18, 2010 12:08 pm    Post subject:
Reply with quote

Hi Sudhar,


In the IDMS-Control section, I have given as :
*********
PROTOCOL. MODE IS DC-BATCH DEBUG
IDMS-RECORDS MANUAL.
*************



@Do you check the IDMS status after any command as ON ANYSTATUS

I am posting below the snap shot of the JCL listing:
DMLC 07285 002499 COPY IDMS IDMS-STATUS.
07286 ***************************************************
07287 IDMS-STATUS
07288 ***************************************************
07289 IDMS-STATUS-PARAGRAPH.
07290 IF DB-STATUS-OK GO TO ISABEX.
07291 PERFORM IDMS-ABORT.
07292 DISPLAY '**************************'
07293 ' ABORTING - ' PROGRAM-NAME
07294 ', ' ERROR-STATUS
07295 ', ' ERROR-RECORD
07296 ' **** RECOVER IDMS ****'
IDMSDMLC 17.0 CA, INC. DML PROCESSOR FOR COBOL
- - LISTING OF MESSAGES - -

07297 * UPON CONSOLE.
07298 .
07299 DISPLAY 'PROGRAM NAME ------ ' PROGRAM-NAM
07300 DISPLAY 'ERROR STATUS ------ ' ERROR-STATU
07301 DISPLAY 'ERROR RECORD ------ ' ERROR-RECOR
07302 DISPLAY 'ERROR SET --------- ' ERROR-SET.
07303 DISPLAY 'ERROR AREA -------- ' ERROR-AREA.
07304 DISPLAY 'LAST GOOD RECORD -- ' RECORD-NAME
07305 DISPLAY 'LAST GOOD AREA ---- ' AREA-NAME.
07306 DISPLAY 'DML SEQUENCE ------ ' DML-SEQUENC
DMLC0049 07307 ROLLBACK TASK ON ANY-STATUS
|
E DML063 AUTOSTATUS Not Active For Mode
Back to top
View user's profile Send private message
Chinnadu

New User


Joined: 05 Mar 2009
Posts: 42
Location: Hyderabad

PostPosted: Thu Mar 18, 2010 12:38 pm    Post subject: Reply to: IDMS Auto-status not active error
Reply with quote

Saquib,

When you say 'IDMS-RECORDS MANUAL', then after each IDMS query you need to manually check the status . you can get rid of the problem in two ways.

Option 1) Change the 'IDMS-RECORDS MANUAL' to 'IDMS-RECORDS AUTO' In this case IDMS queries will be like
obtain first recq with in area 1 on any error-status do some thing.

Option 2). After every IDMS query you need to check the return code of the query like below.

Ex: obtain first recq with in area 1.
IF db-end-of-set
do something.
else
do something.
end-if.


In your case better to go for first option rather than changing each IDMS statement.
Back to top
View user's profile Send private message
Saquib_008

New User


Joined: 18 Mar 2010
Posts: 5
Location: Pune

PostPosted: Thu Mar 18, 2010 1:01 pm    Post subject:
Reply with quote

Chinnadu,

Option u mentioned doesnt work..

I would like to reiterate one point here that this problem is occuring only for "copy check-idms-status" and "copy idms-status".. For "Copy idms-status-3" it is working fine..
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 Need help with below DB2 error ashek15 DB2 3 Sat Mar 18, 2017 5:56 am
No new posts FINDREP Syntax Error seahawk789 DFSORT/ICETOOL 4 Thu Mar 09, 2017 10:11 pm
No new posts INVOKE WEBSERVICE error danik56 CICS 11 Thu Mar 09, 2017 11:52 am
No new posts Row not found Sql error GaganGarg DB2 7 Tue Mar 07, 2017 6:29 am
No new posts DB2 SQL Error: SQLCODE=-440, SQLSTATE... kishpra DB2 1 Sat Feb 18, 2017 2:31 am


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