File: n_svc_base.sru
Size: 1275
Date: Mon, 07 Apr 2008 21:31:15 +0200
$PBExportHeader$n_svc_base.sru
$PBExportComments$Base Service Class
forward
global type n_svc_base from nonvisualobject
end type
end forward

global type n_svc_base from nonvisualobject
end type
global n_svc_base n_svc_base

type variables
Public:
Boolean #Pooled
end variables

forward prototypes
public function boolean of_ispooled ()
end prototypes

public function boolean of_ispooled ();//===========================================================================
// Function: of_Ispooled (public )
// Object: n_svc_base
//---------------------------------------------------------------------------
// Description: Gets the #pooled property
// Note: A pooled service will only be unloaded when
//       the application is terminated
//---------------------------------------------------------------------------
// Returns: Boolean
//---------------------------------------------------------------------------
// Author: (Yeyi) Gabriel B. Abulencia
//===========================================================================
RETURN #pooled
end function

on n_svc_base.create
call super::create
TriggerEvent( this, "constructor" )
end on

on n_svc_base.destroy
TriggerEvent( this, "destructor" )
call super::destroy
end on