firebird-mirror/src/gpre/form.h

/*
 *	PROGRAM:	Language Preprocessor
 *	MODULE:		form.h
 *	DESCRIPTION:	Form definition modules
 *
 * The contents of this file are subject to the Interbase Public
 * License Version 1.0 (the "License"); you may not use this file
 * except in compliance with the License. You may obtain a copy
 * of the License at http://www.Inprise.com/IPL.html
 *
 * Software distributed under the License is distributed on an
 * "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express
 * or implied. See the License for the specific language governing
 * rights and limitations under the License.
 *
 * The Original Code was created by Inprise Corporation
 * and its predecessors. Portions created by Inprise Corporation are
 * Copyright (C) Inprise Corporation.
 *
 * All Rights Reserved.
 * Contributor(s): ______________________________________.
 */
#ifdef PYXIS

#ifndef _GPRE_FORM_H_
#define _GPRE_FORM_H_

/* Form instance */

typedef struct form {
	struct dbb *form_dbb;		/* Parent database */
	struct form *form_next;		/* Next form in database */
	struct sym *form_name;		/* Form name */
	struct gpre_fld *form_fields;	/* Form fields */
	struct gpre_req *form_parent;	/* Parent form request */
	struct gpre_fld *form_field;		/* Field in parent */
	int *form_object;			/* Form data structure */
	TEXT *form_handle;			/* Runtime form handle */
} *FORM;

/* Form Interaction */

typedef struct fint {
	struct gpre_req *fint_request;	/* Parent request */
	USHORT fint_flags;			/* Misc crud */
	struct lls *fint_display_fields;	/* List of fields for display */
	struct lls *fint_update_fields;	/* List of fields for update */
	struct lls *fint_wakeup_fields;	/* List of fields for immediate wakeup */
	struct lls *fint_position_fields;	/* Field for cursor position */
	struct lls *fint_override_fields;	/* Fields to be left alone */
} *FINT;

#define FINT_display_all	1
#define FINT_update_all		2
#define FINT_wakeup_all		4
#define FINT_override_all	8
#define FINT_no_wait		16

/* menu instance.  Note that the entree structure must appear at the beginning of the
   menu structure.  */


typedef struct entree {
	struct gpre_req *entree_request;	/* Parent request */
	USHORT entree_entree;		/* ident for entree */
	USHORT entree_value;		/* ident for entree value */
	USHORT entree_end;			/* ident for end flag for get */
} *ENTREE;

typedef struct menu {
	struct entree menu_entree;	/* current/terminating entree */
	USHORT menu_title;			/* ident for menu title */
	USHORT menu_terminator;		/* ident for menu terminator */
} *MENU;

#define		menu_request		menu_entree.entree_request
#define		menu_entree_value	menu_entree.entree_value
#define		menu_entree_entree	menu_entree.entree_entree

#endif /* _GPRE_FORM_H_ */

#endif