Instructions

$1.$ Copy COBOL.LOADLIB to your userid for use with Assignments,

if needed

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

as

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

$2.$ 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$)$

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

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

$5.$ Use A$3$R JCL to execute the program

$6.$ Submit the appropriate files based on the submission requirements

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

Specifications

$1.$ 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:

NO$.$ NAME SALES MIN. MAX. COMM.

COMM. COMM. $\%$

COL. $1-34-1112-1718-2324-2930-32$

$110$ Jim $444000300000600000105$

$127$ Beth $056000500000809999205$

$531$ Gerry $00799900060000070055$

$739$ Cindy $003751004400006600195$

$2.$ Output File

This program will create a formatted output file called

KC$03$YYY$.$DCMAFD$01.$A$3.$SCOMM.OUT $$

$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$ detail lines per page.

i$.$ Print your name$/$date$/$time report heading and column headings on each page. You will need to use the $$after page$$ option on your WRITE statement as outlined in class.

j$.$ There should be one blank line after Your Name line, and after Sales Commission Report line.

k$.$ There should be two blank lines after each group of summary lines. $($see sample format$)$

$4.$ Calculations

a$.$ Use WORKING$-$STORAGE variables for ALL output.

i$.$ Use $77$ level variables in WORKING$-$STORAGE to contain any values or text strings needed in any IF statements or calculations. These serve as named constants.

ii$.$ Do not use $01$ level variables for this purpose.

iii. In the Procedure Division use the named constants you created in the Working$-$Storage section in place of the actual values, or text strings.

iv$.$ There should be NO constant numbers or constant literals in the procedure division.

b$.$ Use any COMPUTE, ADD, SUBTRACT, MULTIPLY, DIVIDE statements as needed

c$.$ The program should process the data from the input file provided and calculate each salesperson$$s earned and paid commission.

d$.$ Calculations are to be made as accurately as possible.

Earned commission is to be rounded to the nearest dollar.

e$.$ All printed values are to the nearest dollar $($so use ROUNDED wisely$).$

f$.$ For each salesperson print out the following:

i$.$ Salesperson's No$.$

ii$.$ Salesperson's Name

iii. Minimum Commission

iv$.$ Maximum Commission

v$.$ Commission Rate with a $\%$ sign

$($When input data is $105$ output as $10\mathrm{.}5\%.$

This is accomplished by printing $\%$ as a literal.$)$

vi$.$ Earned Commission

vii. Paid Commission

g$.$ Use a combination of nested IF$/$ELSE and PERFORMs for the commission calculations:

i$.$ Earned Commission Calculation:

$$ If the Sales is $<=$ $$300,000$ then Earned $=$ Sales $*$ Rate

$$ If the Sales is $>$ $$300,000$ then Earned$=$ Sales $*$ Rate $+$ a bonus of $15\mathrm{.}25\%$ of the amount over $$300,000$

For example:

SAMMY gets $10\mathrm{.}5\%$ of his $$55,000$ in sales $=$ earned of $$5,775$

BETH gets $20\mathrm{.}5\%$ of her $$555,000$ in sales $=$ earned of $$113,775+15\mathrm{.}25\%$ of $(555,000300,000)=113,775\mathrm{.}00+38,887\mathrm{.}50=$ $$152,662\mathrm{.}50=$ $$152,663$ Rounded

ii$.$ Paid Commission Calculation:

$$ If the sales are more than $$300,000$ then PAID $=$ EARNED unless Earned is $>$ MAX.

o If Earned is $>$ Max then PAID $=$ MAX.

Note: they CAN earn less than their minimum and no check is made on it$.$ Count and print out with a title the number of salespersons in the sales over $$300,000$ category who earn more than their maximum.

Check