Range的用法三種基本用法
阿新 • • 發佈:2020-12-08
RANGE用法類似SELECT-OPTION,為帶表頭的內表,有OPTION、SIGN、LOW、HIGH四個欄位值。
定義形式:DATA R_TIME TYPE RANGE OF ZTPUBLOG-LASTP WITH HEADER LINE
1.用法一:篩選以“3*”開頭的相關資料。(OPTION = ‘CP’)
DATA R_WERKS_3 TYPE RANGE OF VBAP-WERKS WITH HEADER LINE. R_WERKS_3-SIGN = 'I'. R_WERKS_3-OPTION = 'CP'. R_WERKS_3-LOW = '3*'. APPENDR_WERKS_3.
2.用法二:篩選值等於“CD01”~“CD07”的相關資料。(LOW值)
DATA R_WERKS_CD TYPE RANGE OF VBAP-WERKS WITH HEADER LINE。 R_WERKS_CD-SIGN = 'I'. R_WERKS_CD-OPTION = 'EQ'. R_WERKS_CD-LOW = 'CD01'. APPEND R_WERKS_CD. R_WERKS_CD-LOW = 'CD02'. APPEND R_WERKS_CD. R_WERKS_CD-LOW = 'CD03'. APPEND R_WERKS_CD. R_WERKS_CD-LOW = 'CD04'. APPEND R_WERKS_CD. R_WERKS_CD-LOW = 'CD05'. APPEND R_WERKS_CD. R_WERKS_CD-LOW = 'CD06'. APPEND R_WERKS_CD. R_WERKS_CD-LOW = 'CD07'. APPEND R_WERKS_CD.
3.用法三:篩選以時間為區間的相關資料。(OPTION = ‘BT’)
DATA R_WERKS_CD TYPE RANGE OF VBAP-WERKS WITH HEADER LINE. CONCATENATE SY-DATUM SY-UZEIT INTOLV_ETIME. R_TIME-SIGN = 'I'. R_TIME-OPTION = 'BT'. SELECT SINGLE LASTP FROM ZTPUBLOG INTO LV_STIME WHERE FEILBM EQ SY-REPID. IF SY-SUBRC EQ 0. R_TIME-LOW = LV_STIME. ELSE. LV_TIME = SY-UZEIT - 300. CONCATENATE SY-DATUM LV_TIME INTO LV_ETIME. R_TIME-LOW = LV_ETIME. ENDIF. R_TIME-HIGH = LV_ETIME. APPEND R_TIME.