Seq # *Modification Id* Act
----------------------------+
00006 M01S00001.281l803 +++| COMSPFM SPACE 4,10
00007 M01S00002.281l803 +++|* COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
00008 M00S00006.comspfm +++| COMSPFM SPACE 4
00009 M00S00007.comspfm +++|*** COMSPFM - PERMANENT FILE EQUIVALENCES.
00010 M00S00008.comspfm +++|* R. A. LARSEN. 71/01/19.
00011 M00S00009.comspfm +++|* W. B. CHAPIN 79/04/27.
00012 M00S00010.comspfm +++|* J. R. CARLSON. 79/05/09.
00013 M00S00011.comspfm +++| BASE M
00014 M00S00012.comspfm +++| SPACE 4
00015 M00S00013.comspfm +++|*** *COMSPFM* PROVIDES EQUIVALENCES FOR PERMANENT FILE
00016 M00S00014.comspfm +++|* SYMBOLS AND LOCATIONS, FORMATS OF CALL BLOCKS, CATALOG AND
00017 M00S00015.comspfm +++|* PERMIT ENTRYS.
00018 M00S00016.comspfm +++|*
00019 M00S00017.comspfm +++|* SYMBOLS DEFINED BY THE # #DEF# # MACRO ARE USED IN
00020 M00S00018.comspfm +++|* BOTH *SYMPL* AND *COMPASS* PROGRAMS. IN *SYMPL*,
00021 M00S00019.comspfm +++|* COMMENTS ARE DELIMITED BY THE # # CHARACTER.
00022 M00S00020.comspfm +++| SPACE 4
00023 M00S00021.comspfm +++|*** PFM CALL FORMATS.
00024 M00S00022.comspfm +++|*
00025 M00S00023.comspfm +++|*
00026 M00S00024.comspfm +++|*
00027 M00S00025.comspfm +++|*
00028 M00S00026.comspfm +++|** SYSTEM CALLS.
00029 M00S00027.comspfm +++|*
00030 M00S00028.comspfm +++|*
00031 M00S00029.comspfm +++|*T IR 18/ *PFM* ,6/ ,12/ CC ,6/ ,18/ FET
Figure IR
00032 M00S00030.comspfm +++|*
00033 M00S00031.comspfm +++|* CC COMMAND CODE.
00034 M00S00032.comspfm +++|*
00035 M00S00033.comspfm +++|* 01 = SAVE SPECIFIED FILE ON PERMANENT FILE DEVICE.
00036 M00S00034.comspfm +++|* 02 = GET FILE SPECIFIED FROM PERMANENT FILE DEVICE.
00037 M00S00035.comspfm +++|* 03 = PURGE FILE SPECIFIED FROM PERMANENT FILE DEVICE.
00038 M00S00036.comspfm +++|* 04 = CATALOG FILES ON THE PERMANENT FILE DEVICE
00039 M00S00037.comspfm +++|* 05 = PERMIT SPECIFIED FILE TO BE ACCESSED BY OPTIONAL
00040 M00S00038.comspfm +++|* USER.
00041 M00S00039.comspfm +++|* 06 = SAVE FILE SPECIFIED IN CALL ON PERMANENT FILE
00042 M00S00040.comspfm +++|* AND PURGE ANY PREVIOUS FILE SAVED BY THAT NAME.
00043 M00S00041.comspfm +++|* 07 = APPEND PERMANENT FILE SPECIFIED WITH SYSTEM FILE,
00044 M00S00042.comspfm +++|* PROCESSED IN SAME MANNER AS REPLACE.
00045 M00S00043.comspfm +++|* 10 = DEFINE DIRECT ACCESS PERMANENT FILE.
00046 M00S00044.comspfm +++|* 11 = ATTACH DIRECT ACCESS PERMANENT FILE TO JOB.
00047 M00S00045.comspfm +++|* 12 = CHANGE CATALOG DATA FOR FILE
00048 M00S00046.comspfm +++|* 13 = ATTACH DIRECT ACCESS PERMANENT FILE TO JOB,
00049 M00S00047.comspfm +++|* WITHOUT UPDATING ACCESS COUNT OR DATES.
00050 M00S00048.comspfm +++|* 14 = SET ALTERNATE STORAGE ADDRESS IN CATALOG ENTRY
00051 M00S00049.comspfm +++|* FOR SPECIFIED FILE.
00052 M00S00050.comspfm +++|* 15 = SET/CLEAR ALTERNATE STORAGE FLAGS IN CATALOG
00053 M00S00051.comspfm +++|* ENTRY OF SPECIFIED FILE.
00054 M00S00052.comspfm +++|* 16 = SET DISK ADDRESS INTO CATALOG OF SPECIFIED FILE.
00055 M00S00053.comspfm +++|* 17 = DROP DISK SPACE FOR SPECIFIED DIRECT ACCESS FILE.
00056 M00S00054.comspfm +++|* 20 = PLACE LOCAL FILE ON PROPER PERMANENT FILE DEVICE.
00057 M00S00055.comspfm +++|* 21 = GENERATE A PRIMARY-FILE LOCAL COPY OF SPECIFIED
00058 M00S00056.comspfm +++|* INDIRECT ACCESS FILE.
00059 M00S00057.comspfm +++|* 22 = SET ACCESS CATEGORY SET INTO CATALOG ENTRY FOR
00060 M00S00058.comspfm +++|* SPECIFIED FILE.
00061 M00S00059.comspfm +++|* 23 = SET ACCESS LEVEL INTO CATALOG ENTRY FOR
00062 M00S00060.comspfm +++|* SPECIFIED FILE.
00063 M00S00061.comspfm +++|* 24 = GET SPECIFIED FILE FROM PERMANENT FILE DEVICE
00064 M00S00062.comspfm +++|* WITHOUT UPDATING ACCESS COUNT OR DATE.
00065 M00S00063.comspfm +++|* 25 = SAVE FILE SPECIFIED IN CALL ON PERMANENT FILE
00066 M00S00064.comspfm +++|* AND PURGE ANY PREVIOUS FILE SAVED BY THAT NAME
00067 M00S00065.comspfm +++|* WITHOUT UPDATING ANY DATE/TIME WORDS IN PFC.
00068 M00S00066.comspfm +++|* 26 = DROP DISK SPACE FOR SPECIFIED INDIRECT
00069 M00S00067.comspfm +++|* ACCESS FILE.
00070 M00S00068.comspfm +++|* 27 = DELETE PFC ENTRY AND ASSOCIATED INDIRECT SPACE
00071 M00S00069.comspfm +++|* REMAINING FROM OLD PERMANENT FILE ON *APPEND*.
00072 M00S00070.comspfm +++|* 30 = RETURN STATUS TO ORIGINAL CALLER AFTER COMPLETION
00073 M00S00071.comspfm +++|* OF CPU TRANSFER OF INDIRECT FILE.
Line S00001 Modification History
M01(Added by)
253l688
Seq # *Modification Id* Act
----------------------------+
00074 M01S00001.253l688 +++|* 31 = STAGE PERMANENT FILE FROM ALTERNATE STORAGE.
00075 M00S00072.comspfm +++|*
00076 M00S00073.comspfm +++|* BIT 2**10 SET IGNORE PACKNAME.
00077 M00S00074.comspfm +++|* BIT 2**9 SET USE SYSTEM DEFAULT FAMILY (SSJ= JOBS ONLY).
00078 M00S00075.comspfm +++|* FET FET ADDRESS.
Seq # *Modification Id* Act
----------------------------+
00124 M01S00105.ns2599 ---|* UP RETURN STATUS ON INTERLOCKS.
Line S00003 Modification History
M01(Added by)
ns2599
Seq # *Modification Id* Act
----------------------------+
00125 M01S00003.ns2599 +++|* UP RETURN TIME-DEPENDANT STATUS.
00126 M01S00004.ns2599 +++|* RETURN EXTRA STATUS TO SUBSYSTEMS.
00127 M00S00106.comspfm +++|* EP RETURN STATUS ON ERRORS.
00128 M00S00107.comspfm +++|* RT RETURN STATUS ON FILE STAGING.
Seq # *Modification Id* Act
----------------------------+
00130 M01S00005.ns2599 +++|* IP RETURN STATUS ON INTERLOCKS.
00131 M01S00006.ns2599 +++|* A ACCESS LEVEL PROCESSING BIT.
00132 M00S00109.comspfm +++|* FIRST BUFFER ADDRESS FOR *CATLIST*/*UATTACH*.
00133 M00S00110.comspfm +++|* AL FILE ACCESS LEVEL.
00134 M00S00111.comspfm +++|* CATEGORIES FILE ACCESS CATEGORIES.
00135 M00S00112.comspfm +++|* PF NAME PERMANENT FILE NAME. (IF *PF NAME* IS NOT
00136 M00S00113.comspfm +++|* SPECIFIED, *FILE NAME* IS USED).
00137 M00S00114.comspfm +++|* SR SPECIAL REQUESTS.
00138 M00S00115.comspfm +++|* CT FILE CATEGORY.
00139 M00S00116.comspfm +++|* (40B MUST BE ADDED IN ORDER TO PROCESS
00140 M00S00117.comspfm +++|* THIS FIELD FOR *CHANGE* FUNCTION).
00141 M00S00118.comspfm +++|* MODE MODE OF PERMISSION.
00142 M00S00119.comspfm +++|* (40B MUST BE ADDED IN ORDER TO PROCESS
00143 M00S00120.comspfm +++|* THIS FIELD FOR *CHANGE* FUNCTION).
00144 M00S00121.comspfm +++|* OUAN USER NAME.
00145 M00S00122.comspfm +++|* DN DEVICE NUMBER FOR CATALOG LIST.
00146 M00S00123.comspfm +++|* FILE PASSWORD OPTIONAL PASSWORD FOR FILE ACCESS.
00147 M00S00124.comspfm +++|* (FIELD MUST BE SET TO 7777 7777 7777 77B
00148 M00S00125.comspfm +++|* TO AVOID PROCESSING ON *CHANGE* FUNCTION)
00149 M00S00126.comspfm +++|* ERAD ERROR RETURN ADDRESS
00150 M00S00127.comspfm +++|* USER CONTROL WORD USER INFORMATION.
00151 M00S00128.comspfm +++|* (BIT 59 MUST BE SET IN ORDER TO PROCESS
00152 M00S00129.comspfm +++|* THIS WORD FOR *CHANGE* FUNCTION).
00153 M00S00130.comspfm +++|* PRU PRU COUNT FOR DEFINE COMMAND
00154 M00S00131.comspfm +++|* PACKNAME NAME OF REMOVABLE DEVICE TO ACCESS
00155 M00S00132.comspfm +++|* UC NUMBER OF UNITS IN PACK REQUESTED
00156 M00S00133.comspfm +++|* NEW NAME NEW FILE NAME FOR CHANGE COMMAND
00157 M00S00134.comspfm +++|* EXP ACCESS EXPIRATION DATE OR TERM. (PROCESSED
00158 M00S00135.comspfm +++|* AS TERM IF UPPER 6 BITS ARE ZERO).
00159 M00S00136.comspfm +++|* PR PREFERRED RESIDENCE.
00160 M00S00137.comspfm +++|* BR BACKUP REQUIREMENT.
00161 M00S00138.comspfm +++|* SS FILE SUBSYSTEM.
00162 M00S00139.comspfm +++|* (40B MUST BE ADDED IN ORDER TO PROCESS
00163 M00S00140.comspfm +++|* THIS FIELD FOR *CHANGE* FUNCTION).
00164 M00S00141.comspfm +++|* AC ALTERNATE CATLIST PERMISSION.
00165 M00S00142.comspfm +++|* SRBP POINTER TO SPECIAL FUNCTION REQUEST BLOCK.
00166 M00S00143.comspfm +++| SPACE 4,15
00167 M00S00144.comspfm +++|*** SPECIAL FUNCTION REQUEST BLOCK FORMAT.
00168 M00S00145.comspfm +++|*
00169 M00S00146.comspfm +++|*
00170 M00S00147.comspfm +++|*T 28/ RESERVED,2/ P,6/ DN,12/ TRACK,12/ SECTOR
Seq # *Modification Id* Act
----------------------------+
00181 M01S00157.253l688 ---|* AF ALTERNATE STORAGE STATUS FLAG.
00182 M01S00158.253l688 ---|* AT ALTERNATE STORAGE TYPE.
00183 M01S00159.253l688 ---|* ASA ALTERNATE STORAGE ADDRESS.
Line S00003 Modification History
M01(Added by)
253l688
Seq # *Modification Id* Act
----------------------------+
00184 M01S00003.253l688 +++|* ASI ALTERNATE STORAGE INFORMATION WORD.
00185 M01S00004.253l688 +++|* BIT 42 = 0 IF CARTRIDGE ALTERNATE STORAGE.
00186 M01S00005.253l688 +++|* BIT 42 = 1 IF TAPE ALTERNATE STORAGE.
00187 M00S00160.comspfm +++|* FAMILY FAMILY ON WHICH THE PERMANENT FILE WAS
00188 M00S00161.comspfm +++|* CREATED.
00189 M00S00162.comspfm +++|* USER INDEX USER INDEX OF FILE CREATOR.
Seq # *Modification Id* Act
----------------------------+
00227 M01S00166.253l688 ---|* THE *TDAM* REQUEST BLOCK IS USED TO COMMUNICATE WITH THE
00228 M01S00167.253l688 ---|* MSS EXECUTIVE.
Seq # *Modification Id* Act
----------------------------+
00259 M01S00195.253l688 ---|* TRACK TRACK FOR THE *PFC* ENTRY.
00260 M01S00196.253l688 ---|* SECTOR SECTOR FOR THE *PFC* ENTRY.
Line S00030 Modification History
M01(Added by)
253l688
Seq # *Modification Id* Act
----------------------------+
00261 M01S00030.253l688 +++|* TRACK TRACK FOR THE PFC ENTRY.
00262 M01S00031.253l688 +++|* SECTOR SECTOR FOR THE PFC ENTRY.
00263 M00S00197.comspfm +++|* AT ALTERNATE STORAGE TYPE.
00264 M00S00198.comspfm +++|* ASA ALTERNATE STORAGE ADDRESS.
00265 M00S00199.comspfm +++|* PFN PERMANENT FILE NAME.
00266 M00S00200.comspfm +++|* UI USER INDEX.
00267 M00S00201.comspfm +++|* JSN JSN OF THE JOB ISSUING THE *ATTACH*.
00268 M00S00202.comspfm +++|* EVENT EVENT THE JOB WILL ROLL OUT ON (9/E,12/A).
00269 M00S00203.comspfm +++|* E = EST ORDINAL OF THE FIRST CSU.
00270 M00S00204.comspfm +++|* A = FOLDED *ASA* FOR THE FILE (FORMED
00271 M00S00205.comspfm +++|* BY THE EXCLUSIVE *OR* OF THE THREE 12-BIT
00272 M00S00206.comspfm +++|* BYTES OF THE *ASA* VALUE).
Line S00207 Modification History
M01(Removed by)
253l688
Seq # *Modification Id* Act
----------------------------+
00273 M01S00207.253l688 ---|* FAMILY THE FAMILY CONTAINING THE *PFC* ENTRY.
Line S00032 Modification History
M01(Added by)
253l688
Seq # *Modification Id* Act
----------------------------+
00274 M01S00032.253l688 +++|* FAMILY THE FAMILY/PACK CONTAINING THE PFC ENTRY.
00275 M01S00033.253l688 +++|* I SET IF INDIRECT ACCESS FILE.
00276 M01S00034.253l688 +++|* LENGTH LENGTH OF THE FILE IN SECTORS.
00277 M01S00035.253l688 +++|*
00278 M01S00036.253l688 +++|*
00279 M01S00037.253l688 +++|* *MAGNET* TAPE ALTERNATE STORAGE REQUEST BLOCK FORMAT.
00280 M01S00038.253l688 +++|*
00281 M01S00039.253l688 +++|*T 6/ FC,3/ AL,19/ RESERVED,2/ P,6/ DN,12/ TRACK,12/ SECTOR
Seq # *Modification Id* Act
----------------------------+
00297 M01S00050.253l688 +++|* AL ACCESS LEVEL OF THE FILE.
00298 M01S00051.253l688 +++|* P *PFC* ENTRY ORDINAL.
00299 M01S00052.253l688 +++|* DN DEVICE NUMBER.
00300 M01S00053.253l688 +++|* TRACK TRACK FOR THE *PFC* ENTRY.
00301 M01S00054.253l688 +++|* SECTOR SECTOR FOR THE *PFC* ENTRY.
00302 M01S00055.253l688 +++|* TF *FCTF* FLAGS FROM PFC.
00303 M01S00056.253l688 +++|* FSN FILE SEQUENCE NUMBER ON ARCHIVE TAPE.
00304 M01S00057.253l688 +++|* PACKED VSN PACKED VSN OF ARCHIVE TAPE (12/VP,12/VS)
00305 M01S00058.253l688 +++|* VP = TWO-CHARACTER DISPLAY CODE VSN PREFIX
00306 M01S00059.253l688 +++|* VS = NUMERIC VSN SUFFIX (0000 TO 4095).
00307 M01S00060.253l688 +++|* PFN PERMANENT FILE NAME.
00308 M01S00061.253l688 +++|* UI USER INDEX.
00309 M01S00062.253l688 +++|* JSN JSN OF THE JOB REQUESTING THE FILE.
00310 M01S00063.253l688 +++|* EVENT EVENT THE JOB WILL ROLL OUT ON.
00311 M01S00064.253l688 +++|* FAMILY THE FAMILY/PACK CONTAINING THE PFC ENTRY.
Line S00003 Modification History
M01(Added by)
ns2673
Seq # *Modification Id* Act
----------------------------+
00312 M01S00003.ns2673 +++|* ESTO THE EST ORDINAL OF THE MASTER DEVICE.
00313 M00S00208.comspfm +++|* I SET IF INDIRECT ACCESS FILE.
00314 M00S00209.comspfm +++|* LENGTH LENGTH OF THE FILE IN SECTORS.
Line S00017 Modification History
M01(Added by)
274l797
Seq # *Modification Id* Act
----------------------------+
00315 M01S00017.274l797 +++|*
00316 M01S00018.274l797 +++|*
00317 M01S00019.274l797 +++|* NOTE - IF STAGING IS FROM OPTICAL DISK, THE SECOND WORD OF
00318 M01S00020.274l797 +++|* THE *TDAM* REQUEST IS FORMATTED THE SAME AS THE SECOND
00319 M01S00021.274l797 +++|* WORD OF THE *MSE* *TDAM* REQUEST.
00320 M00S00210.comspfm +++| CPFC SPACE 4,10
00321 M00S00211.comspfm +++|*** *CPUPFM* CALL WORD (*SPCW*).
00322 M00S00212.comspfm +++|*
00323 M00S00213.comspfm +++|*T 18/ *CPF*,6/ 30B,18/ 0,18/ CC
00337 M00S00226.comspfm +++|*
00338 M00S00227.comspfm +++|* LFN LOCAL FILE NAME OF FILE TO BE TRANSFERRED.
Line S00228 Modification History
M01(Removed by)
ns2316
Seq # *Modification Id* Act
----------------------------+
00339 M01S00228.ns2316 ---|* AL ACCESS LEVEL FOR LOCAL FILE.
00340 M00S00229.comspfm +++|* FLAGS FLAG BITS FOR CPU TRANSFER.
Seq # *Modification Id* Act
----------------------------+
00343 M01S00002.ns2316 +++|* 17/0,1/FGIA
00344 M00S00232.comspfm +++|* FGIA = INDIRECT ALLOCATION INTERLOCK HELD.
00345 M00S00233.comspfm +++|* APLF LENGTH OF LOCAL FILE ON *APPEND*.
00346 M00S00234.comspfm +++|* LF TOTAL LENGTH OF FILE TO BE TRANSFERRED
00347 M00S00235.comspfm +++|* (BOTH PERMANENT AND LOCAL FOR *APPEND*).
00348 M00S00236.comspfm +++|* RI RANDOM ADDRESS OF PERMANENT FILE
00349 M00S00237.comspfm +++|* ON *SAVE*, *REPLACE* AND *APPEND*.
00350 M00S00238.comspfm +++|* SRB WORDS 0 - 3 SPECIAL REQUEST BLOCK POINTING TO OLD
00351 M00S00239.comspfm +++|* PERMANENT FILE FOR *APPEND*.
00356 M01S00018.242l642 +++|*
00357 M01S00019.242l642 +++|* E ERROR IDLE FLAG.
00358 M01S00020.242l642 +++|* IF SET, ERROR IDLE STATUS IS TO BE SET
00359 M01S00021.242l642 +++|* FOR THE MASTER DEVICE BY *PFM*.
00360 M01S00022.242l642 +++|*
00361 M01S00023.242l642 +++|* THIS FLAG IS SET WHEN THE FILE TRANSFER
00362 M01S00024.242l642 +++|* IS INCOMPLETE FOR *APPEND*, *REPLACE*,
00363 M01S00025.242l642 +++|* AND *SAVE* COMMANDS. THIS CONDITION CAN
00364 M01S00026.242l642 +++|* OCCUR WITH *TRACK LIMIT*, *PFM ABORTED*,
00365 M01S00027.242l642 +++|* AND *MASS STORAGE ERROR* ERROR CODES.
00366 M01S00028.242l642 +++|*
00367 M01S00029.242l642 +++|* THIS FLAG IS SET WITH *FILE LENGTH ERROR*
00368 M01S00030.242l642 +++|* ERROR CODE WHEN THERE IS A LOGICAL ERROR
00369 M01S00031.242l642 +++|* IN THE LENGTH OF THE FILE.
00370 M01S00032.242l642 +++|*
00371 M01S00033.242l642 +++|* EC *PFM* ERROR CODE.
00372 M01S00034.242l642 +++|* DTE(17) - DATA TRANSFER ERROR.
00373 M01S00035.242l642 +++|* TKL(31) - TRACK LIMIT.
00374 M01S00036.242l642 +++|* FLE(32) - FILE LENGTH ERROR.
00375 M01S00037.242l642 +++|* ABT(36) - PFM ABORTED.
00376 M01S00038.242l642 +++|* MSE(37) - MASS STORAGE ERROR.
00377 M01S00039.242l642 +++|* RTR(127) - RETRY REQUEST.
00378 M00S00240.comspfm +++| CAT SPACE 4,10
00379 M00S00241.comspfm +++|*** CATALOG ENTRY (PFC) FORMAT.
00380 M00S00242.comspfm +++|*
00381 M00S00243.comspfm +++|*
00382 M00S00244.comspfm +++|*T 42/ *FILENAME*,18/ USER INDEX
00398 M00S00258.comspfm +++|*T, 60/ USER CONTROL WORD
Figure
00399 M00S00259.comspfm +++|*T, 60/ INSTALLATION WORD
Figure
00400 M00S00260.comspfm +++|*
00401 M00S00261.comspfm +++|*
00402 M00S00262.comspfm +++|* FILE NAME PERMANENT FILE NAME.
00403 M00S00263.comspfm +++|* USER INDEX USER INDEX OF FILE CREATOR.
00404 M00S00264.comspfm +++|* TRACK BEGINNING TRACK OF FILE.
00405 M00S00265.comspfm +++|* SECTOR BEGINNING SECTOR OF FILE.
00406 M00S00266.comspfm +++|* RANDOM INDEX RANDOM DISK ADDRESS OF PERMIT SECTOR.
00407 M00S00267.comspfm +++|* ACCESS COUNT COUNT OF ACCESSES TO FILE.
00408 M00S00268.comspfm +++|* CT FILE CATEGORY
00409 M00S00269.comspfm +++|* (PRIVATE, SEMI-PRIVATE, LIBRARY)
00410 M00S00270.comspfm +++|* MODE MODE OF ACCESS FOR SEMIPUBLIC AND PUBLIC
00411 M00S00271.comspfm +++|* FILES.
00412 M00S00272.comspfm +++|* EF ERROR FLAGS PASSED TO *0RP*
00413 M00S00273.comspfm +++|* (ONLY EXISTS IN SYSTEM SECTOR)
00414 M00S00274.comspfm +++|* EC ERROR CODES DETECTED BY UTILITIES
00415 M00S00275.comspfm +++|* DN DEVICE NUMBER
Line S00023 Modification History
M01(Added by)
274l797
Seq # *Modification Id* Act
----------------------------+
00416 M01S00023.274l797 +++|* ASOD ALTERNATE STORAGE OPTICAL DISK ADDRESS.
00417 M00S00276.comspfm +++|* CONTROL MODIFICATION DATE AND TIME OF LAST *CHANGE*
00418 M00S00277.comspfm +++|* DATE AND TIME OR *PERMIT* COMMAND.
00419 M00S00278.comspfm +++|* PR PREFERRED RESIDENCE.
00420 M00S00279.comspfm +++|* BR BACKUP REQUIREMENT.
00421 M00S00280.comspfm +++|* SS FILE SUBSYSTEM.
00422 M00S00281.comspfm +++|* AC ALTERNATE CATLIST PERMISSION.
00423 M00S00282.comspfm +++|* UTILITY CONTROL DATE AND TIME SET BY *PFM* AND/OR *PFU*
00424 M00S00283.comspfm +++|* DATE AND TIME TO INSURE THAT THE FILE WILL BE DUMPED.
00425 M00S00284.comspfm +++|* PASSWORD OPTIONAL PASSWORD.
00426 M00S00285.comspfm +++|* EXPIRATION DATE PASSWORD EXPIRATION DATE.
Seq # *Modification Id* Act
----------------------------+
00436 M01S00027.274l797 +++|* OPTICAL DISK = 12/ VER, 24/ PACKED VSN.
00437 M01S00028.274l797 +++|* VER = ARCHIVE FILE VERSION NUMBER. THE
00438 M01S00029.274l797 +++|* ARCHIVE FILE NAME IS *PFARCHIVE*,
00439 M01S00030.274l797 +++|* OWNER IDENTIFIER IS *SYSTEMX*, AND
00440 M01S00031.274l797 +++|* GROUP IDENTIFIER IS THE FAMILY OF
00441 M01S00032.274l797 +++|* THE ARCHIVE.
00442 M01S00033.274l797 +++|* PACKED VSN = 12/ VP, 12/VS.
00443 M01S00034.274l797 +++|* VP = TWO-CHARACTER DISPLAY CODE PREFIX.
00444 M01S00035.274l797 +++|* VS = NUMERIC SUFFIX (0000 TO 4095).
00445 M00S00289.comspfm +++|* AL FILE ACCESS LEVEL.
00446 M00S00290.comspfm +++|* CATEGORIES FILE ACCESS CATEGORIES.
00447 M00S00291.comspfm +++|* CHARGE NUMBER CHARGE NUMBER THIS FILE IS BILLED TO.
00448 M00S00292.comspfm +++|* PROJECT NUMBER PROJECT NUMBER THIS FILE IS BILLED TO.
Line S00069 Modification History
M01(Added by)
253l688
Seq # *Modification Id* Act
----------------------------+
00449 M01S00069.253l688 +++|* TF TAPE ALTERNATE STORAGE FLAGS.
00450 M01S00070.253l688 +++|* FSN FILE SEQUENCE NUMBER ON ARCHIVE TAPE.
00451 M01S00071.253l688 +++|* PACKED VSN PACKED VSN OF ARCHIVE TAPE (12/VP,12/VS)
00452 M01S00072.253l688 +++|* VP = TWO-CHARACTER DISPLAY CODE VSN PREFIX
00453 M01S00073.253l688 +++|* VS = NUMERIC VSN SUFFIX (0000 TO 4095).
00454 M00S00293.comspfm +++|* USER CONTROL WORD USER INFORMATION.
00455 M00S00294.comspfm +++| PMT SPACE 4
00456 M00S00295.comspfm +++|*** PERMIT BUFFER FORMAT.
00457 M00S00296.comspfm +++|*
00458 M00S00297.comspfm +++|*
00459 M00S00298.comspfm +++|* THE FIRST TWO CM WORDS OF THE PERMIT BUFFER (DATA AREA) ARE
00460 M00S00299.comspfm +++|* USED FOR LINKAGE.
00461 M00S00300.comspfm +++|*
00462 M00S00301.comspfm +++|* LINKAGE FORMAT.
00463 M00S00302.comspfm +++|*
00464 M00S00303.comspfm +++|*T 24/ RANDOM INDEX,24/ USER INDEX,12/
Figure
00465 M00S00304.comspfm +++|*T, 24/,36/ PACKED DATE AND TIME
Figure
00466 M00S00305.comspfm +++|*
00467 M00S00306.comspfm +++|* RANDOM INDEX RANDOM DISK ADDRESS OF PERMIT BUFFER.
00468 M00S00307.comspfm +++|* ZERO INDICATES END OF FILE CHAIN.
00469 M00S00308.comspfm +++|* USER INDEX USER INDEX WHO CREATED THIS PERMIT SECTOR.
00470 M00S00309.comspfm +++|* PACKED DATE/TIME DATE AND TIME THAT THE LAST PERMIT
00471 M00S00310.comspfm +++|* ENTRY IN THE SECTOR WAS CREATED.
00472 M00S00311.comspfm +++|*
00473 M00S00312.comspfm +++|*
00474 M00S00313.comspfm +++|* THE NEXT 31 PAIRS OF CM WORDS ARE THE PERMIT ENTRYS.
00475 M00S00314.comspfm +++|*
00476 M00S00315.comspfm +++|* PERMIT ENTRY FORMAT.
00477 M00S00316.comspfm +++|*
00478 M00S00317.comspfm +++|*T 42/ USER NAME, 18/ EXP
00480 M00S00319.comspfm +++|*
00481 M00S00320.comspfm +++|* USER NAME USER NAME OF PERMITTED USER.
00482 M00S00321.comspfm +++|* EXP EXPIRATION DATE OF THE PERMIT.
00483 M00S00322.comspfm +++|* ACCESS COUNT NUMBER OF ACCESSES PERMITTED USER HAS MADE
00484 M00S00323.comspfm +++|* TO FILE.
00485 M00S00324.comspfm +++|* MODE PERMIT MODE INFORMATION.
00486 M00S00325.comspfm +++|* 1/X, 1/T, 4/MODE.
00487 M00S00326.comspfm +++|* X = EXPIRATION DATE IS PRESENT.
00488 M00S00327.comspfm +++|* T = PERMIT TYPE (0=EXPLICIT, 1=ACCOUNTING).
00489 M00S00328.comspfm +++|* MODE = PERMITTED MODE.
00490 M00S00329.comspfm +++|* ACCESS DATE LAST ACCESS DATE OF FILE BY PERMITTED USER.
00491 M00S00330.comspfm +++|* ACCESS TIME LAST ACCESS TIME OF FILE BY PERMITTED USER.
00492 M00S00331.comspfm +++| SSF SPACE 4,60
00493 M00S00332.comspfm +++|*** DIRECT ACCESS FILE SYSTEM SECTOR FORMAT.
00494 M00S00333.comspfm +++|*
00495 M00S00334.comspfm +++|*T 42/ FILE NAME,6/,6/PMFT,6/
00511 M00S00350.comspfm +++|*T, 60/ THE ABOVE WORD IS REPEATED FOR EACH POSSIBLE MAINFRAME.
Figure
00512 M00S00351.comspfm +++|*T, 60/ .
Figure
00513 M00S00352.comspfm +++|*T, 60/ .
Figure
00514 M00S00353.comspfm +++|*T, 60/ .
Figure
00515 M00S00354.comspfm +++|*T, 60/ (USER COUNT WORD FOR 16TH MAINFRAME)
Figure
00516 M00S00355.comspfm +++|*T, 60/
Figure
00517 M00S00356.comspfm +++|*T, 60/ .
Figure
00518 M00S00357.comspfm +++|*T, 60/ .
Figure
00519 M00S00358.comspfm +++|*T, 60/ .
Figure
00520 M00S00359.comspfm +++|*T, 60/
Figure
00521 M00S00360.comspfm +++|*T, WJSS 60/ JSNE
Figure WJSS
00522 M00S00361.comspfm +++|*T, WDSS 12/ MID,12/ ,36/ DATE AND TIME OF LAST WRITEABLE ACCESS
Figure WDSS
00523 M00S00362.comspfm +++|*T, I0SS 60/ WORD 0 OF INSTALLATION AREA
Figure I0SS
00524 M00S00363.comspfm +++|*T, I1SS 60/ WORD 1 OF INSTALLATION AREA
Figure I1SS
00525 M00S00364.comspfm +++|*T, I2SS 60/ WORD 2 OF INSTALLATION AREA
Figure I2SS
00526 M00S00365.comspfm +++|*T, I3SS 60/ WORD 3 OF INSTALLATION AREA
Figure I3SS
00527 M00S00366.comspfm +++|*
00528 M00S00367.comspfm +++|* EQSS EST ORDINAL OF FILE (WHEN CREATED).
00529 M00S00368.comspfm +++|* FTSS FIRST TRACK OF FILE.
00530 M00S00369.comspfm +++|*
00531 M00S00370.comspfm +++|* CASS CURRENT ACCESS MODE.
00532 M00S00371.comspfm +++|* 11-8 RESERVED.
00533 M00S00372.comspfm +++|* 7 FILE ATTACHED WITH NON-ROLLABLE OPTION (USED
00534 M00S00373.comspfm +++|* FOR INDEPENDENT SHARED DEVICES ONLY).
00535 M00S00374.comspfm +++|* 6 FILE ATTACHED BY SYSTEM UTILITY.
00536 M00S00375.comspfm +++|* 5 FILE PURGED.
00537 M00S00376.comspfm +++|* 4 FILE MAY BE SHORTENED (W MODE).
00538 M00S00377.comspfm +++|* 3 FILE MAY BE REWRITTEN (W, M OR U MODE).
00539 M00S00378.comspfm +++|* 2 ZERO.
00540 M00S00379.comspfm +++|* 1 FILE MAY BE EXTENDED (W, M OR A MODE).
00541 M00S00380.comspfm +++|* 0 ZERO.
00542 M00S00381.comspfm +++|*
00543 M00S00382.comspfm +++|* FISS 1/FAST ATTACH FLAG, 11/*FAT* INDEX
00544 M00S00383.comspfm +++|* UCSS CURRENT USER COUNTS.
00545 M00S00384.comspfm +++|* A = THIS MAINFRAME IS ACTIVE (HAS FILE ATTACHED).
00546 M00S00385.comspfm +++|* U = FILE ATTACHED BY UTILITY IN THIS MAINFRAME (MF).
00547 M00S00386.comspfm +++|* W = FILE ATTACHED IN W, M, U OR A MODE IN THIS MF.
00548 M00S00387.comspfm +++|* R = TOTAL USERS (OR USERS IN THIS MF) WITH R ACCESS.
00549 M00S00388.comspfm +++|* RU = TOTAL USERS (OR USERS IN THIS MF) WITH RU ACCESS.
00550 M00S00389.comspfm +++|* RA = TOTAL USERS (OR USERS IN THIS MF) WITH RA ACCESS.
00551 M00S00390.comspfm +++|* RM = TOTAL USERS (OR USERS IN THIS MF) WITH RM ACCESS.
00552 M00S00391.comspfm +++|*
00553 M00S00392.comspfm +++|* JSNE EJT WORD *JSNE* FOR LAST JOB WITH WRITEABLE ACCESS.
00554 M00S00393.comspfm +++|* MID MAINFRAME ID OF LAST JOB WITH WRITEABLE ACCESS.
00555 M00S00394.comspfm +++|
00556 M00S00395.comspfm +++|
00557 M00S00396.comspfm +++|
00558 M00S00397.comspfm +++|
00559 M00S00398.comspfm +++|* THE FOLLOWING MICRO DEFINITIONS CREATE MICRO NAMES
00560 M00S00399.comspfm +++|* WHICH CORRESPOND TO THE OCTAL NUMBERS 10B THROUGH 177B.
00561 M00S00400.comspfm +++|* THEY HAVE VALUES WHICH ARE THE SAME AS THEIR NAME (IE,
00562 M00S00401.comspfm +++|* "37" MICRO 1,,$37$ ).
00563 M00S00402.comspfm +++|* THE PURPOSE OF THIS IS TO AVOID TYPE 9 ERRORS WHICH
00564 M00S00403.comspfm +++|* WOULD OTHERWISE OCCUR WHEN *COMPASS* PROCESSES A
00565 M00S00404.comspfm +++|* LINE WITH A # #DEF# # MACRO CONTAINING THE
00566 M00S00405.comspfm +++|* *SYMPL* REPRESENTATION OF AN OCTAL NUMBER (O"37").
00567 M00S00406.comspfm +++|
00568 M00S00407.comspfm +++|
00569 M00S00408.comspfm +++|
00570 M00S00409.comspfm +++| NOREF .R
00571 M00S00410.comspfm +++|
00572 M00S00411.comspfm +++| OCTMIC ECHO ,FIRST=10B,LAST=177B
00573 M00S00412.comspfm +++| .R SET LAST
00574 M00S00413.comspfm +++| GENMIC DUP LAST-FIRST+1
00575 M00S00414.comspfm +++| .R SET .R-1
00576 M00S00415.comspfm +++| .V OCTMIC .R
00577 M00S00416.comspfm +++| ".V" MICRO 1,,$.V$
00578 M00S00417.comspfm +++| GENMIC ENDD
00579 M00S00418.comspfm +++| OCTMIC ENDD
00580 M00S00419.comspfm +++| SPACE 4,10
00581 M00S00420.comspfm +++|**** PERMANENT FILE EQUIVALENCES.
00582 M00S00421.comspfm +++|
00583 M00S00422.comspfm +++|
00584 M00S00423.comspfm +++|
00585 M00S00424.comspfm +++|
00586 M00S00425.comspfm +++|** ENTRY LENGTHS.
00587 M00S00426.comspfm +++|
00588 M00S00427.comspfm +++|
00589 M00S00428.comspfm +++|
00590 M00S00429.comspfm +++| NWCES EQU 4 POWER OF 2 EQUIVALENT TO THE *PFC* SIZE
00591 M00S00430.comspfm +++| NWCEM EQU 6-NWCES NUMBER OF BITS IN MASK TO ISOLATE *PEO* VAL
00592 M00S00431.comspfm +++| NWCES OCTMIC NWCES,1
00593 M00S00432.comspfm +++| NWCEM OCTMIC NWCEM,1
00594 M00S00433.comspfm +++| NWCE EQU 1S"NWCES" NUMBER OF CM WORDS IN *PFC*
00595 M00S00434.comspfm +++| NWPH EQU 2 NUMBER OF CM WORDS IN PERMIT SECTOR HEADER
00596 M00S00435.comspfm +++| NWPE EQU NWPH NUMBER OF CM WORDS IN PERMIT ENTRY
00597 M00S00436.comspfm +++|
00598 M00S00437.comspfm +++|* IN ORDER FOR *PFM* TO VALIDATE WORD COUNTS WHEN
00599 M00S00438.comspfm +++|* READING SECTORS OF CATALOG OR PERMIT ENTRIES,
00600 M00S00439.comspfm +++|* *NWCE* AND *NWPE* MUST BE POWERS OF TWO. ALSO
00601 M00S00440.comspfm +++|* *NWPH* MUST BE EQUAL TO *NWPE*.
00602 M00S00441.comspfm +++|
00603 M00S00442.comspfm +++| ERRNZ NWPH-NWPE
00604 M00S00443.comspfm +++|
00605 M00S00444.comspfm +++|
00606 M00S00445.comspfm +++|
00607 M00S00446.comspfm +++|
00608 M00S00447.comspfm +++|** COMMAND CODES.
Seq # *Modification Id* Act
----------------------------+
00836 M01S00002.ns2631 +++|#ECD #DEF# 130B # ECD #O"130"#; # ERROR IN CATLIST CONT DATA. #
00837 M00S00649.comspfm +++| #
00838 M00S00650.comspfm +++| QUAL *
00839 M00S00651.comspfm +++|
00840 M00S00652.comspfm +++|
00841 M00S00653.comspfm +++|
00842 M00S00654.comspfm +++|
00843 M00S00655.comspfm +++|** PERMISSION TYPES.
00844 M00S00656.comspfm +++|
00845 M00S00657.comspfm +++|
00846 M00S00658.comspfm +++| #
00847 M00S00659.comspfm +++|#PTWR #DEF# 0 # PTWR #0#; # WRITE MODE #
00848 M00S00660.comspfm +++|#PTRD #DEF# 1 # PTRD #1#; # READ MODE #
00849 M00S00661.comspfm +++|#PTAP #DEF# 2 # PTAP #2#; # APPEND MODE #
00850 M00S00662.comspfm +++|#PTEX #DEF# 3 # PTEX #3#; # EXECUTE MODE #
00851 M00S00663.comspfm +++|#PTNU #DEF# 4 # PTNU #4#; # NEGATE PERMISSION #
00852 M00S00664.comspfm +++|#PTMD #DEF# 5 # PTMD #5#; # MODIFY MODE #
00853 M00S00665.comspfm +++|#PTRM #DEF# 6 # PTRM #6#; # READ/ALLOW MODIFY #
00854 M00S00666.comspfm +++|#PTRA #DEF# 7 # PTRA #7#; # READ/ALLOW EXTEND #
00855 M00S00667.comspfm +++|#PTUP #DEF# 10B # PTUP #O"10"#; # UPDATE MODE #
00856 M00S00668.comspfm +++|#PTRU #DEF# 11B # PTRU #O"11"#; # READ/ALLOW UPDATE #
00857 M00S00669.comspfm +++| CONTROL NOLIST;
00858 M00S00670.comspfm +++| #
00859 M00S00671.comspfm +++| PTLM EQU 12B MAXIMUM PERMISSION TYPE
00860 M00S00672.comspfm +++|
00861 M00S00673.comspfm +++|* NOTE - A NON-ROLLABLE OPTION IS AVAILABLE ON *AFAM* ATTACHES
00862 M00S00674.comspfm +++|* FOR ALL WRITEABLE MODES (WRITE, MODIFY, APPEND AND UPDATE).
00863 M00S00675.comspfm +++|* THIS OPTION IS USED BY PP PROGRAMS THAT ARE UPDATING FAST
00864 M00S00676.comspfm +++|* ATTACH FILES BUT WILL ONLY NEED TO HAVE THE FILE ATTACHED
00865 M00S00677.comspfm +++|* FOR A SHORT TIME. WHEN ONE OF THESE PROGRAMS FINDS THE FAST
00866 M00S00678.comspfm +++|* ATTACH FILE BUSY, IT CHECKS IF IT IS CURRENTLY ATTACHED WITH
00867 M00S00679.comspfm +++|* THE NON-ROLLABLE OPTION. IF SO, THE FILE WILL BE AVAILABLE
00868 M00S00680.comspfm +++|* SHORTLY, SO THE PP WAITS AND TRIES THE *AFAM* FUNCTION AGAIN.
00869 M00S00681.comspfm +++|* IF NOT, SOME OTHER PROGRAM HAS THE FILE ATTACHED AND THE FILE
00870 M00S00682.comspfm +++|* MAY NOT BE AVAILABLE FOR AN EXTENDED PERIOD OF TIME. IN THIS
00871 M00S00683.comspfm +++|* CASE THE PP DOES NOT WAIT FOR THE FILE BUT ABANDONS THE
00872 M00S00684.comspfm +++|* FUNCTION IT IS PROCESSING. THIS OPTION IS USED BY *0AU* WHEN
00873 M00S00685.comspfm +++|* UPDATING THE *PROFILE* FILE AND BY *0AV* WHEN UPDATING THE
00874 M00S00686.comspfm +++|* SECURITY COUNT IN THE VALIDATION FILE. IF A PP PROGRAM USES
00875 M00S00687.comspfm +++|* *AFAM* TO ATTACH A FAST ATTACH FILE WITHOUT THE NON-ROLLABLE
00876 M00S00688.comspfm +++|* OPTION SELECTED, THERE MUST BE A LOCAL FNT/FST ENTRY FOR THE
00877 M00S00689.comspfm +++|* FILE SO THAT USER COUNTS WILL BE UPDATED CORRECTLY BY *REC*
00878 M00S00690.comspfm +++|* ON RECOVERY.
00879 M00S00691.comspfm +++| SPACE 4,14
00880 M00S00692.comspfm +++|** PERMISSION MODE EQUIVALENCES.
00881 M00S00693.comspfm +++|*
00882 M00S00694.comspfm +++|* BIT POSITION SET INDICATES PERMISSION ALLOWED
00883 M00S00695.comspfm +++|*
00884 M00S00696.comspfm +++|*T, 2/0,1/J,1/I,1/H,1/G,1/F,1/E,1/D,1/C,1/B,1/A