READ [ICL George 3]

This page is read only. You can view the source, but not change it. Ask your administrator if you think this is wrong.
{{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: READ)}}
====== READ ======
(GIN Macro)

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

**Used in:** [[george:source:ABANDONA867|ABANDONA867]], [[george:source:ARCHIVE867|ARCHIVE867]], [[george:source:ASSIGN860|ASSIGN860]], [[george:source:ATTACHC867|ATTACHC867]], [[george:source:BACKMASS860|BACKMASS860]], [[george:source:BEXTRA83|BEXTRA83]], [[george:source:BEXTSJ84|BEXTSJ84]], [[george:source:BMAPTWO860|BMAPTWO860]], [[george:source:BMFIXIT864|BMFIXIT864]], [[george:source:BMOUTPUT867|BMOUTPUT867]], [[george:source:BMSAVJOB864|BMSAVJOB864]], [[george:source:BMSJRNL866|BMSJRNL866]], [[george:source:BSTS867|BSTS867]], [[george:source:CAFSPERI867|CAFSPERI867]], [[george:source:CHINTEG867|CHINTEG867]], [[george:source:CLOSFREZ867|CLOSFREZ867]], [[george:source:COMPRO867|COMPRO867]], [[george:source:COMPROB867|COMPROB867]], [[george:source:CREALEX864|CREALEX864]], [[george:source:DEWELL867|DEWELL867]], [[george:source:DIRENT867|DIRENT867]], [[george:source:DTSUBSS867|DTSUBSS867]], [[george:source:DTWRONG867|DTWRONG867]], [[george:source:EDITOR867|EDITOR867]], [[george:source:EDITORA865|EDITORA865]], [[george:source:EDITPT867|EDITPT867]], [[george:source:EDOBJ864|EDOBJ864]], [[george:source:ERASEA867|ERASEA867]], [[george:source:FHOBJDIR860|FHOBJDIR860]], [[george:source:FINDOC867|FINDOC867]], [[george:source:FINDRUM866|FINDRUM866]], [[george:source:HLSEMS864|HLSEMS864]], [[george:source:INCFIN864|INCFIN864]], [[george:source:INCMON865|INCMON865]], [[george:source:INCOBS867|INCOBS867]], [[george:source:INMOP867|INMOP867]], [[george:source:INPUTJDF82|INPUTJDF82]], [[george:source:IPALL864|IPALL864]], [[george:source:IPBPM84|IPBPM84]], [[george:source:JWELLTWO867|JWELLTWO867]], [[george:source:LDSTART850|LDSTART850]], [[george:source:LIBINSEC864|LIBINSEC864]], [[george:source:LIBLOAD867|LIBLOAD867]], [[george:source:LIBREQCA867|LIBREQCA867]], [[george:source:LISTDIR867|LISTDIR867]], [[george:source:LISTFIND867|LISTFIND867]], [[george:source:LISTFNDA865|LISTFNDA865]], [[george:source:LOADFIN860|LOADFIN860]], [[george:source:MESSCB|MESSCB]], [[george:source:MESSCF|MESSCF]], [[george:source:MESSDC|MESSDC]], [[george:source:MESSG|MESSG]], [[george:source:MTCODE864|MTCODE864]], [[george:source:MTOBJ864|MTOBJ864]], [[george:source:NAMEPRIV|NAMEPRIV]], [[george:source:OPENREL865|OPENREL865]], [[george:source:OPENWORK866|OPENWORK866]], [[george:source:ORELHALF82|ORELHALF82]], [[george:source:ORELMAIN867|ORELMAIN867]], [[george:source:PERUSFIL84|PERUSFIL84]], [[george:source:PNTLAST860|PNTLAST860]], [[george:source:RAND864|RAND864]], [[george:source:READFILE84|READFILE84]], [[george:source:RELIEF866|RELIEF866]], [[george:source:RENAMDIR|RENAMDIR]], [[george:source:RENAME864|RENAME864]], [[george:source:RENAMEMT867|RENAMEMT867]], [[george:source:RESTERR864|RESTERR864]], [[george:source:SENTINEL8|SENTINEL8]], [[george:source:SETJD867|SETJD867]], [[george:source:SETPC867|SETPC867]], [[george:source:SETPF867|SETPF867]], [[george:source:SETPRAMA867|SETPRAMA867]], [[george:source:SETPRAMB867|SETPRAMB867]], [[george:source:TRAPLIST864|TRAPLIST864]], [[george:source:TRIPB83|TRIPB83]], [[george:source:USERLIB867|USERLIB867]], [[george:source:USERTYPE83|USERTYPE83]], [[george:source:WA864|WA864]], [[george:source:WAIT867|WAIT867]], [[george:source:WHATRVSA867|WHATRVSA867]], [[george:source:WHTSTAT867|WHTSTAT867]], [[george:source:WLC867|WLC867]], [[george:source:WLD864|WLD864]], [[george:source:WLOUT865|WLOUT865]], [[george:source:WTSTAT867|WTSTAT867]]

<code - READ.mac.txt>
 7#7# ...[??? READ SECT FILE FGN 19 DOC  
 7#C6    #MAC  READ  
 7#WQ    #STR  %A
 7*BB    #SKI
 7*W2          DOWN  READFILE,21 
 7B*L    #STR  %A
 7BT=    (   
 7C#W          LDCT  0  %A   
 7CSG          SMO      FX2  
 7D#6          STO   0  ACOMMUNE7
 7DRQ          DOWN  READFILE,1  
 7F?B    )   
 7FR2    #NOR
</code>