#ifndef	h_sinput
#define	h_sinput
/******************************************************************************
*
*	Definition for screen input functions
*
*	Module	%M%	Version	%I% 	Date	%H%
*
*	(c) Copyright 1998 Ardent Software Inc. - All Rights Reserved
*	This is unpublished proprietary source code of Ardent Software Inc.
*	The copyright notice above does not evidence any actual or intented
*	publication of such source code.
*
*******************************************************************************
*
*	Maintenence log - insert most recent change descriptions at top
*
*	Date.... GTAR# WHO Description.........................................
*	10/14/98 23801 SAP Change copyrights. 
*	12/10/97 22324 GMH Add declarations for use with GET.KEY
*	11/04/97 21725 GMH Add KEY_BEEP mode
*	06/29/97 20983 JWT William Hill EDIT.INPUT, GET.KEY, and PACK.FN.KEYS
*	05/08/95 16341 SPR Redefined "key" and "type" in the structure "KEYS" 
*			   to be type int instead of type short. 
*	07/25/88   -    -  Maintenence log purged at 5.2.1, see release 5.1.10.
*
*****************************************************************************/

typedef	struct	keys
{
	int	type;
	int	value;
	int	key;
	int	key2;
	int	key3;
	int	key4;
	int	key5;
}	KEYS;

struct packed_keys
{	int	key_count;
	KEYS	key_table;
};

#define	KEY_CLEAR	0
#define	KEY_EDIT	1
#define	KEY_TRAP	2
#define	KEY_EXIT	3
#define	KEY_NULL	4
#define	KEY_BEEP	5

#define	KOFF_CTRL	0
#define	KOFF_ESC	32
#define	KOFF_FUNCT	160
#define	KOFF_SINGLE	288 - ' '

#define	KE_FUNC	1
#define	KE_ESCP	5

#define	KEY_MAX	200
EXTERN	KEYS	Key_control[KEY_MAX];
EXTERN	int	Keycnt;

#endif	/* end of sinput.h */