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

**Defined in:** [[george:source:MACROS_SHFSA|MACROS SHFSA]]

**Used in:** [[george:source:ABANDON867|ABANDON867]], [[george:source:ACTPRI867|ACTPRI867]], [[george:source:ADDJOB867|ADDJOB867]], [[george:source:ANSCOM865|ANSCOM865]], [[george:source:ATTRIBUT867|ATTRIBUT867]], [[george:source:BCAST867|BCAST867]], [[george:source:BMSAVJOB864|BMSAVJOB864]], [[george:source:CANTDO867|CANTDO867]], [[george:source:CLOSEMT867|CLOSEMT867]], [[george:source:CONNECT867|CONNECT867]], [[george:source:CONNECTA867|CONNECTA867]], [[george:source:CONSOLE867|CONSOLE867]], [[george:source:CONSROOT867|CONSROOT867]], [[george:source:COPYA867|COPYA867]], [[george:source:DEAD867|DEAD867]], [[george:source:DELCON867|DELCON867]], [[george:source:DEWELL867|DEWELL867]], [[george:source:DICTWELL867|DICTWELL867]], [[george:source:DSCNCT867|DSCNCT867]], [[george:source:ERASE867|ERASE867]], [[george:source:FHDIRTWO864|FHDIRTWO864]], [[george:source:FINISH867|FINISH867]], [[george:source:FINISHB867|FINISHB867]], [[george:source:FREEPER867|FREEPER867]], [[george:source:FREEZE864|FREEZE864]], [[george:source:GETFREE867|GETFREE867]], [[george:source:HLSEVENT867|HLSEVENT867]], [[george:source:HLSREAD867|HLSREAD867]], [[george:source:INCOM864|INCOM864]], [[george:source:INITJOB867|INITJOB867]], [[george:source:INSTPARA867|INSTPARA867]], [[george:source:IPALL864|IPALL864]], [[george:source:IPBCCC867|IPBCCC867]], [[george:source:IPBLISTD867|IPBLISTD867]], [[george:source:IPBSCANB867|IPBSCANB867]], [[george:source:JDTWO864|JDTWO864]], [[george:source:JWELLONE867|JWELLONE867]], [[george:source:JWELLTWO867|JWELLTWO867]], [[george:source:LIBCOM867|LIBCOM867]], [[george:source:LIBLOADB867|LIBLOADB867]], [[george:source:LIBREQC867|LIBREQC867]], [[george:source:LIBREQCA867|LIBREQCA867]], [[george:source:LIBSEC867|LIBSEC867]], [[george:source:LISTFIND867|LISTFIND867]], [[george:source:LISTFREE867|LISTFREE867]], [[george:source:LISTINIT867|LISTINIT867]], [[george:source:LISTINTC865|LISTINTC865]], [[george:source:LISTNEXT867|LISTNEXT867]], [[george:source:LISTOPEN867|LISTOPEN867]], [[george:source:LISTPARS867|LISTPARS867]], [[george:source:LISTPROC867|LISTPROC867]], [[george:source:LISTSEAR867|LISTSEAR867]], [[george:source:LOGANAL864|LOGANAL864]], [[george:source:LOGOUT867|LOGOUT867]], [[george:source:MONFILEA864|MONFILEA864]], [[george:source:MOVCART867|MOVCART867]], [[george:source:NEWA867|NEWA867]], [[george:source:NEWDIR867|NEWDIR867]], [[george:source:NEWOWN865|NEWOWN865]], [[george:source:NEWPW867|NEWPW867]], [[george:source:NORMALUS864|NORMALUS864]], [[george:source:PERFCHAP866|PERFCHAP866]], [[george:source:PROCONTX867|PROCONTX867]], [[george:source:PROPERTY867|PROPERTY867]], [[george:source:REALTIME867|REALTIME867]], [[george:source:RENAME864|RENAME864]], [[george:source:RETURN867|RETURN867]], [[george:source:RETURNIT867|RETURNIT867]], [[george:source:RITEFAIL864|RITEFAIL864]], [[george:source:SAVE864|SAVE864]], [[george:source:SAVEJOB865|SAVEJOB865]], [[george:source:SCHDJOBA867|SCHDJOBA867]], [[george:source:SETUP867|SETUP867]], [[george:source:SETUPARA867|SETUPARA867]], [[george:source:SJLOOP864|SJLOOP864]], [[george:source:SYSPROP867|SYSPROP867]], [[george:source:TRANFAIL866|TRANFAIL866]], [[george:source:TRAPCHEC867|TRAPCHEC867]], [[george:source:TRAPGO864|TRAPGO864]], [[george:source:UNSAVE867|UNSAVE867]], [[george:source:WA864|WA864]], [[george:source:WHATJBS867|WHATJBS867]], [[george:source:WHTSTAT867|WHTSTAT867]], [[george:source:WLC867|WLC867]], [[george:source:WSJOBS867|WSJOBS867]], [[george:source:WSJOBSA867|WSJOBSA867]], [[george:source:WSPERIS867|WSPERIS867]]

<code - FSHENTRY.mac.txt>
 66S2    [???  FSHENTRY SECT FILE FGN 1 DOC  
 67?L    #MAC  FSHENTRY  
 67R=    #STR  K,%A  
 68=W    #SKI
 68QG    (   
 69=6    #UNS  FSHA^FSHB 
 69PQ    #SKI
 6=9B          SEGENTRY %A,(GEOERR)  
 6=P2    #UNS  FSHA  
 6?8L    (   
 6?N=    #UNS  FSHB  
 6#7W    (   
 6#MG    #STR  %D
 6*76          SEGENTRY %A,%D
 6*LQ    #STR  %D
 6B6B    #SKI
 6BL2          SEGENTRY %A,(GEOERR)  
 6C5L    )   
 6CK=    #UNS  FSHB  
 6D4W    #SKI
 6DJG    (   
 6F46    #STR  %B
 6FHQ          SEGENTRY %A,%B
 6G3B    #STR  %B
 6GH2    #SKI
 6H2L          SEGENTRY %A,(GEOERR)  
 6HG=    )   
 6H^W    )   
 6JFG    #UNS  FSHB  
 6J^6    (   
 6KDQ    #UNS  FSHA  
 6KYB    #SKI
 6LD2    (   
 6LXL    #STR  %C
 6MC=          SEGENTRY %A,%C
 6MWW    #STR  %C
 6NBG    #SKI
 6NW6          SEGENTRY %A,(GEOERR)  
 6P*Q    )   
 6PTB    )   
 6Q*2    )   
 6QSL    #STR  K,%A  
 6R#=    !     %A MUST BE THE ENTRY POINT
 6RRW    #NOR
</code>