unit %UNIT_NAME%;

{----------------------------------------------------------------------------}
{ This unit was automatically generated by the RemObjects SDK after reading  }
{ the RODL file associated with this project .                               }
{                                                                            }
{ This is where you are supposed to code the implementation of your objects. }
{----------------------------------------------------------------------------}

{$I Remobjects.inc}

interface

uses
  // required units
  // <%%% START REQUIRED_UNITS %%%>
  %REQUIRED_UNIT_NAME%,
  // <%%% END REQUIRED_UNITS %%%>
  {vcl:} Classes, SysUtils,
  {RemObjects:}  uROXMLIntf, uROClientIntf, uROTypes, uROServer, uROServerIntf, uROSessions,
  {Generated:} %LIBRARY_NAME%_Intf;

// <%%% START SERVICES %%%>
type
  { T%SERVICE_NAME% }
  T%SERVICE_NAME% = class(%SERVICE_ANCESTOR_NAME%, I%SERVICE_NAME%)
  private
  protected
    { I%SERVICE_NAME% methods }
    // <%%% START FUNCTION_OPERATIONS %%%>
    function %OPERATION_NAME%(
               // <%%% START PARAMS %%%>
               %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
               // <%%% END PARAMS %%%>
               ): %OPERATION_RESULT%;
    // <%%% END FUNCTION_OPERATIONS %%%>
    // <%%% START PROCEDURE_OPERATIONS %%%>
    procedure %OPERATION_NAME%(
               // <%%% START PARAMS %%%>
               %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
               // <%%% END PARAMS %%%>
               );
    // <%%% END PROCEDURE_OPERATIONS %%%>
  end;
// <%%% END SERVICES %%%>

implementation

// <%%% START IF_DATA_MODULE %%%>
{$R *.dfm}

// <%%% END IF_DATA_MODULE %%%>
uses
  {Generated:} %LIBRARY_NAME%_Invk;

// <%%% START SERVICES %%%>
procedure Create_%SERVICE_NAME%(out anInstance : IUnknown);
begin
  anInstance := T%SERVICE_NAME%.Create(
    // <%%% START IF_DATA_MODULE %%%>
    nil
    // <%%% END IF_DATA_MODULE %%%>
    );
end;

{ %SERVICE_NAME% }
// <%%% START FUNCTION_OPERATIONS %%%>
function T%SERVICE_NAME%.%OPERATION_NAME%(
           // <%%% START PARAMS %%%>
           %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
           // <%%% END PARAMS %%%>
           ): %OPERATION_RESULT%;
begin
end;

// <%%% END FUNCTION_OPERATIONS %%%>
// <%%% START PROCEDURE_OPERATIONS %%%>
procedure T%SERVICE_NAME%.%OPERATION_NAME%(
           // <%%% START PARAMS %%%>
           %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
           // <%%% END PARAMS %%%>
           );
begin
end;

// <%%% END PROCEDURE_OPERATIONS %%%>
initialization
  TROClassFactory.Create('%SERVICE_NAME%', Create_%SERVICE_NAME%, T%SERVICE_NAME%_Invoker);

finalization

// <%%% END SERVICES %%%>
end.