POK
apex-module_schedules.ads
1 -- ---------------------------------------------------------------------------
2 -- --
3 -- MODULE_SCHEDULES constant and type definitions and management services --
4 -- --
5 -- ---------------------------------------------------------------------------
6 package APEX.Module_Schedules is
7  type Schedule_Id_Type is private;
8  Null_Schedule_Id : constant Schedule_Id_Type;
9  subtype Schedule_Name_Type is Name_Type;
10  type Schedule_Status_Type is record
11  Time_Of_Last_Schedule_Switch : System_Time_Type;
12  Current_Schedule : Schedule_Id_Type;
13  Next_Schedule : Schedule_Id_Type;
14  end record;
15  procedure Set_Module_Schedule
16  (Schedule_Id : in Schedule_Id_Type;
17  Return_Code : out Return_Code_Type);
18  procedure Get_Module_Schedule_Status
19  (Schedule_Status : out Schedule_Status_Type;
20  Return_Code : out Return_Code_Type);
21  procedure Get_Module_Schedule_Id
22  (Schedule_Name : in Schedule_Name_Type;
23  Schedule_Id : out Schedule_Id_Type;
24  Return_Code : out Return_Code_Type);
25 private
26  Type Schedule_Id_Type is new APEX_Integer;
27  Null_Schedule_Id : constant Schedule_Id_Type := 0;
28  pragma Convention (C, Schedule_Status_Type);
29 end APEX.Module_Schedules;