Star insurance case study ( Mainframe)

Job ID: 31531764

Budget: ₹600 – ₹1,500 INR

2. Using JCL, create Vsam KSDS file ‘USERID.POLSTAT.KSDS’ and copy the data from input PS file into Vsam KSDS file.

3. Using SPUFI, create a table POLICYTB with the below columns, to keep track of the details of all policies.

Column name

Data type & length

Constraints

POLNO

Char 6

Not null

HOLNAME

Char 20

Null

POLSTAT

Char 10

Not null

POLTYPE

Char 9

Not null

POLPREM

Decimal (7,2)

Null



4. Using SPUFI, insert the following data into POLICYTB.

POLNO X(06)

HOLNAME A(20)

POLSTAT A(10)

POLTYPE X(09)

000210

NARESH

EXPIRED

CAUSALITY

000230

KUMAR

EXPIRED

ANNUITY

000250

RAJU

EXPIRED

LIFE

000270

RANI

EXPIRED

TERM

000290

CHANDHU

EXPIRED

CAUSALITY



IBM MAINFRAMES: CASE STUDY

5. Using COBOL Program,

a. Use the Vsam KSDS as an input and table as Output.

b. Read each record from the Vsam KSDS file

c. And insert each record from the Vsam KSDS file into the table POLICYTB created with the below condition

i. If POLSTAT = ‘NEW’ then update the table with the value as ‘ACTIVE’ in the field ‘POLSTAT’.

d. Handle Null indicators for the same.

e. For all Active policies update the policy premium depending on policy type as below: i. Life -> 5000

ii. Annuity -> 1000

iii. Term -> 500

iv. Causality -> 1500

v. Medical -> 2500

f. For all Expired policies update policy premium as ZERO.

6. Write the below output in the respective files,

a. Total record count inserted into table in the output file

‘USERID.POLCNT.OUT’.

b. Total record count of active policies in the output file

‘USERID.ACTPOL.OUT’.

c. Total record count of expired policies in the output file

‘USERID.ACTPOL.OUT’.

7. Create a BMS screen to display/fetch data from the table ‘POLICYTB’. a. BMS map fields are same as POLICYTB.

Field names

POLNO

HOLNAME

POLSTAT

POLTYPE

POLPREM
Related categories: COBOL IBM Db2