package MyPluginApplication
@ISA = qw()

sub BEGIN

sub new
my ($module, $app) = @_;
#	$this->SUPER::new(
return $this;

sub DESTROY
my $this = shift;
#	$this->SUPER::DESTROY(

sub SearchModules
my ($this, $PluginDir) = @_;
return @Modules;

sub LoadModulesInADirectory
my ($this, $pParams, $Type, $PluginDir, $pModules, $pModuleInf, $pLoadedModuleHash, $OnlyLoadModules, $pExcludeModules) = @_;
return if(!defined $PluginDir);
return undef;
return $pModules;

sub LoadModules
my ($this, $AdminPluginDir, $UserPluginDir, $UpdateParams) = @_;
my $NoLogonPluginDir;
	if($UpdateParams =~ /[^\d]/) {
		($this, $AdminPluginDir, $UserPluginDir, $NoLogonPluginDir, $UpdateParams) = @_;

sub MergeAModuleParameters
my ($this, $pParams, $pModules, $ModuleDescription) = @_;
return if(!$pModules);

sub MergeModuleParameters
my ($this, $pParams) = @_;
return if($this->{nModuleParametersLoaded});

sub nOpenAdminModules
my ($this, $pParams) = @_;
return 0 if(!defined $pAdminModules);
return $n;

sub IsModuleIncluded
my ($this, $ModuleName, $pModules) = @_;
return 1 if($ModuleName eq $pModules->[$i]);
return 0;

sub ShowUserModuleMenus
my ($this, $pParams, $ProgramPath, $BaseOption, $pModuleOrder, $FrameMode, $pre, $post) = @_;
return if(!defined $pUserModules);

sub ShowAdminModuleMenus
my ($this, $pParams, $ProgramPath, $BaseOption, $pModuleOrder, $FrameMode, $pre, $post) = @_;
return if(!defined $pAdminModules);

sub GetExcludeModulesArray
my ($App, $pParams) = @_;
return () if(!$DB);
return @em;

sub GetExcludeModulesHash
my ($App, $pParams) = @_;
return %ExcludeModules;