畫面檔4fd部份屬性設定如下:
- Widget
需設定該欄位為ButtonEdit,只有設定為ButtonEdit時,才能設定開窗動作。 - Image Group
image type設為Select File →這邊指的是要選擇使用檔案。
image設為zoom→這邊指的是要使用檔案的名稱,鼎新開窗用的放大鏡是zoom,所以直接輸入zoom就可以了。 - action
要設定為controlp,指的是按下什麼鍵會執行動作,這邊需要與4GL程式碼相配合。
程式碼4gl部份程式碼如下:
因為我們要寫的是開窗功能,而開窗在TIPTOP系統中是由Control+p來代替,所以控制碼會寫在ON ACTION controlp段,其中需要注意的是下面這行程式碼:
LET g_qryparam.state = "c"
這邊的設定是在判斷開窗後的回傳值型態,設定為"c",指的是回傳值是針對CONSTRUCT使用,可以傳回多筆資料。如果開窗後只能回傳一筆資料(例如INPUT模式),則不能加上這行程式碼。
PS. CALL cl_create_qry()的相關參數說明,另章說明。
沒有留言:
張貼留言