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 need for a secondary index in ims?

1119

---

Explain the advantage of creating the acbs well ahead of time?

3626

---

Explain the maximum number of levels allowed in ims db?

3827

---

Explain the two ways in which dl/i interface can be invoked?

3589

---

What is the disadvantage of dynamic generation of acb?

1054

---

What is dl/i?

1206

---

What is dbdgen process?

1263

---

What information does a psb contain?

1171

---

What is the maximum number of fields allowed per segment and what is the maximum number of fields per database?

1079

---

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

3642

---

Explain acbgen process?

1151

---

Explain the disadvantage of dynamic generation of acb?

988

---

What are the two ways in which dl/i interface can be invoked?

1002

---

What is dbd?

1067

---

What is the maximum number of segment types allowed for a single database?

1174

---