diff --git a/tools/cloud_addtime.txt b/tools/cloud_addtime.txt
deleted file mode 100644
index d28befc..0000000
--- a/tools/cloud_addtime.txt
+++ /dev/null
@@ -1,34 +0,0 @@
-DELIMITER //
-
-CREATE OR REPLACE PROCEDURE cloud_addtime(
- IN date_utc DATETIME
-)
-/*
- Function : 因為所有的雲端主機, 都是存 UTC, 要 -8 換為 Taipei 時間
- Description: 1.如果有多國的來源, 這個方法並不徹底, 目前先暫用
- 2.目前測試 -8 看起來就正常
- 3.這個 stored procedure 只是單純地在 select xx日期 時, 將時間 -8 hrs, 並不會異動資料庫的內容
- 純粹是配合 Azure Cloud 主機的運作而已
- CALL cloud_addtime(NOW());
- Build Date : 2022/12/03
-
- Modify History
- Item Who Date Modify Docs
- ==== ========== ========== ================================================
- 1 Michael 2022/12/03 Init
-*/
-BEGIN
- DECLARE date_taipei DATETIME;
- DECLARE diff_hours SMALLINT;
-
- SELECT pvalue INTO diff_hours FROM sys_parameter WHERE systemid = 'sys' AND pid = 'diff_hours';
- IF diff_hours IS NULL THEN
- SET diff_hours = 8;
- END IF;
-
- SET date_taipei = DATE_ADD(date_utc, INTERVAL diff_hours HOUR);
-
- SELECT date_taipei AS result; -- You can select the result or do something else with it
-END //
-
-DELIMITER ;
diff --git a/tools/cloud_adjusttime.txt b/tools/cloud_adjusttime.txt
deleted file mode 100644
index 56b41fd..0000000
--- a/tools/cloud_adjusttime.txt
+++ /dev/null
@@ -1,35 +0,0 @@
-DELIMITER //
-
-CREATE OR REPLACE PROCEDURE cloud_adjusttime(
- IN date_utc DATETIME,
- IN base INT
-)
-/*
- Function : 因為所有的雲端主機, 都是存 UTC, 要 -8 換為 Taipei 時間, 原 cloud_addtime 的反向 udf, FullCalendar 存檔前使用
- Description: 1.如果有多國的來源, 這個方法並不徹底, 目前先暫用
- 2.目前測試 -8 看起來就正常
- 3.這個 stored procedure 只是單純地在 select xx日期 時, 將時間 -8 hrs, 並不會異動資料庫的內容
- 純粹是配合 Azure Cloud 主機的運作而已
- CALL cloud_adjusttime(NOW(), -1);
- Build Date : 2023/2/11
-
- Modify History
- Item Who Date Modify Docs
- ==== ========== ========== ================================================
- 1 Michael 2023/02/11 Init
-*/
-BEGIN
- DECLARE date_taipei DATETIME;
- DECLARE diff_hours SMALLINT;
-
- SELECT pvalue INTO diff_hours FROM sys_parameter WHERE systemid = 'sys' AND pid = 'diff_hours';
- IF diff_hours IS NULL THEN
- SET diff_hours = 8;
- END IF;
-
- SET date_taipei = DATE_ADD(date_utc, INTERVAL diff_hours * base HOUR);
-
- SELECT date_taipei AS result; -- You can select the result or do something else with it
-END //
-
-DELIMITER ;
diff --git a/tools/gf_trans_json_v7.txt b/tools/gf_trans_json_v7.txt
deleted file mode 100644
index 0b51d95..0000000
--- a/tools/gf_trans_json_v7.txt
+++ /dev/null
@@ -1,61 +0,0 @@
-DELIMITER //
-
-CREATE OR REPLACE FUNCTION `gf_trans_json_v7` (
- p_source TEXT,
- p_actions VARCHAR(1) -- C(reate) 或 U(pdate)
-)
-/*
- function : 將 amis 傳入的字串, 轉為標準 json 格式後回傳給 orm_api(配合 mariadb)
- 修改自 gf_trans_json(已不使用)
- description: 呼叫範例 SELECT gf_trans_json_v7('xxxx', 'C');
- build date : 2021/09/26
-
- modify history
- item who date modify docs
- ==== ========== ========== ================================================
- 1 michael 2021/09/26 新增
- 2 [改寫者] 2023/11/15 改寫為 MariaDB 版本並最佳化
-*/
-RETURNS TEXT
-DETERMINISTIC
-BEGIN
- DECLARE v_max INT;
- DECLARE v_now INT;
- DECLARE v_rets TEXT;
- DECLARE v_rows_pos INT;
- DECLARE v_rows_diff_pos INT;
-
- IF p_actions = 'C' THEN
- SET v_rets = SUBSTRING(p_source, 2, CHAR_LENGTH(p_source) - 1);
-
- -- step1: 先移除數字鍵 (最佳化：使用迴圈而非逐次檢查)
- SET v_now = 0;
- WHILE v_now <= 1000 DO
- IF INSTR(v_rets, CONCAT('"', v_now, '":')) > 0 THEN
- SET v_rets = REPLACE(v_rets, CONCAT('"', v_now, '":'), '');
- END IF;
- SET v_now = v_now + 1;
- END WHILE;
-
- -- 移除結尾多餘的 } 字符
- IF RIGHT(v_rets, 2) = '}}' THEN
- SET v_rets = LEFT(v_rets, CHAR_LENGTH(v_rets) - 1);
- END IF;
-
- SET v_rets = CONCAT('{[', v_rets, ']}');
- ELSEIF p_actions = 'U' THEN
- -- 找出 rows 和 rowsDiff 的位置
- SET v_rows_pos = INSTR(p_source, '"rows":');
- SET v_rows_diff_pos = INSTR(p_source, '"rowsDiff":');
-
- -- 擷取 rows 內容並格式化
- SET v_rets = SUBSTRING(p_source, 1, v_rows_diff_pos - 3);
- SET v_rets = SUBSTRING(v_rets, v_rows_pos + 8, CHAR_LENGTH(v_rets));
-
- SET v_rets = CONCAT('{[', v_rets, ']}');
- END IF;
-
- RETURN v_rets;
-END //
-
-DELIMITER ;
\ No newline at end of file
diff --git a/tools/sysexec.txt b/tools/sysexec.txt
deleted file mode 100644
index e87f70b..0000000
--- a/tools/sysexec.txt
+++ /dev/null
@@ -1,62 +0,0 @@
-DELIMITER //
-
-CREATE OR REPLACE PROCEDURE `sysexec` (
- IN p_token VARCHAR(100),
- IN p_sql LONGTEXT
-)
-/*
- function : 傳入 Insert/Update 的 sql 指令並執行
- description: 不允許 drop delete 這類的 sql 語法
- build date : 2018/05/05
-
- modify history
- item who date modify docs
- ==== ========== ========== ================================================
- 1 Michael 2018-11-05 init
- 2 [改寫者] 2023-11-15 改寫為 MariaDB 版本並最佳化
-*/
-BEGIN
- DECLARE v_userid VARCHAR(100);
- DECLARE v_exstr LONGTEXT;
- DECLARE v_code INT;
- DECLARE v_msg VARCHAR(255);
-
- -- 根據傳入的 token 取得 userid
- SELECT userid INTO v_userid FROM sys_users WHERE token = p_token LIMIT 1;
-
- IF v_userid IS NULL THEN
- SET v_code = 9;
- SET v_msg = '請先登入系統再執行!!';
-
- SELECT v_code AS code, v_msg AS msg;
- SELECT '';
- ELSEIF LOCATE('delete ', LOWER(p_sql)) > 0 OR LOCATE('drop ', LOWER(p_sql)) > 0 THEN
- SET v_code = 4;
- SET v_msg = '內含不允許執行的 sql 語法, 請重新輸入?!';
-
- SELECT v_code AS code, v_msg AS msg;
- SELECT '';
- ELSE
- BEGIN
- DECLARE EXIT HANDLER FOR SQLEXCEPTION
- BEGIN
- SET v_code = 9;
- SET v_msg = '語法有錯，請檢查語法後再重新執行!!';
-
- SELECT v_code AS code, v_msg AS msg;
- SELECT '';
- END;
-
- SET v_code = 0;
- SET v_msg = '成功執行 SQL 語法';
-
- SELECT v_code AS code, v_msg AS msg;
- SET @dynamic_sql = p_sql;
- PREPARE stmt FROM @dynamic_sql;
- EXECUTE stmt;
- DEALLOCATE PREPARE stmt;
- END;
- END IF;
-END //
-
-DELIMITER ;
\ No newline at end of file
diff --git a/tools/trans_cname.txt b/tools/trans_cname.txt
deleted file mode 100644
index 460ad34..0000000
--- a/tools/trans_cname.txt
+++ /dev/null
@@ -1,67 +0,0 @@
-DELIMITER //
-
-CREATE OR REPLACE FUNCTION `trans_cname` (
- p_fieldname VARCHAR(100),
- p_fieldcn NVARCHAR(100)
-)
-/*
- Function : 根據 zen_fields,zen_dd_erp,zen_dd 的內容, 回傳可能的中文欄位 Title
- Description: 通常是配合 sp=zen_fieldspec_best 使用
- Build Date : 2021/11/25
-
- Modify History
- Item Who Date Modify Docs
- ==== ========== ========== ================================================
- 1 Michael 2021/11/25 新增
- 2 [改寫者] 2023-11-15 改寫為 MariaDB 版本並最佳化
-*/
-RETURNS NVARCHAR(100)
-DETERMINISTIC
-BEGIN
- DECLARE v_ret NVARCHAR(100);
- DECLARE v_dd_id VARCHAR(100);
- DECLARE v_dd_name VARCHAR(100);
-
- SET v_ret = p_fieldcn;
-
- IF p_fieldcn = '' OR p_fieldname = p_fieldcn THEN
- -- 先找 zen_fields
- SELECT fieldcn INTO v_ret
- FROM zen_fields
- WHERE fieldname = p_fieldname
- AND fieldname <> fieldcn
- AND IFNULL(fieldcn, '') <> ''
- LIMIT 1;
-
- -- 新增 zen_dd_erp(原 erp)
- IF IFNULL(v_ret, '') = '' THEN
- SELECT fieldcn INTO v_ret
- FROM zen_dd_erp
- WHERE fieldname = p_fieldname
- AND fieldname <> fieldcn
- AND IFNULL(fieldcn, '') <> ''
- LIMIT 1;
- END IF;
-
- -- 再找 zen_dd
- IF IFNULL(v_ret, '') = '' THEN
- SELECT fieldname, cname INTO v_dd_id, v_dd_name
- FROM zen_dd
- WHERE LOCATE(fieldname, p_fieldname) > 0
- LIMIT 1;
-
- IF IFNULL(v_dd_id, '') <> '' THEN
- SET v_ret = REPLACE(p_fieldname, v_dd_id, v_dd_name);
- END IF;
- END IF;
- END IF;
-
- -- 實在找不到的話, 只能回傳 fieldname
- /* IF IFNULL(v_ret, '') = '' THEN
- SET v_ret = p_fieldname;
- END IF; */
-
- RETURN v_ret;
-END //
-
-DELIMITER ;
\ No newline at end of file
diff --git a/tools/usp_GetErrorInfo_v2.txt b/tools/usp_GetErrorInfo_v2.txt
deleted file mode 100644
index a315ee5..0000000
--- a/tools/usp_GetErrorInfo_v2.txt
+++ /dev/null
@@ -1,22 +0,0 @@
-DELIMITER //
-
-CREATE OR REPLACE PROCEDURE `usp_GetErrorInfo_v2`()
-/*
- 傳回簡化錯誤訊息, 通常配合 DECLARE EXIT HANDLER FOR SQLEXCEPTION 中使用
- 對應 MS-SQL 的 usp_GetErrorInfo_v2
-*/
-BEGIN
- -- 獲取錯誤資訊
- DECLARE v_err_msg TEXT;
-
- GET DIAGNOSTICS CONDITION 1
- v_err_msg = MESSAGE_TEXT;
-
- -- 返回簡化格式
- SELECT
- 1 AS code, -- 預設錯誤代碼
- v_err_msg AS msg,
- 0 AS recno;
-END //
-
-DELIMITER ;
\ No newline at end of file
diff --git a/tools/zen_bpm_define.txt b/tools/zen_bpm_define.txt
deleted file mode 100644
index ceaf8ca..0000000
--- a/tools/zen_bpm_define.txt
+++ /dev/null
@@ -1,121 +0,0 @@
-DELIMITER //
-
-CREATE OR REPLACE FUNCTION zen_bpm_define (
- p_FunctionTag VARCHAR(100),
- p_FunctionTag_org VARCHAR(100),
- p_pk VARCHAR(100),
- p_ip VARCHAR(100), -- ijѥ~ǤJγ]ww]ȡAMariaDB ѼƤ䴩ܼƷw]
- p_db VARCHAR(100)
-)
-RETURNS LONGTEXT
-LANGUAGE SQL
-DETERMINISTIC
-BEGIN
- DECLARE v_rets LONGTEXT;
- DECLARE v_crlf CHAR(1);
- DECLARE v_type CHAR(1);
-
- -- ]wŸ [cite: 3, 4]
- SET v_crlf = CHAR(10);
-
- -- P_O_ñ֥ view
- IF INSTR(p_FunctionTag_org, '_') > 0 THEN
- SET v_type = 'Y';
- ELSE
- SET v_type = 'N';
- END IF;
-
- -- }lզX JSON r [cite: 5]
- SET v_rets = CONCAT(
- ' {', v_crlf,
- ' "type": "button-toolbar",', v_crlf,
- ' "buttons": [', v_crlf
- );
-
- -- ھ @type Mwse [cite: 5]
- IF v_type = 'N' THEN
- -- Wes [cite: 5, 6]
- SET v_rets = CONCAT(v_rets,
- ' {', v_crlf,
- ' "type": "button",', v_crlf,
- ' "label": "We",', v_crlf,
- ' "actionType": "ajax",', v_crlf,
- ' "confirmText": "TwnWeH",', v_crlf,
- ' "disabledOn": "${flow_status != ''N''}",', v_crlf,
- ' "api": {', v_crlf,
- ' "method": "post",', v_crlf,
- ' "url": "${ls:base_ip}/xapi/v3/${ls:base_db}/bpmm02_spread/1/",', v_crlf,
- ' "data": {', v_crlf,
- ' "para01": "', p_FunctionTag, '",', v_crlf,
- ' "para02": "${personid}",', v_crlf,
- ' "para03": "${', p_pk, '}"', v_crlf,
- ' },', v_crlf,
- ' "dataType": "form"', v_crlf,
- ' },', v_crlf,
- ' "level": "primary"', v_crlf,
- ' },', v_crlf
- );
- ELSE
- -- PNB^B@os (ñּҦ) [cite: 10, 15, 20]
- SET v_rets = CONCAT(v_rets,
- -- PN [cite: 11, 12]
- ' {', v_crlf,
- ' "type": "button", "label": "PN", "actionType": "dialog", "level": "success",', v_crlf,
- ' "disabledOn": "${ls:bpm_signable == 0}",', v_crlf,
- ' "dialog": { "title": "PN", "size": "lg", "body": { "type": "service", "schemaApi": {', v_crlf,
- ' "method": "post", "url": "${ls:base_ip}/xapi/v3/${ls:wizard_db}/zen_showsource/0/",', v_crlf,
- ' "data": { "para01": "bpmm11_i", "para02": "beta@${', p_pk, '}" }, "dataType": "form"', v_crlf,
- ' } } }', v_crlf,
- ' },', v_crlf,
- -- ^ [cite: 15, 16, 17]
- ' {', v_crlf,
- ' "type": "button", "label": "^", "actionType": "dialog", "level": "danger",', v_crlf,
- ' "disabledOn": "${ls:bpm_signable == 0}",', v_crlf,
- ' "dialog": { "title": "^", "size": "lg", "body": { "type": "service", "schemaApi": {', v_crlf,
- ' "method": "post", "url": "${ls:base_ip}/xapi/v3/${ls:wizard_db}/zen_showsource/0/",', v_crlf,
- ' "data": { "para01": "bpmm12_i", "para02": "beta@${', p_pk, '}" }, "dataType": "form"', v_crlf,
- ' } } }', v_crlf,
- ' },', v_crlf,
- -- @o [cite: 20, 21, 22]
- ' {', v_crlf,
- ' "type": "button", "label": "@o", "actionType": "dialog", "level": "dark",', v_crlf,
- ' "disabledOn": "${ls:bpm_cancelable > 0}",', v_crlf,
- ' "dialog": { "title": "@o", "size": "lg", "body": { "type": "service", "schemaApi": {', v_crlf,
- ' "method": "post", "url": "${ls:base_ip}/xapi/v3/${ls:wizard_db}/zen_showsource/0/",', v_crlf,
- ' "data": { "para01": "bpmm13_i", "para02": "beta@${', p_pk, '}" }, "dataType": "form"', v_crlf,
- ' } } }', v_crlf,
- ' },', v_crlf
- );
- END IF;
-
- -- ñ־{ [cite: 25, 26, 27]
- SET v_rets = CONCAT(v_rets,
- ' {', v_crlf,
- ' "type": "button", "label": "ñ־{", "actionType": "dialog", "level": "warning",', v_crlf,
- ' "dialog": { "title": "ñ־{", "size": "lg", "body": { "type": "service", "schemaApi": {', v_crlf,
- ' "method": "post", "url": "${ls:base_ip}/xapi/v3/${ls:wizard_db}/zen_showsource/0/",', v_crlf,
- ' "data": { "para01": "bpmq11", "para02": "beta@${', p_pk, '}", "_tag": "', p_FunctionTag, '" },', v_crlf,
- ' "dataType": "form", "requestAdaptor": "local_set_params(51, api.data._tag); return { ...api, data: { ...api.data }};"', v_crlf,
- ' } } }', v_crlf,
- ' },', v_crlf
- );
-
- -- ˵y{ñ֤H [cite: 30, 31, 32]
- SET v_rets = CONCAT(v_rets,
- ' {', v_crlf,
- ' "type": "button", "label": "˵y{ñ֤H", "actionType": "dialog", "level": "secondary",', v_crlf,
- ' "dialog": { "title": "˵y{ñ֤H", "size": "lg", "body": { "type": "service", "schemaApi": {', v_crlf,
- ' "method": "post", "url": "${ls:base_ip}/xapi/v3/${ls:wizard_db}/zen_showsource/0/",', v_crlf,
- ' "data": { "para01": "bpmq12", "para02": "beta@${', p_pk, '}", "_tag": "', p_FunctionTag, '" },', v_crlf,
- ' "dataType": "form", "requestAdaptor": "local_set_params(51, api.data._tag); return { ...api, data: { ...api.data }};"', v_crlf,
- ' } } }', v_crlf,
- ' }', v_crlf,
- ' ]', v_crlf,
- ' },', v_crlf,
- ' { "type": "divider" },', v_crlf
- );
-
- RETURN v_rets;
-END //
-
-DELIMITER ;
\ No newline at end of file
diff --git a/tools/zen_create_table.txt b/tools/zen_create_table.txt
deleted file mode 100644
index 5f58e06..0000000
--- a/tools/zen_create_table.txt
+++ /dev/null
@@ -1,180 +0,0 @@
-DELIMITER //
-
-CREATE OR REPLACE PROCEDURE `zen_create_table` (
- IN p_tablename VARCHAR(100),
- IN p_source_type VARCHAR(1) -- 1:zen_newtable_d 2:zen_fields join zen_function
-)
-/*
- Function : 配合 api 可以直接產生 table 的 sp
- Description: 因為只能在相同的 db 執行, 所以在 zenWinzard 或 zenBusiness 都要有此 sp 及 zen_newtable_m/zen_newtable_d
- 在平台的架構中雖然放在 Wizard Menu 中, 但手改 json 連到 zenBusiness(zenEIS) 等 ERP DB,
- 因為通常需要新增的 table 都是 MIS 要擴充功能用的
- CALL zen_create_table('tmp_test01','2');
-
- 2023-07-07
- 因為希望參考 iCoder 的作法, 匯入 zen_fields 後, 直接就產生程式(接近一鍵產生程式碼), 所以新增 p_source_typ=2
- 但是 zen_fields 是 zenWinzard 的 table, 如果是分離型 db 架構, 就無法支援 p_source_typ=2 這很傷腦筋, 怎麼辦? 如果傳入 db ??
- 看樣子只能先獨立建立 table (p_source_typ=1), 然後匯入 zen_fields, 再產生 Code, 先這樣吧
-
- 2023-08-26 用資料庫的同義字功能, 已解決分離式資料庫的問題
-
- Build Date : 2022/02/16
-
- Modify History
- Item Who Date Modify Docs
- ==== ========== ========== ================================================
- 1 Michael 2022/02/16 Init
- 2 Michael 2023/06/28 新增也可以根據 zen_function/zen_fields 來產生 Table 的寫法(必須配合 zen_function 也已經新增定義才行)
- 3 Michael 2023/07/29 create table 後, 要多 select 0 as code 才不會報錯
- 4 [改寫者] 2023-11-15 改寫為 MariaDB 版本並最佳化
-*/
-BEGIN
- DECLARE v_sql LONGTEXT;
- DECLARE v_rets LONGTEXT;
- DECLARE v_maxcount INT;
- DECLARE v_currid INT;
- DECLARE v_nextrowid INT;
-
- DECLARE v_fieldname VARCHAR(100);
- DECLARE v_field_type VARCHAR(100);
- DECLARE v_field_len SMALLINT;
- DECLARE v_is_pk CHAR(1);
- DECLARE v_is_auto CHAR(1);
- DECLARE v_sql_tail VARCHAR(100);
- DECLARE v_sql_pk VARCHAR(100);
- DECLARE v_row_count INT;
-
- -- 創建臨時表來存儲字段信息
- DROP TEMPORARY TABLE IF EXISTS temp_table_fields;
- CREATE TEMPORARY TABLE temp_table_fields (
- fieldname VARCHAR(100),
- field_type VARCHAR(100),
- field_len SMALLINT,
- is_pk CHAR(1),
- is_auto CHAR(1),
- rowid INT AUTO_INCREMENT PRIMARY KEY
- );
-
- -- 根據來源類型填充臨時表
- IF IFNULL(p_source_type, '1') = '1' THEN
- INSERT INTO temp_table_fields (fieldname, field_type, field_len, is_pk, is_auto)
- SELECT fieldname, field_type, field_len, is_pk, is_auto
- FROM zen_newtable_d
- WHERE tablename = p_tablename;
- ELSE
- -- 使用同義字(Synonym)解決跨資料庫問題
- INSERT INTO temp_table_fields (fieldname, field_type, field_len, is_pk, is_auto)
- SELECT
- x1.fieldname,
- CASE
- WHEN x1.fieldobject IN ('textarea','input-file','link-file','input-image','nvarchar') THEN 'varchar'
- WHEN x1.fieldobject IN ('int','decimal','smallint') THEN x1.fieldobject
- WHEN x1.fieldobject IN ('radios','progress') THEN 'smallint'
- WHEN x1.fieldobject = 'input-number' THEN 'int'
- WHEN x1.fieldobject IN ('input-datetime','datetime') THEN 'datetime'
- WHEN x1.fieldobject = 'input-date' THEN 'date'
- WHEN LOCATE('cycle', x1.fieldobject) > 0 THEN x1.fieldobject -- 獨立判斷
- ELSE 'varchar'
- END field_type,
- x1.fieldlength AS field_len,
- CASE WHEN LOCATE(x1.fieldname, x2.mainkey) > 0 THEN 'Y' ELSE 'N' END is_pk,
- x2.isautoinc AS is_auto
- FROM zen_fields x1
- LEFT JOIN zen_function x2 ON x1.functiontag = x2.functiontag
- WHERE x1.tablename = p_tablename AND x1.fieldobject <> 'formula';
- END IF;
-
- -- 初始化變量
- SELECT MAX(rowid), MIN(rowid) INTO v_maxcount, v_currid FROM temp_table_fields;
-
- SET v_rets = '';
- SET v_sql_pk = '';
-
- -- 構建字段定義
- WHILE v_currid <= v_maxcount DO
- -- 取得當前字段信息
- SELECT fieldname, field_type, field_len, is_pk, is_auto
- INTO v_fieldname, v_field_type, v_field_len, v_is_pk, v_is_auto
- FROM temp_table_fields
- WHERE rowid = v_currid;
-
- SET v_sql_tail = '';
- IF v_is_pk = 'Y' THEN
- SET v_sql_tail = ' NOT NULL';
- SET v_sql_pk = CONCAT(v_sql_pk, v_fieldname, ',');
- END IF;
-
- IF v_is_auto = 'Y' THEN
- SET v_sql_tail = CONCAT(v_sql_tail, ' AUTO_INCREMENT');
- END IF;
-
- IF LOCATE('transfer', v_field_type) > 0 OR v_field_len < 0 THEN
- SET v_rets = CONCAT(v_rets, ' ', v_fieldname, ' ', v_field_type, '(255)', v_sql_tail, ',');
- ELSEIF LOCATE('cycle', v_field_type) > 0 THEN
- IF v_field_type IN ('cycle-frequency','cycle-weeks','cycle-months') THEN
- SET v_rets = CONCAT(v_rets, ' ', v_fieldname, ' varchar(200)', v_sql_tail, ',');
- ELSE
- SET v_rets = CONCAT(v_rets, ' ', v_fieldname, ' datetime ', v_sql_tail, ',');
- END IF;
- ELSEIF LOCATE('char', v_field_type) > 0 THEN
- IF v_field_len <= 0 THEN
- SET v_rets = CONCAT(v_rets, ' ', v_fieldname, ' ', v_field_type, '(200)', v_sql_tail, ',');
- ELSE
- SET v_rets = CONCAT(v_rets, ' ', v_fieldname, ' ', v_field_type, '(', v_field_len, ')', v_sql_tail, ',');
- END IF;
- ELSE
- SET v_rets = CONCAT(v_rets, ' ', v_fieldname, ' ', v_field_type, v_sql_tail, ',');
- END IF;
-
- -- 取得下一筆資料
- SELECT MIN(rowid) INTO v_nextrowid FROM temp_table_fields WHERE rowid > v_currid;
- SET v_currid = v_nextrowid;
- END WHILE;
-
- -- 處理主鍵定義
- IF v_sql_pk = '' THEN
- SET v_sql_pk = '';
- SET v_rets = SUBSTRING(v_rets, 1, CHAR_LENGTH(v_rets) - 1);
- ELSE
- SET v_sql_pk = CONCAT(' PRIMARY KEY (', SUBSTRING(v_sql_pk, 1, CHAR_LENGTH(v_sql_pk) - 1), ')');
- END IF;
-
- -- 只有當有字段定義時才創建表
- IF v_rets <> '' THEN
- -- 檢查表是否存在，如果存在且無數據則刪除
- SET @sql_check = CONCAT('SELECT COUNT(*) INTO @row_count FROM information_schema.tables ',
- 'WHERE table_schema = DATABASE() AND table_name = \'', p_tablename, '\'');
- PREPARE stmt FROM @sql_check;
- EXECUTE stmt;
- DEALLOCATE PREPARE stmt;
-
- IF @row_count > 0 THEN
- SET @sql_check = CONCAT('SELECT COUNT(*) INTO @row_count FROM ', p_tablename);
- PREPARE stmt FROM @sql_check;
- EXECUTE stmt;
- DEALLOCATE PREPARE stmt;
-
- IF @row_count <= 0 THEN
- SET @sql = CONCAT('DROP TABLE ', p_tablename);
- PREPARE stmt FROM @sql;
- EXECUTE stmt;
- DEALLOCATE PREPARE stmt;
- END IF;
- END IF;
-
- -- 創建新表
- SET v_sql = CONCAT('CREATE TABLE ', p_tablename, '(',
- v_rets,
- v_sql_pk, ');');
-
- -- 執行創建表的SQL
- PREPARE stmt FROM v_sql;
- EXECUTE stmt;
- DEALLOCATE PREPARE stmt;
-
- -- 返回成功信息
- SELECT 0 AS code, 'OK' AS msg;
- END IF;
-END //
-
-DELIMITER ;
\ No newline at end of file
diff --git a/tools/zen_fieldspec_best.txt b/tools/zen_fieldspec_best.txt
deleted file mode 100644
index d4bdcf6..0000000
--- a/tools/zen_fieldspec_best.txt
+++ /dev/null
@@ -1,286 +0,0 @@
-DELIMITER //
-
-CREATE OR REPLACE PROCEDURE `zen_fieldspec_best` (
- IN p_functiontag VARCHAR(100)
-)
-/*
- Function : 針對 zen_field 的內容, 根據 schema 給出最接近的預設值, 以簡化設定動作
- Description:
- Build Date : 2021/08/14
- Call Sample:
- CALL zen_fieldspec_best('abc01');
-
- Modify History
- Item Who Date Modify Docs
- ==== ========== ========== ================================================
- 1 Michael 2021-11-25 新增 fieldblock = 90 的判斷(detail)
- 2 Michael 2022-04-16 update zen_fields set fieldro = Y (Read Only 預設)
- 3 Michael 2022-10-02 加入對 Query 的支援(根據 tag 判斷)
- 4 Michael 2023-02-09 加入 flow_status 預設值=N
- 5 Michael 2023-09-01 加入 2個系統欄位的預設值 create_user/create_date
- 6 [改寫者] 2023-11-15 改寫為 MariaDB 版本並最佳化
-*/
-BEGIN
- /*
- 根據下列內容設定
- fieldobject 更換為最合理的物件
- fieldcn ==> dd ? (date=日期, id=代號, Name=名稱, 描述 取已經存在的同名? 建立一個常用習慣的詞庫? 這可以和 dd 並存)
- fieldwidth 根據 length 推算 width(Grid 顯示寬度)
- --fielddefault 日期=today 等
- --fieldchecknull
- --fieldds,fieldsh
- cellx,celly
- */
-
- DECLARE v_imax INT;
- DECLARE v_inow INT;
- DECLARE v_cnt INT;
- DECLARE v_x INT;
- DECLARE v_y INT;
- DECLARE v_row INT;
- DECLARE v_line INT;
- DECLARE v_block INT;
- DECLARE v_tablename VARCHAR(100);
- DECLARE v_fieldname VARCHAR(100);
- DECLARE v_fieldcn VARCHAR(100);
- DECLARE v_fld_type VARCHAR(100);
- DECLARE v_fieldobject VARCHAR(100);
- DECLARE v_fieldlength INT;
- DECLARE v_fld_width VARCHAR(10);
- DECLARE v_jump SMALLINT;
- --
- DECLARE v_report_type VARCHAR(100);
- DECLARE v_type_f SMALLINT;
- DECLARE v_type_q SMALLINT;
-
- -- 創建臨時表
- DROP TEMPORARY TABLE IF EXISTS tmp_fields;
- DROP TEMPORARY TABLE IF EXISTS tmp_query_fields;
-
- -- upgrade data(防錯)
- UPDATE zen_fields SET datatype = fieldobject WHERE functiontag = p_functiontag AND datatype IS NULL;
-
- /*
- 根據 p_functiontag 識別是 Form or Query
- */
- SELECT COUNT(*) INTO v_type_f FROM zen_fields WHERE functiontag = p_functiontag;
- SELECT COUNT(*) INTO v_type_q FROM zen_report_fields WHERE functiontag = p_functiontag;
-
- IF v_type_f > 0 THEN
- -- 創建臨時表並插入數據
- CREATE TEMPORARY TABLE tmp_fields AS
- SELECT * FROM zen_fields WHERE functiontag = p_functiontag;
-
- SELECT MAX(fieldid), MIN(fieldid), COUNT(*)
- INTO v_imax, v_y, v_cnt
- FROM tmp_fields;
-
- SET v_row = 1;
- IF v_cnt > 10 AND v_cnt <= 30 THEN
- SET v_row = 2;
- ELSEIF v_cnt > 30 THEN
- SET v_row = 2;
- END IF;
-
- SET v_x = 1;
- SET v_line = 1;
-
- WHILE v_y <= v_imax DO
- SELECT tablename, fieldname, fieldcn, datatype, fieldlength, fieldblock
- INTO v_tablename, v_fieldname, v_fieldcn, v_fieldobject, v_fieldlength, v_block
- FROM tmp_fields WHERE fieldid = v_y;
-
- /* step 1: 設定 object */
- -- varchar, char, nvarchar ...
- SET v_fld_type = v_fieldobject;
- IF LOCATE('char', v_fieldobject) > 0 THEN
- IF v_fieldlength >= 200 THEN
- SET v_fld_type = 'textarea';
- ELSEIF v_fieldlength = 1 THEN
- SET v_fld_type = 'switch';
- ELSE
- SET v_fld_type = 'input-text';
- END IF;
- END IF;
-
- IF LOCATE('int', v_fieldobject) > 0 OR LOCATE('decimal', v_fieldobject) > 0 THEN
- SET v_fld_type = 'input-number';
- END IF;
-
- IF LOCATE('date', v_fieldobject) > 0 THEN
- SET v_fld_type = 'input-date';
- END IF;
-
- -- 防錯
- IF v_fld_type = '' THEN
- SET v_fld_type = 'input-text';
- END IF;
-
- /*
- step 2: 推估 width(暫時保留, 但在 amis 中, width 已經幾乎不必設定)
- */
- IF v_fld_type = 'input-date' OR v_fld_type = 'input-number' THEN
- SET v_fld_width = 80;
- ELSE
- IF v_fieldlength <= 10 THEN
- SET v_fld_width = 80;
- ELSEIF v_fieldlength <= 20 THEN
- SET v_fld_width = 120;
- ELSE
- SET v_fld_width = 200;
- END IF;
- END IF;
-
- -- 判斷如果是 detail, fieldblock = 90
- SELECT COUNT(*) INTO v_cnt FROM zen_function WHERE detail_table = v_tablename;
- IF v_cnt > 0 THEN
- SET v_block = 90;
- END IF;
-
- /*
- step3: 推算 x/y
- */
- SET v_jump = 0;
- IF v_row = 2 AND v_fieldlength >= 50 THEN
- IF v_x = 1 THEN
- SET v_jump = 1;
- ELSE
- SET v_x = 1;
- SET v_line = v_line + 1;
- END IF;
- END IF;
-
- IF v_row = 3 AND v_fieldlength >= 50 THEN
- IF v_x = 1 THEN
- SET v_jump = 1;
- ELSE
- SET v_x = 1;
- SET v_line = v_line + 1;
- END IF;
- END IF;
-
- /*
- step 4: update & cname(dd)
- */
- UPDATE zen_fields
- SET fieldobject = v_fld_type,
- fieldwidth = v_fld_width,
- cellx = v_x,
- celly = v_line,
- fieldblock = v_block,
- fieldcn = trans_cname(v_fieldname, v_fieldcn)
- WHERE fieldid = v_y;
-
- IF v_row = 1 THEN
- SET v_line = v_line + 1;
- ELSEIF v_row = 2 THEN
- SET v_x = v_x + 1;
- IF v_x > 2 OR (v_jump = 1) THEN
- SET v_x = 1;
- SET v_line = v_line + 1;
- END IF;
- ELSEIF v_row = 3 THEN
- SET v_x = v_x + 1;
- IF v_x > 3 OR (v_jump = 1) THEN
- SET v_x = 1;
- SET v_line = v_line + 1;
- END IF;
- END IF;
-
- SELECT MIN(fieldid) INTO v_y FROM tmp_fields WHERE fieldid > v_y;
- END WHILE;
-
- /*
- 批次更新(不需逐筆寫入)
- step 5: setup read only(create_user ..)
- step 6: flow_status 的預設值為 N
- */
- UPDATE zen_fields
- SET fieldro = 'Y'
- WHERE functiontag = p_functiontag
- AND fieldname IN ('create_user','create_date','update_user','update_date')
- AND IFNULL(fieldro, '') = '';
-
- UPDATE zen_fields
- SET fielddefault = '$ls:userid'
- WHERE functiontag = p_functiontag
- AND fieldname = 'create_user'
- AND IFNULL(fielddefault, '') = '';
-
- UPDATE zen_fields
- SET fielddefault = 'today'
- WHERE functiontag = p_functiontag
- AND fieldname = 'create_date'
- AND IFNULL(fielddefault, '') = '';
-
- UPDATE zen_fields
- SET fielddefault = '自動編碼'
- WHERE functiontag = p_functiontag
- AND fieldname = 'billno'
- AND IFNULL(fielddefault, '') = '';
-
- UPDATE zen_fields
- SET fielddefault = 'today'
- WHERE functiontag = p_functiontag
- AND fieldname = 'billdate'
- AND IFNULL(fielddefault, '') = '';
-
- UPDATE zen_fields
- SET fielddefault = 'N'
- WHERE functiontag = p_functiontag
- AND fieldname = 'flow_status'
- AND IFNULL(fielddefault, '') = '';
-
- -- hidden 的 ds 和 sh 都應該設為 Y ,20230926
- UPDATE zen_fields
- SET fieldds = 'Y', fieldsh = 'Y'
- WHERE functiontag = p_functiontag
- AND fieldobject = 'hidden';
-
- SELECT 0 AS code, 'OK' AS msg;
-
- ELSEIF v_type_q > 0 THEN
- -- 處理查詢字段
- CREATE TEMPORARY TABLE tmp_query_fields AS
- SELECT * FROM zen_report_fields WHERE functiontag = p_functiontag;
-
- SELECT MAX(fieldid), MIN(fieldid)
- INTO v_imax, v_y
- FROM tmp_query_fields;
-
- SELECT COUNT(*) INTO v_cnt FROM tmp_query_fields;
-
- SET v_x = 1;
- SET v_line = 1;
-
- WHILE v_y <= v_imax DO
- SELECT fieldname, fieldcn, fieldobject, report_type
- INTO v_fieldname, v_fieldcn, v_fieldobject, v_report_type
- FROM tmp_query_fields WHERE fieldid = v_y;
-
- /*
- step 1: update cname(dd)
- */
- UPDATE zen_report_fields
- SET fieldcn = trans_cname(v_fieldname, v_fieldcn)
- WHERE fieldid = v_y AND fieldname = fieldcn;
-
- /*
- step 2: setup display
- */
- UPDATE zen_report_fields
- SET fieldds = 'Y'
- WHERE fieldid = v_y;
-
- SELECT MIN(fieldid) INTO v_y FROM tmp_query_fields WHERE fieldid > v_y;
- END WHILE;
-
- SELECT 0 AS code, 'OK' AS msg;
- END IF;
-
- -- 清理臨時表
- DROP TEMPORARY TABLE IF EXISTS tmp_fields;
- DROP TEMPORARY TABLE IF EXISTS tmp_query_fields;
-END //
-
-DELIMITER ;
\ No newline at end of file
diff --git a/tools/zen_get_ext_button.txt b/tools/zen_get_ext_button.txt
deleted file mode 100644
index f2849b9..0000000
--- a/tools/zen_get_ext_button.txt
+++ /dev/null
@@ -1,258 +0,0 @@
-DELIMITER //
-
-CREATE OR REPLACE FUNCTION zen_get_ext_button(
- p_functionTag VARCHAR(20),
- p_button_type CHAR(1),
- p_ip VARCHAR(100), -- 'https://api.gex.com.tw:5443'
- p_db VARCHAR(100) -- 'zenBusiness'
-)
-RETURNS TEXT
-/*
- function : 回傳擴充 button 的設定內容
- description:
- build date : 2022/2/5
-
- call sample:
- SELECT zen_get_ext_button('basm67','U');
-
- modify history
- item who date modify docs
- ==== ========== ========== ================================================
- 1 Michael 2022-2-5 新增
- 2 Michael 2023-1-29 重新想清處並定義相關設定, 然後修改相關程式, 詳細請參見註解
- 3 Michael 2023-02-01 為了更加彈性, @ip 及 @db 這2個欄位改傳入 ${ls:xxxx}, 測試可行(程式要調整前端呼叫的程式)
-*/
-BEGIN
- DECLARE v_cnt INT;
- DECLARE v_crlf VARCHAR(2);
- DECLARE v_comma VARCHAR(1);
- DECLARE v_fcaption VARCHAR(100);
- DECLARE v_icon VARCHAR(100);
- DECLARE v_related_menuid VARCHAR(100);
- DECLARE v_rets TEXT;
- DECLARE v_para_field VARCHAR(100);
- DECLARE v_new_para_field VARCHAR(100);
- DECLARE v_ls_paras_field VARCHAR(100); -- button 按下後, 要帶到另一個表單的 pk 值
- DECLARE v_ls_paras_no INT; -- 參數代號 zenutil.js -> function local_set_params(id, value)
- DECLARE v_imax INT;
- DECLARE v_inow INT;
- --
- DECLARE p_uuid VARCHAR(100);
- DECLARE v_sp_name VARCHAR(100); -- sp_name
- DECLARE v_para1 VARCHAR(100); -- 有 token 一定要放在第一個
- DECLARE v_para2 VARCHAR(100);
- DECLARE v_para3 VARCHAR(100);
- DECLARE v_para4 VARCHAR(100);
- DECLARE v_data_para1 VARCHAR(200);
- DECLARE v_data_para2 VARCHAR(200);
-
- -- 臨時表儲存 JSON 數據
- DROP TEMPORARY TABLE IF EXISTS temp_jsondata;
- CREATE TEMPORARY TABLE temp_jsondata (
- rowid INT AUTO_INCREMENT PRIMARY KEY,
- fcaption VARCHAR(20),
- icon VARCHAR(50),
- related_menuid VARCHAR(200), -- 關聯功能(或是呼叫某 sp)
- para_field VARCHAR(100),
- ls_paras_field VARCHAR(100),
- ls_paras_no INT
- );
-
- SET v_crlf = CONCAT(CHAR(13), CHAR(10));
-
- -- 插入資料到臨時表
- INSERT INTO temp_jsondata (fcaption, icon, related_menuid, para_field, ls_paras_field, ls_paras_no)
- SELECT
- fcaption, icon, related_menuid, para_field, ls_paras_field, ls_paras_no
- FROM zen_function_button fn
- WHERE fn.FunctionTag = p_functionTag AND button_type = p_button_type
- ORDER BY buttonid;
-
- -- 回傳 options []
- SELECT COUNT(*) INTO v_imax FROM temp_jsondata;
- SET v_inow = 1;
- SET v_rets = '';
- SET v_comma = ',';
-
- WHILE v_inow <= v_imax DO
- -- 取得當前行數據
- SELECT fcaption, icon, related_menuid, para_field, ls_paras_field, ls_paras_no
- INTO v_fcaption, v_icon, v_related_menuid, v_para_field, v_ls_paras_field, v_ls_paras_no
- FROM temp_jsondata
- WHERE rowid = v_inow;
-
- IF IFNULL(v_icon, '') = '' THEN
- SET v_icon = 'fas fa-binoculars';
- END IF;
-
- IF IFNULL(v_ls_paras_no, 0) = 0 THEN
- SET v_ls_paras_no = 0;
- END IF;
-
- /*
- 只要後 2個參數 ls_paras_field,ls_paras_no 有值, 就表示是呼叫外部專案, 否則就只是單純的 v_new_para_field
- 接下來, 判斷 para_field 是否為空
- a.如果為空, 表示要傳入 ls_paras_field 這個欄位的值
- b.如果不為空, 且首碼為 _ , 表示要傳入固定字串, 否則還是傳入 ls_paras_field 這個欄位的值(自定義變數, 防錯而已)
- Michael 2023-1-29 好難理解阿, 會這麼複雜, 是因為不斷擴充定義, 且沒有完全考慮清楚的後果, 目前這樣定義應該是 OK 的
- */
- SET v_data_para1 = '';
- SET v_data_para2 = '';
- SET v_new_para_field = '';
-
- -- 取得傳遞參數的資料
- IF IFNULL(v_ls_paras_field, '') <> '' AND IFNULL(v_ls_paras_no, 0) > 0 THEN
- -- 防錯碼(重複設定)
- IF IFNULL(v_para_field, '') = CONCAT('_', v_ls_paras_field) THEN
- SET v_para_field = '';
- END IF;
-
- IF IFNULL(v_para_field, '') = '' THEN
- SET v_data_para1 = CONCAT(',', v_crlf, ' "_', v_ls_paras_field, '": "${', v_ls_paras_field, '}"', v_crlf);
- SET v_data_para2 = CONCAT(',', v_crlf, ' "requestAdaptor": "local_set_params(', CAST(v_ls_paras_no AS CHAR), ',api.data._', v_ls_paras_field, '); return { ...api, data: { ...api.data }};"', v_crlf);
- ELSEIF SUBSTRING(v_para_field, 1, 1) = '_' THEN
- -- 表示要傳入固定值內容, 非欄位值內容
- SET v_data_para1 = CONCAT(',', v_crlf, ' "', v_para_field, '": "', v_ls_paras_field, '"', v_crlf);
- SET v_data_para2 = CONCAT(',', v_crlf, ' "requestAdaptor": "local_set_params(', CAST(v_ls_paras_no AS CHAR), ',api.data.', v_para_field, '); return { ...api, data: { ...api.data }};"', v_crlf);
- ELSE
- -- 要自己命名變數(防錯而已, 不應有此設定)
- SET v_data_para1 = CONCAT(',', v_crlf, ' "_', v_para_field, '": "${', v_ls_paras_field, '}"', v_crlf);
- SET v_data_para2 = CONCAT(',', v_crlf, ' "requestAdaptor": "local_set_params(', CAST(v_ls_paras_no AS CHAR), ',api.data._', v_para_field, '); return { ...api, data: { ...api.data }};"', v_crlf);
- END IF;
- ELSE
- IF IFNULL(v_para_field, '') <> '' THEN
- SET v_new_para_field = CONCAT('@${', v_para_field, '}');
- END IF;
- END IF;
-
- -- 新支援 button call sp 並傳參數
- IF LOCATE(',', v_related_menuid) > 0 THEN
- IF IFNULL(v_icon, '') = '' THEN
- SET v_icon = 'fab fa-angellist text-success';
- END IF;
-
- -- 取出 sp 及參數(目前做多允許 4 個參數)
- SET p_uuid = UUID();
- CALL gp_split(p_uuid, v_related_menuid,',');
- select col INTO v_sp_name from _split where guid = p_uuid and rowid = 1;
- select col INTO v_para1 from _split where guid = p_uuid and rowid = 2;
- select col INTO v_para2 from _split where guid = p_uuid and rowid = 3;
- select col INTO v_para3 from _split where guid = p_uuid and rowid = 4;
- select col INTO v_para4 from _split where guid = p_uuid and rowid = 5;
- DELETE FROM _split WHERE guid = p_uuid;
-
- -- 要特殊控制 db, 目前先 hard code 2023-02-04 Michael
- IF v_sp_name = 'zen_showsource' THEN
- SET p_db = '${ls:wizard_db}';
- END IF;
-
- IF IFNULL(v_para1, '') = '' THEN SET v_para1 = ''; END IF;
- IF IFNULL(v_para2, '') = '' THEN SET v_para2 = ''; END IF;
- IF IFNULL(v_para3, '') = '' THEN SET v_para3 = ''; END IF;
- IF IFNULL(v_para4, '') = '' THEN SET v_para4 = ''; END IF;
-
- IF v_para1 = 'token' THEN
- SET v_para1 = CONCAT(' "token": "${ls:token}"', IF(v_para2 = '', '', ','), v_crlf);
- IF v_para2 <> '' THEN
- SET v_para2 = CONCAT(' "para02": "${', v_para2, '}"', IF(v_para3 = '', '', ','), v_crlf);
- END IF;
- IF v_para3 <> '' THEN
- SET v_para3 = CONCAT(' "para03": "${', v_para3, '}"', IF(v_para4 = '', '', ','), v_crlf);
- END IF;
- IF v_para4 <> '' THEN
- SET v_para4 = CONCAT(' "para04": "${', v_para4, '}"', v_crlf);
- END IF;
- ELSE
- IF v_para1 <> '' THEN
- SET v_para1 = CONCAT(' "para01": "${', v_para1, '}"', IF(v_para2 = '', '', ','), v_crlf);
- END IF;
- IF v_para2 <> '' THEN
- SET v_para2 = CONCAT(' "para02": "${', v_para2, '}"', IF(v_para3 = '', '', ','), v_crlf);
- END IF;
- IF v_para3 <> '' THEN
- SET v_para3 = CONCAT(' "para03": "${', v_para3, '}"', IF(v_para4 = '', '', ','), v_crlf);
- END IF;
- IF v_para4 <> '' THEN
- SET v_para4 = CONCAT(' "para04": "${', v_para4, '}"', v_crlf);
- END IF;
- END IF;
-
- -- button & call sp
- SET v_rets = CONCAT(v_rets,
- '{', v_crlf,
- ' "type": "button",', v_crlf,
- ' "icon": "', v_icon, '",', v_crlf,
- ' "actionType": "ajax",', v_crlf,
- ' "tooltip": "', v_fcaption, '",', v_crlf,
- ' "confirmText": "確定要執行本作業?",', v_crlf, -- 將本公告設為已讀
- ' "api": {', v_crlf,
- ' "method": "post",', v_crlf,
- ' "url": "', p_ip, '/xapi/v2/', p_db, '/', v_sp_name, '/1/",', v_crlf,
- ' "data": {', v_crlf,
- v_para1, v_para2, v_para3, v_para4,
- ' },', v_crlf,
- ' "dataType": "form"', v_crlf,
- ' }', v_crlf,
- ' }', v_comma, v_crlf);
-
- SET v_inow = v_inow + 1;
- ELSE
- /*
- 此處目前總共有3種情況, 稍後繼續改
- 1.呼叫擴充子表單, 如 person call person_agent, 要傳 personid
- 2.呼叫另一支程式, 如 會議記錄 call 協同工作單, 要傳 functiontag (來源單別)
- 3.呼叫外部專案程式, 如行事曆 call FullCalendar, 傳參必須透過 local_set_params
- 4.執行 sp, (在前一段程式專門處理了)
- 5.其他(目前無)
-
- related_menuid 關聯表單代號
- para_field 傳參欄名 -> 欄位名稱前是否要加 _ , 主要是看是否為外部專案程式, 如果是呼叫外部程式, 才要加 _ , 且要在 data 區定義
- ls_paras_field 擴充參數名
- ls_paras_no 參數代碼
-
- PS: 昨天晚上查了半天, 怎麼我產生的程式 ${ls:query_id} 都不見了, 後來才發現是因為 zen_showsource 這支 core sp 會在顯示 Code 時 replace
- 資料庫中的 code 是 ok 的。所以這並不是問題, 一個問題是因為現在是利用 orm_api 的 para 8, 這個機制一般 ok,
- 但是 basperson_agent 同時有 personid 和 agentid 時就有問題, 可能要改用 para 9/10 才行, Thinking
- */
- SET v_rets = CONCAT(v_rets,
- '{', v_crlf,
- ' "type": "button",', v_crlf,
- -- Inner 不須加 title, level 可以後續手動修改
- IF(p_button_type = 'U',
- CONCAT(' "label": "', v_fcaption, '",', v_crlf,
- ' "level": "success",', v_crlf),
- ''),
- ' "icon": "', v_icon, '",', v_crlf,
- ' "actionType": "dialog",', v_crlf,
- ' "tooltip": "', v_fcaption, '",', v_crlf,
- ' "dialog": {', v_crlf,
- ' "//title": "新增-', v_fcaption, '",', v_crlf,
- ' "actions": [],', v_crlf,
- ' "size": "full",', v_crlf,
- ' "body": {', v_crlf,
- ' "type": "service",', v_crlf,
- ' "schemaApi": {', v_crlf,
- ' "method": "post",', v_crlf,
- ' "url": "', p_ip, '/xapi/v2/${ls:wizard_db}/zen_showsource/0/",', v_crlf,
- ' "data": {', v_crlf,
- ' "para01": "', v_related_menuid, '",', v_crlf,
- ' "para02": "beta', v_new_para_field, '"', v_crlf,
- v_data_para1,
- ' },', v_crlf,
- ' "dataType": "form"', v_crlf,
- v_data_para2,
- ' }', v_crlf,
- ' }', v_crlf,
- ' }', v_crlf,
- ' }', v_comma, v_crlf);
-
- SET v_inow = v_inow + 1;
- END IF;
- END WHILE;
-
- DROP TEMPORARY TABLE IF EXISTS temp_jsondata;
-
- RETURN IFNULL(v_rets, '');
-END //
-
-DELIMITER ;
\ No newline at end of file
diff --git a/tools/zen_get_keyvalue.txt b/tools/zen_get_keyvalue.txt
deleted file mode 100644
index fdb6a79..0000000
--- a/tools/zen_get_keyvalue.txt
+++ /dev/null
@@ -1,87 +0,0 @@
-DELIMITER //
-
-CREATE OR REPLACE FUNCTION zen_get_keyvalue(
- p_tablename VARCHAR(100),
- p_fieldname VARCHAR(20)
-)
-RETURNS TEXT
-DETERMINISTIC
-/*
- Function : 改寫成 api 給 amis 呼叫時, 如果一個 Form 上有多個 select 是固定內容
- Description: 如上
- Build Date : 2022/02/16
-
- Modify History
- Item Who Date Modify Docs
- ===M= ========== ========== ================================================
- 1 Michael 2022/02/16 Init
-*/
-BEGIN
- DECLARE v_cnt INT;
- DECLARE v_crlf VARCHAR(2);
- DECLARE v_comma VARCHAR(1);
- DECLARE v_value VARCHAR(100);
- DECLARE v_label VARCHAR(100);
- DECLARE v_rets TEXT;
- DECLARE v_imax INT;
- DECLARE v_inow INT;
- DECLARE v_rowid INT DEFAULT 1;
-
- -- 臨時表儲存 JSON 數據
- DROP TEMPORARY TABLE IF EXISTS temp_jsondata;
- CREATE TEMPORARY TABLE temp_jsondata (
- rowid INT AUTO_INCREMENT PRIMARY KEY,
- value VARCHAR(100),
- label VARCHAR(100)
- );
-
- SET v_crlf = CONCAT(CHAR(13), CHAR(10));
-
- -- 檢查是否有設定到 tablename
- SELECT COUNT(*) INTO v_cnt FROM zen_keyvalue
- WHERE tablename = p_tablename AND fieldname = p_fieldname;
-
- IF v_cnt > 0 THEN
- INSERT INTO temp_jsondata (value, label)
- SELECT keyid AS value, keyvalue AS label
- FROM zen_keyvalue
- WHERE tablename = p_tablename AND fieldname = p_fieldname;
- ELSE
- INSERT INTO temp_jsondata (value, label)
- SELECT keyid AS value, keyvalue AS label
- FROM zen_keyvalue
- WHERE tablename = 'xxxx' AND fieldname = p_fieldname;
- END IF;
-
- -- 回傳 options []
- SELECT COUNT(*) INTO v_imax FROM temp_jsondata;
- SET v_inow = 1;
- SET v_rets = '';
- SET v_comma = ',';
-
- WHILE v_inow <= v_imax DO
- IF v_inow = v_imax THEN
- SET v_comma = '';
- END IF;
-
- SELECT value, label INTO v_value, v_label
- FROM temp_jsondata
- WHERE rowid = v_inow;
-
- SET v_rets = CONCAT(v_rets,
- ' {', v_crlf,
- ' "label": "', v_label, '",', v_crlf,
- ' "value": "', v_value, '"', v_crlf,
- ' }', v_comma, v_crlf);
-
- SET v_inow = v_inow + 1;
- END WHILE;
-
- SET v_rets = CONCAT('"options": [ ', v_rets, ' ],', v_crlf);
-
- DROP TEMPORARY TABLE IF EXISTS temp_jsondata;
-
- RETURN v_rets;
-END //
-
-DELIMITER ;
\ No newline at end of file
diff --git a/tools/zen_get_mapping.txt b/tools/zen_get_mapping.txt
deleted file mode 100644
index 5ad2687..0000000
--- a/tools/zen_get_mapping.txt
+++ /dev/null
@@ -1,81 +0,0 @@
-DELIMITER //
-
-CREATE OR REPLACE FUNCTION zen_get_mapping(
- p_tablename VARCHAR(100),
- p_fieldname VARCHAR(20)
-)
-/*
- Function : Rewrite as an API for AMIS to call. Display JSON content with mapping icons
- Description: As above
- Build Date : 2022/02/16
-
- Modify History
- Item Who Date Modify Docs
- ==== ========== ========== ================================================
- 1 Michael 2022/02/16 Init
-*/
-RETURNS TEXT
-BEGIN
- DECLARE v_cnt INT;
- DECLARE v_crlf VARCHAR(2);
- DECLARE v_comma VARCHAR(1);
- DECLARE v_value VARCHAR(100);
- DECLARE v_label VARCHAR(100);
- DECLARE v_keydesc VARCHAR(100);
- DECLARE v_rets TEXT;
- DECLARE v_imax INT;
- DECLARE v_inow INT;
-
- -- 创建临时表来存储JSON数据
- DROP TEMPORARY TABLE IF EXISTS temp_jsondata;
- CREATE TEMPORARY TABLE temp_jsondata (
- value VARCHAR(100),
- label VARCHAR(100),
- keydesc VARCHAR(100),
- rowid INT AUTO_INCREMENT PRIMARY KEY
- );
-
- SET v_crlf = CONCAT(CHAR(13), CHAR(10));
-
- -- 检查是否有设置到 tablename
- SELECT COUNT(*) INTO v_cnt FROM zen_keyvalue
- WHERE tablename = p_tablename AND fieldname = p_fieldname;
-
- IF v_cnt > 0 THEN
- INSERT INTO temp_jsondata (value, label, keydesc)
- SELECT keyid AS value, keyvalue AS label, keydesc
- FROM zen_keyvalue
- WHERE tablename = p_tablename AND fieldname = p_fieldname;
- ELSE
- INSERT INTO temp_jsondata (value, label, keydesc)
- SELECT keyid AS value, keyvalue AS label, keydesc
- FROM zen_keyvalue
- WHERE tablename = 'xxxx' AND fieldname = p_fieldname;
- END IF;
-
- -- 返回 options []
- SELECT COUNT(*) INTO v_imax FROM temp_jsondata;
- SET v_inow = 1;
- SET v_rets = '';
- SET v_comma = ',';
-
- WHILE v_inow <= v_imax DO
- IF v_inow = v_imax THEN
- SET v_comma = '';
- END IF;
-
- SELECT value, label, keydesc INTO v_value, v_label, v_keydesc
- FROM temp_jsondata WHERE rowid = v_inow;
-
- SET v_rets = CONCAT(v_rets,
- -- ' "', v_value, '": "', v_label, '"', v_comma);
- ' "', v_value, '": "', v_label, '"', v_comma);
- SET v_inow = v_inow + 1;
- END WHILE;
-
- SET v_rets = CONCAT('"map": { ', v_rets, ' },', v_crlf);
-
- RETURN v_rets;
-END //
-
-DELIMITER ;
diff --git a/tools/zen_get_picker.txt b/tools/zen_get_picker.txt
deleted file mode 100644
index da516de..0000000
--- a/tools/zen_get_picker.txt
+++ /dev/null
@@ -1,51 +0,0 @@
-DELIMITER //
-
-CREATE PROCEDURE zen_get_picker (
- IN functiontag VARCHAR(100), -- pickerId, basm501=product, basm610=customer
- IN fieldname VARCHAR(100), -- return correct field name
- IN formsize VARCHAR(10) -- form size 可以由此控制
-)
-/*
- 因為 picker 是統一的需求, 為了統一控管, 改為 service + schemaApi, 同時也可以大幅縮端程式碼
- 目前測試時有一個 issue 尚待處理, 原定義在 picker 內的 label 會因改為 service + schemaApi 而不顯示, 影響排版
-
- 這樣的寫法可以執行, 但無法 update picker.name 傳參數會有問題
- {
- "type": "service",
- "schemaApi": "get:/pages/zen_picker_basm601.json"
- },
-
- 以下的寫法測試仍有問題(不會報錯, 但 picker 未顯示)
- {
- "type": "service",
- "schemaApi": {
- "method": "post",
- "url": "http://127.0.0.1:5050/xapi/v2/zenWizard/zen_get_picker/3/",
- "data": {
- "para01": "basm61",
- "para02": "para05",
- "para03": "lg"
- },
- "dataType": "form"
- }
- },
-
- CALL zen_get_picker('basm601', 'para05');
-*/
-BEGIN
- DECLARE picker TEXT;
- DECLARE version VARCHAR(20);
-
- SET version = 'picker';
-
- -- get and replace data
- SELECT jsoncode INTO picker FROM zen_jsoncode WHERE functiontag = functiontag AND version = version;
- SET picker = REPLACE(picker, '@fieldname@', fieldname);
- SET picker = REPLACE(picker, '@formsize@', formsize);
-
- -- return ds
- SELECT 0 AS code, 'OK' AS msg;
- SELECT picker AS jsoncode;
-END //
-
-DELIMITER ;
diff --git a/tools/zen_import_fields.txt b/tools/zen_import_fields.txt
deleted file mode 100644
index c481dde..0000000
--- a/tools/zen_import_fields.txt
+++ /dev/null
@@ -1,91 +0,0 @@
-DELIMITER //
-
-CREATE OR REPLACE PROCEDURE zen_import_fields(
- IN p_functiontag VARCHAR(100),
- IN p_tablename VARCHAR(100)
-)
-/*
- Function : 回傳指定 table 的 schema 並寫入 zen_fields
- Description:
- Build Date : 2021/08/14
- Modified : 2025/08/09 (轉換為 MariaDB 並加入自動寫入功能)
-
- Call Sample:
- CALL zen_import_fields('abc01','clinic');
-
- Modify History
- Item Who Date Modify Docs
- ==== ========== ========== ================================================
- 1 Michael
- 2 Assistant 2025/08/09 轉換為 MariaDB 並加入自動寫入功能
-*/
-BEGIN
- DECLARE v_count INT;
-
- -- 檢查 zen_fields 表中是否已存在該 functiontag 的記錄
- SELECT COUNT(*) INTO v_count
- FROM zen_fields
- WHERE functiontag = p_functiontag;
-
- -- 創建臨時表存儲表結構
- DROP TEMPORARY TABLE IF EXISTS temp_schema;
- CREATE TEMPORARY TABLE temp_schema (
- tablename VARCHAR(60),
- fieldname VARCHAR(60),
- seqno INT,
- fieldobject VARCHAR(20),
- fieldlength INT,
- fielddefault VARCHAR(200),
- fieldchecknull VARCHAR(10),
- fieldcn NVARCHAR(60)
- );
-
- -- 從 information_schema 讀取表結構
- INSERT INTO temp_schema
- SELECT
- p_tablename AS tablename,
- COLUMN_NAME AS fieldname,
- ORDINAL_POSITION AS seqno,
- DATA_TYPE AS fieldobject,
- CHARACTER_MAXIMUM_LENGTH AS fieldlength,
- COLUMN_DEFAULT AS fielddefault,
- IF(IS_NULLABLE = 'YES', 'Y', 'N') AS fieldchecknull,
- COLUMN_COMMENT AS fieldcn
- FROM information_schema.COLUMNS
- WHERE TABLE_NAME = p_tablename
- AND TABLE_SCHEMA = DATABASE()
- ORDER BY ORDINAL_POSITION;
-
- -- 處理空值
- UPDATE temp_schema SET fieldcn = '' WHERE fieldcn IS NULL;
-
- -- 如果 zen_fields 中沒有該 functiontag 的記錄，則插入新記錄
- IF v_count = 0 THEN
- INSERT INTO zen_fields (
- functiontag, seqno, tablename, fieldname, fieldcn, fielden, fieldlength,
- fieldwidth, fieldobject, fielddefault, fieldchecknull, fieldblock,
- fieldds, fieldsh, fieldfm, fieldro, cellno, cellx, celly, cellline, datatype
- )
- SELECT
- p_functiontag, seqno, tablename, fieldname, fieldcn, '' AS fielden, fieldlength,
- 120 AS fieldwidth, fieldobject, fielddefault, fieldchecknull, 0 AS fieldblock,
- CASE WHEN seqno <= 6 THEN 'Y' ELSE 'N' END AS fieldds, 'Y' AS fieldsh,
- '' AS fieldfm, 'N' AS fieldro, 0 AS cellno, 1 AS cellx, 1 AS celly, 1 AS cellline, fieldobject
- FROM temp_schema;
- END IF;
-
- -- 返回結果
- SELECT 0 AS code, 'ok' AS msg;
-
- SELECT
- p_functiontag AS functiontag, seqno, tablename, fieldname, fieldcn, '' AS fielden, fieldlength,
- 120 AS fieldwidth, fieldobject, fielddefault, fieldchecknull, 0 AS fieldblock,
- CASE WHEN seqno <= 6 THEN 'Y' ELSE 'N' END AS fieldds, 'Y' AS fieldsh,
- '' AS fieldfm, 'N' AS fieldro, 0 AS cellno, 1 AS cellx, 1 AS celly, 1 AS cellline
- FROM temp_schema;
-
- DROP TEMPORARY TABLE IF EXISTS temp_schema;
-
-END //
-
-DELIMITER ;
\ No newline at end of file
diff --git a/tools/zen_null.txt b/tools/zen_null.txt
deleted file mode 100644
index 17fd06d..0000000
--- a/tools/zen_null.txt
+++ /dev/null
@@ -1,18 +0,0 @@
-DELIMITER //
-
-CREATE OR REPLACE PROCEDURE zen_null()
-/*
- 為了執行 js 跑一段假的 api
-*/
-BEGIN
- DECLARE code INT;
- DECLARE msg VARCHAR(255);
-
- -- Return a fake response
- SELECT 0 AS code, 'OK' AS msg;
-
- -- Return an empty result set
- SELECT * FROM sys_users WHERE 1 = 0;
-END //
-
-DELIMITER ;
diff --git a/tools/zen_parse_sp.txt b/tools/zen_parse_sp.txt
deleted file mode 100644
index f9ace2b..0000000
--- a/tools/zen_parse_sp.txt
+++ /dev/null
@@ -1,124 +0,0 @@
-DELIMITER //
-
-CREATE PROCEDURE zen_parse_sp(
- IN actiontype VARCHAR(10), -- fields/parain
- IN sp_name VARCHAR(200),
- IN functiontag VARCHAR(200)
-)
-/*
- function : 想辦法取得 sp 最後回傳的欄位名稱列表
- description: 有跨 db 的語法, 記得測試完後要移除
- build date : 2021/12/02
-
- call sample:
- CALL zen_parse_sp('gexrpt_opor02');
-
- modify history
- item who date modify docs
- ==== ========== ========== ================================================
- 1 michael 2021/12/02 新增
-*/
-BEGIN
- DECLARE sql_text TEXT;
- DECLARE data_text TEXT;
- DECLARE pos INT;
- DECLARE ret2_col VARCHAR(100);
- DECLARE ret2_fieldobject VARCHAR(100);
- DECLARE ret2_related_provider VARCHAR(100);
- DECLARE ret2_default_value VARCHAR(100);
- DECLARE ret2_celly SMALLINT;
- DECLARE ret2_seqno INT;
- DECLARE ret2_rowid INT;
-
- SELECT text INTO sql_text
- FROM information_schema.routines
- WHERE routine_name = sp_name AND routine_type = 'PROCEDURE';
-
- -- 回傳的欄位
- IF actiontype = 'fields' THEN
- SELECT 0 AS code, 'ok' AS msg;
-
- CREATE TEMPORARY TABLE ret2 AS
- SELECT
- functiontag,
- column_name AS fieldname,
- column_name AS fieldcn,
- CASE WHEN LOCATE('date', data_type) > 0 THEN 'static-date' ELSE 'static' END AS fieldobject,
- ordinal_position AS seqno
- FROM information_schema.columns
- WHERE table_schema = DATABASE() AND table_name = sp_name;
-
- SELECT * FROM ret2;
-
- -- 傳入的參數
- ELSEIF actiontype = 'parain' THEN
- -- 取得 () 內的資料
- SET pos = LOCATE('/*', sql_text);
- IF pos > 0 THEN
- SET sql_text = SUBSTRING(sql_text, 1, pos - 5);
- END IF;
-
- SET pos = LOCATE('as', sql_text);
- IF pos > 0 THEN
- SET sql_text = SUBSTRING(sql_text, 1, pos - 5);
- END IF;
-
- SET pos = LOCATE('(', sql_text);
- SET data_text = SUBSTRING(sql_text, pos + 1, LENGTH(sql_text));
-
- CREATE TEMPORARY TABLE ret2 (
- col VARCHAR(100),
- fieldobject VARCHAR(100),
- related_provider VARCHAR(100),
- default_value VARCHAR(100),
- celly SMALLINT,
- rowid INT AUTO_INCREMENT,
- PRIMARY KEY (rowid)
- );
-
- -- 開始分析(, 分隔)
- INSERT INTO ret2 (col)
- SELECT col FROM gf_split(data_text, ',');
-
- UPDATE ret2 SET col = SUBSTRING(col, LOCATE('@', col), LENGTH(col));
- UPDATE ret2 SET col = SUBSTRING(col, 1, LOCATE(' ', col) - 1);
-
- -- 想辦法給定一些 default
- UPDATE ret2 SET fieldobject = 'input-text', default_value = '*';
-
- UPDATE ret2 SET
- fieldobject = 'input-date',
- default_value = 'today'
- WHERE LOCATE('date', col) > 0;
-
- UPDATE ret2 SET
- fieldobject = 'picker',
- related_provider = 'basm61'
- WHERE LOCATE('cust', col) > 0;
-
- UPDATE ret2 SET
- fieldobject = 'picker',
- related_provider = 'basm51'
- WHERE LOCATE('product', col) > 0;
-
- UPDATE ret2 SET
- fieldobject = 'picker',
- related_provider = 'basm67'
- WHERE LOCATE('person', col) > 0;
-
- -- 如果第一個 para 是 token
- SELECT COUNT(*) INTO pos FROM ret2 WHERE rowid = 1 AND LOCATE('token', col) > 0;
- IF pos > 0 THEN
- UPDATE ret2 SET default_value = '${ls:token}' WHERE LOCATE('token', col) > 0;
- END IF;
-
- SELECT 0 AS code, 'ok' AS msg;
-
- SELECT functiontag, col AS fcaption, 1 AS celly, rowid - pos AS seqno, fieldobject, related_provider, default_value
- FROM ret2;
-
- END IF;
-
-END //
-
-DELIMITER ;
diff --git a/tools/zen_picker.txt b/tools/zen_picker.txt
deleted file mode 100644
index 9f99253..0000000
--- a/tools/zen_picker.txt
+++ /dev/null
@@ -1,272 +0,0 @@
-DELIMITER //
-
-CREATE OR REPLACE FUNCTION zen_picker(
- p_picker_tag VARCHAR(100), -- 傳入 popup 的資料來源 functiontag
- p_fieldname NVARCHAR(100), -- 呼叫端的欄位
- p_fieldcname NVARCHAR(100), -- 呼叫端的欄位名稱
- p_actiontype CHAR(2), -- (R)ead/(E)dit/(Q)uery
- p_ip VARCHAR(100), -- 'https://api.gex.com.tw:5443'
- p_db VARCHAR(100), -- 'zenBusiness'
- p_source_tag VARCHAR(100) -- 原呼叫功能(常需要參考原 tag 的設定)
-)
-RETURNS TEXT
-/*
- function : amis Wizard 中負責產生 picker 相關程式片段的 udf
- description:
- build date : 2021/10/10
-
- modify history
- item who date modify docs
- ==== ========== ========== ================================================
- 1 michael 2021/10/10 新增
- 2 Michael 2023-02-01 為了更加彈性, @ip 及 @db 這2個欄位改傳入 ${ls:xxxx}, 測試可行(程式要調整前端呼叫的程式)
- 3 Michael 2023-09-01 新增 picker 可以傳回多欄位的設定
- 4 Michael 2023-09-25 依 amis 建議 keywords 的變數不要用 -
- 5 Michael 2024-01-23 @visibleOn 新增欄位, 配合週期性行事曆, 會設定條件顯示/不顯示本元件
- 6 Michael 2024-03-03 修改 labelField 的顯示判斷
-*/
-BEGIN
- DECLARE v_ret TEXT;
- DECLARE v_dd_table VARCHAR(100);
- DECLARE v_dd_pk VARCHAR(100);
- DECLARE v_dd_functionname VARCHAR(100);
- DECLARE v_dd_name VARCHAR(100);
- DECLARE v_labelField VARCHAR(100);
- DECLARE v_fieldchecknull VARCHAR(10); -- New
- DECLARE v_dd_fieldname VARCHAR(100);
- DECLARE v_dd_Fieldcn NVARCHAR(100);
- DECLARE v_dd_FieldWidth VARCHAR(10);
- DECLARE v_dd_field_object VARCHAR(100);
- DECLARE v_dd_field_display_name CHAR(1);
- DECLARE v_query_filter VARCHAR(200);
- DECLARE v_query_grid TEXT;
- DECLARE v_date_fmt VARCHAR(100);
- DECLARE v_obj VARCHAR(100);
- DECLARE v_FieldWidth VARCHAR(10);
- DECLARE v_dvalue VARCHAR(100);
- DECLARE v_q_filter VARCHAR(100);
- DECLARE v_q_inputClassName VARCHAR(100);
- DECLARE v_visibleOn VARCHAR(100);
- DECLARE v_vKey VARCHAR(100);
- DECLARE v_vVal VARCHAR(100);
- DECLARE v_crlf VARCHAR(2);
- DECLARE v_imax INT;
- DECLARE v_inow INT;
- DECLARE v_ipos INT;
-
- -- 與原呼叫端相關(視情況新增)
- DECLARE v_fielddefault NVARCHAR(100); -- 新增的預設值(若無則空)
- DECLARE v_iscolumnmatch CHAR(1); -- 是否傳回多欄位
- DECLARE v_dd_fieldblock INT;
-
- -- 臨時表儲存 JSON 數據
- DROP TEMPORARY TABLE IF EXISTS temp_jsondata_picker;
- CREATE TEMPORARY TABLE temp_jsondata_picker (
- rowid INT AUTO_INCREMENT PRIMARY KEY,
- fieldname VARCHAR(100),
- Fieldcn NVARCHAR(100),
- fieldobject VARCHAR(100),
- field_display_name CHAR(1),
- FieldWidth VARCHAR(10)
- );
-
- -- 取得欄位設定, 多取是否必填
- -- M-D 表單惡裡可能會取到 2筆資料, 要防錯 20250906 (取表頭)
- SELECT fielddefault, iscolumnmatch, fieldblock, FieldWidth, visibleOn, fieldchecknull
- INTO v_fielddefault, v_iscolumnmatch, v_dd_fieldblock, v_FieldWidth, v_visibleOn, v_fieldchecknull
- FROM zen_fields
- WHERE functiontag = p_source_tag AND fieldname = p_fieldname LIMIT 1;
- -- and fieldblock < 90;
-
- SET v_crlf = CONCAT(CHAR(13), CHAR(10));
-
- -- 防錯(Query)
- IF p_ip = '' THEN SET p_ip = '${ls:base_ip}'; END IF;
- IF p_db = '' THEN SET p_db = '${ls:base_db}'; END IF;
-
- -- 取得資料
- SELECT maintable, mainkey, functionname
- INTO v_dd_table, v_dd_pk, v_dd_functionname
- FROM zen_function
- WHERE functiontag = p_picker_tag;
-
- -- 插入資料到臨時表
- INSERT INTO temp_jsondata_picker (fieldname, Fieldcn, fieldobject, field_display_name, FieldWidth)
- SELECT fieldname, Fieldcn, fieldobject, field_display_name, CAST(FieldWidth AS CHAR)
- FROM zen_fields
- WHERE functiontag = p_picker_tag AND fieldds = 'Y'
- ORDER BY celly, cellx;
-
- -- 計算 _group (body-group) 排列
- SELECT MAX(rowid) INTO v_imax FROM temp_jsondata_picker;
- SELECT MIN(rowid) INTO v_inow FROM temp_jsondata_picker;
- -- SET v_inow = 1;
- SET v_query_filter = '';
- SET v_query_grid = '';
-
- WHILE v_inow <= v_imax DO
- SELECT fieldname, Fieldcn, fieldobject, field_display_name, FieldWidth
- INTO v_dd_fieldname, v_dd_Fieldcn, v_dd_field_object, v_dd_field_display_name, v_dd_FieldWidth
- FROM temp_jsondata_picker
- WHERE rowid = v_inow;
-
- IF v_dd_field_display_name = 'Y' THEN
- SET v_labelField = v_dd_fieldname;
- END IF;
-
- IF v_dd_field_object = 'input-text' THEN
- SET v_query_filter = CONCAT(v_query_filter, v_dd_fieldname, ',');
- END IF;
-
- SET v_obj = 'text';
- SET v_date_fmt = '';
-
- IF v_dd_field_object = 'input-date' THEN
- SET v_obj = 'static-date';
- SET v_date_fmt = CONCAT(' "format": "YYYY-MM-DD",', v_crlf);
- END IF;
-
- SET v_query_grid = CONCAT(v_query_grid,
- ' {', v_crlf,
- ' "type": "', v_obj, '",', v_crlf,
- ' "name": "', v_dd_fieldname, '",', v_crlf,
- ' "label": "', v_dd_Fieldcn, '",', v_crlf,
- v_date_fmt,
- ' "toggled": true', v_crlf,
- ' },');
-
- SET v_inow = v_inow + 1;
- END WHILE;
-
- IF v_query_filter <> '' THEN
- SET v_query_filter = SUBSTRING(v_query_filter, 1, CHAR_LENGTH(v_query_filter) - 1);
- END IF;
-
- IF v_query_grid <> '' THEN
- SET v_query_grid = CONCAT(SUBSTRING(v_query_grid, 1, CHAR_LENGTH(v_query_grid) - 1), v_crlf);
- END IF;
-
- -- Query 有2處要修改
- IF p_actiontype = 'Q' THEN
- SET v_dvalue = '*';
- SET v_q_filter = '';
- SET v_q_inputClassName = ' "inputClassName": "w-60",';
- ELSE
- -- 新增也可以給預設值 2023/1/14 Michael
- IF v_fielddefault <> '' THEN
- IF SUBSTRING(v_fielddefault, 1, 3) = 'ls:' THEN
- SET v_fielddefault = CONCAT('${', v_fielddefault, '}');
- END IF;
- END IF;
-
- SET v_dvalue = v_fielddefault;
- SET v_q_filter = '';
- SET v_q_inputClassName = '';
- END IF;
-
- -- 動態顯式否
- IF IFNULL(v_visibleOn, '') <> '' THEN
- SET v_ipos = LOCATE(',', v_visibleOn);
- IF v_ipos > 0 THEN
- SET v_vKey = SUBSTRING(v_visibleOn, 1, v_ipos - 1);
- SET v_vVal = SUBSTRING(v_visibleOn, v_ipos + 1, 100);
- SET v_q_inputClassName = CONCAT(' "visibleOn": "this.', v_vKey, ' == \\"', v_vVal, '\\"",');
- END IF;
- END IF;
-
- -- 加入是否必填
- IF (IFNULL(v_fieldchecknull, '') = 'Y' or IFNULL(v_fieldchecknull, '') = 'A') THEN
- SET v_q_inputClassName = CONCAT(' "required": true,', v_crlf, v_q_inputClassName);
- END IF;
-
- IF SUBSTRING(p_actiontype, 1, 1) = 'E' OR p_actiontype = 'Q' THEN
- SET v_ret = CONCAT('{', v_crlf,
- ' "type": "picker",', v_crlf,
- ' "name": "', p_fieldname, '",', v_crlf,
- ' "joinValues": ', IF(v_iscolumnmatch = 'Y', 'false', 'true'), ',', v_crlf,
- ' "valueField": "', v_dd_pk, '",', v_crlf,
- ' "labelField": "',
- IF((v_dd_fieldblock >= 90 AND v_iscolumnmatch = 'Y') OR IFNULL(v_labelField, '') = '',
- v_dd_pk, v_labelField), '",', v_crlf,
- IF(v_dd_fieldblock >= 90 OR IFNULL(v_labelField, '') = '',
- CONCAT(' "width": ', v_FieldWidth, ',', v_crlf), ''),
- ' "label": "', p_fieldcname, '",', v_crlf,
- v_q_inputClassName, v_crlf,
- ' "source": {', v_crlf,
- ' "method": "post",', v_crlf,
- ' "url": "', p_ip, '/xapi/v2/', p_db, '/orm_api/3/",', v_crlf,
- ' "data": {', v_crlf,
- ' "token": "${ls:token}",', v_crlf,
- ' "page": "${page}",', v_crlf,
- ' "perPage": "${perPage}",', v_crlf,
- ' "keywords": "${', p_fieldname, '_keywords}",', v_crlf,
- ' "_$_tableName": "', v_dd_table, '",', v_crlf,
- ' "_$_pk": "', v_dd_pk, '",', v_crlf,
- ' "_$_action": "P",', v_crlf,
- ' "_$_query_filter": "1^10^', v_dd_pk, '^*^^^', v_query_filter, v_q_filter, '"', v_crlf,
- ' },', v_crlf,
- ' "dataType": "form"', v_crlf,
- ' },', v_crlf,
- ' "size": "', IF(v_imax > 6, 'lg', 'md'), '",', v_crlf,
- ' "value": "', v_dvalue, '",', v_crlf,
- ' "multiple": false,', v_crlf,
- ' "pickerSchema": {', v_crlf,
- ' "mode": "table",', v_crlf,
- ' "tableClassName": "myGridHeader_a",', v_crlf,
- ' "title": "', v_dd_functionname, '",', v_crlf,
- ' "name": "', v_dd_table, '_', p_fieldname, '",', v_crlf,
- ' "headerToolbar": {', v_crlf,
- ' "wrapWithPanel": false,', v_crlf,
- ' "type": "form",', v_crlf,
- ' "className": "text-right",', v_crlf,
- ' "target": "', v_dd_table, '_', p_fieldname, '",', v_crlf,
- ' "mode": "inline",', v_crlf,
- ' "body": [', v_crlf,
- ' {', v_crlf,
- ' "type": "input-text",', v_crlf,
- ' "name": "', p_fieldname, '_keywords",', v_crlf,
- ' "addOn": {', v_crlf,
- ' "type": "submit",', v_crlf,
- ' "label": "查詢",', v_crlf,
- ' "tooltip": "輸入 * 可以查詢全部資料",', v_crlf,
- ' "level": "primary",', v_crlf,
- ' "icon": "fa fa-search pull-left"', v_crlf,
- ' }', v_crlf,
- ' }', v_crlf,
- ' ]', v_crlf,
- ' },', v_crlf,
- ' "columns": [', v_crlf,
- v_query_grid,
- ' ]', v_crlf,
- ' }', v_crlf,
- '}', v_crlf);
- ELSE -- for View
- SET v_ret = CONCAT('{', v_crlf,
- ' "type": "picker",', v_crlf,
- ' "name": "', p_fieldname, '",', v_crlf,
- ' "disabled": true,', v_crlf,
- ' "joinValues": true,', v_crlf,
- ' "valueField": "', v_dd_pk, '",', v_crlf,
- ' "labelField": "', IFNULL(v_labelField, ''), '",', v_crlf,
- ' "label": "', p_fieldcname, '",', v_crlf,
- ' "source": {', v_crlf,
- ' "method": "post",', v_crlf,
- ' "url": "', p_ip, '/xapi/v2/', p_db, '/orm_api/3/",', v_crlf,
- ' "data": {', v_crlf,
- ' "token": "${ls:token}",', v_crlf,
- ' "_$_tableName": "', v_dd_table, '",', v_crlf,
- ' "_$_pk": "', v_dd_pk, '",', v_crlf,
- ' "_$_action": "P",', v_crlf,
- ' "_$_query_filter": "1^10^', v_dd_pk, '^*^^^', v_query_filter, '^${', p_fieldname, '}"', v_crlf,
- ' },', v_crlf,
- ' "dataType": "form"', v_crlf,
- ' }', v_crlf,
- '}', v_crlf);
- END IF;
-
- DROP TEMPORARY TABLE IF EXISTS temp_jsondata_picker;
-
- RETURN v_ret;
-END //
-
-DELIMITER ;
\ No newline at end of file
diff --git a/tools/zen_read_schema.txt b/tools/zen_read_schema.txt
deleted file mode 100644
index b857294..0000000
--- a/tools/zen_read_schema.txt
+++ /dev/null
@@ -1,38 +0,0 @@
-DELIMITER //
-
-CREATE OR REPLACE PROCEDURE zen_read_schema (
- IN p_tablename VARCHAR(100)
-)
-/*
- 功能：讀取資料表結構資訊
- 範例：CALL zen_read_schema('pmsproject_class');
-*/
-BEGIN
- SELECT
- t.TABLE_NAME AS '表格名稱',
- c.COLUMN_NAME AS '欄位名稱',
- c.ORDINAL_POSITION AS '序號',
- c.DATA_TYPE AS '資料型別',
- IFNULL(c.CHARACTER_MAXIMUM_LENGTH, '') AS '長度',
- '' AS '預設值',
- CASE WHEN c.IS_NULLABLE = 'YES' THEN 'N' ELSE 'Y' END AS '是否允許空值',
- IFNULL(
- (SELECT COLUMN_COMMENT
- FROM INFORMATION_SCHEMA.COLUMNS
- WHERE TABLE_SCHEMA = t.TABLE_SCHEMA
- AND TABLE_NAME = t.TABLE_NAME
- AND COLUMN_NAME = c.COLUMN_NAME),
- ''
- ) AS '欄位描述'
- FROM
- INFORMATION_SCHEMA.TABLES t
- LEFT JOIN INFORMATION_SCHEMA.COLUMNS c ON t.TABLE_NAME = c.TABLE_NAME AND t.TABLE_SCHEMA = c.TABLE_SCHEMA
- WHERE
- t.TABLE_TYPE = 'BASE TABLE'
- AND t.TABLE_NAME = p_tablename
- ORDER BY
- t.TABLE_NAME,
- c.ORDINAL_POSITION;
-END//
-
-DELIMITER ;
\ No newline at end of file
diff --git a/tools/zen_showsource.txt b/tools/zen_showsource.txt
deleted file mode 100644
index d7f8d14..0000000
--- a/tools/zen_showsource.txt
+++ /dev/null
@@ -1,111 +0,0 @@
-DELIMITER //
-
-CREATE OR REPLACE PROCEDURE zen_showsource (
- IN p_functiontag VARCHAR(100),
- IN p_version VARCHAR(100),
- IN p_ip varchar(100)
-)
-/*
- function : 配合 amis 的 Service 元件, 取回 jsoncode, 動態產生程式的核心程式
- description: 開啟表單時通常會有預設條件, 這是一個很接近 hard-code 的機制, 但是因為 amis 限制太多, 只好硬開洞解決
- 1.原程式的 crud 若有 ${ls:query_id} ==> 固定變數設定(如下)
- "_$_query_filter": "1^10^functiontag,celly,seqno^*^^^functiontag,report_type,report_orderby^${ls:query_id}"
- 2.sp 的 @version 內容如果有傳入 @, 那 @ 後的內容就是要 replace 的內容
- 3.就把 ${ls:query_id} replace 掉, 用這種方式解決動態載入程式, 並能限制資料內容
- 4.目前是針對 zen12(如上設定), 呼叫 zen14 先測試使用, 如果沒問題可以考慮變成標準機制
-
- 如果 @version 內容中沒有 @, 那就是一般程式, @_W_ 表示是為可編輯 Source 狀態
- build date : 2021/10/17
-
- call sample:
- CALL zen_showsource('zen14','beta@crmr02','https://api.gex.com.tw:5443')
-
- modify history
- item who date modify docs
- ==== ========== ========== ================================================
- 1 michael 2021-10-17 新增
- 2 Michael 2021-10-18 amis 的 crud grid 傳入的 id 似乎是前一筆, 這個 bug 已經有人提, 等改版(已修正)
- 3 Michael 2022-02-05 加入防錯
- 4 Michael 2022-07-14 加入 IP Router 新機制(仍維持向上相容)
- 5 Michael 2022-11-26 加入例外機制, bpmq11, q12
- 6 Michael 2023-01-25 新增 @values=_W_ 的判斷, 非 _W_ 為 Read Only, 只有在 Source 編輯狀態下, 才會傳入 _W_
- 7 Michael 2023-02-01 為了更加彈性, @ip 這個欄位改傳入 ${ls:base_ip}
- 8 Michael 2023-04-04 改依參數檔設定的程式版本別
- 9 Michael 2023-05-20 size=full, 改為 size=xl, 因 amis 3.0 改版
- 10 Michael 2024-02-12 重構程式後, 重新想清楚邏輯後調整 code
- 11 Michael 2024/03/06 擴充 json4 及 json5 2個欄位
-*/
-BEGIN
- -- @version 最終會是版本別, 目前應該只會是 beta 或 prod
- -- @value 則是表單傳值, 要限制開窗表單的資料內容, 若無, 應該要空白
- DECLARE v_version_org VARCHAR(100);
- DECLARE v_values VARCHAR(100);
- DECLARE v_pvalue VARCHAR(100);
- DECLARE v_ipos SMALLINT;
- DECLARE v_rets LONGTEXT;
- DECLARE v_isNew INT;
- DECLARE v_final_version VARCHAR(100);
-
- /*
- 傳入時 @version 可能會有下列內容
- 1.只要含 _W_ 就表示是編輯 source, 直接顯示原內容, 不要有任何 replace
- 2.{ls:query_id}
- 3.beta@A001
- */
- SET v_version_org = p_version;
- SET v_values = '';
- SET v_ipos = INSTR(p_version, '@');
- SET v_final_version = IFNULL(p_version, 'beta');
-
- IF v_ipos > 0 THEN
- -- _W_: Writeables(編輯 Source Code 的狀態)
- SET v_values = SUBSTRING(p_version, v_ipos+1);
- SET v_final_version = SUBSTRING(p_version, 1, v_ipos-1);
- END IF;
-
- -- 依設定的程式版本別設定變數 2023/04/04, @version 一定要有值
- IF (SELECT COUNT(*) FROM information_schema.TABLES
- WHERE TABLE_SCHEMA = DATABASE() AND TABLE_NAME = 'sys_parameter') > 0 THEN
- SELECT pvalue INTO v_pvalue FROM sys_parameter
- WHERE systemid = 'base' AND pid = 'ver_type' LIMIT 1;
-
- IF v_pvalue IS NOT NULL AND v_pvalue <> '' THEN
- SET v_final_version = v_pvalue;
- END IF;
- END IF;
-
- -- 取得 JSON 代碼(擴充欄位)
- -- SELECT CONCAT(IFNULL(jsoncode,''), IFNULL(jsoncode2,''), IFNULL(jsoncode3,''),
- -- IFNULL(jsoncode4,''), IFNULL(jsoncode5,'')) INTO v_rets
-
- SELECT jsoncode INTO v_rets
- FROM zen_jsoncode
- WHERE functiontag = p_functiontag AND version = v_final_version;
-
- -- 只要有 _W_ 就表示不動 code, 完全顯示原本的內容
- IF INSTR(v_version_org, '_W_') <= 0 THEN
- -- 主要的核心程式, 替換掉 ls 的內容
- IF v_values <> '' THEN
- SET v_rets = REPLACE(v_rets, '${ls:query_id}', v_values);
- END IF;
-
- /*
- 這個地方的原寫法是錯的, 本意是當 localStorage 如果未設定值, 執行時會報錯
- 但是會造成只要先讀再寫, ${ls:query_id} 就會被從 json 設定(source code) 中移除, 那就會造成這個設定不見了
- 正確的作法是要確保 ls 一定會在被呼叫前清除, 再傳入 ls 當作參數
- Michael 2023/1/25
- */
- -- 防錯, 若有多餘的設定要防錯 2022-2-5, 加上除外機制
- IF INSTR(v_rets, '${ls:query_id}') > 0 AND (p_functiontag NOT IN ('bpmq11','bpmq12')) THEN
- SET v_rets = REPLACE(v_rets, '${ls:query_id}', '');
- END IF;
- ELSE
- SET v_rets = REPLACE(v_rets, '_W_', '');
- END IF;
-
- -- 返回結果
- SELECT 0 AS code, 'OK' AS msg;
- SELECT v_rets AS jsoncode;
-END//
-
-DELIMITER ;
\ No newline at end of file
diff --git a/tools/zen_tri_json_log.txt b/tools/zen_tri_json_log.txt
deleted file mode 100644
index 100b413..0000000
--- a/tools/zen_tri_json_log.txt
+++ /dev/null
@@ -1,25 +0,0 @@
-DELIMITER //
-
-CREATE TRIGGER zen_tri_json_log
-AFTER UPDATE ON zen_jsoncode
-FOR EACH ROW
-BEGIN
- DECLARE v_cnt INT;
-
- -- 當 json code 被修改, 就記錄到 log
- IF OLD.jsoncode <> NEW.jsoncode OR OLD.jsoncode2 <> NEW.jsoncode2 OR OLD.jsoncode3 <> NEW.jsoncode3 THEN
- INSERT INTO zen_jsoncode_log (log_date, functiontag, version, jsoncode, jsoncode2, jsoncode3)
- VALUES (NOW(), OLD.functiontag, OLD.version, OLD.jsoncode, OLD.jsoncode2, OLD.jsoncode3);
- END IF;
-END//
-
-CREATE TRIGGER zen_tri_json_log_delete
-AFTER DELETE ON zen_jsoncode
-FOR EACH ROW
-BEGIN
- -- 當記錄被刪除時記錄到 log
- INSERT INTO zen_jsoncode_log (log_date, functiontag, version, jsoncode, jsoncode2, jsoncode3)
- VALUES (NOW(), OLD.functiontag, OLD.version, OLD.jsoncode, OLD.jsoncode2, OLD.jsoncode3);
-END//
-
-DELIMITER ;
\ No newline at end of file
diff --git a/tools/zen_updatesource.txt b/tools/zen_updatesource.txt
deleted file mode 100644
index 8ff802b..0000000
--- a/tools/zen_updatesource.txt
+++ /dev/null
@@ -1,63 +0,0 @@
-DELIMITER //
-
-CREATE OR REPLACE PROCEDURE zen_updatesource (
- IN p_functiontag VARCHAR(100),
- IN p_version VARCHAR(100),
- IN p_jsoncode MEDIUMTEXT
-)
-/*
- function : 回寫 json code 的內容(前端有修改傳入)
- description:
- build date : 2021/10/17
-
- call sample:
- CALL zen_updatesource('abc01','beta','json-code')
-
- modify history
- item who date modify docs
- ==== ========== ========== ================================================
- 1 michael 2021-10-17 新增
- 2 Michael 2023-07-09 新增根據 sys_parameter 的 ver_type 判斷版本
- 3 Michael 2024/03/06 擴充 json4 及 json5 2個欄位
-*/
-BEGIN
- DECLARE v_zcode MEDIUMTEXT;
- DECLARE v_pvalue VARCHAR(100);
- DECLARE v_cnt INT;
- DECLARE v_final_version VARCHAR(100) DEFAULT IFNULL(p_version, 'beta');
-
- -- 依設定的程式版本別設定變數 2023/07/09
- -- 檢查 sys_parameter 表是否存在
- IF (SELECT COUNT(*) FROM information_schema.TABLES WHERE TABLE_SCHEMA = DATABASE() AND TABLE_NAME = 'sys_parameter') > 0 THEN
- SELECT pvalue INTO v_pvalue FROM sys_parameter WHERE systemid = 'base' AND pid = 'ver_type' LIMIT 1;
- IF v_pvalue IS NOT NULL AND v_pvalue <> '' THEN
- SET v_final_version = v_pvalue;
- END IF;
- END IF;
-
- SET v_zcode = p_jsoncode;
-
- -- 去除編輯用的特殊字串 2024-02-13
- IF INSTR(v_zcode, '_W_') > 0 THEN
- SET v_zcode = REPLACE(v_zcode, '_W_', '');
- END IF;
-
- -- 檢查記錄是否存在
- SELECT COUNT(*) INTO v_cnt FROM zen_jsoncode WHERE functiontag = p_functiontag AND version = v_final_version;
-
- -- 如果不存在就新增，否則更新
- -- SET v_zcode = REPLACE(v_zcode, '\n', '');
- IF v_cnt <= 0 THEN
- INSERT INTO zen_jsoncode (functiontag, version, jsoncode)
- VALUES (p_functiontag, v_final_version, v_zcode);
- ELSE
- UPDATE zen_jsoncode
- SET jsoncode = v_zcode
- WHERE functiontag = p_functiontag AND version = v_final_version;
- END IF;
-
- -- 回傳成功結果
- SELECT 0 AS code, 'OK' AS msg;
-END //
-
-DELIMITER ;
\ No newline at end of file