Type ASSEMBLE
Source Lines : 576
Fixes Applied : 1
Most Recent Version : Tuesday, December 12, 1978
Last Fix ID : [R10248DS]

Module

      DMSOR1                                                 *
                                                             *

Function

      THE FUNCTION OF DMSOR1 IS TO RELOCATE ALL DTF TABLE    *
      ADDRESS CONSTANTS FROM THE ASSEMBLED ADDRESSES TO      *
      EXECUTABLE STORAGE ADDRESSES.  THIS IS ACCOMPLISHED BY *
      SUBTRACTING FROM THE BAL ADDRESS PROVIDED BY THE       *
      OPENR MACRO IN REGISTER 0 A FOUR BYTE ASSEMBLED        *
      ADDRESS CONSTANT OF THE BAL ADDRESS.  ANY DIFFERENCE   *
      INDICATES THAT THE PROGRAM HAS BEEN RELOCATED.         *
                                                             *

Attributes

      DISCONTIGUOUS SHARED SEGMENT                           *
      REENTRANT                                              *
                                                             *

Operation

      DMSOR1 PERFORMS THE FOLLOWING FUNCTIONS:               *
                         1.  DETERMINES IF RELOCATION IS RE- *
                             QUIRED.  IF NOT EXIT IS MADE TO *
                             $$BOPEN TO OPEN THE FILE.       *
                                                             *
                         2.  IF ADDRESS MODIFICATION IS RE-  *
                             QUIRED, THE CCB AND LOGIC MODULE*
                             ADDRESSES WHICH ARE COMMON TO   *
                             ALL DTFS ARE MODIFIED.          *
                                                             *
                                                             *
                         3.  DETERMINES WHAT DTF TYPE IS THE *
                             OBJECT OF THE OPENR MACRO.      *
                                                             *
                             IF UNIT RECORD DTF TYPE, ISSUES *
                             SVC 2 TO FETCH $$BOPNR3 TO      *
                             CONTINUE ADDRESS MODIFICATION.  *
                                                             *
                             IF DTFCP OR DTFDI, ISSUES SVC 2 *
                             TO FETCH $$BOPNR3 TO CONTINUE   *
                             ADDRESS MODIFICATION.           *
                                                             *
                             ALL OTHER DTF TYPES  - INCLUDING*
                             DTFMT AND DTFSD  - ADDRESS      *
                             MODIFICATION IS PERFORMED IN    *
                             THIS ROUTINE.                   *
                                                             *
                         4.  A CHECK IS MADE TO SEE IF MORE  *
                             FILES REMAIN TO BE OPENED.  IF  *
                             SO, ADDRESS MODIFICATION IS PER-*
                             FORMED ON THOSE DTFS AND THEN AN*
                             SVC 2 IS ISSUED TO FETCH $$BOPEN*
                             TO PERFORM THE ACTUAL OPEN.     *

Calls to Other Routines

      DMSOR3 (SVC 2)                                         *
      DMSBOP (SVC 2)                                         *
      DMSFREB                                                *
                                                             *