Seq # *Modification Id* Act
----------------------------+
00001 M01S00001.smfstat +++|*NOSEQ
00002 M01S00002.smfstat +++|*WIDTH 132
00003 M01S00003.smfstat +++|.PROC,SMFSTAT.
00004 M01S00004.smfstat +++|RETURN,ZZZDATA.
00005 M01S00005.smfstat +++|REWIND,ZZZSTAT,TAPE2,TAPE3,TAPE4,ZZZLGO.
00006 M01S00006.smfstat +++|$FSE,ZZZDATA.SUN
00007 M01S00007.smfstat +++|FTN5,I=ZZZSTAT,L=0,B=ZZZLGO.
00008 M01S00008.smfstat +++|ZZZLGO,ZZZDATA.
00009 M01S00009.smfstat +++|REWIND,TAPE2,TAPE3,TAPE4,STATOUT.
00010 M01S00010.smfstat +++|COPYSBF,TAPE4,STATOUT.
00011 M01S00011.smfstat +++|COPYSBF,TAPE3,STATOUT.
00012 M01S00012.smfstat +++|COPYSBF,TAPE2,STATOUT.
00013 M01S00013.smfstat +++|REWIND,TAPE4.
00014 M01S00014.smfstat +++|COPY,TAPE4,OUTPUT.
00015 M01S00015.smfstat +++|REVERT. SMFSTAT COMPLETE.
00016 M01S00016.smfstat +++|EXIT.
00017 M01S00017.smfstat +++|REVERT. SMFSTAT FAILED.
00018 M01S00018.smfstat +++|.DATA,ZZZSTAT.
00019 M01S00019.smfstat +++| PROGRAM SMFSTAT(TAPE1,TAPE2,TAPE3,TAPE4)
00020 M01S00020.smfstat +++|
00021 M01S00021.smfstat +++| INTEGER SCLR(49), VCTR1(18), VCTR2(18)
00022 M01S00022.smfstat +++| INTEGER VCTR3(18), VCTR4(18), VCTR5(18), VCTR6(18)
00023 M01S00023.smfstat +++|
00024 M01S00024.smfstat +++| CHARACTER*20 LBL1(18), LBL2(18), LBL3(18)
00025 M01S00025.smfstat +++| CHARACTER*20 LBL4(18), LBL5(18), LBL6(18)
00026 M01S00026.smfstat +++| CHARACTER*55 TAG(43)
00027 M01S00027.smfstat +++|
00028 M01S00028.smfstat +++| DATA (TAG(I),I=1,15) /
00029 M01S00029.smfstat +++| + ' SURPLUS WORD, NOT ON CONSOLE DISPLAYS ',
00030 M01S00030.smfstat +++| + ' NUMBER OF CRITICAL IAF BUFFER SHORTAGES ',
00031 M01S00031.smfstat +++| + ' NUMBER OF TASK SHORTAGES ',
00032 M01S00032.smfstat +++| + ' NUMBER OF SESSIONS ',
00033 M01S00033.smfstat +++| + ' NUMBER OF TRANSACTIONS ',
00034 M01S00034.smfstat +++| + ' TOTAL RESPONSE TIME IN MILLISECONDS ',
00035 M01S00035.smfstat +++| + ' TOTAL THINK TIME IN MILLISECONDS ',
00036 M01S00036.smfstat +++| + ' PREEMPTIVE SWAPS TO ADVANCE TTY OUTPUT ',
00037 M01S00037.smfstat +++| + ' PREEMPTIVE SWAPS FOR TASK SHORTAGE ',
00038 M01S00038.smfstat +++| + ' PREEMTIVE SWAPS FOR IAF BUFFER SHORTAGE ',
00039 M01S00039.smfstat +++| + ' TTY OUTPUT FRAGMENTATION (BUFFER OVERFLOW) ',
00040 M01S00040.smfstat +++| + ' USER BREAKS ',
00041 M01S00041.smfstat +++| + ' USER DETACHES ',
00042 M01S00042.smfstat +++| + ' MAXIMUM USERS LOGGED IN ',
00043 M01S00043.smfstat +++| + ' CURRENT NUMBER OF USERS ' /
00044 M01S00044.smfstat +++| DATA (TAG(I),I=16,30) /
00045 M01S00045.smfstat +++| + ' REAL TIME CLOCK ',
00046 M01S00046.smfstat +++| + ' NUMBER OF RECALL CYCLES ',
00047 M01S00047.smfstat +++| + ' NUMBER OF USER-ECS SWAPS ',
00048 M01S00048.smfstat +++| + ' NUMBER OF DISK SWAPS ',
00049 M01S00049.smfstat +++| + ' TOTAL SWAPPING TIME IN MILLISECONDS ',
00050 M01S00050.smfstat +++| + ' TOTAL CIO TIME IN MILLISECONDS ',
00051 M01S00051.smfstat +++| + ' NUMBER OF CIO CALLS ',
00052 M01S00052.smfstat +++| + ' NUMBER OF TRANSACTIONS CAUSING ZERO CIO CALLS ',
00053 M01S00053.smfstat +++| + ' NUMBER OF TRANSACTIONS CAUSING 16/MORE CIO CALLS ',
00054 M01S00054.smfstat +++| + ' NUMBER OF CIO CALLS IN LARGE TRANSACTIONS ',
00055 M01S00055.smfstat +++| + ' TOTAL WORKFILE CIO CALLS FOR INITIAL BUILDS ',
00056 M01S00056.smfstat +++| + ' TTY INPUT WORDS ',
00057 M01S00057.smfstat +++| + ' TTY OUTPUT WORDS ',
00058 M01S00058.smfstat +++| + ' TTY OUTPUT BLOCKS ',
00059 M01S00059.smfstat +++| + ' NUMBER OF OUTPUT FRAGMENTS WITH SWAP AVOIDANCE ' /
00060 M01S00060.smfstat +++| DATA (TAG(I),I=31,43) /
00061 M01S00061.smfstat +++| + ' TOTAL MILLSECONDS OF TASK UTILIZATION ',
00062 M01S00062.smfstat +++| + ' WORKFILE LINE ACCESSES ',
00063 M01S00063.smfstat +++| + ' WORKFILE SECTORS READ FROM CACHE ',
00064 M01S00064.smfstat +++| + ' WORKFILE SECTORS READ FROM DISK ',
00065 M01S00065.smfstat +++| + ' WORKFILE DRAIN OUTPUT TO SWITCH BUFFER TO INPUT ',
00066 M01S00066.smfstat +++| + ' WORKFILE PURGE WRONG INPUT SECTOR ',
00067 M01S00067.smfstat +++| + ' WORKFILE CACHE FLUSH SEQUENCES ',
00068 M01S00068.smfstat +++| + ' WORKFILE PURGE INPUT TO SWITCH BUFFER TO OUTPUT ',
00069 M01S00069.smfstat +++| + ' WORKFILE SECTORS WRITTEN TO DISK ',
00070 M01S00070.smfstat +++| + ' WORKFILE DISCONTIGUOUS WRITE EVENTS ',
00071 M01S00071.smfstat +++| + ' WORKFILE PADDING SECTORS ',
00072 M01S00072.smfstat +++| + ' WORKFILE CIO READ FUNCTIONS ',
00073 M01S00073.smfstat +++| + ' RECALL TO MINIMIZE CPU UTILIZATION ' /
00074 M01S00074.smfstat +++|
00075 M01S00075.smfstat +++| DATA LBL1/ ' ', ' ', 'INSTANT', '1/64 SEC', '1/32 SEC',
00076 M01S00076.smfstat +++| + '1/16 SEC', '1/8 SEC', '1/4 SEC', '1/2 SEC', '1 SEC',
00077 M01S00077.smfstat +++| + '1-2 SEC', '2-4 SEC', '4-8 SEC', '8-16 SEC', '16-32 SEC',
00078 M01S00078.smfstat +++| + '32-64 SEC', '64-128 SEC', '128 OR MORE SEC' /
00079 M01S00079.smfstat +++|
00080 M01S00080.smfstat +++| DATA LBL2/ ' ', ' ', 'LESS THAN 1 SEC', '1-2 SEC',
00081 M01S00081.smfstat +++| + '2-4', '4-8', '8-16', '16-32', '32-64', '64-128',
00082 M01S00082.smfstat +++| + '128-256', '256-512', '512-1K', '1K - 2K', '2K - 4K',
00083 M01S00083.smfstat +++| + '4K - 8K', '8K - 16K', '16K OR MORE' /
00084 M01S00084.smfstat +++|
00085 M01S00085.smfstat +++| DATA LBL3/ ' ', ' ', 'ZERO', '1', '2-3', '4-7',
00086 M01S00086.smfstat +++| + '8-15', '16-31', '32-63', '64-127',
00087 M01S00087.smfstat +++| + '128-255', '256-511', '512-1K', '1K - 2K', '2K - 4K',
00088 M01S00088.smfstat +++| + '4K - 8K', '8K - 16K', '16K OR MORE' /
00089 M01S00089.smfstat +++|
00090 M01S00090.smfstat +++| DATA LBL4/ ' ', ' ', 'ZERO', '1', '2-3', '4-7',
00091 M01S00091.smfstat +++| + '8-15', '16-31', '32-63', '64-127',
00092 M01S00092.smfstat +++| + '128-255', '256-511', '512-1K', '1K - 2K', '2K - 4K',
00093 M01S00093.smfstat +++| + '4K - 8K', '8K - 16K', '16K OR MORE' /
00094 M01S00094.smfstat +++|
00095 M01S00095.smfstat +++| DATA LBL5/ ' ', ' ', 'ZERO', '1', '2-3', '4-7',
00096 M01S00096.smfstat +++| + '8-15', '16-31', '32-63', '64-127',
00097 M01S00097.smfstat +++| + '128-255', '256-511', '512-1K', '1K - 2K', '2K - 4K',
00098 M01S00098.smfstat +++| + '4K - 8K', '8K - 16K', '16K OR MORE' /
00099 M01S00099.smfstat +++|
00100 M01S00100.smfstat +++| DATA LBL6/ ' ', ' ', 'ZERO', '1', '2-3', '4-7',
00101 M01S00101.smfstat +++| + '8-15', '16-31', '32-63', '64-127',
00102 M01S00102.smfstat +++| + '128-255', '256-511', '512-1K', '1K - 2K', '2K - 4K',
00103 M01S00103.smfstat +++| + '4K - 8K', '8K - 16K', '16K OR MORE' /
00104 M01S00104.smfstat +++|
00105 M01S00105.smfstat +++| READ(1,1001) SCLR, VCTR1, VCTR2, VCTR3, VCTR4,
00106 M01S00106.smfstat +++| + VCTR5, VCTR6
00107 M01S00107.smfstat +++|1001 FORMAT( 49(O20,/), 6(O10,O10,/,4O5,/,4O5,/,4O5,/,4O5,/) )
00108 M01S00108.smfstat +++|
00109 M01S00109.smfstat +++| WRITE(3,3001) (TAG(I),SCLR(I),I=2,43)
00110 M01S00110.smfstat +++|3001 FORMAT(1X,A55,I10)
00111 M01S00111.smfstat +++|
00112 M01S00112.smfstat +++| WRITE (4,4001) SCLR(4), SCLR(5), SCLR(14)
00113 M01S00113.smfstat +++|4001 FORMAT(' SESSIONS, TRANSACTS, MAX USERS ', 3I10)
00114 M01S00114.smfstat +++|
00115 M01S00115.smfstat +++| WRITE (4,4002) .001*FLOAT(SCLR(6))/SCLR(5)
00116 M01S00116.smfstat +++|4002 FORMAT(' AVERAGE RESPONSE TIME ', F10.3)
00117 M01S00117.smfstat +++|
00118 M01S00118.smfstat +++| WRITE (4,4003) .001*FLOAT(SCLR(7))/SCLR(5)
00119 M01S00119.smfstat +++|4003 FORMAT(' AVERAGE THINK TIME ', F10.3)
00120 M01S00120.smfstat +++|
00121 M01S00121.smfstat +++| WRITE (4,4004) .001*FLOAT(SCLR(21))/SCLR(22)
00122 M01S00122.smfstat +++|4004 FORMAT(' AVERAGE CIO TIME ', F10.3)
00123 M01S00123.smfstat +++|
00124 M01S00124.smfstat +++| WRITE (4,4005) FLOAT(SCLR(22))/SCLR(5)
00125 M01S00125.smfstat +++|4005 FORMAT(' AVERAGE CIO PER TRANSACTION ', F10.3)
00126 M01S00126.smfstat +++|
00127 M01S00127.smfstat +++| WRITE (4,4006) FLOAT(SCLR(5))/SCLR(4)
00128 M01S00128.smfstat +++|4006 FORMAT(' AVERAGE TRANSACT PER SESSION ', F10.3)
00129 M01S00129.smfstat +++|
00130 M01S00130.smfstat +++| WRITE (4,4007) FLOAT(SCLR(23))/SCLR(5)
00131 M01S00131.smfstat +++|4007 FORMAT(' FRACTION OF ZERO-CIO TRANSACT', F10.3)
00132 M01S00132.smfstat +++|
00133 M01S00133.smfstat +++| WRITE (4,4008) FLOAT(SCLR(34))/SCLR(33)
00134 M01S00134.smfstat +++|4008 FORMAT(' RATIO PRUS READ/CACHED ', F10.3)
00135 M01S00135.smfstat +++|
00136 M01S00136.smfstat +++| WRITE (4,4009) FLOAT(SCLR(34))/SCLR(42)
00137 M01S00137.smfstat +++|4009 FORMAT(' RATIO PRUS READ/CIO CALL ', F10.3)
00138 M01S00138.smfstat +++|
00139 M01S00139.smfstat +++| WRITE (4,4010) FLOAT(SCLR(33))/SCLR(42)
00140 M01S00140.smfstat +++|4010 FORMAT(' RATIO CACHE HITS/CIO CALL ', F10.3)
00141 M01S00141.smfstat +++|
00142 M01S00142.smfstat +++| WRITE (4,4011) FLOAT(SCLR(27))/SCLR(5)
00143 M01S00143.smfstat +++|4011 FORMAT(' INPUT WORDS PER TRANSACT ', F10.3)
00144 M01S00144.smfstat +++|
00145 M01S00145.smfstat +++| WRITE (4,4012) FLOAT(SCLR(28))/SCLR(5)
00146 M01S00146.smfstat +++|4012 FORMAT(' OUTPUT WORDS PER TRANSACT ', F10.3)
00147 M01S00147.smfstat +++|
00148 M01S00148.smfstat +++| WRITE (4,4013) FLOAT(SCLR(24))/SCLR(5)
00149 M01S00149.smfstat +++|4013 FORMAT(' FRACTION OF TRANSACTS LARGE ', F10.3)
00150 M01S00150.smfstat +++|
00151 M01S00151.smfstat +++| WRITE (4,4014) FLOAT(SCLR(25))/SCLR(22)
00152 M01S00152.smfstat +++|4014 FORMAT(' FRACTION OF CIOS, LARGE TRANS', F10.3)
00153 M01S00153.smfstat +++|
00154 M01S00154.smfstat +++| WRITE (4,4015) FLOAT(SCLR(32))/SCLR(5)
00155 M01S00155.smfstat +++|4015 FORMAT(' AVERAGE LINE ACCESSES/TRANS ', F10.3)
00156 M01S00156.smfstat +++|
00157 M01S00157.smfstat +++| WRITE (4,4016) FLOAT(SCLR(32))/SCLR(22)
00158 M01S00158.smfstat +++|4016 FORMAT(' RATIO LINE ACCESSES TO CIOS ', F10.3)
00159 M01S00159.smfstat +++|
00160 M01S00160.smfstat +++| WRITE (4,4017) FLOAT(SCLR(31))/SCLR(16)
00161 M01S00161.smfstat +++|4017 FORMAT(' TASK UTILIZATION FACTOR ', F10.3)
00162 M01S00162.smfstat +++|
00163 M01S00163.smfstat +++| WRITE (4,4018) FLOAT(SCLR(30))/SCLR(11)
00164 M01S00164.smfstat +++|4018 FORMAT(' FRACTION OF MSGS UNSWAPPED ', F10.3)
00165 M01S00165.smfstat +++|
00166 M01S00166.smfstat +++|
00167 M01S00167.smfstat +++|
00168 M01S00168.smfstat +++| WRITE(2,2051) VCTR1(1)/(64.0*VCTR1(2))
00169 M01S00169.smfstat +++|2051 FORMAT(/,' AVERAGE RESPONSE TIME PER TRANSACTION ',F10.3)
00170 M01S00170.smfstat +++|
00171 M01S00171.smfstat +++| WRITE(2,2001) (LBL1(I),VCTR1(I),I=3,18)
00172 M01S00172.smfstat +++|2001 FORMAT(/,' TRANSACTIONS PER RESPONSE TIME CATEGORY ', //,
00173 M01S00173.smfstat +++| + 16(10X,A12,I10,/) )
00174 M01S00174.smfstat +++|
00175 M01S00175.smfstat +++| WRITE(2,2052) VCTR2(1)/FLOAT(VCTR2(2))
00176 M01S00176.smfstat +++|2052 FORMAT(/,' AVERAGE THINK TIME PER TRANSACTION ',F10.3)
00177 M01S00177.smfstat +++|
00178 M01S00178.smfstat +++| WRITE(2,2002) (LBL2(I),VCTR2(I),I=3,18)
00179 M01S00179.smfstat +++|2002 FORMAT(/,' TRANSACTIONS PER THINK TIME CATEGORY ', //,
00180 M01S00180.smfstat +++| + 16(10X,A12,I10,/) )
00181 M01S00181.smfstat +++|
00182 M01S00182.smfstat +++| WRITE(2,2053) VCTR3(1)/FLOAT(VCTR3(2))
00183 M01S00183.smfstat +++|2053 FORMAT(/,' AVERAGE CIO CALLS PER TRANSACTION ',F10.3)
00184 M01S00184.smfstat +++|
00185 M01S00185.smfstat +++| WRITE(2,2003) (LBL3(I),VCTR3(I),I=3,18)
00186 M01S00186.smfstat +++|2003 FORMAT(/,' TRANSACTIONS PER CIO COUNT CATEGORY ', //,
00187 M01S00187.smfstat +++| + 16(10X,A12,I10,/) )
00188 M01S00188.smfstat +++|
00189 M01S00189.smfstat +++| WRITE(2,2054) VCTR4(1)/FLOAT(VCTR4(2))
00190 M01S00190.smfstat +++|2054 FORMAT(/,' AVERAGE TRANSACTIONS PER SESSION ',F10.3)
00191 M01S00191.smfstat +++|
00192 M01S00192.smfstat +++| WRITE(2,2004) (LBL4(I),VCTR4(I),I=3,18)
00193 M01S00193.smfstat +++|2004 FORMAT(/,' SESSIONS PER TRANSACTION COUNT CATEGORY ', //,
00194 M01S00194.smfstat +++| + 16(10X,A12,I10,/) )
00195 M01S00195.smfstat +++|
00196 M01S00196.smfstat +++| WRITE(2,2055) VCTR5(1)/FLOAT(VCTR5(2))
00197 M01S00197.smfstat +++|2055 FORMAT(/,' AVERAGE WORKFILE LINES PER SESSION ',F10.3)
00198 M01S00198.smfstat +++|
00199 M01S00199.smfstat +++| WRITE(2,2005) (LBL5(I),VCTR5(I),I=3,18)
00200 M01S00200.smfstat +++|2005 FORMAT(/,' SESSIONS PER FILE SIZE CATEGORY ', //,
00201 M01S00201.smfstat +++| + 16(10X,A12,I10,/) )
00202 M01S00202.smfstat +++|
00203 M01S00203.smfstat +++| WRITE(2,2056) VCTR6(1)/FLOAT(VCTR6(2))
00204 M01S00204.smfstat +++|2056 FORMAT(/,' AVERAGE OUTPUT MESSAGE SIZE ',F10.3)
00205 M01S00205.smfstat +++|
00206 M01S00206.smfstat +++| WRITE(2,2006) (LBL6(I),VCTR6(I),I=3,18)
00207 M01S00207.smfstat +++|2006 FORMAT(/,' TRANSACTIONS PER OUTPUT MSG SIZE CATEGORY ', //,
00208 M01S00208.smfstat +++| + 16(10X,A12,I10,/) )
00209 M01S00209.smfstat +++|
00210 M01S00210.smfstat +++| STOP
00211 M01S00211.smfstat +++| END
00212 M01S00212.smfstat +++|*WEOR