out boolean OUT_Active;
{default form to 'PM_Vendor_Maintenance';}
{default window to 'PM_Vendor_Maintenance';}

OUT_Active = false;

{ 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
		'User Defined 2' of window 'PM_Vendor_Maintenance_Additional_Information' of form 'PM_Vendor_Maintenance' = 
				'User Class' of table SY_Users_MSTR;
		run script 'User Defined 2' of window 'PM_Vendor_Maintenance_Additional_Information' of form 'PM_Vendor_Maintenance';

		{ Lock Field with code as it is not on the main window }
		lock 'User Defined 2' of window 'PM_Vendor_Maintenance_Additional_Information' of form 'PM_Vendor_Maintenance';
		OUT_Active = false;
	end if;
end if;