Common COMAPFS

1 Modification
Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M01S00001.comapfs +++|
00002  M01S00002.comapfs +++|                                                                      #
00003  M01S00003.comapfs +++|          CTEXT COMAPFS - *PF* ROUTINE RETURN CODE STATUS.
00004  M01S00004.comapfs +++|                                                                      #
00005  M01S00005.comapfs +++|
00006  M01S00006.comapfs +++|                                               CONTROL NOLIST;
00007  M01S00007.comapfs +++|                                               CONTROL IFEQ LISTCON,1;
00008  M01S00008.comapfs +++|                                               CONTROL LIST;
00009  M01S00009.comapfs +++|                                               CONTROL FI;
00010  M01S00010.comapfs +++|
00011  M01S00011.comapfs +++|                             BEGIN  # COMAPFS #
00012  M01S00012.comapfs +++|
00013  M01S00013.comapfs +++|                                                                      #
00014  M01S00014.comapfs +++|
00015  M01S00015.comapfs +++|***       COMAPFS - *PF* ROUTINE RETURN CODE STATUS.
00016  M01S00016.comapfs +++|*
00017  M01S00001.281l803 +++|*     COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
00018  M01S00002.281l803 +++|*
00019  M01S00017.comapfs +++|*         *COMAPFS* CONTAINS A STATUS WORD FOR THE *PF* ROUTINE IN
00020  M01S00018.comapfs +++|*         *CPUREL* TO RETURN AN ERROR CODE TO.  THIS STATUS WORD
00021  M01S00019.comapfs +++|*         MUST BE USED BY ALL *MSSEXEC* ROUTINES THAT USE THE
00022  M01S00020.comapfs +++|*         ROUTINE *PFD*, WHICH INTERFACES TO THE *PF* ROUTINE.
00023  M01S00021.comapfs +++|
00024  M01S00022.comapfs +++|          USE    /APFSCOM/
00025  M01S00023.comapfs +++| PFSTAT   BSS    1
00026  M01S00024.comapfs +++|          USE
00027  M01S00025.comapfs +++|          COL    12
00028  M01S00026.comapfs +++|                                                                      #
00029  M01S00027.comapfs +++|
00030  M01S00028.comapfs +++|           COMMON APFSCOM;
00031  M01S00029.comapfs +++|             BEGIN  # APFSCOM #
00032  M01S00030.comapfs +++|             ITEM PFSTAT     I;      # *PF* RETURN CODE STATUS #
00033  M01S00031.comapfs +++|             END  # APFSCOM #
00034  M01S00032.comapfs +++|
00035  M01S00033.comapfs +++|           END  # COMAPFS #
00036  M01S00034.comapfs +++|
00037  M01S00035.comapfs +++|                                                                      #
00038  M01S00036.comapfs +++|          COL    30
00039  M01S00037.comapfs +++|          ENDX
00040  M01S00038.comapfs +++|                                                                      #
00041  M01S00039.comapfs +++|
00042  M01S00040.comapfs +++|                                               CONTROL LIST;