|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 13312 (0x3400)
Types: Ada Source
Notes: 03_class, FILE, R1k_Segment, e3_tag, package Work_Order_Errors, pragma Module_Name 4 3785, pragma Subsystem Cmvc, seg_001d00
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
package Work_Order_Errors is
pragma Subsystem (Cmvc);
pragma Module_Name (4, 3785);
pragma Bias_Key (9);
No_Default_Value : exception;
Data_Present : exception;
Mismatched_Vector_Operation : exception;
Type_Mismatch : exception;
subtype Status is Natural range 0 .. 127;
function Is_Bad (Error : Status) return Boolean;
function Is_Warning (Error : Status) return Boolean;
function Is_Good (Error : Status) return Boolean;
function Message (Error : Status) return String;
Bad_Work_Order_Status : exception;
Warning_Work_Order_Status : exception;
procedure Check (Error : Status; Flag_Warnings : Boolean := False);
-- New constants will be added as the need arises.
subtype Bad_Status is Status;
subtype Warning_Status is Status;
subtype Good_Status is Status;
Nil : constant Good_Status := 0;
Successful : constant Good_Status := 0;
Reorganized_Read_Only_Venture : constant Bad_Status := 1;
Venture_Handle_Not_Writable : constant Bad_Status := 2;
Venture_Field_Not_Found : constant Warning_Status := 3;
Venture_Field_Already_Exists : constant Bad_Status := 4;
Venture_Field_Type_Mismatch : constant Bad_Status := 5;
Venture_Field_Vector_Mismatch : constant Bad_Status := 6;
No_Default_Field_Value : constant Bad_Status := 7;
Venture_Handle_Not_Open : constant Bad_Status := 8;
Null_Venture_Field_Handle : constant Bad_Status := 9;
Reorganized_Read_Only_Work_Order : constant Bad_Status := 10;
Order_Handle_Not_Writable : constant Bad_Status := 11;
Order_Field_Not_Found : constant Warning_Status := 12;
Order_Field_Already_Exists : constant Bad_Status := 13;
Order_Field_Data_Present : constant Bad_Status := 14;
Order_Field_Vector_Mismatch : constant Bad_Status := 15;
Order_Field_Type_Mismatch : constant Bad_Status := 16;
Null_Order_Field_Handle : constant Bad_Status := 17;
Order_Handle_Not_Open : constant Bad_Status := 18;
Order_Belongs_To_A_Different_Venture : constant Bad_Status := 19;
Directory_Lock_Error : constant Bad_Status := 20;
Directory_Semantic_Error : constant Bad_Status := 21;
Directory_Code_Generation_Error : constant Bad_Status := 22;
Directory_Obsolescence_Error : constant Bad_Status := 23;
Directory_Bad_Tree_Parameter : constant Bad_Status := 24;
Directory_Illegal_Operation : constant Bad_Status := 25;
Directory_Consistency_Error : constant Bad_Status := 44;
Directory_Version_Error : constant Bad_Status := 26;
Directory_Name_Error : constant Bad_Status := 27;
Directory_Access_Error : constant Bad_Status := 28;
Directory_Policy_Error : constant Bad_Status := 29;
Directory_Bad_Action : constant Bad_Status := 30;
Directory_Class_Error : constant Bad_Status := 31;
Directory_Other_Error : constant Bad_Status := 32;
Directory_Bad_Naming_Context : constant Bad_Status := 33;
Directory_Ill_Formed_Name : constant Bad_Status := 34;
Directory_Undefined_Name : constant Bad_Status := 35;
Directory_Ambiguous_Name : constant Bad_Status := 36;
Directory_No_Selection : constant Bad_Status := 37;
Directory_Cursor_Not_In_Selection : constant Bad_Status := 38;
Directory_Selections_Not_Supported : constant Bad_Status := 39;
Directory_No_Declaration : constant Bad_Status := 40;
Directory_No_Object : constant Bad_Status := 41;
Directory_No_Editor : constant Bad_Status := 42;
Directory_Naming_Unsuccessful : constant Bad_Status := 43;
Order_Set_Handle_Not_Writable : constant Bad_Status := 50;
Reorganized_Read_Only_Order_Set : constant Bad_Status := 51;
Id_Already_In_Order_Set : constant Warning_Status := 52;
Id_Not_Found_In_Order_Set : constant Warning_Status := 53;
Reorganized_Read_Only_Venture_Default : constant Bad_Status := 60;
Venture_Default_Handle_Not_Writable : constant Bad_Status := 61;
No_Venture_Default_Set : constant Warning_Status := 62;
Added_New_User : constant Good_Status := 63;
Order_User_Handle_Not_Writable : constant Bad_Status := 70;
Reorganized_Read_Only_Order_User : constant Bad_Status := 71;
Id_Already_In_Order_User : constant Warning_Status := 72;
Id_Not_Found_In_Order_User : constant Warning_Status := 73;
Set_Handle_Not_Writable : constant Bad_Status := 80;
Reorganized_Read_Only_Set : constant Bad_Status := 81;
Id_Already_In_Set : constant Bad_Status := 82;
Id_Not_Found_In_Set : constant Warning_Status := 83;
List_Handle_Not_Writable : constant Bad_Status := 90;
List_Handle_Not_Open : constant Bad_Status := 91;
List_Belongs_To_A_Different_Venture : constant Bad_Status := 92;
Assumed_Field_Default_Of_False : constant Warning_Status := 100;
Assumed_Field_Default_Of_Zero : constant Warning_Status := 101;
List_Open_With_Wrong_Action : constant Bad_Status := 102;
Real_Default_Is_Garbage : constant Warning_Status := 114;
Illegal_Field_Name : constant Bad_Status := 115;
Product_Authorization_Failure : constant Bad_Status := 116;
Order_Is_Not_Closed : constant Bad_Status := 117;
Not_Allowed_During_Traversal : constant Bad_Status := 118;
Abandoned_Action : constant Warning_Status := 119;
Cannot_Open_For_None : constant Bad_Status := 120;
Bad_User_Id : constant Bad_Status := 121;
Order_Is_Closed : constant Bad_Status := 122;
Not_A_Venture : constant Bad_Status := 123;
Not_A_Work_Order : constant Bad_Status := 124;
Not_A_Work_Order_List : constant Bad_Status := 125;
Unknown_Error : constant Bad_Status := 126;
Bad : constant Bad_Status := 127;
end Work_Order_Errors;
nblk1=c
nid=0
hdr6=18
[0x00] rec0=1e rec1=00 rec2=01 rec3=070
[0x01] rec0=01 rec1=00 rec2=07 rec3=052
[0x02] rec0=0d rec1=00 rec2=0c rec3=086
[0x03] rec0=02 rec1=00 rec2=02 rec3=032
[0x04] rec0=0d rec1=00 rec2=0b rec3=052
[0x05] rec0=03 rec1=00 rec2=03 rec3=090
[0x06] rec0=0e rec1=00 rec2=0a rec3=016
[0x07] rec0=03 rec1=00 rec2=04 rec3=064
[0x08] rec0=0d rec1=00 rec2=09 rec3=084
[0x09] rec0=03 rec1=00 rec2=05 rec3=04a
[0x0a] rec0=0d rec1=00 rec2=08 rec3=050
[0x0b] rec0=06 rec1=00 rec2=06 rec3=000
tail 0x20100fb187da18e3c91ec 0x42a00088462065003