View the step-by-step solution to:

Question

PLEASE HELP COMPLETE PROGRAM


IDENTIFICATION DIVISION.

PROGRAM-ID. HW06FL.

DATA

DIVISION.

WORKING-STORAGE SECTION.

01 EMPLOYEE-RECORD-IN.

   05 EMP-PAY-DATE-IN.

      10 EMP-PAY-YY         PIC X(02).

      10 EMP-PAY-MM         PIC X(02).

      10 EMP-PAY-DD         PIC X(02).

   05 EMP-NUMBER            PIC X(03).

   05 EMP-NAME.

      10 EMP-LAST-NAME      PIC X(15).

      10 EMP-FIRST-NAME     PIC X(10).

   05 HOURS-WORKED          PIC 99V99.

   05 PAY-RATE              PIC 99V99.

   05 EMP-PAY-TYPE          PIC X.

      88 HOURLY-PAY                   VALUE 'H'.

      88 SALARY-PAY                   VALUE 'S'.

   05 EMP-POSITION          PIC X.

      88 PROGRAMMER                   VALUE 'P'.

      88 ACCOUNTANT                   VALUE 'A'.

      88 MANAGER                      VALUE 'M'.

      88 INTERN                       VALUE 'I'.

      88 TESTER                       VALUE 'T'.

   05 EMP-GROSS-OUT         PIC 9(04)V99.

   05 EMP-OVERTIME-HOURS-OUT PIC 9(02).

   05 EMP-OVERTIME-OUT      PIC 9(04)V99.

   05 EMP-TAXES-OUT         PIC 9(04)V99.

   05 EMP-NET-OUT           PIC 9(04)V99.

   05 FILLER                PIC X(10). 


01 EMP-TAX-RATE             PIC V99.


01 EMP-POSITION-TITLE       PIC X(18).


01 EMPLOYEE-PAY-TOTALS.      

   05 EMP-GROSS-PAY         PIC 9(04)V99.

   05 EMP-NET-PAY           PIC 9(04)V99.

   05 EMP-TAXES             PIC 9(04)V99.

   05 EMP-OVERTIME-HOURS    PIC 9(02)V99.

   05 EMP-OVERTIME-PAY      PIC 9(03)V99.


01 PROGRAM-TOTALS.   

   05 PROGRAM-GROSS-PAY     PIC 9(04)V99.

   05 PROGRAM-NET-PAY       PIC 9(04)V99.

   05 PROGRAM-TAXES         PIC 9(04)V99.

   05 PROGRAM-RECORD-COUNT  PIC 9(02).

   05 PROGRAM-HOURS-WORKED  PIC 9(04)V99.

   05 PROGRAM-AVERAGE-GROSS PIC 9(04)V99.

   05 PROGRAM-AVERAGE-NET   PIC 9(04)V99.

   05 PROGRAM-OVERTIME-HOURS PIC 9(04)V99.

   05 PROGRAM-OVERTIME-PAY  PIC 9(04)V99.


01 WS-DATE-IN                PIC 9(08).


01 WS-POSITIONS.

   05 WS-PROGRAMMER.

      10 WS-PROGRAMMER-CODE  PIC X(01)   VALUE 'P'.

      10 WS-PROGRAMMER-TITLE PIC X(18)   VALUE 'PROGRAMMER'.

      10 WS-PROGRAMMER-RATE  PIC 9(02)V99 VALUE 65.00.

   05 WS-ACCOUNTANT.

      10 WS-ACCOUNTANT-CODE  PIC X(01)   VALUE 'A'.

      10 WS-ACCOUNTANT-TITLE PIC X(18)   VALUE 'ACCOUNTANT'.

      10 WS-ACCOUNTANT-RATE  PIC 9(02)V99 VALUE 58.00.

   05 WS-MANAGER.

      10 WS-MANAGER-CODE     PIC X(01)   VALUE 'M'.

      10 WS-MANAGER-TITLE    PIC X(18)   VALUE 'MANAGER'.

      10 WS-MANAGER-RATE     PIC 9(02)V99 VALUE 62.00.

   05 WS-INTERN.

      10 WS-INTERN-CODE      PIC X(01)   VALUE 'I'.

      10 WS-INTERN-TITLE     PIC X(18)   VALUE 'INTERN'.

      10 WS-INTERN-RATE      PIC 9(02)V99 VALUE 22.00.

   05 WS-TESTER.

      10 WS-TESTER-CODE      PIC X(01)   VALUE 'T'.

      10 WS-TESTER-TITLE     PIC X(18)   VALUE 'TESTER'.

      10 WS-TESTER-RATE      PIC 9(02)V99 VALUE 22.00.  


PROCEDURE DIVISION.

0000-DRIVER.

*-Place PERFORM statement(s) code to control the program:

* 1) Initialize Program

* 2) Process all the records

* 3) Calculate and Display Final Totals.

* 4) Perform any closing program tasks and end the program.


0100-INITIALIZE-PROGRAM.


*-Place statements here to do initial tasks the program needs:

* 1) Accept & Format the date

* 2) Complete initial display.

* 3) Set tax rate

* 4) Perform a paragraph to get the first record (ACCEPT the record)


1000-PROCESS-PAYROLL-RECORDS.


*-Place Code & PERFORM Statement Code here needed for each record:

* 1) Update the record count

* 2) Display the record

* 3) Perform a paragraph to set the pay & title

* 4) Perform a paragraph to calculate the payroll amounts

* 5) Perform a paragrpah to update the program totals

* 6) Perform a paragraph to Display the Payroll Record Details

* 7) Perform a paragraph to get the next record (ACCEPT the record)


1100-DETERMINE-POSITION-AND-PAY.

*-set the pay & title here:



1200-CALCULATE-PAYROLL.

*-calculate the payroll amount here:



1300-UPDATE-PROGRAM-TOTALS.   

*-update the program totals here:



1400-DISPLAY-PAYROLL-RECORD-INFO.

*-Display the Payroll Record Details here:



1900-ACCEPT-RECORD.

   ACCEPT EMPLOYEE-RECORD-IN.



2000-PROVIDE-FINAL-TOTALS.

*-Calculate and Display Final Totals here:



3000-CLOSE-PROGRAM.  

*-Perform any closing program tasks and end the program here:

Recently Asked Questions

Why Join Course Hero?

Course Hero has all the homework and study help you need to succeed! We’ve got course-specific notes, study guides, and practice tests along with expert tutors.

-

Educational Resources
  • -

    Study Documents

    Find the best study resources around, tagged to your specific courses. Share your own to gain free Course Hero access.

    Browse Documents
  • -

    Question & Answers

    Get one-on-one homework help from our expert tutors—available online 24/7. Ask your own questions or browse existing Q&A threads. Satisfaction guaranteed!

    Ask a Question
Ask Expert Tutors You can ask 0 bonus questions You can ask 0 questions (0 expire soon) You can ask 0 questions (will expire )
Answers in as fast as 15 minutes