diff --git a/include/lib/database.class.php b/include/lib/database.class.php index 3b9b40993..d217139f4 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 e69de29bb..3eab7e7c7 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 6aa16aa8f..ca7d08fe1 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 e69de29bb..6e7c3b2c2 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 e69de29bb..92fbbfa23 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 b543b9eff..d140cff17 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 "";} /CREATE FUNCTION/,/\$\$;/ { if (/CREATE FUNCTION/) {print "";} if (/\$\$;/) {print "";} print $0;} END { print "";}' < 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 e69de29bb..0b3ce960e 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)) WHERE (fiche_detail.ad_id = 1)) a LEFT JOIN (SELECT fiche_detail.f_id, fiche_detail.ad_value FROM fiche_detail WHERE (fiche_detail.ad_id = 6)) b ON ((a.f_id = b.f_id))) LEFT JOIN (SELECT fiche_detail.f_id, fiche_detail.ad_value FROM fiche_detail WHERE (fiche_detail.ad_id = 7)) c ON ((a.f_id = c.f_id))) LEFT JOIN (SELECT fiche_detail.f_id, fiche_detail.ad_value FROM fiche_detail WHERE (fiche_detail.ad_id = 2)) d ON ((a.f_id = d.f_id))) LEFT JOIN (SELECT fiche_detail.f_id, fiche_detail.ad_value FROM fiche_detail WHERE (fiche_detail.ad_id = 14)) e ON ((a.f_id = e.f_id))) LEFT JOIN (SELECT fiche_detail.f_id, fiche_detail.ad_value FROM fiche_detail WHERE (fiche_detail.ad_id = 15)) f ON ((a.f_id = f.f_id))) LEFT JOIN (SELECT fiche_detail.f_id, fiche_detail.ad_value FROM fiche_detail WHERE (fiche_detail.ad_id = 23)) j ON ((a.f_id = j.f_id))) LEFT JOIN (SELECT fiche_detail.f_id, fiche_detail.ad_value FROM fiche_detail WHERE (fiche_detail.ad_id = 9)) h ON ((a.f_id = h.f_id))) LEFT JOIN (SELECT fiche_detail.f_id, fiche_detail.ad_value FROM fiche_detail WHERE (fiche_detail.ad_id = 13)) i ON ((a.f_id = i.f_id))) LEFT JOIN (SELECT fiche_detail.f_id, fiche_detail.ad_value FROM fiche_detail WHERE (fiche_detail.ad_id = 32)) k ON ((a.f_id = k.f_id))) LEFT JOIN tva_rate ON ((d.ad_value = (tva_rate.tva_id)::text))) JOIN fiche_def USING (fd_id)) LEFT JOIN (SELECT fiche_detail.f_id, fiche_detail.ad_value FROM fiche_detail WHERE (fiche_detail.ad_id = 5)) l ON ((a.f_id = l.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, a.name AS item_name, quant_purchase.qp_supplier, b.vw_name AS tiers_name, b.quick_code, tva_rate.tva_label, tva_rate.tva_comment, tva_rate.tva_both_side, quant_purchase.qp_vat_sided AS vat_sided, quant_purchase.qp_vat_code AS vat_code, quant_purchase.qp_vat AS vat, quant_purchase.qp_price AS price, quant_purchase.qp_quantite AS quantity, (quant_purchase.qp_price / quant_purchase.qp_quantite) AS price_per_unit, quant_purchase.qp_nd_amount AS non_ded_amount, quant_purchase.qp_nd_tva AS non_ded_tva, quant_purchase.qp_nd_tva_recup AS non_ded_tva_recup, m.htva, m.tot_vat, m.tot_tva_np FROM ((((((jrn JOIN jrnx ON ((jrn.jr_grpt_id = jrnx.j_grpt))) JOIN quant_purchase USING (j_id)) JOIN vw_fiche_name a ON ((quant_purchase.qp_fiche = a.f_id))) JOIN vw_fiche_attr b ON ((quant_purchase.qp_supplier = b.f_id))) JOIN tva_rate ON ((quant_purchase.qp_vat_code = tva_rate.tva_id))) JOIN m ON ((m.jr_id = jrn.jr_id))); + + + +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, quant_sold.qs_client, b.vw_name AS tiers_name, b.quick_code, tva_rate.tva_label, tva_rate.tva_comment, tva_rate.tva_both_side, quant_sold.qs_vat_sided AS vat_sided, quant_sold.qs_vat_code AS vat_code, quant_sold.qs_vat AS vat, quant_sold.qs_price AS price, quant_sold.qs_quantite AS quantity, (quant_sold.qs_price / quant_sold.qs_quantite) AS price_per_unit, m.htva, m.tot_vat, m.tot_tva_np FROM ((((((jrn JOIN jrnx ON ((jrn.jr_grpt_id = jrnx.j_grpt))) JOIN quant_sold USING (j_id)) JOIN vw_fiche_name a ON ((quant_sold.qs_fiche = a.f_id))) JOIN vw_fiche_attr b ON ((quant_sold.qs_client = b.f_id))) JOIN tva_rate ON ((quant_sold.qs_vat_code = tva_rate.tva_id))) JOIN m ON ((m.jr_id = jrn.jr_id))); + + + +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(('/'::text || v1.me_code), ''::text) ELSE NULL::text END) AS code, v1.pm_id, v1.me_code, v1.me_description, v1.me_description_etendue, v1.me_file, ('> '::text || v1.me_menu) AS v1menu, CASE WHEN (v2.pm_id IS NOT NULL) THEN v2.pm_id WHEN (v3.pm_id IS NOT NULL) THEN v3.pm_id ELSE NULL::integer END AS higher_dep, CASE WHEN (COALESCE(v3.me_menu, ''::text) <> ''::text) THEN (' > '::text || v2.me_menu) ELSE v2.me_menu END AS v2menu, v3.me_menu AS v3menu, v3.p_type_display, COALESCE(v1.me_javascript, COALESCE(v2.me_javascript, v3.me_javascript)) AS javascript, v1.p_id, v2.p_id AS v2pid, v3.p_id AS v3pid FROM ((t_menu v1 LEFT JOIN t_menu v2 ON ((v1.me_code_dep = v2.me_code))) LEFT JOIN t_menu v3 ON ((v2.me_code_dep = v3.me_code))) WHERE (((COALESCE(v2.p_id, v1.p_id) = v1.p_id) AND (COALESCE(v3.p_id, v1.p_id) = v1.p_id)) AND (v1.p_type_display <> 'P'::text)) ORDER BY v1.pm_id; + + + +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 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, v1.me_code, v1.me_description, v1.me_description_etendue, v1.me_file, v1.user_name, ('> '::text || v1.me_menu) AS v1menu, CASE WHEN (COALESCE(v3.me_menu, ''::text) <> ''::text) THEN (' > '::text || v2.me_menu) ELSE v2.me_menu END AS v2menu, v3.me_menu AS v3menu, v3.p_type_display, COALESCE(v1.me_javascript, COALESCE(v2.me_javascript, v3.me_javascript)) AS javascript, v1.pm_id, v1.pm_id_dep, v1.p_id FROM ((t_menu v1 LEFT JOIN t_menu v2 ON ((v1.me_code_dep = v2.me_code))) LEFT JOIN t_menu v3 ON ((v2.me_code_dep = v3.me_code))) WHERE ((v1.p_type_display <> 'P'::text) AND ((COALESCE(v1.me_file, ''::text) <> ''::text) OR (COALESCE(v1.me_javascript, ''::text) <> ''::text))); + + + +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) WHEN (v2.me_code IS NOT NULL) THEN COALESCE(('/'::text || v1.me_code), ''::text) ELSE NULL::text END) AS code, v1.me_code, v1.me_description, v1.me_description_etendue, v1.me_file, v1.user_name, ('> '::text || v1.me_menu) AS v1menu, CASE WHEN (COALESCE(v3.me_menu, ''::text) <> ''::text) THEN (' > '::text || v2.me_menu) ELSE v2.me_menu END AS v2menu, v3.me_menu AS v3menu, v3.p_type_display, COALESCE(v1.me_javascript, COALESCE(v2.me_javascript, v3.me_javascript)) AS javascript FROM ((t_menu v1 LEFT JOIN t_menu v2 ON ((v1.me_code_dep = v2.me_code))) LEFT JOIN t_menu v3 ON ((v2.me_code_dep = v3.me_code))) WHERE (v1.p_type_display <> 'P'::text); + + + +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 pm_id_v3, COALESCE(v2.pm_id, 0) AS pm_id_v2, v1.pm_id AS pm_id_v1, v1.p_id FROM ((t_menu v1 LEFT JOIN t_menu v2 ON ((v1.pm_id_dep = v2.pm_id))) LEFT JOIN t_menu v3 ON ((v2.pm_id_dep = v3.pm_id))) WHERE (v1.p_type_display <> 'P'::text); + + + +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, quant_sold.qs_fiche, quant_sold.qs_client, quant_sold.qs_vat, quant_sold.qs_price, quant_sold.qs_vat_code, 0, 0, 0, 0, quant_sold.qs_vat_sided FROM quant_sold) SELECT jrn.jr_id, quant.tiers, jrn_def.jrn_def_name, jrn_def.jrn_def_type, vw_fiche_name.name, jrn.jr_comment, jrn.jr_montant, sum(quant.price) AS price, quant.vat_code, sum(quant.vat_amount) AS vat_amount, sum(quant.dep_priv) AS dep_priv, sum(quant.nd_tva) AS nd_tva, sum(quant.nd_tva_recup) AS nd_tva_recup, sum(quant.nd_amount) AS nd_amount, quant.vat_sided, tva_rate.tva_label FROM (((((jrn JOIN jrnx ON ((jrnx.j_grpt = jrn.jr_grpt_id))) JOIN quant USING (j_id)) LEFT JOIN vw_fiche_name ON ((quant.tiers = vw_fiche_name.f_id))) JOIN jrn_def ON ((jrn_def.jrn_def_id = jrn.jr_def_id))) JOIN tva_rate ON ((tva_rate.tva_id = quant.vat_code))) GROUP BY jrn.jr_id, quant.tiers, jrn.jr_comment, jrn.jr_montant, quant.vat_code, quant.vat_sided, vw_fiche_name.name, jrn_def.jrn_def_name, jrn_def.jrn_def_type, tva_rate.tva_label; + + + +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)) 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 = 13)) b USING (f_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 = 23)) a USING (f_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 = 5)) c USING (f_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 = 14)) d USING (f_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 = 15)) e USING (f_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 = 16)) f USING (f_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 = 17)) g USING (f_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 = 18)) h USING (f_id)) WHERE (fiche_def_ref.frd_id = 9); + + + +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)) 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 = 13)) b USING (f_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 = 23)) a USING (f_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 = 5)) c USING (f_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 = 14)) d USING (f_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 = 15)) e USING (f_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 = 16)) f USING (f_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 = 17)) g USING (f_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 = 18)) h USING (f_id)) WHERE (fiche_def_ref.frd_id = 8); + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +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 e69de29bb..de5d6a1f3 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 e69de29bb..9a8726eb4 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 e69de29bb..c74df0a50 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)) WHERE (fiche_detail.ad_id = 1)) a LEFT JOIN (SELECT fiche_detail.f_id, fiche_detail.ad_value FROM fiche_detail WHERE (fiche_detail.ad_id = 6)) b ON ((a.f_id = b.f_id))) LEFT JOIN (SELECT fiche_detail.f_id, fiche_detail.ad_value FROM fiche_detail WHERE (fiche_detail.ad_id = 7)) c ON ((a.f_id = c.f_id))) LEFT JOIN (SELECT fiche_detail.f_id, fiche_detail.ad_value FROM fiche_detail WHERE (fiche_detail.ad_id = 2)) d ON ((a.f_id = d.f_id))) LEFT JOIN (SELECT fiche_detail.f_id, fiche_detail.ad_value FROM fiche_detail WHERE (fiche_detail.ad_id = 14)) e ON ((a.f_id = e.f_id))) LEFT JOIN (SELECT fiche_detail.f_id, fiche_detail.ad_value FROM fiche_detail WHERE (fiche_detail.ad_id = 15)) f ON ((a.f_id = f.f_id))) LEFT JOIN (SELECT fiche_detail.f_id, fiche_detail.ad_value FROM fiche_detail WHERE (fiche_detail.ad_id = 23)) j ON ((a.f_id = j.f_id))) LEFT JOIN (SELECT fiche_detail.f_id, fiche_detail.ad_value FROM fiche_detail WHERE (fiche_detail.ad_id = 9)) h ON ((a.f_id = h.f_id))) LEFT JOIN (SELECT fiche_detail.f_id, fiche_detail.ad_value FROM fiche_detail WHERE (fiche_detail.ad_id = 13)) i ON ((a.f_id = i.f_id))) LEFT JOIN (SELECT fiche_detail.f_id, fiche_detail.ad_value FROM fiche_detail WHERE (fiche_detail.ad_id = 32)) k ON ((a.f_id = k.f_id))) LEFT JOIN tva_rate ON ((d.ad_value = (tva_rate.tva_id)::text))) JOIN fiche_def USING (fd_id)) LEFT JOIN (SELECT fiche_detail.f_id, fiche_detail.ad_value FROM fiche_detail WHERE (fiche_detail.ad_id = 5)) l ON ((a.f_id = l.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, a.name AS item_name, quant_purchase.qp_supplier, b.vw_name AS tiers_name, b.quick_code, tva_rate.tva_label, tva_rate.tva_comment, tva_rate.tva_both_side, quant_purchase.qp_vat_sided AS vat_sided, quant_purchase.qp_vat_code AS vat_code, quant_purchase.qp_vat AS vat, quant_purchase.qp_price AS price, quant_purchase.qp_quantite AS quantity, (quant_purchase.qp_price / quant_purchase.qp_quantite) AS price_per_unit, quant_purchase.qp_nd_amount AS non_ded_amount, quant_purchase.qp_nd_tva AS non_ded_tva, quant_purchase.qp_nd_tva_recup AS non_ded_tva_recup, m.htva, m.tot_vat, m.tot_tva_np FROM ((((((jrn JOIN jrnx ON ((jrn.jr_grpt_id = jrnx.j_grpt))) JOIN quant_purchase USING (j_id)) JOIN vw_fiche_name a ON ((quant_purchase.qp_fiche = a.f_id))) JOIN vw_fiche_attr b ON ((quant_purchase.qp_supplier = b.f_id))) JOIN tva_rate ON ((quant_purchase.qp_vat_code = tva_rate.tva_id))) JOIN m ON ((m.jr_id = jrn.jr_id))); +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, quant_sold.qs_client, b.vw_name AS tiers_name, b.quick_code, tva_rate.tva_label, tva_rate.tva_comment, tva_rate.tva_both_side, quant_sold.qs_vat_sided AS vat_sided, quant_sold.qs_vat_code AS vat_code, quant_sold.qs_vat AS vat, quant_sold.qs_price AS price, quant_sold.qs_quantite AS quantity, (quant_sold.qs_price / quant_sold.qs_quantite) AS price_per_unit, m.htva, m.tot_vat, m.tot_tva_np FROM ((((((jrn JOIN jrnx ON ((jrn.jr_grpt_id = jrnx.j_grpt))) JOIN quant_sold USING (j_id)) JOIN vw_fiche_name a ON ((quant_sold.qs_fiche = a.f_id))) JOIN vw_fiche_attr b ON ((quant_sold.qs_client = b.f_id))) JOIN tva_rate ON ((quant_sold.qs_vat_code = tva_rate.tva_id))) JOIN m ON ((m.jr_id = jrn.jr_id))); +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(('/'::text || v1.me_code), ''::text) ELSE NULL::text END) AS code, v1.pm_id, v1.me_code, v1.me_description, v1.me_description_etendue, v1.me_file, ('> '::text || v1.me_menu) AS v1menu, CASE WHEN (v2.pm_id IS NOT NULL) THEN v2.pm_id WHEN (v3.pm_id IS NOT NULL) THEN v3.pm_id ELSE NULL::integer END AS higher_dep, CASE WHEN (COALESCE(v3.me_menu, ''::text) <> ''::text) THEN (' > '::text || v2.me_menu) ELSE v2.me_menu END AS v2menu, v3.me_menu AS v3menu, v3.p_type_display, COALESCE(v1.me_javascript, COALESCE(v2.me_javascript, v3.me_javascript)) AS javascript, v1.p_id, v2.p_id AS v2pid, v3.p_id AS v3pid FROM ((t_menu v1 LEFT JOIN t_menu v2 ON ((v1.me_code_dep = v2.me_code))) LEFT JOIN t_menu v3 ON ((v2.me_code_dep = v3.me_code))) WHERE (((COALESCE(v2.p_id, v1.p_id) = v1.p_id) AND (COALESCE(v3.p_id, v1.p_id) = v1.p_id)) AND (v1.p_type_display <> 'P'::text)) ORDER BY v1.pm_id; +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 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, v1.me_code, v1.me_description, v1.me_description_etendue, v1.me_file, v1.user_name, ('> '::text || v1.me_menu) AS v1menu, CASE WHEN (COALESCE(v3.me_menu, ''::text) <> ''::text) THEN (' > '::text || v2.me_menu) ELSE v2.me_menu END AS v2menu, v3.me_menu AS v3menu, v3.p_type_display, COALESCE(v1.me_javascript, COALESCE(v2.me_javascript, v3.me_javascript)) AS javascript, v1.pm_id, v1.pm_id_dep, v1.p_id FROM ((t_menu v1 LEFT JOIN t_menu v2 ON ((v1.me_code_dep = v2.me_code))) LEFT JOIN t_menu v3 ON ((v2.me_code_dep = v3.me_code))) WHERE ((v1.p_type_display <> 'P'::text) AND ((COALESCE(v1.me_file, ''::text) <> ''::text) OR (COALESCE(v1.me_javascript, ''::text) <> ''::text))); +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) WHEN (v2.me_code IS NOT NULL) THEN COALESCE(('/'::text || v1.me_code), ''::text) ELSE NULL::text END) AS code, v1.me_code, v1.me_description, v1.me_description_etendue, v1.me_file, v1.user_name, ('> '::text || v1.me_menu) AS v1menu, CASE WHEN (COALESCE(v3.me_menu, ''::text) <> ''::text) THEN (' > '::text || v2.me_menu) ELSE v2.me_menu END AS v2menu, v3.me_menu AS v3menu, v3.p_type_display, COALESCE(v1.me_javascript, COALESCE(v2.me_javascript, v3.me_javascript)) AS javascript FROM ((t_menu v1 LEFT JOIN t_menu v2 ON ((v1.me_code_dep = v2.me_code))) LEFT JOIN t_menu v3 ON ((v2.me_code_dep = v3.me_code))) WHERE (v1.p_type_display <> 'P'::text); +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 pm_id_v3, COALESCE(v2.pm_id, 0) AS pm_id_v2, v1.pm_id AS pm_id_v1, v1.p_id FROM ((t_menu v1 LEFT JOIN t_menu v2 ON ((v1.pm_id_dep = v2.pm_id))) LEFT JOIN t_menu v3 ON ((v2.pm_id_dep = v3.pm_id))) WHERE (v1.p_type_display <> 'P'::text); +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, quant_sold.qs_fiche, quant_sold.qs_client, quant_sold.qs_vat, quant_sold.qs_price, quant_sold.qs_vat_code, 0, 0, 0, 0, quant_sold.qs_vat_sided FROM quant_sold) SELECT jrn.jr_id, quant.tiers, jrn_def.jrn_def_name, jrn_def.jrn_def_type, vw_fiche_name.name, jrn.jr_comment, jrn.jr_montant, sum(quant.price) AS price, quant.vat_code, sum(quant.vat_amount) AS vat_amount, sum(quant.dep_priv) AS dep_priv, sum(quant.nd_tva) AS nd_tva, sum(quant.nd_tva_recup) AS nd_tva_recup, sum(quant.nd_amount) AS nd_amount, quant.vat_sided, tva_rate.tva_label FROM (((((jrn JOIN jrnx ON ((jrnx.j_grpt = jrn.jr_grpt_id))) JOIN quant USING (j_id)) LEFT JOIN vw_fiche_name ON ((quant.tiers = vw_fiche_name.f_id))) JOIN jrn_def ON ((jrn_def.jrn_def_id = jrn.jr_def_id))) JOIN tva_rate ON ((tva_rate.tva_id = quant.vat_code))) GROUP BY jrn.jr_id, quant.tiers, jrn.jr_comment, jrn.jr_montant, quant.vat_code, quant.vat_sided, vw_fiche_name.name, jrn_def.jrn_def_name, jrn_def.jrn_def_type, tva_rate.tva_label; +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)) 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 = 13)) b USING (f_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 = 23)) a USING (f_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 = 5)) c USING (f_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 = 14)) d USING (f_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 = 15)) e USING (f_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 = 16)) f USING (f_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 = 17)) g USING (f_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 = 18)) h USING (f_id)) WHERE (fiche_def_ref.frd_id = 9); +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)) 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 = 13)) b USING (f_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 = 23)) a USING (f_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 = 5)) c USING (f_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 = 14)) d USING (f_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 = 15)) e USING (f_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 = 16)) f USING (f_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 = 17)) g USING (f_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 = 18)) h USING (f_id)) WHERE (fiche_def_ref.frd_id = 8); diff --git a/scenario/create-database.php b/scenario/create-database.php new file mode 100644 index 000000000..6cd9b482f --- /dev/null +++ b/scenario/create-database.php @@ -0,0 +1,38 @@ + + +$_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');