Seq # *Modification Id* Act
----------------------------+
03972 M00S03905.qfsp +++| SA4 ISBC
03973 M00S03906.qfsp +++| BX7 X4
03974 M00S03907.qfsp +++| SA7 ISBA
03975 M00S03908.qfsp +++| BX7 X6-X6 INHIBIT *I* DIRECTIVE
03976 M00S03909.qfsp +++| SA7 I
03977 M00S03910.qfsp +++| ISB2 SA4 N
03978 M00S03911.qfsp +++| NZ X4,ISB4 IF K-DISPLAY INPUT NOT ALLOWED
03979 M00S03912.qfsp +++|
03980 M00S03913.qfsp +++| ISB3 SA5 KBUF
03981 M00S03914.qfsp +++| NZ X5,ISB5 IF INPUT ENTERED
03982 M00S03915.qfsp +++| RECALL
03983 M00S03916.qfsp +++| EQ ISB3
03984 M00S03917.qfsp +++|
03985 M00S03918.qfsp +++| ISB4 SA5 ISBA
03986 M00S03919.qfsp +++| BX6 X5
03987 M00S03920.qfsp +++| SA6 KBUF
03988 M00S03921.qfsp +++| SA7 A6+B1
03989 M00S03922.qfsp +++| SA7 TINE+TIII
03990 M00S03923.qfsp +++| ISB5 MESSAGE KBUF,3,R ENTER DIRECTIVE INTO CP DAYFILE
03991 M00S03924.qfsp +++| MOVE 5,KBUF,KINP MOVE INPUT TO DISPLAY
03992 M00S03925.qfsp +++| MOVE 4,ISBB,KMES CLEAR MESSAGE LINE
03993 M00S03926.qfsp +++| SB2 KBUF MOVE INPUT TO STRING BUFFER
03994 M00S03927.qfsp +++| RJ USB
03995 M00S03928.qfsp +++| SX6 X6+B1 SET LWA+1 OF CHARACTER STRING
03996 M00S03929.qfsp +++| SA6 SL
03997 M00S03930.qfsp +++| BX6 X6-X6 CLEAR INPUT BUFFER
03998 M00S03931.qfsp +++| SB2 5
03999 M00S03932.qfsp +++| SA6 TINE+TIII ALLOW COMMANDS TO BE PROCESSED
04000 M00S03933.qfsp +++| SA6 KBUF
04001 M00S03934.qfsp +++| ISB6 SA6 A6+B1
04002 M00S03935.qfsp +++| SB2 B2-B1
04003 M00S03936.qfsp +++| NZ B2,ISB6 IF NOT END OF BUFFER
04004 M00S03937.qfsp +++| SX7 B6-1 SET STRING POINTER ADDRESS
04005 M00S03938.qfsp +++| SA7 SP
04006 M00S03939.qfsp +++| EQ ISBX
04007 M00S03940.qfsp +++|
04008 M00S03941.qfsp +++| ISBA VFD 60/8LGO,STOP.
04009 M00S03942.qfsp +++| ISBB DIS 4,
04010 M00S03943.qfsp +++| ISBC VFD 60/0LSTOP.
04011 M00S03944.qfsp +++| USBB BSS NSCI+10 STRING BUFFER
04012 M00S03945.qfsp +++| SET SPACE 4,14
04013 M00S03946.qfsp +++|** SET - SEARCH ENTRY TABLE.
04014 M00S03947.qfsp +++|*
04015 M00S03948.qfsp +++|* ENTRY (X0) = SEARCH MASK.
04016 M00S03949.qfsp +++|* (A3) = FWA-1 OF TABLE TO SEARCH.
04017 M00S03950.qfsp +++|* (X6) = SEARCH ELEMENT.
04018 M00S03951.qfsp +++|*
04019 M00S03952.qfsp +++|* EXIT (A3) = TABLE ADDRESS OF ENTRY.
04020 M00S03953.qfsp +++|* (X3) = TABLE ENTRY.
04021 M00S03954.qfsp +++|* (X4) = 0, ENTRY FOUND.
04022 M00S03955.qfsp +++|*
04023 M00S03956.qfsp +++|* USES X - 3, 4.
04024 M00S03957.qfsp +++|* A - 3.
04025 M00S03958.qfsp +++|
04026 M00S03959.qfsp +++|
04027 M00S03960.qfsp +++| SET SUBR ENTRY/EXIT
04028 M00S03961.qfsp +++| SET1 SA3 A3+B1
04029 M00S03962.qfsp +++| SX4 B1 ASSUME ENTRY NOT FOUND
04030 M00S03963.qfsp +++| ZR X3,SETX IF END OF TABLE
04031 M00S03964.qfsp +++| BX4 X6-X3
04032 M00S03965.qfsp +++| BX4 X0*X4
04033 M00S03966.qfsp +++| NZ X4,SET1 IF NO MATCH
04034 M00S03967.qfsp +++| EQ SETX
04035 M00S03968.qfsp +++| SPD SPACE 4,12
04036 M00S03969.qfsp +++|** SPD - SET PROCESSED DATA.
04037 M00S03970.qfsp +++|*
04038 M00S03971.qfsp +++|* ENTRY *PINB* SET WITH PROCESSED INPUT DATA.
04039 M00S03972.qfsp +++|*
04040 M00S03973.qfsp +++|* EXIT ARGUMENT TABLE AND K-DISPLAY UPDATED.
04041 M00S03974.qfsp +++|*
04042 M00S03975.qfsp +++|* USES X - 3, 4, 5, 6, 7.
04043 M00S03976.qfsp +++|* A - 3, 4, 5, 6, 7.
04044 M00S03977.qfsp +++|* B - 4.
04045 M00S03978.qfsp +++|*
04046 M00S03979.qfsp +++|* CALLS GKA.
04047 M00S03980.qfsp +++|
04048 M00S03981.qfsp +++|
04049 M00S03982.qfsp +++| SPD SUBR ENTRY/EXIT
04050 M00S03983.qfsp +++| SA5 PINB GET ARGUMENT TABLE INDICES
04051 M00S03984.qfsp +++| SB4 X5+
04052 M00S03985.qfsp +++| RJ GKA GET K-DISPLAY ADDRESS
04053 M00S03986.qfsp +++| SA3 A5+1 SET PRIMARY K-DISPLAY VALUE
04054 M00S03987.qfsp +++| SA4 A3+1 SET PRIMARY ARGUMENT TABLE VALUE
04055 M00S03988.qfsp +++| ZR X1,SPD1 IF INCORRECT UPDATE
04056 M00S03989.qfsp +++| BX6 X3
04057 M00S03990.qfsp +++| BX7 X4
04058 M00S03991.qfsp +++| SA6 X1+ UPDATE K-DISPLAY BUFFER
04059 M00S03992.qfsp +++| SA7 X5+TARG
04060 M00S03993.qfsp +++| SPD1 SA4 A4+B1 GET SECONDARY K-DISPLAY VALUE
04061 M00S03994.qfsp +++| ZR X4,SPDX IF NO SECONDARY UPDATE
04062 M00S03995.qfsp +++| AX5 18
04063 M00S03996.qfsp +++| SB4 X5
04064 M00S03997.qfsp +++| RJ GKA GET K-DISPLAY ADDRESS
04065 M00S03998.qfsp +++| ZR X1,SPD2 IF INCORRECT UPDATE
04066 M00S03999.qfsp +++| BX6 X4
04067 M00S04000.qfsp +++| SA3 A4+B1 GET SECONDARY ARGUMENT TABLE UPDATE
04068 M00S04001.qfsp +++| BX7 X3
04069 M00S04002.qfsp +++| SA6 X1 UPDATE K-DISPLAY BUFFER
04070 M00S04003.qfsp +++| SA7 X5+TARG
04071 M00S04004.qfsp +++| SPD2 SA4 A4+2 GET TERTIARY K-DISPLAY VALUE
04072 M00S04005.qfsp +++| ZR X4,SPDX IF NO TERTIARY UPDATE
04073 M00S04006.qfsp +++| AX5 18
04074 M00S04007.qfsp +++| SB4 X5
04075 M00S04008.qfsp +++| RJ GKA GET K-DISPLAY ADDRESS
04076 M00S04009.qfsp +++| ZR X1,SPDX IF INCORRECT UPDATE
04077 M00S04010.qfsp +++| BX6 X4
04078 M00S04011.qfsp +++| SA3 A4+B1 GET TERTIARY ARGUMENT TABLE UPDATE
04079 M00S04012.qfsp +++| BX7 X3
04080 M00S04013.qfsp +++| SA6 X1 UPDATE K-DISPLAY BUFFER
04081 M00S04014.qfsp +++| SA7 X5+TARG
04082 M00S04015.qfsp +++| EQ SPDX
04083 M00S04016.qfsp +++| GKA SPACE 4,15
04084 M00S04017.qfsp +++|** GKA - GET K-DISPLAY ADDRESS.
04085 M00S04018.qfsp +++|*
04086 M00S04019.qfsp +++|* ENTRY (B4) = *TKLN* TABLE INDEX.
04087 M00S04020.qfsp +++|* (FPNM) = FUNCTION PROCESSOR NUMBER.
04088 M00S04021.qfsp +++|*
04089 M00S04022.qfsp +++|* EXIT (X1) = K-DISPLAY ADDRESS OF ARGUMENT.
04090 M00S04023.qfsp +++|*
04091 M00S04024.qfsp +++|* USES X - 1, 2, 3.
04092 M00S04025.qfsp +++|* A - 2, 3.
04093 M00S04026.qfsp +++|* B - 3, 4.
04094 M00S04027.qfsp +++|
04095 M00S04028.qfsp +++|
04096 M00S04029.qfsp +++| GKA SUBR ENTRY/EXIT
04097 M00S04030.qfsp +++| SA2 FPNM CALCULATE SHIFT COUNT
04098 M00S04031.qfsp +++| SB3 X2-3
04099 M00S04032.qfsp +++| SB4 B4+B4 *TKLN* TABLE ENTRIES ARE 2 WORDS LONG
04100 M00S04033.qfsp +++| NG B3,GKA1 IF IN FIRST WORD OF TABLE ENTRY
04101 M00S04034.qfsp +++| SX2 B3
04102 M00S04035.qfsp +++| SB4 B4+1
04103 M00S04036.qfsp +++| GKA1 SA3 TKLN+B4 GET K-DISPLAY ADDRESS
04104 M00S04037.qfsp +++| SX1 18 DETERMINE SHIFT COUNT
04105 M00S04038.qfsp +++| IX2 X1*X2
04106 M00S04039.qfsp +++| SB3 X2+18
04107 M00S04040.qfsp +++| LX3 X3,B3
04108 M00S04041.qfsp +++| SX1 X3 RETURN ADDRESS OF ARGUMENT
04109 M00S04042.qfsp +++| EQ GKAX RETURN
04110 M00S04043.qfsp +++| SPACE 4,6
04111 M00S04044.qfsp +++|** COMMON DECKS.
04112 M00S04045.qfsp +++|
04113 M00S04046.qfsp +++|
04114 M00S04047.qfsp +++|*CALL COMCCDD
04115 M00S04048.qfsp +++|*CALL COMCCIO
04116 M00S04049.qfsp +++|*CALL COMCCOD
04117 M00S04050.qfsp +++|*CALL COMCCPM
04118 M00S04051.qfsp +++|*CALL COMCDXB
04119 M00S04052.qfsp +++|*CALL COMCEDT
04120 M00S04053.qfsp +++|*CALL COMCMVE
04121 M00S04054.qfsp +++|*CALL COMCOVL
04122 M00S04055.qfsp +++|*CALL COMCRDC
04123 M00S04056.qfsp +++|*CALL COMCRDW
04124 M00S04057.qfsp +++|*CALL COMCRSB
04125 M00S04058.qfsp +++|*CALL COMCSFM
04126 M00S04059.qfsp +++|*CALL COMCSFN
04127 M00S04060.qfsp +++|*CALL COMCSYS
04128 M00S04061.qfsp +++|*CALL COMCUSB
Line S00011 Modification History
M01
(Added by) ns2786
Seq # *Modification Id* Act
----------------------------+
04129 M01S00011.ns2786 +++|*CALL COMCVDT
04130 M00S04062.qfsp +++|*CALL COMCVLC
04131 M00S04063.qfsp +++|*CALL COMCZTB
04132 M00S04064.qfsp +++| DEFAULT TITLE DEFAULT VALUES.
04133 M00S04065.qfsp +++|** TDFT - TABLE OF DEFAULT VALUES.
04134 M00S04066.qfsp +++|*
04135 M00S04067.qfsp +++|* TABLE ENTRIES CONSIST OF SEVEN WORD BLOCKS.
04136 M00S04068.qfsp +++|* SEE *PINB* BLOCK DESCRIPTION FOR FORMAT OF BLOCK ENTRY.
04137 M00S04069.qfsp +++|* LAST BLOCK IN TABLE MUST BE FOLLOWED BY TWO ZERO WORDS.
04138 M00S04070.qfsp +++|
04139 M00S04071.qfsp +++|
04140 M00S04072.qfsp +++| TDFT BSS 0
04141 M00S04073.qfsp +++| VFD 24/0,18/ARDN,18/ARFM
04142 M00S04074.qfsp +++| TDFTA VFD 60/0HALL FAMILY FOR DEVICES
04143 M00S04075.qfsp +++| VFD 60/0
04144 M00S04076.qfsp +++| VFD 60/0HALL DEVICE NUMBER
04145 M00S04077.qfsp +++| VFD 60/0
04146 M00S04078.qfsp +++| VFD 60/0
04147 M00S04079.qfsp +++| VFD 60/0
04148 M00S04080.qfsp +++|
04149 M00S04081.qfsp +++| VFD 24/0,18/ARDD,18/ARDF
04150 M00S04082.qfsp +++| TDFTB VFD 60/10H DESTINATION FAMILY
04151 M00S04083.qfsp +++| VFD 60/-1
04152 M00S04084.qfsp +++| VFD 60/10H DESTINATION DEVICE
04153 M00S04085.qfsp +++| VFD 60/-1
04154 M00S04086.qfsp +++| VFD 60/0
04155 M00S04087.qfsp +++| VFD 60/0
04156 M00S04088.qfsp +++|
04157 M00S04089.qfsp +++| VFD 24/0,18/ARD1,18/ARDA
04158 M00S04090.qfsp +++| TDFTC VFD 60/10H00/00/00 DATE
04159 M00S04091.qfsp +++| VFD 60/1
04160 M00S04092.qfsp +++| VFD 60/0 DATE
04161 M00S04093.qfsp +++| VFD 60/0
04162 M00S04094.qfsp +++| VFD 60/0
04163 M00S04095.qfsp +++| VFD 60/0
04164 M00S04096.qfsp +++|
04165 M00S04097.qfsp +++| VFD 24/0,18/ARU1,18/ARUI
04166 M00S04098.qfsp +++| VFD 60/0H0B MINIMUM USER INDEX
04167 M00S04099.qfsp +++| VFD 60/0B
04168 M00S04100.qfsp +++| VFD 60/0H377777B MAXIMUM USER INDEX
04169 M00S04101.qfsp +++| VFD 60/377777B
04170 M00S04102.qfsp +++| VFD 60/0
04171 M00S04103.qfsp +++| VFD 60/0
04172 M00S04104.qfsp +++|
04173 M00S04105.qfsp +++| VFD 24/0,18/ARL1,18/ARLA
04174 M00S04106.qfsp +++| VFD 60/10H LOWER SECURITY ACCESS LEVEL
04175 M00S04107.qfsp +++| VFD 60/-1
04176 M00S04108.qfsp +++| VFD 60/0
04177 M00S04109.qfsp +++| VFD 60/0
04178 M00S04110.qfsp +++| VFD 60/0
04179 M00S04111.qfsp +++| VFD 60/0
04180 M00S04112.qfsp +++|
04181 M00S04113.qfsp +++| VFD 24/0,18/ARU2,18/ARUA
04182 M00S04114.qfsp +++| VFD 60/10H UPPER SECURITY ACCESS LEVEL
04183 M00S04115.qfsp +++| VFD 60/-1
04184 M00S04116.qfsp +++| VFD 60/0
04185 M00S04117.qfsp +++| VFD 60/0
04186 M00S04118.qfsp +++| VFD 60/0
04187 M00S04119.qfsp +++| VFD 60/0
04188 M00S04120.qfsp +++|
04189 M00S04121.qfsp +++| VFD 24/0,18/ART1,18/ARTI
04190 M00S04122.qfsp +++| VFD 60/0H0B MINIMUM TUI VALUE
04191 M00S04123.qfsp +++| VFD 60/0B
04192 M00S04124.qfsp +++| VFD 60/0H377777B MAXIMUM TUI VALUE
04193 M00S04125.qfsp +++| VFD 60/377777B
04194 M00S04126.qfsp +++| VFD 60/0
04195 M00S04127.qfsp +++| VFD 60/0
04196 M00S04128.qfsp +++|
04197 M00S04129.qfsp +++| VFD 24/0,18/0,18/ARTF
04198 M00S04130.qfsp +++| VFD 60/10HALL FAMILY FOR TERMINAL
04199 M00S04131.qfsp +++| VFD 60/0B
04200 M00S04132.qfsp +++| VFD 60/0 OPEN
04201 M00S04133.qfsp +++| VFD 60/0
04202 M00S04134.qfsp +++| VFD 60/0
04203 M00S04135.qfsp +++| VFD 60/0
04204 M00S04136.qfsp +++|
04205 M00S04137.qfsp +++| VFD 24/0,18/ARFU,18/ARLL
04206 M00S04138.qfsp +++| VFD 60/0HOUTPUT FILE TO RECEIVE OUTPUT
04207 M00S04139.qfsp +++| VFD 60/0LOUTPUT
04208 M00S04140.qfsp +++| VFD 60/10HALL FAMILY FOR USER INDICES
04209 M00S04141.qfsp +++| VFD 60/0B
04210 M00S04142.qfsp +++| VFD 60/0
04211 M00S04143.qfsp +++| VFD 60/0
04212 M00S04144.qfsp +++|
04213 M00S04145.qfsp +++| VFD 24/0,18/ARJ2,18/ARJN
04214 M00S04146.qfsp +++| VFD 60/10H JOB SEQUENCE NUMBER
04215 M00S04147.qfsp +++| VFD 60/0
04216 M00S04148.qfsp +++| VFD 60/10H JOB SEQUENCE NUMBER
04217 M00S04149.qfsp +++| VFD 60/0
04218 M00S04150.qfsp +++| VFD 60/0
04219 M00S04151.qfsp +++| VFD 60/0
04220 M00S04152.qfsp +++|
04221 M00S04153.qfsp +++| VFD 24/0,18/ARJ4,18/ARJ3
04222 M00S04154.qfsp +++| VFD 60/10H JOB SEQUENCE NUMBER
04223 M00S04155.qfsp +++| VFD 60/0
04224 M00S04156.qfsp +++| VFD 60/10H JOB SEQUENCE NUMBER
04225 M00S04157.qfsp +++| VFD 60/0
04226 M00S04158.qfsp +++| VFD 60/0
04227 M00S04159.qfsp +++| VFD 60/0
04228 M00S04160.qfsp +++|
04229 M00S04161.qfsp +++| VFD 24/0,18/ARJ5,18/ARID
04230 M00S04162.qfsp +++| VFD 60/0H0B MINIMUM ID
04231 M00S04163.qfsp +++| VFD 60/0
04232 M00S04164.qfsp +++| VFD 60/10H JOB SEQUENCE NUMBER
04233 M00S04165.qfsp +++| VFD 60/0
04234 M00S04166.qfsp +++| VFD 60/0
04235 M00S04167.qfsp +++| VFD 60/0
04236 M00S04168.qfsp +++|
04237 M00S04169.qfsp +++| VFD 6/0,18/ARB2,18/ARB1,18/ARBC
04238 M00S04170.qfsp +++| VFD 60/10H * * * * * BATCH FILE TYPES
04239 M00S04171.qfsp +++| VFD 12/7777B,48/0
04240 M00S04172.qfsp +++| VFD 60/10H * * * * *
04241 M00S04173.qfsp +++| VFD 12/7777B,48/0
04242 M00S04174.qfsp +++| VFD 60/10H * *
04243 M00S04175.qfsp +++| VFD 12/7777B,48/0
04244 M00S04176.qfsp +++|
04245 M00S04177.qfsp +++| VFD 6/0,18/ARR4,18/ARR3,18/ARRB
04246 M00S04178.qfsp +++| VFD 60/10H * * * * * REMOTE BATCH FILE TYPES
04247 M00S04179.qfsp +++| VFD 12/7777B,48/0
04248 M00S04180.qfsp +++| VFD 60/10H * * * * *
04249 M00S04181.qfsp +++| VFD 12/7777B,48/0
04250 M00S04182.qfsp +++| VFD 60/10H * *
04251 M00S04183.qfsp +++| VFD 12/7777B,48/0
04252 M00S04184.qfsp +++|
04253 M00S04185.qfsp +++| VFD 24/0,18/ARTP,18/AROP
04254 M00S04186.qfsp +++| TDFTF VFD 60/0HRI UTILITY OPTION
04255 M00S04187.qfsp +++| VFD 60/1
04256 M00S04188.qfsp +++| VFD 60/0HALL TYPE
04257 M00S04189.qfsp +++| VFD 60/2
04258 M00S04190.qfsp +++| VFD 60/0
04259 M00S04191.qfsp +++| VFD 60/0
04260 M00S04192.qfsp +++|
04261 M00S04193.qfsp +++|
04262 M00S04194.qfsp +++| VFD 24/0,18/ARNF,18/ARSC
04263 M00S04195.qfsp +++| VFD 60/0H0D NUMBER OF QUEUE FILES TO SKIP
04264 M00S04196.qfsp +++| VFD 60/0
04265 M00S04197.qfsp +++| VFD 60/0H0D NUMBER OF MEDIA FILES TO SKIP
04266 M00S04198.qfsp +++| VFD 60/0
04267 M00S04199.qfsp +++| VFD 60/0
04268 M00S04200.qfsp +++| VFD 60/0
04269 M00S04201.qfsp +++|
04270 M00S04202.qfsp +++| VFD 24/0,18/AROL,18/ARI1
04271 M00S04203.qfsp +++| VFD 60/0H67B MAXIMUM ID
04272 M00S04204.qfsp +++| VFD 60/67B
04273 M00S04205.qfsp +++| VFD 60/10H OLD DESTINATION LID
04274 M00S04206.qfsp +++| VFD 60/0
04275 M00S04207.qfsp +++| VFD 60/0
04276 M00S04208.qfsp +++| VFD 60/0
04277 M00S04209.qfsp +++|
04278 M00S04210.qfsp +++| VFD 24/0,18/ARNL,18/ARFR
04279 M00S04211.qfsp +++| TDFTG BSS 0
04280 M00S04212.qfsp +++| VFD 60/10HALL FORMS CODE
04281 M00S04213.qfsp +++| VFD 60/100B
04282 M00S04214.qfsp +++| VFD 60/10H NEW DESTINATION LID
04283 M00S04215.qfsp +++| VFD 60/0
04284 M00S04216.qfsp +++| VFD 60/0
04285 M00S04217.qfsp +++| VFD 60/0
04286 M00S04218.qfsp +++|
04287 M00S04219.qfsp +++| VFD 24/0,18/ARFT,18/ARFN
04288 M00S04220.qfsp +++| VFD 60/10HQFILES DUMP/LOAD FILE NAME
04289 M00S04221.qfsp +++| VFD 60/0LQFILES
04290 M00S04222.qfsp +++| VFD 60/0HDAYFILE DAYFILE TYPE
04291 M00S04223.qfsp +++| VFD 60/SDAY
04292 M00S04224.qfsp +++| VFD 60/0
04293 M00S04225.qfsp +++| VFD 60/0
04294 M00S04226.qfsp +++|
04295 M00S04227.qfsp +++| VFD 24/0,18/ARMI,18/ARNM
04296 M00S04228.qfsp +++| VFD 60/10H DAYFILE NAME
04297 M00S04229.qfsp +++| VFD 60/0
04298 M00S04230.qfsp +++| TDFTH VFD 60/10H MACHINE ID
04299 M00S04231.qfsp +++| VFD 60/0
04300 M00S04232.qfsp +++| VFD 60/0
04301 M00S04233.qfsp +++| VFD 60/0
04302 M00S04234.qfsp +++|
04303 M00S04235.qfsp +++| VFD 24/0,18/ARF1,18/ARFS
04304 M00S04236.qfsp +++| VFD 60/0H0B MINIMUM FILE SIZE
04305 M00S04237.qfsp +++| VFD 60/0
04306 M00S04238.qfsp +++| VFD 60/0H777777B MAXIMUM FILE SIZE
04307 M00S04239.qfsp +++| VFD 60/777777B
04308 M00S04240.qfsp +++| VFD 60/0
04309 M00S04241.qfsp +++| VFD 60/0
04310 M00S04242.qfsp +++|
04311 M00S04243.qfsp +++| VFD 24/0,18/0,18/ARUN
04312 M00S04244.qfsp +++| VFD 60/10H USER NAME
04313 M00S04245.qfsp +++| VFD 60/0
04314 M00S04246.qfsp +++| VFD 60/0
04315 M00S04247.qfsp +++| VFD 60/0
04316 M00S04248.qfsp +++| VFD 60/0
04317 M00S04249.qfsp +++| VFD 60/0
04318 M00S04250.qfsp +++|
04319 M00S04251.qfsp +++| VFD 24/0,18/ARLO,18/ARUJ
04320 M00S04252.qfsp +++| VFD 60/10H USER JOB NAME
04321 M00S04253.qfsp +++| VFD 60/0
04322 M00S04254.qfsp +++| VFD 60/10HS LIST OPTION
04323 M00S04255.qfsp +++| VFD 60/0
04324 M00S04256.qfsp +++| VFD 60/0
04325 M00S04257.qfsp +++| VFD 60/0
04326 M00S04258.qfsp +++|
04327 M00S04259.qfsp +++| VFD 24/0,18/0,18/ARAL
04328 M00S04260.qfsp +++| VFD 60/10H NEW ACCESS LEVEL
04329 M00S04261.qfsp +++| VFD 60/-1
04330 M00S04262.qfsp +++| VFD 60/0
04331 M00S04263.qfsp +++| VFD 60/0
04332 M00S04264.qfsp +++| VFD 60/0
04333 M00S04265.qfsp +++| VFD 60/0
04334 M00S04266.qfsp +++|
04335 M00S04267.qfsp +++| VFD 24/0,18/ARDC,18/ARNE
04336 M00S04268.qfsp +++| VFD 60/10H NEW EXTERNAL CHARACTERISTICS
04337 M00S04269.qfsp +++| VFD 60/0
04338 M00S04270.qfsp +++| VFD 60/10H NEW DEVICE CODE
04339 M00S04271.qfsp +++| VFD 60/0
04340 M00S04272.qfsp +++| VFD 60/0
04341 M00S04273.qfsp +++| VFD 60/0
04342 M00S04274.qfsp +++|
04343 M00S04275.qfsp +++| VFD 24/0,18/ARND,18/ARNU
04344 M00S04276.qfsp +++| VFD 60/10H NEW DESTINATION USER
04345 M00S04277.qfsp +++| VFD 60/0
04346 M00S04278.qfsp +++| VFD 60/10H NEW DESTINATION FAMILY
04347 M00S04279.qfsp +++| VFD 60/0
04348 M00S04280.qfsp +++| VFD 60/0
04349 M00S04281.qfsp +++| VFD 60/0
04350 M00S04282.qfsp +++|
04351 M00S04283.qfsp +++| VFD 24/0,18/ARNI,18/ARNC
04352 M00S04284.qfsp +++| VFD 60/10H NEW FORMS CODE
04353 M00S04285.qfsp +++| VFD 60/0
04354 M00S04286.qfsp +++| VFD 60/10H NEW FILE ID
04355 M00S04287.qfsp +++| VFD 60/0
04356 M00S04288.qfsp +++| VFD 60/0
04357 M00S04289.qfsp +++| VFD 60/0
04358 M00S04290.qfsp +++|
04359 M00S04291.qfsp +++| VFD 24/0,18/ARNR,18/ARNP
04360 M00S04292.qfsp +++| VFD 60/10H NEW PRIORITY
04361 M00S04293.qfsp +++| VFD 60/0
04362 M00S04294.qfsp +++| VFD 60/10H NEW REPEAT COUNT
04363 M00S04295.qfsp +++| VFD 60/0
04364 M00S04296.qfsp +++| VFD 60/0
04365 M00S04297.qfsp +++| VFD 60/0
04366 M00S04298.qfsp +++|
04367 M00S04299.qfsp +++|
04368 M00S04300.qfsp +++| CON 0 END OF TABLE
04369 M00S04301.qfsp +++| CON 0
04370 M00S04302.qfsp +++| SPACE 4,8
04371 M00S04303.qfsp +++|** BUFFER AREAS.
04372 M00S04304.qfsp +++|
04373 M00S04305.qfsp +++|
04374 M00S04306.qfsp +++| SSJ= VFD 48/0,12/IRSI
04375 M00S04307.qfsp +++| BSS SSJL-1
04376 M00S04308.qfsp +++| RSBA VFD 12/0,12/1,18/QFTP,18/RSBB
04377 M00S04309.qfsp +++|
04378 M00S04310.qfsp +++|* VERIFY POSITIONS OF *DFPP*, *NCPL* AND *ESTP*.
04379 M00S04311.qfsp +++|
04380 M00S04312.qfsp +++| ERRPL ESTP-DFPP-100B *RSB* READ SIZE TOO LARGE
04381 M00S04313.qfsp +++| ERRPL NCPL-ESTP *DFPP* .LT. *NCPL* .LT. *ESTP* REQUIRED
04382 M00S04314.qfsp +++| ERRPL DFPP-NCPL
04383 M00S04315.qfsp +++|
04384 M00S04316.qfsp +++| ERRNZ IDLM-67B-1 *TDFT* AND K-DISPLAYS INCORRECT *ID*
04385 M00S04317.qfsp +++|
04386 M00S04318.qfsp +++| RSBS VFD 12/,12/ESTP-DFPP+1,18/DFPP,18/RSBB (*PRS*)
04387 M00S04319.qfsp +++|* VFD 12/,12/MSTL,18/MST FWA,18/RSBC (*BDT* - MST READ)
04388 M00S04320.qfsp +++|* VFD 12/,12/3,18/DAYFILE PTR,18/RSBC (*BDT* - DAYFILES)
04389 M00S04321.qfsp +++| RSBB BSS ESMX*ESTE EST BUFFER
04390 M00S04322.qfsp +++| RSBC BSS MSTL BUFFER FOR MST
04391 M00S04323.qfsp +++| BUFL EQU 5 WORDS IN DEVICE/FAMILY K-DISPLAY BUFFER
04392 M00S04324.qfsp +++| BUF BSSZ BUFL*10 BUFFER FOR DEVICE NUMBERS
04393 M00S04325.qfsp +++| TITLE K-DISPLAY AREA.
04394 M00S04326.qfsp +++|** DISPLAY AREA DATA.
04395 M00S04327.qfsp +++|
04396 M00S04328.qfsp +++|
04397 M00S04329.qfsp +++| KIA VFD 24/KBUF,18/0,18/DSA *QFSP* CONTROL WORD
04398 M00S04330.qfsp +++| KIB VFD 24/KBUF,18/DSD,18/DSA CONTROL WORD FOR ALL OTHERS
04399 M00S04331.qfsp +++| KBUF BSSZ 8 KEYBOARD INPUT BUFFER
04400 M00S04332.qfsp +++|
04401 M00S04333.qfsp +++|* PAGE TABLE.
04402 M00S04334.qfsp +++|
04403 M00S04335.qfsp +++| KPAG PAGT DSA FIRST PAGE LEFT SCREEN
04404 M00S04336.qfsp +++| PAGT DSB SECOND PAGE LEFT SCREEN
04405 M00S04337.qfsp +++| PAGT DSC THIRD PAGE LEFT SCREEN
04406 M00S04338.qfsp +++| PAGT
04407 M00S04339.qfsp +++| PAGT DSD FIRST PAGE RIGHT SCREEN
04408 M00S04340.qfsp +++| PAGT DSE SECOND PAGE RIGHT SCREEN
04409 M00S04341.qfsp +++| PAGT DSF THIRD PAGE RIGHT SCREEN
04410 M00S04342.qfsp +++| PAGT DSG FOURTH PAGE RIGHT SCREEN
04411 M00S04343.qfsp +++| PAGT *
04412 M00S04344.qfsp +++| KPGL EQU *-KPAG
04413 M00S04345.qfsp +++|
04414 M00S04346.qfsp +++| KLST CON 0 K-DISPLAY *LIST* IS IN EFFECT
04415 M00S04347.qfsp +++| KPGH BSSZ 1 HOLD INITIAL PAGE TABLE HEADER
04416 M00S04348.qfsp +++| KCMD BSSZ 1 HOLD K-DISPLAY COMMAND FOR *PGL* AND *PGR*
04417 M00S04349.qfsp +++| NOREF K
04418 M00S04350.qfsp +++| TITLE K-DISPLAY BUFFERS.
04419 M00S04351.qfsp +++|* MESSAGE BUFFER FOR ALL K-DISPLAY LEFT SCREENS.
04420 M00S04352.qfsp +++|
04421 M00S04353.qfsp +++| KMES EQU *+1 ERROR MESSAGE LINE
04422 M00S04354.qfsp +++| KDL 1,M,( )
04423 M00S04355.qfsp +++| KINP EQU *+1 KEYBOARD INPUT LINE
04424 M00S04356.qfsp +++| KDL 1,I,( )
04425 M00S04357.qfsp +++| CON 0 END OF K-DISPLAY BUFFER
04426 M00S04358.qfsp +++|
04427 M00S04359.qfsp +++|* FIRST PAGE LEFT SCREEN DISPLAY BUFFER.
04428 M00S04360.qfsp +++|
04429 M00S04361.qfsp +++| DSA VFD 10/0,1/0,1/0,6/0,18/KTIT,24/0 CONTROL WORD
04430 M00S04362.qfsp +++| DSAA BSS KLEN
04431 M00S04363.qfsp +++|
04432 M00S04364.qfsp +++|* SECOND PAGE LEFT SCREEN DISPLAY BUFFER.
04433 M00S04365.qfsp +++|
04434 M00S04366.qfsp +++| DSB VFD 10/0,1/0,1/0,6/0,18/KTIT,24/0 CONTROL WORD
04435 M00S04367.qfsp +++| DSBB BSS KLEN
04436 M00S04368.qfsp +++|
04437 M00S04369.qfsp +++|* THIRD PAGE LEFT SCREEN DISPLAY BUFFER.
04438 M00S04370.qfsp +++|
04439 M00S04371.qfsp +++| DSC VFD 10/0,1/0,1/0,6/0,18/KTIT,24/0 CONTROL WORD
04440 M00S04372.qfsp +++| DSCC BSS KLEN
04441 M00S04373.qfsp +++| CON 0 END OF DISPLAY
04442 M00S04374.qfsp +++| TITLE FIRST PAGE K-DISPLAY RIGHT SCREEN.
04443 M00S04375.qfsp +++|* FIRST PAGE RIGHT SCREEN DISPLAY BUFFER.
04444 M00S04376.qfsp +++|
04445 M00S04377.qfsp +++| DSD VFD 10/0,1/0,1/0,6/0,18/KTIT,24/0 CONTROL WORD
04446 M00S04378.qfsp +++| KDL 1,T,(K DISPLAY COMMANDS)
04447 M00S04379.qfsp +++| KDL 54,T,(PAGE 1 OF 4)
04448 M00S04380.qfsp +++| KDL 1,K,( GO PROCEED WITH PROCESSING.)
04449 M00S04381.qfsp +++| KDL 1,K,( OUT RELEASE FILE SPECIFIED BY *L* PARAMETER TO PRINTER
04450 M00S04382.qfsp +++|,.)
04451 M00S04383.qfsp +++| KDL 1,K,( RESET RESET PARAMETERS TO DEFAULT VALUES.)
04452 M00S04384.qfsp +++| KDL 1,H,( STOP TERMINATE INPUT, END RUN.)
04453 M00S04385.qfsp +++| KDL 1,K,( + PAGE LEFT SCREEN FORWARD.)
04454 M00S04386.qfsp +++| KDL 1,K,( - PAGE LEFT SCREEN BACKWARD.)
04455 M00S04387.qfsp +++| CODE O
04456 M00S04388.qfsp +++| KDL 1,K,( [ PAGE RIGHT SCREEN FORWARD.)
04457 M00S04389.qfsp +++| KDL 1,K,( ] PAGE RIGHT SCREEN BACKWARD.)
04458 M00S04390.qfsp +++| CODE *
04459 M00S04391.qfsp +++| CON 0 END OF DISPLAY
04460 M00S04392.qfsp +++| TITLE SECOND PAGE K-DISPLAY RIGHT SCREEN.
04461 M00S04393.qfsp +++|* SECOND PAGE RIGHT SCREEN DISPLAY BUFFER.
04462 M00S04394.qfsp +++|
04463 M00S04395.qfsp +++| DSE VFD 10/0,1/0,1/0,6/0,18/KTIT,24/0 CONTROL WORD
04464 M00S04396.qfsp +++| KDL 1,T,(K DISPLAY COMMANDS)
04465 M00S04397.qfsp +++| KDL 54,T,(PAGE 2 OF 4)
04466 M00S04398.qfsp +++| KDL 1,K,( CLEAR SET BOTH SCREENS TO FIRST PAGE OF K DISPLAY.)
04467 M00S04399.qfsp +++| KDL 1,K,( (QREC, DFTERM, QFTLIST, QALTER).)
04468 M00S04400.qfsp +++| KDL 1,K,( ERROR TOGGLE STATUS OF ERRORED FILE PROCESSING.)
04469 M00S04401.qfsp +++| KDL 1,K,( (QDUMP, QLOAD, QMOVE).)
04470 M00S04402.qfsp +++| KDL 1,K,( FAMILY IF ENTERED, ENTRIES WILL BE MADE IN THE FOT FOR)
04471 M00S04403.qfsp +++| KDL 12,K,(THE INACTIVE FAMILIES AND THE FILES WILL BE QUEUED.)
04472 M00S04404.qfsp +++| KDL 1,H,( (QREC, QLOAD, QMOVE).)
04473 M00S04405.qfsp +++| KDL 1,K,( LID IF ENTERED, ENTRIES WILL BE MADE IN THE LID TABLE)
04474 M00S04406.qfsp +++| KDL 12,K,(FOR THE INACTIVE LIDS AND THE FILES WILL BE QUEUED.)
04475 M00S04407.qfsp +++| KDL 1,K,( (QREC, QLOAD, QMOVE).)
04476 M00S04408.qfsp +++| KDL 1,K,( LIST DISPLAY JSN-S OF ACTIVE/INACTIVE QUEUED FILES ON)
04477 M00S04409.qfsp +++| KDL 1,K,( RIGHT SCREEN. (QREC, DFTERM, QALTER, QFTLIST).)
04478 M00S04410.qfsp +++| KDL 1,K,( REWIND IF ENTERED, DUMP/LOAD FILE WILL BE REWOUND WHEN)
04479 M00S04411.qfsp +++| KDL 1,K,( *GO* COMMAND IS ENTERED. (QDUMP AND QLOAD).)
04480 M00S04412.qfsp +++| CON 0 END OF DISPLAY
04481 M00S04413.qfsp +++| TITLE THIRD PAGE K-DISPLAY RIGHT SCREEN.
04482 M00S04414.qfsp +++|* THIRD PAGE RIGHT SCREEN DISPLAY BUFFER.
04483 M00S04415.qfsp +++|
04484 M00S04416.qfsp +++| DSF VFD 10/0,1/0,1/0,6/0,18/KTIT,24/0 CONTROL WORD
04485 M00S04417.qfsp +++| KDL 1,T,(DIRECTIVE FORMATS)
04486 M00S04418.qfsp +++| KDL 54,T,(PAGE 3 OF 4)
04487 M00S04419.qfsp +++| KDL 1,K,( DA=YYMMDD PROCESS THIS DATE ONLY.)
04488 M00S04420.qfsp +++| KDL 1,K,( DA=YYMMDD-YYMMDD PROCESS ALL DATES IN SPECIFIED RANGE.)
04489 M00S04421.qfsp +++| KDL 1,H,( DA=ALL PROCESS ALL DATES.)
04490 M00S04422.qfsp +++| KDL 1,K,( UI=XXXXXX PROCESS THIS USER INDEX ONLY.)
04491 M00S04423.qfsp +++| KDL 4,H,(UI=XXXXXX-YYYYYY PROCESS ALL INDICES IN SPECIFIED RANGE.)
04492 M00S04424.qfsp +++| KDL 1,K,( TUI=XXXXXX PROCESS THIS USER INDEX ONLY.)
04493 M00S04425.qfsp +++| KDL 4,H,(TUI=XXXXXX-YYYYYY PROCESS ALL INDICES IN SPECIFIED RANGE.)
04494 M00S04426.qfsp +++| KDL 1,K,( FS=XXXXXX PROCESS THIS FILE SIZE ONLY.)
04495 M00S04427.qfsp +++| KDL 1,K,( FS=XXXXXX-YYYYYY PROCESS ALL SIZES IN SPECIFIED RANGE.)
04496 M00S04428.qfsp +++| KDL 1,H,( 777777B INCLUDES ALL LARGER SIZES.)
04497 M00S04429.qfsp +++| KDL 1,K,( ID=XX PROCESS THIS ID ONLY.)
04498 M00S04430.qfsp +++| KDL 1,H,( ID=XX-YY PROCESS ALL ID-S IN SPECIFIED RANGE.)
04499 M00S04431.qfsp +++| KDL 1,K,( FC=F1 PROCESS THIS FORMS CODE ONLY).
04500 M00S04432.qfsp +++| KDL 1,K,( FC=F1/F2/F3 PROCESS ALL FORMS CODES IN LIST.)
04501 M00S04433.qfsp +++| KDL 1,K,( FC=F1-F2 PROCESS ALL FORMS CODES IN THE RANGE.)
04502 M00S04434.qfsp +++| CON 0 END OF DISPLAY
04503 M00S04435.qfsp +++| TITLE FOURTH PAGE K-DISPLAY RIGHT SCREEN.
04504 M00S04436.qfsp +++|* FOURTH PAGE RIGHT SCREEN DISPLAY BUFFER.
04505 M00S04437.qfsp +++|
04506 M00S04438.qfsp +++| DSG VFD 10/0,1/0,1/0,6/0,18/KTIT,24/0 CONTROL WORD
04507 M00S04439.qfsp +++| KDL 1,T,(DIRECTIVE FORMATS)
04508 M00S04440.qfsp +++| KDL 54,T,(PAGE 4 OF 4)
04509 M00S04441.qfsp +++| KDL 1,H,( DS=DT FILE DESTINATION=DISPOSITION TYPE.)
04510 M00S04442.qfsp +++| KDL 1,H,( DS DESCRIPTION)
04511 M00S04443.qfsp +++| KDL 1,K,( BC BATCH.)
04512 M00S04444.qfsp +++| KDL 1,H,( RB REMOTE BATCH.)
04513 M00S04445.qfsp +++| KDL 1,H,( DT DESCRIPTION DT DESCRIPTION)
04514 M00S04446.qfsp +++| KDL 1,K,( IN INPUT. PU PUNCH.)
04515 M00S04447.qfsp +++| KDL 1,K,( PL PLOT. PR ANY PRINTER.)
04516 M00S04448.qfsp +++| KDL 1,K,( P2 512 PRINTER. LR 580-12 PRINTER.)
04517 M00S04449.qfsp +++| KDL 1,K,( LS 580-16 PRINTER. LT 580-20 PRINTER.)
04518 M00S04450.qfsp +++| KDL 1,K,( LX 5870 NIP. LY 5970 NIP.)
04519 M00S04451.qfsp +++| KDL 12,K,(WT WAIT QUEUE. SF SPECIAL QUEUE TYPES.)
04520 M00S04452.qfsp +++| KDL 12,K,(ALL ALL QUEUES. PRINT ALL PRINT QUEUES.)
04521 M00S04453.qfsp +++| KDL 1,K,( NONE NO QUEUES.)
04522 M00S04454.qfsp +++| CON 0 END OF DISPLAY
04523 M00S04455.qfsp +++|
04524 M00S04456.qfsp +++| DSYC KDL * Y-COORDINATE TABLE
04525 M00S04457.qfsp +++| TITLE OVERLAY DEFINITIONS AND CHECKS.
04526 M00S04458.qfsp +++| OVL EQU OVLA LOAD ADDRESS FOR OVERLAY
04527 M00S04459.qfsp +++| IBUF EQU * INPUT BUFFER
04528 M00S04460.qfsp +++| CHK EQU IBUF+IBUFL
04529 M00S04461.qfsp +++| SPACE 4
04530 M00S04462.qfsp +++|** THE FOLLOWING TESTS INSURE PROPER INTERFACE WITH QFSP AND
04531 M00S04463.qfsp +++|* ITS OVERLAYS. IF ANY TEST FAILS, THE APPROPRIATE VALUE
04532 M00S04464.qfsp +++|* SHOULD BE UPDATED IN *COMSQFS*.
04533 M00S04465.qfsp +++|
04534 M00S04466.qfsp +++|
04535 M00S04467.qfsp +++| ERRNZ TEQA-TEQP FWA OF EQUIPMENT TABLE
04536 M00S04468.qfsp +++| ERRNZ QFTA-QFT QFT POINTER WORD ADDRESS
04537 M00S04469.qfsp +++| ERRNZ DFPA-DFP DAYFILE POINTER WORD ADDRESS
04538 M00S04470.qfsp +++| ERRNG OVL-CHK CHECK LOAD ADDRESS OF OVERLAY
04539 M00S04471.qfsp +++| ERRNZ TARA-TARG FWA OF PROCESSED ARGUMENTS
04540 M00S04472.qfsp +++| ERRNZ TMSA-TMSD FWA OF MASS STORAGE DESCRIPTION TABLE
04541 M00S04473.qfsp +++| ERRNZ TDAA-TDAL FWA OF DEVICE ACCESS LEVEL TABLE
04542 M00S04474.qfsp +++| ERRNZ DVLA-DVLL DEVICE ACCESS LEVEL LOWER LIMIT
04543 M00S04475.qfsp +++| ERRNZ DVUA-DVUL DEVICE ACCESS LEVEL UPPER LIMIT
04544 M00S04476.qfsp +++| ERRNZ JACA-JACL VALID JOB ACCESS LEVELS
04545 M00S04477.qfsp +++| ERRNZ SECA-SECR SYSTEM SECURITY INFORMATION
04546 M00S04478.qfsp +++| TITLE QFSP K-DISPLAY.
04547 M00S04479.qfsp +++|** DEPENDING ON THE UTILITY OPTION SELECTED, ONE OR MORE OF THE
04548 M00S04480.qfsp +++|* FOLLOWING DISPLAYS WILL BE MOVED TO THE PERMANENT DISPLAY
04549 M00S04481.qfsp +++|* BUFFERS BY PRESET.
04550 M00S04482.qfsp +++|
04551 M00S04483.qfsp +++|* LEFT SCREEN *QFSP* K-DISPLAY.
04552 M00S04484.qfsp +++|
04553 M00S04485.qfsp +++|
04554 M00S04486.qfsp +++| DQSM BSS 0
04555 M00S04487.qfsp +++| LOC DSAA
04556 M00S04488.qfsp +++| KDL 1,T,( QUEUED FILE SUPERVISOR)
04557 M00S04489.qfsp +++| K SET K+2
04558 M00S04490.qfsp +++| KDL 1,H,( ENTER K.UTILITY.)
04559 M00S04491.qfsp +++| KDL 1,H,( UTILITY DESCRIPTION)
04560 M00S04492.qfsp +++| KDL 1,K,( QDUMP QUEUED FILE DUMP PROCESSOR.)
04561 M00S04493.qfsp +++| KDL 1,K,( QLOAD QUEUED FILE LOAD PROCESSOR.)
04562 M00S04494.qfsp +++| KDL 1,K,( QMOVE QUEUED FILE MOVE PROCESSOR.)
04563 M00S04495.qfsp +++| KDL 1,K,( QREC PROCESS QUEUED FILES.)
04564 M00S04496.qfsp +++| KDL 1,K,( DFTERM TERMINATE DAYFILES.)
04565 M00S04497.qfsp +++| KDL 1,K,( QFTLIST LIST ACTIVE QUEUED FILES.)
04566 M00S04498.qfsp +++| KDL 1,K,( QALTER ALTER ACTIVE QUEUED FILES.)
04567 M00S04499.qfsp +++| VFD 12/7777B,30/0,18/KMES-1 K-DISPLAY CONTINUATION WORD
04568 M00S04500.qfsp +++| LOC *O
04569 M00S04501.qfsp +++| DQSML EQU *-DQSM
04570 M00S04502.qfsp +++| DQSY KDL * *QFSP* Y-COORDINATE TABLE
04571 M00S04503.qfsp +++| TITLE QDUMP K-DISPLAY LEFT SCREEN PAGE ONE.
04572 M00S04504.qfsp +++|* FIRST PAGE LEFT SCREEN *QDUMP* K-DISPLAY.
04573 M00S04505.qfsp +++|
04574 M00S04506.qfsp +++|
04575 M00S04507.qfsp +++| DQDM BSS 0
04576 M00S04508.qfsp +++| LOC DSAA
04577 M00S04509.qfsp +++| KDL 1,T,(QDUMP)
04578 M00S04510.qfsp +++| KDL 54,T,(PAGE 1 OF 3)
04579 M00S04511.qfsp +++| KDL 1,,(INACTIVE QUEUES RESIDE ON FOLL)
04580 M00S04512.qfsp +++| DDDR EQU *+1
04581 M00S04513.qfsp +++| KDL 31,K,(OWING FAMILIES. )
04582 M00S04514.qfsp +++| DDIN EQU *+1
04583 M00S04515.qfsp +++| KDL 1,K,(
04584 M00S04516.qfsp +++| DDER EQU *+3
04585 M00S04517.qfsp +++| KDL 20,H,( (ERRORED FILE DUMPING SET) )
04586 M00S04518.qfsp +++| KDL 1,H,( OPTION DESCRIPTION)
04587 M00S04519.qfsp +++| DDMI EQU *+1
04588 M00S04520.qfsp +++| KDL 1,K,( MI = MACHINE ID (1-2 CHARACTERS, *ALL*).)
04589 M00S04521.qfsp +++| DDFM EQU *+1
04590 M00S04522.qfsp +++| KDL 1,K,( FM = FAMILY FOR DEVICES (1-7 CHARACTERS).)
04591 M00S04523.qfsp +++| DDDN EQU *+1
04592 M00S04524.qfsp +++| KDL 1,K,( DN = DEVICE NUMBER (0-77B, *ALL*).)
04593 M00S04525.qfsp +++| DDDA EQU *+1
04594 M00S04526.qfsp +++| KDL 1,K,( DA = DUMP DATE RANGE (YYMMDD, *ALL*).)
04595 M00S04527.qfsp +++| DDD1 EQU *+1
04596 M00S04528.qfsp +++| KDL 1,H,( )
04597 M00S04529.qfsp +++| DDOF EQU *+1
04598 M00S04530.qfsp +++| KDL 1,K,( L = FILE TO RECEIVE OUTPUT (1-7 CHARACTERS).)
04599 M00S04531.qfsp +++| DDFN EQU *+1
04600 M00S04532.qfsp +++| KDL 1,K,( FN = DUMP FILE NAME (1-7 CHARACTERS).)
04601 M00S04533.qfsp +++| DDNF EQU *+1
04602 M00S04534.qfsp +++| KDL 1,K,( NF = NUMBER OF MEDIA FILES TO SKIP.)
04603 M00S04535.qfsp +++| DDTP EQU *+1
04604 M00S04536.qfsp +++| KDL 1,K,( TP = TYPE (A=ACTIVE, I=INACTIVE, *ALL*).)
04605 M00S04537.qfsp +++| VFD 12/7777B,30/0,18/KMES-1 K-DISPLAY CONTINUATION WORD
04606 M00S04538.qfsp +++| LOC *O
04607 M00S04539.qfsp +++| DQDML EQU *-DQDM
04608 M00S04540.qfsp +++| DQDY KDL * *QDUMP* Y-COORDINATE TABLE
04609 M00S04541.qfsp +++| TITLE QLOAD K-DISPLAY LEFT SCREEN PAGE ONE.
04610 M00S04542.qfsp +++|* FIRST PAGE LEFT SCREEN *QLOAD* K-DISPLAY.
04611 M00S04543.qfsp +++|
04612 M00S04544.qfsp +++|
04613 M00S04545.qfsp +++| DQLD BSS 0
04614 M00S04546.qfsp +++| LOC DSAA
04615 M00S04547.qfsp +++| KDL 1,T,(QLOAD)
04616 M00S04548.qfsp +++| KDL 54,T,(PAGE 1 OF 3)
04617 M00S04549.qfsp +++| DLER EQU *+3
04618 M00S04550.qfsp +++| KDL 20,H,( (ERRORED FILE LOADING NOT SET))
04619 M00S04551.qfsp +++| KDL 1,H,( OPTION DESCRIPTION)
04620 M00S04552.qfsp +++| DLMI EQU *+1
04621 M00S04553.qfsp +++| KDL 1,K,( MI = MACHINE ID (1-2 CHARACTERS, *ALL*).)
04622 M00S04554.qfsp +++| DLDE EQU *+1
04623 M00S04555.qfsp +++| KDL 1,K,( DF = DESTINATION FAMILY (1-7 CHARACTERS).)
04624 M00S04556.qfsp +++| DLDD EQU *+1
04625 M00S04557.qfsp +++| KDL 1,K,( DD = DESTINATION DEVICE (0-77B).)
04626 M00S04558.qfsp +++| DLDA EQU *+1
04627 M00S04559.qfsp +++| KDL 1,K,( DA = LOAD DATE RANGE (YYMMDD, *ALL*).)
04628 M00S04560.qfsp +++| DLD1 EQU *+1
04629 M00S04561.qfsp +++| KDL 1,H,( )
04630 M00S04562.qfsp +++| DLOF EQU *+1
04631 M00S04563.qfsp +++| KDL 1,K,( L = FILE TO RECEIVE OUTPUT (1-7 CHARACTERS).)
04632 M00S04564.qfsp +++| DLFN EQU *+1
04633 M00S04565.qfsp +++| KDL 1,K,( FN = LOAD FILE NAME (1-7 CHARACTERS).)
04634 M00S04566.qfsp +++| DLNF EQU *+1
04635 M00S04567.qfsp +++| KDL 1,K,( NF = NUMBER OF MEDIA FILES TO SKIP.)
04636 M00S04568.qfsp +++| DLSC EQU *+1
04637 M00S04569.qfsp +++| KDL 1,K,( SC = NUMBER OF QUEUED FILES TO SKIP.)
04638 M00S04570.qfsp +++| DLOP EQU *+1
04639 M00S04571.qfsp +++| KDL 1,K,( OP = LOAD OPTION (A=LOAD/ACTIVATE,
04640 M00S04572.qfsp +++| KDL 1,K,( I=LOAD/INACTIVATE).)
04641 M00S04573.qfsp +++| VFD 12/7777B,30/0,18/KMES-1 K-DISPLAY CONTINUATION WORD
04642 M00S04574.qfsp +++| LOC *O
04643 M00S04575.qfsp +++| DQLDL EQU *-DQLD
04644 M00S04576.qfsp +++| DQLY KDL * *QLOAD* Y-COORDINATE TABLE
04645 M00S04577.qfsp +++| TITLE QMOVE K-DISPLAY LEFT SCREEN PAGE ONE.
04646 M00S04578.qfsp +++|* FIRST PAGE LEFT SCREEN *QMOVE* K-DISPLAY.
04647 M00S04579.qfsp +++|
04648 M00S04580.qfsp +++|
04649 M00S04581.qfsp +++| DQMV BSS 0
04650 M00S04582.qfsp +++| LOC DSAA
04651 M00S04583.qfsp +++| KDL 1,T,(QMOVE)
04652 M00S04584.qfsp +++| KDL 54,T,(PAGE 1 OF 3)
04653 M00S04585.qfsp +++| KDL 1,,(INACTIVE QUEUES RESIDE ON FOLL)
04654 M00S04586.qfsp +++| DMDR EQU *+1
04655 M00S04587.qfsp +++| KDL 31,K,(OWING FAMILIES. )
04656 M00S04588.qfsp +++| DMIN EQU *+1
04657 M00S04589.qfsp +++| KDL 1,K,( )
04658 M00S04590.qfsp +++| DMER EQU *+3
04659 M00S04591.qfsp +++| KDL 20,H,( (ERRORED FILE MOVING NOT SET))
04660 M00S04592.qfsp +++| KDL 1,H,( OPTION DESCRIPTION)
04661 M00S04593.qfsp +++| DMMI EQU *+1
04662 M00S04594.qfsp +++| KDL 1,K,( MI = MACHINE ID (1-2 CHARACTERS, *ALL*).)
04663 M00S04595.qfsp +++| DMFM EQU *+1
04664 M00S04596.qfsp +++| KDL 1,K,( FM = FAMILY FOR DEVICES (1-7 CHARACTERS).)
04665 M00S04597.qfsp +++| DMDN EQU *+1
04666 M00S04598.qfsp +++| KDL 1,K,( DN = DEVICE NUMBER (0-77B, *ALL*).)
04667 M00S04599.qfsp +++| DMDF EQU *+1
04668 M00S04600.qfsp +++| KDL 1,K,( DF = DESTINATION FAMILY (1-7 CHARACTERS).)
04669 M00S04601.qfsp +++| DMDD EQU *+1
04670 M00S04602.qfsp +++| KDL 1,H,( DD = DESTINATION DEVICE (0-77B).)
04671 M00S04603.qfsp +++| DMDA EQU *+1
04672 M00S04604.qfsp +++| KDL 1,K,( DA = DATE RANGE (YYMMDD, *ALL*).)
04673 M00S04605.qfsp +++| DMD1 EQU *+1
04674 M00S04606.qfsp +++| KDL 1,K,( )
04675 M00S04607.qfsp +++| DMOF EQU *+1
04676 M00S04608.qfsp +++| KDL 1,K,( L = FILE TO RECEIVE OUTPUT (1-7 CHARACTERS).)
04677 M00S04609.qfsp +++| DMTP EQU *+1
04678 M00S04610.qfsp +++| KDL 1,K,( TP = TYPE (A=ACTIVE, I=INACTIVE, *ALL*).)
04679 M00S04611.qfsp +++| DMOP EQU *+1
04680 M00S04612.qfsp +++| KDL 1,K,( OP = OPTION (A=LEAVE ACTIVE, I=LEAVE INACTIVE).)
04681 M00S04613.qfsp +++| VFD 12/7777B,30/0,18/KMES-1 K-DISPLAY CONTINUATION WORD
04682 M00S04614.qfsp +++| LOC *O
04683 M00S04615.qfsp +++| DQMVL EQU *-DQMV
04684 M00S04616.qfsp +++| DQMY KDL * *QMOVE* Y-COORDINATE TABLE
04685 M00S04617.qfsp +++| TITLE QREC K-DISPLAY LEFT SCREEN PAGE ONE.
04686 M00S04618.qfsp +++|* FIRST PAGE LEFT SCREEN *QREC* K-DISPLAY.
04687 M00S04619.qfsp +++|
04688 M00S04620.qfsp +++|
04689 M00S04621.qfsp +++| DQRC BSS 0
04690 M00S04622.qfsp +++| LOC DSAA
04691 M00S04623.qfsp +++| KDL 1,T,(QREC)
04692 M00S04624.qfsp +++| KDL 54,T,(PAGE 1 OF 3)
04693 M00S04625.qfsp +++| KDL 1,,(INACTIVE QUEUES RESIDE ON FOLL)
04694 M00S04626.qfsp +++| DQDR EQU *+1
04695 M00S04627.qfsp +++| KDL 31,K,(OWING FAMILIES. )
04696 M00S04628.qfsp +++| DQIN EQU *+1
04697 M00S04629.qfsp +++| KDL 1,H,( )
04698 M00S04630.qfsp +++| KDL 1,H,( OPTION DESCRIPTION)
04699 M00S04631.qfsp +++| DQMI EQU *+1
04700 M00S04632.qfsp +++| KDL 2,K,(MI = MACHINE ID (1-2 CHARACTERS, *ALL*).)
04701 M00S04633.qfsp +++| DQFM EQU *+1
04702 M00S04634.qfsp +++| KDL 2,K,(FM = FAMILY FOR DEVICES (1-7 CHARACTERS).)
04703 M00S04635.qfsp +++| DQDN EQU *+1
04704 M00S04636.qfsp +++| KDL 2,K,(DN = DEVICE NUMBER (0-77B, *ALL*).)
04705 M00S04637.qfsp +++| DQDA EQU *+1
04706 M00S04638.qfsp +++| KDL 2,K,(DA = QUEUED DATE RANGE (YYMMDD, *ALL*).)
04707 M00S04639.qfsp +++| DQD1 EQU *+1
04708 M00S04640.qfsp +++| KDL 2,K,( )
04709 M00S04641.qfsp +++| DQOF EQU *+1
04710 M00S04642.qfsp +++| KDL 2,K,(L = FILE TO RECEIVE OUTPUT (1-7 CHARACTERS).)
04711 M00S04643.qfsp +++| DQOP EQU *+1
04712 M00S04644.qfsp +++| KDL 2,K,(OP = PROCESS OPTION.)
04713 M00S04645.qfsp +++| KDL 21,K,(DI = MAKE SELECTED ACTIVE FILES INACTIVE.)
04714 M00S04646.qfsp +++| KDL 21,K,(PI = PURGE SELECTED INACTIVE FILES.)
04715 M00S04647.qfsp +++| KDL 21,K,(RI = REQUEUE SELECTED INACTIVE FILES.)
04716 M00S04648.qfsp +++| KDL 21,K,(RP = REQUEUE SELECTED INACTIVE FILES AND)
04717 M00S04649.qfsp +++| KDL 26,K,(PURGE REMAINING INACTIVE FILES.)
04718 M00S04650.qfsp +++| VFD 12/7777B,30/0,18/KMES-1 K-DISPLAY CONTINUATION WORD
04719 M00S04651.qfsp +++| LOC *O
04720 M00S04652.qfsp +++| DQRCL EQU *-DQRC
04721 M00S04653.qfsp +++| DQRY1 KDL * *QREC* Y-COORDINATE TABLE FOR PAGE ONE
04722 M00S04654.qfsp +++| TITLE QREC K-DISPLAY LEFT SCREEN PAGE TWO.
04723 M00S04655.qfsp +++|* SECOND PAGE LEFT SCREEN *QREC* K-DISPLAY.
04724 M00S04656.qfsp +++|* THIS BUFFER IS ALSO USED FOR *QLOAD*, *QMOVE*, AND *QDUMP*.
04725 M00S04657.qfsp +++|
04726 M00S04658.qfsp +++| DQRS BSS 0
04727 M00S04659.qfsp +++| LOC DSBB
04728 M00S04660.qfsp +++| DQT2 EQU *
04729 M00S04661.qfsp +++| KDL 1,T,(QREC )
04730 M00S04662.qfsp +++| KDL 54,T,(PAGE 2 OF 3)
04731 M00S04663.qfsp +++| KDL 1,H,( OPTION DESCRIPTION)
04732 M00S04664.qfsp +++| DQFU EQU *+1
04733 M00S04665.qfsp +++| KDL 2,K,(FU = FAMILY FOR USER INDEX (1-7 CHARACTERS).)
04734 M00S04666.qfsp +++| DQUI EQU *+1
04735 M00S04667.qfsp +++| KDL 2,K,(UI = USER INDEX RANGE (0-377777B).)
04736 M00S04668.qfsp +++| DQU1 EQU *+1
04737 M00S04669.qfsp +++| KDL 2,K,( )
04738 M00S04670.qfsp +++| DQTF EQU *+1
04739 M00S04671.qfsp +++| KDL 2,K,(TF = FAMILY FOR TERMINAL (1-7 CHARACTERS).)
04740 M00S04672.qfsp +++| DQTI EQU *+1
04741 M00S04673.qfsp +++| KDL 2,K,(TUI = DESTINATION TERMINAL UI RANGE (0-377777B).
04742 M00S04674.qfsp +++| DQT1 EQU *+1
04743 M00S04675.qfsp +++| KDL 2,K,( )
04744 M00S04676.qfsp +++| DQFS EQU *+1
04745 M00S04677.qfsp +++| KDL 2,K,(FS = FILE SIZE RANGE IN PRU-S (0-777777B).)
04746 M00S04678.qfsp +++| DQF1 EQU *+1
04747 M00S04679.qfsp +++| KDL 2,K,( )
04748 M00S04680.qfsp +++| DQID EQU *+1
04749 M00S04681.qfsp +++| KDL 2,K,(ID = ID RANGE OF FILES TO PROCESS (0-67B).)
04750 M00S04682.qfsp +++| DQI1 EQU *+1
04751 M00S04683.qfsp +++| KDL 2,K,( )
04752 M00S04684.qfsp +++| DQFR EQU *+1
04753 M00S04685.qfsp +++| KDL 2,K,(FC = FORMS CODE (2 CHARACTERS OR **).)
04754 M00S04686.qfsp +++| DQLA EQU *+1
04755 M00S04687.qfsp +++| KDL 2,,(LA = LOWER SECURI)
04756 M00S04688.qfsp +++| DQL1 EQU *+1
04757 M00S04689.qfsp +++| KDL 32,K,(TY ACCESS LEVEL (1-7 CHARACTERS).)
04758 M00S04690.qfsp +++| DQUA EQU *+1
04759 M00S04691.qfsp +++| KDL 2,,(UA = UPPER SECURI)
04760 M00S04692.qfsp +++| DQU2 EQU *+1
04761 M00S04693.qfsp +++| KDL 32,K,(TY ACCESS LEVEL (1-7 CHARACTERS).)
04762 M00S04694.qfsp +++| DQLI EQU *+1
04763 M00S04695.qfsp +++| KDL 2,K,(LD = DESTINATION LID (3 CHARACTERS).)
04764 M00S04696.qfsp +++| VFD 12/7777B,30/0,18/KMES-1 K-DISPLAY CONTINUATION WORD
04765 M00S04697.qfsp +++| LOC *O
04766 M00S04698.qfsp +++| DQRSL EQU *-DQRS
04767 M00S04699.qfsp +++| DQRY2 KDL * *QREC* Y-COORDINATE TABLE FOR PAGE TWO
04768 M00S04700.qfsp +++| TITLE QREC K-DISPLAY LEFT SCREEN PAGE THREE.
04769 M00S04701.qfsp +++|* THIRD PAGE LEFT SCREEN *QREC* K-DISPLAY.
04770 M00S04702.qfsp +++|* THIS BUFFER IS ALSO USED FOR *QLOAD*, *QMOVE*, AND *QDUMP*
04771 M00S04703.qfsp +++|* THIRD PAGES AND FOR SECOND PAGE OF *QALTER* AND *QFTLIST*.
04772 M00S04704.qfsp +++|
04773 M00S04705.qfsp +++| DQRT BSS 0
04774 M00S04706.qfsp +++| LOC DSCC
04775 M00S04707.qfsp +++| DQT3 EQU *
04776 M00S04708.qfsp +++| KDL 1,T,(QREC )
04777 M00S04709.qfsp +++| DQPA EQU *
04778 M00S04710.qfsp +++| KDL 54,T,(PAGE 3 OF 3)
04779 M00S04711.qfsp +++| KDL 1,H,( OPTION DESCRIPTION)
04780 M00S04712.qfsp +++| KDL 1,K,( BC = (DT) DISPOSITION TYPE FOR LOCAL BATCH DEVICES.)
04781 M00S04713.qfsp +++| KDL 1,H,( RB = (DT) DISPOSITION TYPE FOR REMOTE BATCH DEVICES.)
04782 M00S04714.qfsp +++| KDL 1,K,( S I P P P P L L L L L W)
04783 M00S04715.qfsp +++| KDL 1,K,( F N U L R 2 R S T X Y T)
04784 M00S04716.qfsp +++| DQBC EQU *+1
04785 M00S04717.qfsp +++| DQB1 EQU *+2
04786 M00S04718.qfsp +++| DQB2 EQU *+3
04787 M00S04719.qfsp +++| KDL 16,K,( BC * * * * * * * * * * * *)
04788 M00S04720.qfsp +++| DQRB EQU *+1
04789 M00S04721.qfsp +++| DQR3 EQU *+2
04790 M00S04722.qfsp +++| DQR4 EQU *+3
04791 M00S04723.qfsp +++| KDL 16,K,( RB * * * * * * * * * * * *)
04792 M00S04724.qfsp +++| KDL 1,K,( * = OPTION SELECTED.)
04793 M00S04725.qfsp +++| KDL 1,H,( OPTION WILL BE CLEARED IF PREVIOUSLY SELECT
04794 M00S04726.qfsp +++|,ED.)
04795 M00S04727.qfsp +++| DQJN EQU *+1
04796 M00S04728.qfsp +++| KDL 2,K,(JSN = JOB SEQUENCE NAME (1-4 CHARACTERS).)
04797 M00S04729.qfsp +++| DQJ2 EQU *+1
04798 M00S04730.qfsp +++| KDL 2,K,( JSN WILL BE CLEARED IF PREVIOUSLY ENTERED.)
04799 M00S04731.qfsp +++| DQJ3 EQU *+1
04800 M00S04732.qfsp +++| KDL 2,K,( )
04801 M00S04733.qfsp +++| DQJ4 EQU *+1
04802 M00S04734.qfsp +++| KDL 2,K,( )
04803 M00S04735.qfsp +++| DQJ5 EQU *+1
04804 M00S04736.qfsp +++| KDL 2,K,( )
04805 M00S04737.qfsp +++| VFD 12/7777B,30/0,18/KMES-1 K-DISPLAY CONTINUATION WORD
04806 M00S04738.qfsp +++| LOC *O
04807 M00S04739.qfsp +++| DQRTL EQU *-DQRT
04808 M00S04740.qfsp +++| DQPA2 EQU *
04809 M00S04741.qfsp +++| KDL 54,T,(PAGE 2 OF 3) *QALTER* PAGE NUMBER
04810 M00S04742.qfsp +++| DQPA3 EQU *
04811 M00S04743.qfsp +++| KDL 54,T,(PAGE 2 OF 2) *QFTLIST* PAGE NUMBER
04812 M00S04744.qfsp +++|
04813 M00S04745.qfsp +++|* TITLE LINES.
04814 M00S04746.qfsp +++|
04815 M00S04747.qfsp +++| QDTI KDL 1,T,(QDUMP )
04816 M00S04748.qfsp +++| QLTI KDL 1,T,(QLOAD )
04817 M00S04749.qfsp +++| QMTI KDL 1,T,(QMOVE )
04818 M00S04750.qfsp +++| QATI KDL 1,T,(QALTER )
04819 M00S04751.qfsp +++| QFTI KDL 1,T,(QFTLIST)
04820 M00S04752.qfsp +++|
04821 M00S04753.qfsp +++| DQRY3 KDL * *QREC* Y-COORDINATE TABLE FOR PAGE THREE
04822 M00S04754.qfsp +++| TITLE DFTERM K-DISPLAY LEFT SCREEN.
04823 M00S04755.qfsp +++|* LEFT SCREEN *DFTERM* K-DISPLAY.
04824 M00S04756.qfsp +++|
04825 M00S04757.qfsp +++|
04826 M00S04758.qfsp +++| DDDF BSS 0
04827 M00S04759.qfsp +++| LOC DSAA
04828 M00S04760.qfsp +++| KDL 1,T,( DFTERM)
04829 M00S04761.qfsp +++| KDL 1,K,( ---ACTIVE DAYFILES---- --INACTIVE DAYFILES---)
04830 M00S04762.qfsp +++| KDL 1,K,( TYPE FAMILY DN TYPE FAMILY DN)
04831 M00S04763.qfsp +++| DFDY EQU *+1
04832 M00S04764.qfsp +++| KDL 1,,( )
04833 M00S04765.qfsp +++| DFDI EQU *+1
04834 M00S04766.qfsp +++| KDL 31,K,( )
04835 M00S04767.qfsp +++| DFAC EQU *+1
04836 M00S04768.qfsp +++| KDL 1,,( )
04837 M00S04769.qfsp +++| DFAI EQU *+1
04838 M00S04770.qfsp +++| KDL 31,K,( )
04839 M00S04771.qfsp +++| DFER EQU *+1
04840 M00S04772.qfsp +++| KDL 1,,( )
04841 M00S04773.qfsp +++| DFEI EQU *+1
04842 M00S04774.qfsp +++| KDL 31,K,( )
04843 M00S04775.qfsp +++| DFML EQU *+1
04844 M00S04776.qfsp +++| KDL 1,,( )
04845 M00S04777.qfsp +++| DFMI EQU *+1
04846 M00S04778.qfsp +++| KDL 31,H,( )
04847 M00S04779.qfsp +++| KDL 1,H,( OPTION DESCRIPTION)
04848 M00S04780.qfsp +++| DFFT EQU *+1
04849 M00S04781.qfsp +++| KDL 1,K,( FT = FILE TYPE TO BE TERMINATED)
04850 M00S04782.qfsp +++| KDL 1,K,( (DAYFILE, ACCOUNT, ERRLOG, MAINLOG).)
04851 M00S04783.qfsp +++| DFFM EQU *+1
04852 M00S04784.qfsp +++| KDL 1,K,( FM = FAMILY NAME OF NEW DEVICE (1-7 CHARACTERS).
04853 M00S04785.qfsp +++|,)
04854 M00S04786.qfsp +++| DFDN EQU *+1
04855 M00S04787.qfsp +++| KDL 1,K,( DN = DEVICE NUMBER OF NEW DEVICE (0-77B).)
04856 M00S04788.qfsp +++| DFOP EQU *+1
04857 M00S04789.qfsp +++| KDL 1,K,( OP = OPTION (A=ACTIVE OR I=INACTIVE).)
04858 M00S04790.qfsp +++| DFNM EQU *+1
04859 M00S04791.qfsp +++| KDL 1,K,( NM = PERMANENT FILE NAME OVERRIDES AUTOMATIC NAM
04860 M00S04792.qfsp +++|,ING)
04861 M00S04793.qfsp +++| KDL 1,K,( (1-5 CHARACTERS).)
04862 M00S04794.qfsp +++| DFOF EQU *+1
04863 M00S04795.qfsp +++| KDL 1,K,( L = OUTPUT FILE (1-7 CHARACTERS).)
04864 M00S04796.qfsp +++| VFD 12/7777B,30/0,18/KMES-1 K-DISPLAY CONTINUATION WORD
04865 M00S04797.qfsp +++| LOC *O
04866 M00S04798.qfsp +++| DDDFL EQU *-DDDF
04867 M00S04799.qfsp +++| DDFY KDL * *DFTERM* Y-COORDINATE TABLE
04868 M00S04800.qfsp +++| TITLE QALTER K-DISPLAY LEFT SCREEN PAGE ONE.
04869 M00S04801.qfsp +++|* FIRST PAGE LEFT SCREEN *QFTLIST*/*QALTER* K-DISPLAY.
04870 M00S04802.qfsp +++|
04871 M00S04803.qfsp +++|
04872 M00S04804.qfsp +++| DQAL BSS 0
04873 M00S04805.qfsp +++| LOC DSAA
04874 M00S04806.qfsp +++| DNT1 EQU *
04875 M00S04807.qfsp +++| KDL 1,T,(QALTER )
04876 M00S04808.qfsp +++| DNPG EQU *
04877 M00S04809.qfsp +++| KDL 54,T,(PAGE 1 OF 3)
04878 M00S04810.qfsp +++| KDL 2,H,( OPTION DESCRIPTION)
04879 M00S04811.qfsp +++| DNFM EQU *+1
04880 M00S04812.qfsp +++| KDL 2,K,(FM = FAMILY FOR DEVICES (1-7 CHARACTERS).)
04881 M00S04813.qfsp +++| DNDN EQU *+1
04882 M00S04814.qfsp +++| KDL 2,K,(DN = DEVICE NUMBER (0-77B, *ALL*).)
04883 M00S04815.qfsp +++| DNDF EQU *+1
04884 M00S04816.qfsp +++| KDL 2,K,(DF = DESTINATION FAMILY (1-7 CHARACTERS).)
04885 M00S04817.qfsp +++| DNUN EQU *+1
04886 M00S04818.qfsp +++| KDL 2,K,(UN = DESTINATION USER (1-7 CHARACTERS).)
04887 M00S04819.qfsp +++| DNOF EQU *+1
04888 M00S04820.qfsp +++| KDL 2,K,(L = FILE TO RECEIVE OUTPUT (1-7 CHARACTERS).)
04889 M00S04821.qfsp +++| DNLO EQU *+1
04890 M00S04822.qfsp +++| KDL 2,H,(LO = LIST OPTION (S=SHORT, F=FULL).)
04891 M00S04823.qfsp +++| DNID EQU *+1
04892 M00S04824.qfsp +++| KDL 2,K,(ID = ID RANGE OF FILES TO PROCESS (0-67B).)
04893 M00S04825.qfsp +++| DNI1 EQU *+1
04894 M00S04826.qfsp +++| KDL 2,K,( )
04895 M00S04827.qfsp +++| DNFR EQU *+1
04896 M00S04828.qfsp +++| KDL 2,K,(FC = FORMS CODE (2 CHARACTERS OR **).)
04897 M00S04829.qfsp +++| DNUJ EQU *+1
04898 M00S04830.qfsp +++| KDL 2,K,(UJN = USER JOB NAME (1-7 CHARACTERS).)
04899 M00S04831.qfsp +++| DNLD EQU *+1
04900 M00S04832.qfsp +++| KDL 2,K,(LD = DESTINATION LID (3 CHARACTERS).)
04901 M00S04833.qfsp +++| DNLA EQU *+1
04902 M00S04834.qfsp +++| KDL 2,,(LA = LOWER SECURIT)
04903 M00S04835.qfsp +++| DNL1 EQU *+1
04904 M00S04836.qfsp +++| KDL 32,K,(Y ACCESS LEVEL (1-7 CHARACTERS).)
04905 M00S04837.qfsp +++| DNUA EQU *+1
04906 M00S04838.qfsp +++| KDL 2,,(UA = UPPER SECURIT)
04907 M00S04839.qfsp +++| DNU1 EQU *+1
04908 M00S04840.qfsp +++| KDL 32,K,(Y ACCESS LEVEL (1-7 CHARACTERS).)
Line S00003 Modification History
M01
(Added by) ns2747
Seq # *Modification Id* Act
----------------------------+
04909 M01S00003.ns2747 +++| DNFS EQU *+1
04910 M01S00004.ns2747 +++| KDL 2,K,(FS = FILE SIZE RANGE IN PRU-S (0-777777B).)
04911 M01S00005.ns2747 +++| DNF1 EQU *+1
04912 M01S00006.ns2747 +++| KDL 2,K,( )
04913 M00S04841.qfsp +++| VFD 12/7777B,30/0,18/KMES-1 K-DISPLAY CONTINUATION WORD
04914 M00S04842.qfsp +++| LOC *O
04915 M00S04843.qfsp +++| DQALL EQU *-DQAL
04916 M00S04844.qfsp +++|
04917 M00S04845.qfsp +++| DNPG2 KDL 54,T,(PAGE 1 OF 2) *QFTLIST* PAGE LINE
04918 M00S04846.qfsp +++| TITLE QALTER K-DISPLAY LEFT SCREEN PAGE THREE.
04919 M00S04847.qfsp +++|* THIRD PAGE LEFT SCREEN *QALTER* K-DISPLAY.
04920 M00S04848.qfsp +++|
04921 M00S04849.qfsp +++|
04922 M00S04850.qfsp +++| DQAT BSS 0
04923 M00S04851.qfsp +++| LOC DSBB
04924 M00S04852.qfsp +++| KDL 1,T,(QALTER)
04925 M00S04853.qfsp +++| KDL 54,T,(PAGE 3 OF 3)
04926 M00S04854.qfsp +++| KDL 1,H,( OPTION DESCRIPTION)
04927 M00S04855.qfsp +++| DNOP EQU *+1
04928 M00S04856.qfsp +++| KDL 1,K,(OP = OPTION (BC, RB, NC, PR).)
04929 M00S04857.qfsp +++| DNAL EQU *+1
04930 M00S04858.qfsp +++| KDL 1,K,(NAL = NEW ACCESS LEVEL (1-7 CHARACTERS).)
04931 M00S04859.qfsp +++| DNDC EQU *+1
04932 M00S04860.qfsp +++| KDL 1,K,(NDC = NEW DEVICE CODE (2 CHARACTERS OR NONE).)
04933 M00S04861.qfsp +++| DNNE EQU *+1
04934 M00S04862.qfsp +++| KDL 1,K,(NEC = NEW EXTERNAL CHARACTERISTICS (2 CHARACTERS)
04935 M00S04863.qfsp +++|,.)
04936 M00S04864.qfsp +++| DNNL EQU *+1
04937 M00S04865.qfsp +++| KDL 1,K,(NLD = NEW DESTINATION LID (3 CHARACTERS).)
04938 M00S04866.qfsp +++| DNND EQU *+1
04939 M00S04867.qfsp +++| KDL 1,H,(NDF = NEW DESTINATION FAMILY (1-7 CHARACTERS).)
04940 M00S04868.qfsp +++| DNNU EQU *+1
04941 M00S04869.qfsp +++| KDL 1,K,(NUN = NEW DESTINATION USER (1-7 CHARACTERS).)
04942 M00S04870.qfsp +++| DNNI EQU *+1
04943 M00S04871.qfsp +++| KDL 1,K,(NID = NEW FILE IDENTIFIER (0-67B).)
04944 M00S04872.qfsp +++| DNNC EQU *+1
04945 M00S04873.qfsp +++| KDL 1,K,(NFC = NEW FORMS CODE (2 CHARACTERS OR **).)
04946 M00S04874.qfsp +++| DNNP EQU *+1
04947 M00S04875.qfsp +++| KDL 1,K,(NPR = NEW PRIORITY FOR OUTPUT (0-7760B).)
04948 M00S04876.qfsp +++| DNNR EQU *+1
Line S04877 Modification History
M01
(Removed by) ns2591
Seq # *Modification Id* Act
----------------------------+
04949 M01S04877.ns2591 ---| KDL 1,K,(NRC = NEW REPEAT COUNT (0-31D).)
Line S00002 Modification History
M01
(Added by) ns2591
Seq # *Modification Id* Act
----------------------------+
04950 M01S00002.ns2591 +++| KDL 1,K,(NRC = NEW REPEAT COUNT (0-63D).)
04951 M00S04878.qfsp +++| VFD 12/7777B,30/0,18/KMES-1 K-DISPLAY CONTINUATION WORD
04952 M00S04879.qfsp +++| LOC *O
04953 M00S04880.qfsp +++| DQATL EQU *-DQAT
04954 M00S04881.qfsp +++| DQAY KDL * *QFTLIST*/*QALTER* Y-COORDINATE TABLE
04955 M00S04882.qfsp +++| SPACE 4,5
04956 M00S04883.qfsp +++|** IF THE FOLLOWING TEST FAILS, THE VALUE *KLEN* MUST
04957 M00S04884.qfsp +++|* BE INCREASED.
04958 M00S04885.qfsp +++|
04959 M00S04886.qfsp +++| LEN MAX DQSML,DQDML,DQLDL,DQMVL,DQRCL,DDDFL,DQALL,DQRSL,DQRTL,D
04960 M00S04887.qfsp +++|,QATL,DDDFL
04961 M00S04888.qfsp +++| ERRNG KLEN-LEN
Line S00012 Modification History
M01
(Added by) ns2786
Seq # *Modification Id* Act
----------------------------+
04962 M01S00012.ns2786 +++| SPACE 4,6
04963 M01S00013.ns2786 +++|** PRESET COMMON DECKS.
04964 M01S00014.ns2786 +++|
04965 M01S00015.ns2786 +++|
04966 M01S00016.ns2786 +++|*CALL COMCDTC
04967 M01S00017.ns2786 +++|*CALL COMCVDE
04968 M00S04889.qfsp +++| PRS TITLE PRESET.
04969 M00S04890.qfsp +++|** PRS - PRESET.
04970 M00S04891.qfsp +++|*
04971 M00S04892.qfsp +++|* EXIT TO *LUP*.
04972 M00S04893.qfsp +++|* (FPNM) = FUNCTION PROCESSOR NUMBER.
04973 M00S04894.qfsp +++|* K-DISPLAY SET INTO *DSL* BUFFER.
04974 M00S04895.qfsp +++|* DEFAULT VALUES SET IN *TDFT*.
04975 M00S04896.qfsp +++|* *TEQP* BUILT.
04976 M00S04897.qfsp +++|* (SECR) = *GETSSL* REPLY INFORMATION.
04977 M00S04898.qfsp +++|*
04978 M00S04899.qfsp +++|* CALLS ASC, BDT, BFB, COD, IDE, ISB, NKP, PRK, RST, SET,
04979 M00S04900.qfsp +++|* SFN, USB.
04980 M00S04901.qfsp +++|*
04981 M00S04902.qfsp +++|* MACROS ABORT, EDATE, GETSSL, MESSAGE, MOVE, PDATE, SETPR,
04982 M00S04903.qfsp +++|* SETQP, SYSTEM.
04983 M00S04904.qfsp +++|
04984 M00S04905.qfsp +++|
04985 M00S04906.qfsp +++| QFSP SA1 JOPR CHECK JOB ORIGIN
04986 M00S04907.qfsp +++| SX5 PRSD * USER ACCESS NOT VALID.*
04987 M00S04908.qfsp +++| MX0 -12
04988 M00S04909.qfsp +++| AX1 24
04989 M00S04910.qfsp +++| BX2 -X0*X1
04990 M00S04911.qfsp +++| SX2 X2-SYOT
04991 M00S04912.qfsp +++| NZ X2,PRS1 IF NOT SYSTEM ORIGIN
04992 M00S04913.qfsp +++| MX0 -18 CHECK NUMBER OF ARGUMENTS
04993 M00S04914.qfsp +++| SA3 ACTR
04994 M00S04915.qfsp +++| BX2 -X0*X3
04995 M00S04916.qfsp +++| SB1 1
04996 M00S04917.qfsp +++| ZR X2,PRS2 IF NO COMMAND ARGUMENTS
04997 M00S04918.qfsp +++| SX5 IDEB * COMMAND ARGUMENT ERROR.*
04998 M00S04919.qfsp +++| PRS1 MESSAGE X5
04999 M00S04920.qfsp +++| ABORT
05000 M00S04921.qfsp +++|
05001 M00S04922.qfsp +++| PRS2 MOVE DQSML,DQSM,DSAA MOVE K-DISPLAY INTO BUFFER
05002 M00S04923.qfsp +++| SX3 DQSY PRESET *QFSP* K-DISPLAY Y-COORDINATES
05003 M00S04924.qfsp +++| RJ PRK
05004 M00S04925.qfsp +++| SX3 DSYC PRESET RIGHT SCREEN K-DISPLAY Y-COORD.
05005 M00S04926.qfsp +++| RJ PRK
05006 M00S04927.qfsp +++| SA2 PRST SET K-DISPLAY TITLE
05007 M00S04928.qfsp +++| SA1 KIA SET K-DISPLAY STATUS WORD
05008 M00S04929.qfsp +++| BX7 X2
05009 M00S04930.qfsp +++| BX6 X1
05010 M00S04931.qfsp +++| SA7 KTIT
05011 M00S04932.qfsp +++| SA6 KD
05012 M00S04933.qfsp +++| SETPR QFCS SET K DISPLAY PRIORITY
05013 M00S04934.qfsp +++| PRS3 RJ ISB INPUT STRING BUFFER
05014 M00S04935.qfsp +++| SA2 CS SUPPRESS BLANKS
05015 M00S04936.qfsp +++| MX1 0 ALLOW NO SPECIAL CHARACTERS
05016 M00S04937.qfsp +++| BX6 X2
05017 M00S04938.qfsp +++| RJ ASC ASSEMBLE CHARACTERS
05018 M00S04939.qfsp +++| MX0 42
05019 M00S04940.qfsp +++| SA3 TOFN-1
05020 M00S04941.qfsp +++| RJ SET
05021 M00S04942.qfsp +++| SB6 X3 SET ENTRY POINT ADDRESS
05022 M00S04943.qfsp +++| ZR X4,PRS4 IF ENTRY FOUND
05023 M00S04944.qfsp +++| SB3 ERIE *** INCORRECT ENTRY.
05024 M00S04945.qfsp +++| RJ IDE
05025 M00S04946.qfsp +++| EQ PRS3 PROCESS NEXT INPUT
05026 M00S04947.qfsp +++|
05027 M00S04948.qfsp +++| PRS4 SA1 SL SET INPUT STRING BUFFER EMPTY
05028 M00S04949.qfsp +++| BX6 X1
05029 M00S04950.qfsp +++| SA6 SP
05030 M00S04951.qfsp +++| JP B6 GO TO SPECIFIED ENTRY POINT
05031 M00S04952.qfsp +++|
05032 M00S04953.qfsp +++|* QALTER COMMAND ENTRY POINT.
05033 M00S04954.qfsp +++|
05034 M00S04955.qfsp +++| QALTER SB1 1
05035 M00S04956.qfsp +++| MOVE PRSSL,PRSS,KPAG MOVE IN PAGE TABLE
05036 M00S04957.qfsp +++| MOVE DQALL,DQAL,DSAA MOVE PAGES TO PERMANENT BUFFERS
05037 M00S04958.qfsp +++| MOVE DQRTL,DQRT,DSCC
05038 M00S04959.qfsp +++| MOVE DQATL,DQAT,DSBB
05039 M00S04960.qfsp +++| SX3 DQAY PRESET PAGES 1 AND 3 K-DISPLAY Y-COORD.
05040 M00S04961.qfsp +++| RJ PRK
05041 M00S04962.qfsp +++| SX3 DQRY3 PRESET PAGE TWO K-DISPLAY Y-COORDINATES
05042 M00S04963.qfsp +++| RJ PRK
05043 M00S04964.qfsp +++| SA1 QATI RESET TITLE ON PAGE TWO
05044 M00S04965.qfsp +++| BX6 X1
05045 M00S04966.qfsp +++| SA6 DQT3
05046 M00S04967.qfsp +++| SA1 DQPA2 RESET PAGE NUMBER
05047 M00S04968.qfsp +++| SA2 DQPA2+1
05048 M00S04969.qfsp +++| BX6 X1
05049 M00S04970.qfsp +++| BX7 X2
05050 M00S04971.qfsp +++| SA6 DQPA
05051 M00S04972.qfsp +++| SA7 DQPA+1
05052 M00S04973.qfsp +++| SA1 TODMA SET DIRECTIVE MASK
05053 M00S04974.qfsp +++| SA2 TKDTA SET K-DISPLAY TITLE ENTRY IN TABLE
05054 M00S04975.qfsp +++| BX6 X1
05055 M00S04976.qfsp +++| BX7 X2
05056 M00S04977.qfsp +++| SA6 TODM+FNFN
05057 M00S04978.qfsp +++| SA7 TKDT+FNFN
05058 M00S04979.qfsp +++| EQ PRS5 CONTINUE PRESET
05059 M00S04980.qfsp +++|
05060 M00S04981.qfsp +++|* QFTLIST COMMAND ENTRY POINT.
05061 M00S04982.qfsp +++|
05062 M00S04983.qfsp +++| QFTLIST SB1 1
05063 M00S04984.qfsp +++| UTL SET SET *UTL=* ENTRY POINT IN *SEPW*
05064 M00S04985.qfsp +++| MOVE PRSRL,PRSR,KPAG MOVE IN PAGE TABLE
05065 M00S04986.qfsp +++| MOVE DQALL,DQAL,DSAA MOVE PAGES TO PERMANENT BUFFERS
05066 M00S04987.qfsp +++| MOVE DQRTL,DQRT,DSCC
05067 M00S04988.qfsp +++| SX3 DQAY PRESET K-DISPLAY Y-COORDINATE FOR PAGE 1
05068 M00S04989.qfsp +++| RJ PRK
05069 M00S04990.qfsp +++| SX3 DQRY3 PRESET K-DISPLAY Y-COORDINATE FOR PAGE 2
05070 M00S04991.qfsp +++| RJ PRK
05071 M00S04992.qfsp +++| SA1 DQPA3 RESET PAGE NUMBER ON PAGE 2
05072 M00S04993.qfsp +++| SA2 DQPA3+1
05073 M00S04994.qfsp +++| BX6 X1
05074 M00S04995.qfsp +++| BX7 X2
05075 M00S04996.qfsp +++| SA6 DQPA
05076 M00S04997.qfsp +++| SA7 DQPA+1
05077 M00S04998.qfsp +++| SA1 DNPG2+1 RESET PAGE NUMBER ON PAGE 1
05078 M00S04999.qfsp +++| BX6 X1
05079 M00S05000.qfsp +++| SA6 DNPG+1
05080 M00S05001.qfsp +++| SA1 QFTI SET K-DISPLAY BUFFER TITLES
05081 M00S05002.qfsp +++| SA2 QFTI+1
05082 M00S05003.qfsp +++| BX6 X1
05083 M00S05004.qfsp +++| BX7 X2
05084 M00S05005.qfsp +++| SA6 DQT3
05085 M00S05006.qfsp +++| SA7 DQT3+1
05086 M00S05007.qfsp +++| SA6 DNT1
05087 M00S05008.qfsp +++| SA7 DNT1+1
05088 M00S05009.qfsp +++| SA1 PRSM SET *OUT,STOP* FOR *PO=N* PROCESSING
05089 M00S05010.qfsp +++| SA2 PRSC FORCE LIST ON GO
05090 M00S05011.qfsp +++| BX7 X1
05091 M00S05012.qfsp +++| BX6 X2
05092 M00S05013.qfsp +++| SA7 ISBA
05093 M00S05014.qfsp +++| SA6 TOCEA
05094 M00S05015.qfsp +++| MX6 60 INHIBIT *OP* DIRECTIVE
05095 M00S05016.qfsp +++| SA6 TKLN+AROP
05096 M00S05017.qfsp +++| PRS5 SA2 PRSI SET *DF* ENTRY IN TABLE
05097 M00S05018.qfsp +++| BX6 X2
05098 M00S05019.qfsp +++| BX7 X7-X7
05099 M00S05020.qfsp +++| SA6 TINE+TIDF
05100 M00S05021.qfsp +++| SA7 TDFTG+1 CLEAR DEFAULT FORMS CODE
05101 M00S05022.qfsp +++| SA7 TDFTB+1 CLEAR DESTINATION FAMILY NAME
05102 M00S05023.qfsp +++| SA7 TOCEB+2 SET END OF COMMAND TABLE
05103 M00S05024.qfsp +++| SA1 BLKS CLEAR DEFAULT FORMS CODE
05104 M00S05025.qfsp +++| BX7 X1
05105 M00S05026.qfsp +++| SA7 TDFTG
05106 M00S05027.qfsp +++| SX6 FNFN
05107 M00S05028.qfsp +++| EQ PRS10 START COMMON PROCESSING
05108 M00S05029.qfsp +++|
05109 M00S05030.qfsp +++|
05110 M00S05031.qfsp +++|* QLIST COMMAND ENTRY POINT.
05111 M00S05032.qfsp +++|
05112 M00S05033.qfsp +++| QLIST SB1 1
05113 M00S05034.qfsp +++| UTL SET SET *UTL=* ENTRY POINT IN *SEPW*
05114 M00S05035.qfsp +++| SA1 PRSC FORCE LIST WHEN *GO* ENTERED
05115 M00S05036.qfsp +++| SA5 BLKS CLEAR OPTION DIRECTIVE
05116 M00S05037.qfsp +++| BX6 X1
05117 M00S05038.qfsp +++| BX7 X5
05118 M00S05039.qfsp +++| SA6 TOCEA
05119 M00S05040.qfsp +++| SA7 TDFTC SET DEFAULT DATE TO INFINITE
05120 M00S05041.qfsp +++| SX6 1 SET NO K-DISPLAY ALLOWED
05121 M00S05042.qfsp +++| SA7 TOOE+FNQR
05122 M00S05043.qfsp +++| SA6 IDEA
05123 M00S05044.qfsp +++| SX6 B0+
05124 M00S05045.qfsp +++| SA6 TDFTC+1
05125 M00S05046.qfsp +++| SA6 TOCEB+2 SET END OF COMMAND TABLE
05126 M00S05047.qfsp +++| SA1 QLST SET QLIST *PO* OPTIONS
05127 M00S05048.qfsp +++| BX6 X1
05128 M00S05049.qfsp +++| SA6 TPOP+FNQR
05129 M00S05050.qfsp +++|
05130 M00S05051.qfsp +++|* QREC COMMAND ENTRY POINT.
05131 M00S05052.qfsp +++|
05132 M00S05053.qfsp +++| QREC SB1 1
05133 M00S05054.qfsp +++| SA1 IDEA
05134 M00S05055.qfsp +++| NZ X1,PRS6 IF NO K-DISPLAY ALLOWED
05135 M00S05056.qfsp +++| MOVE DQRCL,DQRC,DSAA MOVE PAGES TO PERMANENT BUFFERS
05136 M00S05057.qfsp +++| MOVE DQRSL,DQRS,DSBB
05137 M00S05058.qfsp +++| MOVE DQRTL,DQRT,DSCC
05138 M00S05059.qfsp +++| SX3 DQRY1 PRESET PAGE 1 K-DISPLAY Y-COORDINATES
05139 M00S05060.qfsp +++| RJ PRK
05140 M00S05061.qfsp +++| SX3 DQRY2 PRESET PAGE 2 K-DISPLAY Y-COORDINATES
05141 M00S05062.qfsp +++| RJ PRK
05142 M00S05063.qfsp +++| SX3 DQRY3 PRESET PAGE 3 K-DISPLAY Y-COORDINATES
05143 M00S05064.qfsp +++| RJ PRK
05144 M00S05065.qfsp +++| PRS6 SX6 FNQR
05145 M00S05066.qfsp +++| EQ PRS10 START COMMON PROCESSING
05146 M00S05067.qfsp +++|
05147 M00S05068.qfsp +++|* QDUMP COMMAND ENTRY POINT.
05148 M00S05069.qfsp +++|
05149 M00S05070.qfsp +++| QDUMP SB1 1
05150 M00S05071.qfsp +++| UTL SET SET *UTL=* ENTRY POINT IN *SEPW*
05151 M00S05072.qfsp +++| MOVE DQDML,DQDM,DSAA MOVE PAGES TO PERMANENT BUFFERS
05152 M00S05073.qfsp +++| MOVE DQRSL,DQRS,DSBB
05153 M00S05074.qfsp +++| MOVE DQRTL,DQRT,DSCC
05154 M00S05075.qfsp +++| SX3 DQDY PRESET PAGE 1 K-DISPLAY Y-COORDINATES
05155 M00S05076.qfsp +++| RJ PRK
05156 M00S05077.qfsp +++| SX3 DQRY2 PRESET PAGE 2 K-DISPLAY Y-COORDINATES
05157 M00S05078.qfsp +++| RJ PRK
05158 M00S05079.qfsp +++| SX3 DQRY3 PRESET PAGE 3 K-DISPLAY Y-COORDINATES
05159 M00S05080.qfsp +++| RJ PRK
05160 M00S05081.qfsp +++| SA1 QDTI RESET TITLE IN K-DISPLAY BUFFERS
05161 M00S05082.qfsp +++| BX6 X1
05162 M00S05083.qfsp +++| SX7 B1 SET ERRORED FILE PROCESSING
05163 M00S05084.qfsp +++| SA6 DQT2
05164 M00S05085.qfsp +++| SA6 DQT3
05165 M00S05086.qfsp +++| SX6 FNQD
05166 M00S05087.qfsp +++| SA7 RSTA
05167 M00S05088.qfsp +++| SX7 B0+ SET END OF COMMAND TABLE
05168 M00S05089.qfsp +++| SA7 TOCEB+2
05169 M00S05090.qfsp +++| EQ PRS8 CONTINUE PRESET
05170 M00S05091.qfsp +++|
05171 M00S05092.qfsp +++|* LDLIST COMMAND ENTRY POINT.
05172 M00S05093.qfsp +++|
05173 M00S05094.qfsp +++| LDLIST SB1 1
05174 M00S05095.qfsp +++| UTL SET SET *UTL=* ENTRY POINT IN *SEPW*
05175 M00S05096.qfsp +++| SA1 PRSC FORCE LIST WHEN *GO* ENTERED
05176 M00S05097.qfsp +++| SA5 BLKS CLEAR OPTION DIRECTIVE
05177 M00S05098.qfsp +++| BX6 X1
05178 M00S05099.qfsp +++| BX7 X5
05179 M00S05100.qfsp +++| SA6 TOCEA
05180 M00S05101.qfsp +++| SX6 1 SET NO K-DISPLAY ALLOWED
05181 M00S05102.qfsp +++| SA7 TOOE+FNQL
05182 M00S05103.qfsp +++| SA6 IDEA
05183 M00S05104.qfsp +++| SA1 LDLT SET LDLIST *PO* OPTION
05184 M00S05105.qfsp +++| BX6 X1
05185 M00S05106.qfsp +++| SA6 TPOP+FNQL
05186 M00S05107.qfsp +++| BX6 X6-X6 SET END OF COMMAND TABLE
05187 M00S05108.qfsp +++| SA6 TOCEB+2
05188 M00S05109.qfsp +++|
05189 M00S05110.qfsp +++|* QLOAD COMMAND ENTRY POINT.
05190 M00S05111.qfsp +++|
05191 M00S05112.qfsp +++| QLOAD SB1 1
05192 M00S05113.qfsp +++| SA1 IDEA
05193 M00S05114.qfsp +++| NZ X1,PRS7 IF NO K-DISPLAY ALLOWED
05194 M00S05115.qfsp +++| MOVE DQLDL,DQLD,DSAA MOVE PAGES TO PERMANENT BUFFERS
05195 M00S05116.qfsp +++| MOVE DQRSL,DQRS,DSBB
05196 M00S05117.qfsp +++| MOVE DQRTL,DQRT,DSCC
05197 M00S05118.qfsp +++| SX3 DQLY PRESET PAGE 1 K-DISPLAY Y-COORDINATES
05198 M00S05119.qfsp +++| RJ PRK
05199 M00S05120.qfsp +++| SX3 DQRY2 PRESET PAGE 2 K-DISPLAY Y-COORDINATES
05200 M00S05121.qfsp +++| RJ PRK
05201 M00S05122.qfsp +++| SX3 DQRY3 PRESET PAGE 3 K-DISPLAY Y-COORDINATES
05202 M00S05123.qfsp +++| RJ PRK
05203 M00S05124.qfsp +++| SA1 QLTI RESET TITLE IN K-DISPLAY BUFFERS
05204 M00S05125.qfsp +++| BX6 X1
05205 M00S05126.qfsp +++| SA6 DQT2
05206 M00S05127.qfsp +++| SA6 DQT3
05207 M00S05128.qfsp +++| PRS7 BX7 X7-X7 SET END OF QLOAD OPTION TABLE
05208 M00S05129.qfsp +++| SA1 TDFTA SET DEFAULT *DF*
05209 M00S05130.qfsp +++| BX6 X1
05210 M00S05131.qfsp +++| SA7 TOTPA
05211 M00S05132.qfsp +++| SA6 TDFTB
05212 M00S05133.qfsp +++| SA7 A6+1
05213 M00S05134.qfsp +++| SA6 A7+1 SET DEFAULT *DD*
05214 M00S05135.qfsp +++| SA7 A6+1
05215 M00S05136.qfsp +++| SX6 FNQL
05216 M00S05137.qfsp +++| PRS8 SA1 PRSG SET *REWIND* COMMAND
05217 M00S05138.qfsp +++| SA3 PRSH SET *ERROR* COMMAND
05218 M00S05139.qfsp +++| BX7 X1
05219 M00S05140.qfsp +++| SA7 TOCEB
05220 M00S05141.qfsp +++| BX7 X3
05221 M00S05142.qfsp +++| SA7 TOCEB+1
05222 M00S05143.qfsp +++| EQ PRS10 START COMMON PROCESSING
05223 M00S05144.qfsp +++|
05224 M00S05145.qfsp +++|* QMOVE COMMAND ENTRY POINT.
05225 M00S05146.qfsp +++|
05226 M00S05147.qfsp +++| QMOVE SB1 1
05227 M00S05148.qfsp +++| UTL SET SET *UTL=* ENTRY POINT IN *SEPW*
05228 M00S05149.qfsp +++| MOVE DQMVL,DQMV,DSAA MOVE PAGES TO PERMANENT BUFFERS
05229 M00S05150.qfsp +++| MOVE DQRSL,DQRS,DSBB
05230 M00S05151.qfsp +++| MOVE DQRTL,DQRT,DSCC
05231 M00S05152.qfsp +++| SX3 DQMY PRESET PAGE 1 K-DISPLAY Y-COORDINATES
05232 M00S05153.qfsp +++| RJ PRK
05233 M00S05154.qfsp +++| SX3 DQRY2 PRESET PAGE 2 K-DISPLAY Y-COORDINATES
05234 M00S05155.qfsp +++| RJ PRK
05235 M00S05156.qfsp +++| SX3 DQRY3 PRESET PAGE 3 K-DISPLAY Y-COORDINATES
05236 M00S05157.qfsp +++| RJ PRK
05237 M00S05158.qfsp +++| SA1 QMTI RESET TITLE IN K-DISPLAY BUFFERS
05238 M00S05159.qfsp +++| SA3 PRSH SET *ERROR* COMMAND
05239 M00S05160.qfsp +++| BX6 X1
05240 M00S05161.qfsp +++| BX7 X3
05241 M00S05162.qfsp +++| SA6 DQT2
05242 M00S05163.qfsp +++| SA7 TOCEB
05243 M00S05164.qfsp +++| SA6 DQT3
05244 M00S05165.qfsp +++| SA3 PRSF SET *FAMILY* COMMAND
05245 M00S05166.qfsp +++| SA1 PRSJ SET *LID* COMMAND
05246 M00S05167.qfsp +++| BX7 X3
05247 M00S05168.qfsp +++| BX6 X1
05248 M00S05169.qfsp +++| SA7 TOCEB+1
05249 M00S05170.qfsp +++| SA6 TOCEB+2
05250 M00S05171.qfsp +++| SX7 B0+ SET END OF COMMAND TABLE
05251 M00S05172.qfsp +++| SA7 TOCEB+3
05252 M00S05173.qfsp +++| SX6 FNQM
05253 M00S05174.qfsp +++| EQ PRS10 START COMMON PROCESSING
05254 M00S05175.qfsp +++|
05255 M00S05176.qfsp +++|* DFLIST COMMAND ENTRY POINT.
05256 M00S05177.qfsp +++|
05257 M00S05178.qfsp +++| DFLIST SB1 1
05258 M00S05179.qfsp +++| UTL SET SET *UTL=* ENTRY POINT IN *SEPW*
05259 M00S05180.qfsp +++| SA4 PRSC FORCE LIST ON *GO*
05260 M00S05181.qfsp +++| BX7 X4
05261 M00S05182.qfsp +++| BX6 X6-X6 SET MASK FOR INPUT ENTRIES
05262 M00S05183.qfsp +++| SA7 TOCEA
05263 M00S05184.qfsp +++| SA6 TODM+FNDT
05264 M00S05185.qfsp +++| SX7 1 SET NO K-DISPLAY ALLOWED
05265 M00S05186.qfsp +++| SA7 IDEA
05266 M00S05187.qfsp +++| SA7 TINE+TIII DO NOT ALLOW *I*
05267 M00S05188.qfsp +++| SA1 DFLT SET DFLIST *PO* OPTION
05268 M00S05189.qfsp +++| BX6 X1
05269 M00S05190.qfsp +++| SA6 TPOP+FNDT
05270 M00S05191.qfsp +++|
05271 M00S05192.qfsp +++|* DFTERM COMMAND ENTRY POINT.
05272 M00S05193.qfsp +++|
05273 M00S05194.qfsp +++| DFTERM SB1 1
05274 M00S05195.qfsp +++| UTL SET SET *UTL=* ENTRY POINT IN *SEPW*
05275 M00S05196.qfsp +++| SA1 IDEA
05276 M00S05197.qfsp +++| NZ X1,PRS9 IF NO K-DISPLAY ALLOWED
05277 M00S05198.qfsp +++| MOVE PRSQL,PRSQ,KPAG MOVE IN PAGE TABLE
05278 M00S05199.qfsp +++| MOVE DDDFL,DDDF,DSAA MOVE PAGE TO PERMANENT BUFFER
05279 M00S05200.qfsp +++| SX3 DDFY PRESET K-DISPLAY Y-COORDINATES
05280 M00S05201.qfsp +++| RJ PRK
05281 M00S05202.qfsp +++| PRS9 SX6 FNDT
05282 M00S05203.qfsp +++| SX7 B0+ SET END OF COMMAND TABLE
05283 M00S05204.qfsp +++| SA7 TOCEB+2
05284 M00S05205.qfsp +++| SA7 TOTPA SET END OF DFTERM OPTION TABLE
05285 M00S05206.qfsp +++|
05286 M00S05207.qfsp +++|* PROCESSING COMMON TO ALL UTILITIES.
05287 M00S05208.qfsp +++|
05288 M00S05209.qfsp +++| PRS10 SA6 FPNM SET FUNCTION NUMBER
05289 M00S05210.qfsp +++| SA2 X6+TODM SET DIRECTIVE MASK
05290 M00S05211.qfsp +++| SA1 X6+TOOE SET OPTION DIRECTIVE
05291 M00S05212.qfsp +++| SA3 X6+TPOP SET *PO* OPTION MASK
05292 M00S05213.qfsp +++| BX6 X3
05293 M00S05214.qfsp +++| SA6 POPA
05294 M00S05215.qfsp +++| BX6 X1
05295 M00S05216.qfsp +++| BX7 X2
05296 M00S05217.qfsp +++| SA6 TIOP+TINE
05297 M00S05218.qfsp +++| SA7 DIPA
05298 M00S05219.qfsp +++| GETSSL SECR GET SYSTEM ACCESS LEVELS
05299 M00S05220.qfsp +++| GETUSV JACL GET VALID JOB ACCESS LEVELS
05300 M00S05221.qfsp +++| SA1 JACL
05301 M00S05222.qfsp +++| MX0 -8
05302 M00S05223.qfsp +++| LX1 -36
05303 M00S05224.qfsp +++| BX6 -X0*X1
05304 M00S05225.qfsp +++| SA6 A1
05305 M00S05226.qfsp +++| GETPP PRSP,TPPP+PPPL,TPPP+PPPD GET PAGE SIZE PARAMETERS
05306 M00S05227.qfsp +++|
05307 M00S05228.qfsp +++|* CHECK IF K-DISPLAY IS ALLOWED.
05308 M00S05229.qfsp +++|
05309 M00S05230.qfsp +++| SA1 JOPR GET JOB ORIGIN
05310 M00S05231.qfsp +++| MX0 -12
05311 M00S05232.qfsp +++| SA2 IDEA
05312 M00S05233.qfsp +++| AX1 24
05313 M00S05234.qfsp +++| BX3 -X0*X1
05314 M00S05235.qfsp +++| SX5 X3-SYOT
05315 M00S05236.qfsp +++| BX6 X5+X2
05316 M00S05237.qfsp +++| ZR X6,PRS11 IF K-DISPLAY ALLOWED
05317 M00S05238.qfsp +++| SA6 IDEA ALLOW NO K-DISPLAY
05318 M00S05239.qfsp +++| RJ NKP ALLOW NO K-DISPLAY INPUT
05319 M00S05240.qfsp +++|
05320 M00S05241.qfsp +++|* CHECK ORIGIN TYPE TO SEE IF CALL IS ALLOWED.
05321 M00S05242.qfsp +++|
05322 M00S05243.qfsp +++| PRS11 SA2 FPNM SET SHIFT COUNT
05323 M00S05244.qfsp +++| ZR X5,PRS12 IF SYSTEM ORIGIN
05324 M00S05245.qfsp +++| SX5 PRSD * USER ACCESS NOT VALID.*
05325 M00S05246.qfsp +++| SB2 59
05326 M00S05247.qfsp +++| SB3 X2
05327 M00S05248.qfsp +++| SX3 60B SET MASK
05328 M00S05249.qfsp +++| SB3 B2-B3
05329 M00S05250.qfsp +++| LX3 B3,X3
05330 M00S05251.qfsp +++| NG X3,PRS1 IF CALL NOT ALLOWED
05331 M00S05252.qfsp +++|
05332 M00S05253.qfsp +++|* SET UP K-DISPLAYS.
05333 M00S05254.qfsp +++|
05334 M00S05255.qfsp +++| PRS12 SA2 FPNM SET K-DISPLAY TITLE
05335 M00S05256.qfsp +++| SA1 TKDT+X2
05336 M00S05257.qfsp +++| SA2 KPAG SAVE PAGE TABLE HEADER WORD
05337 M00S05258.qfsp +++| BX6 X1
05338 M00S05259.qfsp +++| BX7 X2
05339 M00S05260.qfsp +++| SA6 KTIT
05340 M00S05261.qfsp +++| SA7 KPGH
05341 M00S05262.qfsp +++| SA1 KD SET K-DISPLAY STATUS WORD
05342 M00S05263.qfsp +++| SA2 KIB
05343 M00S05264.qfsp +++| BX6 X2
05344 M00S05265.qfsp +++| SA6 A1
05345 M00S05266.qfsp +++| NZ X1,PRS13 IF NOT FIRST K-DISPLAY EXECUTION
05346 M00S05267.qfsp +++| SETPR QFCS SET SPECIAL PRIORITY
05347 M00S05268.qfsp +++| SX3 DSYC PRESET RIGHT SCREEN Y-COORDINATES
05348 M00S05269.qfsp +++| RJ PRK
05349 M00S05270.qfsp +++|
05350 M00S05271.qfsp +++|* MOVE COMMAND PARAMETERS TO STRING BUFFER.
05351 M00S05272.qfsp +++|
05352 M00S05273.qfsp +++| PRS13 MX0 -18
05353 M00S05274.qfsp +++| SA1 ACTR
05354 M00S05275.qfsp +++| BX1 -X0*X1
05355 M00S05276.qfsp +++| ZR X1,PRS16 IF NO PARAMETERS
05356 M00S05277.qfsp +++| SB2 CCDR UNPACK COMMAND
05357 M00S05278.qfsp +++| RJ USB
05358 M00S05279.qfsp +++| SX6 B6-1 SET STRING POINTER ADDRESS
05359 M00S05280.qfsp +++| SA6 SP
05360 M00S05281.qfsp +++| PRS14 SA1 B6 CHECK FOR TERMINATOR CHARACTER
05361 M00S05282.qfsp +++| SB6 B6+1 ADVANCE STRING BUFFER POINTER
05362 M00S05283.qfsp +++| SX2 X1-1R.
05363 M00S05284.qfsp +++| SX3 X1-1R)
05364 M00S05285.qfsp +++| ZR X2,PRS15 IF *.*
05365 M00S05286.qfsp +++| NZ X3,PRS14 IF NOT *)*
05366 M00S05287.qfsp +++| PRS15 SX6 B6+ SET STRING BUFFER LIMIT
05367 M00S05288.qfsp +++| SA6 SL
05368 M00S05289.qfsp +++| MOVE 5,CCDR,KINP DISPLAY COMMAND PARAMETERS
05369 M00S05290.qfsp +++| SA2 CS SUPPRESS BLANKS
05370 M00S05291.qfsp +++| MX1 0 ALLOW NO SPECIAL CHARACTERS
05371 M00S05292.qfsp +++| BX6 X2
05372 M00S05293.qfsp +++| RJ ASC SKIP TO FIRST PARAMETER
05373 M00S05294.qfsp +++|
05374 M00S05295.qfsp +++|* READ CMR POINTERS AND BUILD DEVICE TABLE.
05375 M00S05296.qfsp +++|
05376 M00S05297.qfsp +++| PRS16 MX7 1 SET ABSOLUTE MEMORY READ
05377 M00S05298.qfsp +++| SA7 RSBB
05378 M00S05299.qfsp +++| SYSTEM RSB,R,RSBA READ QFT POINTER
05379 M00S05300.qfsp +++| MX0 -12
05380 M00S05301.qfsp +++| SA1 RSBB SAVE QFT POINTER
05381 M00S05302.qfsp +++| BX6 X1
05382 M00S05303.qfsp +++| SA6 QFT
05383 M00S05304.qfsp +++| MX7 1
05384 M00S05305.qfsp +++| SA7 RSBB
05385 M00S05306.qfsp +++| SYSTEM RSB,R,RSBS READ CMR POINTERS
05386 M00S05307.qfsp +++| SA1 RSBB SET FWA OF DAYFILE POINTERS
05387 M00S05308.qfsp +++| BX7 X1
05388 M00S05309.qfsp +++| SA7 DFP
05389 M00S05310.qfsp +++| LX1 24
05390 M00S05311.qfsp +++| SX6 X1
05391 M00S05312.qfsp +++| SA6 BDTC
05392 M00S05313.qfsp +++| SA1 A1+NCPL-DFPP SET NUMBER OF CONTROL POINTS
05393 M00S05314.qfsp +++| LX1 24
05394 M00S05315.qfsp +++| BX6 -X0*X1
05395 M00S05316.qfsp +++| SA6 BDTD
05396 M00S05317.qfsp +++| SA1 A1+ESTP-NCPL SET *ESTP* FOR *BDT*
05397 M00S05318.qfsp +++| BX6 X1
05398 M00S05319.qfsp +++| SA6 BDTA
05399 M00S05320.qfsp +++| RJ BDT BUILD DEVICE TABLE
05400 M00S05321.qfsp +++| SYSTEM SFM,R,FOTB,RSDF*100B
05401 M00S05322.qfsp +++|
05402 M00S05323.qfsp +++|* SET DEFAULT DATES.
05403 M00S05324.qfsp +++|
05404 M00S05325.qfsp +++| SA1 TDFTC+1
05405 M00S05326.qfsp +++| ZR X1,PRS21 IF *QLIST* - DEFAULT DATE SET
05406 M00S05327.qfsp +++| PDATE PRSA SET CURRENT DATE
05407 M00S05328.qfsp +++| SA5 PRSA SET MAXIMUM DATE
05408 M00S05329.qfsp +++| AX5 18
Line S05330 Modification History
M01
(Removed by) ns2786
Seq # *Modification Id* Act
----------------------------+
05409 M01S05330.ns2786 ---| MX0 -2
05410 M01S05331.ns2786 ---| SX6 X5+20000B CHECK IF LEAP YEAR
05411 M01S05332.ns2786 ---| AX6 12
05412 M01S05333.ns2786 ---| BX6 -X0*X6
05413 M01S05334.ns2786 ---| NZ X6,PRS16.1 IF NOT LEAP YEAR
05414 M01S05335.ns2786 ---| SX6 29 SET NUMBER OF DAYS IN LEAP YEAR FEBRUARY
05415 M01S05336.ns2786 ---| SA6 CDAC+CDAD-1
05416 M01S05337.ns2786 ---| PRS16.1 EDATE X5
Line S00018 Modification History
M01
(Added by) ns2786
Seq # *Modification Id* Act
----------------------------+
05417 M01S00018.ns2786 +++| EDATE X5
05418 M00S05338.qfsp +++| SX2 1R -1R. REMOVE PERIOD
05419 M00S05339.qfsp +++| IX6 X6+X2
05420 M00S05340.qfsp +++| LX6 6
05421 M00S05341.qfsp +++| SA6 TDFTC+2
05422 M00S05342.qfsp +++| BX6 X5
05423 M00S05343.qfsp +++| SA6 A6+1
Line S05344 Modification History
M01
(Removed by) ns2786
Seq # *Modification Id* Act
----------------------------+
05424 M01S05344.ns2786 ---| SA3 PRSA SET MINIMUM DATE
05425 M00S05345.qfsp +++| SX2 DFDA
05426 M00S05346.qfsp +++| ZR X2,PRS21 IF INFINITE DATE
Line S05347 Modification History
M01
(Removed by) ns2786
Seq # *Modification Id* Act
----------------------------+
05427 M01S05347.ns2786 ---| AX3 18 CLEAR TIME
05428 M01S05348.ns2786 ---| MX0 -6
05429 M01S05349.ns2786 ---| BX1 -X0*X3
05430 M01S05350.ns2786 ---| IX1 X1-X2
05431 M01S05351.ns2786 ---| ZR X1,PRS17 IF MONTH WRAP AROUND
05432 M01S05352.ns2786 ---| PL X1,PRS19 IF NO MONTH WRAP AROUND
05433 M01S05353.ns2786 ---| PRS17 LX3 54
05434 M01S05354.ns2786 ---| BX2 -X0*X3
05435 M01S05355.ns2786 ---| SX2 X2-1 DECREMENT MONTH
05436 M01S05356.ns2786 ---| NZ X2,PRS18 IF NO YEAR WRAP AROUND
05437 M01S05357.ns2786 ---| SX2 12 SET MONTH TO DECEMBER
05438 M01S05358.ns2786 ---| SX5 000101B SET MINIMUM DATE TO 70/01/01
05439 M01S05359.ns2786 ---| LX3 -6
05440 M01S05360.ns2786 ---| BX4 -X0*X3 GET YEAR
05441 M01S05361.ns2786 ---| SX4 X4-1
05442 M01S05362.ns2786 ---| NG X4,PRS20 IF BEFORE 1970
05443 M01S05363.ns2786 ---| BX3 X0*X3
05444 M01S05364.ns2786 ---| BX3 X3+X4
05445 M01S05365.ns2786 ---| LX3 6
05446 M01S05366.ns2786 ---| PRS18 BX3 X0*X3 CLEAR MONTH
05447 M01S05367.ns2786 ---| SA4 X2+CDAC-1
05448 M01S05368.ns2786 ---| BX3 X2+X3 MERGE IN MONTH
05449 M01S05369.ns2786 ---| IX1 X1+X4
05450 M01S05370.ns2786 ---| LX3 6
05451 M01S05371.ns2786 ---| NG X1,PRS17 IF ANOTHER MONTH WRAP AROUND
05452 M01S05372.ns2786 ---| PRS19 BX3 X0*X3 CLEAR DAY
05453 M01S05373.ns2786 ---| BX5 X1+X3 MERGE IN DAY
05454 M01S05374.ns2786 ---| PRS20 EDATE X5 CONVERT DATE
Line S00019 Modification History
M01
(Added by) ns2786
Seq # *Modification Id* Act
----------------------------+
05455 M01S00019.ns2786 +++| SA1 PRSK SET MINIMUM DATE
05456 M01S00020.ns2786 +++| MX2 0
05457 M01S00021.ns2786 +++| RJ VDE VALIDATE DATE EXPRESSION AND CONVERT
Line S00022 Modification History
M01
(Added by) ns2786
M02
(Removed by) ns2786a
Seq # *Modification Id* Act
----------------------------+
05458 M02S00022.ns2786a ---| BX7 X6
Line S00012 Modification History
M01
(Added by) ns2786a
Seq # *Modification Id* Act
----------------------------+
05459 M01S00012.ns2786a +++| SA6 TDFTC+1
Line S00023 Modification History
M01
(Added by) ns2786
Seq # *Modification Id* Act
----------------------------+
05460 M01S00023.ns2786 +++| EDATE X6 CONVERT DATE
05461 M00S05375.qfsp +++| SX2 1R -1R. REMOVE PERIOD
05462 M00S05376.qfsp +++| IX6 X6+X2
05463 M00S05377.qfsp +++| LX6 6
05464 M00S05378.qfsp +++| SA6 TDFTC
Line S05379 Modification History
M01
(Removed by) ns2786
Seq # *Modification Id* Act
----------------------------+
05465 M01S05379.ns2786 ---| SX6 28 RESTORE NUMBER OF DAYS IN FEBRUARY
05466 M01S05380.ns2786 ---| BX7 X5
Line S05381 Modification History
M01
(Removed by) ns2786a
Seq # *Modification Id* Act
----------------------------+
05467 M01S05381.ns2786a ---| SA7 A6+B1
Line S05382 Modification History
M01
(Removed by) ns2786
Seq # *Modification Id* Act
----------------------------+
05468 M01S05382.ns2786 ---| SA6 CDAD+CDAC-1
05469 M00S05383.qfsp +++|
05470 M00S05384.qfsp +++|* SET DEFAULT OPTIONS.
05471 M00S05385.qfsp +++|
05472 M00S05386.qfsp +++| PRS21 SA1 FPNM DETERMINE INDEX INTO *TDOP*
05473 M00S05387.qfsp +++| SB2 X1
05474 M00S05388.qfsp +++| LX1 1
05475 M00S05389.qfsp +++| SA2 X1+TDOP
05476 M00S05390.qfsp +++| SA3 A2+B1
05477 M00S05391.qfsp +++| BX6 X2
05478 M00S05392.qfsp +++| BX7 X3
05479 M00S05393.qfsp +++| SA6 TDFTF
05480 M00S05394.qfsp +++| SA7 A6+B1
05481 M00S05395.qfsp +++|
05482 M00S05396.qfsp +++|* SET MACHINE ID.
05483 M00S05397.qfsp +++|
05484 M00S05398.qfsp +++| MACHID PRSE SET MACHINE ID
05485 M00S05399.qfsp +++| SA1 PRSE
05486 M00S05400.qfsp +++| MX0 -12
05487 M00S05401.qfsp +++| BX1 -X0*X1
05488 M00S05402.qfsp +++| LX1 48
05489 M00S05403.qfsp +++| RJ SFN
05490 M00S05404.qfsp +++| BX7 X1
05491 M00S05405.qfsp +++| SA6 TDFTH
05492 M00S05406.qfsp +++| SA7 A6+B1
05493 M00S05407.qfsp +++| RJ RST SET DEFAULT DIRECTIVE VALUES
05494 M00S05408.qfsp +++| SX6 B0+ CLEAR INPUT FILE NAME
05495 M00S05409.qfsp +++| SA6 I
05496 M00S05410.qfsp +++|
05497 M00S05411.qfsp +++|* OVERLAY UTILITY ROUTINE.
05498 M00S05412.qfsp +++|
05499 M00S05413.qfsp +++| SA1 FPNM SET OVERLAY NAME
05500 M00S05414.qfsp +++| SA1 X1+TFCN
05501 M00S05415.qfsp +++| JP LUP LOAD UTILITY ROUTINE
05502 M00S05416.qfsp +++|
05503 M00S05417.qfsp +++|
05504 M00S05418.qfsp +++| PRSA CON 0
05505 M00S05419.qfsp +++| PRSB VFD 24/1,18/PFNL,18/RSBB RSB STATUS WORD
05506 M00S05420.qfsp +++| PRSC VFD 42/0LGO,6/0,6/2,6/CLT FORCE LIST ON *GO*
05507 M00S05421.qfsp +++| PRSD DATA C* USER ACCESS NOT VALID.*
05508 M00S05422.qfsp +++| PRSE CON 0 MACHINE ID
05509 M00S05423.qfsp +++| PRSF VFD 42/0LFAMILY,6/0,6/0,6/PFO FAMILY
05510 M00S05424.qfsp +++| PRSG VFD 42/0LREWIND,6/0,6/0,6/CRD
05511 M00S05425.qfsp +++| PRSH VFD 42/0LERROR,6/0,6/0,6/CER
05512 M00S05426.qfsp +++| PRSJ VFD 42/0LLID,6/0,6/0,6/PLT LID
05513 M00S05427.qfsp +++| PRSI IENTRY DF,10B,ARDF,PMI *DF*
05514 M00S05428.qfsp +++| PRSM VFD 60/10HOUT,STOP.
05515 M00S05429.qfsp +++| PRSN VFD 24/1,18/IPRL,18/RSBB READ INSTALLATION DEFAULT
05516 M00S05430.qfsp +++| PRSO DATA 10HNT
05517 M00S05431.qfsp +++| PRSP BSS 2 *GETPP* RESPONSE BLOCK
Line S00024 Modification History
M01
(Added by) ns2786
Seq # *Modification Id* Act
----------------------------+
05518 M01S00024.ns2786 +++| .A DECMIC DFDA,3
05519 M01S00025.ns2786 +++| PRSK VFD 42/0LBD".A",18/0 DEFAULT DAYS
05520 M00S05432.qfsp +++|
05521 M00S05433.qfsp +++|* DFTERM PAGE TABLE.
05522 M00S05434.qfsp +++|
05523 M00S05435.qfsp +++| PRSQ PAGT DSA FIRST PAGE LEFT SCREEN
05524 M00S05436.qfsp +++| PAGT
05525 M00S05437.qfsp +++| PAGT DSD FIRST PAGE RIGHT SCREEN
05526 M00S05438.qfsp +++| PAGT DSE SECOND PAGE RIGHT SCREEN
05527 M00S05439.qfsp +++| PAGT DSF THIRD PAGE RIGHT SCREEN
05528 M00S05440.qfsp +++| PAGT DSG FOURTH PAGE RIGHT SCREEN
05529 M00S05441.qfsp +++| PAGT *
05530 M00S05442.qfsp +++| PRSQL EQU *-PRSQ
05531 M00S05443.qfsp +++|
05532 M00S05444.qfsp +++|* QFTLIST PAGE TABLE.
05533 M00S05445.qfsp +++|
05534 M00S05446.qfsp +++| PRSR PAGT DSA FIRST PAGE LEFT SCREEN
05535 M00S05447.qfsp +++| PAGT DSC SECOND PAGE LEFT SCREEN
05536 M00S05448.qfsp +++| PAGT
05537 M00S05449.qfsp +++| PAGT DSD FIRST PAGE RIGHT SCREEN
05538 M00S05450.qfsp +++| PAGT DSE SECOND PAGE RIGHT SCREEN
05539 M00S05451.qfsp +++| PAGT DSF THIRD PAGE RIGHT SCREEN
05540 M00S05452.qfsp +++| PAGT DSG FOURTH PAGE RIGHT SCREEN
05541 M00S05453.qfsp +++| PAGT *
05542 M00S05454.qfsp +++| PRSRL EQU *-PRSR
05543 M00S05455.qfsp +++|
05544 M00S05456.qfsp +++|* QALTER PAGE TABLE.
05545 M00S05457.qfsp +++|
05546 M00S05458.qfsp +++| PRSS PAGT DSA FIRST PAGE LEFT SCREEN
05547 M00S05459.qfsp +++| PAGT DSC SECOND PAGE LEFT SCREEN
05548 M00S05460.qfsp +++| PAGT DSB THIRD PAGE LEFT SCREEN
05549 M00S05461.qfsp +++| PAGT
05550 M00S05462.qfsp +++| PAGT DSD FIRST PAGE RIGHT SCREEN
05551 M00S05463.qfsp +++| PAGT DSE SECOND PAGE RIGHT SCREEN
05552 M00S05464.qfsp +++| PAGT DSF THIRD PAGE RIGHT SCREEN
05553 M00S05465.qfsp +++| PAGT DSG FOURTH PAGE RIGHT SCREEN
05554 M00S05466.qfsp +++| PAGT *
05555 M00S05467.qfsp +++| PRSSL EQU *-PRSS
05556 M00S05468.qfsp +++|
05557 M00S05469.qfsp +++| PLEN MAX PRSQL,PRSRL,PRSSL LONGEST PAGE TABLE
05558 M00S05470.qfsp +++| ERRNG KPGL-PLEN IF LARGER THAN PAGE TABLE AREA
05559 M00S05471.qfsp +++|
05560 M00S05472.qfsp +++| PRST DATA 5LQFSP. QFSP K-DISPLAY TITLE
05561 M00S05473.qfsp +++|
05562 M00S05474.qfsp +++| PRK HERE SUBROUTINE FROM *COMCDCP*
05563 M00S05475.qfsp +++|
05564 M00S05476.qfsp +++| TOOE SPACE 4
05565 M00S05477.qfsp +++|** TOOE - TABLE OF OPTION ENTRIES.
05566 M00S05478.qfsp +++|
05567 M00S05479.qfsp +++|
05568 M00S05480.qfsp +++| TOOE BSS 0
05569 M00S05481.qfsp +++| LOC 0
05570 M00S05482.qfsp +++| IENTRY OP,0,AROP,PAN
05571 M00S05483.qfsp +++| IENTRY OP,TOTP,AROP,PAN
05572 M00S05484.qfsp +++| IENTRY OP,TOQM,AROP,PAN
05573 M00S05485.qfsp +++| IENTRY OP,TOQR,AROP,PAN
05574 M00S05486.qfsp +++| IENTRY OP,TOTP,AROP,PAN
05575 M00S05487.qfsp +++| IENTRY OP,TOAL,AROP,PAN
05576 M00S05488.qfsp +++| LOC *O
05577 M00S05489.qfsp +++| SPACE 4
05578 M00S05490.qfsp +++|** TDOP - TABLE OF DEFAULT OPTIONS.
05579 M00S05491.qfsp +++|
05580 M00S05492.qfsp +++|
05581 M00S05493.qfsp +++| TDOP BSS 0
05582 M00S05494.qfsp +++| VFD 60/10H NO QDUMP OPTIONS
05583 M00S05495.qfsp +++| VFD 60/0
05584 M00S05496.qfsp +++| VFD 60/10HA QLOAD DEFAULT OPTION
05585 M00S05497.qfsp +++| VFD 60/1
05586 M00S05498.qfsp +++| VFD 60/10HA QMOVE DEFAULT OPTION
05587 M00S05499.qfsp +++| VFD 60/1
05588 M00S05500.qfsp +++| VFD 60/10HRI QREC DEFAULT OPTION
05589 M00S05501.qfsp +++| VFD 60/1
05590 M00S05502.qfsp +++| VFD 60/10HA DFTERM DEFAULT OPTION
05591 M00S05503.qfsp +++| VFD 60/1
05592 M00S05504.qfsp +++| VFD 60/10HNC QALTER OPTION
05593 M00S05505.qfsp +++| VFD 60/NCOP
05594 M00S05506.qfsp +++|
05595 M00S05507.qfsp +++|
05596 M00S05508.qfsp +++|** TODM - TABLE OF DIRECTIVE MASKS.
05597 M00S05509.qfsp +++|*
05598 M00S05510.qfsp +++|* TABLE ENTRIES ARE INDEXED BY UTILITY NUMBER. (REFER TO
05599 M00S05511.qfsp +++|* *COMSQFS*)
05600 M00S05512.qfsp +++|*
05601 M00S05513.qfsp +++|* DIRECTIVE IS ALLOWED IF BIT 2**(59 - ARGUMENT TABLE INDEX)
05602 M00S05514.qfsp +++|* IS SET.
05603 M00S05515.qfsp +++|
05604 M00S05516.qfsp +++|
05605 M00S05517.qfsp +++| TODM BSS 0
05606 M00S05518.qfsp +++| MASK (ARFM,ARFU,ARDN,ARUI,ARU1,ARDA,ARD1,ARJN,ARJ2,ARJ3
05607 M00S05519.qfsp +++|, ,ARJ4,ARJ5,ARID,ARI1,ARLA,ARUA,ARLL,ARTP,ARFS,ARF1
05608 M00S05520.qfsp +++|, ,ARNF,ARBC,ARB1,ARB2,ARRB,ARR3,ARR4,ARTI,ART1,ARTF
05609 M00S05521.qfsp +++|, ,ARFR,ARMI,ARFN,AROL)
05610 M00S05522.qfsp +++|
05611 M00S05523.qfsp +++| MASK (ARFU,ARDF,ARDD,ARUI,ARU1,ARDA,ARD1,ARJN,ARJ2,ARJ3
05612 M00S05524.qfsp +++|, ,ARJ4,ARJ5,ARID,ARI1,ARLA,ARUA,ARLL,ARFS,ARF1,ARNF
05613 M00S05525.qfsp +++|, ,ARSC,ARBC,ARB1,ARB2,ARRB,ARR3,ARR4,AROP,ARTI,ART1
05614 M00S05526.qfsp +++|, ,ARTF,ARFR,ARMI,ARFN,AROL)
05615 M00S05527.qfsp +++|
05616 M00S05528.qfsp +++| MASK (ARFM,ARFU,ARDF,ARDN,ARDD,ARUI,ARU1,ARDA,ARD1,ARJN
05617 M00S05529.qfsp +++|, ,ARJ2,ARJ3,ARJ4,ARJ5,ARID,ARI1,ARLA,ARUA,ARLL,ARTP
05618 M00S05530.qfsp +++|, ,ARFS,ARF1,ARBC,ARB1,ARB2,ARRB,ARR3,ARR4,AROP,ARTI
05619 M00S05531.qfsp +++|, ,ART1,ARTF,ARFR,ARMI,AROL)
05620 M00S05532.qfsp +++|
05621 M00S05533.qfsp +++| MASK (ARFM,ARFU,ARDN,ARUI,ARU1,ARDA,ARD1,ARJN,ARJ2,ARJ3
05622 M00S05534.qfsp +++|, ,ARJ4,ARJ5,ARID,ARI1,ARLA,ARUA,ARLL,ARFS,ARF1,ARBC
05623 M00S05535.qfsp +++|, ,ARB1,ARB2,ARRB,ARR3,ARR4,AROP,ARTI,ART1,ARTF,ARFR
05624 M00S05536.qfsp +++|, ,ARMI,AROL)
05625 M00S05537.qfsp +++|
05626 M00S05538.qfsp +++| MASK (ARFM,ARDN,ARLL,ARFT,ARNM,AROP)
05627 M00S05539.qfsp +++|
05628 M00S05540.qfsp +++| MASK (ARFM,ARDF,ARDN,ARJN,ARJ2,ARJ3,ARJ4,ARJ5,ARID
Line S05541 Modification History
M01
(Removed by) ns2747
Seq # *Modification Id* Act
----------------------------+
05629 M01S05541.ns2747 ---|, ,ARI1,ARLA,ARUA,ARLL,ARBC,ARB1,ARB2,ARRB,ARR3,ARR4
05630 M01S05542.ns2747 ---|, ,AROP,ARFR,ARUN,ARUJ,ARLO,AROL)
Line S00007 Modification History
M01
(Added by) ns2747
Seq # *Modification Id* Act
----------------------------+
05631 M01S00007.ns2747 +++|, ,ARI1,ARLA,ARUA,ARLL,ARFS,ARF1,ARBC,ARB1,ARB2,ARRB
05632 M01S00008.ns2747 +++|, ,ARR3,ARR4,AROP,ARFR,ARUN,ARUJ,ARLO,AROL)
05633 M00S05543.qfsp +++|
05634 M00S05544.qfsp +++| LOC *O
05635 M00S05545.qfsp +++|
05636 M00S05546.qfsp +++| TODMA MASK (ARFM,ARDF,ARDN,ARJN,ARJ2,ARJ3,ARJ4,ARJ5,ARID,ARI1
Line S05547 Modification History
M01
(Removed by) ns2747
Seq # *Modification Id* Act
----------------------------+
05637 M01S05547.ns2747 ---|, ,ARLA,ARUA,ARLL,ARBC,ARB1,ARB2,ARRB,ARR3,ARR4,AROP
05638 M01S05548.ns2747 ---|, ,ARFR,ARUN,ARUJ,ARLO,ARDC,ARAL,ARNE,ARND,ARNU,ARNC
05639 M01S05549.ns2747 ---|, ,ARNI,ARNP,ARNR,AROL,ARNL)
Line S00009 Modification History
M01
(Added by) ns2747
Seq # *Modification Id* Act
----------------------------+
05640 M01S00009.ns2747 +++|, ,ARLA,ARUA,ARLL,ARFS,ARF1,ARBC,ARB1,ARB2,ARRB,ARR3
05641 M01S00010.ns2747 +++|, ,ARR4,AROP,ARFR,ARUN,ARUJ,ARLO,ARDC,ARAL,ARNE,ARND
05642 M01S00011.ns2747 +++|, ,ARNU,ARNC,ARNI,ARNP,ARNR,AROL,ARNL)
05643 M00S05550.qfsp +++| SPACE 4
05644 M00S05551.qfsp +++|** TOFN - TABLE OF FUNCTION PROCESSORS.
05645 M00S05552.qfsp +++|*
05646 M00S05553.qfsp +++|*T 42/ PROCESSOR NAME , 18/ ENTRY ADDRESS
Figure
0 17 18 29 ENTRY ADDRESS PROCESSOR NAME 30 59 PROCESSOR NAME
05647 M00S05554.qfsp +++|
05648 M00S05555.qfsp +++|
05649 M00S05556.qfsp +++| TOFN BSS 0
05650 M00S05557.qfsp +++| LOC 0
05651 M00S05558.qfsp +++| TABLE QDUMP,QDUMP
05652 M00S05559.qfsp +++| TABLE QLOAD,QLOAD
05653 M00S05560.qfsp +++| TABLE QMOVE,QMOVE
05654 M00S05561.qfsp +++| TABLE QREC,QREC
05655 M00S05562.qfsp +++| TABLE DFTERM,DFTERM
05656 M00S05563.qfsp +++| TABLE QFTLIST,QFTLIST
05657 M00S05564.qfsp +++| TABLE QALTER,QALTER
05658 M00S05565.qfsp +++| CON 0
05659 M00S05566.qfsp +++| LOC *O
05660 M00S05567.qfsp +++| SPACE 4,10
05661 M00S05568.qfsp +++|** TABLE OF *PO* PROCESSOR MASKS.
05662 M00S05569.qfsp +++|*
05663 M00S05570.qfsp +++|*T 1/F, 1/R, 1/E, 1/N, 1/L, 1/I, 1/U, 53/0
Figure
0 29 0 30 52 53 54 55 56 57 58 59 0 U I L N E R F
05664 M00S05571.qfsp +++|* F = FOT FLAG.
05665 M00S05572.qfsp +++|* R = REWIND FLAG.
05666 M00S05573.qfsp +++|* E = ERROR PROCESSING FLAG.
05667 M00S05574.qfsp +++|* N = ALLOW K-DISPLAY FLAG.
05668 M00S05575.qfsp +++|* L = LID TABLE FLAG.
05669 M00S05576.qfsp +++|* I = INPUT QUEUE PROCESSING FLAG.
05670 M00S05577.qfsp +++|* U = UNCONDITIONAL PROCESSING FLAG.
05671 M00S05578.qfsp +++|
05672 M00S05579.qfsp +++|
05673 M00S05580.qfsp +++| TPOP BSS 0
05674 M00S05581.qfsp +++| LOC 0
05675 M00S05582.qfsp +++| VFD 9/344B,51/0 QDUMP
05676 M00S05583.qfsp +++| VFD 9/774B,51/0 QLOAD
05677 M00S05584.qfsp +++| VFD 9/574B,51/0 QMOVE
05678 M00S05585.qfsp +++| VFD 9/474B,51/0 QREC
05679 M00S05586.qfsp +++| VFD 6/4B,54/0 DFTERM
05680 M00S05587.qfsp +++| VFD 6/4B,54/0 QFTLIST/QALTER
05681 M00S05588.qfsp +++| LOC *O
05682 M00S05589.qfsp +++| CON 0
05683 M00S05590.qfsp +++|
05684 M00S05591.qfsp +++| LDLT VFD 6/0,54/0 LDLIST
05685 M00S05592.qfsp +++| QLST VFD 6/0,54/0 QLIST
05686 M00S05593.qfsp +++| DFLT VFD 6/0,54/0 DFLIST
05687 M00S05594.qfsp +++|
05688 M00S05595.qfsp +++| SPACE 4
05689 M00S05596.qfsp +++|** TFCN - TABLE OF FUNCTION PROCESSORS.
05690 M00S05597.qfsp +++|*
05691 M00S05598.qfsp +++|* 60/FUNCTION PROCESSOR NAME
05692 M00S05599.qfsp +++|
05693 M00S05600.qfsp +++|
05694 M00S05601.qfsp +++| TFCN BSS 0
05695 M00S05602.qfsp +++| LOC 0
05696 M00S05603.qfsp +++| VFD 60/0LQDUMP1
05697 M00S05604.qfsp +++| VFD 60/0LQLOAD1
05698 M00S05605.qfsp +++| VFD 60/0LQMOVE1
05699 M00S05606.qfsp +++| VFD 60/0LQREC1
05700 M00S05607.qfsp +++| VFD 60/0LDFTERM1
05701 M00S05608.qfsp +++| VFD 60/0LQFTLST1
05702 M00S05609.qfsp +++| LOC *O
05703 M00S05610.qfsp +++| CON 0
05704 M00S05611.qfsp +++| TKDT SPACE 4,10
05705 M00S05612.qfsp +++|* TKDT - TABLE OF K-DISPLAY TITLES.
05706 M00S05613.qfsp +++|
05707 M00S05614.qfsp +++|
05708 M00S05615.qfsp +++| TKDT BSS 0
05709 M00S05616.qfsp +++| LOC 0
05710 M00S05617.qfsp +++| DATA C*QDUMP.* QDUMP
05711 M00S05618.qfsp +++| DATA C*QLOAD.* QLOAD
05712 M00S05619.qfsp +++| DATA C*QMOVE.* QMOVE
05713 M00S05620.qfsp +++| DATA C*QREC.* QREC
05714 M00S05621.qfsp +++| DATA C*DFTERM.* DFTERM
05715 M00S05622.qfsp +++| DATA C*QFTLIST.* QFTLIST
05716 M00S05623.qfsp +++| LOC *O
05717 M00S05624.qfsp +++| TKDTA DATA C*QALTER.* QALTER K-DISPLAY
05718 M00S05625.qfsp +++|
05719 M00S05626.qfsp +++| SSM= EQU *
05720 M00S05627.qfsp +++| RFL= EQU RFL
05721 M00S05628.qfsp +++|
05722 M00S05629.qfsp +++| END