home *** CD-ROM | disk | FTP | other *** search
- package MENU_MANAGER is -- a tool used to create and use menus. These menus
- -- will be used to invoke programs defined by the designer of the menu. The
- -- Menu Manager is designed to be a top level program which can be used to
- -- create a chain of menus, but the Menu Manager itself cannot be invoked
- -- by the Menu Manager.
-
- type FINAL_REPORT is -- This is the description of the materials delivered
- -- as part of the contract.
- record
- OVERVIEW: OVERVIEW_SECTION
- (FUNCTIONAL_PURPOSE, DESIGN_OBJECTIVES, CONTENT_OF_MANUAL);
- EXTERNAL_USER_MANUAL: USER_MANUAL;
- MENU_DEFINITION_LANGUAGE_MANUAL: LANGUAGE_MANUAL;
- INTERNAL_SOFTWARE_MANUAL: USER_MANUAL;
- OPERATING_ENVIRONMENT: INSTALLATION_MANUAL;
- MENU_MANAGER_SOURCE_CODE: Ada_SOURCE_FILE_TYPE;
- end record;
-
- procedure MENU_COMPILER (MENU_DEFINITION_FILE: in TEXT_FILE);
- -- is the procedure used to create a Menu Definition Table from a user
- -- created text file that describes the menu in a Menu Definition Language.
- -- The Menu Definition Table is then used by the Menu Handler to display the
- -- menu and execute the desired programs. The name of the Menu Definition
- -- Table is given by the user in the Menu Definition File.
-
- procedure MAKE_MENU_DEFINITION_TABLE_R; -- is an Ada program that is editable
- -- by the user. It creates the Menu Definition Table without using the
- -- compiler and the Menu Definition File written in a Menu Definition
- -- Language. This allows all files to be created in Ada Language.
-
- procedure MENU_HANDLER (MENU_DEFINITION_TABLE: in STRUCTURES_TABLE_FILE);
- -- is the procedure used to display the menu and process menu selections,
- -- executing programs and displaying other menus as desired during run-time.
-
- package TITLE_PAGE is new TITLE_PAGE_PACKAGE
- (DEVELOPING_ORGANIZATION => "Ford Aerospace",
- AUTHOR => "Sylvan Rubin / Ken Lamarche",
- CONTRACT => "",
- ADDRESS => ("1260 Crossman Avenue",
- "Sunnyvale","CA","94089"),
- PHONE => (408,743,3891),
- DATE_SUBMITTED => (5,Mar,1985) );
-
- package TECHNICAL PARAMETERS is new TECHNICAL_PARAMETERS_PACKAGE
- (LINES_OF_SOURCE_CODE => 2000,
- DEVELOPMENT_COMPILER => (TeleSoft_2_1),
- PLANNED_COMPILERS_SUPPORTED => ((DECVAX,TeleSoft)) );
-
- package DEVELOPMENT_SCHEDULE_AND_STATUS is new SCHEDULE_PACKAGE
- (COMPILETED_EVENTS => (MONTHLY_STATUS_REPORTS),
- SCHEDULED_EVENTS => (DELIVERY,(15,APR,1985) );
-
- end MENU_MANAGER;
-
-