inout reference INOUT_Table_Reference; {Refer to table with the following syntax: table(INOUT_Table_Reference)}
out boolean OUT_Active;
{default form to 'Customer_Lookup';}
{default window to 'Customer_Lookup';}

OUT_Active = false;

{ For Customers Only }
if '(L) View GB' of window 'Customer_Lookup' of form 'Customer_Lookup' <> CUSTOMERS then
	abort script.
end if;

range table(INOUT_Table_Reference) where "".

{ Get Current User's Class }
'User ID' of table SY_Users_MSTR = 'User ID' of globals;
get table SY_Users_MSTR;
if err() = OKAY then
	if not empty('User Class' of table SY_Users_MSTR) then

		{ Validate User Defined Field }
		focus 'Redisplay Button' of window 'Customer_Lookup' of form 'Customer_Lookup'.
		clear window 'Customer_Lookup_Scroll' of form 'Customer_Lookup'.
		range table(INOUT_Table_Reference) where physicalname('User Defined 2' of table RM_Customer_MSTR) + " = '" + 'User Class' of table SY_Users_MSTR+"'".
		fill window 'Customer_Lookup_Scroll' of form 'Customer_Lookup'.
		focus 'Customer Number' of window 'Customer_Lookup' of form 'Customer_Lookup'.
		OUT_Active = true;

	end if;
end if;