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.