TIPTOP GP單檔作業.pptVIP

* * 3-27頁 欄位判斷依照新增或者修改來判斷某些欄位是否可以寫入 * 1. 開窗查詢 * * 3-21頁 * 1. 這裡是因為要對資料庫做寫入動作,所以要用cl_err3函式 * * * 3-28頁 * * * * * 3-32頁 只要是交談指令都要寫上面的按鈕 * 第一行:清空資料 第二行:撈資料 第三行:更新 * * * * _copy (3) ON ACTION controlp# 沿用所有欄位 IF INFIELD(azb01) THEN CALL cl_init_qry_var() LET g_qryparam.form = q_gen LET g_qryparam.default1 = g_azb.azb01 CALL cl_create_qry() RETURNING l_newno DISPLAY BY NAME l_newno SELECT gen01 FROM gen_file WHERE gen01= l_newno IF SQLCA.sqlcode THEN DISPLAY BY NAME g_az