2 |
## $Id$ |
## $Id$ |
3 |
## ------------------------------------------------------------------------ |
## ------------------------------------------------------------------------ |
4 |
## $Log$ |
## $Log$ |
5 |
|
## Revision 1.13 2003/01/30 22:27:05 joko |
6 |
|
## + added new abstract methods |
7 |
|
## |
8 |
## Revision 1.12 2003/01/30 21:46:32 joko |
## Revision 1.12 2003/01/30 21:46:32 joko |
9 |
## + fixed behaviour of AUTOLOAD-method |
## + fixed behaviour of AUTOLOAD-method |
10 |
## |
## |
429 |
return; |
return; |
430 |
} |
} |
431 |
|
|
432 |
|
sub getDbName { |
433 |
|
my $self = shift; |
434 |
|
$self->_abstract_function('getDbName'); |
435 |
|
return; |
436 |
|
} |
437 |
|
|
438 |
|
sub testAvailability { |
439 |
|
my $self = shift; |
440 |
|
$self->_abstract_function('testAvailability'); |
441 |
|
return; |
442 |
|
} |
443 |
|
|
444 |
|
sub isConnected { |
445 |
|
my $self = shift; |
446 |
|
$self->_abstract_function('isConnected'); |
447 |
|
return; |
448 |
|
} |
449 |
|
|
450 |
|
sub testDsn { |
451 |
|
my $self = shift; |
452 |
|
$self->_abstract_function('testDsn'); |
453 |
|
return; |
454 |
|
} |
455 |
|
|
456 |
1; |
1; |