Reset Job if necessary

[Terala]

Is it possible to RESET a call job( I am using UtilityRunJob) from Transformer stage? Or Can i use Job control code to check the job status and if necessary RESET before running the Job.
Can any one please provide the basic code.

Thanks in advance.

[ray.wurlod]

You can use job control code.
Create a job sequence with a Job activity set to "reset if required then run", compile it, and examine the generated job control code.

[roy]

Hi,
The routine you need is DSPrepareJob(hJob)
this will reset if needed the job refered by the hJob handle.
Though I'm not certain it is in the Utility you mentioned so you need to copy it and add it to the code.
While your at it you might want to add code so that your encripted passwords won't show up in the job log (best way by naming cnventions).

Code: Select all

hJob = DSPrepareJob(hJob)
If Not(hJob) Then 
  Call DSLogInfo("Failed","DSPrepareJob")
End

(note was edited for correction of spelling mistakes to horrifying to leave as they were )
IHTH,

[Titto]

Thanks Roy!

This is the part of existing UtilityRunJob code and i added the code you suggested to Prepare the job (it is between START and END). Hope it works, am I missing anything.. !

Code: Select all

   JobHandle = DSAttachJob(RunJobName, DSJ.ERRFATAL)
      
    Message = DSRMessage('DSTAGE_TRX_I_0014', 'Attaching job for processing - %1 - Status of Attachment = %2', RunJobName:@FM:JobHandle )
    Call DSLogInfo(Message, RoutineName)
    LimitErr = DSSetJobLimit(JobHandle, DSJ.LIMITROWS, RowLimit)
    LimitErr = DSSetJobLimit(JobHandle, DSJ.LIMITWARN, WarnLimit)

* Need to check if error occurred.
    ListOfParams = DSGetJobInfo(JobHandle, DSJ.PARAMLIST)
    ListCount = Dcount(ListOfParams,',')
    For ParamNum = 1 To ParamCount
 	Message = DSRMessage('DSTAGE_TRX_I_0015', 'Setting Job Param - %1  Setting to %2', Param(ParamNum,1):@FM:Param(ParamNum,2))
 	Call DSLogInfo(Message, RoutineName)
        ErrCode = DSSetParam(JobHandle, Param(ParamNum,1),Param(ParamNum,2))
    Next ParamNum





*START
*Need to check if the job to be prepared - START
*        
    JobHandle = DSPrepareJob(JobHandle)
    If Not(JobHandle) Then
       Message = DSRMessage('DSTAGE_TRX_I_0015A', 'Failed - DsPrepareJob', RunJobName)
       Call DsLogInfo(Message, RoutineName)
    End
*
*Need to check if the job to be prepared - END
*END





    ErrCode = DSRunJob(JobHandle, DSJ.RUNNORMAL)
    ErrCode = DSWaitForJob(JobHandle)
    Status = DSGetJobInfo(JobHandle, DSJ.JOBSTATUS)
    JobEndTime = DSRTimestamp()
    If Status = DSJS.RUNFAILED Then
         Message = DSRMessage( 'DSTAGE_TRX_E_0020', 'Job Failed: %1', RunJobName)
         Call DSLogWarn(Message, RoutineName)
    End