日韩性视频-久久久蜜桃-www中文字幕-在线中文字幕av-亚洲欧美一区二区三区四区-撸久久-香蕉视频一区-久久无码精品丰满人妻-国产高潮av-激情福利社-日韩av网址大全-国产精品久久999-日本五十路在线-性欧美在线-久久99精品波多结衣一区-男女午夜免费视频-黑人极品ⅴideos精品欧美棵-人人妻人人澡人人爽精品欧美一区-日韩一区在线看-欧美a级在线免费观看

歡迎訪問 生活随笔!

生活随笔

當(dāng)前位置: 首頁 > 运维知识 > 数据库 >内容正文

数据库

通过LDB_PROCESS函数使用逻辑数据库

發(fā)布時(shí)間:2025/3/20 数据库 29 豆豆
生活随笔 收集整理的這篇文章主要介紹了 通过LDB_PROCESS函数使用逻辑数据库 小編覺得挺不錯(cuò)的,現(xiàn)在分享給大家,幫大家做個(gè)參考.
樣例代碼及說明
TABLES SPFLI.
SELECT-OPTIONS S_CARR FOR SPFLI-CARRID.

TYPE-POOLS: RSDS, RSFS.

DATA: CALLBACK TYPE TABLE OF LDBCB,
  ??? CALLBACK_WA LIKE LINE OF CALLBACK.

DATA: SELTAB TYPE TABLE OF RSPARAMS,
????? SELTAB_WA LIKE LINE OF SELTAB.

DATA: TEXPR TYPE RSDS_TEXPR,
????? FSEL? TYPE RSFS_FIELDS.

??? *設(shè)置需要回調(diào)的數(shù)據(jù)節(jié)點(diǎn)和回調(diào)對應(yīng)的子程序
??? CALLBACK_WA-LDBNODE???? = 'SPFLI'.
??? CALLBACK_WA-GET???????? = 'X'.
??? CALLBACK_WA-GET_LATE??? = 'X'.
??? CALLBACK_WA-CB_PROG???? = SY-REPID.
??? CALLBACK_WA-CB_FORM???? = 'CALLBACK_SPFLI'.
??? APPEND CALLBACK_WA TO CALLBACK.

??? CLEAR CALLBACK_WA.
??? CALLBACK_WA-LDBNODE???? = 'SFLIGHT'.
??? CALLBACK_WA-GET???????? = 'X'.
??? CALLBACK_WA-CB_PROG???? = SY-REPID.
??? CALLBACK_WA-CB_FORM???? = 'CALLBACK_SFLIGHT'.
??? APPEND CALLBACK_WA TO CALLBACK.

??? *設(shè)置對應(yīng)的選擇屏幕的參數(shù)的傳入值
??? SELTAB_WA-KIND = 'S'.
??? SELTAB_WA-SELNAME = 'CARRID'.

??? LOOP AT S_CARR.
??? MOVE-CORRESPONDING S_CARR TO SELTAB_WA.
??? APPEND SELTAB_WA TO SELTAB.
??? ENDLOOP.

??? *調(diào)用函數(shù)
CALL FUNCTION 'LDB_PROCESS'
???? EXPORTING
????????? LDBNAME???????????????????? = 'F1S'
????????? VARIANT???????????????????? = ' '
????????? EXPRESSIONS???????????????? = TEXPR
????????? FIELD_SELECTION???????????? = FSEL
???? TABLES
????????? CALLBACK??????????????????? = CALLBACK
????????? SELECTIONS????????????????? = SELTAB
???? EXCEPTIONS
????????? LDB_NOT_REENTRANT?????????? = 1
????????? LDB_INCORRECT?????????????? = 2
????????? LDB_ALREADY_RUNNING???????? = 3
????????? LDB_ERROR?????????????????? = 4
????????? LDB_SELECTIONS_ERROR??????? = 5
????????? LDB_SELECTIONS_NOT_ACCEPTED = 6
????????? VARIANT_NOT_EXISTENT??????? = 7
????????? VARIANT_OBSOLETE??????????? = 8
????????? VARIANT_ERROR?????????????? = 9
????????? FREE_SELECTIONS_ERROR?????? = 10
????????? CALLBACK_NO_EVENT?????????? = 11
????????? CALLBACK_NODE_DUPLICATE???? = 12
????????? OTHERS????????????????????? = 13.

IF SY-SUBRC <> 0.
? WRITE: 'Exception with SY-SUBRC', SY-SUBRC.
ENDIF.

*SPFLI節(jié)點(diǎn)對應(yīng)的回調(diào)處理函數(shù)
FORM CALLBACK_SPFLI USING NAME? TYPE LDBN-LDBNODE
????????????????????????? WA??? TYPE SPFLI
????????????????????????? EVT?? TYPE C
????????????????????????? CHECK TYPE C.
? CASE EVT.
?? WHEN 'G'.
????? WRITE: / WA-CARRID, WA-CONNID, WA-CITYFROM, WA-CITYTO.
????? ULINE.
??? WHEN 'L'.
????? ULINE.
? ENDCASE.
ENDFORM.

*SFIGHT節(jié)點(diǎn)對應(yīng)的回調(diào)處理函數(shù)
FORM CALLBACK_SFLIGHT USING NAME? TYPE LDBN-LDBNODE
??????????????????????????? WA??? TYPE SFLIGHT
??????????????????????????? EVT?? TYPE C
??????????????????????????? CHECK TYPE C.
? WRITE: / WA-FLDATE, WA-SEATSOCC, WA-SEATSMAX.
ENDFORM.

??? 注意:通過'LDB_PROCESS'函數(shù)訪問邏輯數(shù)據(jù)庫時(shí),請不要在程序?qū)傩岳锝壎ㄟ壿嫈?shù)據(jù)庫,否則會出LDB_ALREADY_RUNNING錯(cuò)誤。


總結(jié)

以上是生活随笔為你收集整理的通过LDB_PROCESS函数使用逻辑数据库的全部內(nèi)容,希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯(cuò),歡迎將生活随笔推薦給好友。