with Gtkada.Builder; use Gtkada.Builder; with generic_callbacks; with generic_package_widget; use generic_package_widget; with objects; use objects; use objects.Generic_Object_Set_Package; package graphical_editor.static_deployments is static_deployment_table_length : constant natural := 9; procedure Show_Static_Deployment_Widget; procedure Initialize_static_deployment(my_tab: in out table_widget_id ; Object : access Gtkada_Builder_Record'Class); procedure Check_static_deployment(my_tab: in out table_widget_id ; Object : access Gtkada_Builder_Record'Class; Error_Message: in out Unbounded_String; Ok: in out Boolean); procedure Add_In_Sys_static_deployment(my_tab: in out table_widget_id ; Object : access Gtkada_Builder_Record'Class); procedure Deleted_In_Sys_static_deployment(my_tab: in out table_widget_id ; Object : access Gtkada_Builder_Record'Class); procedure Modify_In_Sys_static_deployment(my_tab: in out table_widget_id ; Object : access Gtkada_Builder_Record'Class; name: unbounded_string); procedure Show_In_Sys_static_deployment(my_tab: in out table_widget_id ; Object : access Gtkada_Builder_Record'Class); function search_by_name(name : in unbounded_string) return Generic_Object_Ptr; end graphical_editor.static_deployments;