- 论坛徽章:
- 0
|
各位好
我有很多程式裡面都有一個特定字CONTORLF
我要找到CONTROLF後在他底下第一個遇到的CASE 開始到第 一個遇到的
END CASE 之間的文字(可能有三行或四行,不一定)
都置換成我輸入好的特定兩行字 ,請問該怎麼做?
文字檔範例如下
ON ACTION CONTROLZ
CALL cl_show_req_fields()
ON ACTION CONTROLG
CALL cl_cmdask()
ON ACTION CONTROLF
CASE
WHEN INFIELD(azm01)
CALL cl_fldhlp('azm01')
WHEN INFIELD(azm02)
CALL cl_fldhlp('azm02')
WHEN INFIELD(azm011)
CALL cl_fldhlp('azm011')
END CASE
ON ACTION CONTROLO
CASE
IF INFIELD(azm01) THEN
LET g_azm.* = g_azm_t.*
DISPLAY BY NAME g_azm.*
NEXT FIELD azm01
END IF
END CASE |
|