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

OUT_Active = false;

{ Check if  Record exists in table }
'Customer Number' of table RM_Customer_MSTR = 'Customer Number' of window RM_Sales_Entry of form RM_Sales_Entry;
get table RM_Customer_MSTR;
if err() <> OKAY then
	beep INFOSOUND;
	if ask("Customer does not exist, open Lookup instead?", getmsg(YES), getmsg(NO), "") = ASKBUTTON1 then
		run script 'Lookup Buttons'[3] of window 'RM_Sales_Entry' of form 'RM_Sales_Entry';
	end if;
	OUT_Active = true;
end if;