REPORT z_barry_test.
DATA: i TYPE i ,
f TYPE f ,
p(16) TYPE p DECIMALS 2 .
START-OF-SELECTION.
i = '-2147483648'.
i = '2147483647'.
p = '-99999999999999999999999999999.99' .
p = '99999999999999999999999999999.99' .
f = '-1.7976931348623157E+308'.
f = '1.7976931348623157E+308'.
WRITE / :i,p,f.
REPORT Z_BARRY_TEST.
DATA: BEGIN OF wa ,
pack TYPE netwr,
float TYPE f,
integer4 TYPE i ,
integer2 TYPE int2 ,
integer1 TYPE int1 ,
END OF wa.
DATA: result TYPE REF TO data.
FIELD-SYMBOLS: TYPE ANY ,
TYPE ANY.
DO .
ASSIGN COMPONENT sy-index OF STRUCTURE wa TO .
IF sy-subrc <> 0. EXIT. ENDIF.
result = cl_abap_exceptional_values=>get_min_value( ).
IF result IS NOT INITIAL.
ASSIGN result->* TO .
WRITE /(25) .
ENDIF.
result = cl_abap_exceptional_values=>get_max_value( ).
IF result IS NOT INITIAL.
ASSIGN result->* TO .
WRITE (25) .
ENDIF.
ENDDO.
阅读(3502) | 评论(0) | 转发(0) |