****************************************************************
** INVENTOR.PRG - handler for inventory checking and updating
** J Osako    9 Feb 1996	'This code is cursed'
** Copyright 1996 The Used Computer Store, All Rights Reserved
****************************************************************

	mchoice = 1

	ACTIVATE WINDOW S_O_L
	@3,3 SAY 'This option is'
	@4,3 SAY 'not ready yet.'
	@5,3 GET mchoice FUNCTION '* OK;Cancel'  
	READ
	DEACTIVATE WINDOW S_O_L
RETURN