To Reset the DS Job if the status is Abort using Routine

pavithra_12 · Post by **pavithra_12** » Wed Oct 12, 2005 4:27 am

Hi,

Please let me know how to create a routine that checks the DS Job status and Reset if the status of the job is Abort.

Regards
Pavithra

ArndW · Post by **ArndW** » Wed Oct 12, 2005 4:38 am

The routine would contain:

- a call to DSAttachJob that you wish to reset
- a call to DSGetJobInfo to get the current status
- a call to DSPrepareJob to make the job runnable

ray.wurlod · Post by **ray.wurlod** » Wed Oct 12, 2005 2:58 pm

... and a DSDetachJob to indicate that you're finished with it and another process doesn't get a "locked" message.

120267 · Post by **120267** » Thu Oct 13, 2005 5:07 am

Hi pavithra,

This is the routine to reset the job.

$IFNDEF JOBCONTROL.H
$INCLUDE DSINCLUDE JOBCONTROL.H
$ENDIF
If DSGetJobInfo(hJob, DSJ.JOBSTATUS) = DSJS.STOPPED or DSGetJobInfo(hJob, DSJ.JOBSTATUS) = DSJS.RUNFAILED
or DSGetJobInfo(hJob, DSJ.JOBSTATUS) = DSJS.CRASHED
Then
Message = "Job is resetting..."
Call DSLogInfo(Message, RoutineName)
ErrCode = DSRunJob(hJob, DSJ.RUNRESET)
Ans = ErrCode
Status = DSGetJobInfo(hJob, DSJ.JOBSTATUS)
If Status = DSJS.RUNFAILED Then
Message = "Job Reset Failed: ":hJob:"."
Call DSLogWarn(Message, RoutineName)
End
End

Thanks,
Siva

ArndW · Post by **ArndW** » Thu Oct 13, 2005 5:12 am

ray.wurlod wrote:... and a DSDetachJob to indicate that you're finished with it and another process doesn't get a "locked" message.

You caught me out; I noticed the omission when I posted yesterday and was too lazy to go back and edit the post; even though I knew that you would notice and correct my error.