,0080121001 BRANCH OVERFLOW 0360A 0A ,008012,019,026030L0653681001,008012,00110011B361080AB421/340080 1 OF 2 0360A 02 ,037044N000,340344,348349,357,361368/333080 PROG. CHAIN. ROUTINE 2 OF 2 0360A 03 L057S4510012,049L0772772/2772)/40/60)/80L/892702/2702413 CARD 1 OF 3 0360A 04 ,019026,033,040044,051051/340001 TITLE PRINT ROUTINE CARD 2 OF 3 0360A 05 ,S01S05,S12,S13S17,S18S25,S29S36,S37S41,S45/333080 CARD 3 OF 3 0360A 06 L0313961001B389 USE WHEN TESTS ARE RUN FROM TAPE 0360A 07 L0314041001BS88 ,, 0360A 08 L0314081001N000 ,, 0360A 09 L0314121001M360392 ,, 0360A 10 L0314191001/332 START TEST 0360A 11 L0314231001/ 0360A 12 L0314241001BS00S521 BR TO TITLE PRINT ROUTINE IF 1 IN S52 0360A 13 L0314321001/080 CLEAR READ AREA 0360A 14 L0314361001B348 BRANCH TO PROGRAM CHAINING ROUTINE 0360A 15 L0314401001,001078 LOAD PRINT AREA 0360A 16 L0314471001L080299 ,, 0360A 17 L0314541001L072272 ,, 0360A 18 L0314611001,221 ,, 0360A 19 L0314651001B451Z RESET OVERFLOW LATCH 0360A 20 L0314701001L222262 LOAD B FIELD 0360A 21 L0314771001A202262 ADD 0360A 22 L0314841001B487Z BRANCH IF OVERFLOW 0360A 23 L0314891001B451B B ON TO SCOPE 0360A 24 L0314941001B504006N NO ERROR IF N IN 006 0360A 25 L0315021001B900 BRANCH TO ERROR PRINT ROUTINE 0360A 26 L0315061001B451B B ON TO SCOPE 0360A 27 L0315111001B504006 NO ERROR IF BLANK IN 006 0360A 28 L0315191001B900 BRANCH TO ERROR PRINT ROUTINE 0360A 29 L0315231001B950C C ON TO CORRECT PRINT ROUTINE 0360A 30 L0315281001B958 BRANCH TO SENSE D 0360A 31 L0319191001L/14285 BEGIN ERROR PRINT ROUTINE 0360A 32 L0319261001B916E E ON TO ERROR STOP 0360A 33 L03193110012958 ERROR PRINT 0360A 34 L0319351001.958 ERROR STOP 0360A 35 L0319391001 WORD MARK 0360A 36 L0319691001L/19285 CORRECT PRINT ROUTINE 0360A 37 L03197610012 ,, 0360A 38 L0319771001B421D D ON TO REPEAT 0360A 39 L0319821001B417 BRANCH TO READ NEXT RECORD 0360A 40 L031/291001ERROR CONSTANTS 0360A 41 L031/341001 ,, 0360A 42 L031/391001A FIELD ,, 0360A 43 L031/591001B FIELD ,, 0360A 44 L031/791001RESULT SHOULD BE ,, 0360A 45 L031/991001RESULT IS ,, 0360A 46 ,019027,031,038042B031T98"B400L046352BW04BS88 BRANCH OVERFLOW 0360A 47 40 NO OVERFLOW 40 80 0360A 48 1! NO OVERFLOW 90 8? 0360A 49 Z0 OVERFLOW R0 80 0360A 50 U0 NO OVERFLOW D0 80 0360A 51 M0 NO OVERFLOW M0 80 0360A 52 40 NO OVERFLOW U0 Y0 0360A 53 90 OVERFLOW 90 Y0 0360A 54 Z0 OVERFLOW I0 Y0 0360A 55 R0 OVERFLOW R0 Y0 0360A 56 D0 NO OVERFLOW M0 Y0 0360A 57 40 NO OVERFLOW M0 Q0 0360A 58 Z0 OVERFLOW 90 Q0 0360A 59 U0 NO OVERFLOW U0 Q0 0360A 60 R0 OVERFLOW I0 Q0 0360A 61 D0 NO OVERFLOW D0 Q0 0360A 62 40 NO OVERFLOW D0 H0 0360A 63 R0 OVERFLOW 90 H0 0360A 64 U0 NO OVERFLOW M0 H0 0360A 65 Z0 OVERFLOW Z0 H0 0360A 66