Specification of package Corba.Repository_Root.Operationdef

 ==================================================== --
 ===  Code automatically generated by IDL to Ada  === --
 ===  compiler OrbAda-idl2ada                     === --
 ===  Copyright Top Graph'X  1997-2005            === --
 ==================================================== --
 From IDL file ../omg/CORBA_InterfaceRepository.idl
with Corba_Ios ;
with Corba.Object ;
with Corba.Repository_Root.Idltype ;
with Corba.Repository_Root.Contained ;
pragma Elaborate_All (Corba.Object) ;
package CORBA.Repository_Root.OperationDef is

   type Ref is new Repository_Root.Contained.Ref with null record;


   ------------------------------
    Methods of this interface  --
   ------------------------------

   function Get_result
      (Self : in Ref)
      return Corba.TypeCode.Object ;

   function Get_result_def
      (Self : in Ref)
      return Repository_Root.IDLType.Ref ;

   procedure Set_result_def
      (Self : in Ref;
       To : in Repository_Root.IDLType.Ref) ;

   function Get_params
      (Self : in Ref)
      return Repository_Root.ParDescriptionSeq ;

   procedure Set_params
      (Self : in Ref;
       To : in Repository_Root.ParDescriptionSeq) ;

   function Get_mode
      (Self : in Ref)
      return CORBA.OperationMode ;

   procedure Set_mode
      (Self : in Ref;
       To : in CORBA.OperationMode) ;

   function Get_contexts
      (Self : in Ref)
      return Repository_Root.ContextIdSeq ;

   procedure Set_contexts
      (Self : in Ref;
       To : in Repository_Root.ContextIdSeq) ;

   function Get_exceptions
      (Self : in Ref)
      return Repository_Root.ExceptionDefSeq ;

   procedure Set_exceptions
      (Self : in Ref;
       To : in Repository_Root.ExceptionDefSeq) ;

   Null_Ref : constant Ref := (Repository_Root.Contained
      .Null_Ref with null record);

   Tgx_Service_Name : Corba.ObjectId := Corba.To_Corba_String
      ("InterfaceRepository") ;

   OperationDef_R_Id : constant Corba.RepositoryId :=
      Corba.To_Corba_String ("IDL:omg.org/CORBA/OperationDef:1.0") ;
private
    Collocated calls profiles and callers

   type Tgx_Get_result_Ptr is access function
      (Self : in Ref)
      return Corba.TypeCode.Object;

   Tgx_Get_result_Caller : Tgx_Get_result_Ptr ;

   type Tgx_Get_result_def_Ptr is access function
      (Self : in Ref)
      return Repository_Root.IDLType.Ref;

   Tgx_Get_result_def_Caller : Tgx_Get_result_def_Ptr ;

   type Tgx_Set_result_def_Ptr is access procedure
      (Self : in Ref;
       To : in Repository_Root.IDLType.Ref);

   Tgx_Set_result_def_Caller : Tgx_Set_result_def_Ptr ;

   type Tgx_Get_params_Ptr is access function
      (Self : in Ref)
      return Repository_Root.ParDescriptionSeq;

   Tgx_Get_params_Caller : Tgx_Get_params_Ptr ;

   type Tgx_Set_params_Ptr is access procedure
      (Self : in Ref;
       To : in Repository_Root.ParDescriptionSeq);

   Tgx_Set_params_Caller : Tgx_Set_params_Ptr ;

   type Tgx_Get_mode_Ptr is access function
      (Self : in Ref)
      return CORBA.OperationMode;

   Tgx_Get_mode_Caller : Tgx_Get_mode_Ptr ;

   type Tgx_Set_mode_Ptr is access procedure
      (Self : in Ref;
       To : in CORBA.OperationMode);

   Tgx_Set_mode_Caller : Tgx_Set_mode_Ptr ;

   type Tgx_Get_contexts_Ptr is access function
      (Self : in Ref)
      return Repository_Root.ContextIdSeq;

   Tgx_Get_contexts_Caller : Tgx_Get_contexts_Ptr ;

   type Tgx_Set_contexts_Ptr is access procedure
      (Self : in Ref;
       To : in Repository_Root.ContextIdSeq);

   Tgx_Set_contexts_Caller : Tgx_Set_contexts_Ptr ;

   type Tgx_Get_exceptions_Ptr is access function
      (Self : in Ref)
      return Repository_Root.ExceptionDefSeq;

   Tgx_Get_exceptions_Caller : Tgx_Get_exceptions_Ptr ;

   type Tgx_Set_exceptions_Ptr is access procedure
      (Self : in Ref;
       To : in Repository_Root.ExceptionDefSeq);

   Tgx_Set_exceptions_Caller : Tgx_Set_exceptions_Ptr ;
end CORBA.Repository_Root.OperationDef;