(GIN Macro)
Defined in: MACROS JSR
Used in: CIMOP867, IPBIN867, IPBINC865, IPBMOPC867, MOPCOM867, MOPCOMB865, MOPSTART865, MULTIPLX864, SPUNLOAD867
4QL# ...#MAC NBREAKIN 4QLD ...[ 4QLJ ...[ IF %B IS 5,9 OR 16,UP=REJECTED,UPPLUS 1,OK 4QLN ...[ IF %B IS 3,4,8,UP IS OK,UPPLUS 1 REJECTED 4QLS ...[ 4QLY ...#STR %A,1 4QM4 ... LDX 1 %A 4QM8 ... LDX 2 FX2 4QM# ... ACCSTO JOBNO(1),ACOMMUNE1,2 4QMD ... ACCSTO ACTNUM(1),ACOMMUNE2,2 4QMJ ... LDN 0 K%BPROCONTX 4QMN ... STO 0 ACOMMUNE3(2) 4QMS ... DOWN PROCONTX,17 4QMY ...#SKI %B-5 [OMIT IF %B IS 5 4QN4 ...( 4QN8 ...#SKI %B-9 [OMIT IF %B IS 9 4QN# ...( 4QND ...#SKI %B-16 [OMIT IF %B IS 16 4QNJ ...( 4QNN ...#STR %D [OMIT IF NO %D 4QNS ... BRN %D 4QNY ...#STR %D 4QP4 ...#SKI 4QP8 ... BRN MNBREAKIN3 4QP# ...#STR %C [OMIT IF NO %C 4QPD ... BRN %C 4QPJ ...#STR %C 4QPN ...#SKI 4QPS ... BRN MNBREAKIN3 4QPY ...) 4QQ4 ...) 4QQ8 ...) 4QQ# ...#SKI %B-8 4QQD ...( 4QQJ ...#SKI %B-4 4QQN ...( 4QQS ...#SKI %B-3 4QQY ...( 4QR4 ...#STR %C [OMIT IF NO %C 4QR8 ... BRN %C 4QR# ...#STR %C 4QRD ...#SKI 4QRJ ... BRN MNBREAKIN3 4QRN ...#STR %D [OMIT IF NO %D 4QRS ... BRN %D 4QRY ...#STR %D 4QS4 ...#SKI 4QS8 ... BRN MNBREAKIN3 4QS# ...) 4QSD ...) 4QSJ ...) 4QSN ...MNBREAKIN3 4QSS ...#NOR