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 - downloadIndex: ┃ T V ┃
Length: 7081 (0x1ba9) Types: TextFile Names: »V«
└─⟦d10a02448⟧ Bits:30000409 8mm tape, Rational 1000, ENVIRONMENT, D_12_7_3 └─ ⟦fc9b38f02⟧ »DATA« └─⟦9b46a407a⟧ └─⟦12c68c704⟧ └─⟦this⟧ └─⟦5f3412b64⟧ Bits:30000745 8mm tape, Rational 1000, ENVIRONMENT 12_6_5 TOOLS └─ ⟦91c658230⟧ »DATA« └─⟦458657fb6⟧ └─⟦220843204⟧ └─⟦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;