$save nolist
/*
 *============================================================================
 *  This program is distributed in the hope that it will be useful, but
 *  WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE
 *
 *  Permission to use for any purpose, modify, copy, and make enhancements
 *  and derivative works of the software is granted if attribution is given to
 *  R.M. Gillmore, dba the ACME Software Deli, as the author
 *
 *  While the ACME Software Deli does not work for money, there is nonetheless
 *  a significant amount of work involved.  The ACME Software Deli maintains the
 *  rights to all code written, though it may be used and distributed as long as
 *  the following conditions are maintained.
 *
 *  1.  The copyright statement at the top of each code block is maintained in
 *      your distribution.
 *  2.  You do not identify yourself as the ACME Software Deli
 *  3.  Any changes made to the software are sent to the ACME Software Deli
 *============================================================================
 */

/*
 *	$Id: menuCmds.ext 1157 2025-05-05 00:35:39Z rmgillmore $
 */

$if not MENUCMDS_EXT_INCLUDED
$set ( MENUCMDS_EXT_INCLUDED )

declare	NUMBER_MENU_SELECTIONS		literally	'26',	/* 'A' to 'Z' */
		NUMBER_PAGES				literally	'4',
		SELECTION_NAME_LENGTH		literally	'22h';	/*	allowing for the trailing NUL */

/*
 *	$Id: menuCmds.ext 1157 2025-05-05 00:35:39Z rmgillmore $
 */

declare	selectionNameType			literally	'pointer';	/*	the selection name string */

$if not menuCommandsSource

/*
 * ---------------------------------------------------
 *		Constructors
 * ---------------------------------------------------
 */

initializeMenuData:
procedure ( fullProgramName ) external;
	declare	fullProgramName		pointer;
end initializeMenuData;

storeMenuData:
procedure external;
end storeMenuData;

/*
 * ---------------------------------------------------
 *		Accessors
 * ---------------------------------------------------
 */

showHelp:
procedure ( firstArgumentString ) external;
	declare	firstArgumentString	pointer;
end showHelp;

getSelectionName:
procedure ( pageNumber, selectionLetter ) selectionNameType external;
	declare	pageNumber				integer,
			selectionLetter			char;
end getSelectionName;

executeScript:
procedure ( pageNumber, selectionLetter ) integer external;
	declare	pageNumber				integer,
			selectionLetter			byte;
end executeScript;

/*
 * ---------------------------------------------------
 *		Manipulators
 * ---------------------------------------------------
 */

setSelectionName:
procedure ( pageNumber, selectionLetter, stringIn ) external;
	declare	pageNumber				integer,
			selectionLetter			byte,
			stringIn				selectionNameType;
end setSelectionName;

editScript:
procedure ( pageNumber, selectionLetter ) external;
	declare	pageNumber				integer,
			selectionLetter			byte;
end editScript;

$endif
$endif

$restore