Add zmSQLExecute and zmDbFetchOne to Exports. Add a debug to zmDbFetchOne
parent
3e43a1159a
commit
44fd2f99e0
|
@ -48,6 +48,8 @@ our %EXPORT_TAGS = (
|
|||
zmDbGetMonitor
|
||||
zmDbGetMonitorAndControl
|
||||
zmDbDo
|
||||
zmSQLExecute
|
||||
zmDbFetchOne
|
||||
) ]
|
||||
);
|
||||
push( @{$EXPORT_TAGS{all}}, @{$EXPORT_TAGS{$_}} ) foreach keys %EXPORT_TAGS;
|
||||
|
@ -257,6 +259,7 @@ sub zmDbDo {
|
|||
sub zmDbFetchOne {
|
||||
my $sql = shift;
|
||||
|
||||
Debug("$sql @_");
|
||||
my $sth = $dbh->prepare_cached($sql);
|
||||
if (!$sth) {
|
||||
Error("Can't prepare '$sql': ".$dbh->errstr());
|
||||
|
@ -294,6 +297,7 @@ zmDbGetMonitors
|
|||
zmDbGetMonitor
|
||||
zmDbGetMonitorAndControl
|
||||
zmDbDo
|
||||
zmSQLExecute
|
||||
zmDbFetchOne
|
||||
|
||||
=head1 AUTHOR
|
||||
|
|
Loading…
Reference in New Issue