Answer Posted / 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.

What is the advantage of creating the acbs well ahead of time?

980

---

What is the maximum of key fields and search fields allowed in a segment?

945

---

My IMS main progam is calling Db2 subroutine ...Its giving - 923 db2 sql code..so could any one tell how to solve this issue.

3548

---

What is the maximum number of pcbs allowed in a psb?

919

---

What are the advantages of a hierarchical database?

3205

---

How many root segments do we have per database record?

991

---

What is the need for a secondary index in ims?

1016

---

Define dl/i?

3502

---

What is acbgen process?

1101

---

What is the disadvantage of dynamic generation of acb?

946

---

What are the retrieval sequences in ims db?

1301

---

What is ims (db/dc)?

967

---

What are the objectives of dbms in ims?

1037

---

What is a segment in ims?

952

---

Explain the processing modes available in ims db?

3562

---