Restricting to 2 decimals from 3 decimals

Question

Hi,
i declared one variable FKLMG TYPE VBRP-FKLMG in an internal table.im geting 3 decimals for this value(ex:12.123).i want to restict it to two decimals(Ex:12.12).i wrote my code as
itab-fklmg = itab-fklmg+0(12).but im getting error as
Field type "P" does not permit a sub-field access.please help in solving it.
Thanks and Regards
k srinivas

Answer 1

Hi Srinivas,
Try this.
data : var type vBRP-FKLMG.
            CALL FUNCTION 'ROUND'
              EXPORTING
               DECIMALS            = 2
                input               = var
               SIGN                = 'X'
             IMPORTING
               OUTPUT              = var
             EXCEPTIONS
               INPUT_INVALID       = 1
               OVERFLOW            = 2
               TYPE_INVALID        = 3
               OTHERS              = 4
            IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
            ENDIF.
write var.
Note : Above code can be used to round as well as truncate.
If you use SIGN = 'X' (as above)
12.123 --> 12.120
12.125 --> 12.130
12.127 --> 12.130
If you want to truncate third decimal use SIGN = '-'
12.123 --> 12.120
12.125 --> 12.120
12.127 --> 12.120
Simarly there is function for getting higher value is you use SIGN = '+'.
Regards,
Mohaiyuddin