{{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: PMSCFREAD)}}
====== PMSCFREAD ======
(GIN Macro)

**Defined in:** [[george:source:PMACS|PMACS]]

**Used in:** [[george:source:PMACT867|PMACT867]], [[george:source:PMCHAP867|PMCHAP867]], [[george:source:PMCHECK867|PMCHECK867]]

<code - PMSCFREAD.mac.txt>
 3DBN ...[??? PMSCFREA SECT DIAG FGN 109 DOC 
 3DTL    #MAC  PMSCFREAD                    [M.C.D. MANN 
 3F#J    [   
 3FRG    [   
 3G=D    [     ***************   
 3GPB    [     *  PMSCFREAD  *   
 3H8#    [     ***************   
 3HM=    [   
 3J68    [   
 3JK6    [      B/S TRANSFER MACRO TO READ   
 3K44    [      FROM SCF DEVICE  
 3KH2    [   
 3K^Y ...[    %A  COUNT  
 3LDW    [    %B  START ADDRESS IN CORE  
 3LXS    [    %C  UNDATUMISED B/S ADDRESS
 3M4R ...[   
 3M9Q ...[     THIS MACRO IS USED BY PMACT AND PMCHECK   
 3MBQ    [   
 3PPD          SMO      FXPMDR   
 3Q94 ...      LDX   7  JSCFPTR             [SET UP POINTER IN GEOBSPTR  
 3QNN ...      STO   7  GEOBSPTR            [TO THE SCF DEVICE LIST  
 3RK8          LDN   7  6
 3S5B          ADS   7  BINDEX   
 3SHQ ...      PMBSADD GEO,0,%A,%B,%C       [READ FROM THE SCF   
 3T26          LDN   7  6
 3TDG          SBS   7  BINDEX   
 3XNB          SMO      FXPMDR   
 3Y82 ...      LDX   7  JSCFGEODMP          [SET UP POINTER IN GEOBSPTR  
 3YML ...      STO   7  GEOBSPTR            [TO THE ICF DEVICE LIST  
 42BL    #NOR
</code>