Shared Container

priyankalaisatwar · Post by **priyankalaisatwar** » Thu Sep 19, 2013 1:21 am

hi,
I have one reuirement that
I have one Table which contains information about all job LOGS.
Jobnam, Status, startdate, enddate

I want to develop reusable component in such a way that,
In the starting of the job I will call that shared container. It will insert one row for that Job like:- Job1,Started,2013-09-18,Null

And at the end of the job again I will call that Shared container it will just update that records with status and end date:-
Job1,Completed,2013-09-08 01:00:00,2013-09-18 10:00:00 like this.
Please suggest any feasible way to develop this?

prasson_ibm · Post by **prasson_ibm** » Thu Sep 19, 2013 2:21 am

You can design a job with multiple instance which will insert the job log.

Design a sequence and call this job with some instance before your main job starts and call it again with another instance after main job finishes.

ArndW · Post by **ArndW** » Thu Sep 19, 2013 2:37 am

While using a shared container is feasible, I would use either the Job-Sequence approach mentioned earlier or, as I usually do, use the Before-Job and After-Job subroutine calls to perform this logging directly using BASIC-Code or to use the BASIC-Code to start up a background PX job which will do the logging.

prasson_ibm · Post by **prasson_ibm** » Thu Sep 19, 2013 3:30 am

ArndW wrote: as I usually do, use the Before-Job and After-Job subroutine calls to perform this logging directly using BASIC-Code or to use the BASIC-Code to start up a background PX job which will do the logging.

Thats interesting,can you please share a basic code to trigger a job.

ArndW · Post by **ArndW** » Thu Sep 19, 2013 4:23 am

It is trivial code, you create your Before-Job or After-Job routine, and within the routine do something like:

Code: Select all

   JobHandle = DSAttachJob('MyJob',DSJ.ERRFATAL)
   IF NOT(JobHandle)
   THEN
      CALL DSLogWarn('Oops, unable to open Job MyJob.', "JobControl")
   END
   ELSE 
      ************************************************
      ** If the job isn't running yet then start it **
      ************************************************
      JobStatus = DSGetJobInfo(JobHandle,DSJ.JOBSTATUS)
      IF JobStatus # DSJS.RUNNING
      THEN
         JobHandle = DSPrepareJob(JobHandle)
         ErrCode = DSSetParam(JobHandle,"$Param1", "$PROJDEF")
         ErrCode = DSSetParam(JobHandle,"$Param2", "$PROJDEF")
         ErrCode = DSSetParam(JobHandle,"$Param3", "$PROJDEF")
         ErrCode = DSSetParam(JobHandle,"$Param4", "$PROJDEF")
         ErrCode = DSSetDisableProjectHandler(JobHandle, @FALSE)
         ErrCode = DSSetDisableJobHandler(JobHandle, @FALSE)
         ErrCode = DSRunJob(JobHandle, DSJ.RUNNORMAL)
         ErrCode = DSDetachJob(JobHandle)
      END ;** of IF-THEN-ELSE Job is already running
      Dummy = DSDetachJob(JobHandle)
   END ;** of IF-THEN-ELSE Job couldn't be attached to

priyankalaisatwar · Post by **priyankalaisatwar** » Thu Sep 19, 2013 7:40 am

Can you please elaborate it more

ArndW wrote:It is trivial code, you create your Before-Job or After-Job routine, and within the routine do something like:
Code: Select all
   JobHandle = DSAttachJob('MyJob',DSJ.ERRFATAL)
   IF NOT(JobHan ...[/quote]

ArndW · Post by **ArndW** » Thu Sep 19, 2013 9:26 am

I did elaborate more, but that part was "Premium Content" since I felt it went into more depth than a simple answer.