Question

While using COBOL mainframe, I can't figure out how to calculate the commission using If/else....End If statement

COMMISSION CALCULATION Table* Quarterly Sales $ O or less $0.01 - $2,499.99 $2,500.00 - $4,999.99 $5,000.00 - $9,999.99 $10,000.00 $19,999.99 $20,000.00 - $29,999.99 $30,000.00 - $39,999.9 $40,000.00 - $49,999.99 $50,000.00 - $74,999.99 $75,000.00 - $99,999.99 $100,000 or more Base Commission $0 $50 $75 S100 $200 $250 $300 $350 $500 $750 $1,000 Bonus Commission 0% of sales 0% of sales 4.0% of sales 4.5% of sales 5.0% of sales 5.5% of sales 6.0% of sales 6.5% of sales 7.0% of sales 7.5% of sales 10% of sales *Note: You can use IF/ELSE....END-IF or EVALUATEWHEN/END-EVALUATE (Ch5) commands. Later in the semester, you will learn how to use COBOL Tables and subscripts. If you want to, you can look ahead in the book to learn/use this technique!

Answer 1

The conditional segment is attached below:
QSALES -> Quarterly Sales
Commisions: BASECOMMISSION and BONUSCOMMISSION
-------------------------------------------------------------------------------------------
IF QSALES <=0 THEN
    BASECOMMISSION=0
    BONUSCOMMISSION=0
ELSE-IF QSALES>=0.01 AND QSALES<=2499.99 THEN

    BASECOMMISSION=50
    BONUSCOMMISSION=0

ELSE-IF QSALES>=2500 AND QSALES<=4999.99 THEN

    BASECOMMISSION=75
    BONUSCOMMISSION=0.04*QSALES

ELSE-IF QSALES>=5000 AND QSALES<=9999.99 THEN

    BASECOMMISSION=100
    BONUSCOMMISSION=0.045*QSALES

ELSE-IF QSALES>=10000 AND QSALES<=19999.99 THEN

    BASECOMMISSION=200
    BONUSCOMMISSION=0.05*QSALES

ELSE-IF QSALES>=20000 AND QSALES<=29999.99 THEN

    BASECOMMISSION=250
    BONUSCOMMISSION=0.055*QSALES

ELSE-IF QSALES>=30000 AND QSALES<=39999.99 THEN

    BASECOMMISSION=300
    BONUSCOMMISSION=0.06*QSALES

ELSE-IF QSALES>=40000 AND QSALES<=49999.99 THEN

    BASECOMMISSION=350
    BONUSCOMMISSION=0.065*QSALES

ELSE-IF QSALES>=50000 AND QSALES<=74999.99 THEN

    BASECOMMISSION=500
    BONUSCOMMISSION=0.07*QSALES

ELSE-IF QSALES>=75000 AND QSALES<=99999.99 THEN

    BASECOMMISSION=750
    BONUSCOMMISSION=0.075*QSALE

ELSE

    BASECOMMISSION=1000
    BONUSCOMMISSION=0.1*QSALE

END-IF