REPORT z_barry_test NO STANDARD PAGE HEADING .
TABLES resb.
DATA: amount_in LIKE bapicurr-bapicurr ,
amount_ex LIKE bapicurr-bapicurr .
SELECT * FROM resb UP TO 100 ROWS WHERE waers = 'TWD'.
amount_in = resb-gpreis.
CALL FUNCTION 'BAPI_CURRENCY_CONV_TO_EXTERNAL'
EXPORTING
currency = resb-waers
amount_internal = amount_in
IMPORTING
amount_external = amount_ex.
WRITE: / resb-gpreis,amount_ex,resb-waers.
ENDSELECT.
阅读(3182) | 评论(0) | 转发(1) |