没有小数位的货币在数据库中的保存（不理解，测试）

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 .