OS/RPG(32K)*V1M10                  RPGECLG   RPG                 10/12/72             PAGE 0001
                    H                                                                    EXAMP8
                    H*
                    H* PRINT STUDENT GRADE REPORT
                    H*
     001            FSTMASTR UP  F 250 250R 7KI     2 DISK14       S
     002            FRAF     IRE F5000  50  7        ETAPE         S
     003            FTABLE   IT  F  80  80           ETAPE         S
     004            FREPORT  O   F 132 132     OF    LPRINTER
     005            E    RAF     STMASTR
     006            E    TABLE           TABCNR  1 120  5  ATABCNA 51
     007            LREPORT    101 6012
     008            ISTMASTR AA  01   1 CA
     009            I       OR   91   1 CD
     010            I                                        9  43 NAME
     011            I                                      136 1410CN1N            11
     012            I                                      136 140 CN1
     013            I                                    P 142 1442CN1G
     014            I                                      145 1500CN2N            12
     015            I                                      145 149 CN2
     016            I                                    P 151 1532CN2G
     017            I                                      154 1590CN3N            13
     018            I                                      154 158 CN3
     019            I                                    P 160 1622CN3G
     020            I                                      163 1680CN4N            14
     021            I                                      163 167 CN4
     022            I                                    P 169 1712CN4G
     023            I                                      172 1770CN5N            15
     024            I                                      172 176 CN5
     025            I                                    P 178 1802CN5G
     026            I                                      181 1860CN6N            16
     027            I                                      181 185 CN6
     028            I                                    P 187 1892CN6G
     029            I                                      190 1950CN7N            17
     030            I                                      190 194 CN7
     031            I                                    P 196 1982CN7G
     032            I                                      199 2040CN8N            18
     033            I                                      199 203 CN8
     034            I                                    P 205 2072CN8G
     035            I                                    P 208 2102GPA
                    C*
                    C*  FOR EACH COURSE IN THE STUDENT RECORD WHICH CONTAINS A COURSE
                    C*  NUMBER, COMPUTE EARNED GRADE POINTS AND ACCUMULATE ATTEMPTED
                    C*  HOURS AND GRADE POINTS
                    C*
     036            C   01                Z-ADD0         THOURS  30
     037            C   01                Z-ADD0         TGPTS   52
                    C*
     038            C   01                SETOF                     21
     039            C   01N11   CN1       LOKUPTABCNR    TABCNA 51      21
     040            C   01 21             MOVE TABCNA    CRSHRS  10
------------------------------------------------------------------------------------------------------------------------
     OS/RPG(32K)*V1M10                  RPGECLG   RPG                 10/12/72             PAGE 0002
     041            C   01 21   THOURS    ADD  CRSHRS    THOURS
     042            C   01 21   CN1G      MULT CRSHRS    GPTS    52
     043            C   01 21   TGPTS     ADD  GPTS      TGPTS
                    C*
     044            C   01                SETOF                     21
     045            C   01N12   CN2       LOKUPTABCNR    TABCNA 51      21
     046            C   01 21             MOVE TABCNA    CRSHRS
     047            C   01 21   THOURS    ADD  CRSHRS    THOURS
     048            C   01 21   CN2G      MULT CRSHRS    GPTS
     049            C   01 21   TGPTS     ADD  GPTS      TGPTS
                    C*
     050            C   01                SETOF                     21
     051            C   01N13   CN3       LOKUPTABCNR    TABCNA 51      21
     052            C   01 21             MOVE TABCNA    CRSHRS
     053            C   01 21   THOURS    ADD  CRSHRS    THOURS
     054            C   01 21   CN3G      MULT CRSHRS    GPTS
     055            C   01 21   TGPTS     ADD  GPTS      TGPTS
                    C*
     056            C   01                SETOF                     21
     057            C   01N14   CN4       LOKUPTABCNR    TABCNA 51      21
     058            C   01 21             MOVE TABCNA    CRSHRS
     059            C   01 21   THOURS    ADD  CRSHRS    THOURS
     060            C   01 21   CN4G      MULT CRSHRS    GPTS
     061            C   01 21   TGPTS     ADD  GPTS      TGPTS
                    C*
     062            C   01                SETOF                     21
     063            C   01N15   CN5       LOKUPTABCNR    TABCNA 51      21
     064            C   01 21             MOVE TABCNA    CRSHRS
     065            C   01 21   THOURS    ADD  CRSHRS    THOURS
     066            C   01 21   CN5G      MULT CRSHRS    GPTS
     067            C   01 21   TGPTS     ADD  GPTS      TGPTS
                    C*
     068            C   01                SETOF                     21
     069            C   01N16   CN6       LOKUPTABCNR    TABCNA 51      21
     070            C   01 21             MOVE TABCNA    CRSHRS
     071            C   01 21   THOURS    ADD  CRSHRS    THOURS
     072            C   01 21   CN6G      MULT CRSHRS    GPTS
     073            C   01 21   TGPTS     ADD  GPTS      TGPTS
                    C*
     074            C   01                SETOF                     21
     075            C   01N17   CN7       LOKUPTABCNR    TABCNA 51      21
     076            C   01 21             MOVE TABCNA    CRSHRS
     077            C   01 21   THOURS    ADD  CRSHRS    THOURS
     078            C   01 21   CN7G      MULT CRSHRS    GPTS
     079            C   01 21   TGPTS     ADD  GPTS      TGPTS
                    C*
     080            C   01                SETOF                     21
     081            C   01N18   CN8       LOKUPTABCNR    TABCNA 51      21
     082            C   01 21             MOVE TABCNA    CRSHRS
     083            C   01 21   THOURS    ADD  CRSHRS    THOURS
------------------------------------------------------------------------------------------------------------------------
     OS/RPG(32K)*V1M10                  RPGECLG   RPG                 10/12/72             PAGE 0003
     084            C   01 21   CN8G      MULT CRSHRS    GPTS
     085            C   01 21   TGPTS     ADD  GPTS      TGPTS
                    C*
                    C* COMPUTE FINAL GRADE POINT AVERAGE
                    C*
     086            C   01      TGPTS     DIV  THOURS    GPA       H
     087            OSTMASTR D        01
     088            O                         GPA      210P
     089            OREPORT  H  201   1P
     090            O       OR        OF
     091            O                                   34 'STUDENT GRADE REPORT'
     092            O        D  1     01
     093            O                         GPA       55 '  0.  '
     094            O                         NAME      40
------------------------------------------------------------------------------------------------------------------------
     OS/RPG(32K)*V1M10                  RPGECLG   RPG                 10/12/72             PAGE 0004
                                                  SYMBOL  TABLES
RESULTING  INDICATORS
ADDRESS RI      ADDRESS RI      ADDRESS RI      ADDRESS RI      ADDRESS RI      ADDRESS RI      ADDRESS RI
 000004 U1       000005 U2       000006 U3       000007 U4       000008 U5       000009 U6       00000A U7
 00000B U8       000011 OF       000014 1P       000015 LR       000016 00       000017 01       000021 11
 000022 12       000023 13       000024 14       000025 15       000026 16       000027 17       000028 18
 00002B 21       000071 91       00007A L0       000085 H0       000086 H1       000087 H2       000088 H3
 000089 H4       00008A H5       00008B H6       00008C H7       00008D H8       00008E H9
FIELD  NAMES
ADDRESS FIELD         ADDRESS FIELD         ADDRESS FIELD         ADDRESS FIELD         ADDRESS FIELD
000183  CONTD  ENTRY  000138  TABCNR        000150  TABCNA        00018A  NAME          0001AD  CN1N
0001B1  CN1           0001B6  CN1G          0001B9  CN2N          0001BD  CN2           0001C2  CN2G
0001C5  CN3N          0001C9  CN3           0001CE  CN3G          0001D1  CN4N          0001D5  CN4
0001DA  CN4G          0001DD  CN5N          0001E1  CN5           0001E6  CN5G          0001E9  CN6N
0001ED  CN6           0001F2  CN6G          0001F5  CN7N          0001F9  CN7           0001FE  CN7G
000201  CN8N          000205  CN8           00020A  CN8G          00020D  GPA           000210  THOURS
000212  TGPTS         000215  CRSHRS        000216  GPTS
LITERALS
ADDRESS LITERAL                    ADDRESS LITERAL                    ADDRESS LITERAL
000219   0                         00021A  STUDENT GRADE REPORT       00022E   ½½À.½½
     009                                                  91                                 IES213I
     011                                                  CN1N                               IES216I
     014                                                  CN2N                               IES216I
     017                                                  CN3N                               IES216I
     020                                                  CN4N                               IES216I
     023                                                  CN5N                               IES216I
     026                                                  CN6N                               IES216I
     029                                                  CN7N                               IES216I
     032                                                  CN8N                               IES216I
IES213I    WARNING - RESULTING INDICATOR IS UNREFERENCED.
IES216I    WARNING - FIELD NAME IS UNREFERENCED.

                                            MEMORY MAP
INPUT/OUTPUT INTERCEPT                                      001F54
RECORD ADDRESS FILE                                         001F7C
------------------------------------------------------------------------------------------------------------------------
     OS/RPG(32K)*V1M10                  RPGECLG   RPG                 10/12/72             PAGE 0005
CHAINING                                                    000238
TABLE (INPUT AND OUTPUT)                                    000250
DETERMINE RECORD TYPE                                       0023B8
DATA SPECIFICATION                                          0020B4
GET INPUT RECORD                                            002608
DETAIL CALCULATIONS                                         0027D4
TOTAL CALCULATIONS                                          002D78
DETAIL LINES                                                002E52
TOTAL LINES                                                 002D90
INPUT/OUTPUT REQUEST BLOCKS POINTER                         003D98
LOCATION OF DCB POINTERS                                    002F60
INPUT/OUTPUT INTERFACE ROUTINES                             003350
TABLE LOOK UP                                               003E1C
LINE COUNTER                                                002FB0
LINE COUNTER TABLE                                          003330
WORK AREA POINTER                                           0042F8
OVERFLOW BYPASS                                             002E46
TABLE(ASSEMBLE 4)                                           002F04
OVERFLOW LINES                                              002DBA
LINKAGE PROGRAM                                             003FB0
PROGRAM LENGTH  00441D
*STATISTICS* SOURCE RECORDS =       95
*OPTIONS IN EFFECT* LOAD, NODECK, LIST, NOSEQN
'END OF COMPILATION'
------------------------------------------------------------------------------------------------------------------------
F128-LEVEL LINKAGE EDITOR OPTIONS SPECIFIED XREF,LIST,LET
          DEFAULT OPTION(S) USED -  SIZE=(131072,18432)
                                                CROSS REFERENCE TABLE
  CONTROL SECTION                       ENTRY
    NAME    ORIGIN  LENGTH                NAME   LOCATION     NAME   LOCATION     NAME   LOCATION     NAME   LOCATION
  EXAMP8        00    441D
                                        CONTD        183
  LOCATION  REFERS TO SYMBOL  IN CONTROL SECTION             LOCATION  REFERS TO SYMBOL  IN CONTROL SECTION
 ENTRY ADDRESS     3FB0
 TOTAL LENGTH      4420
****RPG       DOES NOT EXIST BUT HAS BEEN ADDED TO DATA SET
------------------------------------------------------------------------------------------------------------------------
              STUDENT GRADE REPORT
     LARRY H. ALAN                                 3.58
     JIM O. AUSTIN                                 2.86
     LOUIS E. AUSTIN                               3.22
     ROBERT I. BARBER                              3.00
     HELEN C. BENSON                               2.79
     CALVIN B. BRYANT                              2.87
     ROLAND F. BRYANT                              2.92
     ANN H. BURNETT                                2.22
     EVERETT H. BURNETT                            2.17
     ERNIE S. CHILDRESS                            2.14
     NELSON E. CHILDRESS                           2.00
     CYBIL M. CONLEY                               3.14
     TOM T. COOK                                   2.31
     BETTY P. DRAKE                                2.17
     RUSSELL S. ERICKSON                           2.31
     DAWN I. FITZGERALD                            2.59
     RUTH H. FRANKLIN                              2.46
     TED A. FRANKLIN                               2.33
     JOAN L. GARLAND                               3.00
     RICHARD A. GARLAND                            2.50
     RONALD M. GARLAND                             2.09
     LARRY C. GERBLICK                             2.17
     ERNIE E. GLASSMAN                             3.00
     ELIZABETH W. GLOVER                           2.33
     KIMBERLY G. GLOVER                            3.08
     CHARLES K. HALL                               2.42
     ERNIE A. HALL                                 2.00
     WILLIAM K. HALL                               2.71
     RICHARD O. HAMMOND                            1.83
     LOUISE W. HARMON                              2.43
     JACK S. HASTINGS                              2.33
     MARGUERITE K. HASTINGS                        3.00
     PETER H. HASTINGS                             2.25
     SAMANTHA I. HASTINGS                          3.25
     ARNOLD O. HILLFORD                            2.50
     MARGUERITE N. HILLFORD                        3.34
     HOWARD B. HODGES                              2.25
     RONALD I. HODGES                              2.76
     HEATHER J. HORTON                             1.57
     SAMANTHA B. HORTON                            3.10
     JOHN J. JACKSON                               1.55
     MARILYN W. JACOBY                             2.46
     JILL K. JENNINGS                              1.58
     ROLAND D. JOHNSON                             2.75
     CALVIN D. LABROIE                             2.67
     SAMANTHA D. LABROIE                           2.00
     EVELYN C. LANDERS                             2.40
     LUCY B. LANDERS                               2.09
     WANDA I. LARUE                                2.92
     YOLANDA C. LARUE                              3.21
     CINDY O. MCKAY                                2.59
     DANIEL R. MCKAY                               2.33
     TED R. MCKAY                                  3.71
     SARAH V. MCKENZIE                             3.00
     ZELDA E. MCKENZIE                             2.56
     CINDY D. MCQUEEN                              2.92
     CAITLIN I. MEEHAN                             2.00
     JACK D. MEEHAN                                3.33
------------------------------------------------------------------------------------------------------------------------
              STUDENT GRADE REPORT
     JIM N. MEEHAN                                 1.95
     CLARA T. MORENO                               2.79
     HEATHER J. MORENO                             2.31
     TED D. MULL                                   2.33
     TAMMY T. NEWBURY                              2.75
     BETTY J. NEWTON                               1.74
     DEBRA A. NEWTON                               2.74
     CINDY E. NOELKE                               3.22
     DIANE G. NOELKE                               2.83
     JANET F. NORRIS                               2.50
     TAMMY L. NORRIS                               2.86
     HANNAH E. NORTON                              2.69
     JACOB K. PARKER                               2.45
     LOUISE L. PARKER                              2.90
     ARNOLD W. PARRISH                             2.44
     EVERETT R. PARRISH                            2.59
     VIRGINIA A. PETERSON                          3.09
     LUCY I. POWERS                                2.26
     EVERETT I. RAMSEY                             2.46
     LAURIE B. REED                                2.34
     BEVERLY L. RICHARDS                           2.78
     MIKE T. RICHARDS                              2.41
     CALVIN B. RODGERS                             2.09
     THELMA I. RODGERS                             2.74
     BOB A. SCHAEFER                               2.78
     KATHRYN I. SCHWAB                             3.00
     JOSEPH R. SMITH                               3.00
     JANET V. TEASDALE                             2.56
     LAURIE N. TEASDALE                            2.40
     JOSEPH H. THATCHER                            3.07
     BRENDA F. TUCKER                              3.17
     KAREN A. TUCKER                               2.67
     EVERETT K. VANACKER                           2.42
     PATTY S. VANACKER                             2.33
     LARRY V. WEAVER                               2.00
     CLIFF N. WHITE                                3.57
     JACOB T. WINSTON                              2.29
     LARRY W. WINSTON                              2.43
     SHARON T. YAEGER                              1.83
------------------------------------------------------------------------------------------------------------------------