Question: Find and fix all errors. Make sure you indicate the number of spaces added or removed or in what column something should or shouldn't be.


Find and fix all errors. Make sure you indicate the number of spaces added or removed or in what column something should or shouldn't be. Circle what you add if you think it might be missed or re-write the code or portion of code, as necessary Name Sec 001 002 Score / 15 12345678 IDENTIFICATION DIVISION. PROGRAM-ID. PROG1. AUTHOR. your name. Printout a personnel data file. ENVIRONMENT DIVISION . INPUT-OUTPUT SECTION. FILE-CONTROL SELECT PATRON-FILE ASSIGN TO INFILE SELECT PATRON-REPORT ASSIGN TO OUTFILE. DATA DIVISION. FILE SECTION. FD PATRON-FILE. 01 PATRON-RECORD. 03 PR-NAME 03 PR-ADDRESS 05 PR-CITY-STATE-2IP PIC X (24). 03 PR-TARGET-CONTR 03 PR-ACTUAL-CONTE PIC X(18) PIC X(18). PIC 9 (4). PIC 9(4). FD PATRON-REPORT 01 PATRON-LINE. 03 FILLER 03 PL-NAME 03 FILLER 03 PL-ADDRESS 03 FILLER 03 PL-CITY-STATE-ZIP PIC X(24). 03 FILLER 03 PL-TARGET-CONTR 03 FILLER 03 PL-ACTUAL-CONTR PIC X PIC X (18). PIC X. PIC X(18 . Pic x. PIC X (4) PIC . PIC X(4). WORKING-STORAGE SECTION. 01 WS-EOF-SWITCH PIC X (3) VALUE 'NONE
Step by Step Solution
There are 3 Steps involved in it
Get step-by-step solutions from verified subject matter experts
