|
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: 1493 (0x5d5)
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⟧
separate (Tracker.Element_Pkg)
--****************************************************************************
procedure Multiple_Pr_El_Record (El_Record : in out Element_Pointer) is
use Calendar;
A_Record : Element_Pointer;
begin
A_Record := new Element_Type (True);
A_Record.all := (Two_Or_More_People => True,
Description => El_Record.Description,
Desc_Key => El_Record.Desc_Key,
Subsystem_Name => El_Record.Subsystem_Name,
Milestone_Num => El_Record.Milestone_Num,
Priority => El_Record.Priority,
Original_Size => El_Record.Original_Size,
Size_Done_At_Start => El_Record.Size_Done_At_Start,
Current_Size => El_Record.Current_Size,
Complexity => El_Record.Complexity,
Activity_Completeness => El_Record.Activity_Completeness,
Hours_To_Complete => El_Record.Hours_To_Complete,
Date_Done => El_Record.Date_Done,
Prev_Date_Done => El_Record.Prev_Date_Done,
Date_Size_Verified => El_Record.Date_Size_Verified,
More_Than_One_Person => True,
Dates_Done => (others => Null_Date),
Hours_Left => (others => 0.0),
People_Initials => (others => " "));
El_Record := A_Record;
end Multiple_Pr_El_Record;