diff options
| author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-03-09 23:51:27 +0000 |
|---|---|---|
| committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-03-09 23:51:27 +0000 |
| commit | 006b909f167653228b41c4725d2b55e9b1860097 (patch) | |
| tree | cd86117439e5e3de69216fc2f3b539d6ac39b50b | |
| parent | 8af0c5a7d5b6b6720ac12251f50897f6ee3f1b63 (diff) | |
Employee search now works
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@873 4979c152-3d1c-0410-bac9-87ea11338e46
| -rw-r--r-- | LedgerSMB/Location.pm | 6 | ||||
| -rw-r--r-- | sql/upgrade/1.2-1.3.sql | 2 |
2 files changed, 5 insertions, 3 deletions
diff --git a/LedgerSMB/Location.pm b/LedgerSMB/Location.pm index 95128e51..69403a7b 100644 --- a/LedgerSMB/Location.pm +++ b/LedgerSMB/Location.pm @@ -37,8 +37,10 @@ our $VERSION = '1.0.0'; our @ISA = qw(LedgerSMB::DBObject); sub AUTOLOAD { - my $procname = "location_$LedgerSMB::Location::Autoload"; - $self->exec_method($procname); + my $self = shift; + $AUTOLOAD =~ s/^.*:://; + my $procname = "location_$AUTOLOAD"; + $self->exec_method($procname, @_); } sub save { diff --git a/sql/upgrade/1.2-1.3.sql b/sql/upgrade/1.2-1.3.sql index 73182815..97cef533 100644 --- a/sql/upgrade/1.2-1.3.sql +++ b/sql/upgrade/1.2-1.3.sql @@ -155,7 +155,7 @@ FROM employees e LEFT JOIN employees m ON (e.managerid = m.id); CREATE OR REPLACE FUNCTION employee_search (in_startdatefrom date, in_startdateto date, in_name varchar, in_notes text, - in_enddateto date, in_enddatefrom date) + in_enddateto date, in_enddatefrom date, in_sales boolean) RETURNS SETOF employee_search AS $$ DECLARE |