Format 2 - with Paragraphs Only
Procedure Division - Format 2 >>-PROCEDURE DIVISION--+-----------------------------+----------> | .------------------. | | V | | '-USING----| Using-phrase |-+-' >--+-------------------------------------------------+--.-------> | (1) | '-+-RETURNING------+--+------------+--data-name-2-' '----------------' '-ADDRESS OF-' '-+------------+-' | (1) | '-GIVING-----' .-----------------------------------. V | >----paragraph-name.--+--------------+-+----------------------->< | .----------. | | V | | '---sentence-+-'
Notes:
- IBM® Extension
Figure 1. Coding Example to Show Procedure Division
Organization
SEQNBR -A 1 B..+....2....+....3....+....4....+....5....+....6....+....7..
004010 PROCEDURE DIVISION.
004020 DECLARATIVES.
004030 SECTION-NAME SECTION.
004040 PARAGRAPH-NAMES.
004050 PROGRAMMING STATEMENTS.
004060* COMMENTS.
004070 END DECLARATIVES.
004080 SECTION-NAME SECTION.
004090 PARAGRAPH-NAME.
004100 PROGRAMMING STATEMENTS.
