editing REUSE_ALV_HIERSEQ_LIST_DISPLAY functionality

[Former Member]

HAI,

I AM USING 'REUSE_ALV_HIERSEQ_LIST_DISPLAY' ....In the output i am getting a '' symbol for all the data in the header and when i click that i am able to see the items (like a tree view) ..but i want the <b>'' to be invisible</b> for my last record of the header ....How can this be achieved....

Regards,

Devendran

[Former Member]

Hi

let me know ur code,so that i can try to solve ur problem.

any way this is my code which i did,just go thru it,if u hv any doubt in it then i wl clear it.

TYPE-POOLS: SLIS.

DATA: BEGIN OF I_VBAK OCCURS 0,

VBELN LIKE VBAK-VBELN,

ERNAM LIKE VBAK-ERNAM,

ERDAT LIKE VBAK-ERDAT,

AUDAT LIKE VBAK-AUDAT,

VAR1,

END OF I_VBAK.

DATA: BEGIN OF I_VBAP OCCURS 0,

VBELN LIKE VBAP-VBELN,

POSNR LIKE VBAP-POSNR,

MATNR LIKE VBAP-MATNR,

CHARG LIKE VBAP-CHARG,

END OF I_VBAP.

DATA: FLDCAT TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE,

LAYOUT TYPE SLIS_LAYOUT_ALV,

KEY TYPE SLIS_KEYINFO_ALV.

SELECT VBELN ERNAM ERDAT AUDAT FROM VBAK

INTO CORRESPONDING FIELDS OF TABLE I_VBAK

UP TO 20 ROWS.

SELECT VBELN POSNR MATNR CHARG FROM VBAP

INTO CORRESPONDING FIELDS OF TABLE I_VBAP

UP TO 20 ROWS.

FLDCAT-FIELDNAME = 'VBELN'.

FLDCAT-TABNAME = 'I_VBAK'.

FLDCAT-REF_FIELDNAME = 'VBELN'.

FLDCAT-REF_TABNAME = 'VBAK'.

FLDCAT-SELTEXT_M = 'SALES DOC.'.

FLDCAT-COL_POS = 0.

FLDCAT-KEY = 'X'.

APPEND FLDCAT.

CLEAR FLDCAT.

FLDCAT-FIELDNAME = 'ERNAM'.

FLDCAT-TABNAME = 'I_VBAK'.

FLDCAT-REF_FIELDNAME = 'ERNAM'.

FLDCAT-REF_TABNAME = 'VBAK'.

FLDCAT-SELTEXT_M = 'NAME OF PERSON'.

FLDCAT-COL_POS = 1.

APPEND FLDCAT.

CLEAR FLDCAT.

FLDCAT-FIELDNAME = 'ERDAT'.

FLDCAT-TABNAME = 'I_VBAK'.

FLDCAT-REF_FIELDNAME = 'ERDAT'.

FLDCAT-REF_TABNAME = 'VBAK'.

FLDCAT-SELTEXT_M = 'RECORD DATE'.

FLDCAT-COL_POS = 2.

APPEND FLDCAT.

CLEAR FLDCAT.

FLDCAT-FIELDNAME = 'AUDAT'.

FLDCAT-TABNAME = 'I_VBAK'.

FLDCAT-REF_FIELDNAME = 'AUDAT'.

FLDCAT-REF_TABNAME = 'VBAK'.

FLDCAT-SELTEXT_M = 'DOCUMENT DATE'.

FLDCAT-COL_POS = 3.

APPEND FLDCAT.

CLEAR FLDCAT.

FLDCAT-FIELDNAME = 'POSNR'.

FLDCAT-TABNAME = 'I_VBAP'.

FLDCAT-REF_FIELDNAME = 'POSNR'.

FLDCAT-REF_TABNAME = 'VBAP'.

FLDCAT-SELTEXT_M = 'SALES DOC ITEM'.

FLDCAT-COL_POS = 4.

APPEND FLDCAT.

CLEAR FLDCAT.

FLDCAT-FIELDNAME = 'MATNR'.

FLDCAT-TABNAME = 'I_VBAP'.

FLDCAT-REF_FIELDNAME = 'MATNR'.

FLDCAT-REF_TABNAME = 'VBAP'.

FLDCAT-SELTEXT_M = 'MATERIAL NO'.

FLDCAT-COL_POS = 5.

APPEND FLDCAT.

CLEAR FLDCAT.

FLDCAT-FIELDNAME = 'CHARG'.

FLDCAT-TABNAME = 'I_VBAP'.

FLDCAT-REF_FIELDNAME = 'CHARG'.

FLDCAT-REF_TABNAME = 'VBAP'.

FLDCAT-SELTEXT_M = 'BATCH NUMBER'.

FLDCAT-COL_POS = 6.

APPEND FLDCAT.

CLEAR FLDCAT.

LAYOUT-EXPAND_FIELDNAME = 'VAR1'.

KEY-HEADER01 = 'VBELN'.

KEY-ITEM01 = 'VBELN'.

CALL FUNCTION 'REUSE_ALV_HIERSEQ_LIST_DISPLAY'

EXPORTING

• I_INTERFACE_CHECK = ' '

I_CALLBACK_PROGRAM = SY-REPID

• I_CALLBACK_PF_STATUS_SET = ' '

• I_CALLBACK_USER_COMMAND = ' '

IS_LAYOUT = LAYOUT

IT_FIELDCAT = FLDCAT[]

• IT_EXCLUDING =

• IT_SPECIAL_GROUPS =

• IT_SORT =

• IT_FILTER =

• IS_SEL_HIDE =

• I_SCREEN_START_COLUMN = 0

• I_SCREEN_START_LINE = 0

• I_SCREEN_END_COLUMN = 0

• I_SCREEN_END_LINE = 0

• I_DEFAULT = 'X'

• I_SAVE = ' '

• IS_VARIANT =

• IT_EVENTS =

• IT_EVENT_EXIT =

I_TABNAME_HEADER = 'I_VBAK'

I_TABNAME_ITEM = 'I_VBAP'

• I_STRUCTURE_NAME_HEADER =

• I_STRUCTURE_NAME_ITEM =

IS_KEYINFO = KEY

• IS_PRINT =

• IS_REPREP_ID =

• I_BYPASSING_BUFFER =

• I_BUFFER_ACTIVE =

• IR_SALV_HIERSEQ_ADAPTER =

• IT_EXCEPT_QINFO =

• I_SUPPRESS_EMPTY_DATA = ABAP_FALSE

• IMPORTING

• E_EXIT_CAUSED_BY_CALLER =

• ES_EXIT_CAUSED_BY_USER =

TABLES

T_OUTTAB_HEADER = I_VBAK

T_OUTTAB_ITEM = I_VBAP

• EXCEPTIONS

• PROGRAM_ERROR = 1

• OTHERS = 2

.

IF SY-SUBRC <> 0.

• MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

• WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

reward points,if it is useful

Message was edited by:

Chandu Valluri