COMSSFM 
COMMON
          CTEXT  COMSSFM - SYSTEM FILE MANAGER FUNCTION REQUESTS. 
          BASE   M
*         COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992. 
          SPACE  4,10 
*****     COMSSFM - SYSTEM FILE MANAGER FUNCTION REQUESTS.
* 
*         P. D. HAAS.        79/05/17.
          SPACE  4,10 
***              *COMSSFM* PROVIDES FUNCTION CODE DEFINITIONS 
*         FOR COMMUNICATION BETWEEN CP ROUTINES AND *SFM*.
          SPACE  4,10 
***       *SFM* CALL. 
* 
*T, RA+1  18/  *SFM*,1/,1/1,4/,12/  FC,6/,18/  FA 
*         FC     FUNCTION CODE
*         FA     ADDRESS OF FET 
          SPACE  4,10 
**        *SFM* FUNCTION CODES. 
  
  
 BEGIN    BSSN   0
  
 TAFF     BSSN   1           TERMINATE ACTIVE DAYFILE 
 AMDF     BSSN   1           ACCESS MASTER DAYFILE
 AAFF     BSSN   1           ACCESS ACCOUNT FILE
 AELF     BSSN   1           ACCESS ERRLOG
 AMLF     BSSN   1           ACCESS MAINTENANCE LOG 
 AUDF     BSSN   1           ACCESS USER DAYFILE
 RDTF     BSSN   1           RETURN DEVICE TYPE 
 PADF     BSSN   1           PROTECT ACTIVE DAYFILE 
 CDBF     BSSN   1           CLEAR DAYFILE BYTE 
 EFAF     BSSN   1           ENTER FAST ATTACH FILE 
 DFAF     BSSN   1           DELETE FAST ATTACH FILE
 ECFF     BSSN   1           ENTER *CPD* SAMPLE FILE
 ATDF     BSSN   1           ATTACH DAYFILE 
 EGFF     BSSN   1           ENTER GLOBAL FAST ATTACH 
 ELFF     BSSN   1           ENTER LINK FAST ATTACH 
          BSSN   1           RESERVED 
 GDIF     BSSN   1           GET DEVICE INFORMATION 
 SDFF     BSSN   1           SET DEVICE INFORMATION 
 RSDF     BSSN   1           RETURN SYSTEM DATA 
 CSTF     BSSN   1           CLEAR SUBSYSTEM ACTIVE FLAG
 SSTF     BSSN   1           SET SUBSYSTEM ACTIVE FLAG
 SCDF     BSSN   1           SET *CPD* DROP FLAG
 CFFF     BSSN   1           COUNT FAST ATTACH FILES
 MDFF     BSSN   1           DUMP MACHINE FIELD LENGTH
 GLAF     BSSN   1           GET LID ATTRIBUTES 
 GLTF     BSSN   1           GET LID TABLE
 GLPF     BSSN   1           GET PID ATTRIBUTES 
 GSSF     BSSN   1           GET SYSTEM SECURITY STATUS 
 GEAF     BSSN   1           GET EQUIPMENT ACCESS LEVEL LIMITS
 GSMF     BSSN   1           GET SYSTEM SECURITY MODE 
 SPTF     BSSN   1           SET PID ATTRIBUTES 
 ILTF     BSSN   1           INITIALIZE LID TABLE 
 GLCF     BSSN   1           GET LID CONFIGURATION
 SUSF     BSSN   1           SET SUBSYSTEM STATUS 
 GTSF     BSSN   1           GET TMS STATUS 
 TPDF     BSSN   1           TRANSFER RESOURCE PREVIEW DATA 
  
 MXFN     BSSN   0           END OF *SFM* FUNCTION CODES
          SPACE  4,10 
***       *RSDF* PARAMETER WORD.
* 
*T, FA    12/  SF,12/  P1,12/  P2,6/,18/  RA
*         SF     SUBFUNCTION CODE 
*         P1     PARAMETER
*         P2     PARAMETER
*         RA     ADDRESS TO RETURN SYSTEM DATA
          SPACE  4,10 
**        *RSDF* SUBFUNCTION CODES. 
  
  
 BEGIN    BSSN   1
  
 RDDF     BSSN   1           RETURN DAYFILE DATA FROM LOCAL AREA SECTOR 
 SDIF     BSSN   1           STATISTICAL DATA INFORMATION 
 PDAF     BSSN   1           *PROBE* DATA TABLES
 PDLF     BSSN   1           *PROBE* DATA TABLE LENGTH
 RFDF     BSSN   1           RETURN *FOTD* DATA 
 RSSF     BSSN   1           RETURN SUBSYSTEM DATA
 RSCF     BSSN   1           RETURN *SCT* DATA
 RCIF     BSSN   1           RETURN/UPDATE SYSTEM SERVICE CLASS DATA
 IOSF     BSSN   1           RETURN BUFFER I/O STATISTICS 
  
 MXSF     BSSN   0           END OF *RSDF* SUBFUNCTION CODES
          SPACE  4,10 
**        *SPTF* SUBFUNCTION CODES. 
  
 BEGIN    BSSN   0
 SPAF     BSSN   1           SET PID ATTRIBUTES 
 SNSF     BSSN   1           SET NETWORK STATUS 
 SMFF     BSSN   1           SET MAINFRAME DESCRIPTION
 ALDF     BSSN   1           ADD LID
 DLDF     BSSN   1           DELETE LID 
 SLTF     BSSN   1           SET LID ATTRIBUTES 
  
 MXSP     BSSN   0           END OF *SPTF* SUBFUNCTION CODES
          SPACE  4,10 
**        *SFM* ERROR CODE DEFINITIONS. 
  
  
          QUAL   ERR
 BEGIN    BSSN   0
  
 CMP      BSSN   1           REQUEST COMPLETE (NO ERROR)
 DFB      BSSN   1           DAYFILE BUSY 
 TKL      BSSN   1           TRACK LIMIT
 FNF      BSSN   1           FILE NOT FOUND 
 RMS      BSSN   1           RMS ERROR
 CNF      BSSN   1           *CPD* NOT ACTIVE 
 LTL      BSSN   1           LID TABLE TOO LONG FOR BUFFER
 LNL      BSSN   1           LID NOT LEGAL
 ILA      BSSN   1           INVALID LID ATTRIBUTE
 LOA      BSSN   1           CURRENT ATTRIBUTES NOT IN TABLE
 LTO      BSSN   1           LID TABLE OVERFLOW 
 TMH      BSSN   1           TOO MANY HOST LIDS 
 IFC      BSSN   1           INCORRECT SUBFUNCTION CODE 
 IST      BSSN   1           INCORRECT ST PARAMETER 
 CPB      BSSN   1           CHECK PARAMETER BLOCK ENTRIES FOR ERROR
  
 MXSE     BSSN   0           END OF *SFM* ERRORS
          QUAL   *
          SPACE  4,10 
**        NETWORK STATUS CODES FOR *LID* TABLE. 
  
  
          QUAL   NTS
 BEGIN    BSSN   0
  
 NAV      BSSN   1           NETWORK NOT AVAILABLE
 ISV      BSSN   1           PATH IN SERVICE
 OSV      BSSN   1           PATH OUT OF SERVICE
 RS3      BSSN   1           RESERVED FOR CDC 
 RS4      BSSN   1           RESERVED FOR CDC 
 RS5      BSSN   1           RESERVED FOR CDC 
 RS6      BSSN   1           RESERVED FOR CDC 
 RS7      BSSN   1           RESERVED FOR CDC 
 DAB      BSSN   1           PATH DISABLED BY OPERATOR
 MXTS     BSSN   0           END OF NETWORK STATUS CODES
 END      BSSN
          QUAL   *
          SPACE  4,10 
**        NETWORK STATUS BITS.
  
  
 NANS     EQU    1           NAM
 RHNS     EQU    2           RHF
 SSNS     EQU    4           SSF
          SPACE  4,10 
          BASE   *
          ENDX
