[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Noalyss-commit] [noalyss] 105/323: Fix prob. with comment on trigger an
|
From: |
Dany De Bontridder |
|
Subject: |
[Noalyss-commit] [noalyss] 105/323: Fix prob. with comment on trigger and comment on constraint |
|
Date: |
Wed, 14 Mar 2018 17:38:33 -0400 (EDT) |
sparkyx pushed a commit to branch master
in repository noalyss.
commit b02274765c6f5649557641b54dc0c2d863429991
Author: Dany De Bontridder <address@hidden>
Date: Sun Jan 28 10:34:08 2018 +0100
Fix prob. with comment on trigger and comment on constraint
---
include/lib/database.class.php | 2 +-
include/sql/mod1/comment.sql | 192 ++
include/sql/mod1/constraint.sql | 461 +++
include/sql/mod1/function.sql | 2213 ++++++++++++++
include/sql/mod1/index.sql | 33 +
include/sql/mod1/make-sql | 5 +-
include/sql/mod1/schema.sql | 6347 +++++++++++++++++++++++++++++++++++++++
include/sql/mod1/sequence.sql | 687 +++++
include/sql/mod1/table.sql | 659 ++++
include/sql/mod1/view.sql | 30 +
scenario/create-database.php | 38 +
11 files changed, 10665 insertions(+), 2 deletions(-)
diff --git a/include/lib/database.class.php b/include/lib/database.class.php
index 3b9b409..d217139 100644
--- a/include/lib/database.class.php
+++ b/include/lib/database.class.php
@@ -353,7 +353,7 @@ class Database
else
{
// cut the semi colon
-// $buffer=str_replace(';', '', $buffer);
+ $buffer=str_replace(';', '', $buffer);
}
$sql.=$buffer;
if ( DEBUG ) fwrite($debug, $sql);
diff --git a/include/sql/mod1/comment.sql b/include/sql/mod1/comment.sql
index e69de29..3eab7e7 100644
--- a/include/sql/mod1/comment.sql
+++ b/include/sql/mod1/comment.sql
@@ -0,0 +1,192 @@
+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 6aa16aa..ca7d08f 100644
--- a/include/sql/mod1/constraint.sql
+++ b/include/sql/mod1/constraint.sql
@@ -2,3 +2,464 @@
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;
+CREATE TRIGGER action_gestion_t_insert_update BEFORE INSERT OR UPDATE ON
action_gestion FOR EACH ROW EXECUTE PROCEDURE
comptaproc.action_gestion_ins_upd();
+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();
+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();
+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();
+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();
+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();
+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();
+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 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/function.sql b/include/sql/mod1/function.sql
index e69de29..6e7c3b2 100644
--- a/include/sql/mod1/function.sql
+++ b/include/sql/mod1/function.sql
@@ -0,0 +1,2213 @@
+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,'<','<');
+ r:=replace(r,'>','>');
+ r:=replace(r,'''','"');
+ 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 e69de29..92fbbfa 100644
--- a/include/sql/mod1/index.sql
+++ b/include/sql/mod1/index.sql
@@ -0,0 +1,33 @@
+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 b543b9e..d140cff 100755
--- a/include/sql/mod1/make-sql
+++ b/include/sql/mod1/make-sql
@@ -13,14 +13,17 @@ echo "SET search_path = public, pg_catalog;"
awk '/ALTER TABLE/,/;/ { print $0;}' < schema.sql >> constraint.sql
+awk '/CREATE TRIGGER/,/;/ { print $0;}' < schema.sql >> constraint.sql
awk '/COMMENT ON CONSTRAINT/,/;/ { print $0;}' < schema.sql >> constraint.sql
+awk '/COMMENT ON TRIGGER/,/;/ { 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
+sed -i -e "/ALTER TABLE.*/d" -e "/ADD CONSTRAINT/d" -e "/CREATE PROCEDURAL/d"
-e "/CREATE TRIGGER/d" -e "/COMMENT ON CONSTRAINT/d" -e "/COMMENT ON TRIGGER/d"
schema.sql
+
grep setval schema.sql >> sequence.sql
echo "set search_path = public, comptaproc,pg_catalog ;" > data.sql
diff --git a/include/sql/mod1/schema.sql b/include/sql/mod1/schema.sql
index e69de29..0b3ce96 100644
--- a/include/sql/mod1/schema.sql
+++ b/include/sql/mod1/schema.sql
@@ -0,0 +1,6347 @@
+
+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,'<','<');
+ r:=replace(r,'>','>');
+ r:=replace(r,'''','"');
+ 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 [...]
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+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);
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+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 e69de29..de5d6a1 100644
--- a/include/sql/mod1/sequence.sql
+++ b/include/sql/mod1/sequence.sql
@@ -0,0 +1,687 @@
+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 e69de29..9a8726e 100644
--- a/include/sql/mod1/table.sql
+++ b/include/sql/mod1/table.sql
@@ -0,0 +1,659 @@
+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 e69de29..c74df0a 100644
--- a/include/sql/mod1/view.sql
+++ b/include/sql/mod1/view.sql
@@ -0,0 +1,30 @@
+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/scenario/create-database.php b/scenario/create-database.php
new file mode 100644
index 0000000..6cd9b48
--- /dev/null
+++ b/scenario/create-database.php
@@ -0,0 +1,38 @@
+<?php
+
+/*
+ * This file is part of NOALYSS.
+ *
+ * PhpCompta is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * PhpCompta is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with PhpCompta; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
+ */
+// Copyright (2018) Author Dany De Bontridder <address@hidden>
+
+$_POST['gDossier']=$gDossierLogInput;
+$_GET['gDossier']=$gDossierLogInput;
+$_REQUEST=array_merge($_GET,$_POST);
+
+/**
+ * @file
+ * @brief
+ * @param type $name Descriptionara
+ */
+$cn=new Database();
+
+$cn->exec_sql("create database ".domaine."dossier1 encoding='utf8'");
+
+$cn=new Database(1, 'dos');
+$cn->execute_script(NOALYSS_INCLUDE.'/sql/mod1/schema.sql');
+$cn->execute_script(NOALYSS_INCLUDE.'/sql/mod1/data.sql');
+$cn->execute_script(NOALYSS_INCLUDE.'/sql/mod1/constraint.sql');
- [Noalyss-commit] [noalyss] 281/323: FIN : hide disable ledger, (continued)
- [Noalyss-commit] [noalyss] 281/323: FIN : hide disable ledger, Dany De Bontridder, 2018/03/14
- [Noalyss-commit] [noalyss] 262/323: fix code, Dany De Bontridder, 2018/03/14
- [Noalyss-commit] [noalyss] 288/323: Template : can be added from ADMINISTRATION -> MODELE, Dany De Bontridder, 2018/03/14
- [Noalyss-commit] [noalyss] 316/323: CSS cosmetic : align selected cell, Dany De Bontridder, 2018/03/14
- [Noalyss-commit] [noalyss] 323/323: ANCGL Test if at least one operation is selected, Dany De Bontridder, 2018/03/14
- [Noalyss-commit] [noalyss] 293/323: CSS classic: progressBar for, Dany De Bontridder, 2018/03/14
- [Noalyss-commit] [noalyss] 216/323: Task #1539 : upgrade , install plugin , download database template, Dany De Bontridder, 2018/03/14
- [Noalyss-commit] [noalyss] 192/323: SQL : upgrade, Dany De Bontridder, 2018/03/14
- [Noalyss-commit] [noalyss] 58/323: Task #0001529: Réécriture de code , placer les icones dans Icon_Action, Dany De Bontridder, 2018/03/14
- [Noalyss-commit] [noalyss] 103/323: Adapt to Postgresl 9, Dany De Bontridder, 2018/03/14
- [Noalyss-commit] [noalyss] 105/323: Fix prob. with comment on trigger and comment on constraint,
Dany De Bontridder <=
- [Noalyss-commit] [noalyss] 100/323: Merge with stash{1}, Dany De Bontridder, 2018/03/14
- [Noalyss-commit] [noalyss] 188/323: SQL : upgrade modele, Dany De Bontridder, 2018/03/14
- [Noalyss-commit] [noalyss] 03/323: Update translation, Dany De Bontridder, 2018/03/14