Write the format of program starting from identification
division for checkpoint restart logic.
Answer / sandeep_1985
WORKING STORAGE DIVISION
01 FUNCTION-CODE.
10 XRST PIC X(4) VALUE 'XRST'.
10 CHKP PIC X(4) VALUE 'CHKP'.
01 IO-AREA PIC X(1000).
01 RESTART-WORKAREA.
05 CHKP-ID.
10 CHKP-PREFIX PIC X(4) VALUE 'TEST'.
10 CHKP-CNTR PIC 9(4).
01 SAVEAREA-LENGTH PIC S9(4) COMP VALUE 13.
01 SAVEAREA.
10 SAVE-KEY PIC X(13).
01 PARM-COUNT PIC S9(4) COMP.
LINKAGE SECTION
01 IO-PCB X(40).
Procedure Division:
For Checkpointing
CALL CBLDLI USING PARM-COUNT,
CHKP,
IO-PCB,
IO-AREA,
CHKP-ID,
SAVEAREA-LENGTH,
SAVEAREA
For Restart
CALL CBLDLI USING PARM-COUNT,
XRST,
IO-PCB,
IO-AREA,
RESTART-WORKAREA,
SAVEAREA-LENGTH,
SAVEAREA
Note : You can have maximum of 15 Save areas declared in
Restart or Checkpointing call.
| Is This Answer Correct ? | 8 Yes | 1 No |
What does the Change Accum do?
Explain psbgen process?
When do you do Build DBD, PSB for making changes in ACBLIB?
What information does a psb contain?
I have database, in that segment1 having dept code and segment 2 and so on multiple employees num. using dept & employee num we have to compare whether that employee belong to that dept or not, if that employee belongs to that dept then incentive is same same as in the table or else incentive must be zero? using IMS & cobol
What is check pointing, sync point?
What are the two ways in which dl/i interface can be invoked?
What are qualified and unqualified SSA's.
What are the path calls in imsdb?
Explain the maximum of key fields and search fields allowed in a segment?
My IMS main progam is calling Db2 subroutine ...Its giving - 923 db2 sql code..so could any one tell how to solve this issue.
What is meant by mpp mode?