Mainframe I $-$ Assignment $3$

Instructions

Copy COBOL.LOADLIB to you userid for use with Assignments, if needed

KC$02597.$DCMAFD$01.$COBOL.LOADLIB

as

KC$03$YYY$.$DCMAFD$01.$COBOL.LOADLIB

Copy starter datasets and members for cobol source files, and JCL source files

a$.$ KC$02597.$DCMAFD$01.$A$2.$COBOL $($A$2$START$)$ as KC$03$YYY$.$DCMAFD$01.$A$3.$COBOL $($A$3$SCOMM$)$

b$.$ KC$02597.$DCMAFD$01.$A$2.$JCL $($A$2$CL$)$ as KC$03$YYY$.$DCMAFD$01.$A$3.$JCL $($A$3$CL$)$

c$.$ KC$02597.$DCMAFD$01.$A$2.$JCL $($A$2$R$)$ as KC$03$YYY$.$DCMAFD$01.$A$3.$JCL $($A$3$R$)$

Create A$3$SCOMM program based on specifications below.

Use A$3$CL JCL to compile$/$LKED the program

Use A$3$R JCL to execute the program

Submit the appropriate files based on the submission requirements

Note: $YYY$ is last three letters in your mainframe userid $KC03YYY$

Page $1$ of $9$

Mainframe I $-$ Assignment $3$

Specifications

Input File

Use VISTA$/$ISPF to copy dataset KC$02597.$DCMAFD$01.$A$3.$SCOMM.DATA as KC$03$YYY$.$DCMAFD$01.$A$3.$SCOMM.DATA

This is the data file that the program will read.

Each data record is $32$ characters long with the following format. This sample data does not exactly match the actual data in the file provided.

The following is intended to provide the column layout of the file:

$\backslash$table$[[$NO$.,$NAME,SALES,$\backslash$table$[[$MIN$.],[$COMM$.]],\backslash$table$[[$MAX$.],[$COMM$.]],\backslash$table$[[$COMM$.],[\%$