To handle currency fields (to display in , format)

  * To Change Total GST number format to x,xxx,xxx.xx
  CLEAR: ldf_total_gst,
         ldf_total_amount.

  WHILE ldf_total_gst2 IS NOT INITIAL.
    IF sy-index = 1.
      CONCATENATE ldf_total_gst ldf_total_gst2+12(3) INTO ldf_total_gst.
    ELSE.
      CONCATENATE ldf_total_gst2+12(3) ldf_total_gst  INTO ldf_total_gst.
    ENDIF.
    SHIFT ldf_total_gst2 BY 3 PLACES RIGHT.
    CHECK sy-index <> 1.
    IF ldf_total_gst2 IS NOT INITIAL.
      CONCATENATE  ',' ldf_total_gst INTO ldf_total_gst.
    ENDIF.
  ENDWHILE.

  IF ldf_total_gst+0(1) = ','.
    CLEAR:ldf_len.
    ldf_len = STRLEN( ldf_total_gst ).
    ldf_total_gst = ldf_total_gst+1(ldf_len).
  ENDIF.
******************************************************************

*** replace all occurrences of ',' in ldf_total_gst with space.
*** condense ldf_total_gst no-gaps.
*** replace all occurrences of ',' in ldf_total_amount with space.
*** condense ldf_total_amount no-gaps.
***
***  ldf_total_gst3 = ldf_total_gst.
***  ldf_total_amount3 = ldf_total_amount.
***
***  ldf_total_gst3 = ldf_total_gst3 + ldf_total_gst1.
***  ldf_total_amount3 = ldf_total_amount3 + ldf_total_amount1.
***
***  ldf_total_gst2 = ldf_total_gst3 .
***  ldf_total_amount2 = ldf_total_amount3.
*********************************************************************
  ldf_total_gst2 = ldf_total_gst1 .
  ldf_total_amount2 = ldf_total_amount1.
*********************************************************************