View previous topic :: View next topic
|
Author |
Message |
Saquib_008
New User
Joined: 18 Mar 2010 Posts: 5 Location: Pune
|
|
|
|
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 |
|
|
sudhar santosh
New User
Joined: 08 Dec 2009 Posts: 7 Location: Chennai
|
|
|
|
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 |
|
|
Saquib_008
New User
Joined: 18 Mar 2010 Posts: 5 Location: Pune
|
|
|
|
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 |
|
|
Chinnadu
New User
Joined: 05 Mar 2009 Posts: 46 Location: Hyderabad
|
|
|
|
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 |
|
|
Saquib_008
New User
Joined: 18 Mar 2010 Posts: 5 Location: Pune
|
|
|
|
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 |
|
|
|