DATA:
LV_DMBTR TYPE DMBTR,
LV_DMBTR_C TYPE C LENGTH 20.
LV_DMBTR = 12346789.
WRITE LV_DMBTR TO LV_DMBTR_C CURRENCY/UNIT 'JPY' .
WRITE: / '金额' , LV_DMBTR_C.
结构体声明
TYPES:
BEGIN OF TYP_W_BNKA,
COUUNTRY TYPE BANKS,
BANKL TYPE BANKL,
PROVINCE TYPE PROVZ,
CITY TYPE ORT01_GP,
STRAS TYPE STRAS,
END OF TYP_W_BNKA.
TYP_IT_BNKA TYPE TABLE OF TYP_W_BNKA
DATA:
GW_BNKA TYPE TYP_W_BNKA,
GW_BNKA2 TYPE BNKA.
GIT_BNKA TYPE TYP_IT_BNKA.
主处理
START-OF-SELECTION.
GW_BNKA-COUNTRY = 'CN'.
GW_BNKA-BANKL = ''.
GW_BNKA-PROVINCE = '070'.
GW_BNKA-CITY = '01'.
GW_BNKA-STRAS = '大连市沙河口区'
CLEAR GW_BNKA.
READ TABLE GIT_BNKA INTO GW_BNKA
WITH KEY NS02 COMPONENTS
PEOVINCE = '070'
CITY = '01'.
IF SY-SUBRC =0 .
WRITE: / GW_BNKA.