DataObjects/Core_company.php

diff --git a/DataObjects/Core_company.php b/DataObjects/Core_company.php
index 2a55369..d6c2787 100644 (file)
--- a/DataObjects/Core_company.php
+++ b/DataObjects/Core_company.php
@@ -254,6 +254,14 @@ class Pman_Core_DataObjects_Core_Company extends DB_DataObject
     
     function beforeInsert($q, $roo)
     {
     
     function beforeInsert($q, $roo)
     {

+        // we still use comptype in some old systems...
+        
+        if (!empty($q['comptype_id'])) {
+            $en = DB_DataObject::Factory('core_enum');
+            $en->get($q['comptype_id']);
+            $this->comptype = $en->name;
+        }
+        

         if(!empty($q['_check_name'])){
             if($this->checkName()){
                 $roo->jok('OK');
         if(!empty($q['_check_name'])){
             if($this->checkName()){
                 $roo->jok('OK');