2. Using JCL, create Vsam KSDS file ‘[login to view URL]’ 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
‘[login to view URL]’.
b. Total record count of active policies in the output file
‘[login to view URL]’.
c. Total record count of expired policies in the output file
‘[login to view URL]’.
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
Hello I have around 12 years of experience in COBOL and other mainframe technologies. Will provide extended support. Please let me know for further details..
Thanks
S M Rao