REPORT Y_CLY_S1.
START-OF-SELECTION.
DATA: LFIMG TYPE I VALUE '4'.
DATA: NETWR1 TYPE P LENGTH 10 DECIMALS 2 VALUE '40.14'.
DATA: OVER2 TYPE P LENGTH 10 DECIMALS 3.
DATA: OVER1 TYPE P LENGTH 10 DECIMALS 2.
DATA: RUN TYPE P LENGTH 10 DECIMALS 2.
WRITE: /.
OVER2 = NETWR1 / LFIMG.
WRITE: / '正常取值',NETWR1,'/', LFIMG ,OVER2.
OVER2 = NETWR1 / LFIMG.
WRITE: / '正常取值',NETWR1,'/', LFIMG ,OVER2.
WRITE: /.
OVER1 = NETWR1 / LFIMG.
WRITE: / '四舍五入',NETWR1,'/', LFIMG ,OVER1.
OVER1 = NETWR1 / LFIMG.
WRITE: / '四舍五入',NETWR1,'/', LFIMG ,OVER1.
WRITE: /.
RUN = CEIL( NETWR1 / LFIMG ).
WRITE: / '向上取整',OVER2,RUN.
RUN = FLOOR( NETWR1 / LFIMG ).
WRITE: / '向下取整',OVER2,RUN.