From 7c43261ce907eea0ef2c8fd26c3a9460aba63733 Mon Sep 17 00:00:00 2001
From: Dany De Bontridder <dany@alchimerys.be>
Date: Sat, 18 Sep 2010 23:54:09 +0000
Subject: [PATCH] clean create_phpfile + upgrade

---
 .../create-file/create_phpclass.py            |  6 +--
 sql/upgrade.sql                               | 37 +++++++++++++++++++
 2 files changed, 40 insertions(+), 3 deletions(-)

diff --git a/dev/manage-code/create-file/create_phpclass.py b/dev/manage-code/create-file/create_phpclass.py
index 4e482c866..003f43c4b 100755
--- a/dev/manage-code/create-file/create_phpclass.py
+++ b/dev/manage-code/create-file/create_phpclass.py
@@ -233,7 +233,7 @@ $cn->rollback();
   
 }
 // @class_name@::test_me();
-
+?>
 """
     sChild="""<?php
 /**
@@ -357,7 +357,7 @@ $cn->rollback();
   
 }
 @class_name@::test_me();
-
+?>
 """
     sView="""<?php
 /**
@@ -432,7 +432,7 @@ class @class_name@
      return $aobj;
    }
 }
-
+?>
 
 """
 
diff --git a/sql/upgrade.sql b/sql/upgrade.sql
index 8b1378917..dfaf10b7c 100644
--- a/sql/upgrade.sql
+++ b/sql/upgrade.sql
@@ -1 +1,38 @@
+update quant_sold set qs_price=abs(qs_price)*(-1), qs_vat=abs(qs_vat)*(-1), qs_quantite=abs(qs_quantite)*(-1) where qs_price < 0 or qs_quantite < 0 or qs_vat < 0;
 
+update quant_purchase set qp_price=abs(qp_price)*(-1), qp_vat=abs(qp_vat)*(-1), qp_quantite=abs(qp_quantite)*(-1) where qp_price < 0 or qp_quantite < 0 or qp_vat < 0;
+
+set search_path=public,comptaproc;
+select fill_quant_fin();
+
+create function comptaproc.quant_purchase_ins_upd () returns trigger
+as
+$$
+	begin
+		if NEW.qp_price < 0 OR NEW.qp_quantite <0 THEN
+			NEW.qp_price := abs (NEW.qp_price)*(-1);
+			NEW.qp_quantite := abs (NEW.qp_quantite)*(-1);
+		end if;
+return NEW;
+end;
+$$ 
+language plpgsql;
+
+drop trigger if exists quant_purchase_ins_upd_tr on quant_purchase ;
+create trigger quant_sold_ins_upd_tr after insert or update on quant_purchase for each row execute procedure comptaproc.quant_purchase_ins_upd();
+
+create function comptaproc.quant_sold_ins_upd () returns trigger
+as
+$$
+	begin
+		if NEW.qs_price < 0 OR NEW.qs_quantite <0 THEN
+			NEW.qs_price := abs (NEW.qs_price)*(-1);
+			NEW.qs_quantite := abs (NEW.qs_quantite)*(-1);
+		end if;
+return NEW;
+end;
+$$ 
+language plpgsql;
+
+drop trigger if exists quant_sold_ins_upd_tr on quant_sold ;
+create trigger quant_sold_ins_upd_tr after insert or update on quant_sold for each row execute procedure comptaproc.quant_sold_ins_upd();