How to display output in a single line?

Question

Hi
im getting the out put in the following way
100006        1120             01
                                      02
                                      03
100007        1410            01
                                     02
                                     03
but i want the output as follows
100006         1120           01,02,03
100007          1410          01,02,03
Can any body tell me the code for this?

Answer 1

Hi Dilip
this is my full code
im not getting the proper out put..
eg : i have material 1000002 for this 3 inspection types are there 01,02,03
                            1000003 for this 1 inspection types are there 05
following program giving me the out put as
                            1000002      1410          03
                            1000003       2140         05
                                                               01
                                                               02
                                                               03
                                                               05
but i want the output as follows
                          1000002          1410        01
                                                               02
                                                               03
                          1000003          2140       05
can u help me on this also?
TABLES:MARC.
TYPE-POOLS: SLIS.
SELECTION-SCREEN:BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-T01.
  SELECT-OPTIONS:S_MATNR FOR MARC-MATNR.
  PARAMETERS:P_WERKS TYPE MARC-WERKS.
  SELECTION-SCREEN:END OF BLOCK B1.
  TYPES:BEGIN OF TYPE_FINAL,
        ART TYPE QMAT-ART,
        MATNR TYPE MARC-MATNR,
        WERKS TYPE MARC-WERKS,
        END OF TYPE_FINAL,
        BEGIN OF TYPE_QMAT,
        ART TYPE QMAT-ART,
        MATNR TYPE QMAT-MATNR,
        END OF TYPE_QMAT.
DATA:IT_FINAL TYPE TABLE OF TYPE_FINAL,
      WA_FINAL LIKE LINE OF IT_FINAL,
      I_FINAL TYPE TABLE OF TYPE_FINAL,
      IT_QMAT TYPE TABLE OF TYPE_QMAT,
      WA_QMAT LIKE LINE OF IT_QMAT.
      DATA: i_FCAT TYPE TABLE OF SLIS_FIELDCAT_ALV,
            W_FCAT TYPE SLIS_FIELDCAT_ALV.
field-symbols: <fs_fin> TYPE TYPE_FINAL.
  START-OF-SELECTION.
  PERFORM GET_DATA.
  PERFORM PROCESS_DATA.
  PERFORM DISPLAY_DATA.
form GET_DATA .
  SELECT MATNR
         WERKS
    FROM MARC
    INTO CORRESPONDING FIELDS OF TABLE IT_FINAL
    WHERE MATNR IN S_MATNR.
    IF IT_FINAL[] IS NOT INITIAL.
      SELECT ART
             MATNR
             WERKS
        FROM QMAT
        INTO CORRESPONDING FIELDS OF TABLE IT_QMAT
        FOR ALL ENTRIES IN IT_FINAL
        WHERE MATNR = IT_FINAL-MATNR
        AND WERKS = IT_FINAL-WERKS.
    ENDIF.
    SORT IT_FINAL BY
    MATNR
    WERKS
    ART.
    DELETE ADJACENT DUPLICATES FROM IT_FINAL COMPARING
    MATNR
    WERKS
    ART.
endform.                    " GET_DATA
form PROCESS_DATA .
move it_final to i_final.
REFRESH IT_FINAL.
LOOP AT I_FINAL assigning <fs_fin>.
LOOP AT IT_QMAT INTO WA_QMAT where MATNR = <fs_fin>-MATNR.
                               P_werks = <fs_fin>-werks.
*REFRESH i_final.
IF sy-subrc eq 0.
<fs_fin>-ART = WA_QMAT-ART.
APPEND <fs_fin>-ART TO i_final.
ENDIF.
  ENDLOOP.
ENDLOOP.
form DISPLAY_DATA .
W_FCAT-FIELDNAME = 'MATNR '.
W_FCAT-SELTEXT_M = 'MATERIAL NUMBER'.
W_FCAT-OUTPUTLEN = '18'.
APPEND W_FCAT TO I_FCAT.
W_FCAT-FIELDNAME = 'WERKS'.
W_FCAT-SELTEXT_M = 'PLANT'.
W_FCAT-OUTPUTLEN = '04'.
APPEND W_FCAT TO I_FCAT.
W_FCAT-FIELDNAME = 'ART'.
W_FCAT-SELTEXT_M = 'INSPECTION TYPE'.
W_FCAT-OUTPUTLEN = '08'.
APPEND W_FCAT TO I_FCAT.
                 " DISPLAY_DATA
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
   I_CALLBACK_PROGRAM = SY-REPID
   IT_FIELDCAT = I_FCAT[]
   I_DEFAULT = 'X'
   I_SAVE = 'A'
  TABLES
    t_outtab = i_final[].
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input         = WA_FINAL-MATNR.
endform.
FORM BUILD_FCAT USING FIELD TYPE SLIS_FIELDNAME
                      TEXT TYPE  dd03p-scrtext_m
                      LENGTH TYPE dd03p-outputlen.
  W_FCAT-FIELDNAME = FIELD.
  W_FCAT-SELTEXT_M = TEXT.
  W_FCAT-OUTPUTLEN = LENGTH.
  APPEND W_FCAT TO i_FCAT.
  CLEAR W_FCAT.
  ENDFORM.
thanks & Regards
Smitha