X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDBUtils.pm;h=6d20a695caaf316b43574c160bf5ef2bb0ece95e;hb=3d967be3d2f32e2b00f5f55769edcbf5be866ce6;hp=000bc1bdbe8ebfb3ac474af4453f8a81c064f07c;hpb=ed944ca355b3446d4e6c3fc22f748f77b64d58db;p=kivitendo-erp.git diff --git a/SL/DBUtils.pm b/SL/DBUtils.pm index 000bc1bdb..6d20a695c 100644 --- a/SL/DBUtils.pm +++ b/SL/DBUtils.pm @@ -12,6 +12,8 @@ our @EXPORT = qw(conv_i conv_date conv_dateq do_query selectrow_query do_stateme create_sort_spec does_table_exist add_token); +use strict; + sub conv_i { my ($value, $default) = @_; return (defined($value) && "$value" ne "") ? $value * 1 : $default;