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

**Defined in:** [[george:source:COREMACROS|COREMACROS]]

**Used in:** [[george:source:CORESHED861|CORESHED861]], [[george:source:LLSMESS867|LLSMESS867]], [[george:source:SCHEDOUT865|SCHEDOUT865]], [[george:source:UNJAMMER866|UNJAMMER866]]

<code - MOBJQUOTA.mac.txt>
 KCXG ...#MAC  MOBJQUOTA 
 KDC6 ...[   
 KDWQ ...[     MACRO TO OBTAIN EITHER OBJECTQUOTA MIN OR MAX 
 KFBB ...[     %A - EITHER MIN OR MAX DEPENDING WHICH IS REQ'D   
 KFW2 ...[     %B - ACC. IN WHICH TO STORE RESULT.IF ABSENT,X0 IS USED   
 KG*L ...[   
 KGT= ...#STR  MIN,%A
 KH#W ...#SKI
 KHSG ...(   
 KJ#6 ...#STR  %B
 KJRQ ...#SKI
 KK?B ...      LDX   0  COBJQUOTA
 KKR2 ...#STR  %B
 KL=L ...      LDX   %B  COBJQUOTA   
 KLQ= ...)   
 KM9W ...#STR  MIN,%A
 KMPG ...(   
 KN96 ...#STR  MAX,%A
 KNNQ ...! FIRST PARAMETER SHOULD BE EITHER MAX OR MIN   
 KP8B ...#STR  MAX,%A
 KPN2 ...#SKI
 KQ7L ...(   
 KQM= ...#STR  %B
 KR6W ...#SKI
 KRLG ...      LDX   0  COBJQUOTA
 KS66 ...#STR  %B
 KSKQ ...      LDX   %B  COBJQUOTA   
 KT5B ...)   
 KTK2 ...)   
 KW4L ...#NOR
</code>