Skip to Content
-8
Jun 08, 2020 at 10:38 AM

concatenate in loop..!!!

312 Views

hi i wanto to display amount in + - value in in amount ..!! how to do.







LOOP AT l_bseg INTO DATA(w_bseg).

    IF W_BSEG-shkzs = 'H'.
      CONCATENATE '-'  and 'WRBTR' INTO lv_var SEPARATED BY space.
    ENDIF.
    IF W_BSEG-shkzs = 'S'.
      CONCATENATE '+'  and 'WRBTR' INTO lv_var SEPARATED BY space.
    ENDIF.


    gwa_final-belnr = w_bseg-belnr.
*      gwa_final-gjahr = w_bseg-gjahr.
    gwa_final-augcp = w_bseg-augcp.
    gwa_final-shkzg = w_bseg-shkzg.

    gwa_final-gsber = w_bseg-gsber.
    gwa_final-wrbtr = w_bseg-wrbtr.
    gwa_final-pswsl = w_bseg-pswsl.
    gwa_final-dzuonr = w_bseg-zuonr.
    gwa_final-sgtxt = w_bseg-sgtxt.
    gwa_final-hkont = w_bseg-hkont.
    gwa_final-lifnr = w_bseg-lifnr.
    gwa_final-prctr = w_bseg-prctr.
    gwa_final-bupla = w_bseg-bupla.
    gwa_final-budat = w_bseg-h_budat.
    gwa_final-bldat = w_bseg-h_bldat.

    READ TABLE l_bkpf INTO DATA(w_bkpf) WITH KEY belnr = w_bseg-belnr BINARY SEARCH.

    IF sy-subrc EQ 0.
      gwa_final-cpudt = w_bkpf-cpudt.
      gwa_final-xblnr = w_bkpf-xblnr.
      gwa_final-bktxt = w_bkpf-bktxt.

    ENDIF.

    LOOP AT l_skat INTO DATA(w_skat) WHERE saknr = w_bseg-hkont.
* READ TABLE l_skat INTO DATA(w_skat) WITH KEY saknr = w_bseg-hkont BINARY SEARCH.

      IF sy-subrc EQ 0.
        gwa_final-saknr = w_skat-saknr.
        gwa_final-txt50 = w_skat-txt50.
      ENDIF.
    ENDLOOP.


    READ TABLE l_lfa1 INTO DATA(w_lfa1) WITH KEY lifnr = w_bseg-lifnr .

    IF sy-subrc EQ 0.
      gwa_final-name1 = w_lfa1-name1.
    ENDIF.

    APPEND gwa_final TO gt_final.
    CLEAR gwa_final.
  ENDLOOP.