noalyss-commit
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Noalyss-commit] [noalyss] 103/323: Adapt to Postgresl 9


From: Dany De Bontridder
Subject: [Noalyss-commit] [noalyss] 103/323: Adapt to Postgresl 9
Date: Wed, 14 Mar 2018 17:38:33 -0400 (EDT)

sparkyx pushed a commit to branch master
in repository noalyss.

commit c9666486c9227c14b63fecd8fa587a9e100752bc
Author: Dany De Bontridder <address@hidden>
Date:   Sat Jan 27 18:20:55 2018 +0100

    Adapt to Postgresl 9
---
 html/install.php                |    4 +-
 include/lib/database.class.php  |   13 +-
 include/sql/mod1/comment.sql    |  192 --
 include/sql/mod1/constraint.sql |  414 ---
 include/sql/mod1/data.sql       |    2 +-
 include/sql/mod1/function.sql   | 2213 --------------
 include/sql/mod1/index.sql      |   33 -
 include/sql/mod1/make-sql       |   10 +-
 include/sql/mod1/schema.sql     | 6394 ---------------------------------------
 include/sql/mod1/sequence.sql   |  687 -----
 include/sql/mod1/table.sql      |  659 ----
 include/sql/mod1/view.sql       |   30 -
 include/sql/mod2/make-sql       |   29 +-
 13 files changed, 48 insertions(+), 10632 deletions(-)

diff --git a/html/install.php b/html/install.php
index 8b50ae1..20a9000 100644
--- a/html/install.php
+++ b/html/install.php
@@ -426,9 +426,9 @@ echo _("Version base de données :"),$version;
 if ( $version[0] < 9 )
   {
 ?>
-  <p><?php echo $failed . _(" Vous devez absolument utiliser au minimum une 
version 8.4 de PostGresql, si votre distribution n'en
+  <p><?php echo $failed . _(" Vous devez absolument utiliser au minimum une 
version 9 de PostGresql, si votre distribution n'en
 offre pas, installez-en une en la compilant. Lisez attentivement la notice sur 
postgresql.org pour migrer
-vos bases de donn&eacute;es")?>
+vos bases de données")?>
 </p>
 <?php exit(); //'
 } else {
diff --git a/include/lib/database.class.php b/include/lib/database.class.php
index edddef6..3b9b409 100644
--- a/include/lib/database.class.php
+++ b/include/lib/database.class.php
@@ -291,7 +291,11 @@ class Database
     {
 
         if (!DEBUG)
+        {
             ob_start();
+        } else {
+            $debug=fopen("/tmp/debug.log","w+");
+        }
         $hf=fopen($script, 'r');
         if ($hf==false)
         {
@@ -338,8 +342,9 @@ class Database
             }
             if ($flag_function)
             {
-                if (strpos(strtolower($buffer), "language plpgsql")===false&&
-                        strpos(strtolower($buffer), "language 
'plpgsql'")===false)
+                if (strpos(strtolower($buffer), "$$;")===false &&
+                        strpos(strtolower($buffer), '$_$;')===false 
+                    )
                 {
                     $sql.=$buffer;
                     continue;
@@ -348,11 +353,13 @@ class Database
             else
             {
                 // cut the semi colon
-                $buffer=str_replace(';', '', $buffer);
+//                $buffer=str_replace(';', '', $buffer);
             }
             $sql.=$buffer;
+            if ( DEBUG ) fwrite($debug, $sql);
             if ($this->exec_sql($sql)==false)
             {
+                
                 $this->rollback();
                 if (!DEBUG)
                     ob_end_clean();
diff --git a/include/sql/mod1/comment.sql b/include/sql/mod1/comment.sql
index 3eab7e7..e69de29 100644
--- a/include/sql/mod1/comment.sql
+++ b/include/sql/mod1/comment.sql
@@ -1,192 +0,0 @@
-COMMENT ON EXTENSION plpgsql IS 'PL/pgSQL procedural language';
-COMMENT ON FUNCTION correct_sequence(p_sequence text, p_col text, p_table 
text) IS ' Often the primary key is a sequence number and sometimes the value 
of the sequence is not synchronized with the primary key ( p_sequence : 
sequence name, p_col : col of the pk,p_table : concerned table';
-COMMENT ON FUNCTION format_account(p_account public.account_type) IS 'format 
the accounting :
-- upper case
-- remove space and special char.
-';
-COMMENT ON FUNCTION html_quote(p_string text) IS 'remove harmfull HTML char';
-COMMENT ON TABLE action IS 'The different privileges';
-COMMENT ON COLUMN action.ac_code IS 'this code will be used in the code with 
the function User::check_action ';
-COMMENT ON TABLE action_detail IS 'Detail of action_gestion, see class 
Action_Detail';
-COMMENT ON COLUMN action_detail.f_id IS 'the concerned card';
-COMMENT ON COLUMN action_detail.ad_text IS ' Description ';
-COMMENT ON COLUMN action_detail.ad_pu IS ' price per unit ';
-COMMENT ON COLUMN action_detail.ad_quant IS 'quantity ';
-COMMENT ON COLUMN action_detail.ad_tva_id IS ' tva_id ';
-COMMENT ON COLUMN action_detail.ad_tva_amount IS ' tva_amount ';
-COMMENT ON COLUMN action_detail.ad_total_amount IS ' total amount';
-COMMENT ON TABLE action_gestion IS 'Contains the details for the follow-up of 
customer, supplier, administration';
-COMMENT ON COLUMN action_gestion.ag_type IS ' type of action: see 
document_type ';
-COMMENT ON COLUMN action_gestion.f_id_dest IS ' third party ';
-COMMENT ON COLUMN action_gestion.ag_title IS ' title ';
-COMMENT ON COLUMN action_gestion.ag_timestamp IS ' ';
-COMMENT ON COLUMN action_gestion.ag_ref_ag_id IS ' concerning the action ';
-COMMENT ON COLUMN action_gestion.ag_ref IS 'its reference ';
-COMMENT ON COLUMN action_gestion.ag_priority IS 'Low, medium, important ';
-COMMENT ON COLUMN action_gestion.ag_dest IS ' is the profile which has to take 
care of this action ';
-COMMENT ON COLUMN action_gestion.ag_owner IS ' is the owner of this action ';
-COMMENT ON COLUMN action_gestion.ag_contact IS ' contact of the third part ';
-COMMENT ON COLUMN action_gestion.ag_state IS 'state of the action same as 
document_state ';
-COMMENT ON COLUMN action_gestion_comment.agc_id IS 'PK';
-COMMENT ON COLUMN action_gestion_comment.ag_id IS 'FK to action_gestion';
-COMMENT ON COLUMN action_gestion_comment.agc_comment IS 'comment';
-COMMENT ON COLUMN action_gestion_comment.tech_user IS 'user_login';
-COMMENT ON COLUMN action_gestion_operation.ago_id IS 'pk';
-COMMENT ON COLUMN action_gestion_operation.ag_id IS 'fk to action_gestion';
-COMMENT ON COLUMN action_gestion_operation.jr_id IS 'fk to jrn';
-COMMENT ON COLUMN action_gestion_related.aga_id IS 'pk';
-COMMENT ON COLUMN action_gestion_related.aga_least IS 'fk to action_gestion, 
smallest ag_id';
-COMMENT ON COLUMN action_gestion_related.aga_greatest IS 'fk to action_gestion 
greatest ag_id';
-COMMENT ON COLUMN action_gestion_related.aga_type IS 'Type de liens';
-COMMENT ON TABLE action_person IS 'Person involved in the action';
-COMMENT ON COLUMN action_person.ap_id IS 'pk';
-COMMENT ON COLUMN action_person.ag_id IS 'fk to fiche';
-COMMENT ON TABLE attr_def IS 'The available attributs for the cards';
-COMMENT ON TABLE attr_min IS 'The value of  attributs for the cards';
-COMMENT ON TABLE bilan IS 'contains the template and the data for generating 
different documents  ';
-COMMENT ON COLUMN bilan.b_id IS 'primary key';
-COMMENT ON COLUMN bilan.b_name IS 'Name of the document';
-COMMENT ON COLUMN bilan.b_file_template IS 'path of the template 
(document/...)';
-COMMENT ON COLUMN bilan.b_file_form IS 'path of the file with forms';
-COMMENT ON COLUMN bilan.b_type IS 'type = ODS, RTF...';
-COMMENT ON TABLE bookmark IS 'Bookmark of the connected user';
-COMMENT ON TABLE centralized IS 'The centralized journal';
-COMMENT ON TABLE document IS 'This table contains all the documents : summary 
and lob files';
-COMMENT ON TABLE document_modele IS ' contains all the template for the  
documents';
-COMMENT ON SEQUENCE document_seq IS 'Sequence for the sequence bound to the 
document modele';
-COMMENT ON TABLE document_state IS 'State of the document';
-COMMENT ON TABLE document_type IS 'Type of document : meeting, invoice,...';
-COMMENT ON COLUMN document_type.dt_prefix IS 'Prefix for ag_ref';
-COMMENT ON TABLE extension IS 'Content the needed information for the 
extension';
-COMMENT ON COLUMN extension.ex_id IS 'Primary key';
-COMMENT ON COLUMN extension.ex_name IS 'code of the extension ';
-COMMENT ON COLUMN extension.ex_code IS 'code of the extension ';
-COMMENT ON COLUMN extension.ex_desc IS 'Description of the extension ';
-COMMENT ON COLUMN extension.ex_file IS 'path to the extension to include';
-COMMENT ON COLUMN extension.ex_enable IS 'Y : enabled N : disabled ';
-COMMENT ON TABLE fiche IS 'Cards';
-COMMENT ON TABLE fiche_def IS 'Cards definition';
-COMMENT ON TABLE fiche_def_ref IS 'Family Cards definition';
-COMMENT ON TABLE fiche_detail IS 'join between the card and the attribut 
definition';
-COMMENT ON TABLE forecast IS 'contains the name of the forecast';
-COMMENT ON COLUMN forecast_cat.fc_id IS 'primary key';
-COMMENT ON COLUMN forecast_cat.fc_desc IS 'text of the category';
-COMMENT ON COLUMN forecast_cat.f_id IS 'Foreign key, it is the parent from the 
table forecast';
-COMMENT ON COLUMN forecast_cat.fc_order IS 'Order of the category, used when 
displaid';
-COMMENT ON COLUMN forecast_item.fi_id IS 'Primary key';
-COMMENT ON COLUMN forecast_item.fi_text IS 'Label of the i     tem';
-COMMENT ON COLUMN forecast_item.fi_account IS 'Accountancy entry';
-COMMENT ON COLUMN forecast_item.fi_card IS 'Card (fiche.f_id)';
-COMMENT ON COLUMN forecast_item.fi_order IS 'Order of showing (not used)';
-COMMENT ON COLUMN forecast_item.fi_amount IS 'Amount';
-COMMENT ON COLUMN forecast_item.fi_debit IS 'possible values are D or C';
-COMMENT ON COLUMN forecast_item.fi_pid IS '0 for every month, or the value 
parm_periode.p_id ';
-COMMENT ON TABLE form IS 'Forms content';
-COMMENT ON TABLE info_def IS 'Contains the types of additionnal info we can 
add to a operation';
-COMMENT ON TABLE jnt_fic_attr IS 'join between the family card and the 
attribut definition';
-COMMENT ON TABLE jrn IS 'Journal: content one line for a group of accountancy 
writing';
-COMMENT ON TABLE jrn_def IS 'Definition of a journal, his properties';
-COMMENT ON TABLE jrn_note IS 'Note about operation';
-COMMENT ON TABLE jrn_rapt IS 'Rapprochement between operation';
-COMMENT ON TABLE jrn_type IS 'Type of journal (Sell, Buy, Financial...)';
-COMMENT ON TABLE jrnx IS 'Journal: content one line for each accountancy 
writing';
-COMMENT ON TABLE key_distribution IS 'Distribution key for analytic';
-COMMENT ON COLUMN key_distribution.kd_id IS 'PK';
-COMMENT ON COLUMN key_distribution.kd_name IS 'Name of the key';
-COMMENT ON COLUMN key_distribution.kd_description IS 'Description of the key';
-COMMENT ON TABLE key_distribution_activity IS 'Contains the analytic account';
-COMMENT ON COLUMN key_distribution_activity.ka_id IS 'pk';
-COMMENT ON COLUMN key_distribution_activity.ke_id IS 'fk to 
key_distribution_detail';
-COMMENT ON COLUMN key_distribution_activity.po_id IS 'fk to poste_analytique';
-COMMENT ON COLUMN key_distribution_activity.pa_id IS 'fk to plan_analytique';
-COMMENT ON TABLE key_distribution_detail IS 'Row of activity and percent';
-COMMENT ON COLUMN key_distribution_detail.ke_id IS 'pk';
-COMMENT ON COLUMN key_distribution_detail.kd_id IS 'fk to key_distribution';
-COMMENT ON COLUMN key_distribution_detail.ke_row IS 'group order';
-COMMENT ON TABLE key_distribution_ledger IS 'Legder where the distribution key 
can be used';
-COMMENT ON COLUMN key_distribution_ledger.kl_id IS 'pk';
-COMMENT ON COLUMN key_distribution_ledger.kd_id IS 'fk to key_distribution';
-COMMENT ON COLUMN key_distribution_ledger.jrn_def_id IS 'fk to jrnd_def, 
ledger where this key is available';
-COMMENT ON COLUMN menu_ref.me_code IS 'Menu Code ';
-COMMENT ON COLUMN menu_ref.me_menu IS 'Label to display';
-COMMENT ON COLUMN menu_ref.me_file IS 'if not empty file to include';
-COMMENT ON COLUMN menu_ref.me_url IS 'url ';
-COMMENT ON COLUMN menu_ref.me_type IS 'ME for menu
-PR for Printing
-SP for special meaning (ex: return to line)
-PL for plugin';
-COMMENT ON TABLE mod_payment IS 'Contains the different media of payment and 
the corresponding ledger';
-COMMENT ON COLUMN mod_payment.jrn_def_id IS 'Ledger using this payment method';
-COMMENT ON TABLE op_predef IS 'predefined operation';
-COMMENT ON COLUMN op_predef.jrn_def_id IS 'jrn_id';
-COMMENT ON COLUMN op_predef.od_name IS 'name of the operation';
-COMMENT ON TABLE op_predef_detail IS 'contains the detail of predefined 
operations';
-COMMENT ON TABLE operation_analytique IS 'History of the analytic account';
-COMMENT ON COLUMN operation_analytique.oa_jrnx_id_source IS 'jrnx.j_id source 
of this amount, this amount is computed from an amount giving a ND VAT.Normally 
NULL  is there is no ND VAT.';
-COMMENT ON COLUMN operation_analytique.oa_positive IS 'Sign of the amount';
-COMMENT ON TABLE parameter IS 'parameter of the company';
-COMMENT ON TABLE parm_money IS 'Currency conversion';
-COMMENT ON TABLE parm_periode IS 'Periode definition';
-COMMENT ON TABLE parm_poste IS 'Contains data for finding is the type of the 
account (asset)';
-COMMENT ON TABLE plan_analytique IS 'Plan Analytique (max 5)';
-COMMENT ON TABLE poste_analytique IS 'Poste Analytique';
-COMMENT ON TABLE profile IS 'Available profile ';
-COMMENT ON COLUMN profile.p_name IS 'Name of the profile';
-COMMENT ON COLUMN profile.p_desc IS 'description of the profile';
-COMMENT ON COLUMN profile.with_calc IS 'show the calculator';
-COMMENT ON COLUMN profile.with_direct_form IS 'show the direct form';
-COMMENT ON TABLE profile_menu IS 'Join  between the profile and the menu ';
-COMMENT ON COLUMN profile_menu.me_code_dep IS 'menu code dependency';
-COMMENT ON COLUMN profile_menu.p_id IS 'link to profile';
-COMMENT ON COLUMN profile_menu.p_order IS 'order of displaying menu';
-COMMENT ON COLUMN profile_menu.p_type_display IS 'M is a module
-E is a menu
-S is a select (for plugin)';
-COMMENT ON COLUMN profile_menu.pm_default IS 'default menu';
-COMMENT ON COLUMN profile_menu.pm_id_dep IS 'parent of this menu item';
-COMMENT ON TABLE profile_sec_repository IS 'Available profile for user';
-COMMENT ON COLUMN profile_sec_repository.ur_id IS 'pk';
-COMMENT ON COLUMN profile_sec_repository.p_id IS 'fk to profile';
-COMMENT ON COLUMN profile_sec_repository.r_id IS 'fk to stock_repository';
-COMMENT ON COLUMN profile_sec_repository.ur_right IS 'Type of right : R for 
readonly W for write';
-COMMENT ON TABLE profile_user IS 'Contains the available profile for users';
-COMMENT ON COLUMN profile_user.user_name IS 'fk to available_user : login';
-COMMENT ON COLUMN profile_user.p_id IS 'fk to profile';
-COMMENT ON TABLE quant_fin IS 'Simple operation for financial';
-COMMENT ON COLUMN quant_purchase.qp_vat_sided IS 'amount of the VAT which 
avoid VAT, case of the VAT which add the same amount at the deb and cred';
-COMMENT ON TABLE quant_sold IS 'Contains about invoice for customer';
-COMMENT ON TABLE stock_goods IS 'About the goods';
-COMMENT ON TABLE stock_repository IS 'stock repository';
-COMMENT ON COLUMN stock_repository.r_id IS 'pk';
-COMMENT ON COLUMN stock_repository.r_name IS 'name of the stock';
-COMMENT ON COLUMN stock_repository.r_adress IS 'adress of the stock';
-COMMENT ON COLUMN stock_repository.r_country IS 'country of the stock';
-COMMENT ON COLUMN stock_repository.r_city IS 'City of the stock';
-COMMENT ON COLUMN stock_repository.r_phone IS 'Phone number';
-COMMENT ON TABLE tmp_pcmn IS 'Plan comptable minimum normalisé';
-COMMENT ON TABLE todo_list IS 'Todo list';
-COMMENT ON COLUMN todo_list.is_public IS 'Flag for the public parameter';
-COMMENT ON TABLE todo_list_shared IS 'Note of todo list shared with other 
users';
-COMMENT ON COLUMN todo_list_shared.todo_list_id IS 'fk to todo_list';
-COMMENT ON COLUMN todo_list_shared.use_login IS 'user login';
-COMMENT ON TABLE tva_rate IS 'Rate of vat';
-COMMENT ON TABLE user_local_pref IS 'The user''s local parameter ';
-COMMENT ON COLUMN user_local_pref.user_id IS 'user''s login ';
-COMMENT ON COLUMN user_local_pref.parameter_type IS 'the type of parameter ';
-COMMENT ON COLUMN user_local_pref.parameter_value IS 'the value of parameter ';
-COMMENT ON TABLE user_sec_action_profile IS 'Available profile for user';
-COMMENT ON COLUMN user_sec_action_profile.ua_id IS 'pk';
-COMMENT ON COLUMN user_sec_action_profile.p_id IS 'fk to profile';
-COMMENT ON COLUMN user_sec_action_profile.ua_right IS 'Type of right : R for 
readonly W for write';
-COMMENT ON VIEW v_menu_description IS 'Description des menus';
-COMMENT ON VIEW v_menu_profile IS 'Give the profile and the menu + 
dependencies';
-COMMENT ON VIEW vw_fiche_def IS 'all the attributs for card family';
-COMMENT ON CONSTRAINT uniq_user_ledger ON user_sec_jrn IS 'Create an unique 
combination user / ledger';
-COMMENT ON TRIGGER action_gestion_t_insert_update ON action_gestion IS 
'Truncate the column ag_title to 70 char';
-COMMENT ON TRIGGER profile_user_ins_upd ON profile_user IS 'Force the column 
user_name to lowercase';
-COMMENT ON TRIGGER t_jrnx_ins ON jrnx IS 'check that the qcode used by the 
card exists and format it : uppercase and trim the space';
-COMMENT ON TRIGGER t_letter_del ON jrnx IS 'Delete the lettering for this row';
-COMMENT ON TRIGGER todo_list_ins_upd ON todo_list IS 'Force the column 
use_login to lowercase';
-COMMENT ON TRIGGER todo_list_shared_ins_upd ON todo_list_shared IS 'Force the 
column ua_login to lowercase';
-COMMENT ON TRIGGER user_sec_act_ins_upd ON user_sec_act IS 'Force the column 
ua_login to lowercase';
-COMMENT ON TRIGGER user_sec_jrn_after_ins_upd ON user_sec_jrn IS 'Force the 
column uj_login to lowercase';
diff --git a/include/sql/mod1/constraint.sql b/include/sql/mod1/constraint.sql
index 5b0ed37..6aa16aa 100644
--- a/include/sql/mod1/constraint.sql
+++ b/include/sql/mod1/constraint.sql
@@ -2,417 +2,3 @@
  SET check_function_bodies = false;
  SET client_min_messages = warning;
 SET search_path = public, pg_catalog;
-ALTER TABLE ONLY action_detail ALTER COLUMN ad_id SET DEFAULT 
nextval('action_detail_ad_id_seq'::regclass);
-ALTER TABLE ONLY action_gestion_comment ALTER COLUMN agc_id SET DEFAULT 
nextval('action_gestion_comment_agc_id_seq'::regclass);
-ALTER TABLE ONLY action_gestion_operation ALTER COLUMN ago_id SET DEFAULT 
nextval('action_gestion_operation_ago_id_seq'::regclass);
-ALTER TABLE ONLY action_gestion_related ALTER COLUMN aga_id SET DEFAULT 
nextval('action_gestion_related_aga_id_seq'::regclass);
-ALTER TABLE ONLY action_person ALTER COLUMN ap_id SET DEFAULT 
nextval('action_person_ap_id_seq'::regclass);
-ALTER TABLE ONLY action_tags ALTER COLUMN at_id SET DEFAULT 
nextval('action_tags_at_id_seq'::regclass);
-ALTER TABLE ONLY bookmark ALTER COLUMN b_id SET DEFAULT 
nextval('bookmark_b_id_seq'::regclass);
-ALTER TABLE ONLY del_action ALTER COLUMN del_id SET DEFAULT 
nextval('del_action_del_id_seq'::regclass);
-ALTER TABLE ONLY del_jrn ALTER COLUMN dj_id SET DEFAULT 
nextval('del_jrn_dj_id_seq'::regclass);
-ALTER TABLE ONLY del_jrnx ALTER COLUMN djx_id SET DEFAULT 
nextval('del_jrnx_djx_id_seq'::regclass);
-ALTER TABLE ONLY extension ALTER COLUMN ex_id SET DEFAULT 
nextval('extension_ex_id_seq'::regclass);
-ALTER TABLE ONLY forecast ALTER COLUMN f_id SET DEFAULT 
nextval('forecast_f_id_seq'::regclass);
-ALTER TABLE ONLY forecast_cat ALTER COLUMN fc_id SET DEFAULT 
nextval('forecast_cat_fc_id_seq'::regclass);
-ALTER TABLE ONLY forecast_item ALTER COLUMN fi_id SET DEFAULT 
nextval('forecast_item_fi_id_seq'::regclass);
-ALTER TABLE ONLY jnt_letter ALTER COLUMN jl_id SET DEFAULT 
nextval('jnt_letter_jl_id_seq'::regclass);
-ALTER TABLE ONLY jrn_info ALTER COLUMN ji_id SET DEFAULT 
nextval('jrn_info_ji_id_seq'::regclass);
-ALTER TABLE ONLY jrn_note ALTER COLUMN n_id SET DEFAULT 
nextval('jrn_note_n_id_seq'::regclass);
-ALTER TABLE ONLY key_distribution ALTER COLUMN kd_id SET DEFAULT 
nextval('key_distribution_kd_id_seq'::regclass);
-ALTER TABLE ONLY key_distribution_activity ALTER COLUMN ka_id SET DEFAULT 
nextval('key_distribution_activity_ka_id_seq'::regclass);
-ALTER TABLE ONLY key_distribution_detail ALTER COLUMN ke_id SET DEFAULT 
nextval('key_distribution_detail_ke_id_seq'::regclass);
-ALTER TABLE ONLY key_distribution_ledger ALTER COLUMN kl_id SET DEFAULT 
nextval('key_distribution_ledger_kl_id_seq'::regclass);
-ALTER TABLE ONLY letter_cred ALTER COLUMN lc_id SET DEFAULT 
nextval('letter_cred_lc_id_seq'::regclass);
-ALTER TABLE ONLY letter_deb ALTER COLUMN ld_id SET DEFAULT 
nextval('letter_deb_ld_id_seq'::regclass);
-ALTER TABLE ONLY link_action_type ALTER COLUMN l_id SET DEFAULT 
nextval('link_action_type_l_id_seq'::regclass);
-ALTER TABLE ONLY menu_default ALTER COLUMN md_id SET DEFAULT 
nextval('menu_default_md_id_seq'::regclass);
-ALTER TABLE ONLY mod_payment ALTER COLUMN mp_id SET DEFAULT 
nextval('mod_payment_mp_id_seq'::regclass);
-ALTER TABLE ONLY profile ALTER COLUMN p_id SET DEFAULT 
nextval('profile_p_id_seq'::regclass);
-ALTER TABLE ONLY profile_menu ALTER COLUMN pm_id SET DEFAULT 
nextval('profile_menu_pm_id_seq'::regclass);
-ALTER TABLE ONLY profile_sec_repository ALTER COLUMN ur_id SET DEFAULT 
nextval('profile_sec_repository_ur_id_seq'::regclass);
-ALTER TABLE ONLY profile_user ALTER COLUMN pu_id SET DEFAULT 
nextval('profile_user_pu_id_seq'::regclass);
-ALTER TABLE ONLY quant_fin ALTER COLUMN qf_id SET DEFAULT 
nextval('quant_fin_qf_id_seq'::regclass);
-ALTER TABLE ONLY stock_change ALTER COLUMN c_id SET DEFAULT 
nextval('stock_change_c_id_seq'::regclass);
-ALTER TABLE ONLY stock_repository ALTER COLUMN r_id SET DEFAULT 
nextval('stock_repository_r_id_seq'::regclass);
-ALTER TABLE ONLY tags ALTER COLUMN t_id SET DEFAULT 
nextval('tags_t_id_seq'::regclass);
-ALTER TABLE ONLY tmp_stockgood ALTER COLUMN s_id SET DEFAULT 
nextval('tmp_stockgood_s_id_seq'::regclass);
-ALTER TABLE ONLY tmp_stockgood_detail ALTER COLUMN d_id SET DEFAULT 
nextval('tmp_stockgood_detail_d_id_seq'::regclass);
-ALTER TABLE ONLY todo_list_shared ALTER COLUMN id SET DEFAULT 
nextval('todo_list_shared_id_seq'::regclass);
-ALTER TABLE ONLY user_sec_action_profile ALTER COLUMN ua_id SET DEFAULT 
nextval('user_sec_action_profile_ua_id_seq'::regclass);
-ALTER TABLE ONLY action_gestion_operation
-    ADD CONSTRAINT action_comment_operation_pkey PRIMARY KEY (ago_id);
-ALTER TABLE ONLY action_detail
-    ADD CONSTRAINT action_detail_pkey PRIMARY KEY (ad_id);
-ALTER TABLE ONLY action_gestion_comment
-    ADD CONSTRAINT action_gestion_comment_pkey PRIMARY KEY (agc_id);
-ALTER TABLE ONLY action_gestion
-    ADD CONSTRAINT action_gestion_pkey PRIMARY KEY (ag_id);
-ALTER TABLE ONLY action_gestion_related
-    ADD CONSTRAINT action_gestion_related_pkey PRIMARY KEY (aga_id);
-ALTER TABLE ONLY action_person
-    ADD CONSTRAINT action_person_pkey PRIMARY KEY (ap_id);
-ALTER TABLE ONLY action
-    ADD CONSTRAINT action_pkey PRIMARY KEY (ac_id);
-ALTER TABLE ONLY action_tags
-    ADD CONSTRAINT action_tags_pkey PRIMARY KEY (at_id);
-ALTER TABLE ONLY attr_def
-    ADD CONSTRAINT attr_def_pkey PRIMARY KEY (ad_id);
-ALTER TABLE ONLY bilan
-    ADD CONSTRAINT bilan_b_name_key UNIQUE (b_name);
-ALTER TABLE ONLY bilan
-    ADD CONSTRAINT bilan_pkey PRIMARY KEY (b_id);
-ALTER TABLE ONLY bookmark
-    ADD CONSTRAINT bookmark_pkey PRIMARY KEY (b_id);
-ALTER TABLE ONLY centralized
-    ADD CONSTRAINT centralized_pkey PRIMARY KEY (c_id);
-ALTER TABLE ONLY del_action
-    ADD CONSTRAINT del_action_pkey PRIMARY KEY (del_id);
-ALTER TABLE ONLY del_jrn
-    ADD CONSTRAINT dj_id PRIMARY KEY (dj_id);
-ALTER TABLE ONLY del_jrnx
-    ADD CONSTRAINT djx_id PRIMARY KEY (djx_id);
-ALTER TABLE ONLY document_modele
-    ADD CONSTRAINT document_modele_pkey PRIMARY KEY (md_id);
-ALTER TABLE ONLY document
-    ADD CONSTRAINT document_pkey PRIMARY KEY (d_id);
-ALTER TABLE ONLY document_state
-    ADD CONSTRAINT document_state_pkey PRIMARY KEY (s_id);
-ALTER TABLE ONLY document_type
-    ADD CONSTRAINT document_type_pkey PRIMARY KEY (dt_id);
-ALTER TABLE ONLY fiche_def
-    ADD CONSTRAINT fiche_def_pkey PRIMARY KEY (fd_id);
-ALTER TABLE ONLY fiche_def_ref
-    ADD CONSTRAINT fiche_def_ref_pkey PRIMARY KEY (frd_id);
-ALTER TABLE ONLY fiche
-    ADD CONSTRAINT fiche_pkey PRIMARY KEY (f_id);
-ALTER TABLE ONLY forecast_cat
-    ADD CONSTRAINT forecast_cat_pk PRIMARY KEY (fc_id);
-ALTER TABLE ONLY forecast_item
-    ADD CONSTRAINT forecast_item_pkey PRIMARY KEY (fi_id);
-ALTER TABLE ONLY forecast
-    ADD CONSTRAINT forecast_pk PRIMARY KEY (f_id);
-ALTER TABLE ONLY form
-    ADD CONSTRAINT form_pkey PRIMARY KEY (fo_id);
-ALTER TABLE ONLY formdef
-    ADD CONSTRAINT formdef_pkey PRIMARY KEY (fr_id);
-ALTER TABLE ONLY attr_min
-    ADD CONSTRAINT frd_ad_attr_min_pk PRIMARY KEY (frd_id, ad_id);
-ALTER TABLE ONLY operation_analytique
-    ADD CONSTRAINT historique_analytique_pkey PRIMARY KEY (oa_id);
-ALTER TABLE ONLY extension
-    ADD CONSTRAINT idx_ex_code UNIQUE (ex_code);
-ALTER TABLE ONLY info_def
-    ADD CONSTRAINT info_def_pkey PRIMARY KEY (id_type);
-ALTER TABLE ONLY fiche_detail
-    ADD CONSTRAINT jnt_fic_att_value_pkey PRIMARY KEY (jft_id);
-ALTER TABLE ONLY jnt_letter
-    ADD CONSTRAINT jnt_letter_pk PRIMARY KEY (jl_id);
-ALTER TABLE ONLY jrn_def
-    ADD CONSTRAINT jrn_def_jrn_def_name_key UNIQUE (jrn_def_name);
-ALTER TABLE ONLY jrn_def
-    ADD CONSTRAINT jrn_def_pkey PRIMARY KEY (jrn_def_id);
-ALTER TABLE ONLY jrn_info
-    ADD CONSTRAINT jrn_info_pkey PRIMARY KEY (ji_id);
-ALTER TABLE ONLY jrn_periode
-    ADD CONSTRAINT jrn_periode_pk PRIMARY KEY (jrn_def_id, p_id);
-ALTER TABLE ONLY jrn
-    ADD CONSTRAINT jrn_pkey PRIMARY KEY (jr_id, jr_def_id);
-ALTER TABLE ONLY jrn_rapt
-    ADD CONSTRAINT jrn_rapt_pkey PRIMARY KEY (jra_id);
-ALTER TABLE ONLY jrn_type
-    ADD CONSTRAINT jrn_type_pkey PRIMARY KEY (jrn_type_id);
-ALTER TABLE ONLY jrn_note
-    ADD CONSTRAINT jrnx_note_pkey PRIMARY KEY (n_id);
-ALTER TABLE ONLY jrnx
-    ADD CONSTRAINT jrnx_pkey PRIMARY KEY (j_id);
-ALTER TABLE ONLY key_distribution_activity
-    ADD CONSTRAINT key_distribution_activity_pkey PRIMARY KEY (ka_id);
-ALTER TABLE ONLY key_distribution_detail
-    ADD CONSTRAINT key_distribution_detail_pkey PRIMARY KEY (ke_id);
-ALTER TABLE ONLY key_distribution_ledger
-    ADD CONSTRAINT key_distribution_ledger_pkey PRIMARY KEY (kl_id);
-ALTER TABLE ONLY key_distribution
-    ADD CONSTRAINT key_distribution_pkey PRIMARY KEY (kd_id);
-ALTER TABLE ONLY letter_cred
-    ADD CONSTRAINT letter_cred_j_id_key UNIQUE (j_id);
-ALTER TABLE ONLY letter_cred
-    ADD CONSTRAINT letter_cred_pk PRIMARY KEY (lc_id);
-ALTER TABLE ONLY letter_deb
-    ADD CONSTRAINT letter_deb_j_id_key UNIQUE (j_id);
-ALTER TABLE ONLY letter_deb
-    ADD CONSTRAINT letter_deb_pk PRIMARY KEY (ld_id);
-ALTER TABLE ONLY link_action_type
-    ADD CONSTRAINT link_action_type_pkey PRIMARY KEY (l_id);
-ALTER TABLE ONLY menu_default
-    ADD CONSTRAINT menu_default_md_code_key UNIQUE (md_code);
-ALTER TABLE ONLY menu_default
-    ADD CONSTRAINT menu_default_pkey PRIMARY KEY (md_id);
-ALTER TABLE ONLY menu_ref
-    ADD CONSTRAINT menu_ref_pkey PRIMARY KEY (me_code);
-ALTER TABLE ONLY mod_payment
-    ADD CONSTRAINT mod_payment_pkey PRIMARY KEY (mp_id);
-ALTER TABLE ONLY op_predef
-    ADD CONSTRAINT op_def_op_name_key UNIQUE (od_name, jrn_def_id);
-ALTER TABLE ONLY op_predef
-    ADD CONSTRAINT op_def_pkey PRIMARY KEY (od_id);
-ALTER TABLE ONLY op_predef_detail
-    ADD CONSTRAINT op_predef_detail_pkey PRIMARY KEY (opd_id);
-ALTER TABLE ONLY parameter
-    ADD CONSTRAINT parameter_pkey PRIMARY KEY (pr_id);
-ALTER TABLE ONLY parm_code
-    ADD CONSTRAINT parm_code_pkey PRIMARY KEY (p_code);
-ALTER TABLE ONLY parm_money
-    ADD CONSTRAINT parm_money_pkey PRIMARY KEY (pm_code);
-ALTER TABLE ONLY parm_periode
-    ADD CONSTRAINT parm_periode_pkey PRIMARY KEY (p_id);
-ALTER TABLE ONLY parm_poste
-    ADD CONSTRAINT parm_poste_pkey PRIMARY KEY (p_value);
-ALTER TABLE ONLY extension
-    ADD CONSTRAINT pk_extension PRIMARY KEY (ex_id);
-ALTER TABLE ONLY groupe_analytique
-    ADD CONSTRAINT pk_ga_id PRIMARY KEY (ga_id);
-ALTER TABLE ONLY jnt_fic_attr
-    ADD CONSTRAINT pk_jnt_fic_attr PRIMARY KEY (jnt_id);
-ALTER TABLE ONLY user_local_pref
-    ADD CONSTRAINT pk_user_local_pref PRIMARY KEY (user_id, parameter_type);
-ALTER TABLE ONLY plan_analytique
-    ADD CONSTRAINT plan_analytique_pa_name_key UNIQUE (pa_name);
-ALTER TABLE ONLY plan_analytique
-    ADD CONSTRAINT plan_analytique_pkey PRIMARY KEY (pa_id);
-ALTER TABLE ONLY poste_analytique
-    ADD CONSTRAINT poste_analytique_pkey PRIMARY KEY (po_id);
-ALTER TABLE ONLY profile_menu
-    ADD CONSTRAINT profile_menu_pkey PRIMARY KEY (pm_id);
-ALTER TABLE ONLY profile_menu_type
-    ADD CONSTRAINT profile_menu_type_pkey PRIMARY KEY (pm_type);
-ALTER TABLE ONLY profile
-    ADD CONSTRAINT profile_pkey PRIMARY KEY (p_id);
-ALTER TABLE ONLY profile_sec_repository
-    ADD CONSTRAINT profile_sec_repository_pkey PRIMARY KEY (ur_id);
-ALTER TABLE ONLY profile_sec_repository
-    ADD CONSTRAINT profile_sec_repository_r_id_p_id_u UNIQUE (r_id, p_id);
-ALTER TABLE ONLY profile_user
-    ADD CONSTRAINT profile_user_pkey PRIMARY KEY (pu_id);
-ALTER TABLE ONLY profile_user
-    ADD CONSTRAINT profile_user_user_name_key UNIQUE (user_name, p_id);
-ALTER TABLE ONLY quant_purchase
-    ADD CONSTRAINT qp_id_pk PRIMARY KEY (qp_id);
-ALTER TABLE ONLY quant_sold
-    ADD CONSTRAINT qs_id_pk PRIMARY KEY (qs_id);
-ALTER TABLE ONLY quant_fin
-    ADD CONSTRAINT quant_fin_pk PRIMARY KEY (qf_id);
-ALTER TABLE ONLY stock_change
-    ADD CONSTRAINT stock_change_pkey PRIMARY KEY (c_id);
-ALTER TABLE ONLY stock_goods
-    ADD CONSTRAINT stock_goods_pkey PRIMARY KEY (sg_id);
-ALTER TABLE ONLY stock_repository
-    ADD CONSTRAINT stock_repository_pkey PRIMARY KEY (r_id);
-ALTER TABLE ONLY tags
-    ADD CONSTRAINT tags_pkey PRIMARY KEY (t_id);
-ALTER TABLE ONLY tmp_pcmn
-    ADD CONSTRAINT tmp_pcmn_pkey PRIMARY KEY (pcm_val);
-ALTER TABLE ONLY tmp_stockgood_detail
-    ADD CONSTRAINT tmp_stockgood_detail_pkey PRIMARY KEY (d_id);
-ALTER TABLE ONLY tmp_stockgood
-    ADD CONSTRAINT tmp_stockgood_pkey PRIMARY KEY (s_id);
-ALTER TABLE ONLY todo_list
-    ADD CONSTRAINT todo_list_pkey PRIMARY KEY (tl_id);
-ALTER TABLE ONLY todo_list_shared
-    ADD CONSTRAINT todo_list_shared_pkey PRIMARY KEY (id);
-ALTER TABLE ONLY tool_uos
-    ADD CONSTRAINT tool_uos_pkey PRIMARY KEY (uos_value);
-ALTER TABLE ONLY tva_rate
-    ADD CONSTRAINT tva_id_pk PRIMARY KEY (tva_id);
-ALTER TABLE ONLY user_sec_jrn
-    ADD CONSTRAINT uniq_user_ledger UNIQUE (uj_login, uj_jrn_id);
-ALTER TABLE ONLY todo_list_shared
-    ADD CONSTRAINT unique_todo_list_id_login UNIQUE (todo_list_id, use_login);
-ALTER TABLE ONLY user_sec_act
-    ADD CONSTRAINT user_sec_act_pkey PRIMARY KEY (ua_id);
-ALTER TABLE ONLY user_sec_action_profile
-    ADD CONSTRAINT user_sec_action_profile_p_id_p_granted_u UNIQUE (p_id, 
p_granted);
-ALTER TABLE ONLY user_sec_action_profile
-    ADD CONSTRAINT user_sec_action_profile_pkey PRIMARY KEY (ua_id);
-ALTER TABLE ONLY user_sec_jrn
-    ADD CONSTRAINT user_sec_jrn_pkey PRIMARY KEY (uj_id);
-ALTER TABLE ONLY action_gestion_related
-    ADD CONSTRAINT ux_aga_least_aga_greatest UNIQUE (aga_least, aga_greatest);
-ALTER TABLE ONLY jrn
-    ADD CONSTRAINT ux_internal UNIQUE (jr_internal);
-ALTER TABLE ONLY centralized
-    ADD CONSTRAINT "$1" FOREIGN KEY (c_jrn_def) REFERENCES jrn_def(jrn_def_id);
-ALTER TABLE ONLY user_sec_act
-    ADD CONSTRAINT "$1" FOREIGN KEY (ua_act_id) REFERENCES action(ac_id);
-ALTER TABLE ONLY fiche_def
-    ADD CONSTRAINT "$1" FOREIGN KEY (frd_id) REFERENCES fiche_def_ref(frd_id);
-ALTER TABLE ONLY attr_min
-    ADD CONSTRAINT "$1" FOREIGN KEY (frd_id) REFERENCES fiche_def_ref(frd_id);
-ALTER TABLE ONLY fiche
-    ADD CONSTRAINT "$1" FOREIGN KEY (fd_id) REFERENCES fiche_def(fd_id);
-ALTER TABLE ONLY fiche_detail
-    ADD CONSTRAINT "$1" FOREIGN KEY (f_id) REFERENCES fiche(f_id);
-ALTER TABLE ONLY jnt_fic_attr
-    ADD CONSTRAINT "$1" FOREIGN KEY (fd_id) REFERENCES fiche_def(fd_id);
-ALTER TABLE ONLY jrn
-    ADD CONSTRAINT "$1" FOREIGN KEY (jr_def_id) REFERENCES jrn_def(jrn_def_id);
-ALTER TABLE ONLY jrn_def
-    ADD CONSTRAINT "$1" FOREIGN KEY (jrn_def_type) REFERENCES 
jrn_type(jrn_type_id);
-ALTER TABLE ONLY jrnx
-    ADD CONSTRAINT "$2" FOREIGN KEY (j_jrn_def) REFERENCES jrn_def(jrn_def_id);
-ALTER TABLE ONLY attr_min
-    ADD CONSTRAINT "$2" FOREIGN KEY (ad_id) REFERENCES attr_def(ad_id);
-ALTER TABLE ONLY action_gestion_operation
-    ADD CONSTRAINT action_comment_operation_ag_id_fkey FOREIGN KEY (ag_id) 
REFERENCES action_gestion(ag_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY action_gestion_operation
-    ADD CONSTRAINT action_comment_operation_jr_id_fkey FOREIGN KEY (jr_id) 
REFERENCES jrn(jr_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY action_detail
-    ADD CONSTRAINT action_detail_ag_id_fkey FOREIGN KEY (ag_id) REFERENCES 
action_gestion(ag_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY action_person
-    ADD CONSTRAINT action_gestion_ag_id_fk2 FOREIGN KEY (ag_id) REFERENCES 
action_gestion(ag_id);
-ALTER TABLE ONLY action_gestion_comment
-    ADD CONSTRAINT action_gestion_comment_ag_id_fkey FOREIGN KEY (ag_id) 
REFERENCES action_gestion(ag_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY action_gestion_related
-    ADD CONSTRAINT action_gestion_related_aga_greatest_fkey FOREIGN KEY 
(aga_greatest) REFERENCES action_gestion(ag_id) ON UPDATE CASCADE ON DELETE 
CASCADE;
-ALTER TABLE ONLY action_gestion_related
-    ADD CONSTRAINT action_gestion_related_aga_least_fkey FOREIGN KEY 
(aga_least) REFERENCES action_gestion(ag_id) ON UPDATE CASCADE ON DELETE 
CASCADE;
-ALTER TABLE ONLY action_gestion_related
-    ADD CONSTRAINT action_gestion_related_aga_type_fkey FOREIGN KEY (aga_type) 
REFERENCES link_action_type(l_id);
-ALTER TABLE ONLY action_person
-    ADD CONSTRAINT action_person_ag_id_fkey FOREIGN KEY (ag_id) REFERENCES 
action_gestion(ag_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY action_person
-    ADD CONSTRAINT action_person_f_id_fkey FOREIGN KEY (f_id) REFERENCES 
fiche(f_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY action_tags
-    ADD CONSTRAINT action_tags_ag_id_fkey FOREIGN KEY (ag_id) REFERENCES 
action_gestion(ag_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY action_tags
-    ADD CONSTRAINT action_tags_t_id_fkey FOREIGN KEY (t_id) REFERENCES 
tags(t_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY forecast_item
-    ADD CONSTRAINT card FOREIGN KEY (fi_card) REFERENCES fiche(f_id) ON UPDATE 
CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY fiche_detail
-    ADD CONSTRAINT fiche_detail_attr_def_fk FOREIGN KEY (ad_id) REFERENCES 
attr_def(ad_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY action_person
-    ADD CONSTRAINT fiche_f_id_fk2 FOREIGN KEY (f_id) REFERENCES fiche(f_id);
-ALTER TABLE ONLY action_gestion
-    ADD CONSTRAINT fiche_f_id_fk3 FOREIGN KEY (f_id_dest) REFERENCES 
fiche(f_id);
-ALTER TABLE ONLY action_gestion
-    ADD CONSTRAINT fk_action_gestion_document_type FOREIGN KEY (ag_type) 
REFERENCES document_type(dt_id);
-ALTER TABLE ONLY quant_fin
-    ADD CONSTRAINT fk_card FOREIGN KEY (qf_bank) REFERENCES fiche(f_id) ON 
UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY quant_fin
-    ADD CONSTRAINT fk_card_other FOREIGN KEY (qf_other) REFERENCES fiche(f_id) 
ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY forecast_item
-    ADD CONSTRAINT fk_forecast FOREIGN KEY (fc_id) REFERENCES 
forecast_cat(fc_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY jrn_info
-    ADD CONSTRAINT fk_info_def FOREIGN KEY (id_type) REFERENCES 
info_def(id_type) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY jrn_info
-    ADD CONSTRAINT fk_jrn FOREIGN KEY (jr_id) REFERENCES jrn(jr_id) ON UPDATE 
CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY quant_fin
-    ADD CONSTRAINT fk_jrn FOREIGN KEY (jr_id) REFERENCES jrn(jr_id) ON UPDATE 
CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY groupe_analytique
-    ADD CONSTRAINT fk_pa_id FOREIGN KEY (pa_id) REFERENCES 
plan_analytique(pa_id) ON DELETE CASCADE;
-ALTER TABLE ONLY jrnx
-    ADD CONSTRAINT fk_pcmn_val FOREIGN KEY (j_poste) REFERENCES 
tmp_pcmn(pcm_val);
-ALTER TABLE ONLY centralized
-    ADD CONSTRAINT fk_pcmn_val FOREIGN KEY (c_poste) REFERENCES 
tmp_pcmn(pcm_val);
-ALTER TABLE ONLY stock_goods
-    ADD CONSTRAINT fk_stock_good_f_id FOREIGN KEY (f_id) REFERENCES 
fiche(f_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY todo_list_shared
-    ADD CONSTRAINT fk_todo_list_shared_todo_list FOREIGN KEY (todo_list_id) 
REFERENCES todo_list(tl_id);
-ALTER TABLE ONLY forecast_cat
-    ADD CONSTRAINT forecast_child FOREIGN KEY (f_id) REFERENCES forecast(f_id) 
ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY forecast
-    ADD CONSTRAINT forecast_f_end_date_fkey FOREIGN KEY (f_end_date) 
REFERENCES parm_periode(p_id) ON UPDATE SET NULL ON DELETE SET NULL;
-ALTER TABLE ONLY forecast
-    ADD CONSTRAINT forecast_f_start_date_fkey FOREIGN KEY (f_start_date) 
REFERENCES parm_periode(p_id) ON UPDATE SET NULL ON DELETE SET NULL;
-ALTER TABLE ONLY form
-    ADD CONSTRAINT formdef_fk FOREIGN KEY (fo_fr_id) REFERENCES formdef(fr_id) 
ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY letter_cred
-    ADD CONSTRAINT jnt_cred_fk FOREIGN KEY (jl_id) REFERENCES 
jnt_letter(jl_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY letter_deb
-    ADD CONSTRAINT jnt_deb_fk FOREIGN KEY (jl_id) REFERENCES jnt_letter(jl_id) 
ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY jnt_fic_attr
-    ADD CONSTRAINT jnt_fic_attr_attr_def_fk FOREIGN KEY (ad_id) REFERENCES 
attr_def(ad_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY op_predef
-    ADD CONSTRAINT jrn_def_id_fk FOREIGN KEY (jrn_def_id) REFERENCES 
jrn_def(jrn_def_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY jrn_periode
-    ADD CONSTRAINT jrn_per_jrn_def_id FOREIGN KEY (jrn_def_id) REFERENCES 
jrn_def(jrn_def_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY jrn_periode
-    ADD CONSTRAINT jrn_periode_p_id FOREIGN KEY (p_id) REFERENCES 
parm_periode(p_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY jrn_rapt
-    ADD CONSTRAINT jrn_rapt_jr_id_fkey FOREIGN KEY (jr_id) REFERENCES 
jrn(jr_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY jrn_rapt
-    ADD CONSTRAINT jrn_rapt_jra_concerned_fkey FOREIGN KEY (jra_concerned) 
REFERENCES jrn(jr_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY jrnx
-    ADD CONSTRAINT jrnx_f_id_fkey FOREIGN KEY (f_id) REFERENCES fiche(f_id) ON 
UPDATE CASCADE;
-ALTER TABLE ONLY jrn_note
-    ADD CONSTRAINT jrnx_note_j_id_fkey FOREIGN KEY (jr_id) REFERENCES 
jrn(jr_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY key_distribution_activity
-    ADD CONSTRAINT key_distribution_activity_ke_id_fkey FOREIGN KEY (ke_id) 
REFERENCES key_distribution_detail(ke_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY key_distribution_activity
-    ADD CONSTRAINT key_distribution_activity_pa_id_fkey FOREIGN KEY (pa_id) 
REFERENCES plan_analytique(pa_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY key_distribution_activity
-    ADD CONSTRAINT key_distribution_activity_po_id_fkey FOREIGN KEY (po_id) 
REFERENCES poste_analytique(po_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY key_distribution_detail
-    ADD CONSTRAINT key_distribution_detail_kd_id_fkey FOREIGN KEY (kd_id) 
REFERENCES key_distribution(kd_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY key_distribution_ledger
-    ADD CONSTRAINT key_distribution_ledger_jrn_def_id_fkey FOREIGN KEY 
(jrn_def_id) REFERENCES jrn_def(jrn_def_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY key_distribution_ledger
-    ADD CONSTRAINT key_distribution_ledger_kd_id_fkey FOREIGN KEY (kd_id) 
REFERENCES key_distribution(kd_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY letter_cred
-    ADD CONSTRAINT letter_cred_fk FOREIGN KEY (j_id) REFERENCES jrnx(j_id) ON 
UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY letter_deb
-    ADD CONSTRAINT letter_deb_fk FOREIGN KEY (j_id) REFERENCES jrnx(j_id) ON 
UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY document_modele
-    ADD CONSTRAINT md_type FOREIGN KEY (md_type) REFERENCES 
document_type(dt_id);
-ALTER TABLE ONLY mod_payment
-    ADD CONSTRAINT mod_payment_jrn_def_id_fk FOREIGN KEY (jrn_def_id) 
REFERENCES jrn_def(jrn_def_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY mod_payment
-    ADD CONSTRAINT mod_payment_mp_fd_id_fkey FOREIGN KEY (mp_fd_id) REFERENCES 
fiche_def(fd_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY mod_payment
-    ADD CONSTRAINT mod_payment_mp_jrn_def_id_fkey FOREIGN KEY (mp_jrn_def_id) 
REFERENCES jrn_def(jrn_def_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY operation_analytique
-    ADD CONSTRAINT operation_analytique_j_id_fkey FOREIGN KEY (j_id) 
REFERENCES jrnx(j_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY operation_analytique
-    ADD CONSTRAINT operation_analytique_po_id_fkey FOREIGN KEY (po_id) 
REFERENCES poste_analytique(po_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY poste_analytique
-    ADD CONSTRAINT poste_analytique_pa_id_fkey FOREIGN KEY (pa_id) REFERENCES 
plan_analytique(pa_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY action_gestion
-    ADD CONSTRAINT profile_fkey FOREIGN KEY (ag_dest) REFERENCES profile(p_id) 
ON UPDATE SET NULL ON DELETE SET NULL;
-ALTER TABLE ONLY profile_menu
-    ADD CONSTRAINT profile_menu_me_code_fkey FOREIGN KEY (me_code) REFERENCES 
menu_ref(me_code) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY profile_menu
-    ADD CONSTRAINT profile_menu_p_id_fkey FOREIGN KEY (p_id) REFERENCES 
profile(p_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY profile_menu
-    ADD CONSTRAINT profile_menu_type_fkey FOREIGN KEY (p_type_display) 
REFERENCES profile_menu_type(pm_type);
-ALTER TABLE ONLY profile_sec_repository
-    ADD CONSTRAINT profile_sec_repository_p_id_fkey FOREIGN KEY (p_id) 
REFERENCES profile(p_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY profile_sec_repository
-    ADD CONSTRAINT profile_sec_repository_r_id_fkey FOREIGN KEY (r_id) 
REFERENCES stock_repository(r_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY profile_user
-    ADD CONSTRAINT profile_user_p_id_fkey FOREIGN KEY (p_id) REFERENCES 
profile(p_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY quant_purchase
-    ADD CONSTRAINT qp_vat_code_fk FOREIGN KEY (qp_vat_code) REFERENCES 
tva_rate(tva_id);
-ALTER TABLE ONLY quant_sold
-    ADD CONSTRAINT qs_vat_code_fk FOREIGN KEY (qs_vat_code) REFERENCES 
tva_rate(tva_id);
-ALTER TABLE ONLY quant_purchase
-    ADD CONSTRAINT quant_purchase_j_id_fkey FOREIGN KEY (j_id) REFERENCES 
jrnx(j_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY quant_purchase
-    ADD CONSTRAINT quant_purchase_qp_internal_fkey FOREIGN KEY (qp_internal) 
REFERENCES jrn(jr_internal) ON UPDATE CASCADE ON DELETE CASCADE DEFERRABLE 
INITIALLY DEFERRED;
-ALTER TABLE ONLY quant_sold
-    ADD CONSTRAINT quant_sold_j_id_fkey FOREIGN KEY (j_id) REFERENCES 
jrnx(j_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY quant_sold
-    ADD CONSTRAINT quant_sold_qs_internal_fkey FOREIGN KEY (qs_internal) 
REFERENCES jrn(jr_internal) ON UPDATE CASCADE ON DELETE CASCADE DEFERRABLE 
INITIALLY DEFERRED;
-ALTER TABLE ONLY stock_change
-    ADD CONSTRAINT stock_change_r_id_fkey FOREIGN KEY (r_id) REFERENCES 
stock_repository(r_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY stock_goods
-    ADD CONSTRAINT stock_goods_c_id_fkey FOREIGN KEY (c_id) REFERENCES 
stock_change(c_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY stock_goods
-    ADD CONSTRAINT stock_goods_j_id_fkey FOREIGN KEY (j_id) REFERENCES 
jrnx(j_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY tmp_stockgood_detail
-    ADD CONSTRAINT tmp_stockgood_detail_s_id_fkey FOREIGN KEY (s_id) 
REFERENCES tmp_stockgood(s_id) ON DELETE CASCADE;
-ALTER TABLE ONLY user_sec_jrn
-    ADD CONSTRAINT uj_priv_id_fkey FOREIGN KEY (uj_jrn_id) REFERENCES 
jrn_def(jrn_def_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY user_sec_action_profile
-    ADD CONSTRAINT user_sec_action_profile_p_granted_fkey FOREIGN KEY 
(p_granted) REFERENCES profile(p_id) ON UPDATE CASCADE ON DELETE CASCADE;
-ALTER TABLE ONLY user_sec_action_profile
-    ADD CONSTRAINT user_sec_action_profile_p_id_fkey FOREIGN KEY (p_id) 
REFERENCES profile(p_id) ON UPDATE CASCADE ON DELETE CASCADE;
diff --git a/include/sql/mod1/data.sql b/include/sql/mod1/data.sql
index 5d0f686..42b74a8 100644
--- a/include/sql/mod1/data.sql
+++ b/include/sql/mod1/data.sql
@@ -1,3 +1,4 @@
+set search_path = public, comptaproc,pg_catalog ;
 
 SET statement_timeout = 0;
 SET client_encoding = 'UTF8';
@@ -5,7 +6,6 @@ SET standard_conforming_strings = on;
 SET check_function_bodies = false;
 SET client_min_messages = warning;
 
-SET search_path = public, pg_catalog;
 
 
 INSERT INTO action (ac_id, ac_description, ac_module, ac_code) VALUES (800, 
'Ajout de fiche', 'fiche', 'FICADD');
diff --git a/include/sql/mod1/function.sql b/include/sql/mod1/function.sql
index 6e7c3b2..e69de29 100644
--- a/include/sql/mod1/function.sql
+++ b/include/sql/mod1/function.sql
@@ -1,2213 +0,0 @@
-CREATE FUNCTION account_add(p_id public.account_type, p_name character 
varying) RETURNS text
-    LANGUAGE plpgsql
-    AS $$
-declare
-       nParent tmp_pcmn.pcm_val_parent%type;
-       nCount integer;
-       sReturn text;
-begin
-       sReturn:= format_account(p_id);
-       select count(*) into nCount from tmp_pcmn where pcm_val=sReturn;
-       if nCount = 0 then
-               nParent=account_parent(p_id);
-               insert into tmp_pcmn (pcm_val,pcm_lib,pcm_val_parent)
-                       values (p_id, p_name,nParent) returning pcm_val into 
sReturn;
-       end if;
-return sReturn;
-end ;
-$$;
-CREATE FUNCTION account_alphanum() RETURNS boolean
-    LANGUAGE plpgsql
-    AS $$
-declare
-       l_auto bool;
-begin
-       l_auto := true;
-       select pr_value into l_auto from parameter where pr_id='MY_ALPHANUM';
-       if l_auto = 'N' or l_auto is null then
-               l_auto:=false;
-       end if;
-       return l_auto;
-end;
-$$;
-CREATE FUNCTION account_auto(p_fd_id integer) RETURNS boolean
-    LANGUAGE plpgsql
-    AS $$
-declare
-       l_auto bool;
-begin
-
-       select fd_create_account into l_auto from fiche_def where fd_id=p_fd_id;
-       if l_auto is null then
-               l_auto:=false;
-       end if;
-       return l_auto;
-end;
-$$;
-CREATE FUNCTION account_compute(p_f_id integer) RETURNS public.account_type
-    LANGUAGE plpgsql
-    AS $$
-declare
-       class_base fiche_def.fd_class_base%type;
-       maxcode numeric;
-       sResult text;
-       bAlphanum bool;
-       sName text;
-begin
-       select fd_class_base into class_base
-       from
-               fiche_def join fiche using (fd_id)
-       where
-               f_id=p_f_id;
-       raise notice 'account_compute class base %',class_base;
-       bAlphanum := account_alphanum();
-       if bAlphanum = false  then
-       raise info 'account_compute : Alphanum is false';
-               select count (pcm_val) into maxcode from tmp_pcmn where 
pcm_val_parent = class_base;
-               if maxcode = 0  then
-                       maxcode:=class_base::numeric;
-               else
-                       select max (pcm_val) into maxcode from tmp_pcmn where 
pcm_val_parent = class_base;
-                       maxcode:=maxcode::numeric;
-               end if;
-               if maxcode::text = class_base then
-                       maxcode:=class_base::numeric*1000;
-               end if;
-               maxcode:=maxcode+1;
-               raise notice 'account_compute Max code %',maxcode;
-               sResult:=maxcode::account_type;
-       else
-       raise info 'account_compute : Alphanum is true';
-               -- if alphanum, use name
-               select ad_value into sName from fiche_detail where f_id=p_f_id 
and ad_id=1;
-               raise info 'name is %',sName;
-               if sName is null then
-                       raise exception 'Cannot compute an accounting without 
the name of the card for %',p_f_id;
-               end if;
-               sResult := class_base||sName;
-               sResult := substr(sResult,1,40);
-               raise info 'Result is %',sResult;
-       end if;
-       return sResult::account_type;
-end;
-$$;
-CREATE FUNCTION account_insert(p_f_id integer, p_account text) RETURNS text
-    LANGUAGE plpgsql
-    AS $$
-declare
-       nParent tmp_pcmn.pcm_val_parent%type;
-       sName varchar;
-       sNew tmp_pcmn.pcm_val%type;
-       bAuto bool;
-       nFd_id integer;
-       sClass_Base fiche_def.fd_class_base%TYPE;
-       nCount integer;
-       first text;
-       second text;
-       s_account text;
-begin
-
-       if p_account is not null and length(trim(p_account)) != 0 then
-       -- if there is coma in p_account, treat normally
-               if position (',' in p_account) = 0 then
-                       raise info 'p_account is not empty';
-                               s_account := substr( p_account,1 , 40);
-                               select count(*)  into nCount from tmp_pcmn 
where pcm_val=s_account::account_type;
-                               raise notice 'found in tmp_pcm %',nCount;
-                               if nCount !=0  then
-                                       raise info 'this account exists in 
tmp_pcmn ';
-                                       perform 
attribut_insert(p_f_id,5,s_account);
-                                  else
-                                      -- account doesn't exist, create it
-                                       select ad_value into sName from
-                                               fiche_detail
-                                       where
-                                       ad_id=1 and f_id=p_f_id;
-
-                                       
nParent:=account_parent(s_account::account_type);
-                                       insert into 
tmp_pcmn(pcm_val,pcm_lib,pcm_val_parent) values 
(s_account::account_type,sName,nParent);
-                                       perform 
attribut_insert(p_f_id,5,s_account);
-
-                               end if;
-               else
-               raise info 'presence of a comma';
-               -- there is 2 accounts separated by a comma
-               first := split_part(p_account,',',1);
-               second := split_part(p_account,',',2);
-               -- check there is no other coma
-               raise info 'first value % second value %', first, second;
-
-               if  position (',' in first) != 0 or position (',' in second) != 
0 then
-                       raise exception 'Too many comas, invalid account';
-               end if;
-               perform attribut_insert(p_f_id,5,p_account);
-               end if;
-       else
-       raise info 'A000 : p_account is  empty';
-               select fd_id into nFd_id from fiche where f_id=p_f_id;
-               bAuto:= account_auto(nFd_id);
-
-               select fd_class_base into sClass_base from fiche_def where 
fd_id=nFd_id;
-raise info 'sClass_Base : %',sClass_base;
-               if bAuto = true and sClass_base similar to '[[:digit:]]*'  then
-                       raise info 'account generated automatically';
-                       sNew:=account_compute(p_f_id);
-                       raise info 'sNew %', sNew;
-                       select ad_value into sName from
-                               fiche_detail
-                       where
-                               ad_id=1 and f_id=p_f_id;
-                       nParent:=account_parent(sNew);
-                       sNew := account_add  (sNew,sName);
-                       perform attribut_insert(p_f_id,5,sNew);
-
-               else
-               -- if there is an account_base then it is the default
-                     select fd_class_base::account_type into sNew from 
fiche_def join fiche using (fd_id) where f_id=p_f_id;
-                       if sNew is null or length(trim(sNew)) = 0 then
-                               raise notice 'count is null';
-                                perform attribut_insert(p_f_id,5,null);
-                       else
-                                perform attribut_insert(p_f_id,5,sNew);
-                       end if;
-               end if;
-       end if;
-
-return 0;
-end;
-$$;
-CREATE FUNCTION account_parent(p_account public.account_type) RETURNS 
public.account_type
-    LANGUAGE plpgsql
-    AS $$
-declare
-       sSubParent tmp_pcmn.pcm_val_parent%type;
-       sResult tmp_pcmn.pcm_val_parent%type;
-       nCount integer;
-begin
-       if p_account is NULL then
-               return NULL;
-       end if;
-       sSubParent:=p_account;
-       while true loop
-               select count(*) into nCount
-               from tmp_pcmn
-               where
-               pcm_val = sSubParent;
-               if nCount != 0 then
-                       sResult:= sSubParent;
-                       exit;
-               end if;
-               sSubParent:= substr(sSubParent,1,length(sSubParent)-1);
-               if length(sSubParent) <= 0 then
-                       raise exception 'Impossible de trouver le compte parent 
pour %',p_account;
-               end if;
-               raise notice 'sSubParent % % ',sSubParent,length(sSubParent);
-       end loop;
-       raise notice 'account_parent : Parent is %',sSubParent;
-       return sSubParent;
-end;
-$$;
-CREATE FUNCTION account_update(p_f_id integer, p_account public.account_type) 
RETURNS integer
-    LANGUAGE plpgsql
-    AS $$
-declare
-       nMax fiche.f_id%type;
-       nCount integer;
-       nParent tmp_pcmn.pcm_val_parent%type;
-       sName varchar;
-       first text;
-       second text;
-begin
-
-       if length(trim(p_account)) != 0 then
-               -- 2 accounts in card separated by comma
-               if position (',' in p_account) = 0 then
-                       select count(*) into nCount from tmp_pcmn where 
pcm_val=p_account;
-                       if nCount = 0 then
-                       select ad_value into sName from
-                               fiche_detail
-                               where
-                               ad_id=1 and f_id=p_f_id;
-                       nParent:=account_parent(p_account);
-                       insert into tmp_pcmn(pcm_val,pcm_lib,pcm_val_parent) 
values (p_account,sName,nParent);
-               end if;
-               else
-               raise info 'presence of a comma';
-               -- there is 2 accounts separated by a comma
-               first := split_part(p_account,',',1);
-               second := split_part(p_account,',',2);
-               -- check there is no other coma
-               raise info 'first value % second value %', first, second;
-
-               if  position (',' in first) != 0 or position (',' in second) != 
0 then
-                       raise exception 'Too many comas, invalid account';
-               end if;
-               -- check that both account are in PCMN
-
-               end if;
-       else
-               -- account is null
-               update fiche_detail set ad_value=null where f_id=p_f_id and 
ad_id=5 ;
-       end if;
-
-       update fiche_detail set ad_value=p_account where f_id=p_f_id and 
ad_id=5 ;
-
-return 0;
-end;
-$$;
-CREATE FUNCTION action_gestion_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-begin
-NEW.ag_title := substr(trim(NEW.ag_title),1,70);
-NEW.ag_hour := substr(trim(NEW.ag_hour),1,5);
-NEW.ag_owner := lower(NEW.ag_owner);
-return NEW;
-end;
-$$;
-CREATE FUNCTION action_gestion_related_ins_up() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-       nTmp bigint;
-begin
-
-if NEW.aga_least > NEW.aga_greatest then
-       nTmp := NEW.aga_least;
-       NEW.aga_least := NEW.aga_greatest;
-       NEW.aga_greatest := nTmp;
-end if;
-
-if NEW.aga_least = NEW.aga_greatest then
-       return NULL;
-end if;
-
-return NEW;
-
-end;
-$$;
-CREATE FUNCTION attribut_insert(p_f_id integer, p_ad_id integer, p_value 
character varying) RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-begin
-       insert into fiche_detail (f_id,ad_id, ad_value) values 
(p_f_id,p_ad_id,p_value);
-       
-return;
-end;
-$$;
-CREATE FUNCTION attribute_correct_order() RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-declare
-    crs_correct cursor for select A.jnt_id,A.jnt_order from jnt_fic_attr as A 
join jnt_fic_attr as B using (fd_id) where A.jnt_order=B.jnt_order and A.jnt_id 
> B.jnt_id;
-    rec record;
-begin
-       open crs_correct;
-       loop
-       fetch crs_correct into rec;
-       if NOT FOUND then
-               close crs_correct;
-               return;
-       end if;
-       update jnt_fic_attr set jnt_order=jnt_order + 1 where jnt_id = 
rec.jnt_id;
-       end loop;
-       close crs_correct;
-       perform attribute_correct_order ();
-end;
-$$;
-CREATE FUNCTION card_after_delete() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-
-begin
-
-       delete from action_gestion where f_id_dest = OLD.f_id;
-       return OLD;
-
-end;
-$$;
-CREATE FUNCTION card_class_base(p_f_id integer) RETURNS text
-    LANGUAGE plpgsql
-    AS $$
-declare
-       n_poste fiche_def.fd_class_base%type;
-begin
-
-       select fd_class_base into n_poste from fiche_def join fiche using
-(fd_id)
-       where f_id=p_f_id;
-       if not FOUND then
-               raise exception 'Invalid fiche card_class_base(%)',p_f_id;
-       end if;
-return n_poste;
-end;
-$$;
-CREATE FUNCTION category_card_before_delete() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-
-begin
-    if OLD.fd_id > 499000 then
-        return null;
-    end if;
-    return OLD;
-
-end;
-$$;
-CREATE FUNCTION check_balance(p_grpt integer) RETURNS numeric
-    LANGUAGE plpgsql
-    AS $$
-declare
-       amount_jrnx_debit numeric;
-       amount_jrnx_credit numeric;
-       amount_jrn numeric;
-begin
-       select coalesce(sum (j_montant),0) into amount_jrnx_credit
-       from jrnx
-               where
-       j_grpt=p_grpt
-       and j_debit=false;
-
-       select coalesce(sum (j_montant),0) into amount_jrnx_debit
-       from jrnx
-               where
-       j_grpt=p_grpt
-       and j_debit=true;
-
-       select coalesce(jr_montant,0) into amount_jrn
-       from jrn
-       where
-       jr_grpt_id=p_grpt;
-
-       if ( amount_jrnx_debit != amount_jrnx_credit )
-               then
-               return abs(amount_jrnx_debit-amount_jrnx_credit);
-               end if;
-       if ( amount_jrn != amount_jrnx_credit)
-               then
-               return -1*abs(amount_jrn - amount_jrnx_credit);
-               end if;
-       return 0;
-end;
-$$;
-CREATE FUNCTION check_periode() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare 
-  nPeriode int;
-begin
-if periode_exist(to_char(NEW.p_start,'DD.MM.YYYY'),NEW.p_id) <> -1 then
-       nPeriode:=periode_exist(to_char(NEW.p_start,'DD.MM.YYYY'),NEW.p_id) ;
-        raise info 'Overlap periode start % periode %',NEW.p_start,nPeriode;
-       return null;
-end if;
-
-if periode_exist(to_char(NEW.p_end,'DD.MM.YYYY'),NEW.p_id) <> -1 then
-       nPeriode:=periode_exist(to_char(NEW.p_start,'DD.MM.YYYY'),NEW.p_id) ;
-        raise info 'Overlap periode end % periode %',NEW.p_end,nPeriode;
-       return null;
-end if;
-return NEW;
-end;
-$$;
-CREATE FUNCTION correct_sequence(p_sequence text, p_col text, p_table text) 
RETURNS integer
-    LANGUAGE plpgsql
-    AS $$
-declare
-last_sequence int8;
-max_sequence int8;
-n integer;
-begin
-       select count(*) into n from pg_class where relkind='S' and 
relname=lower(p_sequence);
-       if n = 0 then
-               raise exception  ' Unknow sequence  % ',p_sequence;
-       end if;
-       select count(*) into n from pg_class where relkind='r' and 
relname=lower(p_table);
-       if n = 0 then
-               raise exception ' Unknow table  % ',p_table;
-       end if;
-
-       execute 'select last_value   from '||p_sequence into last_sequence;
-       raise notice 'Last value of the sequence is %', last_sequence;
-
-       execute 'select max('||p_col||')  from '||p_table into max_sequence;
-       if  max_sequence is null then
-               max_sequence := 0;
-       end if;
-       raise notice 'Max value of the sequence is %', max_sequence;
-       max_sequence:= max_sequence +1; 
-       execute 'alter sequence '||p_sequence||' restart with '||max_sequence;
-return 0;
-
-end;
-$$;
-CREATE FUNCTION create_missing_sequence() RETURNS integer
-    LANGUAGE plpgsql
-    AS $$
-declare
-p_sequence text;
-nSeq integer;
-c1 cursor for select jrn_def_id from jrn_def;
-begin
-       open c1;
-       loop
-          fetch c1 into nSeq;
-          if not FOUND THEN
-               close c1;
-               return 0;
-          end if;
-          p_sequence:='s_jrn_pj'||nSeq::text;
-       execute 'create sequence '||p_sequence;
-       end loop;
-close c1;
-return 0;
-
-end;
-$$;
-CREATE FUNCTION drop_index(p_constraint character varying) RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-declare 
-       nCount integer;
-begin
-       select count(*) into nCount from pg_indexes where 
indexname=p_constraint;
-       if nCount = 1 then
-       execute 'drop index '||p_constraint ;
-       end if;
-end;
-$$;
-CREATE FUNCTION drop_it(p_constraint character varying) RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-declare 
-       nCount integer;
-begin
-       select count(*) into nCount from pg_constraint where 
conname=p_constraint;
-       if nCount = 1 then
-       execute 'alter table parm_periode drop constraint '||p_constraint ;
-       end if;
-end;
-$$;
-CREATE FUNCTION extension_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
- sCode text;
- sFile text;
-begin
-sCode:=trim(upper(NEW.ex_code));
-sCode:=replace(sCode,' ','_');
-sCode:=substr(sCode,1,15);
-sCode=upper(sCode);
-NEW.ex_code:=sCode;
-sFile:=NEW.ex_file;
-sFile:=replace(sFile,';','_');
-sFile:=replace(sFile,'<','_');
-sFile:=replace(sFile,'>','_');
-sFile:=replace(sFile,'..','');
-sFile:=replace(sFile,'&','');
-sFile:=replace(sFile,'|','');
-
-
-
-return NEW;
-
-end;
-
-$$;
-CREATE FUNCTION fiche_account_parent(p_f_id integer) RETURNS 
public.account_type
-    LANGUAGE plpgsql
-    AS $$
-declare
-ret tmp_pcmn.pcm_val%TYPE;
-begin
-       select fd_class_base into ret from fiche_def join fiche using (fd_id) 
where f_id=p_f_id;
-       if not FOUND then
-               raise exception '% N''existe pas',p_f_id;
-       end if;
-       return ret;
-end;
-$$;
-CREATE FUNCTION fiche_attribut_synchro(p_fd_id integer) RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-declare
-       -- this sql gives the f_id and the missing attribute (ad_id)
-       list_missing cursor for select f_id,fd_id,ad_id,jnt_order from 
jnt_fic_attr join fiche as A using (fd_id) where fd_id=p_fd_id and ad_id not in 
(select ad_id from fiche join fiche_detail using (f_id) where 
fd_id=jnt_fic_attr.fd_id and A.f_id=f_id);
-       rec record;
-begin
-       open list_missing;
-       loop
-       
-       fetch list_missing into rec;
-       IF NOT FOUND then
-               exit;
-       end if;
-       
-       -- now we insert into attr_value
-       insert into fiche_detail (f_id,ad_id,ad_value) values 
(rec.f_id,rec.ad_id,null);
-       end loop;
-       close list_missing;
-end; 
-$$;
-CREATE FUNCTION fiche_def_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-begin
-
-if position (',' in NEW.fd_class_base) != 0 then
-   NEW.fd_create_account='f';
-
-end if;
-return NEW;
-end;$$;
-CREATE FUNCTION fiche_detail_qcode_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-       i record;
-begin
-       if NEW.ad_id=23 and NEW.ad_value != OLD.ad_value then
-               RAISE NOTICE 'new qcode [%] old qcode 
[%]',NEW.ad_value,OLD.ad_value;
-               update jrnx set j_qcode=NEW.ad_value where j_qcode = 
OLD.ad_value;    
-               update op_predef_detail set opd_poste=NEW.ad_value where 
opd_poste=OLD.ad_value;
-               raise notice 'TRG fiche_detail update op_predef_detail set 
opd_poste=% where opd_poste=%;',NEW.ad_value,OLD.ad_value;
-               for i in select ad_id from attr_def where ad_type = 'card' or 
ad_id=25 loop
-                       update fiche_detail set ad_value=NEW.ad_value where 
ad_value=OLD.ad_value and ad_id=i.ad_id;
-                       RAISE NOTICE 'change for ad_id [%] ',i.ad_id;
-                       if i.ad_id=19 then
-                               RAISE NOTICE 'Change in stock_goods OLD[%] by 
NEW[%]',OLD.ad_value,NEW.ad_value;
-                               update stock_goods set sg_code=NEW.ad_value 
where sg_code=OLD.ad_value;
-                       end if;
-
-               end loop;
-       end if;
-return NEW;
-end;
-$$;
-CREATE FUNCTION fill_quant_fin() RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-declare
-   sBank text;
-   sCassa text;
-   sCustomer text;
-   sSupplier text;
-   rec record;
-   recBank record;
-   recSupp_Cust record;
-   nCount integer;
-   nAmount numeric;
-   nBank integer;
-   nOther integer;
-   nSupp_Cust integer;
-begin
-       select p_value into sBank from parm_code where p_code='BANQUE';
-       select p_value into sCassa from parm_code where p_code='CAISSE';
-       select p_value into sSupplier from parm_code where p_code='SUPPLIER';
-       select p_value into sCustomer from parm_code where p_code='CUSTOMER';
-       
-       for rec in select jr_id,jr_grpt_id from jrn 
-           where jr_def_id in (select jrn_def_id from jrn_def where 
jrn_def_type='FIN')
-               and jr_id not in (select jr_id from quant_fin)
-       loop
-               -- there are only 2 lines for bank operations
-               -- first debit
-               select count(j_id) into nCount from jrnx where 
j_grpt=rec.jr_grpt_id;
-               if nCount > 2 then 
-                       raise notice 'Trop de valeur pour jr_grpt_id % count 
%',rec.jr_grpt_id,nCount;
-                       return;
-               end if;
-               nBank := 0; nOther:=0;
-               for recBank in select  j_id, j_montant,j_debit,j_qcode,j_poste 
from jrnx where j_grpt=rec.jr_grpt_id
-               loop
-               if recBank.j_poste like sBank||'%' then
-                       -- retrieve f_id for bank
-                       select f_id into nBank from vw_poste_qcode where 
j_qcode=recBank.j_qcode;
-                       if recBank.j_debit = false then
-                               nAmount=recBank.j_montant*(-1);
-                       else 
-                               nAmount=recBank.j_montant;
-                       end if;
-               else
-                       select f_id into nOther from vw_poste_qcode where 
j_qcode=recBank.j_qcode;
-               end if;
-               end loop;
-               if nBank != 0 and nOther != 0 then
-                       insert into quant_fin 
(jr_id,qf_bank,qf_other,qf_amount) values (rec.jr_id,nBank,nOther,nAmount);
-               end if;
-       end loop;
-       for rec in select jr_id,jr_grpt_id from jrn 
-           where jr_def_id in (select jrn_def_id from jrn_def where 
jrn_def_type='FIN') and jr_id not in (select jr_id from quant_fin)
-       loop
-               -- there are only 2 lines for bank operations
-               -- first debit
-               select count(j_id) into nCount from jrnx where 
j_grpt=rec.jr_grpt_id;
-               if nCount > 2 then 
-                       raise notice 'Trop de valeur pour jr_grpt_id % count 
%',rec.jr_grpt_id,nCount;
-                       return;
-               end if;
-               nBank := 0; nOther:=0;
-               for recBank in select  j_id, j_montant,j_debit,j_qcode,j_poste 
from jrnx where j_grpt=rec.jr_grpt_id
-               loop
-               if recBank.j_poste like sCassa||'%' then
-                       -- retrieve f_id for bank
-                       select f_id into nBank from vw_poste_qcode where 
j_qcode=recBank.j_qcode;
-                       if recBank.j_debit = false then
-                               nAmount=recBank.j_montant*(-1);
-                       else 
-                               nAmount=recBank.j_montant;
-                       end if;
-               else
-                       select f_id into nOther from vw_poste_qcode where 
j_qcode=recBank.j_qcode;
-               end if;
-               end loop;
-               if nBank != 0 and nOther != 0 then
-                       insert into quant_fin 
(jr_id,qf_bank,qf_other,qf_amount) values (rec.jr_id,nBank,nOther,nAmount);
-               end if;
-       end loop;
-
-       for rec in select jr_id,jr_grpt_id from jrn 
-           where jr_def_id in (select jrn_def_id from jrn_def where 
jrn_def_type='FIN') and jr_id not in (select jr_id from quant_fin)
-       loop
-               -- there are only 2 lines for bank operations
-               -- first debit
-               select count(j_id) into nCount from jrnx where 
j_grpt=rec.jr_grpt_id;
-               if nCount > 2 then 
-                       raise notice 'Trop de valeur pour jr_grpt_id % count 
%',rec.jr_grpt_id,nCount;
-                       return;
-               end if;
-               nSupp_Cust := 0; nOther:=0;
-               for recSupp_Cust in select  j_id, 
j_montant,j_debit,j_qcode,j_poste from jrnx where j_grpt=rec.jr_grpt_id
-               loop
-               if recSupp_Cust.j_poste like sSupplier||'%'  then
-                       -- retrieve f_id for bank
-                       select f_id into nSupp_Cust from vw_poste_qcode where 
j_qcode=recSupp_Cust.j_qcode;
-                       if recSupp_Cust.j_debit = true then
-                               nAmount=recSupp_Cust.j_montant*(-1);
-                       else 
-                               nAmount=recSupp_Cust.j_montant;
-                       end if;
-               else if  recSupp_Cust.j_poste like sCustomer||'%' then
-                       select f_id into nSupp_Cust from vw_poste_qcode where 
j_qcode=recSupp_Cust.j_qcode;
-                       if recSupp_Cust.j_debit = false then
-                               nAmount=recSupp_Cust.j_montant*(-1);
-                       else 
-                               nAmount=recSupp_Cust.j_montant;
-                       end if;
-                       else
-                       select f_id into nOther from vw_poste_qcode where 
j_qcode=recSupp_Cust.j_qcode;
-                       
-                       end if;
-               end if;
-               end loop;
-               if nSupp_Cust != 0 and nOther != 0 then
-                       insert into quant_fin 
(jr_id,qf_bank,qf_other,qf_amount) values (rec.jr_id,nOther,nSupp_Cust,nAmount);
-               end if;
-       end loop;
-       for rec in select jr_id,jr_grpt_id from jrn 
-           where jr_def_id in (select jrn_def_id from jrn_def where 
jrn_def_type='FIN') and jr_id not in (select jr_id from quant_fin)
-       loop
-               -- there are only 2 lines for bank operations
-               -- first debit
-               select count(j_id) into nCount from jrnx where 
j_grpt=rec.jr_grpt_id;
-               if nCount > 2 then 
-                       raise notice 'Trop de valeur pour jr_grpt_id % count 
%',rec.jr_grpt_id,nCount;
-                       return;
-               end if;
-               nSupp_Cust := 0; nOther:=0;
-               for recSupp_Cust in select  j_id, 
j_montant,j_debit,j_qcode,j_poste from jrnx where j_grpt=rec.jr_grpt_id
-               loop
-               if recSupp_Cust.j_poste like '441%'  then
-                       -- retrieve f_id for bank
-                       select f_id into nSupp_Cust from vw_poste_qcode where 
j_qcode=recSupp_Cust.j_qcode;
-                       if recSupp_Cust.j_debit = false then
-                               nAmount=recSupp_Cust.j_montant*(-1);
-                       else 
-                               nAmount=recSupp_Cust.j_montant;
-                       end if;
-                       else
-                       select f_id into nOther from vw_poste_qcode where 
j_qcode=recSupp_Cust.j_qcode;
-                       
-                       
-               end if;
-               end loop;
-               if nSupp_Cust != 0 and nOther != 0 then
-                       insert into quant_fin 
(jr_id,qf_bank,qf_other,qf_amount) values (rec.jr_id,nOther,nSupp_Cust,nAmount);
-               end if;
-       end loop;
-       return;
-end;
-$$;
-CREATE FUNCTION find_pcm_type(pp_value public.account_type) RETURNS text
-    LANGUAGE plpgsql
-    AS $$
-declare
-       str_type parm_poste.p_type%TYPE;
-       str_value parm_poste.p_type%TYPE;
-       nLength integer;
-begin
-       str_value:=pp_value;
-       nLength:=length(str_value::text);
-       while nLength > 0 loop
-               select p_type into str_type from parm_poste where 
p_value=str_value;
-               if FOUND then
-                       return str_type;
-               end if;
-               nLength:=nLength-1;
-               str_value:=substring(str_value::text from 1 for 
nLength)::account_type;
-       end loop;
-return 'CON';
-end;
-$$;
-CREATE FUNCTION find_periode(p_date text) RETURNS integer
-    LANGUAGE plpgsql
-    AS $$
-
-declare n_p_id int4;
-begin
-
-select p_id into n_p_id
-       from parm_periode
-       where
-               p_start <= to_date(p_date,'DD.MM.YYYY')
-               and
-               p_end >= to_date(p_date,'DD.MM.YYYY');
-
-if NOT FOUND then
-       return -1;
-end if;
-
-return n_p_id;
-
-end;$$;
-CREATE FUNCTION format_account(p_account public.account_type) RETURNS 
public.account_type
-    LANGUAGE plpgsql
-    AS $_$
-
-declare
-
-sResult account_type;
-
-begin
-sResult := lower(p_account);
-
-sResult := translate(sResult,E'éèêëàâäïîüûùöôç','eeeeaaaiiuuuooc');
-sResult := translate(sResult,E' $€µ£%.+-/\\!(){}(),;_&|"#''^<>*','');
-
-return upper(sResult);
-
-end;
-$_$;
-
-
-
-COMMENT ON FUNCTION format_account(p_account public.account_type) IS 'format 
the accounting :
-- upper case
-- remove space and special char.
-';
-
-
-
-CREATE FUNCTION get_letter_jnt(a bigint) RETURNS bigint
-    LANGUAGE plpgsql
-    AS $$
-declare
- nResult bigint;
-begin
-   select jl_id into nResult from jnt_letter join letter_deb using (jl_id) 
where j_id = a;
-   if NOT FOUND then
-       select jl_id into nResult from jnt_letter join letter_cred using 
(jl_id) where j_id = a;
-       if NOT found then
-               return null;
-       end if;
-    end if;
-return nResult;
-end;
-$$;
-CREATE FUNCTION get_menu_dependency(profile_menu_id integer) RETURNS SETOF 
integer
-    LANGUAGE plpgsql
-    AS $$
-declare
-       i int;
-       x int;
-       e int;
-begin
-       for x in select pm_id,me_code
-                       from profile_menu
-                       where me_code_dep in (select me_code from profile_menu 
where pm_id=profile_menu_id)
-                       and p_id = (select p_id from profile_menu where 
pm_id=profile_menu_id)
-       loop
-               return next x;
-
-       for e in select *  from comptaproc.get_menu_dependency(x)
-               loop
-                       return next e;
-               end loop;
-
-       end loop;
-       return;
-end;
-$$;
-CREATE FUNCTION get_menu_tree(p_code text, p_profile integer) RETURNS SETOF 
public.menu_tree
-    LANGUAGE plpgsql
-    AS $$
-declare
-       i menu_tree;
-       e menu_tree;
-       a text;
-       x v_all_menu%ROWTYPE;
-begin
-       for x in select *  from v_all_menu where me_code_dep=p_code::text and 
p_id=p_profile
-       loop
-               if x.me_code_dep is not null then
-                       i.code := x.me_code_dep||'/'||x.me_code;
-               else
-                       i.code := x.me_code;
-               end if;
-
-               i.description := x.me_description;
-
-               return next i;
-
-       for e in select *  from get_menu_tree(x.me_code,p_profile)
-               loop
-                       e.code:=x.me_code_dep||'/'||e.code;
-                       return next e;
-               end loop;
-
-       end loop;
-       return;
-end;
-$$;
-CREATE FUNCTION get_pcm_tree(source public.account_type) RETURNS SETOF 
public.account_type
-    LANGUAGE plpgsql
-    AS $$
-declare
-       i account_type;
-       e account_type;
-begin
-       for i in select pcm_val from tmp_pcmn where pcm_val_parent=source
-       loop
-               return next i;
-               for e in select get_pcm_tree from get_pcm_tree(i)
-               loop
-                       return next e;
-               end loop;
-
-       end loop;
-       return;
-end;
-$$;
-CREATE FUNCTION get_profile_menu(p_profile integer) RETURNS SETOF 
public.menu_tree
-    LANGUAGE plpgsql
-    AS $$
-declare
-       a menu_tree;
-       e menu_tree;
-begin
-for a in select me_code,me_description from v_all_menu where p_id=p_profile
-       and me_code_dep is null and me_type <> 'PR' and me_type <>'SP'
-loop
-               return next a;
-
-               for e in select * from get_menu_tree(a.code,p_profile)
-               loop
-                       return next e;
-               end loop;
-
-       end loop;
-return;
-end;
-$$;
-CREATE FUNCTION group_analytic_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare 
-name text;
-begin
-name:=upper(NEW.ga_id);
-name:=trim(name);
-name:=replace(name,' ','');
-NEW.ga_id:=name;
-return NEW;
-end;$$;
-CREATE FUNCTION group_analytique_del() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-begin
-update poste_analytique set ga_id=null
-where ga_id=OLD.ga_id;
-return OLD;
-end;$$;
-CREATE FUNCTION html_quote(p_string text) RETURNS text
-    LANGUAGE plpgsql
-    AS $$
-declare
-       r text;
-begin
-       r:=p_string;
-       r:=replace(r,'<','&lt;');
-       r:=replace(r,'>','&gt;');
-       r:=replace(r,'''','&quot;');
-       return r;
-end;$$;
-CREATE FUNCTION info_def_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare 
-       row_info_def info_def%ROWTYPE;
-       str_type text;
-begin
-row_info_def:=NEW;
-str_type:=upper(trim(NEW.id_type));
-str_type:=replace(str_type,' ','');
-str_type:=replace(str_type,',','');
-str_type:=replace(str_type,';','');
-if  length(str_type) =0 then
-       raise exception 'id_type cannot be null';
-end if;
-row_info_def.id_type:=str_type;
-return row_info_def;
-end;
-$$;
-CREATE FUNCTION insert_jrnx(p_date character varying, p_montant numeric, 
p_poste public.account_type, p_grpt integer, p_jrn_def integer, p_debit 
boolean, p_tech_user text, p_tech_per integer, p_qcode text, p_comment text) 
RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-begin
-       insert into jrnx
-       (
-               j_date,
-               j_montant,
-               j_poste,
-               j_grpt,
-               j_jrn_def,
-               j_debit,
-               j_text,
-               j_tech_user,
-               j_tech_per,
-               j_qcode
-       ) values
-       (
-               to_date(p_date,'DD.MM.YYYY'),
-               p_montant,
-               p_poste,
-               p_grpt,
-               p_jrn_def,
-               p_debit,
-               p_comment,
-               p_tech_user,
-               p_tech_per,
-               p_qcode
-       );
-
-return;
-end;
-$$;
-CREATE FUNCTION insert_quant_purchase(p_internal text, p_j_id numeric, p_fiche 
character varying, p_quant numeric, p_price numeric, p_vat numeric, p_vat_code 
integer, p_nd_amount numeric, p_nd_tva numeric, p_nd_tva_recup numeric, 
p_dep_priv numeric, p_client character varying, p_tva_sided numeric, 
p_price_unit numeric) RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-declare
-        fid_client integer;
-        fid_good   integer;
-        account_priv    account_type;
-        fid_good_account account_type;
-        n_dep_priv numeric;
-begin
-        n_dep_priv := 0;
-        select p_value into account_priv from parm_code where 
p_code='DEP_PRIV';
-        select f_id into fid_client from
-                fiche_detail where ad_id=23 and ad_value=upper(trim(p_client));
-        select f_id into fid_good from
-                 fiche_detail where ad_id=23 and ad_value=upper(trim(p_fiche));
-        select ad_value into fid_good_account from fiche_detail where ad_id=5 
and f_id=fid_good;
-        if strpos( fid_good_account , account_priv ) = 1 then
-                n_dep_priv=p_price;
-        end if; 
-            
-        insert into quant_purchase
-                (qp_internal,
-                j_id,
-                qp_fiche,
-                qp_quantite,
-                qp_price,
-                qp_vat,
-                qp_vat_code,
-                qp_nd_amount,
-                qp_nd_tva,
-                qp_nd_tva_recup,
-                qp_supplier,
-                qp_dep_priv,
-                qp_vat_sided,
-                qp_unit)
-        values
-                (p_internal,
-                p_j_id,
-                fid_good,
-                p_quant,
-                p_price,
-                p_vat,
-                p_vat_code,
-                p_nd_amount,
-                p_nd_tva,
-                p_nd_tva_recup,
-                fid_client,
-                n_dep_priv,
-                p_tva_sided,
-                p_price_unit);
-        return;
-end;
- $$;
-CREATE FUNCTION insert_quant_sold(p_internal text, p_jid numeric, p_fiche 
character varying, p_quant numeric, p_price numeric, p_vat numeric, p_vat_code 
integer, p_client character varying, p_tva_sided numeric, p_price_unit numeric) 
RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-declare
-        fid_client integer;
-        fid_good   integer;
-begin
-
-        select f_id into fid_client from
-                fiche_detail where ad_id=23 and ad_value=upper(trim(p_client));
-        select f_id into fid_good from
-                fiche_detail where ad_id=23 and ad_value=upper(trim(p_fiche));
-        insert into quant_sold
-                
(qs_internal,j_id,qs_fiche,qs_quantite,qs_price,qs_vat,qs_vat_code,qs_client,qs_valid,qs_vat_sided,qs_unit)
-        values
-                
(p_internal,p_jid,fid_good,p_quant,p_price,p_vat,p_vat_code,fid_client,'Y',p_tva_sided,p_price_unit);
-        return;
-end;
- $$;
-CREATE FUNCTION insert_quick_code(nf_id integer, tav_text text) RETURNS integer
-    LANGUAGE plpgsql
-    AS $_$
-       declare
-       ns integer;
-       nExist integer;
-       tText text;
-       tBase text;
-       tName text;
-       nCount Integer;
-       nDuplicate Integer;
-       begin
-       tText := lower(trim(tav_text));
-       tText := replace(tText,' ','');
-        tText:= translate(tText,E' $€µ£%+/\\!(){}(),;&|"#''^<>*','');
-       tText := translate(tText,E'éèêëàâäïîüûùöôç','eeeeaaaiiuuuooc');
-       nDuplicate := 0;
-       tBase := tText;
-       loop
-               -- take the next sequence
-               select nextval('s_jnt_fic_att_value') into ns;
-               if length (tText) = 0 or tText is null then
-                       select count(*) into nCount from fiche_detail where 
f_id=nf_id and ad_id=1;
-                       if nCount = 0 then
-                               tText := 'FICHE'||ns::text;
-                       else
-                               select ad_value into tName from fiche_detail 
where f_id=nf_id and ad_id=1;
-                               
-                               tName := lower(trim(tName));
-                               tName := substr(tName,1,6);
-                               tName := replace(tName,' ','');
-                               tName:= translate(tName,E' 
$€µ£%+/\\!(){}(),;&|"#''^<>*','');
-                               tName := 
translate(tName,E'éèêëàâäïîüûùöôç','eeeeaaaiiuuuooc');
-                               tBase := tName;
-                               if nDuplicate = 0 then
-                                       tText := tName;
-                               else
-                                       tText := tName||nDuplicate::text;
-                               end if;
-                       end if;
-               end if;
-               -- av_text already used ?
-               select count(*) into nExist
-                       from fiche_detail
-               where
-                       ad_id=23 and  ad_value=upper(tText);
-
-               if nExist = 0 then
-                       exit;
-               end if;
-               nDuplicate := nDuplicate + 1 ;
-               tText := tBase || nDuplicate::text;
-               
-               if nDuplicate > 9999 then
-                       raise Exception 'too many duplicate % duplicate# 
%',tText,nDuplicate;
-               end if;
-       end loop;
-
-
-       insert into fiche_detail(jft_id,f_id,ad_id,ad_value) values 
(ns,nf_id,23,upper(tText));
-       return ns;
-       end;
-$_$;
-
-
-
-CREATE FUNCTION is_closed(p_periode integer, p_jrn_def_id integer) RETURNS 
boolean
-    LANGUAGE plpgsql
-    AS $$
-declare
-bClosed bool;
-str_status text;
-begin
-select p_closed into bClosed from parm_periode
-       where p_id=p_periode;
-
-if bClosed = true then
-       return bClosed;
-end if;
-
-select status into str_status from jrn_periode
-       where p_id =p_periode and jrn_def_id=p_jrn_def_id;
-
-if str_status <> 'OP' then
-   return bClosed;
-end if;
-return false;
-end;
-$$;
-CREATE FUNCTION jnt_fic_attr_ins() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-   r_record jnt_fic_attr%ROWTYPE;
-   i_max integer;
-begin
-r_record=NEW;
-perform comptaproc.fiche_attribut_synchro(r_record.fd_id);
-select coalesce(max(jnt_order),0) into i_max from jnt_fic_attr where 
fd_id=r_record.fd_id;
-i_max := i_max + 10;
-NEW.jnt_order=i_max;
-return NEW;
-end;
-$$;
-CREATE FUNCTION jrn_add_note(p_jrid bigint, p_note text) RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-declare
-       tmp bigint;
-begin
-       if length(trim(p_note)) = 0 then
-          delete from jrn_note where jr_id= p_jrid;
-          return;
-       end if;
-       
-       select n_id into tmp from jrn_note where jr_id = p_jrid;
-       
-       if FOUND then
-          update jrn_note set n_text=trim(p_note) where jr_id = p_jrid;
-       else 
-          insert into jrn_note (jr_id,n_text) values ( p_jrid, p_note);
-
-       end if;
-       
-       return;
-end;
-$$;
-CREATE FUNCTION jrn_check_periode() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-bClosed bool;
-str_status text;
-ljr_tech_per jrn.jr_tech_per%TYPE;
-ljr_def_id jrn.jr_def_id%TYPE;
-lreturn jrn%ROWTYPE;
-begin
-if TG_OP='UPDATE' then
-       ljr_tech_per :=OLD.jr_tech_per ;
-       NEW.jr_tech_per := 
comptaproc.find_periode(to_char(NEW.jr_date,'DD.MM.YYYY'));
-       ljr_def_id   :=OLD.jr_def_id;
-       lreturn      :=NEW;
-       if NEW.jr_date = OLD.jr_date then
-               return NEW;
-       end if;
-       if comptaproc.is_closed(NEW.jr_tech_per,NEW.jr_def_id) = true then
-               raise exception 'Periode fermee';
-       end if;
-end if;
-
-if TG_OP='INSERT' then
-       NEW.jr_tech_per := 
comptaproc.find_periode(to_char(NEW.jr_date,'DD.MM.YYYY'));
-       ljr_tech_per :=NEW.jr_tech_per ;
-       ljr_def_id   :=NEW.jr_def_id;
-       lreturn      :=NEW;
-end if;
-
-if TG_OP='DELETE' then
-       ljr_tech_per :=OLD.jr_tech_per;
-       ljr_def_id   :=OLD.jr_def_id;
-       lreturn      :=OLD;
-end if;
-
-if comptaproc.is_closed (ljr_def_id,ljr_def_id) = true then
-       raise exception 'Periode fermee';
-end if;
-
-return lreturn;
-end;$$;
-CREATE FUNCTION jrn_def_add() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$begin
-execute 'insert into jrn_periode(p_id,jrn_def_id,status) select 
p_id,'||NEW.jrn_def_id||',
-       case when p_central=true then ''CE''
-             when p_closed=true then ''CL''
-       else ''OP''
-       end
-from
-parm_periode ';
-return NEW;
-end;$$;
-CREATE FUNCTION jrn_def_delete() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare 
-nb numeric;
-begin
-select count(*) into nb from jrn where jr_def_id=OLD.jrn_def_id;
-
-if nb <> 0 then
-       raise exception 'EFFACEMENT INTERDIT: JOURNAL UTILISE';
-end if;
-return OLD;
-end;$$;
-CREATE FUNCTION jrn_del() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-row jrn%ROWTYPE;
-begin
-row:=OLD;
-insert into del_jrn ( jr_id,
-       jr_def_id,
-       jr_montant,
-       jr_comment,
-       jr_date,
-       jr_grpt_id,
-       jr_internal,
-       jr_tech_date,
-       jr_tech_per,
-       jrn_ech,
-       jr_ech,
-       jr_rapt,
-       jr_valid,
-       jr_opid,
-       jr_c_opid,
-       jr_pj,
-       jr_pj_name,
-       jr_pj_type,
-       jr_pj_number,
-       del_jrn_date) 
-       select  jr_id,
-             jr_def_id,
-             jr_montant,
-             jr_comment,
-             jr_date,
-             jr_grpt_id,
-             jr_internal,
-             jr_tech_date,
-             jr_tech_per,
-             jrn_ech,
-             jr_ech,
-             jr_rapt,
-             jr_valid,
-             jr_opid,
-             jr_c_opid,
-             jr_pj,
-             jr_pj_name,
-             jr_pj_type,
-             jr_pj_number
-             ,now() from jrn where jr_id=row.jr_id;
-return row;
-end;
-$$;
-CREATE FUNCTION jrnx_del() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-row jrnx%ROWTYPE;
-begin
-row:=OLD;
-
-
-insert into del_jrnx(
-            j_id, j_date, j_montant, j_poste, j_grpt, j_rapt, j_jrn_def, 
-            j_debit, j_text, j_centralized, j_internal, j_tech_user, 
j_tech_date, 
-            j_tech_per, j_qcode, f_id)  SELECT j_id, j_date, j_montant, 
j_poste, j_grpt, j_rapt, j_jrn_def, 
-       j_debit, j_text, j_centralized, j_internal, j_tech_user, j_tech_date, 
-       j_tech_per, j_qcode, f_id from jrnx where j_id=row.j_id;
-return row;
-end;
-$$;
-CREATE FUNCTION jrnx_ins() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-n_fid bigint;
-nCount integer;
-sQcode text;
-
-begin
-n_fid := NULL;
-sQcode := NULL;
-
-NEW.j_tech_per := comptaproc.find_periode(to_char(NEW.j_date,'DD.MM.YYYY'));
-if NEW.j_tech_per = -1 then
-        raise exception 'Période invalide';
-end if;
-
-if trim(coalesce(NEW.j_qcode,'')) = '' then
-        -- how many card has this accounting
-        select count(*) into nCount from fiche_detail where ad_id=5 and 
ad_value=NEW.j_poste;
-        -- only one card is found , then we change the j_qcode by the card
-        if nCount = 1 then
-                select f_id into n_fid from fiche_detail where ad_id = 5 and 
ad_value=NEW.j_poste;
-            if FOUND then
-                select ad_value into sQcode  from fiche_detail where 
f_id=n_fid and ad_id = 23;
-                NEW.f_id := n_fid;
-                NEW.j_qcode = sQcode;
-                raise info 'comptaproc.jrnx_ins : found card % qcode 
%',n_fid,sQcode;
-            end if;
-        end if;
-
-end if;
-
-NEW.j_qcode=trim(upper(coalesce(NEW.j_qcode,'')));
-
-if length (coalesce(NEW.j_qcode,'')) = 0 then
-    NEW.j_qcode=NULL;
-    else
-      select f_id into n_fid from fiche_detail  where ad_id=23 and 
ad_value=NEW.j_qcode;
-      if NOT FOUND then
-        raise exception 'La fiche dont le quick code est % n''existe 
pas',NEW.j_qcode;
-    end if;
-end if;
-
-NEW.f_id:=n_fid;
-return NEW;
-end;
-$$;
-CREATE FUNCTION jrnx_letter_del() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-row jrnx%ROWTYPE;
-begin
-row:=OLD;
-delete from jnt_letter 
-       where (jl_id in (select jl_id from letter_deb) and jl_id not in(select 
jl_id from letter_cred )) 
-               or (jl_id not in (select jl_id from letter_deb  ) and jl_id  
in(select jl_id from letter_cred ));
-return row;
-end;
-$$;
-CREATE FUNCTION menu_complete_dependency(n_profile numeric) RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-declare 
- n_count integer;
- csr_root_menu cursor (p_profile numeric) is select pm_id,
-       me_code,
-       me_code_dep 
-       
-       from profile_menu 
-       where 
-       me_code in 
-               (select a.me_code_dep 
-                       from profile_menu as a 
-                       join profile_menu as b on (a.me_code=b.me_code and 
a.me_code_dep=b.me_code_dep and a.pm_id <> b.pm_id and a.p_id=b.p_id) 
-                       where a.p_id=n_profile) 
-               and p_id=p_profile;
-
-begin
-       for duplicate in csr_root_menu(n_profile)
-       loop
-               raise notice 'found %',duplicate;
-               update profile_menu set pm_id_dep  = duplicate.pm_id 
-                       where pm_id in (select a.pm_id
-                               from profile_menu as a 
-                               left join profile_menu as b on 
(a.me_code=b.me_code and a.me_code_dep=b.me_code_dep)
-                               where 
-                               a.p_id=n_profile
-                               and b.p_id=n_profile
-                               and a.pm_id_dep is null 
-                               and a.me_code_dep = duplicate.me_code
-                               and a.pm_id < b.pm_id);
-       end loop;
-       
-       for duplicate in csr_root_menu(n_profile) 
-       loop
-               select count(*) into n_count from profile_menu where 
p_id=n_profile and pm_id_dep = duplicate.pm_id;
-               raise notice '% use % times',duplicate,n_count;
-               if n_count = 0 then
-                       raise notice ' Update with %',duplicate;
-                       update profile_menu set pm_id_dep = duplicate.pm_id 
where p_id = n_profile and me_code_dep = duplicate.me_code and pm_id_dep is 
null;
-               end if;
-
-       end loop;
-       
-end;
-$$;
-CREATE FUNCTION opd_limit_description() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-       declare
-               sDescription text;
-       begin
-       sDescription := NEW.od_description;
-       NEW.od_description := substr(sDescription,1,80);
-       return NEW;
-       end;
-$$;
-CREATE FUNCTION periode_exist(p_date text, p_periode_id bigint) RETURNS integer
-    LANGUAGE plpgsql
-    AS $$
-
-declare n_p_id int4;
-begin
-
-select p_id into n_p_id
-        from parm_periode
-        where
-                p_start <= to_date(p_date,'DD.MM.YYYY')
-                and
-                p_end >= to_date(p_date,'DD.MM.YYYY')
-                and
-                p_id <> p_periode_id;
-
-if NOT FOUND then
-        return -1;
-end if;
-
-return n_p_id;
-
-end;$$;
-CREATE FUNCTION plan_analytic_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-   name text;
-begin
-   name:=upper(NEW.pa_name);
-   name:=trim(name);
-   name:=replace(name,' ','');
-   NEW.pa_name:=name;
-return NEW;
-end;
-$$;
-CREATE FUNCTION poste_analytique_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$declare
-name text;
-rCount record;
-
-begin
-name:=upper(NEW.po_name);
-name:=trim(name);
-name:=replace(name,' ','');            
-NEW.po_name:=name;
-
-if NEW.ga_id is NULL then
-return NEW;
-end if;
-
-if length(trim(NEW.ga_id)) = 0 then
-  NEW.ga_id:=NULL;
-  return NEW;
-end if;
-perform 'select ga_id from groupe_analytique where ga_id='||NEW.ga_id;
-if NOT FOUND then
-   raise exception' Inexistent Group Analytic %',NEW.ga_id;
-end if;
-return NEW;
-end;$$;
-CREATE FUNCTION proc_check_balance() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare 
-       diff numeric;
-       tt integer;
-begin
-       if TG_OP = 'INSERT' or TG_OP='UPDATE' then
-       tt=NEW.jr_grpt_id;
-       diff:=check_balance(tt);
-       if diff != 0 then
-               raise exception 'balance error %',diff ;
-       end if;
-       return NEW;
-       end if;
-end;
-$$;
-CREATE FUNCTION quant_purchase_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    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;
-$$;
-CREATE FUNCTION quant_sold_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    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;
-$$;
-CREATE FUNCTION t_document_modele_validate() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare 
-    lText text;
-    modified document_modele%ROWTYPE;
-begin
-    modified:=NEW;
-
-       modified.md_filename:=replace(NEW.md_filename,' ','_');
-       return modified;
-end;
-$$;
-CREATE FUNCTION t_document_type_insert() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-nCounter integer;
-    BEGIN
-select count(*) into nCounter from pg_class where 
relname='seq_doc_type_'||NEW.dt_id;
-if nCounter = 0 then
-        execute  'create sequence seq_doc_type_'||NEW.dt_id;
-end if;
-        RETURN NEW;
-    END;
-$$;
-CREATE FUNCTION t_document_validate() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-  lText text;
-  modified document%ROWTYPE;
-begin
-       modified:=NEW;
-       modified.d_filename:=replace(NEW.d_filename,' ','_');
-       return modified;
-end;
-$$;
-CREATE FUNCTION t_jrn_def_description() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-    declare
-        str varchar(200);
-    BEGIN
-        str := substr(NEW.jrn_def_description,1,200);
-        NEW.jrn_def_description := str;
-
-        RETURN NEW;
-    END;
-$$;
-CREATE FUNCTION t_jrn_def_sequence() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-nCounter integer;
-
-    BEGIN
-    select count(*) into nCounter 
-       from pg_class where relname='s_jrn_'||NEW.jrn_def_id;
-       if nCounter = 0 then
-                  execute  'create sequence s_jrn_'||NEW.jrn_def_id;
-          raise notice 'Creating sequence s_jrn_%',NEW.jrn_def_id;
-        end if;
-
-        RETURN NEW;
-    END;
-$$;
-CREATE FUNCTION table_analytic_account(p_from text, p_to text) RETURNS SETOF 
public.anc_table_account_type
-    LANGUAGE plpgsql
-    AS $$
-declare
-       ret ANC_table_account_type%ROWTYPE;
-       sql_from text:='';
-       sql_to text:='';
-       sWhere text:='';
-       sAnd text:='';
-       sResult text:='';
-begin
-if p_from <> '' and p_from is not null then
-       sql_from:='oa_date >= to_date('''||p_from::text||''',''DD.MM.YYYY'')';
-       sWhere:=' where ';
-end if;
-
-if p_to <> '' and p_to is not null then
-       sql_to=' oa_date <= to_date('''||p_to::text||''',''DD.MM.YYYY'')';
-       sWhere := ' where ';
-end if;
-
-if sql_to <> '' and sql_from <> '' then
-       sAnd:=' and ';
-end if;
-
-sResult := sWhere || sql_from || sAnd || sql_to;
-
-for ret in EXECUTE 'SELECT po.po_id,
-                           po.pa_id, po.po_name, 
-                           po.po_description,sum(
-        CASE
-            WHEN operation_analytique.oa_debit = true THEN 
operation_analytique.oa_amount * (-1)::numeric
-            ELSE operation_analytique.oa_amount
-        END) AS sum_amount, jrnx.j_poste, tmp_pcmn.pcm_lib AS name
-   FROM operation_analytique
-   JOIN poste_analytique po USING (po_id)
-   JOIN jrnx USING (j_id)
-   JOIN tmp_pcmn ON jrnx.j_poste::text = tmp_pcmn.pcm_val::text
-'|| sResult ||'
-  GROUP BY po.po_id, po.po_name, po.pa_id, jrnx.j_poste, tmp_pcmn.pcm_lib, 
po.po_description
- HAVING sum(
-CASE
-    WHEN operation_analytique.oa_debit = true THEN 
operation_analytique.oa_amount * (-1)::numeric
-    ELSE operation_analytique.oa_amount
-END) <> 0::numeric '
-       loop
-       return next ret;
-end loop;
-end;
-$$;
-CREATE FUNCTION table_analytic_card(p_from text, p_to text) RETURNS SETOF 
public.anc_table_card_type
-    LANGUAGE plpgsql
-    AS $$
-declare
-       ret ANC_table_card_type%ROWTYPE;
-       sql_from text:='';
-       sql_to text:='';
-       sWhere text:='';
-       sAnd text:='';
-       sResult text:='';
-begin
-if p_from <> '' and p_from is not null then
-       sql_from:='oa_date >= to_date('''||p_from::text||''',''DD.MM.YYYY'')';
-       sWhere:=' where ';
-end if;
-
-if p_to <> '' and p_to is not null then
-       sql_to=' oa_date <= to_date('''||p_to::text||''',''DD.MM.YYYY'')';
-       sWhere := ' where ';
-end if;
-
-if sql_to <> '' and sql_from <> '' then
-       sAnd :=' and ';
-end if;
-
-sResult := sWhere || sql_from || sAnd || sql_to;
-
-for ret in EXECUTE ' SELECT po.po_id, po.pa_id, po.po_name, po.po_description, 
 sum(
-        CASE
-            WHEN operation_analytique.oa_debit = true THEN 
operation_analytique.oa_amount * (-1)::numeric
-            ELSE operation_analytique.oa_amount
-        END) AS sum_amount, jrnx.f_id, jrnx.j_qcode, ( SELECT 
fiche_detail.ad_value
-           FROM fiche_detail
-          WHERE fiche_detail.ad_id = 1 AND fiche_detail.f_id = jrnx.f_id) AS 
name
-   FROM operation_analytique
-   JOIN poste_analytique po USING (po_id)
-   JOIN jrnx USING (j_id)'|| sResult ||'
-  GROUP BY po.po_id, po.po_name, po.pa_id, jrnx.f_id, jrnx.j_qcode, ( SELECT 
fiche_detail.ad_value
-   FROM fiche_detail
-  WHERE fiche_detail.ad_id = 1 AND fiche_detail.f_id = jrnx.f_id), 
po.po_description
- HAVING sum(
-CASE
-    WHEN operation_analytique.oa_debit = true THEN 
operation_analytique.oa_amount * (-1)::numeric
-    ELSE operation_analytique.oa_amount
-END) <> 0::numeric;'
-
-
-       loop
-       return next ret;
-end loop;
-end;
-$$;
-CREATE FUNCTION tmp_pcmn_alphanum_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-   r_record tmp_pcmn%ROWTYPE;
-begin
-r_record := NEW;
-r_record.pcm_val:=format_account(NEW.pcm_val);
-
-return r_record;
-end;
-$$;
-CREATE FUNCTION tmp_pcmn_ins() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-   r_record tmp_pcmn%ROWTYPE;
-begin
-r_record := NEW;
-if  length(trim(r_record.pcm_type))=0 or r_record.pcm_type is NULL then
-   r_record.pcm_type:=find_pcm_type(NEW.pcm_val);
-   return r_record;
-end if;
-return NEW;
-end;
-$$;
-CREATE FUNCTION trg_profile_user_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-
-begin
-
-NEW.user_name := lower(NEW.user_name);
-return NEW;
-
-end;
-$$;
-CREATE FUNCTION trg_todo_list_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-
-begin
-
-NEW.use_login:= lower(NEW.use_login);
-return NEW;
-
-end;
-$$;
-CREATE FUNCTION trg_todo_list_shared_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-
-begin
-
-NEW.use_login:= lower(NEW.use_login);
-return NEW;
-
-end;
-$$;
-CREATE FUNCTION trg_user_sec_act_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-
-begin
-
-NEW.ua_login:= lower(NEW.ua_login);
-return NEW;
-
-end;
-$$;
-CREATE FUNCTION trg_user_sec_jrn_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-
-begin
-
-NEW.uj_login:= lower(NEW.uj_login);
-return NEW;
-
-end;
-$$;
-CREATE FUNCTION trim_cvs_quote() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-        modified import_tmp%ROWTYPE;
-begin
-       modified:=NEW;
-       modified.devise=replace(new.devise,'"','');
-       modified.poste_comptable=replace(new.poste_comptable,'"','');
-        modified.compte_ordre=replace(NEW.COMPTE_ORDRE,'"','');
-        modified.detail=replace(NEW.DETAIL,'"','');
-        modified.num_compte=replace(NEW.NUM_COMPTE,'"','');
-        return modified;
-end;
-$$;
-CREATE FUNCTION trim_space_format_csv_banque() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-        modified format_csv_banque%ROWTYPE;
-begin
-        modified.name=trim(NEW.NAME);
-        modified.include_file=trim(new.include_file);
-               if ( length(modified.name) = 0 ) then
-                       modified.name=null;
-               end if;
-               if ( length(modified.include_file) = 0 ) then
-                       modified.include_file=null;
-               end if;
-
-        return modified;
-end;
-$$;
-CREATE FUNCTION tva_delete(integer) RETURNS void
-    LANGUAGE plpgsql
-    AS $_$ 
-declare
-       p_tva_id alias for $1;
-       nCount integer;
-begin
-       nCount=0;
-       select count(*) into nCount from quant_sold where qs_vat_code=p_tva_id;
-       if nCount != 0 then
-                 return;
-               
-       end if;
-       select count(*) into nCount from quant_purchase where 
qp_vat_code=p_tva_id;
-       if nCount != 0 then
-                 return;
-               
-       end if;
-
-delete from tva_rate where tva_id=p_tva_id;
-       return;
-end;
-$_$;
-
-
-
-CREATE FUNCTION tva_insert(text, numeric, text, text, integer) RETURNS integer
-    LANGUAGE plpgsql
-    AS $_$
-declare
-       l_tva_id integer;
-       p_tva_label alias for $1;
-       p_tva_rate alias for $2;
-       p_tva_comment alias for $3;
-       p_tva_poste alias for $4;
-       p_tva_both_side alias for $5;
-       debit text;
-       credit text;
-       nCount integer;
-begin
-if length(trim(p_tva_label)) = 0 then
-       return 3;
-end if;
-
-if length(trim(p_tva_poste)) != 0 then
-       if position (',' in p_tva_poste) = 0 then return 4; end if;
-       debit  = split_part(p_tva_poste,',',1);
-       credit  = split_part(p_tva_poste,',',2);
-       select count(*) into nCount from tmp_pcmn where 
pcm_val=debit::account_type;
-       if nCount = 0 then return 4; end if;
-       select count(*) into nCount from tmp_pcmn where 
pcm_val=credit::account_type;
-       if nCount = 0 then return 4; end if;
-
-end if;
-select into l_tva_id nextval('s_tva') ;
-insert into 
tva_rate(tva_id,tva_label,tva_rate,tva_comment,tva_poste,tva_both_side)
-       values 
(l_tva_id,p_tva_label,p_tva_rate,p_tva_comment,p_tva_poste,p_tva_both_side);
-return 0;
-end;
-$_$;
-
-
-
-CREATE FUNCTION tva_modify(integer, text, numeric, text, text, integer) 
RETURNS integer
-    LANGUAGE plpgsql
-    AS $_$
-declare
-       p_tva_id alias for $1;
-       p_tva_label alias for $2;
-       p_tva_rate alias for $3;
-       p_tva_comment alias for $4;
-       p_tva_poste alias for $5;
-       p_tva_both_side alias for $6;
-       debit text;
-       credit text;
-       nCount integer;
-begin
-if length(trim(p_tva_label)) = 0 then
-       return 3;
-end if;
-
-if length(trim(p_tva_poste)) != 0 then
-       if position (',' in p_tva_poste) = 0 then return 4; end if;
-       debit  = split_part(p_tva_poste,',',1);
-       credit  = split_part(p_tva_poste,',',2);
-       select count(*) into nCount from tmp_pcmn where 
pcm_val=debit::account_type;
-       if nCount = 0 then return 4; end if;
-       select count(*) into nCount from tmp_pcmn where 
pcm_val=credit::account_type;
-       if nCount = 0 then return 4; end if;
-
-end if;
-update tva_rate set 
tva_label=p_tva_label,tva_rate=p_tva_rate,tva_comment=p_tva_comment,tva_poste=p_tva_poste,tva_both_side=p_tva_both_side
-       where tva_id=p_tva_id;
-return 0;
-end;
-$_$;
-
-
-
-CREATE FUNCTION update_quick_code(njft_id integer, tav_text text) RETURNS 
integer
-    LANGUAGE plpgsql
-    AS $_$
-       declare
-       ns integer;
-       nExist integer;
-       tText text;
-       tBase text;
-       old_qcode varchar;
-       num_rows_jrnx integer;
-       num_rows_predef integer;
-       begin
-       -- get current value
-       select ad_value into old_qcode from fiche_detail where jft_id=njft_id;
-       -- av_text didn't change so no update
-       if tav_text = upper( trim(old_qcode)) then
-               raise notice 'nothing to change % %' , tav_text,old_qcode;
-               return 0;
-       end if;
-
-       tText := trim(lower(tav_text));
-       tText := replace(tText,' ','');
-        -- valid alpha is [ . : - _ ]
-       tText := translate(tText,E' $€µ£%+/\\!(){}(),;&|"#''^<>*','');
-       tText := translate(tText,E'éèêëàâäïîüûùöôç','eeeeaaaiiuuuooc');
-       tText := upper(tText);
-       if length ( tText) = 0 or tText is null then
-               return 0;
-       end if;
-
-       ns := njft_id;
-       tBase := tText;
-       loop
-               -- av_text already used ?
-               select count(*) into nExist
-                       from fiche_detail
-               where
-                       ad_id=23 and ad_value=tText
-                       and jft_id <> njft_id;
-
-               if nExist = 0 then
-                       exit;
-               end if;
-               if tText = tBase||ns then
-                       -- take the next sequence
-                       select nextval('s_jnt_fic_att_value') into ns;
-               end if;
-               tText  :=tBase||ns;
-
-       end loop;
-       update fiche_detail set ad_value = tText where jft_id=njft_id;
-
-       -- update also the contact
-       update fiche_detail set ad_value = tText
-               where jft_id in
-                       ( select jft_id
-                               from fiche_detail
-                       where ad_id=25 and ad_value=old_qcode);
-
-
-       return ns;
-       end;
-$_$;
-
-
-SET search_path = public, pg_catalog;
-
-
-CREATE FUNCTION bud_card_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$declare
- sCode text;
-begin
-
-sCode:=trim(upper(NEW.bc_code));
-sCode:=replace(sCode,' ','_');
-sCode:=substr(sCode,1,10);
-NEW.bc_code:=sCode;
-return NEW;
-end;$$;
-CREATE FUNCTION bud_detail_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$declare
-mline bud_detail%ROWTYPE;
-begin
-mline:=NEW;
-if mline.po_id = -1 then
-   mline.po_id:=NULL;
-end if;
-return mline;
-end;$$;
-CREATE FUNCTION correct_quant_purchase() RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-declare
-       r_invalid quant_purchase;
-       s_QuickCode text;
-       b_j_debit bool;
-       r_new record;
-       r_jrnx record;
-begin
-
-for r_invalid in select * from quant_purchase where qp_valid='A'
-loop
-
-select j_qcode into s_QuickCode from vw_poste_qcode where 
f_id=r_invalid.qp_fiche;
-raise notice 'qp_id % Quick code is %',r_invalid.qp_id,s_QuickCode;
-
-select j_debit,j_grpt,j_jrn_def,j_montant into r_jrnx from jrnx where 
j_id=r_invalid.j_id;
-if NOT FOUND then
-       raise notice 'error not found jrnx %',r_invalid.j_id;
-       update quant_purchase set qp_valid='Y' where qp_id=r_invalid.qp_id;
-       continue;
-end if;
-raise notice 'j_debit % , j_grpt % ,j_jrn_def  % qp_price 
%',r_jrnx.j_debit,r_jrnx.j_grpt,r_jrnx.j_jrn_def ,r_invalid.qp_price;
-
-select jr_internal,j_id,j_montant into r_new
-       from jrnx join jrn on (j_grpt=jr_grpt_id)
-       where 
-       j_jrn_def=r_jrnx.j_jrn_def
-       and j_id not in (select j_id from  quant_purchase)
-       and j_qcode=s_QuickCode
-       and j_montant=r_jrnx.j_montant
-       and j_debit != r_jrnx.j_debit;
-
-if NOT FOUND then
-       raise notice 'error not found %', r_invalid.j_id;
-       update quant_purchase set qp_valid='Y' where qp_id=r_invalid.qp_id;
-       continue;     
-end if;
-raise notice 'j_id % found amount %',r_new.j_id,r_new.j_montant;
-
-insert into quant_purchase 
(qp_internal,j_id,qp_fiche,qp_quantite,qp_price,qp_vat,qp_nd_amount,qp_nd_tva_recup,qp_valid,qp_dep_priv,qp_supplier,qp_vat_code)
-values 
(r_new.jr_internal,r_invalid.j_id,r_invalid.qp_fiche,(r_invalid.qp_quantite * 
(-1)),r_invalid.qp_price * 
(-1),r_invalid.qp_vat*(-1),r_invalid.qp_nd_amount*(-1),r_invalid.qp_nd_tva_recup*(-1)
 ,'Y',r_invalid.qp_dep_priv*(-1),r_invalid.qp_supplier,r_invalid.qp_vat_code);
-
-update quant_purchase set qp_valid='Y' where qp_id=r_invalid.qp_id;
-end loop;
-return;
-end;
-$$;
-CREATE FUNCTION correct_quant_sale() RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-declare
-       r_invalid quant_sold;
-       s_QuickCode text;
-       b_j_debit bool;
-       r_new record;
-       r_jrnx record;
-begin
-
-for r_invalid in select * from quant_sold where qs_valid='A'
-loop
-
-select j_qcode into s_QuickCode from vw_poste_qcode where 
f_id=r_invalid.qs_fiche;
-raise notice 'qp_id % Quick code is %',r_invalid.qs_id,s_QuickCode;
-
-select j_debit,j_grpt,j_jrn_def,j_montant into r_jrnx from jrnx where 
j_id=r_invalid.j_id;
-if NOT FOUND then
-       update quant_sold set qs_valid='Y' where qs_id=r_invalid.qs_id;
-       raise notice 'error not found jrnx %',r_invalid.j_id;
-       continue;
-end if;
-raise notice 'j_debit % , j_grpt % ,j_jrn_def  % qs_price 
%',r_jrnx.j_debit,r_jrnx.j_grpt,r_jrnx.j_jrn_def ,r_invalid.qs_price;
-
-select jr_internal,j_id,j_montant into r_new
-       from jrnx join jrn on (j_grpt=jr_grpt_id)
-       where 
-       j_jrn_def=r_jrnx.j_jrn_def
-       and j_id not in (select j_id from  quant_sold)
-       and j_qcode=s_QuickCode
-       and j_montant=r_jrnx.j_montant
-       and j_debit != r_jrnx.j_debit;
-
-if NOT FOUND then
-   update quant_sold set qs_valid='Y' where qs_id=r_invalid.qs_id;
-       raise notice 'error not found %', r_invalid.j_id;
-       continue;
-end if;
-raise notice 'j_id % found amount %',r_new.j_id,r_new.j_montant;
-
-
- insert into quant_sold 
(qs_internal,j_id,qs_fiche,qs_quantite,qs_price,qs_vat,qs_valid,qs_client,qs_vat_code)
- values 
(r_new.jr_internal,r_invalid.j_id,r_invalid.qs_fiche,(r_invalid.qs_quantite * 
(-1)),r_invalid.qs_price * 
(-1),r_invalid.qs_vat*(-1),'Y',r_invalid.qs_client,r_invalid.qs_vat_code);
- update quant_sold set qs_valid='Y' where qs_id=r_invalid.qs_id;
-end loop;
-return;
-end;
-$$;
-CREATE FUNCTION modify_menu_system(n_profile numeric) RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-declare 
-r_duplicate profile_menu%ROWTYPE;
-str_duplicate text;
-n_lowest_id numeric; -- lowest pm_id : update the dependency in profile_menu
-n_highest_id numeric; -- highest pm_id insert into profile_menu
-
-begin
-
-for str_duplicate in   
-       select me_code 
-       from profile_menu 
-       where 
-       p_id=n_profile and 
-       p_type_display <> 'P' and
-       pm_id_dep is null
-       group by me_code 
-       having count(*) > 1 
-loop
-       raise info 'str_duplicate %',str_duplicate;
-       for r_duplicate in select * 
-               from profile_menu 
-               where 
-               p_id=n_profile and
-               me_code_dep=str_duplicate
-       loop
-               raise info 'r_duplicate %',r_duplicate;
-               -- get the lowest 
-               select a.pm_id into n_lowest_id from profile_menu a join 
profile_menu b on (a.me_code=b.me_code and a.p_id = b.p_id)
-               where
-               a.me_code=str_duplicate
-               and a.p_id=n_profile
-               and a.pm_id < b.pm_id;
-               raise info 'lowest is %',n_lowest_id;
-               -- get the highest
-               select a.pm_id into n_highest_id from profile_menu a join 
profile_menu b on (a.me_code=b.me_code and a.p_id = b.p_id)
-               where
-               a.me_code=str_duplicate
-               and a.p_id=n_profile
-               and a.pm_id > b.pm_id;
-               raise info 'highest is %',n_highest_id;
-
-               -- update the first one
-               update profile_menu set pm_id_dep = n_lowest_id where 
pm_id=r_duplicate.pm_id;
-               -- insert a new one
-               insert into profile_menu (me_code,
-                       me_code_dep,
-                       p_id,
-                       p_order,
-                       p_type_display,
-                       pm_default,
-                       pm_id_dep)
-               values (r_duplicate.me_code,
-                       r_duplicate.me_code_dep,
-                       r_duplicate.p_id,
-                       r_duplicate.p_order,
-                       r_duplicate.p_type_display,
-                       r_duplicate.pm_default,
-                       n_highest_id);
-               
-       end loop;       
-
-end loop;      
-end;
-$$;
-CREATE FUNCTION upgrade_repo(p_version integer) RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-declare 
-        is_mono integer;
-begin
-        select count (*) into is_mono from information_schema.tables where 
table_name='repo_version';
-        if is_mono = 1 then
-                update repo_version set val=p_version;
-        else
-                update version set val=p_version;
-        end if;
-end;
-$$;
diff --git a/include/sql/mod1/index.sql b/include/sql/mod1/index.sql
index 92fbbfa..e69de29 100644
--- a/include/sql/mod1/index.sql
+++ b/include/sql/mod1/index.sql
@@ -1,33 +0,0 @@
-CREATE UNIQUE INDEX fd_id_ad_id_x ON jnt_fic_attr USING btree (fd_id, ad_id);
-CREATE UNIQUE INDEX fiche_detail_f_id_ad_id ON fiche_detail USING btree (f_id, 
ad_id);
-CREATE INDEX fk_action_person_action_gestion ON action_person USING btree 
(ag_id);
-CREATE INDEX fk_action_person_fiche ON action_person USING btree (f_id);
-CREATE INDEX fk_stock_good_repository_r_id ON stock_goods USING btree (r_id);
-CREATE INDEX fk_stock_goods_f_id ON stock_goods USING btree (f_id);
-CREATE INDEX fk_stock_goods_j_id ON stock_goods USING btree (j_id);
-CREATE INDEX fki_f_end_date ON forecast USING btree (f_end_date);
-CREATE INDEX fki_f_start_date ON forecast USING btree (f_start_date);
-CREATE INDEX fki_jrn_jr_grpt_id ON jrn USING btree (jr_grpt_id);
-CREATE INDEX fki_jrnx_f_id ON jrnx USING btree (f_id);
-CREATE INDEX fki_jrnx_j_grpt ON jrnx USING btree (j_grpt);
-CREATE INDEX fki_profile_menu_me_code ON profile_menu USING btree (me_code);
-CREATE INDEX fki_profile_menu_profile ON profile_menu USING btree (p_id);
-CREATE INDEX fki_profile_menu_type_fkey ON profile_menu USING btree 
(p_type_display);
-CREATE INDEX idx_qs_internal ON quant_sold USING btree (qs_internal);
-CREATE INDEX jnt_fic_att_value_fd_id_idx ON fiche_detail USING btree (f_id);
-CREATE INDEX jnt_fic_attr_fd_id_idx ON jnt_fic_attr USING btree (fd_id);
-CREATE INDEX jrnx_j_qcode_ix ON jrnx USING btree (j_qcode);
-CREATE UNIQUE INDEX k_ag_ref ON action_gestion USING btree (ag_ref);
-CREATE INDEX link_action_type_fki ON action_gestion_related USING btree 
(aga_type);
-CREATE UNIQUE INDEX qcode_idx ON fiche_detail USING btree (ad_value) WHERE 
(ad_id = 23);
-CREATE UNIQUE INDEX qf_jr_id ON quant_fin USING btree (jr_id);
-CREATE UNIQUE INDEX qp_j_id ON quant_purchase USING btree (j_id);
-CREATE UNIQUE INDEX qs_j_id ON quant_sold USING btree (j_id);
-CREATE INDEX quant_purchase_jrn_fki ON quant_purchase USING btree 
(qp_internal);
-CREATE INDEX quant_sold_jrn_fki ON quant_sold USING btree (qs_internal);
-CREATE UNIQUE INDEX uj_login_uj_jrn_id ON user_sec_jrn USING btree (uj_login, 
uj_jrn_id);
-CREATE UNIQUE INDEX ux_po_name ON poste_analytique USING btree (po_name);
-CREATE UNIQUE INDEX x_jrn_jr_id ON jrn USING btree (jr_id);
-CREATE INDEX x_mt ON jrn USING btree (jr_mt);
-CREATE UNIQUE INDEX x_periode ON parm_periode USING btree (p_start, p_end);
-CREATE INDEX x_poste ON jrnx USING btree (j_poste);
diff --git a/include/sql/mod1/make-sql b/include/sql/mod1/make-sql
index cae0c11..19a87ec 100755
--- a/include/sql/mod1/make-sql
+++ b/include/sql/mod1/make-sql
@@ -1,4 +1,5 @@
-pg_dump -O -U dany -s ${DOMAIN}mod1|grep -v "COMMENT ON SCHEMA public IS 
'Standard public schema';" |sed "/^--/d" > schema.sql
+pg_dump -O -U dany -s rel671dossier10104|grep -v "COMMENT ON SCHEMA public IS 
'Standard public schema';" |sed "/^--/d" > schema.sql
+# pg_dump -O -U dany -s ${DOMAIN}mod1|grep -v "COMMENT ON SCHEMA public IS 
'Standard public schema';" |sed "/^--/d" > schema.sql
 awk '/SEQUENCE/,/;/  { print $0;}' < schema.sql > sequence.sql
 awk '/CREATE DOMAIN/,/;/ { print $0;}' < schema.sql > table.sql
 awk '/CREATE TABLE/,/;/ { print $0;}' < schema.sql >> table.sql
@@ -13,14 +14,17 @@ echo "SET search_path = public, pg_catalog;"
 
 
 awk '/ALTER TABLE/,/;/ { print $0;}' < schema.sql >> constraint.sql
+awk '/COMMENT ON CONSTRAINT/,/;/ { print $0;}' < schema.sql >> constraint.sql
 
 # function in XML
 ## awk 'BEGIN{print "<PROCEDURES>";} /CREATE FUNCTION/,/\$\$;/ { if (/CREATE 
FUNCTION/) {print "<procedure>";} if (/\$\$;/) {print "</procedure>";} print 
$0;} END { print "</PROCEDURES>";}' < schema.sql 
 awk '/CREATE FUNCTION/,/\$\$;/ { print $0;}' < schema.sql > function.sql
 awk '/COMMENT/,/;/ {print $0;}' < schema.sql > comment.sql
 
-sed -i -e "/ALTER TABLE.*/d" -e "/ADD CONSTRAINT/d" -e "/CREATE PROCEDURAL/d" 
schema.sql
+sed -i -e "/ALTER TABLE.*/d" -e "/COMMENT ON CONSTRAINT/d" -e "/ADD 
CONSTRAINT/d" -e "/CREATE PROCEDURAL/d" schema.sql
 
 grep setval schema.sql >> sequence.sql
-pg_dump -O -U dany --data-only --column-inserts  -O ${DOMAIN}mod1 |sed 
"/^--/d" > data.sql
+echo "set search_path = public, comptaproc,pg_catalog ;" > data.sql
+pg_dump -O -U dany --data-only --column-inserts  -O ${DOMAIN}mod1 |sed 
"/^--/d" | sed -e "/SET search_path/d" >> data.sql
+
 
diff --git a/include/sql/mod1/schema.sql b/include/sql/mod1/schema.sql
index a8f2b74..e69de29 100644
--- a/include/sql/mod1/schema.sql
+++ b/include/sql/mod1/schema.sql
@@ -1,6394 +0,0 @@
-
-SET statement_timeout = 0;
-SET client_encoding = 'UTF8';
-SET standard_conforming_strings = on;
-SET check_function_bodies = false;
-SET client_min_messages = warning;
-
-
-CREATE SCHEMA comptaproc;
-
-
-
-CREATE EXTENSION IF NOT EXISTS plpgsql WITH SCHEMA pg_catalog;
-
-
-
-COMMENT ON EXTENSION plpgsql IS 'PL/pgSQL procedural language';
-
-
-SET search_path = public, pg_catalog;
-
-
-CREATE DOMAIN account_type AS character varying(40);
-
-
-
-CREATE TYPE anc_table_account_type AS (
-       po_id bigint,
-       pa_id bigint,
-       po_name text,
-       po_description text,
-       sum_amount numeric(25,4),
-       card_account text,
-       name text
-);
-
-
-
-CREATE TYPE anc_table_card_type AS (
-       po_id bigint,
-       pa_id bigint,
-       po_name text,
-       po_description text,
-       sum_amount numeric(25,4),
-       f_id bigint,
-       card_account text,
-       name text
-);
-
-
-
-CREATE TYPE menu_tree AS (
-       code text,
-       description text
-);
-
-
-SET search_path = comptaproc, pg_catalog;
-
-
-CREATE FUNCTION account_add(p_id public.account_type, p_name character 
varying) RETURNS text
-    LANGUAGE plpgsql
-    AS $$
-declare
-       nParent tmp_pcmn.pcm_val_parent%type;
-       nCount integer;
-       sReturn text;
-begin
-       sReturn:= format_account(p_id);
-       select count(*) into nCount from tmp_pcmn where pcm_val=sReturn;
-       if nCount = 0 then
-               nParent=account_parent(p_id);
-               insert into tmp_pcmn (pcm_val,pcm_lib,pcm_val_parent)
-                       values (p_id, p_name,nParent) returning pcm_val into 
sReturn;
-       end if;
-return sReturn;
-end ;
-$$;
-
-
-
-CREATE FUNCTION account_alphanum() RETURNS boolean
-    LANGUAGE plpgsql
-    AS $$
-declare
-       l_auto bool;
-begin
-       l_auto := true;
-       select pr_value into l_auto from parameter where pr_id='MY_ALPHANUM';
-       if l_auto = 'N' or l_auto is null then
-               l_auto:=false;
-       end if;
-       return l_auto;
-end;
-$$;
-
-
-
-CREATE FUNCTION account_auto(p_fd_id integer) RETURNS boolean
-    LANGUAGE plpgsql
-    AS $$
-declare
-       l_auto bool;
-begin
-
-       select fd_create_account into l_auto from fiche_def where fd_id=p_fd_id;
-       if l_auto is null then
-               l_auto:=false;
-       end if;
-       return l_auto;
-end;
-$$;
-
-
-
-CREATE FUNCTION account_compute(p_f_id integer) RETURNS public.account_type
-    LANGUAGE plpgsql
-    AS $$
-declare
-       class_base fiche_def.fd_class_base%type;
-       maxcode numeric;
-       sResult text;
-       bAlphanum bool;
-       sName text;
-begin
-       select fd_class_base into class_base
-       from
-               fiche_def join fiche using (fd_id)
-       where
-               f_id=p_f_id;
-       raise notice 'account_compute class base %',class_base;
-       bAlphanum := account_alphanum();
-       if bAlphanum = false  then
-       raise info 'account_compute : Alphanum is false';
-               select count (pcm_val) into maxcode from tmp_pcmn where 
pcm_val_parent = class_base;
-               if maxcode = 0  then
-                       maxcode:=class_base::numeric;
-               else
-                       select max (pcm_val) into maxcode from tmp_pcmn where 
pcm_val_parent = class_base;
-                       maxcode:=maxcode::numeric;
-               end if;
-               if maxcode::text = class_base then
-                       maxcode:=class_base::numeric*1000;
-               end if;
-               maxcode:=maxcode+1;
-               raise notice 'account_compute Max code %',maxcode;
-               sResult:=maxcode::account_type;
-       else
-       raise info 'account_compute : Alphanum is true';
-               -- if alphanum, use name
-               select ad_value into sName from fiche_detail where f_id=p_f_id 
and ad_id=1;
-               raise info 'name is %',sName;
-               if sName is null then
-                       raise exception 'Cannot compute an accounting without 
the name of the card for %',p_f_id;
-               end if;
-               sResult := class_base||sName;
-               sResult := substr(sResult,1,40);
-               raise info 'Result is %',sResult;
-       end if;
-       return sResult::account_type;
-end;
-$$;
-
-
-
-CREATE FUNCTION account_insert(p_f_id integer, p_account text) RETURNS text
-    LANGUAGE plpgsql
-    AS $$
-declare
-       nParent tmp_pcmn.pcm_val_parent%type;
-       sName varchar;
-       sNew tmp_pcmn.pcm_val%type;
-       bAuto bool;
-       nFd_id integer;
-       sClass_Base fiche_def.fd_class_base%TYPE;
-       nCount integer;
-       first text;
-       second text;
-       s_account text;
-begin
-
-       if p_account is not null and length(trim(p_account)) != 0 then
-       -- if there is coma in p_account, treat normally
-               if position (',' in p_account) = 0 then
-                       raise info 'p_account is not empty';
-                               s_account := substr( p_account,1 , 40);
-                               select count(*)  into nCount from tmp_pcmn 
where pcm_val=s_account::account_type;
-                               raise notice 'found in tmp_pcm %',nCount;
-                               if nCount !=0  then
-                                       raise info 'this account exists in 
tmp_pcmn ';
-                                       perform 
attribut_insert(p_f_id,5,s_account);
-                                  else
-                                      -- account doesn't exist, create it
-                                       select ad_value into sName from
-                                               fiche_detail
-                                       where
-                                       ad_id=1 and f_id=p_f_id;
-
-                                       
nParent:=account_parent(s_account::account_type);
-                                       insert into 
tmp_pcmn(pcm_val,pcm_lib,pcm_val_parent) values 
(s_account::account_type,sName,nParent);
-                                       perform 
attribut_insert(p_f_id,5,s_account);
-
-                               end if;
-               else
-               raise info 'presence of a comma';
-               -- there is 2 accounts separated by a comma
-               first := split_part(p_account,',',1);
-               second := split_part(p_account,',',2);
-               -- check there is no other coma
-               raise info 'first value % second value %', first, second;
-
-               if  position (',' in first) != 0 or position (',' in second) != 
0 then
-                       raise exception 'Too many comas, invalid account';
-               end if;
-               perform attribut_insert(p_f_id,5,p_account);
-               end if;
-       else
-       raise info 'A000 : p_account is  empty';
-               select fd_id into nFd_id from fiche where f_id=p_f_id;
-               bAuto:= account_auto(nFd_id);
-
-               select fd_class_base into sClass_base from fiche_def where 
fd_id=nFd_id;
-raise info 'sClass_Base : %',sClass_base;
-               if bAuto = true and sClass_base similar to '[[:digit:]]*'  then
-                       raise info 'account generated automatically';
-                       sNew:=account_compute(p_f_id);
-                       raise info 'sNew %', sNew;
-                       select ad_value into sName from
-                               fiche_detail
-                       where
-                               ad_id=1 and f_id=p_f_id;
-                       nParent:=account_parent(sNew);
-                       sNew := account_add  (sNew,sName);
-                       perform attribut_insert(p_f_id,5,sNew);
-
-               else
-               -- if there is an account_base then it is the default
-                     select fd_class_base::account_type into sNew from 
fiche_def join fiche using (fd_id) where f_id=p_f_id;
-                       if sNew is null or length(trim(sNew)) = 0 then
-                               raise notice 'count is null';
-                                perform attribut_insert(p_f_id,5,null);
-                       else
-                                perform attribut_insert(p_f_id,5,sNew);
-                       end if;
-               end if;
-       end if;
-
-return 0;
-end;
-$$;
-
-
-
-CREATE FUNCTION account_parent(p_account public.account_type) RETURNS 
public.account_type
-    LANGUAGE plpgsql
-    AS $$
-declare
-       sSubParent tmp_pcmn.pcm_val_parent%type;
-       sResult tmp_pcmn.pcm_val_parent%type;
-       nCount integer;
-begin
-       if p_account is NULL then
-               return NULL;
-       end if;
-       sSubParent:=p_account;
-       while true loop
-               select count(*) into nCount
-               from tmp_pcmn
-               where
-               pcm_val = sSubParent;
-               if nCount != 0 then
-                       sResult:= sSubParent;
-                       exit;
-               end if;
-               sSubParent:= substr(sSubParent,1,length(sSubParent)-1);
-               if length(sSubParent) <= 0 then
-                       raise exception 'Impossible de trouver le compte parent 
pour %',p_account;
-               end if;
-               raise notice 'sSubParent % % ',sSubParent,length(sSubParent);
-       end loop;
-       raise notice 'account_parent : Parent is %',sSubParent;
-       return sSubParent;
-end;
-$$;
-
-
-
-CREATE FUNCTION account_update(p_f_id integer, p_account public.account_type) 
RETURNS integer
-    LANGUAGE plpgsql
-    AS $$
-declare
-       nMax fiche.f_id%type;
-       nCount integer;
-       nParent tmp_pcmn.pcm_val_parent%type;
-       sName varchar;
-       first text;
-       second text;
-begin
-
-       if length(trim(p_account)) != 0 then
-               -- 2 accounts in card separated by comma
-               if position (',' in p_account) = 0 then
-                       select count(*) into nCount from tmp_pcmn where 
pcm_val=p_account;
-                       if nCount = 0 then
-                       select ad_value into sName from
-                               fiche_detail
-                               where
-                               ad_id=1 and f_id=p_f_id;
-                       nParent:=account_parent(p_account);
-                       insert into tmp_pcmn(pcm_val,pcm_lib,pcm_val_parent) 
values (p_account,sName,nParent);
-               end if;
-               else
-               raise info 'presence of a comma';
-               -- there is 2 accounts separated by a comma
-               first := split_part(p_account,',',1);
-               second := split_part(p_account,',',2);
-               -- check there is no other coma
-               raise info 'first value % second value %', first, second;
-
-               if  position (',' in first) != 0 or position (',' in second) != 
0 then
-                       raise exception 'Too many comas, invalid account';
-               end if;
-               -- check that both account are in PCMN
-
-               end if;
-       else
-               -- account is null
-               update fiche_detail set ad_value=null where f_id=p_f_id and 
ad_id=5 ;
-       end if;
-
-       update fiche_detail set ad_value=p_account where f_id=p_f_id and 
ad_id=5 ;
-
-return 0;
-end;
-$$;
-
-
-
-CREATE FUNCTION action_gestion_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-begin
-NEW.ag_title := substr(trim(NEW.ag_title),1,70);
-NEW.ag_hour := substr(trim(NEW.ag_hour),1,5);
-NEW.ag_owner := lower(NEW.ag_owner);
-return NEW;
-end;
-$$;
-
-
-
-CREATE FUNCTION action_gestion_related_ins_up() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-       nTmp bigint;
-begin
-
-if NEW.aga_least > NEW.aga_greatest then
-       nTmp := NEW.aga_least;
-       NEW.aga_least := NEW.aga_greatest;
-       NEW.aga_greatest := nTmp;
-end if;
-
-if NEW.aga_least = NEW.aga_greatest then
-       return NULL;
-end if;
-
-return NEW;
-
-end;
-$$;
-
-
-
-CREATE FUNCTION attribut_insert(p_f_id integer, p_ad_id integer, p_value 
character varying) RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-begin
-       insert into fiche_detail (f_id,ad_id, ad_value) values 
(p_f_id,p_ad_id,p_value);
-       
-return;
-end;
-$$;
-
-
-
-CREATE FUNCTION attribute_correct_order() RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-declare
-    crs_correct cursor for select A.jnt_id,A.jnt_order from jnt_fic_attr as A 
join jnt_fic_attr as B using (fd_id) where A.jnt_order=B.jnt_order and A.jnt_id 
> B.jnt_id;
-    rec record;
-begin
-       open crs_correct;
-       loop
-       fetch crs_correct into rec;
-       if NOT FOUND then
-               close crs_correct;
-               return;
-       end if;
-       update jnt_fic_attr set jnt_order=jnt_order + 1 where jnt_id = 
rec.jnt_id;
-       end loop;
-       close crs_correct;
-       perform attribute_correct_order ();
-end;
-$$;
-
-
-
-CREATE FUNCTION card_after_delete() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-
-begin
-
-       delete from action_gestion where f_id_dest = OLD.f_id;
-       return OLD;
-
-end;
-$$;
-
-
-
-CREATE FUNCTION card_class_base(p_f_id integer) RETURNS text
-    LANGUAGE plpgsql
-    AS $$
-declare
-       n_poste fiche_def.fd_class_base%type;
-begin
-
-       select fd_class_base into n_poste from fiche_def join fiche using
-(fd_id)
-       where f_id=p_f_id;
-       if not FOUND then
-               raise exception 'Invalid fiche card_class_base(%)',p_f_id;
-       end if;
-return n_poste;
-end;
-$$;
-
-
-
-CREATE FUNCTION category_card_before_delete() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-
-begin
-    if OLD.fd_id > 499000 then
-        return null;
-    end if;
-    return OLD;
-
-end;
-$$;
-
-
-
-CREATE FUNCTION check_balance(p_grpt integer) RETURNS numeric
-    LANGUAGE plpgsql
-    AS $$
-declare
-       amount_jrnx_debit numeric;
-       amount_jrnx_credit numeric;
-       amount_jrn numeric;
-begin
-       select coalesce(sum (j_montant),0) into amount_jrnx_credit
-       from jrnx
-               where
-       j_grpt=p_grpt
-       and j_debit=false;
-
-       select coalesce(sum (j_montant),0) into amount_jrnx_debit
-       from jrnx
-               where
-       j_grpt=p_grpt
-       and j_debit=true;
-
-       select coalesce(jr_montant,0) into amount_jrn
-       from jrn
-       where
-       jr_grpt_id=p_grpt;
-
-       if ( amount_jrnx_debit != amount_jrnx_credit )
-               then
-               return abs(amount_jrnx_debit-amount_jrnx_credit);
-               end if;
-       if ( amount_jrn != amount_jrnx_credit)
-               then
-               return -1*abs(amount_jrn - amount_jrnx_credit);
-               end if;
-       return 0;
-end;
-$$;
-
-
-
-CREATE FUNCTION check_periode() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare 
-  nPeriode int;
-begin
-if periode_exist(to_char(NEW.p_start,'DD.MM.YYYY'),NEW.p_id) <> -1 then
-       nPeriode:=periode_exist(to_char(NEW.p_start,'DD.MM.YYYY'),NEW.p_id) ;
-        raise info 'Overlap periode start % periode %',NEW.p_start,nPeriode;
-       return null;
-end if;
-
-if periode_exist(to_char(NEW.p_end,'DD.MM.YYYY'),NEW.p_id) <> -1 then
-       nPeriode:=periode_exist(to_char(NEW.p_start,'DD.MM.YYYY'),NEW.p_id) ;
-        raise info 'Overlap periode end % periode %',NEW.p_end,nPeriode;
-       return null;
-end if;
-return NEW;
-end;
-$$;
-
-
-
-CREATE FUNCTION correct_sequence(p_sequence text, p_col text, p_table text) 
RETURNS integer
-    LANGUAGE plpgsql
-    AS $$
-declare
-last_sequence int8;
-max_sequence int8;
-n integer;
-begin
-       select count(*) into n from pg_class where relkind='S' and 
relname=lower(p_sequence);
-       if n = 0 then
-               raise exception  ' Unknow sequence  % ',p_sequence;
-       end if;
-       select count(*) into n from pg_class where relkind='r' and 
relname=lower(p_table);
-       if n = 0 then
-               raise exception ' Unknow table  % ',p_table;
-       end if;
-
-       execute 'select last_value   from '||p_sequence into last_sequence;
-       raise notice 'Last value of the sequence is %', last_sequence;
-
-       execute 'select max('||p_col||')  from '||p_table into max_sequence;
-       if  max_sequence is null then
-               max_sequence := 0;
-       end if;
-       raise notice 'Max value of the sequence is %', max_sequence;
-       max_sequence:= max_sequence +1; 
-       execute 'alter sequence '||p_sequence||' restart with '||max_sequence;
-return 0;
-
-end;
-$$;
-
-
-
-COMMENT ON FUNCTION correct_sequence(p_sequence text, p_col text, p_table 
text) IS ' Often the primary key is a sequence number and sometimes the value 
of the sequence is not synchronized with the primary key ( p_sequence : 
sequence name, p_col : col of the pk,p_table : concerned table';
-
-
-
-CREATE FUNCTION create_missing_sequence() RETURNS integer
-    LANGUAGE plpgsql
-    AS $$
-declare
-p_sequence text;
-nSeq integer;
-c1 cursor for select jrn_def_id from jrn_def;
-begin
-       open c1;
-       loop
-          fetch c1 into nSeq;
-          if not FOUND THEN
-               close c1;
-               return 0;
-          end if;
-          p_sequence:='s_jrn_pj'||nSeq::text;
-       execute 'create sequence '||p_sequence;
-       end loop;
-close c1;
-return 0;
-
-end;
-$$;
-
-
-
-CREATE FUNCTION drop_index(p_constraint character varying) RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-declare 
-       nCount integer;
-begin
-       select count(*) into nCount from pg_indexes where 
indexname=p_constraint;
-       if nCount = 1 then
-       execute 'drop index '||p_constraint ;
-       end if;
-end;
-$$;
-
-
-
-CREATE FUNCTION drop_it(p_constraint character varying) RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-declare 
-       nCount integer;
-begin
-       select count(*) into nCount from pg_constraint where 
conname=p_constraint;
-       if nCount = 1 then
-       execute 'alter table parm_periode drop constraint '||p_constraint ;
-       end if;
-end;
-$$;
-
-
-
-CREATE FUNCTION extension_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
- sCode text;
- sFile text;
-begin
-sCode:=trim(upper(NEW.ex_code));
-sCode:=replace(sCode,' ','_');
-sCode:=substr(sCode,1,15);
-sCode=upper(sCode);
-NEW.ex_code:=sCode;
-sFile:=NEW.ex_file;
-sFile:=replace(sFile,';','_');
-sFile:=replace(sFile,'<','_');
-sFile:=replace(sFile,'>','_');
-sFile:=replace(sFile,'..','');
-sFile:=replace(sFile,'&','');
-sFile:=replace(sFile,'|','');
-
-
-
-return NEW;
-
-end;
-
-$$;
-
-
-
-CREATE FUNCTION fiche_account_parent(p_f_id integer) RETURNS 
public.account_type
-    LANGUAGE plpgsql
-    AS $$
-declare
-ret tmp_pcmn.pcm_val%TYPE;
-begin
-       select fd_class_base into ret from fiche_def join fiche using (fd_id) 
where f_id=p_f_id;
-       if not FOUND then
-               raise exception '% N''existe pas',p_f_id;
-       end if;
-       return ret;
-end;
-$$;
-
-
-
-CREATE FUNCTION fiche_attribut_synchro(p_fd_id integer) RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-declare
-       -- this sql gives the f_id and the missing attribute (ad_id)
-       list_missing cursor for select f_id,fd_id,ad_id,jnt_order from 
jnt_fic_attr join fiche as A using (fd_id) where fd_id=p_fd_id and ad_id not in 
(select ad_id from fiche join fiche_detail using (f_id) where 
fd_id=jnt_fic_attr.fd_id and A.f_id=f_id);
-       rec record;
-begin
-       open list_missing;
-       loop
-       
-       fetch list_missing into rec;
-       IF NOT FOUND then
-               exit;
-       end if;
-       
-       -- now we insert into attr_value
-       insert into fiche_detail (f_id,ad_id,ad_value) values 
(rec.f_id,rec.ad_id,null);
-       end loop;
-       close list_missing;
-end; 
-$$;
-
-
-
-CREATE FUNCTION fiche_def_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-begin
-
-if position (',' in NEW.fd_class_base) != 0 then
-   NEW.fd_create_account='f';
-
-end if;
-return NEW;
-end;$$;
-
-
-
-CREATE FUNCTION fiche_detail_qcode_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-       i record;
-begin
-       if NEW.ad_id=23 and NEW.ad_value != OLD.ad_value then
-               RAISE NOTICE 'new qcode [%] old qcode 
[%]',NEW.ad_value,OLD.ad_value;
-               update jrnx set j_qcode=NEW.ad_value where j_qcode = 
OLD.ad_value;    
-               update op_predef_detail set opd_poste=NEW.ad_value where 
opd_poste=OLD.ad_value;
-               raise notice 'TRG fiche_detail update op_predef_detail set 
opd_poste=% where opd_poste=%;',NEW.ad_value,OLD.ad_value;
-               for i in select ad_id from attr_def where ad_type = 'card' or 
ad_id=25 loop
-                       update fiche_detail set ad_value=NEW.ad_value where 
ad_value=OLD.ad_value and ad_id=i.ad_id;
-                       RAISE NOTICE 'change for ad_id [%] ',i.ad_id;
-                       if i.ad_id=19 then
-                               RAISE NOTICE 'Change in stock_goods OLD[%] by 
NEW[%]',OLD.ad_value,NEW.ad_value;
-                               update stock_goods set sg_code=NEW.ad_value 
where sg_code=OLD.ad_value;
-                       end if;
-
-               end loop;
-       end if;
-return NEW;
-end;
-$$;
-
-
-
-CREATE FUNCTION fill_quant_fin() RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-declare
-   sBank text;
-   sCassa text;
-   sCustomer text;
-   sSupplier text;
-   rec record;
-   recBank record;
-   recSupp_Cust record;
-   nCount integer;
-   nAmount numeric;
-   nBank integer;
-   nOther integer;
-   nSupp_Cust integer;
-begin
-       select p_value into sBank from parm_code where p_code='BANQUE';
-       select p_value into sCassa from parm_code where p_code='CAISSE';
-       select p_value into sSupplier from parm_code where p_code='SUPPLIER';
-       select p_value into sCustomer from parm_code where p_code='CUSTOMER';
-       
-       for rec in select jr_id,jr_grpt_id from jrn 
-           where jr_def_id in (select jrn_def_id from jrn_def where 
jrn_def_type='FIN')
-               and jr_id not in (select jr_id from quant_fin)
-       loop
-               -- there are only 2 lines for bank operations
-               -- first debit
-               select count(j_id) into nCount from jrnx where 
j_grpt=rec.jr_grpt_id;
-               if nCount > 2 then 
-                       raise notice 'Trop de valeur pour jr_grpt_id % count 
%',rec.jr_grpt_id,nCount;
-                       return;
-               end if;
-               nBank := 0; nOther:=0;
-               for recBank in select  j_id, j_montant,j_debit,j_qcode,j_poste 
from jrnx where j_grpt=rec.jr_grpt_id
-               loop
-               if recBank.j_poste like sBank||'%' then
-                       -- retrieve f_id for bank
-                       select f_id into nBank from vw_poste_qcode where 
j_qcode=recBank.j_qcode;
-                       if recBank.j_debit = false then
-                               nAmount=recBank.j_montant*(-1);
-                       else 
-                               nAmount=recBank.j_montant;
-                       end if;
-               else
-                       select f_id into nOther from vw_poste_qcode where 
j_qcode=recBank.j_qcode;
-               end if;
-               end loop;
-               if nBank != 0 and nOther != 0 then
-                       insert into quant_fin 
(jr_id,qf_bank,qf_other,qf_amount) values (rec.jr_id,nBank,nOther,nAmount);
-               end if;
-       end loop;
-       for rec in select jr_id,jr_grpt_id from jrn 
-           where jr_def_id in (select jrn_def_id from jrn_def where 
jrn_def_type='FIN') and jr_id not in (select jr_id from quant_fin)
-       loop
-               -- there are only 2 lines for bank operations
-               -- first debit
-               select count(j_id) into nCount from jrnx where 
j_grpt=rec.jr_grpt_id;
-               if nCount > 2 then 
-                       raise notice 'Trop de valeur pour jr_grpt_id % count 
%',rec.jr_grpt_id,nCount;
-                       return;
-               end if;
-               nBank := 0; nOther:=0;
-               for recBank in select  j_id, j_montant,j_debit,j_qcode,j_poste 
from jrnx where j_grpt=rec.jr_grpt_id
-               loop
-               if recBank.j_poste like sCassa||'%' then
-                       -- retrieve f_id for bank
-                       select f_id into nBank from vw_poste_qcode where 
j_qcode=recBank.j_qcode;
-                       if recBank.j_debit = false then
-                               nAmount=recBank.j_montant*(-1);
-                       else 
-                               nAmount=recBank.j_montant;
-                       end if;
-               else
-                       select f_id into nOther from vw_poste_qcode where 
j_qcode=recBank.j_qcode;
-               end if;
-               end loop;
-               if nBank != 0 and nOther != 0 then
-                       insert into quant_fin 
(jr_id,qf_bank,qf_other,qf_amount) values (rec.jr_id,nBank,nOther,nAmount);
-               end if;
-       end loop;
-
-       for rec in select jr_id,jr_grpt_id from jrn 
-           where jr_def_id in (select jrn_def_id from jrn_def where 
jrn_def_type='FIN') and jr_id not in (select jr_id from quant_fin)
-       loop
-               -- there are only 2 lines for bank operations
-               -- first debit
-               select count(j_id) into nCount from jrnx where 
j_grpt=rec.jr_grpt_id;
-               if nCount > 2 then 
-                       raise notice 'Trop de valeur pour jr_grpt_id % count 
%',rec.jr_grpt_id,nCount;
-                       return;
-               end if;
-               nSupp_Cust := 0; nOther:=0;
-               for recSupp_Cust in select  j_id, 
j_montant,j_debit,j_qcode,j_poste from jrnx where j_grpt=rec.jr_grpt_id
-               loop
-               if recSupp_Cust.j_poste like sSupplier||'%'  then
-                       -- retrieve f_id for bank
-                       select f_id into nSupp_Cust from vw_poste_qcode where 
j_qcode=recSupp_Cust.j_qcode;
-                       if recSupp_Cust.j_debit = true then
-                               nAmount=recSupp_Cust.j_montant*(-1);
-                       else 
-                               nAmount=recSupp_Cust.j_montant;
-                       end if;
-               else if  recSupp_Cust.j_poste like sCustomer||'%' then
-                       select f_id into nSupp_Cust from vw_poste_qcode where 
j_qcode=recSupp_Cust.j_qcode;
-                       if recSupp_Cust.j_debit = false then
-                               nAmount=recSupp_Cust.j_montant*(-1);
-                       else 
-                               nAmount=recSupp_Cust.j_montant;
-                       end if;
-                       else
-                       select f_id into nOther from vw_poste_qcode where 
j_qcode=recSupp_Cust.j_qcode;
-                       
-                       end if;
-               end if;
-               end loop;
-               if nSupp_Cust != 0 and nOther != 0 then
-                       insert into quant_fin 
(jr_id,qf_bank,qf_other,qf_amount) values (rec.jr_id,nOther,nSupp_Cust,nAmount);
-               end if;
-       end loop;
-       for rec in select jr_id,jr_grpt_id from jrn 
-           where jr_def_id in (select jrn_def_id from jrn_def where 
jrn_def_type='FIN') and jr_id not in (select jr_id from quant_fin)
-       loop
-               -- there are only 2 lines for bank operations
-               -- first debit
-               select count(j_id) into nCount from jrnx where 
j_grpt=rec.jr_grpt_id;
-               if nCount > 2 then 
-                       raise notice 'Trop de valeur pour jr_grpt_id % count 
%',rec.jr_grpt_id,nCount;
-                       return;
-               end if;
-               nSupp_Cust := 0; nOther:=0;
-               for recSupp_Cust in select  j_id, 
j_montant,j_debit,j_qcode,j_poste from jrnx where j_grpt=rec.jr_grpt_id
-               loop
-               if recSupp_Cust.j_poste like '441%'  then
-                       -- retrieve f_id for bank
-                       select f_id into nSupp_Cust from vw_poste_qcode where 
j_qcode=recSupp_Cust.j_qcode;
-                       if recSupp_Cust.j_debit = false then
-                               nAmount=recSupp_Cust.j_montant*(-1);
-                       else 
-                               nAmount=recSupp_Cust.j_montant;
-                       end if;
-                       else
-                       select f_id into nOther from vw_poste_qcode where 
j_qcode=recSupp_Cust.j_qcode;
-                       
-                       
-               end if;
-               end loop;
-               if nSupp_Cust != 0 and nOther != 0 then
-                       insert into quant_fin 
(jr_id,qf_bank,qf_other,qf_amount) values (rec.jr_id,nOther,nSupp_Cust,nAmount);
-               end if;
-       end loop;
-       return;
-end;
-$$;
-
-
-
-CREATE FUNCTION find_pcm_type(pp_value public.account_type) RETURNS text
-    LANGUAGE plpgsql
-    AS $$
-declare
-       str_type parm_poste.p_type%TYPE;
-       str_value parm_poste.p_type%TYPE;
-       nLength integer;
-begin
-       str_value:=pp_value;
-       nLength:=length(str_value::text);
-       while nLength > 0 loop
-               select p_type into str_type from parm_poste where 
p_value=str_value;
-               if FOUND then
-                       return str_type;
-               end if;
-               nLength:=nLength-1;
-               str_value:=substring(str_value::text from 1 for 
nLength)::account_type;
-       end loop;
-return 'CON';
-end;
-$$;
-
-
-
-CREATE FUNCTION find_periode(p_date text) RETURNS integer
-    LANGUAGE plpgsql
-    AS $$
-
-declare n_p_id int4;
-begin
-
-select p_id into n_p_id
-       from parm_periode
-       where
-               p_start <= to_date(p_date,'DD.MM.YYYY')
-               and
-               p_end >= to_date(p_date,'DD.MM.YYYY');
-
-if NOT FOUND then
-       return -1;
-end if;
-
-return n_p_id;
-
-end;$$;
-
-
-
-CREATE FUNCTION format_account(p_account public.account_type) RETURNS 
public.account_type
-    LANGUAGE plpgsql
-    AS $_$
-
-declare
-
-sResult account_type;
-
-begin
-sResult := lower(p_account);
-
-sResult := translate(sResult,E'éèêëàâäïîüûùöôç','eeeeaaaiiuuuooc');
-sResult := translate(sResult,E' $€µ£%.+-/\\!(){}(),;_&|"#''^<>*','');
-
-return upper(sResult);
-
-end;
-$_$;
-
-
-
-COMMENT ON FUNCTION format_account(p_account public.account_type) IS 'format 
the accounting :
-- upper case
-- remove space and special char.
-';
-
-
-
-CREATE FUNCTION get_letter_jnt(a bigint) RETURNS bigint
-    LANGUAGE plpgsql
-    AS $$
-declare
- nResult bigint;
-begin
-   select jl_id into nResult from jnt_letter join letter_deb using (jl_id) 
where j_id = a;
-   if NOT FOUND then
-       select jl_id into nResult from jnt_letter join letter_cred using 
(jl_id) where j_id = a;
-       if NOT found then
-               return null;
-       end if;
-    end if;
-return nResult;
-end;
-$$;
-
-
-
-CREATE FUNCTION get_menu_dependency(profile_menu_id integer) RETURNS SETOF 
integer
-    LANGUAGE plpgsql
-    AS $$
-declare
-       i int;
-       x int;
-       e int;
-begin
-       for x in select pm_id,me_code
-                       from profile_menu
-                       where me_code_dep in (select me_code from profile_menu 
where pm_id=profile_menu_id)
-                       and p_id = (select p_id from profile_menu where 
pm_id=profile_menu_id)
-       loop
-               return next x;
-
-       for e in select *  from comptaproc.get_menu_dependency(x)
-               loop
-                       return next e;
-               end loop;
-
-       end loop;
-       return;
-end;
-$$;
-
-
-
-CREATE FUNCTION get_menu_tree(p_code text, p_profile integer) RETURNS SETOF 
public.menu_tree
-    LANGUAGE plpgsql
-    AS $$
-declare
-       i menu_tree;
-       e menu_tree;
-       a text;
-       x v_all_menu%ROWTYPE;
-begin
-       for x in select *  from v_all_menu where me_code_dep=p_code::text and 
p_id=p_profile
-       loop
-               if x.me_code_dep is not null then
-                       i.code := x.me_code_dep||'/'||x.me_code;
-               else
-                       i.code := x.me_code;
-               end if;
-
-               i.description := x.me_description;
-
-               return next i;
-
-       for e in select *  from get_menu_tree(x.me_code,p_profile)
-               loop
-                       e.code:=x.me_code_dep||'/'||e.code;
-                       return next e;
-               end loop;
-
-       end loop;
-       return;
-end;
-$$;
-
-
-
-CREATE FUNCTION get_pcm_tree(source public.account_type) RETURNS SETOF 
public.account_type
-    LANGUAGE plpgsql
-    AS $$
-declare
-       i account_type;
-       e account_type;
-begin
-       for i in select pcm_val from tmp_pcmn where pcm_val_parent=source
-       loop
-               return next i;
-               for e in select get_pcm_tree from get_pcm_tree(i)
-               loop
-                       return next e;
-               end loop;
-
-       end loop;
-       return;
-end;
-$$;
-
-
-
-CREATE FUNCTION get_profile_menu(p_profile integer) RETURNS SETOF 
public.menu_tree
-    LANGUAGE plpgsql
-    AS $$
-declare
-       a menu_tree;
-       e menu_tree;
-begin
-for a in select me_code,me_description from v_all_menu where p_id=p_profile
-       and me_code_dep is null and me_type <> 'PR' and me_type <>'SP'
-loop
-               return next a;
-
-               for e in select * from get_menu_tree(a.code,p_profile)
-               loop
-                       return next e;
-               end loop;
-
-       end loop;
-return;
-end;
-$$;
-
-
-
-CREATE FUNCTION group_analytic_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare 
-name text;
-begin
-name:=upper(NEW.ga_id);
-name:=trim(name);
-name:=replace(name,' ','');
-NEW.ga_id:=name;
-return NEW;
-end;$$;
-
-
-
-CREATE FUNCTION group_analytique_del() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-begin
-update poste_analytique set ga_id=null
-where ga_id=OLD.ga_id;
-return OLD;
-end;$$;
-
-
-
-CREATE FUNCTION html_quote(p_string text) RETURNS text
-    LANGUAGE plpgsql
-    AS $$
-declare
-       r text;
-begin
-       r:=p_string;
-       r:=replace(r,'<','&lt;');
-       r:=replace(r,'>','&gt;');
-       r:=replace(r,'''','&quot;');
-       return r;
-end;$$;
-
-
-
-COMMENT ON FUNCTION html_quote(p_string text) IS 'remove harmfull HTML char';
-
-
-
-CREATE FUNCTION info_def_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare 
-       row_info_def info_def%ROWTYPE;
-       str_type text;
-begin
-row_info_def:=NEW;
-str_type:=upper(trim(NEW.id_type));
-str_type:=replace(str_type,' ','');
-str_type:=replace(str_type,',','');
-str_type:=replace(str_type,';','');
-if  length(str_type) =0 then
-       raise exception 'id_type cannot be null';
-end if;
-row_info_def.id_type:=str_type;
-return row_info_def;
-end;
-$$;
-
-
-
-CREATE FUNCTION insert_jrnx(p_date character varying, p_montant numeric, 
p_poste public.account_type, p_grpt integer, p_jrn_def integer, p_debit 
boolean, p_tech_user text, p_tech_per integer, p_qcode text, p_comment text) 
RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-begin
-       insert into jrnx
-       (
-               j_date,
-               j_montant,
-               j_poste,
-               j_grpt,
-               j_jrn_def,
-               j_debit,
-               j_text,
-               j_tech_user,
-               j_tech_per,
-               j_qcode
-       ) values
-       (
-               to_date(p_date,'DD.MM.YYYY'),
-               p_montant,
-               p_poste,
-               p_grpt,
-               p_jrn_def,
-               p_debit,
-               p_comment,
-               p_tech_user,
-               p_tech_per,
-               p_qcode
-       );
-
-return;
-end;
-$$;
-
-
-
-CREATE FUNCTION insert_quant_purchase(p_internal text, p_j_id numeric, p_fiche 
character varying, p_quant numeric, p_price numeric, p_vat numeric, p_vat_code 
integer, p_nd_amount numeric, p_nd_tva numeric, p_nd_tva_recup numeric, 
p_dep_priv numeric, p_client character varying, p_tva_sided numeric, 
p_price_unit numeric) RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-declare
-        fid_client integer;
-        fid_good   integer;
-        account_priv    account_type;
-        fid_good_account account_type;
-        n_dep_priv numeric;
-begin
-        n_dep_priv := 0;
-        select p_value into account_priv from parm_code where 
p_code='DEP_PRIV';
-        select f_id into fid_client from
-                fiche_detail where ad_id=23 and ad_value=upper(trim(p_client));
-        select f_id into fid_good from
-                 fiche_detail where ad_id=23 and ad_value=upper(trim(p_fiche));
-        select ad_value into fid_good_account from fiche_detail where ad_id=5 
and f_id=fid_good;
-        if strpos( fid_good_account , account_priv ) = 1 then
-                n_dep_priv=p_price;
-        end if; 
-            
-        insert into quant_purchase
-                (qp_internal,
-                j_id,
-                qp_fiche,
-                qp_quantite,
-                qp_price,
-                qp_vat,
-                qp_vat_code,
-                qp_nd_amount,
-                qp_nd_tva,
-                qp_nd_tva_recup,
-                qp_supplier,
-                qp_dep_priv,
-                qp_vat_sided,
-                qp_unit)
-        values
-                (p_internal,
-                p_j_id,
-                fid_good,
-                p_quant,
-                p_price,
-                p_vat,
-                p_vat_code,
-                p_nd_amount,
-                p_nd_tva,
-                p_nd_tva_recup,
-                fid_client,
-                n_dep_priv,
-                p_tva_sided,
-                p_price_unit);
-        return;
-end;
- $$;
-
-
-
-CREATE FUNCTION insert_quant_sold(p_internal text, p_jid numeric, p_fiche 
character varying, p_quant numeric, p_price numeric, p_vat numeric, p_vat_code 
integer, p_client character varying, p_tva_sided numeric, p_price_unit numeric) 
RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-declare
-        fid_client integer;
-        fid_good   integer;
-begin
-
-        select f_id into fid_client from
-                fiche_detail where ad_id=23 and ad_value=upper(trim(p_client));
-        select f_id into fid_good from
-                fiche_detail where ad_id=23 and ad_value=upper(trim(p_fiche));
-        insert into quant_sold
-                
(qs_internal,j_id,qs_fiche,qs_quantite,qs_price,qs_vat,qs_vat_code,qs_client,qs_valid,qs_vat_sided,qs_unit)
-        values
-                
(p_internal,p_jid,fid_good,p_quant,p_price,p_vat,p_vat_code,fid_client,'Y',p_tva_sided,p_price_unit);
-        return;
-end;
- $$;
-
-
-
-CREATE FUNCTION insert_quick_code(nf_id integer, tav_text text) RETURNS integer
-    LANGUAGE plpgsql
-    AS $_$
-       declare
-       ns integer;
-       nExist integer;
-       tText text;
-       tBase text;
-       tName text;
-       nCount Integer;
-       nDuplicate Integer;
-       begin
-       tText := lower(trim(tav_text));
-       tText := replace(tText,' ','');
-        tText:= translate(tText,E' $€µ£%+/\\!(){}(),;&|"#''^<>*','');
-       tText := translate(tText,E'éèêëàâäïîüûùöôç','eeeeaaaiiuuuooc');
-       nDuplicate := 0;
-       tBase := tText;
-       loop
-               -- take the next sequence
-               select nextval('s_jnt_fic_att_value') into ns;
-               if length (tText) = 0 or tText is null then
-                       select count(*) into nCount from fiche_detail where 
f_id=nf_id and ad_id=1;
-                       if nCount = 0 then
-                               tText := 'FICHE'||ns::text;
-                       else
-                               select ad_value into tName from fiche_detail 
where f_id=nf_id and ad_id=1;
-                               
-                               tName := lower(trim(tName));
-                               tName := substr(tName,1,6);
-                               tName := replace(tName,' ','');
-                               tName:= translate(tName,E' 
$€µ£%+/\\!(){}(),;&|"#''^<>*','');
-                               tName := 
translate(tName,E'éèêëàâäïîüûùöôç','eeeeaaaiiuuuooc');
-                               tBase := tName;
-                               if nDuplicate = 0 then
-                                       tText := tName;
-                               else
-                                       tText := tName||nDuplicate::text;
-                               end if;
-                       end if;
-               end if;
-               -- av_text already used ?
-               select count(*) into nExist
-                       from fiche_detail
-               where
-                       ad_id=23 and  ad_value=upper(tText);
-
-               if nExist = 0 then
-                       exit;
-               end if;
-               nDuplicate := nDuplicate + 1 ;
-               tText := tBase || nDuplicate::text;
-               
-               if nDuplicate > 9999 then
-                       raise Exception 'too many duplicate % duplicate# 
%',tText,nDuplicate;
-               end if;
-       end loop;
-
-
-       insert into fiche_detail(jft_id,f_id,ad_id,ad_value) values 
(ns,nf_id,23,upper(tText));
-       return ns;
-       end;
-$_$;
-
-
-
-CREATE FUNCTION is_closed(p_periode integer, p_jrn_def_id integer) RETURNS 
boolean
-    LANGUAGE plpgsql
-    AS $$
-declare
-bClosed bool;
-str_status text;
-begin
-select p_closed into bClosed from parm_periode
-       where p_id=p_periode;
-
-if bClosed = true then
-       return bClosed;
-end if;
-
-select status into str_status from jrn_periode
-       where p_id =p_periode and jrn_def_id=p_jrn_def_id;
-
-if str_status <> 'OP' then
-   return bClosed;
-end if;
-return false;
-end;
-$$;
-
-
-
-CREATE FUNCTION jnt_fic_attr_ins() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-   r_record jnt_fic_attr%ROWTYPE;
-   i_max integer;
-begin
-r_record=NEW;
-perform comptaproc.fiche_attribut_synchro(r_record.fd_id);
-select coalesce(max(jnt_order),0) into i_max from jnt_fic_attr where 
fd_id=r_record.fd_id;
-i_max := i_max + 10;
-NEW.jnt_order=i_max;
-return NEW;
-end;
-$$;
-
-
-
-CREATE FUNCTION jrn_add_note(p_jrid bigint, p_note text) RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-declare
-       tmp bigint;
-begin
-       if length(trim(p_note)) = 0 then
-          delete from jrn_note where jr_id= p_jrid;
-          return;
-       end if;
-       
-       select n_id into tmp from jrn_note where jr_id = p_jrid;
-       
-       if FOUND then
-          update jrn_note set n_text=trim(p_note) where jr_id = p_jrid;
-       else 
-          insert into jrn_note (jr_id,n_text) values ( p_jrid, p_note);
-
-       end if;
-       
-       return;
-end;
-$$;
-
-
-
-CREATE FUNCTION jrn_check_periode() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-bClosed bool;
-str_status text;
-ljr_tech_per jrn.jr_tech_per%TYPE;
-ljr_def_id jrn.jr_def_id%TYPE;
-lreturn jrn%ROWTYPE;
-begin
-if TG_OP='UPDATE' then
-       ljr_tech_per :=OLD.jr_tech_per ;
-       NEW.jr_tech_per := 
comptaproc.find_periode(to_char(NEW.jr_date,'DD.MM.YYYY'));
-       ljr_def_id   :=OLD.jr_def_id;
-       lreturn      :=NEW;
-       if NEW.jr_date = OLD.jr_date then
-               return NEW;
-       end if;
-       if comptaproc.is_closed(NEW.jr_tech_per,NEW.jr_def_id) = true then
-               raise exception 'Periode fermee';
-       end if;
-end if;
-
-if TG_OP='INSERT' then
-       NEW.jr_tech_per := 
comptaproc.find_periode(to_char(NEW.jr_date,'DD.MM.YYYY'));
-       ljr_tech_per :=NEW.jr_tech_per ;
-       ljr_def_id   :=NEW.jr_def_id;
-       lreturn      :=NEW;
-end if;
-
-if TG_OP='DELETE' then
-       ljr_tech_per :=OLD.jr_tech_per;
-       ljr_def_id   :=OLD.jr_def_id;
-       lreturn      :=OLD;
-end if;
-
-if comptaproc.is_closed (ljr_def_id,ljr_def_id) = true then
-       raise exception 'Periode fermee';
-end if;
-
-return lreturn;
-end;$$;
-
-
-
-CREATE FUNCTION jrn_def_add() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$begin
-execute 'insert into jrn_periode(p_id,jrn_def_id,status) select 
p_id,'||NEW.jrn_def_id||',
-       case when p_central=true then ''CE''
-             when p_closed=true then ''CL''
-       else ''OP''
-       end
-from
-parm_periode ';
-return NEW;
-end;$$;
-
-
-
-CREATE FUNCTION jrn_def_delete() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare 
-nb numeric;
-begin
-select count(*) into nb from jrn where jr_def_id=OLD.jrn_def_id;
-
-if nb <> 0 then
-       raise exception 'EFFACEMENT INTERDIT: JOURNAL UTILISE';
-end if;
-return OLD;
-end;$$;
-
-
-
-CREATE FUNCTION jrn_del() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-row jrn%ROWTYPE;
-begin
-row:=OLD;
-insert into del_jrn ( jr_id,
-       jr_def_id,
-       jr_montant,
-       jr_comment,
-       jr_date,
-       jr_grpt_id,
-       jr_internal,
-       jr_tech_date,
-       jr_tech_per,
-       jrn_ech,
-       jr_ech,
-       jr_rapt,
-       jr_valid,
-       jr_opid,
-       jr_c_opid,
-       jr_pj,
-       jr_pj_name,
-       jr_pj_type,
-       jr_pj_number,
-       del_jrn_date) 
-       select  jr_id,
-             jr_def_id,
-             jr_montant,
-             jr_comment,
-             jr_date,
-             jr_grpt_id,
-             jr_internal,
-             jr_tech_date,
-             jr_tech_per,
-             jrn_ech,
-             jr_ech,
-             jr_rapt,
-             jr_valid,
-             jr_opid,
-             jr_c_opid,
-             jr_pj,
-             jr_pj_name,
-             jr_pj_type,
-             jr_pj_number
-             ,now() from jrn where jr_id=row.jr_id;
-return row;
-end;
-$$;
-
-
-
-CREATE FUNCTION jrnx_del() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-row jrnx%ROWTYPE;
-begin
-row:=OLD;
-
-
-insert into del_jrnx(
-            j_id, j_date, j_montant, j_poste, j_grpt, j_rapt, j_jrn_def, 
-            j_debit, j_text, j_centralized, j_internal, j_tech_user, 
j_tech_date, 
-            j_tech_per, j_qcode, f_id)  SELECT j_id, j_date, j_montant, 
j_poste, j_grpt, j_rapt, j_jrn_def, 
-       j_debit, j_text, j_centralized, j_internal, j_tech_user, j_tech_date, 
-       j_tech_per, j_qcode, f_id from jrnx where j_id=row.j_id;
-return row;
-end;
-$$;
-
-
-
-CREATE FUNCTION jrnx_ins() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-n_fid bigint;
-nCount integer;
-sQcode text;
-
-begin
-n_fid := NULL;
-sQcode := NULL;
-
-NEW.j_tech_per := comptaproc.find_periode(to_char(NEW.j_date,'DD.MM.YYYY'));
-if NEW.j_tech_per = -1 then
-        raise exception 'Période invalide';
-end if;
-
-if trim(coalesce(NEW.j_qcode,'')) = '' then
-        -- how many card has this accounting
-        select count(*) into nCount from fiche_detail where ad_id=5 and 
ad_value=NEW.j_poste;
-        -- only one card is found , then we change the j_qcode by the card
-        if nCount = 1 then
-                select f_id into n_fid from fiche_detail where ad_id = 5 and 
ad_value=NEW.j_poste;
-            if FOUND then
-                select ad_value into sQcode  from fiche_detail where 
f_id=n_fid and ad_id = 23;
-                NEW.f_id := n_fid;
-                NEW.j_qcode = sQcode;
-                raise info 'comptaproc.jrnx_ins : found card % qcode 
%',n_fid,sQcode;
-            end if;
-        end if;
-
-end if;
-
-NEW.j_qcode=trim(upper(coalesce(NEW.j_qcode,'')));
-
-if length (coalesce(NEW.j_qcode,'')) = 0 then
-    NEW.j_qcode=NULL;
-    else
-      select f_id into n_fid from fiche_detail  where ad_id=23 and 
ad_value=NEW.j_qcode;
-      if NOT FOUND then
-        raise exception 'La fiche dont le quick code est % n''existe 
pas',NEW.j_qcode;
-    end if;
-end if;
-
-NEW.f_id:=n_fid;
-return NEW;
-end;
-$$;
-
-
-
-CREATE FUNCTION jrnx_letter_del() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-row jrnx%ROWTYPE;
-begin
-row:=OLD;
-delete from jnt_letter 
-       where (jl_id in (select jl_id from letter_deb) and jl_id not in(select 
jl_id from letter_cred )) 
-               or (jl_id not in (select jl_id from letter_deb  ) and jl_id  
in(select jl_id from letter_cred ));
-return row;
-end;
-$$;
-
-
-
-CREATE FUNCTION menu_complete_dependency(n_profile numeric) RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-declare 
- n_count integer;
- csr_root_menu cursor (p_profile numeric) is select pm_id,
-       me_code,
-       me_code_dep 
-       
-       from profile_menu 
-       where 
-       me_code in 
-               (select a.me_code_dep 
-                       from profile_menu as a 
-                       join profile_menu as b on (a.me_code=b.me_code and 
a.me_code_dep=b.me_code_dep and a.pm_id <> b.pm_id and a.p_id=b.p_id) 
-                       where a.p_id=n_profile) 
-               and p_id=p_profile;
-
-begin
-       for duplicate in csr_root_menu(n_profile)
-       loop
-               raise notice 'found %',duplicate;
-               update profile_menu set pm_id_dep  = duplicate.pm_id 
-                       where pm_id in (select a.pm_id
-                               from profile_menu as a 
-                               left join profile_menu as b on 
(a.me_code=b.me_code and a.me_code_dep=b.me_code_dep)
-                               where 
-                               a.p_id=n_profile
-                               and b.p_id=n_profile
-                               and a.pm_id_dep is null 
-                               and a.me_code_dep = duplicate.me_code
-                               and a.pm_id < b.pm_id);
-       end loop;
-       
-       for duplicate in csr_root_menu(n_profile) 
-       loop
-               select count(*) into n_count from profile_menu where 
p_id=n_profile and pm_id_dep = duplicate.pm_id;
-               raise notice '% use % times',duplicate,n_count;
-               if n_count = 0 then
-                       raise notice ' Update with %',duplicate;
-                       update profile_menu set pm_id_dep = duplicate.pm_id 
where p_id = n_profile and me_code_dep = duplicate.me_code and pm_id_dep is 
null;
-               end if;
-
-       end loop;
-       
-end;
-$$;
-
-
-
-CREATE FUNCTION opd_limit_description() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-       declare
-               sDescription text;
-       begin
-       sDescription := NEW.od_description;
-       NEW.od_description := substr(sDescription,1,80);
-       return NEW;
-       end;
-$$;
-
-
-
-CREATE FUNCTION periode_exist(p_date text, p_periode_id bigint) RETURNS integer
-    LANGUAGE plpgsql
-    AS $$
-
-declare n_p_id int4;
-begin
-
-select p_id into n_p_id
-        from parm_periode
-        where
-                p_start <= to_date(p_date,'DD.MM.YYYY')
-                and
-                p_end >= to_date(p_date,'DD.MM.YYYY')
-                and
-                p_id <> p_periode_id;
-
-if NOT FOUND then
-        return -1;
-end if;
-
-return n_p_id;
-
-end;$$;
-
-
-
-CREATE FUNCTION plan_analytic_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-   name text;
-begin
-   name:=upper(NEW.pa_name);
-   name:=trim(name);
-   name:=replace(name,' ','');
-   NEW.pa_name:=name;
-return NEW;
-end;
-$$;
-
-
-
-CREATE FUNCTION poste_analytique_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$declare
-name text;
-rCount record;
-
-begin
-name:=upper(NEW.po_name);
-name:=trim(name);
-name:=replace(name,' ','');            
-NEW.po_name:=name;
-
-if NEW.ga_id is NULL then
-return NEW;
-end if;
-
-if length(trim(NEW.ga_id)) = 0 then
-  NEW.ga_id:=NULL;
-  return NEW;
-end if;
-perform 'select ga_id from groupe_analytique where ga_id='||NEW.ga_id;
-if NOT FOUND then
-   raise exception' Inexistent Group Analytic %',NEW.ga_id;
-end if;
-return NEW;
-end;$$;
-
-
-
-CREATE FUNCTION proc_check_balance() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare 
-       diff numeric;
-       tt integer;
-begin
-       if TG_OP = 'INSERT' or TG_OP='UPDATE' then
-       tt=NEW.jr_grpt_id;
-       diff:=check_balance(tt);
-       if diff != 0 then
-               raise exception 'balance error %',diff ;
-       end if;
-       return NEW;
-       end if;
-end;
-$$;
-
-
-
-CREATE FUNCTION quant_purchase_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    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;
-$$;
-
-
-
-CREATE FUNCTION quant_sold_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    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;
-$$;
-
-
-
-CREATE FUNCTION t_document_modele_validate() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare 
-    lText text;
-    modified document_modele%ROWTYPE;
-begin
-    modified:=NEW;
-
-       modified.md_filename:=replace(NEW.md_filename,' ','_');
-       return modified;
-end;
-$$;
-
-
-
-CREATE FUNCTION t_document_type_insert() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-nCounter integer;
-    BEGIN
-select count(*) into nCounter from pg_class where 
relname='seq_doc_type_'||NEW.dt_id;
-if nCounter = 0 then
-        execute  'create sequence seq_doc_type_'||NEW.dt_id;
-end if;
-        RETURN NEW;
-    END;
-$$;
-
-
-
-CREATE FUNCTION t_document_validate() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-  lText text;
-  modified document%ROWTYPE;
-begin
-       modified:=NEW;
-       modified.d_filename:=replace(NEW.d_filename,' ','_');
-       return modified;
-end;
-$$;
-
-
-
-CREATE FUNCTION t_jrn_def_description() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-    declare
-        str varchar(200);
-    BEGIN
-        str := substr(NEW.jrn_def_description,1,200);
-        NEW.jrn_def_description := str;
-
-        RETURN NEW;
-    END;
-$$;
-
-
-
-CREATE FUNCTION t_jrn_def_sequence() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-nCounter integer;
-
-    BEGIN
-    select count(*) into nCounter 
-       from pg_class where relname='s_jrn_'||NEW.jrn_def_id;
-       if nCounter = 0 then
-                  execute  'create sequence s_jrn_'||NEW.jrn_def_id;
-          raise notice 'Creating sequence s_jrn_%',NEW.jrn_def_id;
-        end if;
-
-        RETURN NEW;
-    END;
-$$;
-
-
-
-CREATE FUNCTION table_analytic_account(p_from text, p_to text) RETURNS SETOF 
public.anc_table_account_type
-    LANGUAGE plpgsql
-    AS $$
-declare
-       ret ANC_table_account_type%ROWTYPE;
-       sql_from text:='';
-       sql_to text:='';
-       sWhere text:='';
-       sAnd text:='';
-       sResult text:='';
-begin
-if p_from <> '' and p_from is not null then
-       sql_from:='oa_date >= to_date('''||p_from::text||''',''DD.MM.YYYY'')';
-       sWhere:=' where ';
-end if;
-
-if p_to <> '' and p_to is not null then
-       sql_to=' oa_date <= to_date('''||p_to::text||''',''DD.MM.YYYY'')';
-       sWhere := ' where ';
-end if;
-
-if sql_to <> '' and sql_from <> '' then
-       sAnd:=' and ';
-end if;
-
-sResult := sWhere || sql_from || sAnd || sql_to;
-
-for ret in EXECUTE 'SELECT po.po_id,
-                           po.pa_id, po.po_name, 
-                           po.po_description,sum(
-        CASE
-            WHEN operation_analytique.oa_debit = true THEN 
operation_analytique.oa_amount * (-1)::numeric
-            ELSE operation_analytique.oa_amount
-        END) AS sum_amount, jrnx.j_poste, tmp_pcmn.pcm_lib AS name
-   FROM operation_analytique
-   JOIN poste_analytique po USING (po_id)
-   JOIN jrnx USING (j_id)
-   JOIN tmp_pcmn ON jrnx.j_poste::text = tmp_pcmn.pcm_val::text
-'|| sResult ||'
-  GROUP BY po.po_id, po.po_name, po.pa_id, jrnx.j_poste, tmp_pcmn.pcm_lib, 
po.po_description
- HAVING sum(
-CASE
-    WHEN operation_analytique.oa_debit = true THEN 
operation_analytique.oa_amount * (-1)::numeric
-    ELSE operation_analytique.oa_amount
-END) <> 0::numeric '
-       loop
-       return next ret;
-end loop;
-end;
-$$;
-
-
-
-CREATE FUNCTION table_analytic_card(p_from text, p_to text) RETURNS SETOF 
public.anc_table_card_type
-    LANGUAGE plpgsql
-    AS $$
-declare
-       ret ANC_table_card_type%ROWTYPE;
-       sql_from text:='';
-       sql_to text:='';
-       sWhere text:='';
-       sAnd text:='';
-       sResult text:='';
-begin
-if p_from <> '' and p_from is not null then
-       sql_from:='oa_date >= to_date('''||p_from::text||''',''DD.MM.YYYY'')';
-       sWhere:=' where ';
-end if;
-
-if p_to <> '' and p_to is not null then
-       sql_to=' oa_date <= to_date('''||p_to::text||''',''DD.MM.YYYY'')';
-       sWhere := ' where ';
-end if;
-
-if sql_to <> '' and sql_from <> '' then
-       sAnd :=' and ';
-end if;
-
-sResult := sWhere || sql_from || sAnd || sql_to;
-
-for ret in EXECUTE ' SELECT po.po_id, po.pa_id, po.po_name, po.po_description, 
 sum(
-        CASE
-            WHEN operation_analytique.oa_debit = true THEN 
operation_analytique.oa_amount * (-1)::numeric
-            ELSE operation_analytique.oa_amount
-        END) AS sum_amount, jrnx.f_id, jrnx.j_qcode, ( SELECT 
fiche_detail.ad_value
-           FROM fiche_detail
-          WHERE fiche_detail.ad_id = 1 AND fiche_detail.f_id = jrnx.f_id) AS 
name
-   FROM operation_analytique
-   JOIN poste_analytique po USING (po_id)
-   JOIN jrnx USING (j_id)'|| sResult ||'
-  GROUP BY po.po_id, po.po_name, po.pa_id, jrnx.f_id, jrnx.j_qcode, ( SELECT 
fiche_detail.ad_value
-   FROM fiche_detail
-  WHERE fiche_detail.ad_id = 1 AND fiche_detail.f_id = jrnx.f_id), 
po.po_description
- HAVING sum(
-CASE
-    WHEN operation_analytique.oa_debit = true THEN 
operation_analytique.oa_amount * (-1)::numeric
-    ELSE operation_analytique.oa_amount
-END) <> 0::numeric;'
-
-
-       loop
-       return next ret;
-end loop;
-end;
-$$;
-
-
-
-CREATE FUNCTION tmp_pcmn_alphanum_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-   r_record tmp_pcmn%ROWTYPE;
-begin
-r_record := NEW;
-r_record.pcm_val:=format_account(NEW.pcm_val);
-
-return r_record;
-end;
-$$;
-
-
-
-CREATE FUNCTION tmp_pcmn_ins() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-   r_record tmp_pcmn%ROWTYPE;
-begin
-r_record := NEW;
-if  length(trim(r_record.pcm_type))=0 or r_record.pcm_type is NULL then
-   r_record.pcm_type:=find_pcm_type(NEW.pcm_val);
-   return r_record;
-end if;
-return NEW;
-end;
-$$;
-
-
-
-CREATE FUNCTION trg_profile_user_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-
-begin
-
-NEW.user_name := lower(NEW.user_name);
-return NEW;
-
-end;
-$$;
-
-
-
-CREATE FUNCTION trg_todo_list_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-
-begin
-
-NEW.use_login:= lower(NEW.use_login);
-return NEW;
-
-end;
-$$;
-
-
-
-CREATE FUNCTION trg_todo_list_shared_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-
-begin
-
-NEW.use_login:= lower(NEW.use_login);
-return NEW;
-
-end;
-$$;
-
-
-
-CREATE FUNCTION trg_user_sec_act_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-
-begin
-
-NEW.ua_login:= lower(NEW.ua_login);
-return NEW;
-
-end;
-$$;
-
-
-
-CREATE FUNCTION trg_user_sec_jrn_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-
-begin
-
-NEW.uj_login:= lower(NEW.uj_login);
-return NEW;
-
-end;
-$$;
-
-
-
-CREATE FUNCTION trim_cvs_quote() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-        modified import_tmp%ROWTYPE;
-begin
-       modified:=NEW;
-       modified.devise=replace(new.devise,'"','');
-       modified.poste_comptable=replace(new.poste_comptable,'"','');
-        modified.compte_ordre=replace(NEW.COMPTE_ORDRE,'"','');
-        modified.detail=replace(NEW.DETAIL,'"','');
-        modified.num_compte=replace(NEW.NUM_COMPTE,'"','');
-        return modified;
-end;
-$$;
-
-
-
-CREATE FUNCTION trim_space_format_csv_banque() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$
-declare
-        modified format_csv_banque%ROWTYPE;
-begin
-        modified.name=trim(NEW.NAME);
-        modified.include_file=trim(new.include_file);
-               if ( length(modified.name) = 0 ) then
-                       modified.name=null;
-               end if;
-               if ( length(modified.include_file) = 0 ) then
-                       modified.include_file=null;
-               end if;
-
-        return modified;
-end;
-$$;
-
-
-
-CREATE FUNCTION tva_delete(integer) RETURNS void
-    LANGUAGE plpgsql
-    AS $_$ 
-declare
-       p_tva_id alias for $1;
-       nCount integer;
-begin
-       nCount=0;
-       select count(*) into nCount from quant_sold where qs_vat_code=p_tva_id;
-       if nCount != 0 then
-                 return;
-               
-       end if;
-       select count(*) into nCount from quant_purchase where 
qp_vat_code=p_tva_id;
-       if nCount != 0 then
-                 return;
-               
-       end if;
-
-delete from tva_rate where tva_id=p_tva_id;
-       return;
-end;
-$_$;
-
-
-
-CREATE FUNCTION tva_insert(text, numeric, text, text, integer) RETURNS integer
-    LANGUAGE plpgsql
-    AS $_$
-declare
-       l_tva_id integer;
-       p_tva_label alias for $1;
-       p_tva_rate alias for $2;
-       p_tva_comment alias for $3;
-       p_tva_poste alias for $4;
-       p_tva_both_side alias for $5;
-       debit text;
-       credit text;
-       nCount integer;
-begin
-if length(trim(p_tva_label)) = 0 then
-       return 3;
-end if;
-
-if length(trim(p_tva_poste)) != 0 then
-       if position (',' in p_tva_poste) = 0 then return 4; end if;
-       debit  = split_part(p_tva_poste,',',1);
-       credit  = split_part(p_tva_poste,',',2);
-       select count(*) into nCount from tmp_pcmn where 
pcm_val=debit::account_type;
-       if nCount = 0 then return 4; end if;
-       select count(*) into nCount from tmp_pcmn where 
pcm_val=credit::account_type;
-       if nCount = 0 then return 4; end if;
-
-end if;
-select into l_tva_id nextval('s_tva') ;
-insert into 
tva_rate(tva_id,tva_label,tva_rate,tva_comment,tva_poste,tva_both_side)
-       values 
(l_tva_id,p_tva_label,p_tva_rate,p_tva_comment,p_tva_poste,p_tva_both_side);
-return 0;
-end;
-$_$;
-
-
-
-CREATE FUNCTION tva_modify(integer, text, numeric, text, text, integer) 
RETURNS integer
-    LANGUAGE plpgsql
-    AS $_$
-declare
-       p_tva_id alias for $1;
-       p_tva_label alias for $2;
-       p_tva_rate alias for $3;
-       p_tva_comment alias for $4;
-       p_tva_poste alias for $5;
-       p_tva_both_side alias for $6;
-       debit text;
-       credit text;
-       nCount integer;
-begin
-if length(trim(p_tva_label)) = 0 then
-       return 3;
-end if;
-
-if length(trim(p_tva_poste)) != 0 then
-       if position (',' in p_tva_poste) = 0 then return 4; end if;
-       debit  = split_part(p_tva_poste,',',1);
-       credit  = split_part(p_tva_poste,',',2);
-       select count(*) into nCount from tmp_pcmn where 
pcm_val=debit::account_type;
-       if nCount = 0 then return 4; end if;
-       select count(*) into nCount from tmp_pcmn where 
pcm_val=credit::account_type;
-       if nCount = 0 then return 4; end if;
-
-end if;
-update tva_rate set 
tva_label=p_tva_label,tva_rate=p_tva_rate,tva_comment=p_tva_comment,tva_poste=p_tva_poste,tva_both_side=p_tva_both_side
-       where tva_id=p_tva_id;
-return 0;
-end;
-$_$;
-
-
-
-CREATE FUNCTION update_quick_code(njft_id integer, tav_text text) RETURNS 
integer
-    LANGUAGE plpgsql
-    AS $_$
-       declare
-       ns integer;
-       nExist integer;
-       tText text;
-       tBase text;
-       old_qcode varchar;
-       num_rows_jrnx integer;
-       num_rows_predef integer;
-       begin
-       -- get current value
-       select ad_value into old_qcode from fiche_detail where jft_id=njft_id;
-       -- av_text didn't change so no update
-       if tav_text = upper( trim(old_qcode)) then
-               raise notice 'nothing to change % %' , tav_text,old_qcode;
-               return 0;
-       end if;
-
-       tText := trim(lower(tav_text));
-       tText := replace(tText,' ','');
-        -- valid alpha is [ . : - _ ]
-       tText := translate(tText,E' $€µ£%+/\\!(){}(),;&|"#''^<>*','');
-       tText := translate(tText,E'éèêëàâäïîüûùöôç','eeeeaaaiiuuuooc');
-       tText := upper(tText);
-       if length ( tText) = 0 or tText is null then
-               return 0;
-       end if;
-
-       ns := njft_id;
-       tBase := tText;
-       loop
-               -- av_text already used ?
-               select count(*) into nExist
-                       from fiche_detail
-               where
-                       ad_id=23 and ad_value=tText
-                       and jft_id <> njft_id;
-
-               if nExist = 0 then
-                       exit;
-               end if;
-               if tText = tBase||ns then
-                       -- take the next sequence
-                       select nextval('s_jnt_fic_att_value') into ns;
-               end if;
-               tText  :=tBase||ns;
-
-       end loop;
-       update fiche_detail set ad_value = tText where jft_id=njft_id;
-
-       -- update also the contact
-       update fiche_detail set ad_value = tText
-               where jft_id in
-                       ( select jft_id
-                               from fiche_detail
-                       where ad_id=25 and ad_value=old_qcode);
-
-
-       return ns;
-       end;
-$_$;
-
-
-SET search_path = public, pg_catalog;
-
-
-CREATE FUNCTION bud_card_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$declare
- sCode text;
-begin
-
-sCode:=trim(upper(NEW.bc_code));
-sCode:=replace(sCode,' ','_');
-sCode:=substr(sCode,1,10);
-NEW.bc_code:=sCode;
-return NEW;
-end;$$;
-
-
-
-CREATE FUNCTION bud_detail_ins_upd() RETURNS trigger
-    LANGUAGE plpgsql
-    AS $$declare
-mline bud_detail%ROWTYPE;
-begin
-mline:=NEW;
-if mline.po_id = -1 then
-   mline.po_id:=NULL;
-end if;
-return mline;
-end;$$;
-
-
-
-CREATE FUNCTION correct_quant_purchase() RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-declare
-       r_invalid quant_purchase;
-       s_QuickCode text;
-       b_j_debit bool;
-       r_new record;
-       r_jrnx record;
-begin
-
-for r_invalid in select * from quant_purchase where qp_valid='A'
-loop
-
-select j_qcode into s_QuickCode from vw_poste_qcode where 
f_id=r_invalid.qp_fiche;
-raise notice 'qp_id % Quick code is %',r_invalid.qp_id,s_QuickCode;
-
-select j_debit,j_grpt,j_jrn_def,j_montant into r_jrnx from jrnx where 
j_id=r_invalid.j_id;
-if NOT FOUND then
-       raise notice 'error not found jrnx %',r_invalid.j_id;
-       update quant_purchase set qp_valid='Y' where qp_id=r_invalid.qp_id;
-       continue;
-end if;
-raise notice 'j_debit % , j_grpt % ,j_jrn_def  % qp_price 
%',r_jrnx.j_debit,r_jrnx.j_grpt,r_jrnx.j_jrn_def ,r_invalid.qp_price;
-
-select jr_internal,j_id,j_montant into r_new
-       from jrnx join jrn on (j_grpt=jr_grpt_id)
-       where 
-       j_jrn_def=r_jrnx.j_jrn_def
-       and j_id not in (select j_id from  quant_purchase)
-       and j_qcode=s_QuickCode
-       and j_montant=r_jrnx.j_montant
-       and j_debit != r_jrnx.j_debit;
-
-if NOT FOUND then
-       raise notice 'error not found %', r_invalid.j_id;
-       update quant_purchase set qp_valid='Y' where qp_id=r_invalid.qp_id;
-       continue;     
-end if;
-raise notice 'j_id % found amount %',r_new.j_id,r_new.j_montant;
-
-insert into quant_purchase 
(qp_internal,j_id,qp_fiche,qp_quantite,qp_price,qp_vat,qp_nd_amount,qp_nd_tva_recup,qp_valid,qp_dep_priv,qp_supplier,qp_vat_code)
-values 
(r_new.jr_internal,r_invalid.j_id,r_invalid.qp_fiche,(r_invalid.qp_quantite * 
(-1)),r_invalid.qp_price * 
(-1),r_invalid.qp_vat*(-1),r_invalid.qp_nd_amount*(-1),r_invalid.qp_nd_tva_recup*(-1)
 ,'Y',r_invalid.qp_dep_priv*(-1),r_invalid.qp_supplier,r_invalid.qp_vat_code);
-
-update quant_purchase set qp_valid='Y' where qp_id=r_invalid.qp_id;
-end loop;
-return;
-end;
-$$;
-
-
-
-CREATE FUNCTION correct_quant_sale() RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-declare
-       r_invalid quant_sold;
-       s_QuickCode text;
-       b_j_debit bool;
-       r_new record;
-       r_jrnx record;
-begin
-
-for r_invalid in select * from quant_sold where qs_valid='A'
-loop
-
-select j_qcode into s_QuickCode from vw_poste_qcode where 
f_id=r_invalid.qs_fiche;
-raise notice 'qp_id % Quick code is %',r_invalid.qs_id,s_QuickCode;
-
-select j_debit,j_grpt,j_jrn_def,j_montant into r_jrnx from jrnx where 
j_id=r_invalid.j_id;
-if NOT FOUND then
-       update quant_sold set qs_valid='Y' where qs_id=r_invalid.qs_id;
-       raise notice 'error not found jrnx %',r_invalid.j_id;
-       continue;
-end if;
-raise notice 'j_debit % , j_grpt % ,j_jrn_def  % qs_price 
%',r_jrnx.j_debit,r_jrnx.j_grpt,r_jrnx.j_jrn_def ,r_invalid.qs_price;
-
-select jr_internal,j_id,j_montant into r_new
-       from jrnx join jrn on (j_grpt=jr_grpt_id)
-       where 
-       j_jrn_def=r_jrnx.j_jrn_def
-       and j_id not in (select j_id from  quant_sold)
-       and j_qcode=s_QuickCode
-       and j_montant=r_jrnx.j_montant
-       and j_debit != r_jrnx.j_debit;
-
-if NOT FOUND then
-   update quant_sold set qs_valid='Y' where qs_id=r_invalid.qs_id;
-       raise notice 'error not found %', r_invalid.j_id;
-       continue;
-end if;
-raise notice 'j_id % found amount %',r_new.j_id,r_new.j_montant;
-
-
- insert into quant_sold 
(qs_internal,j_id,qs_fiche,qs_quantite,qs_price,qs_vat,qs_valid,qs_client,qs_vat_code)
- values 
(r_new.jr_internal,r_invalid.j_id,r_invalid.qs_fiche,(r_invalid.qs_quantite * 
(-1)),r_invalid.qs_price * 
(-1),r_invalid.qs_vat*(-1),'Y',r_invalid.qs_client,r_invalid.qs_vat_code);
- update quant_sold set qs_valid='Y' where qs_id=r_invalid.qs_id;
-end loop;
-return;
-end;
-$$;
-
-
-
-CREATE FUNCTION modify_menu_system(n_profile numeric) RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-declare 
-r_duplicate profile_menu%ROWTYPE;
-str_duplicate text;
-n_lowest_id numeric; -- lowest pm_id : update the dependency in profile_menu
-n_highest_id numeric; -- highest pm_id insert into profile_menu
-
-begin
-
-for str_duplicate in   
-       select me_code 
-       from profile_menu 
-       where 
-       p_id=n_profile and 
-       p_type_display <> 'P' and
-       pm_id_dep is null
-       group by me_code 
-       having count(*) > 1 
-loop
-       raise info 'str_duplicate %',str_duplicate;
-       for r_duplicate in select * 
-               from profile_menu 
-               where 
-               p_id=n_profile and
-               me_code_dep=str_duplicate
-       loop
-               raise info 'r_duplicate %',r_duplicate;
-               -- get the lowest 
-               select a.pm_id into n_lowest_id from profile_menu a join 
profile_menu b on (a.me_code=b.me_code and a.p_id = b.p_id)
-               where
-               a.me_code=str_duplicate
-               and a.p_id=n_profile
-               and a.pm_id < b.pm_id;
-               raise info 'lowest is %',n_lowest_id;
-               -- get the highest
-               select a.pm_id into n_highest_id from profile_menu a join 
profile_menu b on (a.me_code=b.me_code and a.p_id = b.p_id)
-               where
-               a.me_code=str_duplicate
-               and a.p_id=n_profile
-               and a.pm_id > b.pm_id;
-               raise info 'highest is %',n_highest_id;
-
-               -- update the first one
-               update profile_menu set pm_id_dep = n_lowest_id where 
pm_id=r_duplicate.pm_id;
-               -- insert a new one
-               insert into profile_menu (me_code,
-                       me_code_dep,
-                       p_id,
-                       p_order,
-                       p_type_display,
-                       pm_default,
-                       pm_id_dep)
-               values (r_duplicate.me_code,
-                       r_duplicate.me_code_dep,
-                       r_duplicate.p_id,
-                       r_duplicate.p_order,
-                       r_duplicate.p_type_display,
-                       r_duplicate.pm_default,
-                       n_highest_id);
-               
-       end loop;       
-
-end loop;      
-end;
-$$;
-
-
-
-CREATE FUNCTION upgrade_repo(p_version integer) RETURNS void
-    LANGUAGE plpgsql
-    AS $$
-declare 
-        is_mono integer;
-begin
-        select count (*) into is_mono from information_schema.tables where 
table_name='repo_version';
-        if is_mono = 1 then
-                update repo_version set val=p_version;
-        else
-                update version set val=p_version;
-        end if;
-end;
-$$;
-
-
-SET default_tablespace = '';
-
-SET default_with_oids = true;
-
-
-CREATE TABLE action (
-    ac_id integer NOT NULL,
-    ac_description text NOT NULL,
-    ac_module text,
-    ac_code character varying(30)
-);
-
-
-
-COMMENT ON TABLE action IS 'The different privileges';
-
-
-
-COMMENT ON COLUMN action.ac_code IS 'this code will be used in the code with 
the function User::check_action ';
-
-
-SET default_with_oids = false;
-
-
-CREATE TABLE action_detail (
-    ad_id integer NOT NULL,
-    f_id bigint,
-    ad_text text,
-    ad_pu numeric(20,4) DEFAULT 0,
-    ad_quant numeric(20,4) DEFAULT 0,
-    ad_tva_id integer DEFAULT 0,
-    ad_tva_amount numeric(20,4) DEFAULT 0,
-    ad_total_amount numeric(20,4) DEFAULT 0,
-    ag_id integer DEFAULT 0 NOT NULL
-);
-
-
-
-COMMENT ON TABLE action_detail IS 'Detail of action_gestion, see class 
Action_Detail';
-
-
-
-COMMENT ON COLUMN action_detail.f_id IS 'the concerned card';
-
-
-
-COMMENT ON COLUMN action_detail.ad_text IS ' Description ';
-
-
-
-COMMENT ON COLUMN action_detail.ad_pu IS ' price per unit ';
-
-
-
-COMMENT ON COLUMN action_detail.ad_quant IS 'quantity ';
-
-
-
-COMMENT ON COLUMN action_detail.ad_tva_id IS ' tva_id ';
-
-
-
-COMMENT ON COLUMN action_detail.ad_tva_amount IS ' tva_amount ';
-
-
-
-COMMENT ON COLUMN action_detail.ad_total_amount IS ' total amount';
-
-
-
-CREATE SEQUENCE action_detail_ad_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE action_detail_ad_id_seq OWNED BY action_detail.ad_id;
-
-
-
-CREATE SEQUENCE action_gestion_ag_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-SET default_with_oids = true;
-
-
-CREATE TABLE action_gestion (
-    ag_id integer DEFAULT nextval('action_gestion_ag_id_seq'::regclass) NOT 
NULL,
-    ag_type integer,
-    f_id_dest integer,
-    ag_title text,
-    ag_timestamp timestamp without time zone DEFAULT now(),
-    ag_ref_ag_id integer,
-    ag_ref text,
-    ag_hour text,
-    ag_priority integer DEFAULT 2,
-    ag_dest bigint DEFAULT (-1) NOT NULL,
-    ag_owner text,
-    ag_contact bigint,
-    ag_state integer,
-    ag_remind_date date
-);
-
-
-
-COMMENT ON TABLE action_gestion IS 'Contains the details for the follow-up of 
customer, supplier, administration';
-
-
-
-COMMENT ON COLUMN action_gestion.ag_type IS ' type of action: see 
document_type ';
-
-
-
-COMMENT ON COLUMN action_gestion.f_id_dest IS ' third party ';
-
-
-
-COMMENT ON COLUMN action_gestion.ag_title IS ' title ';
-
-
-
-COMMENT ON COLUMN action_gestion.ag_timestamp IS ' ';
-
-
-
-COMMENT ON COLUMN action_gestion.ag_ref_ag_id IS ' concerning the action ';
-
-
-
-COMMENT ON COLUMN action_gestion.ag_ref IS 'its reference ';
-
-
-
-COMMENT ON COLUMN action_gestion.ag_priority IS 'Low, medium, important ';
-
-
-
-COMMENT ON COLUMN action_gestion.ag_dest IS ' is the profile which has to take 
care of this action ';
-
-
-
-COMMENT ON COLUMN action_gestion.ag_owner IS ' is the owner of this action ';
-
-
-
-COMMENT ON COLUMN action_gestion.ag_contact IS ' contact of the third part ';
-
-
-
-COMMENT ON COLUMN action_gestion.ag_state IS 'state of the action same as 
document_state ';
-
-
-SET default_with_oids = false;
-
-
-CREATE TABLE action_gestion_comment (
-    agc_id bigint NOT NULL,
-    ag_id bigint,
-    agc_date timestamp with time zone DEFAULT now(),
-    agc_comment text,
-    tech_user text
-);
-
-
-
-COMMENT ON COLUMN action_gestion_comment.agc_id IS 'PK';
-
-
-
-COMMENT ON COLUMN action_gestion_comment.ag_id IS 'FK to action_gestion';
-
-
-
-COMMENT ON COLUMN action_gestion_comment.agc_comment IS 'comment';
-
-
-
-COMMENT ON COLUMN action_gestion_comment.tech_user IS 'user_login';
-
-
-
-CREATE SEQUENCE action_gestion_comment_agc_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE action_gestion_comment_agc_id_seq OWNED BY 
action_gestion_comment.agc_id;
-
-
-
-CREATE TABLE action_gestion_operation (
-    ago_id bigint NOT NULL,
-    ag_id bigint,
-    jr_id bigint
-);
-
-
-
-COMMENT ON COLUMN action_gestion_operation.ago_id IS 'pk';
-
-
-
-COMMENT ON COLUMN action_gestion_operation.ag_id IS 'fk to action_gestion';
-
-
-
-COMMENT ON COLUMN action_gestion_operation.jr_id IS 'fk to jrn';
-
-
-
-CREATE SEQUENCE action_gestion_operation_ago_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE action_gestion_operation_ago_id_seq OWNED BY 
action_gestion_operation.ago_id;
-
-
-
-CREATE TABLE action_gestion_related (
-    aga_id bigint NOT NULL,
-    aga_least bigint NOT NULL,
-    aga_greatest bigint NOT NULL,
-    aga_type bigint
-);
-
-
-
-COMMENT ON COLUMN action_gestion_related.aga_id IS 'pk';
-
-
-
-COMMENT ON COLUMN action_gestion_related.aga_least IS 'fk to action_gestion, 
smallest ag_id';
-
-
-
-COMMENT ON COLUMN action_gestion_related.aga_greatest IS 'fk to action_gestion 
greatest ag_id';
-
-
-
-COMMENT ON COLUMN action_gestion_related.aga_type IS 'Type de liens';
-
-
-
-CREATE SEQUENCE action_gestion_related_aga_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE action_gestion_related_aga_id_seq OWNED BY 
action_gestion_related.aga_id;
-
-
-
-CREATE TABLE action_person (
-    ap_id integer NOT NULL,
-    ag_id integer NOT NULL,
-    f_id integer NOT NULL
-);
-
-
-
-COMMENT ON TABLE action_person IS 'Person involved in the action';
-
-
-
-COMMENT ON COLUMN action_person.ap_id IS 'pk';
-
-
-
-COMMENT ON COLUMN action_person.ag_id IS 'fk to fiche';
-
-
-
-CREATE SEQUENCE action_person_ap_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE action_person_ap_id_seq OWNED BY action_person.ap_id;
-
-
-
-CREATE TABLE action_tags (
-    at_id integer NOT NULL,
-    t_id integer,
-    ag_id integer
-);
-
-
-
-CREATE SEQUENCE action_tags_at_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE action_tags_at_id_seq OWNED BY action_tags.at_id;
-
-
-SET default_with_oids = true;
-
-
-CREATE TABLE attr_def (
-    ad_id integer DEFAULT nextval(('s_attr_def'::text)::regclass) NOT NULL,
-    ad_text text,
-    ad_type text,
-    ad_size text NOT NULL,
-    ad_extra text
-);
-
-
-
-COMMENT ON TABLE attr_def IS 'The available attributs for the cards';
-
-
-
-CREATE TABLE attr_min (
-    frd_id integer NOT NULL,
-    ad_id integer NOT NULL
-);
-
-
-
-COMMENT ON TABLE attr_min IS 'The value of  attributs for the cards';
-
-
-
-CREATE SEQUENCE bilan_b_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-SET default_with_oids = false;
-
-
-CREATE TABLE bilan (
-    b_id integer DEFAULT nextval('bilan_b_id_seq'::regclass) NOT NULL,
-    b_name text NOT NULL,
-    b_file_template text NOT NULL,
-    b_file_form text,
-    b_type text NOT NULL
-);
-
-
-
-COMMENT ON TABLE bilan IS 'contains the template and the data for generating 
different documents  ';
-
-
-
-COMMENT ON COLUMN bilan.b_id IS 'primary key';
-
-
-
-COMMENT ON COLUMN bilan.b_name IS 'Name of the document';
-
-
-
-COMMENT ON COLUMN bilan.b_file_template IS 'path of the template 
(document/...)';
-
-
-
-COMMENT ON COLUMN bilan.b_file_form IS 'path of the file with forms';
-
-
-
-COMMENT ON COLUMN bilan.b_type IS 'type = ODS, RTF...';
-
-
-
-CREATE TABLE bookmark (
-    b_id integer NOT NULL,
-    b_order integer DEFAULT 1,
-    b_action text,
-    login text
-);
-
-
-
-COMMENT ON TABLE bookmark IS 'Bookmark of the connected user';
-
-
-
-CREATE SEQUENCE bookmark_b_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE bookmark_b_id_seq OWNED BY bookmark.b_id;
-
-
-
-CREATE SEQUENCE bud_card_bc_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE bud_detail_bd_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE bud_detail_periode_bdp_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-SET default_with_oids = true;
-
-
-CREATE TABLE centralized (
-    c_id integer DEFAULT nextval(('s_centralized'::text)::regclass) NOT NULL,
-    c_j_id integer,
-    c_date date NOT NULL,
-    c_internal text NOT NULL,
-    c_montant numeric(20,4) NOT NULL,
-    c_debit boolean DEFAULT true,
-    c_jrn_def integer NOT NULL,
-    c_poste account_type,
-    c_description text,
-    c_grp integer NOT NULL,
-    c_comment text,
-    c_rapt text,
-    c_periode integer,
-    c_order integer
-);
-
-
-
-COMMENT ON TABLE centralized IS 'The centralized journal';
-
-
-SET default_with_oids = false;
-
-
-CREATE TABLE del_action (
-    del_id integer NOT NULL,
-    del_name text NOT NULL,
-    del_time timestamp without time zone
-);
-
-
-
-CREATE SEQUENCE del_action_del_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE del_action_del_id_seq OWNED BY del_action.del_id;
-
-
-
-CREATE TABLE del_jrn (
-    jr_id integer NOT NULL,
-    jr_def_id integer,
-    jr_montant numeric(20,4),
-    jr_comment text,
-    jr_date date,
-    jr_grpt_id integer,
-    jr_internal text,
-    jr_tech_date timestamp without time zone,
-    jr_tech_per integer,
-    jrn_ech date,
-    jr_ech date,
-    jr_rapt text,
-    jr_valid boolean,
-    jr_opid integer,
-    jr_c_opid integer,
-    jr_pj oid,
-    jr_pj_name text,
-    jr_pj_type text,
-    del_jrn_date timestamp without time zone,
-    jr_pj_number text,
-    dj_id integer NOT NULL
-);
-
-
-
-CREATE SEQUENCE del_jrn_dj_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE del_jrn_dj_id_seq OWNED BY del_jrn.dj_id;
-
-
-
-CREATE TABLE del_jrnx (
-    j_id integer NOT NULL,
-    j_date date,
-    j_montant numeric(20,4),
-    j_poste account_type,
-    j_grpt integer,
-    j_rapt text,
-    j_jrn_def integer,
-    j_debit boolean,
-    j_text text,
-    j_centralized boolean,
-    j_internal text,
-    j_tech_user text,
-    j_tech_date timestamp without time zone,
-    j_tech_per integer,
-    j_qcode text,
-    djx_id integer NOT NULL,
-    f_id bigint
-);
-
-
-
-CREATE SEQUENCE del_jrnx_djx_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE del_jrnx_djx_id_seq OWNED BY del_jrnx.djx_id;
-
-
-
-CREATE SEQUENCE document_d_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-SET default_with_oids = true;
-
-
-CREATE TABLE document (
-    d_id integer DEFAULT nextval('document_d_id_seq'::regclass) NOT NULL,
-    ag_id integer NOT NULL,
-    d_lob oid,
-    d_number bigint NOT NULL,
-    d_filename text,
-    d_mimetype text,
-    d_description text
-);
-
-
-
-COMMENT ON TABLE document IS 'This table contains all the documents : summary 
and lob files';
-
-
-
-CREATE SEQUENCE document_modele_md_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE TABLE document_modele (
-    md_id integer DEFAULT nextval('document_modele_md_id_seq'::regclass) NOT 
NULL,
-    md_name text NOT NULL,
-    md_lob oid,
-    md_type integer NOT NULL,
-    md_filename text,
-    md_mimetype text,
-    md_affect character varying(3) NOT NULL
-);
-
-
-
-COMMENT ON TABLE document_modele IS ' contains all the template for the  
documents';
-
-
-
-CREATE SEQUENCE document_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-COMMENT ON SEQUENCE document_seq IS 'Sequence for the sequence bound to the 
document modele';
-
-
-
-CREATE SEQUENCE document_state_s_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE TABLE document_state (
-    s_id integer DEFAULT nextval('document_state_s_id_seq'::regclass) NOT NULL,
-    s_value character varying(50) NOT NULL,
-    s_status character(1)
-);
-
-
-
-COMMENT ON TABLE document_state IS 'State of the document';
-
-
-
-CREATE SEQUENCE document_type_dt_id_seq
-    START WITH 25
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE TABLE document_type (
-    dt_id integer DEFAULT nextval('document_type_dt_id_seq'::regclass) NOT 
NULL,
-    dt_value character varying(80),
-    dt_prefix text
-);
-
-
-
-COMMENT ON TABLE document_type IS 'Type of document : meeting, invoice,...';
-
-
-
-COMMENT ON COLUMN document_type.dt_prefix IS 'Prefix for ag_ref';
-
-
-SET default_with_oids = false;
-
-
-CREATE TABLE extension (
-    ex_id integer NOT NULL,
-    ex_name character varying(30) NOT NULL,
-    ex_code character varying(15) NOT NULL,
-    ex_desc character varying(250),
-    ex_file character varying NOT NULL,
-    ex_enable "char" DEFAULT 'Y'::"char" NOT NULL
-);
-
-
-
-COMMENT ON TABLE extension IS 'Content the needed information for the 
extension';
-
-
-
-COMMENT ON COLUMN extension.ex_id IS 'Primary key';
-
-
-
-COMMENT ON COLUMN extension.ex_name IS 'code of the extension ';
-
-
-
-COMMENT ON COLUMN extension.ex_code IS 'code of the extension ';
-
-
-
-COMMENT ON COLUMN extension.ex_desc IS 'Description of the extension ';
-
-
-
-COMMENT ON COLUMN extension.ex_file IS 'path to the extension to include';
-
-
-
-COMMENT ON COLUMN extension.ex_enable IS 'Y : enabled N : disabled ';
-
-
-
-CREATE SEQUENCE extension_ex_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE extension_ex_id_seq OWNED BY extension.ex_id;
-
-
-SET default_with_oids = true;
-
-
-CREATE TABLE fiche (
-    f_id integer DEFAULT nextval(('s_fiche'::text)::regclass) NOT NULL,
-    fd_id integer
-);
-
-
-
-COMMENT ON TABLE fiche IS 'Cards';
-
-
-
-CREATE TABLE fiche_def (
-    fd_id integer DEFAULT nextval(('s_fdef'::text)::regclass) NOT NULL,
-    fd_class_base text,
-    fd_label text NOT NULL,
-    fd_create_account boolean DEFAULT false,
-    frd_id integer NOT NULL,
-    fd_description text
-);
-
-
-
-COMMENT ON TABLE fiche_def IS 'Cards definition';
-
-
-
-CREATE TABLE fiche_def_ref (
-    frd_id integer DEFAULT nextval(('s_fiche_def_ref'::text)::regclass) NOT 
NULL,
-    frd_text text,
-    frd_class_base account_type
-);
-
-
-
-COMMENT ON TABLE fiche_def_ref IS 'Family Cards definition';
-
-
-
-CREATE TABLE fiche_detail (
-    jft_id integer DEFAULT nextval(('s_jnt_fic_att_value'::text)::regclass) 
NOT NULL,
-    f_id integer,
-    ad_id integer,
-    ad_value text
-);
-
-
-
-COMMENT ON TABLE fiche_detail IS 'join between the card and the attribut 
definition';
-
-
-SET default_with_oids = false;
-
-
-CREATE TABLE forecast (
-    f_id integer NOT NULL,
-    f_name text NOT NULL,
-    f_start_date bigint,
-    f_end_date bigint
-);
-
-
-
-COMMENT ON TABLE forecast IS 'contains the name of the forecast';
-
-
-
-CREATE TABLE forecast_cat (
-    fc_id integer NOT NULL,
-    fc_desc text NOT NULL,
-    f_id bigint,
-    fc_order integer DEFAULT 0 NOT NULL
-);
-
-
-
-COMMENT ON COLUMN forecast_cat.fc_id IS 'primary key';
-
-
-
-COMMENT ON COLUMN forecast_cat.fc_desc IS 'text of the category';
-
-
-
-COMMENT ON COLUMN forecast_cat.f_id IS 'Foreign key, it is the parent from the 
table forecast';
-
-
-
-COMMENT ON COLUMN forecast_cat.fc_order IS 'Order of the category, used when 
displaid';
-
-
-
-CREATE SEQUENCE forecast_cat_fc_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE forecast_cat_fc_id_seq OWNED BY forecast_cat.fc_id;
-
-
-
-CREATE SEQUENCE forecast_f_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE forecast_f_id_seq OWNED BY forecast.f_id;
-
-
-
-CREATE TABLE forecast_item (
-    fi_id integer NOT NULL,
-    fi_text text,
-    fi_account text,
-    fi_card integer,
-    fi_order integer,
-    fc_id integer,
-    fi_amount numeric(20,4) DEFAULT 0,
-    fi_debit "char" DEFAULT 'd'::"char" NOT NULL,
-    fi_pid integer
-);
-
-
-
-COMMENT ON COLUMN forecast_item.fi_id IS 'Primary key';
-
-
-
-COMMENT ON COLUMN forecast_item.fi_text IS 'Label of the i     tem';
-
-
-
-COMMENT ON COLUMN forecast_item.fi_account IS 'Accountancy entry';
-
-
-
-COMMENT ON COLUMN forecast_item.fi_card IS 'Card (fiche.f_id)';
-
-
-
-COMMENT ON COLUMN forecast_item.fi_order IS 'Order of showing (not used)';
-
-
-
-COMMENT ON COLUMN forecast_item.fi_amount IS 'Amount';
-
-
-
-COMMENT ON COLUMN forecast_item.fi_debit IS 'possible values are D or C';
-
-
-
-COMMENT ON COLUMN forecast_item.fi_pid IS '0 for every month, or the value 
parm_periode.p_id ';
-
-
-
-CREATE SEQUENCE forecast_item_fi_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE forecast_item_fi_id_seq OWNED BY forecast_item.fi_id;
-
-
-SET default_with_oids = true;
-
-
-CREATE TABLE form (
-    fo_id integer DEFAULT nextval(('s_form'::text)::regclass) NOT NULL,
-    fo_fr_id integer,
-    fo_pos integer,
-    fo_label text,
-    fo_formula text
-);
-
-
-
-COMMENT ON TABLE form IS 'Forms content';
-
-
-
-CREATE TABLE formdef (
-    fr_id integer DEFAULT nextval(('s_formdef'::text)::regclass) NOT NULL,
-    fr_label text
-);
-
-
-SET default_with_oids = false;
-
-
-CREATE TABLE groupe_analytique (
-    ga_id character varying(10) NOT NULL,
-    pa_id integer,
-    ga_description text
-);
-
-
-
-CREATE SEQUENCE historique_analytique_ha_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE TABLE info_def (
-    id_type text NOT NULL,
-    id_description text
-);
-
-
-
-COMMENT ON TABLE info_def IS 'Contains the types of additionnal info we can 
add to a operation';
-
-
-
-CREATE SEQUENCE s_jnt_id
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-SET default_with_oids = true;
-
-
-CREATE TABLE jnt_fic_attr (
-    fd_id integer,
-    ad_id integer,
-    jnt_id bigint DEFAULT nextval('s_jnt_id'::regclass) NOT NULL,
-    jnt_order integer NOT NULL
-);
-
-
-
-COMMENT ON TABLE jnt_fic_attr IS 'join between the family card and the 
attribut definition';
-
-
-SET default_with_oids = false;
-
-
-CREATE TABLE jnt_letter (
-    jl_id integer NOT NULL,
-    jl_amount_deb numeric(20,4)
-);
-
-
-
-CREATE SEQUENCE jnt_letter_jl_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE jnt_letter_jl_id_seq OWNED BY jnt_letter.jl_id;
-
-
-SET default_with_oids = true;
-
-
-CREATE TABLE jrn (
-    jr_id integer DEFAULT nextval(('s_jrn'::text)::regclass) NOT NULL,
-    jr_def_id integer NOT NULL,
-    jr_montant numeric(20,4) NOT NULL,
-    jr_comment text,
-    jr_date date,
-    jr_grpt_id integer NOT NULL,
-    jr_internal text,
-    jr_tech_date timestamp without time zone DEFAULT now() NOT NULL,
-    jr_tech_per integer NOT NULL,
-    jrn_ech date,
-    jr_ech date,
-    jr_rapt text,
-    jr_valid boolean DEFAULT true,
-    jr_opid integer,
-    jr_c_opid integer,
-    jr_pj oid,
-    jr_pj_name text,
-    jr_pj_type text,
-    jr_pj_number text,
-    jr_mt text,
-    jr_date_paid date
-);
-
-
-
-COMMENT ON TABLE jrn IS 'Journal: content one line for a group of accountancy 
writing';
-
-
-
-CREATE TABLE jrn_def (
-    jrn_def_id integer DEFAULT nextval(('s_jrn_def'::text)::regclass) NOT NULL,
-    jrn_def_name text NOT NULL,
-    jrn_def_class_deb text,
-    jrn_def_class_cred text,
-    jrn_def_fiche_deb text,
-    jrn_def_fiche_cred text,
-    jrn_deb_max_line integer DEFAULT 1,
-    jrn_cred_max_line integer DEFAULT 1,
-    jrn_def_ech boolean DEFAULT false,
-    jrn_def_ech_lib text,
-    jrn_def_type character(3) NOT NULL,
-    jrn_def_code text NOT NULL,
-    jrn_def_pj_pref text,
-    jrn_def_bank bigint,
-    jrn_def_num_op integer,
-    jrn_def_description text
-);
-
-
-
-COMMENT ON TABLE jrn_def IS 'Definition of a journal, his properties';
-
-
-SET default_with_oids = false;
-
-
-CREATE TABLE jrn_info (
-    ji_id integer NOT NULL,
-    jr_id integer NOT NULL,
-    id_type text NOT NULL,
-    ji_value text
-);
-
-
-
-CREATE SEQUENCE jrn_info_ji_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE jrn_info_ji_id_seq OWNED BY jrn_info.ji_id;
-
-
-
-CREATE TABLE jrn_note (
-    n_id integer NOT NULL,
-    n_text text,
-    jr_id bigint NOT NULL
-);
-
-
-
-COMMENT ON TABLE jrn_note IS 'Note about operation';
-
-
-
-CREATE SEQUENCE jrn_note_n_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE jrn_note_n_id_seq OWNED BY jrn_note.n_id;
-
-
-
-CREATE TABLE jrn_periode (
-    jrn_def_id integer NOT NULL,
-    p_id integer NOT NULL,
-    status text
-);
-
-
-SET default_with_oids = true;
-
-
-CREATE TABLE jrn_rapt (
-    jra_id integer DEFAULT nextval(('s_jrn_rapt'::text)::regclass) NOT NULL,
-    jr_id integer NOT NULL,
-    jra_concerned integer NOT NULL
-);
-
-
-
-COMMENT ON TABLE jrn_rapt IS 'Rapprochement between operation';
-
-
-
-CREATE TABLE jrn_type (
-    jrn_type_id character(3) NOT NULL,
-    jrn_desc text
-);
-
-
-
-COMMENT ON TABLE jrn_type IS 'Type of journal (Sell, Buy, Financial...)';
-
-
-
-CREATE TABLE jrnx (
-    j_id integer DEFAULT nextval(('s_jrn_op'::text)::regclass) NOT NULL,
-    j_date date DEFAULT now(),
-    j_montant numeric(20,4) DEFAULT 0,
-    j_poste account_type NOT NULL,
-    j_grpt integer NOT NULL,
-    j_rapt text,
-    j_jrn_def integer NOT NULL,
-    j_debit boolean DEFAULT true,
-    j_text text,
-    j_centralized boolean DEFAULT false,
-    j_internal text,
-    j_tech_user text NOT NULL,
-    j_tech_date timestamp without time zone DEFAULT now() NOT NULL,
-    j_tech_per integer NOT NULL,
-    j_qcode text,
-    f_id bigint
-);
-
-
-
-COMMENT ON TABLE jrnx IS 'Journal: content one line for each accountancy 
writing';
-
-
-SET default_with_oids = false;
-
-
-CREATE TABLE key_distribution (
-    kd_id integer NOT NULL,
-    kd_name text,
-    kd_description text
-);
-
-
-
-COMMENT ON TABLE key_distribution IS 'Distribution key for analytic';
-
-
-
-COMMENT ON COLUMN key_distribution.kd_id IS 'PK';
-
-
-
-COMMENT ON COLUMN key_distribution.kd_name IS 'Name of the key';
-
-
-
-COMMENT ON COLUMN key_distribution.kd_description IS 'Description of the key';
-
-
-
-CREATE TABLE key_distribution_activity (
-    ka_id integer NOT NULL,
-    ke_id bigint NOT NULL,
-    po_id bigint,
-    pa_id bigint NOT NULL
-);
-
-
-
-COMMENT ON TABLE key_distribution_activity IS 'Contains the analytic account';
-
-
-
-COMMENT ON COLUMN key_distribution_activity.ka_id IS 'pk';
-
-
-
-COMMENT ON COLUMN key_distribution_activity.ke_id IS 'fk to 
key_distribution_detail';
-
-
-
-COMMENT ON COLUMN key_distribution_activity.po_id IS 'fk to poste_analytique';
-
-
-
-COMMENT ON COLUMN key_distribution_activity.pa_id IS 'fk to plan_analytique';
-
-
-
-CREATE SEQUENCE key_distribution_activity_ka_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE key_distribution_activity_ka_id_seq OWNED BY 
key_distribution_activity.ka_id;
-
-
-
-CREATE TABLE key_distribution_detail (
-    ke_id integer NOT NULL,
-    kd_id bigint NOT NULL,
-    ke_row integer NOT NULL,
-    ke_percent numeric(20,4) NOT NULL
-);
-
-
-
-COMMENT ON TABLE key_distribution_detail IS 'Row of activity and percent';
-
-
-
-COMMENT ON COLUMN key_distribution_detail.ke_id IS 'pk';
-
-
-
-COMMENT ON COLUMN key_distribution_detail.kd_id IS 'fk to key_distribution';
-
-
-
-COMMENT ON COLUMN key_distribution_detail.ke_row IS 'group order';
-
-
-
-CREATE SEQUENCE key_distribution_detail_ke_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE key_distribution_detail_ke_id_seq OWNED BY 
key_distribution_detail.ke_id;
-
-
-
-CREATE SEQUENCE key_distribution_kd_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE key_distribution_kd_id_seq OWNED BY key_distribution.kd_id;
-
-
-
-CREATE TABLE key_distribution_ledger (
-    kl_id integer NOT NULL,
-    kd_id bigint NOT NULL,
-    jrn_def_id bigint NOT NULL
-);
-
-
-
-COMMENT ON TABLE key_distribution_ledger IS 'Legder where the distribution key 
can be used';
-
-
-
-COMMENT ON COLUMN key_distribution_ledger.kl_id IS 'pk';
-
-
-
-COMMENT ON COLUMN key_distribution_ledger.kd_id IS 'fk to key_distribution';
-
-
-
-COMMENT ON COLUMN key_distribution_ledger.jrn_def_id IS 'fk to jrnd_def, 
ledger where this key is available';
-
-
-
-CREATE SEQUENCE key_distribution_ledger_kl_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE key_distribution_ledger_kl_id_seq OWNED BY 
key_distribution_ledger.kl_id;
-
-
-
-CREATE TABLE letter_cred (
-    lc_id integer NOT NULL,
-    j_id bigint NOT NULL,
-    jl_id bigint NOT NULL
-);
-
-
-
-CREATE SEQUENCE letter_cred_lc_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE letter_cred_lc_id_seq OWNED BY letter_cred.lc_id;
-
-
-
-CREATE TABLE letter_deb (
-    ld_id integer NOT NULL,
-    j_id bigint NOT NULL,
-    jl_id bigint NOT NULL
-);
-
-
-
-CREATE SEQUENCE letter_deb_ld_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE letter_deb_ld_id_seq OWNED BY letter_deb.ld_id;
-
-
-
-CREATE TABLE link_action_type (
-    l_id bigint NOT NULL,
-    l_desc character varying
-);
-
-
-
-CREATE SEQUENCE link_action_type_l_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE link_action_type_l_id_seq OWNED BY link_action_type.l_id;
-
-
-
-CREATE TABLE menu_default (
-    md_id integer NOT NULL,
-    md_code text NOT NULL,
-    me_code text NOT NULL
-);
-
-
-
-CREATE SEQUENCE menu_default_md_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE menu_default_md_id_seq OWNED BY menu_default.md_id;
-
-
-
-CREATE TABLE menu_ref (
-    me_code text NOT NULL,
-    me_menu text,
-    me_file text,
-    me_url text,
-    me_description text,
-    me_parameter text,
-    me_javascript text,
-    me_type character varying(2),
-    me_description_etendue text
-);
-
-
-
-COMMENT ON COLUMN menu_ref.me_code IS 'Menu Code ';
-
-
-
-COMMENT ON COLUMN menu_ref.me_menu IS 'Label to display';
-
-
-
-COMMENT ON COLUMN menu_ref.me_file IS 'if not empty file to include';
-
-
-
-COMMENT ON COLUMN menu_ref.me_url IS 'url ';
-
-
-
-COMMENT ON COLUMN menu_ref.me_type IS 'ME for menu
-PR for Printing
-SP for special meaning (ex: return to line)
-PL for plugin';
-
-
-
-CREATE TABLE mod_payment (
-    mp_id integer NOT NULL,
-    mp_lib text NOT NULL,
-    mp_jrn_def_id integer NOT NULL,
-    mp_fd_id bigint,
-    mp_qcode text,
-    jrn_def_id bigint
-);
-
-
-
-COMMENT ON TABLE mod_payment IS 'Contains the different media of payment and 
the corresponding ledger';
-
-
-
-COMMENT ON COLUMN mod_payment.jrn_def_id IS 'Ledger using this payment method';
-
-
-
-CREATE SEQUENCE mod_payment_mp_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE mod_payment_mp_id_seq OWNED BY mod_payment.mp_id;
-
-
-
-CREATE SEQUENCE op_def_op_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE TABLE op_predef (
-    od_id integer DEFAULT nextval('op_def_op_seq'::regclass) NOT NULL,
-    jrn_def_id integer NOT NULL,
-    od_name text NOT NULL,
-    od_item integer NOT NULL,
-    od_jrn_type text NOT NULL,
-    od_direct boolean NOT NULL,
-    od_description text
-);
-
-
-
-COMMENT ON TABLE op_predef IS 'predefined operation';
-
-
-
-COMMENT ON COLUMN op_predef.jrn_def_id IS 'jrn_id';
-
-
-
-COMMENT ON COLUMN op_predef.od_name IS 'name of the operation';
-
-
-
-CREATE SEQUENCE op_predef_detail_opd_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE TABLE op_predef_detail (
-    opd_id integer DEFAULT nextval('op_predef_detail_opd_id_seq'::regclass) 
NOT NULL,
-    od_id integer NOT NULL,
-    opd_poste text NOT NULL,
-    opd_amount numeric(20,4),
-    opd_tva_id integer,
-    opd_quantity numeric(20,4),
-    opd_debit boolean NOT NULL,
-    opd_tva_amount numeric(20,4),
-    opd_comment text,
-    opd_qc boolean
-);
-
-
-
-COMMENT ON TABLE op_predef_detail IS 'contains the detail of predefined 
operations';
-
-
-
-CREATE SEQUENCE s_oa_group
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE TABLE operation_analytique (
-    oa_id integer DEFAULT nextval('historique_analytique_ha_id_seq'::regclass) 
NOT NULL,
-    po_id integer NOT NULL,
-    oa_amount numeric(20,4) NOT NULL,
-    oa_description text,
-    oa_debit boolean DEFAULT true NOT NULL,
-    j_id integer,
-    oa_group integer DEFAULT nextval('s_oa_group'::regclass) NOT NULL,
-    oa_date date NOT NULL,
-    oa_row integer,
-    oa_jrnx_id_source bigint,
-    oa_positive character(1) DEFAULT 'Y'::bpchar NOT NULL,
-    CONSTRAINT operation_analytique_oa_amount_check CHECK ((oa_amount >= 
(0)::numeric))
-);
-
-
-
-COMMENT ON TABLE operation_analytique IS 'History of the analytic account';
-
-
-
-COMMENT ON COLUMN operation_analytique.oa_jrnx_id_source IS 'jrnx.j_id source 
of this amount, this amount is computed from an amount giving a ND VAT.Normally 
NULL  is there is no ND VAT.';
-
-
-
-COMMENT ON COLUMN operation_analytique.oa_positive IS 'Sign of the amount';
-
-
-SET default_with_oids = true;
-
-
-CREATE TABLE parameter (
-    pr_id text NOT NULL,
-    pr_value text
-);
-
-
-
-COMMENT ON TABLE parameter IS 'parameter of the company';
-
-
-
-CREATE TABLE parm_code (
-    p_code text NOT NULL,
-    p_value text,
-    p_comment text
-);
-
-
-
-CREATE TABLE parm_money (
-    pm_id integer DEFAULT nextval(('s_currency'::text)::regclass),
-    pm_code character(3) NOT NULL,
-    pm_rate numeric(20,4)
-);
-
-
-
-COMMENT ON TABLE parm_money IS 'Currency conversion';
-
-
-
-CREATE TABLE parm_periode (
-    p_id integer DEFAULT nextval(('s_periode'::text)::regclass) NOT NULL,
-    p_start date NOT NULL,
-    p_end date NOT NULL,
-    p_exercice text DEFAULT to_char(now(), 'YYYY'::text) NOT NULL,
-    p_closed boolean DEFAULT false,
-    p_central boolean DEFAULT false,
-    CONSTRAINT parm_periode_check CHECK ((p_end >= p_start))
-);
-
-
-
-COMMENT ON TABLE parm_periode IS 'Periode definition';
-
-
-SET default_with_oids = false;
-
-
-CREATE TABLE parm_poste (
-    p_value account_type NOT NULL,
-    p_type text NOT NULL
-);
-
-
-
-COMMENT ON TABLE parm_poste IS 'Contains data for finding is the type of the 
account (asset)';
-
-
-
-CREATE SEQUENCE plan_analytique_pa_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE TABLE plan_analytique (
-    pa_id integer DEFAULT nextval('plan_analytique_pa_id_seq'::regclass) NOT 
NULL,
-    pa_name text DEFAULT 'Sans Nom'::text NOT NULL,
-    pa_description text
-);
-
-
-
-COMMENT ON TABLE plan_analytique IS 'Plan Analytique (max 5)';
-
-
-
-CREATE SEQUENCE poste_analytique_po_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE TABLE poste_analytique (
-    po_id integer DEFAULT nextval('poste_analytique_po_id_seq'::regclass) NOT 
NULL,
-    po_name text NOT NULL,
-    pa_id integer NOT NULL,
-    po_amount numeric(20,4) DEFAULT 0.0 NOT NULL,
-    po_description text,
-    ga_id character varying(10)
-);
-
-
-
-COMMENT ON TABLE poste_analytique IS 'Poste Analytique';
-
-
-
-CREATE TABLE profile (
-    p_name text NOT NULL,
-    p_id integer NOT NULL,
-    p_desc text,
-    with_calc boolean DEFAULT true,
-    with_direct_form boolean DEFAULT true
-);
-
-
-
-COMMENT ON TABLE profile IS 'Available profile ';
-
-
-
-COMMENT ON COLUMN profile.p_name IS 'Name of the profile';
-
-
-
-COMMENT ON COLUMN profile.p_desc IS 'description of the profile';
-
-
-
-COMMENT ON COLUMN profile.with_calc IS 'show the calculator';
-
-
-
-COMMENT ON COLUMN profile.with_direct_form IS 'show the direct form';
-
-
-
-CREATE TABLE profile_menu (
-    pm_id integer NOT NULL,
-    me_code text,
-    me_code_dep text,
-    p_id integer,
-    p_order integer,
-    p_type_display text NOT NULL,
-    pm_default integer,
-    pm_id_dep bigint
-);
-
-
-
-COMMENT ON TABLE profile_menu IS 'Join  between the profile and the menu ';
-
-
-
-COMMENT ON COLUMN profile_menu.me_code_dep IS 'menu code dependency';
-
-
-
-COMMENT ON COLUMN profile_menu.p_id IS 'link to profile';
-
-
-
-COMMENT ON COLUMN profile_menu.p_order IS 'order of displaying menu';
-
-
-
-COMMENT ON COLUMN profile_menu.p_type_display IS 'M is a module
-E is a menu
-S is a select (for plugin)';
-
-
-
-COMMENT ON COLUMN profile_menu.pm_default IS 'default menu';
-
-
-
-COMMENT ON COLUMN profile_menu.pm_id_dep IS 'parent of this menu item';
-
-
-
-CREATE SEQUENCE profile_menu_pm_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE profile_menu_pm_id_seq OWNED BY profile_menu.pm_id;
-
-
-
-CREATE TABLE profile_menu_type (
-    pm_type text NOT NULL,
-    pm_desc text
-);
-
-
-
-CREATE SEQUENCE profile_p_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE profile_p_id_seq OWNED BY profile.p_id;
-
-
-
-CREATE TABLE profile_sec_repository (
-    ur_id bigint NOT NULL,
-    p_id bigint,
-    r_id bigint,
-    ur_right character(1),
-    CONSTRAINT user_sec_profile_ur_right_check CHECK ((ur_right = ANY 
(ARRAY['R'::bpchar, 'W'::bpchar])))
-);
-
-
-
-COMMENT ON TABLE profile_sec_repository IS 'Available profile for user';
-
-
-
-COMMENT ON COLUMN profile_sec_repository.ur_id IS 'pk';
-
-
-
-COMMENT ON COLUMN profile_sec_repository.p_id IS 'fk to profile';
-
-
-
-COMMENT ON COLUMN profile_sec_repository.r_id IS 'fk to stock_repository';
-
-
-
-COMMENT ON COLUMN profile_sec_repository.ur_right IS 'Type of right : R for 
readonly W for write';
-
-
-
-CREATE SEQUENCE profile_sec_repository_ur_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE profile_sec_repository_ur_id_seq OWNED BY 
profile_sec_repository.ur_id;
-
-
-
-CREATE TABLE profile_user (
-    user_name text NOT NULL,
-    pu_id integer NOT NULL,
-    p_id integer
-);
-
-
-
-COMMENT ON TABLE profile_user IS 'Contains the available profile for users';
-
-
-
-COMMENT ON COLUMN profile_user.user_name IS 'fk to available_user : login';
-
-
-
-COMMENT ON COLUMN profile_user.p_id IS 'fk to profile';
-
-
-
-CREATE SEQUENCE profile_user_pu_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE profile_user_pu_id_seq OWNED BY profile_user.pu_id;
-
-
-
-CREATE TABLE quant_fin (
-    qf_id bigint NOT NULL,
-    qf_bank bigint,
-    jr_id bigint,
-    qf_other bigint,
-    qf_amount numeric(20,4) DEFAULT 0
-);
-
-
-
-COMMENT ON TABLE quant_fin IS 'Simple operation for financial';
-
-
-
-CREATE SEQUENCE quant_fin_qf_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE quant_fin_qf_id_seq OWNED BY quant_fin.qf_id;
-
-
-
-CREATE TABLE quant_purchase (
-    qp_id integer DEFAULT nextval(('s_quantity'::text)::regclass) NOT NULL,
-    qp_internal text,
-    j_id integer NOT NULL,
-    qp_fiche integer NOT NULL,
-    qp_quantite numeric(20,4) NOT NULL,
-    qp_price numeric(20,4),
-    qp_vat numeric(20,4) DEFAULT 0.0,
-    qp_vat_code integer,
-    qp_nd_amount numeric(20,4) DEFAULT 0.0,
-    qp_nd_tva numeric(20,4) DEFAULT 0.0,
-    qp_nd_tva_recup numeric(20,4) DEFAULT 0.0,
-    qp_supplier integer NOT NULL,
-    qp_valid character(1) DEFAULT 'Y'::bpchar NOT NULL,
-    qp_dep_priv numeric(20,4) DEFAULT 0.0,
-    qp_vat_sided numeric(20,4) DEFAULT 0.0,
-    qp_unit numeric(20,4) DEFAULT 0
-);
-
-
-
-COMMENT ON COLUMN quant_purchase.qp_vat_sided IS 'amount of the VAT which 
avoid VAT, case of the VAT which add the same amount at the deb and cred';
-
-
-SET default_with_oids = true;
-
-
-CREATE TABLE quant_sold (
-    qs_id integer DEFAULT nextval(('s_quantity'::text)::regclass) NOT NULL,
-    qs_internal text,
-    qs_fiche integer NOT NULL,
-    qs_quantite numeric(20,4) NOT NULL,
-    qs_price numeric(20,4),
-    qs_vat numeric(20,4),
-    qs_vat_code integer,
-    qs_client integer NOT NULL,
-    qs_valid character(1) DEFAULT 'Y'::bpchar NOT NULL,
-    j_id integer NOT NULL,
-    qs_vat_sided numeric(20,4) DEFAULT 0.0,
-    qs_unit numeric(20,4) DEFAULT 0
-);
-
-
-
-COMMENT ON TABLE quant_sold IS 'Contains about invoice for customer';
-
-
-
-CREATE SEQUENCE s_attr_def
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_cbc
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_central
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_central_order
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_centralized
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_currency
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_fdef
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_fiche
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_fiche_def_ref
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_form
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_formdef
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_grpt
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_idef
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_internal
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_invoice
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_isup
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_jnt_fic_att_value
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_jrn
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_jrn_1
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_jrn_2
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_jrn_3
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_jrn_4
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_jrn_def
-    START WITH 5
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_jrn_op
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_jrn_pj1
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_jrn_pj2
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_jrn_pj3
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_jrn_pj4
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_jrn_rapt
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_jrnaction
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_jrnx
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_periode
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_quantity
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_stock_goods
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_tva
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_user_act
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE s_user_jrn
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE seq_bud_hypothese_bh_id
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE seq_doc_type_1
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE seq_doc_type_10
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE seq_doc_type_2
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE seq_doc_type_20
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE seq_doc_type_21
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE seq_doc_type_22
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE seq_doc_type_3
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE seq_doc_type_4
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE seq_doc_type_5
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE seq_doc_type_6
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE seq_doc_type_7
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE seq_doc_type_8
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE SEQUENCE seq_doc_type_9
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-SET default_with_oids = false;
-
-
-CREATE TABLE stock_change (
-    c_id bigint NOT NULL,
-    c_comment text,
-    c_date date,
-    tech_user text,
-    r_id bigint,
-    tech_date time without time zone DEFAULT now() NOT NULL
-);
-
-
-
-CREATE SEQUENCE stock_change_c_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE stock_change_c_id_seq OWNED BY stock_change.c_id;
-
-
-SET default_with_oids = true;
-
-
-CREATE TABLE stock_goods (
-    sg_id integer DEFAULT nextval(('s_stock_goods'::text)::regclass) NOT NULL,
-    j_id integer,
-    f_id integer,
-    sg_code text,
-    sg_quantity numeric(8,4) DEFAULT 0,
-    sg_type character(1) DEFAULT 'c'::bpchar NOT NULL,
-    sg_date date,
-    sg_tech_date date DEFAULT now(),
-    sg_tech_user text,
-    sg_comment character varying(80),
-    sg_exercice character varying(4),
-    r_id bigint,
-    c_id bigint,
-    CONSTRAINT stock_goods_sg_type CHECK (((sg_type = 'c'::bpchar) OR (sg_type 
= 'd'::bpchar)))
-);
-
-
-
-COMMENT ON TABLE stock_goods IS 'About the goods';
-
-
-SET default_with_oids = false;
-
-
-CREATE TABLE stock_repository (
-    r_id bigint NOT NULL,
-    r_name text,
-    r_adress text,
-    r_country text,
-    r_city text,
-    r_phone text
-);
-
-
-
-COMMENT ON TABLE stock_repository IS 'stock repository';
-
-
-
-COMMENT ON COLUMN stock_repository.r_id IS 'pk';
-
-
-
-COMMENT ON COLUMN stock_repository.r_name IS 'name of the stock';
-
-
-
-COMMENT ON COLUMN stock_repository.r_adress IS 'adress of the stock';
-
-
-
-COMMENT ON COLUMN stock_repository.r_country IS 'country of the stock';
-
-
-
-COMMENT ON COLUMN stock_repository.r_city IS 'City of the stock';
-
-
-
-COMMENT ON COLUMN stock_repository.r_phone IS 'Phone number';
-
-
-
-CREATE SEQUENCE stock_repository_r_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE stock_repository_r_id_seq OWNED BY stock_repository.r_id;
-
-
-
-CREATE TABLE tags (
-    t_id integer NOT NULL,
-    t_tag text NOT NULL,
-    t_description text
-);
-
-
-
-CREATE SEQUENCE tags_t_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE tags_t_id_seq OWNED BY tags.t_id;
-
-
-SET default_with_oids = true;
-
-
-CREATE TABLE tmp_pcmn (
-    pcm_val account_type NOT NULL,
-    pcm_lib text,
-    pcm_val_parent account_type DEFAULT 0,
-    pcm_type text
-);
-
-
-
-COMMENT ON TABLE tmp_pcmn IS 'Plan comptable minimum normalisé';
-
-
-SET default_with_oids = false;
-
-
-CREATE TABLE tmp_stockgood (
-    s_id bigint NOT NULL,
-    s_date timestamp without time zone DEFAULT now()
-);
-
-
-
-CREATE TABLE tmp_stockgood_detail (
-    d_id bigint NOT NULL,
-    s_id bigint,
-    sg_code text,
-    s_qin numeric(20,4),
-    s_qout numeric(20,4),
-    r_id bigint,
-    f_id bigint
-);
-
-
-
-CREATE SEQUENCE tmp_stockgood_detail_d_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE tmp_stockgood_detail_d_id_seq OWNED BY 
tmp_stockgood_detail.d_id;
-
-
-
-CREATE SEQUENCE tmp_stockgood_s_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE tmp_stockgood_s_id_seq OWNED BY tmp_stockgood.s_id;
-
-
-
-CREATE SEQUENCE todo_list_tl_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE TABLE todo_list (
-    tl_id integer DEFAULT nextval('todo_list_tl_id_seq'::regclass) NOT NULL,
-    tl_date date NOT NULL,
-    tl_title text NOT NULL,
-    tl_desc text,
-    use_login text NOT NULL,
-    is_public character(1) DEFAULT 'N'::bpchar NOT NULL,
-    CONSTRAINT ck_is_public CHECK ((is_public = ANY (ARRAY['Y'::bpchar, 
'N'::bpchar])))
-);
-
-
-
-COMMENT ON TABLE todo_list IS 'Todo list';
-
-
-
-COMMENT ON COLUMN todo_list.is_public IS 'Flag for the public parameter';
-
-
-
-CREATE TABLE todo_list_shared (
-    id integer NOT NULL,
-    todo_list_id integer NOT NULL,
-    use_login text NOT NULL
-);
-
-
-
-COMMENT ON TABLE todo_list_shared IS 'Note of todo list shared with other 
users';
-
-
-
-COMMENT ON COLUMN todo_list_shared.todo_list_id IS 'fk to todo_list';
-
-
-
-COMMENT ON COLUMN todo_list_shared.use_login IS 'user login';
-
-
-
-CREATE SEQUENCE todo_list_shared_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE todo_list_shared_id_seq OWNED BY todo_list_shared.id;
-
-
-
-CREATE SEQUENCE uos_pk_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-CREATE TABLE tool_uos (
-    uos_value bigint DEFAULT nextval('uos_pk_seq'::regclass) NOT NULL
-);
-
-
-SET default_with_oids = true;
-
-
-CREATE TABLE tva_rate (
-    tva_id integer DEFAULT nextval('s_tva'::regclass) NOT NULL,
-    tva_label text NOT NULL,
-    tva_rate numeric(8,4) DEFAULT 0.0 NOT NULL,
-    tva_comment text,
-    tva_poste text,
-    tva_both_side integer DEFAULT 0
-);
-
-
-
-COMMENT ON TABLE tva_rate IS 'Rate of vat';
-
-
-
-CREATE TABLE user_local_pref (
-    user_id text NOT NULL,
-    parameter_type text NOT NULL,
-    parameter_value text
-);
-
-
-
-COMMENT ON TABLE user_local_pref IS 'The user''s local parameter ';
-
-
-
-COMMENT ON COLUMN user_local_pref.user_id IS 'user''s login ';
-
-
-
-COMMENT ON COLUMN user_local_pref.parameter_type IS 'the type of parameter ';
-
-
-
-COMMENT ON COLUMN user_local_pref.parameter_value IS 'the value of parameter ';
-
-
-
-CREATE TABLE user_sec_act (
-    ua_id integer DEFAULT nextval(('s_user_act'::text)::regclass) NOT NULL,
-    ua_login text,
-    ua_act_id integer
-);
-
-
-SET default_with_oids = false;
-
-
-CREATE TABLE user_sec_action_profile (
-    ua_id bigint NOT NULL,
-    p_id bigint,
-    p_granted bigint,
-    ua_right character(1),
-    CONSTRAINT user_sec_action_profile_ua_right_check CHECK ((ua_right = ANY 
(ARRAY['R'::bpchar, 'W'::bpchar])))
-);
-
-
-
-COMMENT ON TABLE user_sec_action_profile IS 'Available profile for user';
-
-
-
-COMMENT ON COLUMN user_sec_action_profile.ua_id IS 'pk';
-
-
-
-COMMENT ON COLUMN user_sec_action_profile.p_id IS 'fk to profile';
-
-
-
-COMMENT ON COLUMN user_sec_action_profile.ua_right IS 'Type of right : R for 
readonly W for write';
-
-
-
-CREATE SEQUENCE user_sec_action_profile_ua_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-
-
-
-ALTER SEQUENCE user_sec_action_profile_ua_id_seq OWNED BY 
user_sec_action_profile.ua_id;
-
-
-SET default_with_oids = true;
-
-
-CREATE TABLE user_sec_jrn (
-    uj_id integer DEFAULT nextval(('s_user_jrn'::text)::regclass) NOT NULL,
-    uj_login text,
-    uj_jrn_id integer,
-    uj_priv text
-);
-
-
-
-CREATE VIEW v_all_menu AS
-    SELECT pm.me_code, pm.pm_id, pm.me_code_dep, pm.p_order, 
pm.p_type_display, p.p_name, p.p_desc, mr.me_menu, mr.me_file, mr.me_url, 
mr.me_parameter, mr.me_javascript, mr.me_type, pm.p_id, mr.me_description FROM 
((profile_menu pm JOIN profile p ON ((p.p_id = pm.p_id))) JOIN menu_ref mr 
USING (me_code)) ORDER BY pm.p_order;
-
-
-
-CREATE VIEW vw_fiche_attr AS
-    SELECT a.f_id, a.fd_id, a.ad_value AS vw_name, k.ad_value AS 
vw_first_name, b.ad_value AS vw_sell, c.ad_value AS vw_buy, d.ad_value AS 
tva_code, tva_rate.tva_id, tva_rate.tva_rate, tva_rate.tva_label, e.ad_value AS 
vw_addr, f.ad_value AS vw_cp, j.ad_value AS quick_code, h.ad_value AS 
vw_description, i.ad_value AS tva_num, fiche_def.frd_id, l.ad_value AS 
accounting FROM (((((((((((((SELECT fiche.f_id, fiche.fd_id, 
fiche_detail.ad_value FROM (fiche LEFT JOIN fiche_detail USING (f_id))  [...]
-
-
-
-CREATE VIEW vw_fiche_name AS
-    SELECT fiche_detail.f_id, fiche_detail.ad_value AS name FROM fiche_detail 
WHERE (fiche_detail.ad_id = 1);
-
-
-
-CREATE VIEW v_detail_purchase AS
-    WITH m AS (SELECT sum(quant_purchase.qp_price) AS htva, 
sum(quant_purchase.qp_vat) AS tot_vat, sum(quant_purchase.qp_vat_sided) AS 
tot_tva_np, jrn.jr_id FROM ((quant_purchase JOIN jrnx USING (j_id)) JOIN jrn ON 
((jrnx.j_grpt = jrn.jr_grpt_id))) GROUP BY jrn.jr_id) SELECT jrn.jr_id, 
jrn.jr_date, jrn.jr_date_paid, jrn.jr_ech, jrn.jr_tech_per, jrn.jr_comment, 
jrn.jr_pj_number, jrn.jr_internal, jrn.jr_def_id, jrnx.j_poste, jrnx.j_text, 
jrnx.j_qcode, quant_purchase.qp_fiche AS item_card,  [...]
-
-
-
-CREATE VIEW v_detail_sale AS
-    WITH m AS (SELECT sum(quant_sold.qs_price) AS htva, sum(quant_sold.qs_vat) 
AS tot_vat, sum(quant_sold.qs_vat_sided) AS tot_tva_np, jrn.jr_id FROM 
((quant_sold JOIN jrnx USING (j_id)) JOIN jrn ON ((jrnx.j_grpt = 
jrn.jr_grpt_id))) GROUP BY jrn.jr_id) SELECT jrn.jr_id, jrn.jr_date, 
jrn.jr_date_paid, jrn.jr_ech, jrn.jr_tech_per, jrn.jr_comment, 
jrn.jr_pj_number, jrn.jr_internal, jrn.jr_def_id, jrnx.j_poste, jrnx.j_text, 
jrnx.j_qcode, quant_sold.qs_fiche AS item_card, a.name AS item_name, [...]
-
-
-
-CREATE VIEW v_menu_dependency AS
-    WITH t_menu AS (SELECT pm.pm_id, mr.me_menu, pm.me_code, pm.me_code_dep, 
pm.p_type_display, mr.me_file, mr.me_javascript, mr.me_description, 
mr.me_description_etendue, p.p_id FROM ((profile_menu pm JOIN profile p ON 
((p.p_id = pm.p_id))) JOIN menu_ref mr USING (me_code))) SELECT DISTINCT 
((COALESCE((v3.me_code || '/'::text), ''::text) || COALESCE(v2.me_code, 
''::text)) || CASE WHEN (v2.me_code IS NULL) THEN COALESCE(v1.me_code, 
''::text) WHEN (v2.me_code IS NOT NULL) THEN COALESCE((' [...]
-
-
-
-CREATE VIEW v_menu_description AS
-    WITH t_menu AS (SELECT pm.pm_id, pm.pm_id_dep, pm.p_id, mr.me_menu, 
pm.me_code, pm.me_code_dep, pm.p_type_display, pu.user_name, mr.me_file, 
mr.me_javascript, mr.me_description, mr.me_description_etendue FROM 
(((profile_menu pm JOIN profile_user pu ON ((pu.p_id = pm.p_id))) JOIN profile 
p ON ((p.p_id = pm.p_id))) JOIN menu_ref mr USING (me_code))) SELECT DISTINCT 
((COALESCE((v3.me_code || '/'::text), ''::text) || COALESCE(v2.me_code, 
''::text)) || CASE WHEN (v2.me_code IS NULL) THEN  [...]
-
-
-
-COMMENT ON VIEW v_menu_description IS 'Description des menus';
-
-
-
-CREATE VIEW v_menu_description_favori AS
-    WITH t_menu AS (SELECT mr.me_menu, pm.me_code, pm.me_code_dep, 
pm.p_type_display, pu.user_name, mr.me_file, mr.me_javascript, 
mr.me_description, mr.me_description_etendue FROM (((profile_menu pm JOIN 
profile_user pu ON ((pu.p_id = pm.p_id))) JOIN profile p ON ((p.p_id = 
pm.p_id))) JOIN menu_ref mr USING (me_code))) SELECT DISTINCT 
((COALESCE((v3.me_code || '/'::text), ''::text) || COALESCE(v2.me_code, 
''::text)) || CASE WHEN (v2.me_code IS NULL) THEN COALESCE(v1.me_code, 
''::text) WH [...]
-
-
-
-CREATE VIEW v_menu_profile AS
-    WITH t_menu AS (SELECT pm.pm_id, pm.pm_id_dep, pm.me_code, pm.me_code_dep, 
pm.p_type_display, pm.p_id FROM (profile_menu pm JOIN profile p ON ((p.p_id = 
pm.p_id)))) SELECT DISTINCT ((COALESCE((v3.me_code || '/'::text), ''::text) || 
COALESCE(v2.me_code, ''::text)) || CASE WHEN (v2.me_code IS NULL) THEN 
COALESCE(v1.me_code, ''::text) WHEN (v2.me_code IS NOT NULL) THEN 
COALESCE(('/'::text || v1.me_code), ''::text) ELSE NULL::text END) AS code, 
v3.p_type_display, COALESCE(v3.pm_id, 0) AS [...]
-
-
-
-COMMENT ON VIEW v_menu_profile IS 'Give the profile and the menu + 
dependencies';
-
-
-
-CREATE VIEW v_quant_detail AS
-    WITH quant AS (SELECT quant_purchase.j_id, quant_purchase.qp_fiche AS 
fiche_id, quant_purchase.qp_supplier AS tiers, quant_purchase.qp_vat AS 
vat_amount, quant_purchase.qp_price AS price, quant_purchase.qp_vat_code AS 
vat_code, quant_purchase.qp_dep_priv AS dep_priv, quant_purchase.qp_nd_tva AS 
nd_tva, quant_purchase.qp_nd_tva_recup AS nd_tva_recup, 
quant_purchase.qp_nd_amount AS nd_amount, quant_purchase.qp_vat_sided AS 
vat_sided FROM quant_purchase UNION ALL SELECT quant_sold.j_id, [...]
-
-
-
-CREATE TABLE version (
-    val integer
-);
-
-
-
-CREATE VIEW vw_client AS
-    SELECT fiche.f_id, a1.ad_value AS name, a.ad_value AS quick_code, 
b.ad_value AS tva_num, c.ad_value AS poste_comptable, d.ad_value AS rue, 
e.ad_value AS code_postal, f.ad_value AS pays, g.ad_value AS telephone, 
h.ad_value AS email FROM (((((((((((fiche JOIN fiche_def USING (fd_id)) JOIN 
fiche_def_ref USING (frd_id)) LEFT JOIN (SELECT fiche_detail.jft_id, 
fiche_detail.f_id, fiche_detail.ad_id, fiche_detail.ad_value FROM fiche_detail 
WHERE (fiche_detail.ad_id = 1)) a1 USING (f_id)) LEF [...]
-
-
-
-CREATE VIEW vw_fiche_def AS
-    SELECT jnt_fic_attr.fd_id, jnt_fic_attr.ad_id, attr_def.ad_text, 
fiche_def.fd_class_base, fiche_def.fd_label, fiche_def.fd_create_account, 
fiche_def.frd_id FROM ((fiche_def JOIN jnt_fic_attr USING (fd_id)) JOIN 
attr_def ON ((attr_def.ad_id = jnt_fic_attr.ad_id)));
-
-
-
-COMMENT ON VIEW vw_fiche_def IS 'all the attributs for card family';
-
-
-
-CREATE VIEW vw_fiche_min AS
-    SELECT attr_min.frd_id, attr_min.ad_id, attr_def.ad_text, 
fiche_def_ref.frd_text, fiche_def_ref.frd_class_base FROM ((attr_min JOIN 
attr_def USING (ad_id)) JOIN fiche_def_ref USING (frd_id));
-
-
-
-CREATE VIEW vw_poste_qcode AS
-    SELECT c.f_id, a.ad_value AS j_poste, b.ad_value AS j_qcode FROM ((fiche c 
LEFT JOIN (SELECT fiche_detail.f_id, fiche_detail.ad_value FROM fiche_detail 
WHERE (fiche_detail.ad_id = 5)) a USING (f_id)) LEFT JOIN (SELECT 
fiche_detail.f_id, fiche_detail.ad_value FROM fiche_detail WHERE 
(fiche_detail.ad_id = 23)) b USING (f_id));
-
-
-
-CREATE VIEW vw_supplier AS
-    SELECT fiche.f_id, a1.ad_value AS name, a.ad_value AS quick_code, 
b.ad_value AS tva_num, c.ad_value AS poste_comptable, d.ad_value AS rue, 
e.ad_value AS code_postal, f.ad_value AS pays, g.ad_value AS telephone, 
h.ad_value AS email FROM (((((((((((fiche JOIN fiche_def USING (fd_id)) JOIN 
fiche_def_ref USING (frd_id)) LEFT JOIN (SELECT fiche_detail.jft_id, 
fiche_detail.f_id, fiche_detail.ad_id, fiche_detail.ad_value FROM fiche_detail 
WHERE (fiche_detail.ad_id = 1)) a1 USING (f_id)) LEF [...]
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-COMMENT ON CONSTRAINT uniq_user_ledger ON user_sec_jrn IS 'Create an unique 
combination user / ledger';
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-CREATE UNIQUE INDEX fd_id_ad_id_x ON jnt_fic_attr USING btree (fd_id, ad_id);
-
-
-
-CREATE UNIQUE INDEX fiche_detail_f_id_ad_id ON fiche_detail USING btree (f_id, 
ad_id);
-
-
-
-CREATE INDEX fk_action_person_action_gestion ON action_person USING btree 
(ag_id);
-
-
-
-CREATE INDEX fk_action_person_fiche ON action_person USING btree (f_id);
-
-
-
-CREATE INDEX fk_stock_good_repository_r_id ON stock_goods USING btree (r_id);
-
-
-
-CREATE INDEX fk_stock_goods_f_id ON stock_goods USING btree (f_id);
-
-
-
-CREATE INDEX fk_stock_goods_j_id ON stock_goods USING btree (j_id);
-
-
-
-CREATE INDEX fki_f_end_date ON forecast USING btree (f_end_date);
-
-
-
-CREATE INDEX fki_f_start_date ON forecast USING btree (f_start_date);
-
-
-
-CREATE INDEX fki_jrn_jr_grpt_id ON jrn USING btree (jr_grpt_id);
-
-
-
-CREATE INDEX fki_jrnx_f_id ON jrnx USING btree (f_id);
-
-
-
-CREATE INDEX fki_jrnx_j_grpt ON jrnx USING btree (j_grpt);
-
-
-
-CREATE INDEX fki_profile_menu_me_code ON profile_menu USING btree (me_code);
-
-
-
-CREATE INDEX fki_profile_menu_profile ON profile_menu USING btree (p_id);
-
-
-
-CREATE INDEX fki_profile_menu_type_fkey ON profile_menu USING btree 
(p_type_display);
-
-
-
-CREATE INDEX idx_qs_internal ON quant_sold USING btree (qs_internal);
-
-
-
-CREATE INDEX jnt_fic_att_value_fd_id_idx ON fiche_detail USING btree (f_id);
-
-
-
-CREATE INDEX jnt_fic_attr_fd_id_idx ON jnt_fic_attr USING btree (fd_id);
-
-
-
-CREATE INDEX jrnx_j_qcode_ix ON jrnx USING btree (j_qcode);
-
-
-
-CREATE UNIQUE INDEX k_ag_ref ON action_gestion USING btree (ag_ref);
-
-
-
-CREATE INDEX link_action_type_fki ON action_gestion_related USING btree 
(aga_type);
-
-
-
-CREATE UNIQUE INDEX qcode_idx ON fiche_detail USING btree (ad_value) WHERE 
(ad_id = 23);
-
-
-
-CREATE UNIQUE INDEX qf_jr_id ON quant_fin USING btree (jr_id);
-
-
-
-CREATE UNIQUE INDEX qp_j_id ON quant_purchase USING btree (j_id);
-
-
-
-CREATE UNIQUE INDEX qs_j_id ON quant_sold USING btree (j_id);
-
-
-
-CREATE INDEX quant_purchase_jrn_fki ON quant_purchase USING btree 
(qp_internal);
-
-
-
-CREATE INDEX quant_sold_jrn_fki ON quant_sold USING btree (qs_internal);
-
-
-
-CREATE UNIQUE INDEX uj_login_uj_jrn_id ON user_sec_jrn USING btree (uj_login, 
uj_jrn_id);
-
-
-
-CREATE UNIQUE INDEX ux_po_name ON poste_analytique USING btree (po_name);
-
-
-
-CREATE UNIQUE INDEX x_jrn_jr_id ON jrn USING btree (jr_id);
-
-
-
-CREATE INDEX x_mt ON jrn USING btree (jr_mt);
-
-
-
-CREATE UNIQUE INDEX x_periode ON parm_periode USING btree (p_start, p_end);
-
-
-
-CREATE INDEX x_poste ON jrnx USING btree (j_poste);
-
-
-
-CREATE TRIGGER action_gestion_t_insert_update BEFORE INSERT OR UPDATE ON 
action_gestion FOR EACH ROW EXECUTE PROCEDURE 
comptaproc.action_gestion_ins_upd();
-
-
-
-COMMENT ON TRIGGER action_gestion_t_insert_update ON action_gestion IS 
'Truncate the column ag_title to 70 char';
-
-
-
-CREATE TRIGGER document_modele_validate BEFORE INSERT OR UPDATE ON 
document_modele FOR EACH ROW EXECUTE PROCEDURE 
comptaproc.t_document_modele_validate();
-
-
-
-CREATE TRIGGER document_validate BEFORE INSERT OR UPDATE ON document FOR EACH 
ROW EXECUTE PROCEDURE comptaproc.t_document_validate();
-
-
-
-CREATE TRIGGER fiche_def_ins_upd BEFORE INSERT OR UPDATE ON fiche_def FOR EACH 
ROW EXECUTE PROCEDURE comptaproc.fiche_def_ins_upd();
-
-
-
-CREATE TRIGGER fiche_detail_upd_trg AFTER UPDATE ON fiche_detail FOR EACH ROW 
EXECUTE PROCEDURE comptaproc.fiche_detail_qcode_upd();
-
-
-
-CREATE TRIGGER info_def_ins_upd_t BEFORE INSERT OR UPDATE ON info_def FOR EACH 
ROW EXECUTE PROCEDURE comptaproc.info_def_ins_upd();
-
-
-
-CREATE TRIGGER jrn_def_description_ins_upd BEFORE INSERT OR UPDATE ON jrn_def 
FOR EACH ROW EXECUTE PROCEDURE comptaproc.t_jrn_def_description();
-
-
-
-CREATE TRIGGER opd_limit_description BEFORE INSERT OR UPDATE ON op_predef FOR 
EACH ROW EXECUTE PROCEDURE comptaproc.opd_limit_description();
-
-
-
-CREATE TRIGGER parm_periode_check_periode_trg BEFORE INSERT OR UPDATE ON 
parm_periode FOR EACH ROW EXECUTE PROCEDURE comptaproc.check_periode();
-
-
-
-CREATE TRIGGER profile_user_ins_upd BEFORE INSERT OR UPDATE ON profile_user 
FOR EACH ROW EXECUTE PROCEDURE comptaproc.trg_profile_user_ins_upd();
-
-
-
-COMMENT ON TRIGGER profile_user_ins_upd ON profile_user IS 'Force the column 
user_name to lowercase';
-
-
-
-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 TRIGGER quant_sold_ins_upd_tr AFTER INSERT OR UPDATE ON quant_sold FOR 
EACH ROW EXECUTE PROCEDURE comptaproc.quant_sold_ins_upd();
-
-
-
-CREATE TRIGGER remove_action_gestion AFTER DELETE ON fiche FOR EACH ROW 
EXECUTE PROCEDURE comptaproc.card_after_delete();
-
-
-
-CREATE TRIGGER t_check_balance AFTER INSERT OR UPDATE ON jrn FOR EACH ROW 
EXECUTE PROCEDURE comptaproc.proc_check_balance();
-
-
-
-CREATE TRIGGER t_check_jrn BEFORE INSERT OR DELETE OR UPDATE ON jrn FOR EACH 
ROW EXECUTE PROCEDURE comptaproc.jrn_check_periode();
-
-
-
-CREATE TRIGGER t_group_analytic_del BEFORE DELETE ON groupe_analytique FOR 
EACH ROW EXECUTE PROCEDURE comptaproc.group_analytique_del();
-
-
-
-CREATE TRIGGER t_group_analytic_ins_upd BEFORE INSERT OR UPDATE ON 
groupe_analytique FOR EACH ROW EXECUTE PROCEDURE 
comptaproc.group_analytic_ins_upd();
-
-
-
-CREATE TRIGGER t_jnt_fic_attr_ins AFTER INSERT ON jnt_fic_attr FOR EACH ROW 
EXECUTE PROCEDURE comptaproc.jnt_fic_attr_ins();
-
-
-
-CREATE TRIGGER t_jrn_def_add_periode AFTER INSERT ON jrn_def FOR EACH ROW 
EXECUTE PROCEDURE comptaproc.jrn_def_add();
-
-
-
-CREATE TRIGGER t_jrn_def_delete BEFORE DELETE ON jrn_def FOR EACH ROW EXECUTE 
PROCEDURE comptaproc.jrn_def_delete();
-
-
-
-CREATE TRIGGER t_jrn_del BEFORE DELETE ON jrn FOR EACH ROW EXECUTE PROCEDURE 
comptaproc.jrn_del();
-
-
-
-CREATE TRIGGER t_jrnx_del BEFORE DELETE ON jrnx FOR EACH ROW EXECUTE PROCEDURE 
comptaproc.jrnx_del();
-
-
-
-CREATE TRIGGER t_jrnx_ins BEFORE INSERT ON jrnx FOR EACH ROW EXECUTE PROCEDURE 
comptaproc.jrnx_ins();
-
-
-
-COMMENT ON TRIGGER t_jrnx_ins ON jrnx IS 'check that the qcode used by the 
card exists and format it : uppercase and trim the space';
-
-
-
-CREATE TRIGGER t_jrnx_upd BEFORE UPDATE ON jrnx FOR EACH ROW EXECUTE PROCEDURE 
comptaproc.jrnx_ins();
-
-
-
-CREATE TRIGGER t_letter_del AFTER DELETE ON jrnx FOR EACH ROW EXECUTE 
PROCEDURE comptaproc.jrnx_letter_del();
-
-
-
-COMMENT ON TRIGGER t_letter_del ON jrnx IS 'Delete the lettering for this row';
-
-
-
-CREATE TRIGGER t_plan_analytique_ins_upd BEFORE INSERT OR UPDATE ON 
plan_analytique FOR EACH ROW EXECUTE PROCEDURE 
comptaproc.plan_analytic_ins_upd();
-
-
-
-CREATE TRIGGER t_poste_analytique_ins_upd BEFORE INSERT OR UPDATE ON 
poste_analytique FOR EACH ROW EXECUTE PROCEDURE 
comptaproc.poste_analytique_ins_upd();
-
-
-
-CREATE TRIGGER t_tmp_pcm_alphanum_ins_upd BEFORE INSERT OR UPDATE ON tmp_pcmn 
FOR EACH ROW EXECUTE PROCEDURE comptaproc.tmp_pcmn_alphanum_ins_upd();
-
-
-
-CREATE TRIGGER t_tmp_pcmn_ins BEFORE INSERT ON tmp_pcmn FOR EACH ROW EXECUTE 
PROCEDURE comptaproc.tmp_pcmn_ins();
-
-
-
-CREATE TRIGGER todo_list_ins_upd BEFORE INSERT OR UPDATE ON todo_list FOR EACH 
ROW EXECUTE PROCEDURE comptaproc.trg_todo_list_ins_upd();
-
-
-
-COMMENT ON TRIGGER todo_list_ins_upd ON todo_list IS 'Force the column 
use_login to lowercase';
-
-
-
-CREATE TRIGGER todo_list_shared_ins_upd BEFORE INSERT OR UPDATE ON 
todo_list_shared FOR EACH ROW EXECUTE PROCEDURE 
comptaproc.trg_todo_list_shared_ins_upd();
-
-
-
-COMMENT ON TRIGGER todo_list_shared_ins_upd ON todo_list_shared IS 'Force the 
column ua_login to lowercase';
-
-
-
-CREATE TRIGGER trg_action_gestion_related BEFORE INSERT OR UPDATE ON 
action_gestion_related FOR EACH ROW EXECUTE PROCEDURE 
comptaproc.action_gestion_related_ins_up();
-
-
-
-CREATE TRIGGER trg_category_card_before_delete BEFORE DELETE ON fiche_def FOR 
EACH ROW EXECUTE PROCEDURE comptaproc.category_card_before_delete();
-
-
-
-CREATE TRIGGER trg_extension_ins_upd BEFORE INSERT OR UPDATE ON extension FOR 
EACH ROW EXECUTE PROCEDURE comptaproc.extension_ins_upd();
-
-
-
-CREATE TRIGGER trigger_document_type_i AFTER INSERT ON document_type FOR EACH 
ROW EXECUTE PROCEDURE comptaproc.t_document_type_insert();
-
-
-
-CREATE TRIGGER trigger_jrn_def_sequence_i AFTER INSERT ON jrn_def FOR EACH ROW 
EXECUTE PROCEDURE comptaproc.t_jrn_def_sequence();
-
-
-
-CREATE TRIGGER user_sec_act_ins_upd BEFORE INSERT OR UPDATE ON user_sec_act 
FOR EACH ROW EXECUTE PROCEDURE comptaproc.trg_user_sec_act_ins_upd();
-
-
-
-COMMENT ON TRIGGER user_sec_act_ins_upd ON user_sec_act IS 'Force the column 
ua_login to lowercase';
-
-
-
-CREATE TRIGGER user_sec_jrn_after_ins_upd BEFORE INSERT OR UPDATE ON 
user_sec_jrn FOR EACH ROW EXECUTE PROCEDURE 
comptaproc.trg_user_sec_jrn_ins_upd();
-
-
-
-COMMENT ON TRIGGER user_sec_jrn_after_ins_upd ON user_sec_jrn IS 'Force the 
column uj_login to lowercase';
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-REVOKE ALL ON SCHEMA public FROM PUBLIC;
-REVOKE ALL ON SCHEMA public FROM postgres;
-GRANT ALL ON SCHEMA public TO postgres;
-GRANT ALL ON SCHEMA public TO PUBLIC;
-
-
-
diff --git a/include/sql/mod1/sequence.sql b/include/sql/mod1/sequence.sql
index de5d6a1..e69de29 100644
--- a/include/sql/mod1/sequence.sql
+++ b/include/sql/mod1/sequence.sql
@@ -1,687 +0,0 @@
-CREATE SEQUENCE action_detail_ad_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE action_detail_ad_id_seq OWNED BY action_detail.ad_id;
-CREATE SEQUENCE action_gestion_ag_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE action_gestion_comment_agc_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE action_gestion_comment_agc_id_seq OWNED BY 
action_gestion_comment.agc_id;
-CREATE SEQUENCE action_gestion_operation_ago_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE action_gestion_operation_ago_id_seq OWNED BY 
action_gestion_operation.ago_id;
-CREATE SEQUENCE action_gestion_related_aga_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE action_gestion_related_aga_id_seq OWNED BY 
action_gestion_related.aga_id;
-CREATE SEQUENCE action_person_ap_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE action_person_ap_id_seq OWNED BY action_person.ap_id;
-CREATE SEQUENCE action_tags_at_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE action_tags_at_id_seq OWNED BY action_tags.at_id;
-CREATE SEQUENCE bilan_b_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE bookmark_b_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE bookmark_b_id_seq OWNED BY bookmark.b_id;
-CREATE SEQUENCE bud_card_bc_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE bud_detail_bd_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE bud_detail_periode_bdp_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE del_action_del_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE del_action_del_id_seq OWNED BY del_action.del_id;
-CREATE SEQUENCE del_jrn_dj_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE del_jrn_dj_id_seq OWNED BY del_jrn.dj_id;
-CREATE SEQUENCE del_jrnx_djx_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE del_jrnx_djx_id_seq OWNED BY del_jrnx.djx_id;
-CREATE SEQUENCE document_d_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE document_modele_md_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE document_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-COMMENT ON SEQUENCE document_seq IS 'Sequence for the sequence bound to the 
document modele';
-CREATE SEQUENCE document_state_s_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE document_type_dt_id_seq
-    START WITH 25
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE extension_ex_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE extension_ex_id_seq OWNED BY extension.ex_id;
-CREATE SEQUENCE forecast_cat_fc_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE forecast_cat_fc_id_seq OWNED BY forecast_cat.fc_id;
-CREATE SEQUENCE forecast_f_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE forecast_f_id_seq OWNED BY forecast.f_id;
-CREATE SEQUENCE forecast_item_fi_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE forecast_item_fi_id_seq OWNED BY forecast_item.fi_id;
-CREATE SEQUENCE historique_analytique_ha_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_jnt_id
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE jnt_letter_jl_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE jnt_letter_jl_id_seq OWNED BY jnt_letter.jl_id;
-CREATE SEQUENCE jrn_info_ji_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE jrn_info_ji_id_seq OWNED BY jrn_info.ji_id;
-CREATE SEQUENCE jrn_note_n_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE jrn_note_n_id_seq OWNED BY jrn_note.n_id;
-CREATE SEQUENCE key_distribution_activity_ka_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE key_distribution_activity_ka_id_seq OWNED BY 
key_distribution_activity.ka_id;
-CREATE SEQUENCE key_distribution_detail_ke_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE key_distribution_detail_ke_id_seq OWNED BY 
key_distribution_detail.ke_id;
-CREATE SEQUENCE key_distribution_kd_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE key_distribution_kd_id_seq OWNED BY key_distribution.kd_id;
-CREATE SEQUENCE key_distribution_ledger_kl_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE key_distribution_ledger_kl_id_seq OWNED BY 
key_distribution_ledger.kl_id;
-CREATE SEQUENCE letter_cred_lc_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE letter_cred_lc_id_seq OWNED BY letter_cred.lc_id;
-CREATE SEQUENCE letter_deb_ld_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE letter_deb_ld_id_seq OWNED BY letter_deb.ld_id;
-CREATE SEQUENCE link_action_type_l_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE link_action_type_l_id_seq OWNED BY link_action_type.l_id;
-CREATE SEQUENCE menu_default_md_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE menu_default_md_id_seq OWNED BY menu_default.md_id;
-CREATE SEQUENCE mod_payment_mp_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE mod_payment_mp_id_seq OWNED BY mod_payment.mp_id;
-CREATE SEQUENCE op_def_op_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE op_predef_detail_opd_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_oa_group
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE plan_analytique_pa_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE poste_analytique_po_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE profile_menu_pm_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE profile_menu_pm_id_seq OWNED BY profile_menu.pm_id;
-CREATE SEQUENCE profile_p_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE profile_p_id_seq OWNED BY profile.p_id;
-CREATE SEQUENCE profile_sec_repository_ur_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE profile_sec_repository_ur_id_seq OWNED BY 
profile_sec_repository.ur_id;
-CREATE SEQUENCE profile_user_pu_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE profile_user_pu_id_seq OWNED BY profile_user.pu_id;
-CREATE SEQUENCE quant_fin_qf_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE quant_fin_qf_id_seq OWNED BY quant_fin.qf_id;
-CREATE SEQUENCE s_attr_def
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_cbc
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_central
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_central_order
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_centralized
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_currency
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_fdef
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_fiche
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_fiche_def_ref
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_form
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_formdef
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_grpt
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_idef
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_internal
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_invoice
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_isup
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_jnt_fic_att_value
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_jrn
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_jrn_1
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_jrn_2
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_jrn_3
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_jrn_4
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_jrn_def
-    START WITH 5
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_jrn_op
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_jrn_pj1
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_jrn_pj2
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_jrn_pj3
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_jrn_pj4
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_jrn_rapt
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_jrnaction
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_jrnx
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_periode
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_quantity
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_stock_goods
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_tva
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_user_act
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE s_user_jrn
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE seq_bud_hypothese_bh_id
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE seq_doc_type_1
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE seq_doc_type_10
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE seq_doc_type_2
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE seq_doc_type_20
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE seq_doc_type_21
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE seq_doc_type_22
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE seq_doc_type_3
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE seq_doc_type_4
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE seq_doc_type_5
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE seq_doc_type_6
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE seq_doc_type_7
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE seq_doc_type_8
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE seq_doc_type_9
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE stock_change_c_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE stock_change_c_id_seq OWNED BY stock_change.c_id;
-CREATE SEQUENCE stock_repository_r_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE stock_repository_r_id_seq OWNED BY stock_repository.r_id;
-CREATE SEQUENCE tags_t_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE tags_t_id_seq OWNED BY tags.t_id;
-CREATE SEQUENCE tmp_stockgood_detail_d_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE tmp_stockgood_detail_d_id_seq OWNED BY 
tmp_stockgood_detail.d_id;
-CREATE SEQUENCE tmp_stockgood_s_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE tmp_stockgood_s_id_seq OWNED BY tmp_stockgood.s_id;
-CREATE SEQUENCE todo_list_tl_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE todo_list_shared_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE todo_list_shared_id_seq OWNED BY todo_list_shared.id;
-CREATE SEQUENCE uos_pk_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-CREATE SEQUENCE user_sec_action_profile_ua_id_seq
-    START WITH 1
-    INCREMENT BY 1
-    NO MINVALUE
-    NO MAXVALUE
-    CACHE 1;
-ALTER SEQUENCE user_sec_action_profile_ua_id_seq OWNED BY 
user_sec_action_profile.ua_id;
diff --git a/include/sql/mod1/table.sql b/include/sql/mod1/table.sql
index 9a8726e..e69de29 100644
--- a/include/sql/mod1/table.sql
+++ b/include/sql/mod1/table.sql
@@ -1,659 +0,0 @@
-CREATE DOMAIN account_type AS character varying(40);
-CREATE TABLE action (
-    ac_id integer NOT NULL,
-    ac_description text NOT NULL,
-    ac_module text,
-    ac_code character varying(30)
-);
-CREATE TABLE action_detail (
-    ad_id integer NOT NULL,
-    f_id bigint,
-    ad_text text,
-    ad_pu numeric(20,4) DEFAULT 0,
-    ad_quant numeric(20,4) DEFAULT 0,
-    ad_tva_id integer DEFAULT 0,
-    ad_tva_amount numeric(20,4) DEFAULT 0,
-    ad_total_amount numeric(20,4) DEFAULT 0,
-    ag_id integer DEFAULT 0 NOT NULL
-);
-CREATE TABLE action_gestion (
-    ag_id integer DEFAULT nextval('action_gestion_ag_id_seq'::regclass) NOT 
NULL,
-    ag_type integer,
-    f_id_dest integer,
-    ag_title text,
-    ag_timestamp timestamp without time zone DEFAULT now(),
-    ag_ref_ag_id integer,
-    ag_ref text,
-    ag_hour text,
-    ag_priority integer DEFAULT 2,
-    ag_dest bigint DEFAULT (-1) NOT NULL,
-    ag_owner text,
-    ag_contact bigint,
-    ag_state integer,
-    ag_remind_date date
-);
-CREATE TABLE action_gestion_comment (
-    agc_id bigint NOT NULL,
-    ag_id bigint,
-    agc_date timestamp with time zone DEFAULT now(),
-    agc_comment text,
-    tech_user text
-);
-CREATE TABLE action_gestion_operation (
-    ago_id bigint NOT NULL,
-    ag_id bigint,
-    jr_id bigint
-);
-CREATE TABLE action_gestion_related (
-    aga_id bigint NOT NULL,
-    aga_least bigint NOT NULL,
-    aga_greatest bigint NOT NULL,
-    aga_type bigint
-);
-CREATE TABLE action_person (
-    ap_id integer NOT NULL,
-    ag_id integer NOT NULL,
-    f_id integer NOT NULL
-);
-CREATE TABLE action_tags (
-    at_id integer NOT NULL,
-    t_id integer,
-    ag_id integer
-);
-CREATE TABLE attr_def (
-    ad_id integer DEFAULT nextval(('s_attr_def'::text)::regclass) NOT NULL,
-    ad_text text,
-    ad_type text,
-    ad_size text NOT NULL,
-    ad_extra text
-);
-CREATE TABLE attr_min (
-    frd_id integer NOT NULL,
-    ad_id integer NOT NULL
-);
-CREATE TABLE bilan (
-    b_id integer DEFAULT nextval('bilan_b_id_seq'::regclass) NOT NULL,
-    b_name text NOT NULL,
-    b_file_template text NOT NULL,
-    b_file_form text,
-    b_type text NOT NULL
-);
-CREATE TABLE bookmark (
-    b_id integer NOT NULL,
-    b_order integer DEFAULT 1,
-    b_action text,
-    login text
-);
-CREATE TABLE centralized (
-    c_id integer DEFAULT nextval(('s_centralized'::text)::regclass) NOT NULL,
-    c_j_id integer,
-    c_date date NOT NULL,
-    c_internal text NOT NULL,
-    c_montant numeric(20,4) NOT NULL,
-    c_debit boolean DEFAULT true,
-    c_jrn_def integer NOT NULL,
-    c_poste account_type,
-    c_description text,
-    c_grp integer NOT NULL,
-    c_comment text,
-    c_rapt text,
-    c_periode integer,
-    c_order integer
-);
-CREATE TABLE del_action (
-    del_id integer NOT NULL,
-    del_name text NOT NULL,
-    del_time timestamp without time zone
-);
-CREATE TABLE del_jrn (
-    jr_id integer NOT NULL,
-    jr_def_id integer,
-    jr_montant numeric(20,4),
-    jr_comment text,
-    jr_date date,
-    jr_grpt_id integer,
-    jr_internal text,
-    jr_tech_date timestamp without time zone,
-    jr_tech_per integer,
-    jrn_ech date,
-    jr_ech date,
-    jr_rapt text,
-    jr_valid boolean,
-    jr_opid integer,
-    jr_c_opid integer,
-    jr_pj oid,
-    jr_pj_name text,
-    jr_pj_type text,
-    del_jrn_date timestamp without time zone,
-    jr_pj_number text,
-    dj_id integer NOT NULL
-);
-CREATE TABLE del_jrnx (
-    j_id integer NOT NULL,
-    j_date date,
-    j_montant numeric(20,4),
-    j_poste account_type,
-    j_grpt integer,
-    j_rapt text,
-    j_jrn_def integer,
-    j_debit boolean,
-    j_text text,
-    j_centralized boolean,
-    j_internal text,
-    j_tech_user text,
-    j_tech_date timestamp without time zone,
-    j_tech_per integer,
-    j_qcode text,
-    djx_id integer NOT NULL,
-    f_id bigint
-);
-CREATE TABLE document (
-    d_id integer DEFAULT nextval('document_d_id_seq'::regclass) NOT NULL,
-    ag_id integer NOT NULL,
-    d_lob oid,
-    d_number bigint NOT NULL,
-    d_filename text,
-    d_mimetype text,
-    d_description text
-);
-CREATE TABLE document_modele (
-    md_id integer DEFAULT nextval('document_modele_md_id_seq'::regclass) NOT 
NULL,
-    md_name text NOT NULL,
-    md_lob oid,
-    md_type integer NOT NULL,
-    md_filename text,
-    md_mimetype text,
-    md_affect character varying(3) NOT NULL
-);
-CREATE TABLE document_state (
-    s_id integer DEFAULT nextval('document_state_s_id_seq'::regclass) NOT NULL,
-    s_value character varying(50) NOT NULL,
-    s_status character(1)
-);
-CREATE TABLE document_type (
-    dt_id integer DEFAULT nextval('document_type_dt_id_seq'::regclass) NOT 
NULL,
-    dt_value character varying(80),
-    dt_prefix text
-);
-CREATE TABLE extension (
-    ex_id integer NOT NULL,
-    ex_name character varying(30) NOT NULL,
-    ex_code character varying(15) NOT NULL,
-    ex_desc character varying(250),
-    ex_file character varying NOT NULL,
-    ex_enable "char" DEFAULT 'Y'::"char" NOT NULL
-);
-CREATE TABLE fiche (
-    f_id integer DEFAULT nextval(('s_fiche'::text)::regclass) NOT NULL,
-    fd_id integer
-);
-CREATE TABLE fiche_def (
-    fd_id integer DEFAULT nextval(('s_fdef'::text)::regclass) NOT NULL,
-    fd_class_base text,
-    fd_label text NOT NULL,
-    fd_create_account boolean DEFAULT false,
-    frd_id integer NOT NULL,
-    fd_description text
-);
-CREATE TABLE fiche_def_ref (
-    frd_id integer DEFAULT nextval(('s_fiche_def_ref'::text)::regclass) NOT 
NULL,
-    frd_text text,
-    frd_class_base account_type
-);
-CREATE TABLE fiche_detail (
-    jft_id integer DEFAULT nextval(('s_jnt_fic_att_value'::text)::regclass) 
NOT NULL,
-    f_id integer,
-    ad_id integer,
-    ad_value text
-);
-CREATE TABLE forecast (
-    f_id integer NOT NULL,
-    f_name text NOT NULL,
-    f_start_date bigint,
-    f_end_date bigint
-);
-CREATE TABLE forecast_cat (
-    fc_id integer NOT NULL,
-    fc_desc text NOT NULL,
-    f_id bigint,
-    fc_order integer DEFAULT 0 NOT NULL
-);
-CREATE TABLE forecast_item (
-    fi_id integer NOT NULL,
-    fi_text text,
-    fi_account text,
-    fi_card integer,
-    fi_order integer,
-    fc_id integer,
-    fi_amount numeric(20,4) DEFAULT 0,
-    fi_debit "char" DEFAULT 'd'::"char" NOT NULL,
-    fi_pid integer
-);
-CREATE TABLE form (
-    fo_id integer DEFAULT nextval(('s_form'::text)::regclass) NOT NULL,
-    fo_fr_id integer,
-    fo_pos integer,
-    fo_label text,
-    fo_formula text
-);
-CREATE TABLE formdef (
-    fr_id integer DEFAULT nextval(('s_formdef'::text)::regclass) NOT NULL,
-    fr_label text
-);
-CREATE TABLE groupe_analytique (
-    ga_id character varying(10) NOT NULL,
-    pa_id integer,
-    ga_description text
-);
-CREATE TABLE info_def (
-    id_type text NOT NULL,
-    id_description text
-);
-CREATE TABLE jnt_fic_attr (
-    fd_id integer,
-    ad_id integer,
-    jnt_id bigint DEFAULT nextval('s_jnt_id'::regclass) NOT NULL,
-    jnt_order integer NOT NULL
-);
-CREATE TABLE jnt_letter (
-    jl_id integer NOT NULL,
-    jl_amount_deb numeric(20,4)
-);
-CREATE TABLE jrn (
-    jr_id integer DEFAULT nextval(('s_jrn'::text)::regclass) NOT NULL,
-    jr_def_id integer NOT NULL,
-    jr_montant numeric(20,4) NOT NULL,
-    jr_comment text,
-    jr_date date,
-    jr_grpt_id integer NOT NULL,
-    jr_internal text,
-    jr_tech_date timestamp without time zone DEFAULT now() NOT NULL,
-    jr_tech_per integer NOT NULL,
-    jrn_ech date,
-    jr_ech date,
-    jr_rapt text,
-    jr_valid boolean DEFAULT true,
-    jr_opid integer,
-    jr_c_opid integer,
-    jr_pj oid,
-    jr_pj_name text,
-    jr_pj_type text,
-    jr_pj_number text,
-    jr_mt text,
-    jr_date_paid date
-);
-CREATE TABLE jrn_def (
-    jrn_def_id integer DEFAULT nextval(('s_jrn_def'::text)::regclass) NOT NULL,
-    jrn_def_name text NOT NULL,
-    jrn_def_class_deb text,
-    jrn_def_class_cred text,
-    jrn_def_fiche_deb text,
-    jrn_def_fiche_cred text,
-    jrn_deb_max_line integer DEFAULT 1,
-    jrn_cred_max_line integer DEFAULT 1,
-    jrn_def_ech boolean DEFAULT false,
-    jrn_def_ech_lib text,
-    jrn_def_type character(3) NOT NULL,
-    jrn_def_code text NOT NULL,
-    jrn_def_pj_pref text,
-    jrn_def_bank bigint,
-    jrn_def_num_op integer,
-    jrn_def_description text
-);
-CREATE TABLE jrn_info (
-    ji_id integer NOT NULL,
-    jr_id integer NOT NULL,
-    id_type text NOT NULL,
-    ji_value text
-);
-CREATE TABLE jrn_note (
-    n_id integer NOT NULL,
-    n_text text,
-    jr_id bigint NOT NULL
-);
-CREATE TABLE jrn_periode (
-    jrn_def_id integer NOT NULL,
-    p_id integer NOT NULL,
-    status text
-);
-CREATE TABLE jrn_rapt (
-    jra_id integer DEFAULT nextval(('s_jrn_rapt'::text)::regclass) NOT NULL,
-    jr_id integer NOT NULL,
-    jra_concerned integer NOT NULL
-);
-CREATE TABLE jrn_type (
-    jrn_type_id character(3) NOT NULL,
-    jrn_desc text
-);
-CREATE TABLE jrnx (
-    j_id integer DEFAULT nextval(('s_jrn_op'::text)::regclass) NOT NULL,
-    j_date date DEFAULT now(),
-    j_montant numeric(20,4) DEFAULT 0,
-    j_poste account_type NOT NULL,
-    j_grpt integer NOT NULL,
-    j_rapt text,
-    j_jrn_def integer NOT NULL,
-    j_debit boolean DEFAULT true,
-    j_text text,
-    j_centralized boolean DEFAULT false,
-    j_internal text,
-    j_tech_user text NOT NULL,
-    j_tech_date timestamp without time zone DEFAULT now() NOT NULL,
-    j_tech_per integer NOT NULL,
-    j_qcode text,
-    f_id bigint
-);
-CREATE TABLE key_distribution (
-    kd_id integer NOT NULL,
-    kd_name text,
-    kd_description text
-);
-CREATE TABLE key_distribution_activity (
-    ka_id integer NOT NULL,
-    ke_id bigint NOT NULL,
-    po_id bigint,
-    pa_id bigint NOT NULL
-);
-CREATE TABLE key_distribution_detail (
-    ke_id integer NOT NULL,
-    kd_id bigint NOT NULL,
-    ke_row integer NOT NULL,
-    ke_percent numeric(20,4) NOT NULL
-);
-CREATE TABLE key_distribution_ledger (
-    kl_id integer NOT NULL,
-    kd_id bigint NOT NULL,
-    jrn_def_id bigint NOT NULL
-);
-CREATE TABLE letter_cred (
-    lc_id integer NOT NULL,
-    j_id bigint NOT NULL,
-    jl_id bigint NOT NULL
-);
-CREATE TABLE letter_deb (
-    ld_id integer NOT NULL,
-    j_id bigint NOT NULL,
-    jl_id bigint NOT NULL
-);
-CREATE TABLE link_action_type (
-    l_id bigint NOT NULL,
-    l_desc character varying
-);
-CREATE TABLE menu_default (
-    md_id integer NOT NULL,
-    md_code text NOT NULL,
-    me_code text NOT NULL
-);
-CREATE TABLE menu_ref (
-    me_code text NOT NULL,
-    me_menu text,
-    me_file text,
-    me_url text,
-    me_description text,
-    me_parameter text,
-    me_javascript text,
-    me_type character varying(2),
-    me_description_etendue text
-);
-CREATE TABLE mod_payment (
-    mp_id integer NOT NULL,
-    mp_lib text NOT NULL,
-    mp_jrn_def_id integer NOT NULL,
-    mp_fd_id bigint,
-    mp_qcode text,
-    jrn_def_id bigint
-);
-CREATE TABLE op_predef (
-    od_id integer DEFAULT nextval('op_def_op_seq'::regclass) NOT NULL,
-    jrn_def_id integer NOT NULL,
-    od_name text NOT NULL,
-    od_item integer NOT NULL,
-    od_jrn_type text NOT NULL,
-    od_direct boolean NOT NULL,
-    od_description text
-);
-CREATE TABLE op_predef_detail (
-    opd_id integer DEFAULT nextval('op_predef_detail_opd_id_seq'::regclass) 
NOT NULL,
-    od_id integer NOT NULL,
-    opd_poste text NOT NULL,
-    opd_amount numeric(20,4),
-    opd_tva_id integer,
-    opd_quantity numeric(20,4),
-    opd_debit boolean NOT NULL,
-    opd_tva_amount numeric(20,4),
-    opd_comment text,
-    opd_qc boolean
-);
-CREATE TABLE operation_analytique (
-    oa_id integer DEFAULT nextval('historique_analytique_ha_id_seq'::regclass) 
NOT NULL,
-    po_id integer NOT NULL,
-    oa_amount numeric(20,4) NOT NULL,
-    oa_description text,
-    oa_debit boolean DEFAULT true NOT NULL,
-    j_id integer,
-    oa_group integer DEFAULT nextval('s_oa_group'::regclass) NOT NULL,
-    oa_date date NOT NULL,
-    oa_row integer,
-    oa_jrnx_id_source bigint,
-    oa_positive character(1) DEFAULT 'Y'::bpchar NOT NULL,
-    CONSTRAINT operation_analytique_oa_amount_check CHECK ((oa_amount >= 
(0)::numeric))
-);
-CREATE TABLE parameter (
-    pr_id text NOT NULL,
-    pr_value text
-);
-CREATE TABLE parm_code (
-    p_code text NOT NULL,
-    p_value text,
-    p_comment text
-);
-CREATE TABLE parm_money (
-    pm_id integer DEFAULT nextval(('s_currency'::text)::regclass),
-    pm_code character(3) NOT NULL,
-    pm_rate numeric(20,4)
-);
-CREATE TABLE parm_periode (
-    p_id integer DEFAULT nextval(('s_periode'::text)::regclass) NOT NULL,
-    p_start date NOT NULL,
-    p_end date NOT NULL,
-    p_exercice text DEFAULT to_char(now(), 'YYYY'::text) NOT NULL,
-    p_closed boolean DEFAULT false,
-    p_central boolean DEFAULT false,
-    CONSTRAINT parm_periode_check CHECK ((p_end >= p_start))
-);
-CREATE TABLE parm_poste (
-    p_value account_type NOT NULL,
-    p_type text NOT NULL
-);
-CREATE TABLE plan_analytique (
-    pa_id integer DEFAULT nextval('plan_analytique_pa_id_seq'::regclass) NOT 
NULL,
-    pa_name text DEFAULT 'Sans Nom'::text NOT NULL,
-    pa_description text
-);
-CREATE TABLE poste_analytique (
-    po_id integer DEFAULT nextval('poste_analytique_po_id_seq'::regclass) NOT 
NULL,
-    po_name text NOT NULL,
-    pa_id integer NOT NULL,
-    po_amount numeric(20,4) DEFAULT 0.0 NOT NULL,
-    po_description text,
-    ga_id character varying(10)
-);
-CREATE TABLE profile (
-    p_name text NOT NULL,
-    p_id integer NOT NULL,
-    p_desc text,
-    with_calc boolean DEFAULT true,
-    with_direct_form boolean DEFAULT true
-);
-CREATE TABLE profile_menu (
-    pm_id integer NOT NULL,
-    me_code text,
-    me_code_dep text,
-    p_id integer,
-    p_order integer,
-    p_type_display text NOT NULL,
-    pm_default integer,
-    pm_id_dep bigint
-);
-CREATE TABLE profile_menu_type (
-    pm_type text NOT NULL,
-    pm_desc text
-);
-CREATE TABLE profile_sec_repository (
-    ur_id bigint NOT NULL,
-    p_id bigint,
-    r_id bigint,
-    ur_right character(1),
-    CONSTRAINT user_sec_profile_ur_right_check CHECK ((ur_right = ANY 
(ARRAY['R'::bpchar, 'W'::bpchar])))
-);
-CREATE TABLE profile_user (
-    user_name text NOT NULL,
-    pu_id integer NOT NULL,
-    p_id integer
-);
-CREATE TABLE quant_fin (
-    qf_id bigint NOT NULL,
-    qf_bank bigint,
-    jr_id bigint,
-    qf_other bigint,
-    qf_amount numeric(20,4) DEFAULT 0
-);
-CREATE TABLE quant_purchase (
-    qp_id integer DEFAULT nextval(('s_quantity'::text)::regclass) NOT NULL,
-    qp_internal text,
-    j_id integer NOT NULL,
-    qp_fiche integer NOT NULL,
-    qp_quantite numeric(20,4) NOT NULL,
-    qp_price numeric(20,4),
-    qp_vat numeric(20,4) DEFAULT 0.0,
-    qp_vat_code integer,
-    qp_nd_amount numeric(20,4) DEFAULT 0.0,
-    qp_nd_tva numeric(20,4) DEFAULT 0.0,
-    qp_nd_tva_recup numeric(20,4) DEFAULT 0.0,
-    qp_supplier integer NOT NULL,
-    qp_valid character(1) DEFAULT 'Y'::bpchar NOT NULL,
-    qp_dep_priv numeric(20,4) DEFAULT 0.0,
-    qp_vat_sided numeric(20,4) DEFAULT 0.0,
-    qp_unit numeric(20,4) DEFAULT 0
-);
-CREATE TABLE quant_sold (
-    qs_id integer DEFAULT nextval(('s_quantity'::text)::regclass) NOT NULL,
-    qs_internal text,
-    qs_fiche integer NOT NULL,
-    qs_quantite numeric(20,4) NOT NULL,
-    qs_price numeric(20,4),
-    qs_vat numeric(20,4),
-    qs_vat_code integer,
-    qs_client integer NOT NULL,
-    qs_valid character(1) DEFAULT 'Y'::bpchar NOT NULL,
-    j_id integer NOT NULL,
-    qs_vat_sided numeric(20,4) DEFAULT 0.0,
-    qs_unit numeric(20,4) DEFAULT 0
-);
-CREATE TABLE stock_change (
-    c_id bigint NOT NULL,
-    c_comment text,
-    c_date date,
-    tech_user text,
-    r_id bigint,
-    tech_date time without time zone DEFAULT now() NOT NULL
-);
-CREATE TABLE stock_goods (
-    sg_id integer DEFAULT nextval(('s_stock_goods'::text)::regclass) NOT NULL,
-    j_id integer,
-    f_id integer,
-    sg_code text,
-    sg_quantity numeric(8,4) DEFAULT 0,
-    sg_type character(1) DEFAULT 'c'::bpchar NOT NULL,
-    sg_date date,
-    sg_tech_date date DEFAULT now(),
-    sg_tech_user text,
-    sg_comment character varying(80),
-    sg_exercice character varying(4),
-    r_id bigint,
-    c_id bigint,
-    CONSTRAINT stock_goods_sg_type CHECK (((sg_type = 'c'::bpchar) OR (sg_type 
= 'd'::bpchar)))
-);
-CREATE TABLE stock_repository (
-    r_id bigint NOT NULL,
-    r_name text,
-    r_adress text,
-    r_country text,
-    r_city text,
-    r_phone text
-);
-CREATE TABLE tags (
-    t_id integer NOT NULL,
-    t_tag text NOT NULL,
-    t_description text
-);
-CREATE TABLE tmp_pcmn (
-    pcm_val account_type NOT NULL,
-    pcm_lib text,
-    pcm_val_parent account_type DEFAULT 0,
-    pcm_type text
-);
-CREATE TABLE tmp_stockgood (
-    s_id bigint NOT NULL,
-    s_date timestamp without time zone DEFAULT now()
-);
-CREATE TABLE tmp_stockgood_detail (
-    d_id bigint NOT NULL,
-    s_id bigint,
-    sg_code text,
-    s_qin numeric(20,4),
-    s_qout numeric(20,4),
-    r_id bigint,
-    f_id bigint
-);
-CREATE TABLE todo_list (
-    tl_id integer DEFAULT nextval('todo_list_tl_id_seq'::regclass) NOT NULL,
-    tl_date date NOT NULL,
-    tl_title text NOT NULL,
-    tl_desc text,
-    use_login text NOT NULL,
-    is_public character(1) DEFAULT 'N'::bpchar NOT NULL,
-    CONSTRAINT ck_is_public CHECK ((is_public = ANY (ARRAY['Y'::bpchar, 
'N'::bpchar])))
-);
-CREATE TABLE todo_list_shared (
-    id integer NOT NULL,
-    todo_list_id integer NOT NULL,
-    use_login text NOT NULL
-);
-CREATE TABLE tool_uos (
-    uos_value bigint DEFAULT nextval('uos_pk_seq'::regclass) NOT NULL
-);
-CREATE TABLE tva_rate (
-    tva_id integer DEFAULT nextval('s_tva'::regclass) NOT NULL,
-    tva_label text NOT NULL,
-    tva_rate numeric(8,4) DEFAULT 0.0 NOT NULL,
-    tva_comment text,
-    tva_poste text,
-    tva_both_side integer DEFAULT 0
-);
-CREATE TABLE user_local_pref (
-    user_id text NOT NULL,
-    parameter_type text NOT NULL,
-    parameter_value text
-);
-CREATE TABLE user_sec_act (
-    ua_id integer DEFAULT nextval(('s_user_act'::text)::regclass) NOT NULL,
-    ua_login text,
-    ua_act_id integer
-);
-CREATE TABLE user_sec_action_profile (
-    ua_id bigint NOT NULL,
-    p_id bigint,
-    p_granted bigint,
-    ua_right character(1),
-    CONSTRAINT user_sec_action_profile_ua_right_check CHECK ((ua_right = ANY 
(ARRAY['R'::bpchar, 'W'::bpchar])))
-);
-CREATE TABLE user_sec_jrn (
-    uj_id integer DEFAULT nextval(('s_user_jrn'::text)::regclass) NOT NULL,
-    uj_login text,
-    uj_jrn_id integer,
-    uj_priv text
-);
-CREATE TABLE version (
-    val integer
-);
diff --git a/include/sql/mod1/view.sql b/include/sql/mod1/view.sql
index c74df0a..e69de29 100644
--- a/include/sql/mod1/view.sql
+++ b/include/sql/mod1/view.sql
@@ -1,30 +0,0 @@
-CREATE VIEW v_all_menu AS
-    SELECT pm.me_code, pm.pm_id, pm.me_code_dep, pm.p_order, 
pm.p_type_display, p.p_name, p.p_desc, mr.me_menu, mr.me_file, mr.me_url, 
mr.me_parameter, mr.me_javascript, mr.me_type, pm.p_id, mr.me_description FROM 
((profile_menu pm JOIN profile p ON ((p.p_id = pm.p_id))) JOIN menu_ref mr 
USING (me_code)) ORDER BY pm.p_order;
-CREATE VIEW vw_fiche_attr AS
-    SELECT a.f_id, a.fd_id, a.ad_value AS vw_name, k.ad_value AS 
vw_first_name, b.ad_value AS vw_sell, c.ad_value AS vw_buy, d.ad_value AS 
tva_code, tva_rate.tva_id, tva_rate.tva_rate, tva_rate.tva_label, e.ad_value AS 
vw_addr, f.ad_value AS vw_cp, j.ad_value AS quick_code, h.ad_value AS 
vw_description, i.ad_value AS tva_num, fiche_def.frd_id, l.ad_value AS 
accounting FROM (((((((((((((SELECT fiche.f_id, fiche.fd_id, 
fiche_detail.ad_value FROM (fiche LEFT JOIN fiche_detail USING (f_id))  [...]
-CREATE VIEW vw_fiche_name AS
-    SELECT fiche_detail.f_id, fiche_detail.ad_value AS name FROM fiche_detail 
WHERE (fiche_detail.ad_id = 1);
-CREATE VIEW v_detail_purchase AS
-    WITH m AS (SELECT sum(quant_purchase.qp_price) AS htva, 
sum(quant_purchase.qp_vat) AS tot_vat, sum(quant_purchase.qp_vat_sided) AS 
tot_tva_np, jrn.jr_id FROM ((quant_purchase JOIN jrnx USING (j_id)) JOIN jrn ON 
((jrnx.j_grpt = jrn.jr_grpt_id))) GROUP BY jrn.jr_id) SELECT jrn.jr_id, 
jrn.jr_date, jrn.jr_date_paid, jrn.jr_ech, jrn.jr_tech_per, jrn.jr_comment, 
jrn.jr_pj_number, jrn.jr_internal, jrn.jr_def_id, jrnx.j_poste, jrnx.j_text, 
jrnx.j_qcode, quant_purchase.qp_fiche AS item_card,  [...]
-CREATE VIEW v_detail_sale AS
-    WITH m AS (SELECT sum(quant_sold.qs_price) AS htva, sum(quant_sold.qs_vat) 
AS tot_vat, sum(quant_sold.qs_vat_sided) AS tot_tva_np, jrn.jr_id FROM 
((quant_sold JOIN jrnx USING (j_id)) JOIN jrn ON ((jrnx.j_grpt = 
jrn.jr_grpt_id))) GROUP BY jrn.jr_id) SELECT jrn.jr_id, jrn.jr_date, 
jrn.jr_date_paid, jrn.jr_ech, jrn.jr_tech_per, jrn.jr_comment, 
jrn.jr_pj_number, jrn.jr_internal, jrn.jr_def_id, jrnx.j_poste, jrnx.j_text, 
jrnx.j_qcode, quant_sold.qs_fiche AS item_card, a.name AS item_name, [...]
-CREATE VIEW v_menu_dependency AS
-    WITH t_menu AS (SELECT pm.pm_id, mr.me_menu, pm.me_code, pm.me_code_dep, 
pm.p_type_display, mr.me_file, mr.me_javascript, mr.me_description, 
mr.me_description_etendue, p.p_id FROM ((profile_menu pm JOIN profile p ON 
((p.p_id = pm.p_id))) JOIN menu_ref mr USING (me_code))) SELECT DISTINCT 
((COALESCE((v3.me_code || '/'::text), ''::text) || COALESCE(v2.me_code, 
''::text)) || CASE WHEN (v2.me_code IS NULL) THEN COALESCE(v1.me_code, 
''::text) WHEN (v2.me_code IS NOT NULL) THEN COALESCE((' [...]
-CREATE VIEW v_menu_description AS
-    WITH t_menu AS (SELECT pm.pm_id, pm.pm_id_dep, pm.p_id, mr.me_menu, 
pm.me_code, pm.me_code_dep, pm.p_type_display, pu.user_name, mr.me_file, 
mr.me_javascript, mr.me_description, mr.me_description_etendue FROM 
(((profile_menu pm JOIN profile_user pu ON ((pu.p_id = pm.p_id))) JOIN profile 
p ON ((p.p_id = pm.p_id))) JOIN menu_ref mr USING (me_code))) SELECT DISTINCT 
((COALESCE((v3.me_code || '/'::text), ''::text) || COALESCE(v2.me_code, 
''::text)) || CASE WHEN (v2.me_code IS NULL) THEN  [...]
-CREATE VIEW v_menu_description_favori AS
-    WITH t_menu AS (SELECT mr.me_menu, pm.me_code, pm.me_code_dep, 
pm.p_type_display, pu.user_name, mr.me_file, mr.me_javascript, 
mr.me_description, mr.me_description_etendue FROM (((profile_menu pm JOIN 
profile_user pu ON ((pu.p_id = pm.p_id))) JOIN profile p ON ((p.p_id = 
pm.p_id))) JOIN menu_ref mr USING (me_code))) SELECT DISTINCT 
((COALESCE((v3.me_code || '/'::text), ''::text) || COALESCE(v2.me_code, 
''::text)) || CASE WHEN (v2.me_code IS NULL) THEN COALESCE(v1.me_code, 
''::text) WH [...]
-CREATE VIEW v_menu_profile AS
-    WITH t_menu AS (SELECT pm.pm_id, pm.pm_id_dep, pm.me_code, pm.me_code_dep, 
pm.p_type_display, pm.p_id FROM (profile_menu pm JOIN profile p ON ((p.p_id = 
pm.p_id)))) SELECT DISTINCT ((COALESCE((v3.me_code || '/'::text), ''::text) || 
COALESCE(v2.me_code, ''::text)) || CASE WHEN (v2.me_code IS NULL) THEN 
COALESCE(v1.me_code, ''::text) WHEN (v2.me_code IS NOT NULL) THEN 
COALESCE(('/'::text || v1.me_code), ''::text) ELSE NULL::text END) AS code, 
v3.p_type_display, COALESCE(v3.pm_id, 0) AS [...]
-CREATE VIEW v_quant_detail AS
-    WITH quant AS (SELECT quant_purchase.j_id, quant_purchase.qp_fiche AS 
fiche_id, quant_purchase.qp_supplier AS tiers, quant_purchase.qp_vat AS 
vat_amount, quant_purchase.qp_price AS price, quant_purchase.qp_vat_code AS 
vat_code, quant_purchase.qp_dep_priv AS dep_priv, quant_purchase.qp_nd_tva AS 
nd_tva, quant_purchase.qp_nd_tva_recup AS nd_tva_recup, 
quant_purchase.qp_nd_amount AS nd_amount, quant_purchase.qp_vat_sided AS 
vat_sided FROM quant_purchase UNION ALL SELECT quant_sold.j_id, [...]
-CREATE VIEW vw_client AS
-    SELECT fiche.f_id, a1.ad_value AS name, a.ad_value AS quick_code, 
b.ad_value AS tva_num, c.ad_value AS poste_comptable, d.ad_value AS rue, 
e.ad_value AS code_postal, f.ad_value AS pays, g.ad_value AS telephone, 
h.ad_value AS email FROM (((((((((((fiche JOIN fiche_def USING (fd_id)) JOIN 
fiche_def_ref USING (frd_id)) LEFT JOIN (SELECT fiche_detail.jft_id, 
fiche_detail.f_id, fiche_detail.ad_id, fiche_detail.ad_value FROM fiche_detail 
WHERE (fiche_detail.ad_id = 1)) a1 USING (f_id)) LEF [...]
-CREATE VIEW vw_fiche_def AS
-    SELECT jnt_fic_attr.fd_id, jnt_fic_attr.ad_id, attr_def.ad_text, 
fiche_def.fd_class_base, fiche_def.fd_label, fiche_def.fd_create_account, 
fiche_def.frd_id FROM ((fiche_def JOIN jnt_fic_attr USING (fd_id)) JOIN 
attr_def ON ((attr_def.ad_id = jnt_fic_attr.ad_id)));
-CREATE VIEW vw_fiche_min AS
-    SELECT attr_min.frd_id, attr_min.ad_id, attr_def.ad_text, 
fiche_def_ref.frd_text, fiche_def_ref.frd_class_base FROM ((attr_min JOIN 
attr_def USING (ad_id)) JOIN fiche_def_ref USING (frd_id));
-CREATE VIEW vw_poste_qcode AS
-    SELECT c.f_id, a.ad_value AS j_poste, b.ad_value AS j_qcode FROM ((fiche c 
LEFT JOIN (SELECT fiche_detail.f_id, fiche_detail.ad_value FROM fiche_detail 
WHERE (fiche_detail.ad_id = 5)) a USING (f_id)) LEFT JOIN (SELECT 
fiche_detail.f_id, fiche_detail.ad_value FROM fiche_detail WHERE 
(fiche_detail.ad_id = 23)) b USING (f_id));
-CREATE VIEW vw_supplier AS
-    SELECT fiche.f_id, a1.ad_value AS name, a.ad_value AS quick_code, 
b.ad_value AS tva_num, c.ad_value AS poste_comptable, d.ad_value AS rue, 
e.ad_value AS code_postal, f.ad_value AS pays, g.ad_value AS telephone, 
h.ad_value AS email FROM (((((((((((fiche JOIN fiche_def USING (fd_id)) JOIN 
fiche_def_ref USING (frd_id)) LEFT JOIN (SELECT fiche_detail.jft_id, 
fiche_detail.f_id, fiche_detail.ad_id, fiche_detail.ad_value FROM fiche_detail 
WHERE (fiche_detail.ad_id = 1)) a1 USING (f_id)) LEF [...]
diff --git a/include/sql/mod2/make-sql b/include/sql/mod2/make-sql
index abf4e55..b543b9e 100755
--- a/include/sql/mod2/make-sql
+++ b/include/sql/mod2/make-sql
@@ -1,2 +1,29 @@
-pg_dump -O -U phpcompta -D -a -O ${DOMAIN}mod2 |sed -e "/^--/d" > data.sql
+pg_dump -O -U dany -s ${DOMAIN}mod1|grep -v "COMMENT ON SCHEMA public IS 
'Standard public schema';" |sed "/^--/d" > schema.sql
+awk '/SEQUENCE/,/;/  { print $0;}' < schema.sql > sequence.sql
+awk '/CREATE DOMAIN/,/;/ { print $0;}' < schema.sql > table.sql
+awk '/CREATE TABLE/,/;/ { print $0;}' < schema.sql >> table.sql
+awk '/CREATE VIEW/,/;/ { print $0;}' < schema.sql > view.sql
+awk '/INDEX/,/;/ { print $0;}' < schema.sql > index.sql
+(
+echo " SET client_encoding = 'utf8';"
+echo " SET check_function_bodies = false;"
+echo " SET client_min_messages = warning;"
+echo "SET search_path = public, pg_catalog;"
+)> constraint.sql
+
+
+awk '/ALTER TABLE/,/;/ { print $0;}' < schema.sql >> constraint.sql
+awk '/COMMENT ON CONSTRAINT/,/;/ { print $0;}' < schema.sql >> constraint.sql
+
+# function in XML
+## awk 'BEGIN{print "<PROCEDURES>";} /CREATE FUNCTION/,/\$\$;/ { if (/CREATE 
FUNCTION/) {print "<procedure>";} if (/\$\$;/) {print "</procedure>";} print 
$0;} END { print "</PROCEDURES>";}' < schema.sql 
+awk '/CREATE FUNCTION/,/\$\$;/ { print $0;}' < schema.sql > function.sql
+awk '/COMMENT/,/;/ {print $0;}' < schema.sql > comment.sql
+
+sed -i -e "/ALTER TABLE.*/d" -e "/COMMENT ON CONSTRAINT/d" -e "/ADD 
CONSTRAINT/d" -e "/CREATE PROCEDURAL/d" schema.sql
+
+grep setval schema.sql >> sequence.sql
+echo "set search_path = public, comptaproc,pg_catalog ;" > data.sql
+pg_dump -O -U dany --data-only --column-inserts  -O ${DOMAIN}mod1 |sed 
"/^--/d" | sed -e "/SET search_path/d" >> data.sql
+
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]