{{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: HLSEVENT)}}
====== HLSEVENT ======
(GIN Macro)
**Defined in:** [[george:source:MACROS_WELL|MACROS WELL]]
**Used in:** [[george:source:CHTAB|CHTAB]], [[george:source:FIXED867|FIXED867]], [[george:source:HLSEVENT867|HLSEVENT867]], [[george:source:INKS|INKS]]
8LWG ...#
8MB6 ...# HERE FOLLOWS THE HLSEVENT MACRO. IT IS USED IN THE
8MTQ ...# HLS EVENT SEGMENT TO SET UP A 2 WORD ENTRY IN THE
8N*B ...# TABLE OF EVENTS. ITS PARAMETERS ARE AS FOLLOWS.
8NT2 ...# %A :- EVENT NAME
8P#L ...# PLUS ANY OF THE FOLLOWING IN ANY ORDER
8PS= ...# OFF :- IGNORE EVENT
8Q?W ...# BACK :- EVENT SIGNIFICANT FOR BACKGROUND JOBS
8QRG ...# MOP :- EVENT SIGNIFICANT FOR MOP JOBS
8R?6 ...# NOKICK :- IF HLS NOT TO BE STARTED
8RQQ ...# MAKETS :- IF JOB TO BE MADE T/S
8S=B ...# REQ :- IF EVENT TO REQUEST HLS SANCTION
8SQ2 ...# IGNOREFS :- IF EVENT TO BE IGNORED IF JOB F/S
8T9L ...# NEVERREQ :- IF REQ MUST NEVER BE ALLOWED
8TP= ...# #NUMBER :- BIT SETTINGS FOR HLSYONQ
8W8W ...#
8WNG ...#MAC HLSEVENT
8X86 ...#STR @,%A
8XMQ ...(
8Y7B ...#OPT MHLSEVNO=0
8YM2 ...#OPT MHLSBITS1=0
8^6L ...#OPT MHLSBITS2=0
8^L= ...#DEF 20?=#70000000
925W ...#DEF 21?=0
92KG ...#DEF 22?=#17777777
9356 ...#DEF 24?=1
93JQ ...#STR %B%C%D%E%F%G%H%I%J%K%L%M%N
944B ... HLSEVENT @,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N
94J2 ... +20?+EVC%A
953L ... +21?
95H= ...#SKI EV%A-MHLSEVNO
962W ...! OUT OF ORDER
96GG ...#ALT MHLSEVNO=MHLSEVNO+1
9726 ...#SKI 20?�*24?
97FQ ...(
97^B ...#DEF 22?=EV%A/24
98F2 ...#DEF 23?=EV%A-(24*22?)
98YL ...#SKI 22?<1$1
99D= ...#ALT MHLSBITS1=MHLSBITS1^(#40000000@L-23?)
99XW ...#SKI 22?-1<1$1
9=CG ...#ALT MHLSBITS2=MHLSBITS2^(#40000000@L-23?)
9=X6 ...)
9?BQ ...#EXI
9?WB ...)
9#B2 ...#STR %C%D%E%F%G%H%I%J%K%L%M%N
9#TL ... HLSEVENT @,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N
9**= ...#STR %B
9*SW ...#SKI
9B#G ...#EXI
9BS6 ...#STR OFF,%B
9C?Q ...#SKI
9CRB ...(
9D?2 ...#DEF 24?=0
9DQL ...#EXI
9F== ...)
9FPW ...#STR BACK,%B
9G9G ...#SKI
9GP6 ...(
9H8Q ...#DEF 20?=20?^#40000000
9HNB ...#DEF 22?=22?^#40000000
9J82 ...#DEF 20?=20?&22?
9JML ...#EXI
9K7= ...)
9KLW ...#STR MOP,%B
9L6G ...#SKI
9LL6 ...(
9M5Q ...#DEF 20?=20?^#20000000
9MKB ...#DEF 22?=22?^#20000000
9N52 ...#DEF 20?=20?&22?
9NJL ...#EXI
9P4= ...)
9PHW ...#STR NOKICK,%B
9Q3G ...#SKI
9QH6 ...(
9R2Q ...#DEF 20?=20?�
9RGB ...#EXI
9S22 ...)
9SFL ...#STR MAKETS,%B
9S^= ...#SKI
9TDW ...(
9TYG ...#DEF 20?=20?^#04000000
9WD6 ...#EXI
9WXQ ...)
9XCB ...#STR REQ,%B
9XX2 ...#SKI
9YBL ...(
9YW= ...#DEF 20?=20?^#02000000
9^*W ...#EXI
9^TG ...)
=2*6 ...#STR IGNOREFS,%B
=2SQ ...#SKI
=3#B ...(
=3S2 ...#DEF 20?=20?^#01000000
=4?L ...#EXI
=4R= ...)
=5=W ...#STR NEVERREQ,%B
=5QG ...#SKI
=6=6 ...(
=6PQ ...#DEF 20?=20?^#00400000
=79B ...#EXI
=7P2 ...)
=88L ...#STR SAVEABLE,%B
=8N= ...#SKI
=97W ...(
=9MG ...#DEF 20?=20?^#00200000
==76 ...#EXI
==LQ ...)
=?6B ...#STR #,%B
=?L2 ...#SKI
=#5L ...(
=#K= ...#DEF 21?=%B
=*4W ...#EXI
=*JG ...)
=B46 ...! UNRECOGNISED PARAMETER
=BHQ ...#NOR