Transcriber's Note:
The dimensions of the debugging template and the keypunch cardare 7 3/8" by 3 1/4".
The debugging template contains two sections on the front andthree sections on the back. The back is labelled vertically alongthe left-hand edge: IBM J33837.
The front of the keypunch card is labelled vertically along theright-hand edge: PRYOR 5081. Holes punched in the card arerepresented in the text by [].
SYSTEM 360
RPG DEBUGGING TEMPLATE
AND KEYPUNCH CARD
Contents
SYSTEM 360
RPG DEBUGGING TEMPLATE
Debugging template - front-------------------- 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. ----------------------