FSHTEST

(GIN Macro)

Defined in: MACROS SHFSA

Used in: ABANDONA867, BMSJRNL866, EMSENTER867, GETBAX865, GETFREE867, LISTFIND867, MOVCART867, NEWINST867, PMCHAINS864, PMFSB84, PMSUMA867, REGEN865, SCHEDIN867, SETLIST864, SETUP867, SETUPA867, SETUPB867, TRANFAIL866

FSHTEST.mac.txt
 3W3W    [???  FSHTEST SECT FILE FGN 1 DOC   
 3WHG    #MAC  FSHTEST   
 3X36    #     NOTE: FSHNOIPB IS NOT SET WITHIN THIS EDF!
 3XGQ    #   
 3Y2B          FCMENDV   
 3YG2    #   
 3Y^L    #   
 3^F=    #     THE FIXED CORE STATUS WORD FOR THE SHARED FILESTORE   
 3^YW    #     IPB LINK ROUTINES 
 42DG    #   
 42Y6    FSHBSTATE      +0   
 43CQ    #   
 43XB    FSHREPA        +0   
 44C2    FSHREPB        +0   
 44WL    #   
 45B=    #   
 45TW    FSHINBPTR      +0                  [POINTER TO INPUT BUFFER IN MACHINE B
 46*G    #   
 46T6    #   
 47#Q    BMISCB         +BMISCB             [ BASE OF 'B'S MISC CHAIN
 47SB                   +BMISCB  
 48#2    #   
 48RL    #   
 49?=    BJOBQB         +BJOBQB             [BASE OF B'S JOB QUEUE   
 49QW                   +BJOBQB  
 4==G    #   
 4=Q6    #   
 4?9Q    CXBMI          +BMISCB             [POINTER TO BASE OF OTHER MISC CHAIN 
 4?PB    CXBJO          +BJOBQB             [POINTER TO BASE OF OTHER JOB QUEUE  
 4#92    CXCFI          +BFILE              [POINTER TO BASE OF CURRENT FILE CHAI
 4#NL    #   
 4*8=    #   
 4*MW    BCHAINSWOPS    +0                  [NUMBER OF TIMES COORDINATOR CHANGES 
 4B7G    #                                  [THE MACHINES OVER   
 4BM6    #   
 4BR3 ...JBIGPROGCP       +0 
 4BWY ...#                                 [OTHER MC'S BIGPROGCP 
 4C2T ...#   
 4C6Q          FCENDV
 4CLB    #   
 4D62          CXMEND
 4DKL          JBS      SMCB,2,BFSHACTB     [J IF ACTIVITY FOR MACHINE B 
 4F5=          JBSC     SWOPMCS,,BFSHB      [J IF MACHINE RUNNING & INVERT BIT   
 4FJW          BRN      NOSWOPMCS           [ACTIVITY IN CURRENTLY RUNNING M/C   
 4G4G    SMCB
 4GJ6          JBCS     SWOPMCS,,BFSHB      [J IF MACHINE A RUNNING & INVERT BIT 
 4H3Q          BRN      NOSWOPMCS           [ACTIVITY IN CURRENTLY RUNNING M/C   
 4HHB    SWOPMCS 
 4J32          CHAINSWOP  BFILE,BIPL        [SWOP OVER FILE CHAINS   
 4JGL          CHAINSWOP  BJOBQ,BJOBQB      [SWOP OVER JOB QUEUE CHAINS  
 4K2=          CHAIND     BMISC,BMISCB      [ RECHAIN APERI/APIA TO OTHER CHAIN  
 4KFW          CHAINSWOP  BMISC,BMISCB      [ SWOP OVER MISCELL. CHAINS  
 4K^G          LDX   3  FSHINPTR            [SWOP OVER POINTERS  
 4LF6          LDX   4  FSHINBPTR           [     TO TRANSFER
 4LYQ          STO   3  FSHINBPTR           [     INPUT BUFFERS  
 4MDB          STO   4  FSHINPTR 
 4MY2          LDX   3  FSHSTATE            [SWOP OVER THE   
 4NCL          LDX   4  FSHBSTATE           [     FIXED CORE 
 4NX=          STO   3  FSHBSTATE           [     STATUS WORDS   
 4PBW          STO   4  FSHSTATE 
 4PWG    SWOPFSHIPS  
 4QB6          CALL  1  SWOPIPS             [X1 WILL CONTAIN PTR TO START OF TABL
 4QTQ          +0+INSTPARAM  
 4R*B          +JMANAGER0
 4RT2          +1+INSTPARAM  
 4S#L          +JMANAGER1
 4SS=          +2+INSTPARAM  
 4T?W          +JMANAGER2
 4TRG          +3+INSTPARAM  
 4W?6          +JMANAGER3
 4WQQ          +4+INSTPARAM  
 4X=B          +JMANAGER4
 4XQ2          +5+INSTPARAM  
 4Y9L          +JMANAGER5
 4YP=          +6+INSTPARAM  
 4^8W          +JMANAGER6
 4^NG          +7+INSTPARAM  
 5286          +JMANAGER7
 52MQ          +COBJQUOTA
 537B          +JOBJQUOTA
 53M2          +IMOPLIMIT
 546L          +JMOPLIMIT
 54L=          +BACKGROUND   
 555W          +JBACKGROUND  
 55KG          +IMOPCPI  
 5656          +JMOPCPI  
 56JQ          +IK   
 574B          +JWAITWEIGHT  
 57J2          +CPIRATIO 
 583L          +JCPIRATIO
 58H=          +ASLOTTIME
 592W          +JSLOTTIME
 59GG          +AOBJCORES
 5=26          +JCOREOBJECT  
 5=FQ          +HOLDUP   
 5=^B          +JHOLDUP  
 5?F2          +CHAPQUOTA
 5?YL          +JCHAPQUOTA   
 5#D=          +BACKJOBS 
 5#XW          +JBACKJOBS
 5*CG          +IMOPJOBS 
 5*X6          +JMOPJOBS 
 5BBQ          +IMOPTOTAL
 5BWB          +JMOPTOTAL
 5CB2          +CLUSBACKCP   
 5CTL          +JCLUSBACKCP  
 5D*=          +CLUSMOPCP
 5DSW          +JCLUSMOPCP   
 5F#G          +BACKCP   
 5FS6          +JBACKCP  
 5G?Q          +IMOPCP   
 5GRB          +JMOPCP   
 5H?2          #77777777 
 5HQL    SWOPIPS 
 5J==          LDX   2  0(1)                [NEXT PTR TO ENTRY IN IP TABLE   
 5JPW          BNG   2  SWOPPEDIPS          [J IF REACHED END OF TABLE   
 5K9G          LDX   3  1(1)                [PTR TO MATCHING ENTRY IN EXTENSION T
 5KP6          LDX   4  0(2)                [VALUE OF ORDINARY IP
 5L8Q          SMO      IPEXTTAB 
 5LNB          LDX   5  0(3)                [VALUE OF CORRESPONDING EXTENSION TAB
 5M82          STO   5  0(2) 
 5MML          SMO      IPEXTTAB 
 5N7=          STO   4  0(3)                [SWOP TWO VALUES FOR OTHER MACHINE   
 5NLW          ADN   1  2                   [PTR TO NEXT PAIR OF ENTRIES IN ABOVE
 5P6G          BRN      SWOPIPS  
 5PL6    SWOPPEDIPS  
 5PP= ...      LDX   4  BIGPROGCP           [SWOP BIGPROGCP FOR LLS  
 5PSB ...      LDX   5  JBIGPROGCP   
 5PXG ...      STO   5  BIGPROGCP
 5Q2L ...      STO   4  JBIGPROGCP   
 5Q5Q          LDN   0  1                   [COUNT 1 CHANGE OF MACHINES  
 5QKB          ADS   0  BCHAINSWOPS  
 5R52    NOSWOPMCS   
 5RJL          CXEND 
 5S4=    #   
 5SHW          FCMEND
 5T3G    #   
 5TH6    ABITSFSHAB  
 5W2Q          LDX   2  FX2  
 5WGB          FSHCODE  B,NOCHANGE   
 5X22          BS       FPTR(2),BFSHACTB 
 5XFL    NOCHANGE
 5X^=          BRN      FSHGETACT+1  
 5YDW    #   
 5YYG    #   
 5^D6    #   
 5^XQ          FCEND 
 62CB    #   
 62X2    #   
 63BL    #MEN  COREALL   
 63W=    #TRA  FSHGETACT 
 64*W          BRN      ABITSFSHAB   
 64TG    #END
 65*6    #   
 65SQ    #   
 66#B    #NOR