Programming in Cobol/400For companies moving their COBOL applications from older mainframes to AS/400, this book cover the specific tools from COBOL 400 that programmers need to convert and develop their applications. |
Contents
An Introduction to Programming in COBOL400 | 30 |
Case Problem | 39 |
An Overview of the Four Divisions | 51 |
Copyright | |
43 other sections not shown
Common terms and phrases
100-INITIALIZATION-RTN 200-PROCESS-RECORD-RTN 300-TERMINATION-RTN ADVANCING 2 LINES ALL-FMTS alphanumeric AMOUNT AMOUNT1 ARE-THERE-MORE-RECORDS called program COBOL Field-name COBOL/400 program coded COMPUTE contain control break DATA DIVISION defined department number digits display file EBCDIC Employee Number Employee Pay File EMPLOYEE-PAY-FILE EMPPAYPF EMPPAYR END-IF end-of-file Enter Enter key entry error example executed Field Description Figure flowchart function key indicates INITIALIZE input record Instruction Format INVALID KEY key field keyed file keyword logical file module MOVE NO-MORE-RECORDS TO TRUE Number of Char/Digits numeric field operation option output output area packed decimal PACKED-DECIMAL PERFORM physical file PIC clause PIC S9 PIC X(5 printer file Printer Spacing Chart PROCEDURE DIVISION processing pseudocode READ receiving field Record Description Layout record format report-item Sales screen sending field sequence software developer specified statement SUB1 subfile TOTAL VALUE SPACES WORKING-STORAGE SECTION WRITE PRINT-RECORD-OUT WS-LINE-COUNTER zero zero suppression Zip Code Туре