以前的方法很笨,是把每一個欄位用 ||的方式拼接成一個字串。其實,現在才發現,可以用RUNSQLSTMT來運行這個SQL,然後OutPut到一個Spool file裡面。以下是思路:1.組裝SQL語句,舊的程式可以用2.把組裝好的SQL語句輸出到QTEMP/RUNSQLSRC的預設的Member.3.調用RUNSQLSTMT來執行SQL語句。4.把輸出的Spool File 拷貝到PF中5.喜歡下載的就Copy to folder 或者SendMail So it will be easy
部分更新語句的欄位可能是最匹配的索引裡麵包含的欄位,那麼他可能導致全表檢索Key:EQDBNT ASC , EQFKND ASC , EQFPP ASC , EQCPP ASC , EQSTLI ASCUPDATE TABLEXX SET EQFPP='A' WHERE EQDBNT=1111 AND EQFKND='AAA'這時候這個索引不能被匹配如果UPDATE TABLEXX SET EQAAA='AAA' WHERE EQDBNT=111 AND
System Function Command Command FunctionChange ProcedureControlCALL (Call) 調用一個程式CALLPRC (Call Procedure) 調用過程RETURN (Return) Returns to the command following the command that caused a program or procedure to be runCL Procedure 界限符PGM (Program)
SQL語句 SELECT DISTINCT EDOWN,EDOPT FROM EMFLIB.EQEDIPF WHERE EDCHK1='' AND EDCHK2='M' AND EDCHK3='' AND EDCHK4='' AND EDTAG2=''資料庫記錄總數 1518741條符合查詢的記錄數 657225條最早的索引 EDCHK1 EDCHK2 EDCHK3 EDCHK4 EDTAG2 EDERRCODE消耗的時間:1分鐘左右為什麼呢?主要的原因在於I/O. 因為EDOWN
In the following CL procedure, a RTVMBRD command retrieves the description of aspecific member. Assume a database file called MFILE exists in the current library(MYLIB) and contains 3 members (AMEMBER, BMEMBER, and CMEMBER).DCL &LIB TYPE(*CHAR)
新聞群組上面看到的1.主機V5R4,也就是說I5的機器,有一個函數row_number() --這個因為自己的主機環境是V5R3 所以無從考證 select * from (select row_number() over (order by id) as rn , * from table1 ) as te2.主機是V5R3或者以下的可以使用如下語句以下語句是取結果的16-20條with x as (Select Col1, Col2, .... ColN from MyTable