ARD TITLE 'DMSARD (CMS) VM/370 - RELEASE 6' 00001000
SPACE 2 00002000
*. 00003000
* MODULE NAME - 00004000
* 00005000
* DMSARD 00006000
* 00007000
* FUNCTION - 00008000
* 00009000
* TO PROVIDE STORAGE FOR THE 3705 ASSEMBLER AUXILLARY DIRECTORY 00010000
* 00011000
* ATTRIBUTES - 00012000
* 00013000
* LOADED WITH THE 3705 XF ASSEMBLER 00014000
* 00015000
* ENTRY POINTS - 00016000
* 00017000
* DMSARD 00018000
* 00019000
* ENTRY CONDITIONS - 00020000
* 00021000
* N/A 00022000
* 00023000
* EXIT CONDITIONS - 00024000
* 00025000
* N/A 00026000
* 00027000
* CALLS TO OTHER ROUTINES - 00028000
* 00029000
* N/A 00030000
* 00031000
* EXTERNAL REFERENCES - 00032000
* 00033000
* NONE 00034000
* 00035000
* TABLES / WORKAREAS - 00036000
* 00037000
* N/A 00038000
* 00039000
* REGISTER USAGE - 00040000
* 00041000
* N/A 00042000
* 00043000
* NOTES - 00044000
* 00045000
* DMSARD CONTAINS NO EXECUTABLE CODE. IT MUST BE LOADED WITH 00046000
* DMSARX AND THEN THE GENDIRT COMMAND MUST BE ISSUED TO FILL IN 00047000
* THE AUXILLARY DIRECTORY ENTRIES. THE GENMOD COMMAND MUST THEN 00048000
* BE ISSUED TO CREATE THE ASM3705 MODULE. 00049000
* 00050000
* OPERATION - 00051000
* 00052000
* N/A 00053000
*. 00054000
EJECT 00055000
DMSARD START 0 @V201201 00056000
DC F'40' @V201201 00057000
DC A(DIRTEND-DIRTBEG) @V201201 00058000
DIRTBEG EQU * @V201201 00059000
DMSFST CWAX00 @V201201 00060000
DMSFST CWAX01 @V201201 00061000
DMSFST CWAX02 @V201201 00062000
DMSFST CWAX03 @V201201 00063000
DMSFST CWAX04 @V201201 00064000
DMSFST CWAX05 @V201201 00065000
DMSFST CWAX06 @V201201 00066000
DMSFST CWAX07 @V201201 00067000
DMSFST CWAX11 @V201201 00068000
DMSFST CWAX21 @V201201 00069000
DMSFST CWAX31 @V201201 00070000
DMSFST CWAX41 @V201201 00071000
DMSFST CWAX51 @V201201 00072000
DMSFST CWAX61 @V201201 00073000
DMSFST CWAX62 @V201201 00074000
DC 2A(0) @V201201 00075000
DIRTEND EQU * @V201201 00076000
END 00077000