MASK

(GIN Macro)

Defined in: MACROS SJ

Used in: ADDJOB867, ADJUNCTS85, ALASB867, CANTDO867, CHNUMCON867, CONCEPT85, CROBJ6, DELCON867, DOC867, EMSENTER867, FINDOC867, IDFCHK867, IDFCLEAN867, INMOP867, IPCPERI83, JOBDATA867, LISTAST867, LISTCONK83, LISTIDF867, LOADX60, NEWOWN865, NEWPW867, PARAM865, PMACT867, PMCHAINS864, PMCHAP867, PMCRABS860, PMDR864, PMFILE860, PMFIXSTO84, PMFS85, PMOBJIII860, PMSUMA867, PROGISH850, QUOTA850, RESTERR864, SETIDF867, TRAPLIST864, UNSAVE867, USERSTRM867

MASK.mac.txt

 BTR4 ...[   
 BTY= ...[   
 BW5G ...[??? MASK SECT FILE FGN 24 DOC  
 BWK6    #MAC           MASK                [F   
 BWSY ...[     BITS 0-4 = NO OF BITS - 1, 5-18 = DISPLACEMENT,19-23 = LS BIT 
 BX4Q    [     SET UP 21? WITH A MASK OF THE FIELD   
 BXJB    #DEF           21?=-1@L((%A@L-19)-23)@L(23-(%A&#37))
 BY42    #NOR