IBM System 360 RPG Debugging Template and Keypunch Card
Transcriber's Note:
The dimensions of the debugging template and the keypunch card are 7 3/8 by 3 1/4 .
The debugging template contains two sections on the front and three sections on the back. The back is labelled vertically along the left-hand edge: IBM J33837.
-------------------- 60- COMMENTS ----------------------------------------- 58-59 ZERO BLK EQ | | | --------------------| | | 56-57 - LO |RESULT IND.|COMPARE| --------------------| | | 54-55 + HI | | | ----------------------------------------- 53 H HALF ADJUST ---------------------- 52 DECIMAL POS. ---------------------- 49-51 FIELD LGTH ---------------------- 43-48 RESULT FIELD ---------------------- 39-42 ------ FACTOR 2 33-38 ---------------------- 28-32 OPER. ---------------------- 24-27 ------ FACTOR 1 18-23 ---------------------- 16-17 | I | -------- | N | 15 N A | D | -------------N--| I | 13-14 D | C | -------- | A | 12 N A | T | -------------N--| O | 10-11 D | R | -------- | S | 9 N | | ---------------------- 7-8 L0-L9 LR CONTROL LEVEL ---------------------- 6 CALCULATION SPECS. ----------------------
---------------------- 45-70 CONSTANT OR EDIT WORD ---------------------- 44 P PACKED ---------------------- 40-43 END POS IN OUTPUT RECORD ---------------------- 39 B BLANK AFTER ---------------------- 38 Z ZERO SUPP. ---------------------- 32-37 FIELD NAME ---------------------- 30-31 | I | -------- | N | 29 N A | D | -------------N--| I | 27-28 D | C | -------- | A | 26 N A | T | -------------N--| O | 24-25 D | R | -------- | S | 23 N | | ---------------------- 21-22 AFTER | | ----------------|SKIP| 19-20 BEFORE | | ---------------------- 18 AFTER | | ----------------| SP | 17 BEFORE | | ---------------------- 16 STACKER ---------------------- 15 H D T ---------------------- 7-14 FILE NAME ---------------------- 6 OUTPUT SPECS. ----------------------
---------------------- 66- COMMENTS ---------------------- 60-65 EXTENT EXIT FOR DAM ---------------------- 54-59 NAME OF LABEL EXIT ---------------------- 53 SNE LABELS ---------------------- 47-52 SYMBOLIC DEVICE ---------------------- 40-46 DEVICE ---------------------- 39 EL EXTENSION CODE ---------------------- 35-38 KEY FIELD START LOCATN. ---------------------- 33-34 OVERFLOW INDICATOR ---------------------- 32 IDT TYPE OF FILE ORG. ---------------------- 31 KI RECORD ADDRESS TYPE ---------------------- 29-30 LENGTH OF RECORD ADDRESS FIELD ---------------------- 28 LR MODE OF PROCESSING ---------------------- 24-27 RECORD LENGTH ---------------------- 20-23 BLOCK LENGTH ---------------------- 19 FV FILE FORMAT ---------------------- 18 AD SEQUENCE ---------------------- 17 E END OF FILE ---------------------- 16 PSCRT FILE DESIGNATION ---------------------- 15 IOUC FILE TYPE ---------------------- 7-14 FILE NAME ---------------------- 6 FILE DESCRIPTION SPECS. ----------------------