SF.net SVN: ledger-smb:[4729] trunk

[..hidden..]

Revision: 4729
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=4729&view=rev
Author:   einhverfr
Date:     2012-05-19 08:25:40 +0000 (Sat, 19 May 2012)
Log Message:
-----------
Business units parent id dropdown now works

Modified Paths:
--------------
    trunk/LedgerSMB/Scripts/business_unit.pm
    trunk/sql/modules/Business_Unit.sql

Modified: trunk/LedgerSMB/Scripts/business_unit.pm
===================================================================
--- trunk/LedgerSMB/Scripts/business_unit.pm	2012-05-19 07:11:40 UTC (rev 4728)
+++ trunk/LedgerSMB/Scripts/business_unit.pm	2012-05-19 08:25:40 UTC (rev 4729)
@@ -54,6 +54,9 @@
     if (!$request->{class_id}){
         $request->{class_id} = $request->{id};
     }
+    $request->{control_code} = '';
+    my $b_unit = LedgerSMB::DBObject::Business_Unit->new(%$request);
+    @{$request->{parent_options}} = $b_unit->list($request->{class_id});
     $request->{id} = undef;
     _display($request); 
 }
@@ -196,7 +199,7 @@
                               if defined $request->{end_date};
     my $unit = LedgerSMB::DBObject::Business_Unit->new(%$request);
     $unit->save;
-    edit($request);
+    add($request);
 }
 
 =item save_class

Modified: trunk/sql/modules/Business_Unit.sql
===================================================================
--- trunk/sql/modules/Business_Unit.sql	2012-05-19 07:11:40 UTC (rev 4728)
+++ trunk/sql/modules/Business_Unit.sql	2012-05-19 08:25:40 UTC (rev 4729)
@@ -157,7 +157,6 @@
        description = in_description,
        start_date = in_start_date,
        end_date = in_end_date,
-       parent_id = in_parent_id,
        credit_id = in_credit_id
  WHERE id = in_id;
 
@@ -173,12 +172,8 @@
     t_id := currval('business_unit_id_seq');
 END IF;
 
-RAISE NOTICE 'ID: %', t_id;
-
 SELECT * INTO retval FROM business_unit WHERE id = t_id;
 
-RAISE NOTICE 'ID: %', retval.id;
-
 RETURN retval;
 END;
 $$ LANGUAGE PLPGSQL;

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.