identification division.

program$-$id$.$ A$2$START.

date$-$written. date.

author. name.

sDescription:

$8$

environment division.

configuration section.

$**$

input$-$output section.

$**$

file$-$control.

input$-$file declaration

select input$-$file

assign to $??????$

organization is sequential.

$8$

s output$-$file declaration

select output$-$file

assign to $??????$

organization is sequential.

$8$

data division.

file section.

$8$

fd input$-$file

recording mode is $F$

data record is input$-$line

record contains $29$ characters.

$8$

$01$ input$-$line.

$85????$

$85????$

$s$

fd output$-$file

recording mode is $F$

data record is output$-$line

record contains $???$ characters.

$s$

ol output$-$line

PIC $x(???).$

$8$

working$-$storage section.

$s$

procedure division.

e$0-$main.

$8$

goback.

end program A$2$START.

$//$CLYYYA$2,$ JOB

$\frac{\frac{?}{?}}{C}$OBOL, EXEC PROC $=$IGYWCL,

$//$ PARM. COBOL $=\text{'}$ TEST, RENT, APOST, OBJECT, NODYNAM, LIB, SIZE $(2097152)\text{'}$

$//$COBOL$.$STEPLIB DD DSN$=$IGY$630.$SIGYCOMP,

$\frac{\frac{?}{?}}{,}$DISP$=SHR$

$/*$ DECLARE DATASET THAT CONTAINS SOURCE CODE

$//$COBOL$.$SYSIN DD DSN$=$KC$03$YYY$.$DCMAFD$01.$ A$2.$ COBOL$($A$2$ILIST$),$

$\frac{\frac{?}{?}}{,}$DISP$=SHR$

$\frac{?}{?}**$

$/*$ DECLARE PDS MEMBER TO STORE LOAD MODULE

$//$LKED$.$SYSLMOD DD DSN$=$KCO$3$YYY$.$DCMAFD$01.$ COBOL. LOADLIB$($A$2$ILIST$),$

$\frac{\frac{?}{?}}{,}$DISP$=0LD$

h$113$IM $444000050000100000105112$BETH$168$CLAIRE $666000030000150000155221$TOM$310$SALLY $20700009000040000205311$GERRY $017999002000006000055390$CINDY $033751001000002000195445$SAMMY $055000013000015000105523$PHIL$555000040000125000205492$HARVEY $995001000500000750170066000100000300000200600$WILLIAM $099003000075000950085617$WANDA $099006000800001000080684$GEORGE $084564010000020000075698$IRVING $024567000300000900070776$MARK$700$ROSEMARYO$90999000075000200295811$ERIC$205002000999002000195715$LARRY $009999009750019750055753$RONNIE $999999099999999999999818$B$0$B$99499900040100090008099499800300000400090000002000010000900495852$FRANKIE $099999000001001000015875$DAVID $088888000$ B$000800085966$MARIO $075997020000030000235972$NANCY $765432200000400000225991$WAYNE $115998000999002000230994$CHRIS $275000060000080000170$

V$/$RYYYA$2,$ JOB

$/*$

$/*$ SET OUTFILE DD NAME TO MATCH YOUR ASSIGN NAME FOR FILE

$/*$ SET LRECL $???$ FOR OUTFILE TO MATCH YOUR OUTPUT RECORD SIZE

$\frac{?}{?}**$

$\frac{\frac{?}{?}}{A}2R,$ EXEC PGM$=$A$2$ILIST

$//$STEPLIB DD DSN$=$KC$03$YYY$.$DCMAFD$01.$ COBOL. LOADLIB,

$\frac{\frac{?}{?}}{,}$DISP$=SHR$

$//??????DD$ DSN$=$KC$03$YYY$.$DCMAFD$01.$A$2.$ILIST.DATA,

$//$ DISP$=SHR$

$//??????$ DD DSN$=$KC$03$YYY$.$DCMAFD$01.$A$2.$ILIST.OUT,

$//$ DISP NE

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 requirementsW,

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$.],[$

Mainframe I $-$ Assignment $3$

$3.$ Report Output Formatting

a$.$ Report Header lines with a blank line, your name, and a blank line on the first page only

b$.$ Report title $($SALES COMMISSION REPORT$)$ with a blank line, column headings, and underlines using hyphens for the column headings, and a blank line on every page

c$.$ Detail lines with the fields in the input file layout

d$.$ Total lines with a literal "Totals" and totals for Earned and Paid Commission, and a blank line

e$.$ Summary lines with a literal for each summary calculation and the calculated number and blank lines between the various groups $($see sample report$)$

f$.$ You DO NOT have to match the number of spaces in the column headings.

g$.$ You DO need to have column headings align with the detail line items.

h$.$ Print $10$COMM.$]],\backslash$table$[[$COMM$.],[\%$CATLG, DELETE

$\frac{?}{?}**$