Deck QFSP Part 002

9 Modifications

Listing Sections

Source

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

0171829 ENTRY ADDRESS PROCESSOR NAME 3059 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

02903052535455565758590UILNERF

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