cdc:nos2.source:opl.opl871:common:combmap
Common COMBMAP
Library Member Format: MODIFY
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M00S00001.combmap +++| 00002 M00S00002.combmap +++|# COMBMAP - SMMAP DEFINITIONS AND DECLARATIONS. # 00003 M00S00003.combmap +++| CONTROL NOLIST; 00004 M00S00004.combmap +++| CONTROL IFEQ LISTCON,1; 00005 M00S00005.combmap +++| CONTROL LIST; 00006 M00S00006.combmap +++| CONTROL FI; 00007 M00S00007.combmap +++| BEGIN # COMBMAP # 00008 M00S00008.combmap +++| 00009 M00S00009.combmap +++|# 00010 M00S00010.combmap +++|*** COMBMAP - SMMAP DEFINITIONS AND DECLARATIONS. 00011 M00S00011.combmap +++|* 00012 M00S00012.combmap +++|* COMBMAP CONTAINS THE DEFINITIONS, DECLARATIONS, AND 00013 M00S00013.combmap +++|* STATUS LISTS NEEDED FOR SMMAP PROCESSING. 00014 M00S00014.combmap +++|# 00015 M00S00015.combmap +++| 00016 M00S00016.combmap +++| 00017 M00S00017.combmap +++|# 00018 M00S00018.combmap +++|** CUBSTAT - STATUS LIST OF CODES TO INDICATE THE STATUS OF A 00019 M00S00019.combmap +++|* COORDINATE POSITION IN A STORAGE MODULE. 00020 M00S00020.combmap +++|# 00021 M00S00021.combmap +++| 00022 M00S00022.combmap +++| STATUS CUBSTAT 00023 M00S00023.combmap +++| UNASGN, # POSITION UNASSIGNED # 00024 M00S00024.combmap +++| CEUSE, # RESERVED FOR CE USE # 00025 M00S00025.combmap +++| SYSUSE, # RESERVED FOR SYSTEM USE # 00026 M00S00026.combmap +++| ALTCSU, # RESERVED FOR ALTERNATE SMMAP # 00027 M00S00027.combmap +++| SCRPOOL, # ASSIGNED TO SCRATCH POOL # 00028 M00S00028.combmap +++| SUBFAM, # ASSIGNED TO A SUB FAMILY # 00029 M00S00029.combmap +++| NOCUBE, # NO CUBICLE AT THIS POSITION # 00030 M00S00030.combmap +++| ENDSTAT; # END OF STATUS LIST # 00031 M00S00031.combmap +++| 00032 M00S00032.combmap +++| DEF MAPENTL # 3 #; # MAP ENTRY LENGTH # 00033 M00S00033.combmap +++| DEF NOCUBES #352#; # NO OF CUBICLES TOTAL # 00034 M00S00034.combmap +++| 00035 M00S00035.combmap +++|# 00036 M00S00036.combmap +++|* SMORD COMPUTES THE MAP ENTRY ORDINAL FROM THE Z AND Y 00037 M00S00037.combmap +++|* COORDINATES OF THE UCP REQUEST. 00038 M00S00038.combmap +++|# 00039 M00S00039.combmap +++| 00040 M00S00040.combmap +++| DEF SMORD # MAXORD - CPR$Z - (CPR$Y * (MAX$Z+1)) #; 00041 M00S00041.combmap +++| 00042 M00S00042.combmap +++| COMMON BMAPCOM; 00043 M00S00043.combmap +++| 00044 M00S00044.combmap +++| BEGIN # BMAPCOM # 00045 M00S00045.combmap +++| 00046 M00S00046.combmap +++| BASED 00047 M00S00047.combmap +++| ARRAY SMUMAP [0:0] S(MAPENTL); 00048 M00S00048.combmap +++| BEGIN 00049 M00S00049.combmap +++| ITEM CM$WRD1 U(00,00,60); # ENTRY WORD 1 # 00050 M00S00050.combmap +++| ITEM CM$CODE U(00,00,06); # ENTRY USE # 00051 M00S00051.combmap +++| ITEM CM$FCTORD U(00,06,12); # FCT ORDINAL # 00052 M00S00052.combmap +++| ITEM CM$FMLYNM C(00,18,07); # FAMILY NAME # 00053 M00S00053.combmap +++| 00054 M00S00054.combmap +++| ITEM CM$WRD2 U(01,00,60); # ENTRY WORD 2 # 00055 M00S00055.combmap +++| ITEM CM$FLAG1 B(01,00,01); # ERROR FLAG # 00056 M00S00056.combmap +++| ITEM CM$FLAG2 B(01,01,01); # UNUSED FLAG # 00057 M00S00057.combmap +++| ITEM CM$FLAG3 B(01,02,01); # UNUSED FLAG # 00058 M00S00058.combmap +++| ITEM CM$FLAG4 B(01,03,01); # UNUSED FLAG # 00059 M00S00059.combmap +++| ITEM CM$FLAG5 B(01,04,01); # UNUSED FLAG # 00060 M00S00060.combmap +++| ITEM CM$FLAG6 B(01,05,01); # UNUSED FLAG # 00061 M00S00061.combmap +++| ITEM CM$SUB U(01,06,06); # SUB FAMILY DESIGNATOR # 00062 M00S00062.combmap +++| ITEM CM$SMID U(01,12,06); # *SM* NUMBER # 00063 M00S00063.combmap +++| ITEM CM$FREE1 U(01,18,36); # UNUSED FIELD # 00064 M00S00064.combmap +++| ITEM CM$WRD3 U(02,00,60); # ENTRY WORD THREE # 00065 M00S00065.combmap +++| ITEM CM$CCOD C(02,00,02); # CARTRIDGE MAKER IDENT # 00066 M00S00066.combmap +++| ITEM CM$CSND C(02,12,08); # VSN OF CARTRDIGE # 00067 M00S00067.combmap +++| ITEM CM$TCSN C(02,00,10); # TOTAL CSN OF CARTRIDGE # 00068 M00S00068.combmap +++| END 00069 M00S00069.combmap +++| 00070 M00S00070.combmap +++|# 00071 M00S00071.combmap +++|** 00072 M00S00072.combmap +++|* ERRSTAT IS WHERE ERRORS ARE RETURNED FROM THE CATALOG AND MAP 00073 M00S00073.combmap +++|* ACCESS ROUTINES. 00074 M00S00074.combmap +++|# 00075 M00S00075.combmap +++| 00076 M00S00076.combmap +++| ITEM ERRSTAT U; # STATUS FROM MAP/CAT ACCESS # 00077 M00S00077.combmap +++| 00078 M00S00078.combmap +++|# 00079 M00S00079.combmap +++|* MAPBUFR IS A 3 WORD BUFFER TO RECEIVE THE MAP ENTRY FROM THE 00080 M00S00080.combmap +++|* ACCESS ROUTINES. 00081 M00S00081.combmap +++|# 00082 M00S00082.combmap +++| 00083 M00S00083.combmap +++| ARRAY MAPBUFR [0:0] S(MAPENTL); 00084 M00S00084.combmap +++| BEGIN 00085 M00S00085.combmap +++| ITEM MAPWRD1 U(00,00,60); # FIRST WORD OF MAP ENTRY # 00086 M00S00086.combmap +++| ITEM MAPWRD2 U(01,00,60); # SECOND WORD OF MAP ENTRY # 00087 M00S00087.combmap +++| END 00088 M00S00088.combmap +++| 00089 M00S00089.combmap +++| END # BMAPCOM # 00090 M00S00090.combmap +++| 00091 M00S00091.combmap +++| END # COMBMAP # 00092 M00S00092.combmap +++| 00093 M00S00093.combmap +++| CONTROL LIST;
cdc/nos2.source/opl.opl871/common/combmap.txt · Last modified: (external edit)