Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist 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 IEW2456E error when link-editing a C ... Senthilraj JCL & VSAM 0 Fri Oct 13, 2017 3:12 pm
No new posts FTP Skip or ignore error and process ... AJAYREDDY All Other Mainframe Topics 3 Wed Sep 27, 2017 8:12 pm
No new posts Assembler Macro Copybook converted to... Ziquilix PL/I & Assembler 4 Tue Sep 26, 2017 3:07 am
No new posts FUSE - IBM MQ - CICS integration error Kevin Vaz CICS 1 Mon Sep 18, 2017 4:31 pm
No new posts Reply MQ open error Vignesh Sid COBOL Programming 6 Thu Sep 07, 2017 6:02 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us