Rational Developer for System z
Enterprise COBOL for z/OS, Version 4.1, Programming Guide


Image description: IGYTSALE nested parts

This image shows the nesting of programs in IGYTSALE. The number at the start of each line in the following pseudocode reflects the nesting level.

 1 PROGRAM-ID. IGYTSALE.
 2 PROGRAM-ID. Process-transactions.
 3 PROGRAM-ID. Transaction-edit is Initial.
 4 PROGRAM-ID. Print-edited-transactions.
 4 End Program Print-edited-transactions.
 4 PROGRAM-ID. Print-response-time.
 4 End Program Print-response-time.
 3 End Program transaction-edit.
 3 PROGRAM-ID. Accumulate-product-by-area.
 3 End Program Accumulate-product-by-area.
 3 PROGRAM-ID. Accumulate-salesperson-sales.
 3 End Accumulate-salesperson-sales.
 2 End Program Process-transactions.
 2 PROGRAM-ID. Print-product-by-area.
 2 End Program Print-product-by-area.
 2 PROGRAM-ID. Print-salesperson-sales.
 2 End Program Print-salesperson-sales.
 2 PROGRAM-ID. Table-manager is common.
 3 PROGRAM-ID. Build-sorted-tables.
 3 End Program Build-sorted-tables.
 3 PROGRAM-ID. Search-tables.
 3 End Program Search-tables.
 2 End Program Table-manager.
 2 PROGRAM-ID. Error-routine is Common.
 2 End Program Error-routine is Common.
 1 End Program IGYTSALE.

End of image description.


Terms of use | Feedback

This information center is powered by Eclipse technology. (http://www.eclipse.org)