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:
About Online Cobol Compiler
Try our Online Cobol Compiler (Version GnuCOBOL v3.1.2) to Edit, Run, and Share your Cobol Code directly from your browser. This online development environment provides you the latest version GnuCOBOL v3.1.2.
How to use Online Cobol Compiler?
Write and Execute Code
- Write your program (or, paste it) directly under the "Source Code" tab.
- If you want to save your program, go to the "Project" menu and save it.
- You can directly execute your program without saving it by clicking on on "Execute" button.
User Input
The latest version of Coding Ground allows to provide program input at run time from the termnial window exactly the same way as you run your program at your own computer. So simply run a program and provide your program input (if any) from the terminal window available in the right side.
Online Cobol Compiler: Keyboard Shortcuts
The following are the keyword shortcut of this Online Cobol Compiler:
| Shortcut | Description |
|---|
| ⌘ + Enter | Run the program |
| ⌘ + S | Save Project (Login Required) |
| ⇧ + ⌘ + S | Save As Project |
| ⌘ + P | New Project |
| ⌘ + G | Share Project |
| ⌘ + Z | Undo Editing |
| ⌘ + Y | Redo Editing |
| ⌘ + A | Select All Text |
| ⌘ + X | Cut Selected Text |
| ⌘ + C | Copy Selected Text |
| ⌘ + V | Paste Copied Text |
| ⌘ + F | Search Text |
| ⌘ + ⌥ + F | Replace Text |
| Shortcut | Description |
|---|
| Ctrl + Enter | Run the program |
| Ctrl + S | Save Project |
| Shift + Ctrl + S | Save As Project |
| Ctrl + G | Share Project |
| Ctrl + Z | Undo Editing |
| Ctrl + Y | Redo Editing |
| Ctrl + A | Select All Text |
| Ctrl + X | Cut Selected Text |
| Ctrl + C | Copy Selected Text |
| Ctrl + V | Paste Copied Text |
| Ctrl + F | Search Text |
| Ctrl + H | Replace Text |
Online Cobol Compiler: Save and Share Cobol Code (Project)
Save Cobol Project Online
You can save your Cobol Project with us so that you can access this project later on. To save a project you will need to create a login Id with us. So before you save a project, please create a login Id using a link given at the top right corner of this page.
Share Cobol Project Online
You can use this feature to share your Cobol Code with your teachers, classmates and colleagues. Just click Share Button and it will create a short link, which can be shared through Email, WhatsApp or even through Social Media. A shared link will be deleted if it has been passive for almost 3 months.
More Features of Online Cobol Compiler
- Theme – You can change the current editor's theme from the "Editor Theme" option under "Settings" menu.
- Font Size – You can change the font size of the editor /compiler from from the "Font Size" option under "Settings" menu.
- Tab Size – You can change the tab size from the "Tab Size" option under "Settings" Menu.
- Show/Hide Line Numbers – You can show/hide the line number with the code from the "Show Line Numbers" or "Hide Line Numbers" option under "Settings" Menu.
- And, many more.
Benefits of Using Online Cobol Compiler
There are several benefits of using the Online Cobol Compiler to run your Cobol code:
- Platform independence: You can run your code from any device without taking care of operating systems.
- Convenience: You don't need to install anything for using this.
- No setup required: There is no need for additional setup to run your code.
- Updated version: Our online compiler/editors/terminals are the latest up-to-date.
