|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 Tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: B T
Length: 1618 (0x652)
Types: TextFile
Names: »B«
└─⟦180fe333a⟧ Bits:30000405 8mm tape, Rational 1000, SW CATALOG, 10_20_0
└─⟦180fe333a⟧ Bits:30000537 8mm tape, Rational 1000, SW Catalog 10_20_0
└─⟦5cb1d1d7f⟧ »DATA«
└─⟦3b1ee7bd8⟧
└─⟦this⟧
with Prompt_Pkg;
separate (Tracker)
package body Element_Pkg is
-----------------------------------------------------------------------------
--| NAME: ELEMENT_PKG
--|
--| OVERVIEW:
--| This package defines the actions that can be performed on
--| element data types (defined in data_pkg).
--|
--| EXCEPTIONS HANDLED:
--| none
--|
--| HISTORY:
--| written by May Lee March 1985
--|
-----------------------------------------------------------------------------
-- instantiation of generic list handler is done in data_pkg
use Ac_List_Pkg; -- to get the activity completeness
use El_List_Pkg;
use Ms_List_Pkg;
use Pr_List_Pkg;
use Ss_List_Pkg;
-- to convert the enumeration type activity_phase_percent to character
-- for read and write into the file only
type Ac_Phase_Char_Type is array (1 .. 10) of Character;
Char_Ac_Completeness : Ac_Phase_Char_Type := (others => ' ');
procedure Multiple_Pr_El_Record
(El_Record : in out Element_Pointer) is separate;
procedure Single_Pr_El_Record
(El_Record : in out Element_Pointer) is separate;
procedure Add_Record_To_Lists (El_Record : in Element_Pointer) is separate;
procedure El_Add is separate;
procedure El_Initialize is separate;
procedure Update_Current is separate;
procedure Update_Pct_Done is separate;
procedure El_Set_Up is separate;
procedure El_Delete is separate;
procedure El_Modify is separate;
procedure El_Save is separate;
end Element_Pkg;