~relax~
這是一個悠閒放鬆的部落格,請用輕鬆的心情閱讀文章,在忙碌工作之餘療癒自己的身心。
(最近發現我的文章被複製轉貼且沒有註明出處,本部落格的文章皆為原創,若有引用參考也會註明,如有需求請留言告知,謝謝!)
目前分類:鼎新學習筆記 (4)
- Dec 05 Wed 2018 09:25
[Crystal Report][水晶報表] 交叉表 垂直及水平都有標題欄位 (鼎新系統學習筆記)
- Nov 30 Fri 2018 13:18
[Oracle][SQL] Recursive 遞廻 展開階層 (鼎新系統學習筆記)
可與 INNER JOIN / OUTER JOIN 一起使用.
SELECT product , part , Level FROM bom START WITH product ='ProductName' CONNECT BY PRIOR part = product
- Nov 16 Fri 2018 11:37
[TIPTOP][4GL] 官方文件參考 (鼎新系統學習筆記)
- Nov 16 Fri 2018 11:29
[TIPTOP][4GL] string split function 分割字串函式 (鼎新系統學習筆記)
#string split function #ignore empty value #p_arg1: input value1 STRING #p_arg2: input value2 STRING #r_arr: return value1 DYNAMIC ARRAY OF STRING #Example: CALL split(str1, str2, arr1) # str1 = 'abc-def--1-2' # str2 = '-' # arr1.getLength() = 4 # arr1[1] = abc , arr1[2] = def , arr1[3] = 1 , arr1[4] = 2 FUNCTION split(p_arg1,p_arg2,r_arr) DEFINE p_arg1 STRING DEFINE p_arg2 STRING DEFINE r_arr DYNAMIC ARRAY OF STRING DEFINE l_cnt INTEGER DEFINE l_str STRING DEFINE tok base.StringTokenizer CALL r_arr.clear() LET tok = base.StringTokenizer.create(p_arg1,p_arg2) LET l_cnt = tok.countTokens() IF cl_null(p_arg2) OR l_cnt <= 0 THEN RETURN ELSE WHILE tok.hasMoreTokens() LET l_str = tok.nextToken() LET l_str = l_str.trim() IF NOT cl_null(l_str) THEN CALL r_arr.appendElement() LET r_arr[r_arr.getLength()] = l_str END IF END WHILE END IF END FUNCTION