cdc:nos2.source:opl.opl871:common:comspfu
Common COMSPFU
Library Member Format: MODIFY
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M00S00001.comspfu +++| CTEXT COMSPFU - PERMANENT FILE UTILITIES EQUIVALENCES. 00002 M00S00002.comspfu +++| SPACE 4
| Line S00003 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00003 M01S00003.281l803 ---|* COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1973.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00004 M01S00001.281l803 +++|* COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00005 M00S00004.comspfu +++| SPACE 4 00006 M00S00005.comspfu +++|*** COMSPFU - PERMANENT FILE UTILITIES EQUIVALENCES. 00007 M00S00006.comspfu +++|* D. A. HIVELEY. 70/11/20. 00008 M00S00007.comspfu +++|* S. T. WORSTELL. 73/02/15. 00009 M00S00008.comspfu +++| SPACE 4 00010 M00S00009.comspfu +++|*** COMSPFU DEFINES EQUIVALENCES NEEDED TO COMMUNICATE 00011 M00S00010.comspfu +++|* WITH *PFU* AND DESCRIPTIONS OF PERMANENT FILE ARCHIVE FILE 00012 M00S00011.comspfu +++|* FORMATS. 00013 M00S00012.comspfu +++| CALLPFU SPACE 4 00014 M00S00013.comspfu +++|** CALLPFU - CALL PERMANENT FILE UTILITY. 00015 M00S00014.comspfu +++|* 00016 M00S00015.comspfu +++|* CALLPFU FET,FN,RCL 00017 M00S00016.comspfu +++|* 00018 M00S00017.comspfu +++|* FET = FET ADDRESS. 00019 M00S00018.comspfu +++|* FN = PFU FUNCTION CODE. 00020 M00S00019.comspfu +++|* RCL = NON-NULL TO CALL FPU WITH AUTO RECALL. 00021 M00S00020.comspfu +++|* 00022 M00S00021.comspfu +++|* CALLS PFU. 00023 M00S00022.comspfu +++| 00024 M00S00023.comspfu +++| 00025 M00S00024.comspfu +++| PURGMAC CALLPFU 00026 M00S00025.comspfu +++| 00027 M00S00026.comspfu +++| CALLPFU MACRO FET,FN,RCL 00028 M00S00027.comspfu +++| MACREF CALLPFU 00029 M00S00028.comspfu +++| R= X2,FET 00030 M00S00029.comspfu +++| R= X7,FN 00031 M00S00030.comspfu +++|* PROCESS AUTO RECALL. 00032 M00S00031.comspfu +++| IFC NE,$RCL$$,1 00033 M00S00032.comspfu +++| BX7 -X7 00034 M00S00033.comspfu +++| RJ PFU 00035 M00S00034.comspfu +++| ENDM 00036 M00S00035.comspfu +++| SPACE 4 00037 M00S00036.comspfu +++|**** *PFU* FUNCTION CODES. 00038 M00S00037.comspfu +++| 00039 M00S00038.comspfu +++| 00040 M00S00039.comspfu +++| CTOP EQU 0 OPEN FILE (NO LOCKOUT) 00041 M00S00040.comspfu +++| CTOL EQU CTOP+100B OPEN FILE (LOCKOUT) 00042 M00S00041.comspfu +++| CTAC EQU CTOL+100B ADVANCE CATALOG TRACK 00043 M00S00042.comspfu +++| CTRL EQU CTAC+100B *PFDUMP* READ LIST 00044 M00S00043.comspfu +++| CTLM EQU CTRL+100B *PFLOAD* MAIN LOOP 00045 M00S00044.comspfu +++| CTSU EQU CTLM+100B SET PERMANENT FILE UTILITY INTERLOCK 00046 M00S00045.comspfu +++| CTCU EQU CTSU+100B CLEAR PERMANENT FILE UTILITY INTERLOCK 00047 M00S00046.comspfu +++| CTRC EQU CTCU+100B REWIND CATALOG FILE 00048 M00S00047.comspfu +++| CTCF EQU CTRC+100B UNUSED 00049 M00S00048.comspfu +++| CTFL EQU CTCF+100B SET FILE LENGTH 00050 M00S00049.comspfu +++| CTSC EQU CTFL+100B SET CATALOG TRACK INTERLOCK 00051 M00S00050.comspfu +++| CTCC EQU CTSC+100B CLEAR CATALOG TRACK INTERLOCK 00052 M00S00051.comspfu +++| CTEI EQU CTCC+100B SET DEVICE ERROR IDLE STATUS 00053 M00S00052.comspfu +++| CTCT EQU CTEI+100B LOCATE CATALOG TRACK 00054 M00S00053.comspfu +++| CTIA EQU CTCT+100B INCREMENT PERMANENT FILE ACTIVITY COUNT 00055 M00S00054.comspfu +++| CTDA EQU CTIA+100B DECREMENT PERMANENT FILE ACTIVITY COUNT 00056 M00S00055.comspfu +++| CTTU EQU CTDA+100B TEST PERMANENT FILE UTILITY INTERLOCK 00057 M00S00056.comspfu +++| CTGE EQU CTTU+100B GET MSS CATALOG MODIFY MODE INTERLOCK 00058 M00S00057.comspfu +++| CTRE EQU CTGE+100B RELEASE MSS CATALOG MODIFY MODE INTERLOCK 00059 M00S00058.comspfu +++| CTSR EQU CTRE+100B STAGE FILE FROM CARTRIDGE 00060 M00S00059.comspfu +++| CTUU EQU CTSR+100B UPDATE UTILITY CONTROL DATE/TIME 00061 M00S00060.comspfu +++| CTGU EQU CTUU+100B GET MSS CATALOG UPDATE MODE INTERLOCK 00062 M00S00061.comspfu +++| CTRU EQU CTGU+100B RELEASE MSS CATALOG UPDATE MODE INTERLOCK 00063 M00S00062.comspfu +++| CTSL EQU CTRU+100B SET *TFLOK* FLAG IN PFC ENTRY
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 00064 M01S00001.286l859 +++| CTPC EQU CTSL+100B POSITION CATALOG FILE 00065 M00S00063.comspfu +++| SPACE 4 00066 M00S00064.comspfu +++|** FET EQUIVALENCES USED BY PFU. 00067 M00S00065.comspfu +++| 00068 M00S00066.comspfu +++| 00069 M00S00067.comspfu +++| FTFT EQU 1 FET - *FIRST* POINTER 00070 M00S00068.comspfu +++| FTIN EQU 2 FET - *IN* POINTER 00071 M00S00069.comspfu +++| FTOT EQU 3 FET - *OUT* POINTER 00072 M00S00070.comspfu +++| FTLM EQU 4 FET - *LIMIT* POINTER 00073 M00S00071.comspfu +++| FTSC EQU 6 FET - SECTOR COUNT 00074 M00S00072.comspfu +++| FTRE EQU 6 FET - RECOVERY WORD 00075 M00S00073.comspfu +++| FTDW EQU 7 FET - DATA WORD (FOR *PFDUMP* READ LIST) 00076 M00S00074.comspfu +++| FTDL EQU 10B FET - DATA LIST 00077 M00S00075.comspfu +++| FTCA EQU 10B FET - CATALOG ADDRESS 00078 M00S00076.comspfu +++| FTPM EQU 11B FET - PARAMETER WORD 00079 M00S00077.comspfu +++| SPACE 4,10 00080 M00S00078.comspfu +++|** FET ERROR STATUS CODES. 00081 M00S00079.comspfu +++| 00082 M00S00080.comspfu +++| 00083 M00S00081.comspfu +++| FEWE EQU 1 WRITE ERROR STATUS 00084 M00S00082.comspfu +++|* (DATA TRANSFERRED TO DEVICE) 00085 M00S00083.comspfu +++| FEWN EQU 2 WRITE ERROR STATUS 00086 M00S00084.comspfu +++|* (NO DATA TRANSFERRED TO DEVICE) 00087 M00S00085.comspfu +++| FETL EQU 3 TRACK LIMIT ERROR STATUS 00088 M00S00086.comspfu +++| FEEI EQU 4 ERROR IDLE ERROR STATUS 00089 M00S00087.comspfu +++| SPACE 4 00090 M00S00088.comspfu +++| ENDX
cdc/nos2.source/opl.opl871/common/comspfu.txt · Last modified: by 127.0.0.1