Feldkatalog aus interner Tabelle LVC_FIELDCATALOG_MERGE ?

[Mehmet1061]

Wieso nicht FuBa 'REUSE_ALV_FIELDCATALOG_MERGE'

Gruss

Robbl

Da dieser für den FuBa-ALV ist!
Hier geht es um den OO-ALV.

[Ramon2764]

Komme zwar spät zu dieser Probelmstellung, kann aber mit einer Lösung aufwarten:

Drei Schritte sind notwendig:
1. Aufbau der Struktur der itab mit LIKE ( oder Direkttypisierung, z.B. DATA HUGO(6) type C, geht auch )

2. Aufbau des REUSE-Feldkatalogs mit dem FuBa REUSE_ALV_FIELDCATALOG_MERGE

3. Transferieren von diesem in einen LVC-Feldkatalog mit dem FuBa LVC_TRANSFER_FROM_SLIS

Ein Codebeispiel ist angehängt.

[Ines3642]

...und dabei brav darauf achten, dass die Zeichenzahl pro Zeile nicht über 72 hinausgeht.

[Ramon2764]

Riiiiiichtig!!!!

Also immer besser, sich doch kurz der Mühe zu unterziehen und die passende Struktur im DDIC anlegen. Dann kann man sich die ganze Trickserei ersparen. ( Mach ich aber auch nicht immer ).
Und wenn man die interne Deklaration der Struktur in einem INCLUDE ablegt, genügt es, das Include-Coding auf 72 Zeichen je Zeile zu beschränken. Und im Import-Parameter I_INCLNAME des FuBas REUSE_ALV_FIELDCATALOG_MERGE muß man dann den Namen des Includes angeben, statt sy-cprog.

[Matilda2566]

Hallo Zusammen,

ich war nun auch auf dieses Thema gestoßen und habe deswegen ganz interessiert die oben stehenden Beiträge gelesen.

Leider funktioniert es bei mir nicht, der Feldkatalog bleibt immer leer.

Hier mein Codingbeispiel:

Code: [Select all] [Expand/Collapse] [Download] (Untitled.txt)

1. REPORT.
2.  
3. TYPE-POOLS: slis.
4.  
5. TYPES: BEGIN OF ty_tab,
6. kunnr  LIKE knvv-kunnr,
7. name1  LIKE kna1-name1,
8. name2  LIKE kna1-name2,
9. pstlz  LIKE kna1-pstlz,
10. ort01  LIKE kna1-ort01,
11. END OF ty_tab.
12. DATA: wa_tab TYPE ty_tab.
13. DATA: it_tab LIKE TABLE OF wa_tab.
14.  
15. DATA: ls_fieldcat TYPE slis_t_fieldcat_alv,
16. ls_lvc_fieldcat TYPE lvc_t_fcat.
17.  
18. CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
19.  EXPORTING
20.    i_program_name               = sy-cprog
21.    i_internal_tabname           = 'IT_TAB'
22. *   i_structure_name             =
23. *   I_CLIENT_NEVER_DISPLAY       = 'X'
24. *   i_inclname                   =
25.    i_bypassing_buffer           = 'X'
26. *   I_BUFFER_ACTIVE              =
27.   CHANGING
28.     ct_fieldcat                  = ls_fieldcat
29.  EXCEPTIONS
30.    INCONSISTENT_INTERFACE       = 1
31.    PROGRAM_ERROR                = 2
32.    OTHERS                       = 3.
33. IF sy-subrc <> 0.
34. * MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
35. *         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
36. ENDIF.
37.  
38. CALL FUNCTION 'LVC_TRANSFER_FROM_SLIS'
39.     EXPORTING
40.       it_fieldcat_alv       = ls_fieldcat
41. *       IT_SORT_ALV           =
42. *       IT_FILTER_ALV         =
43. *       IS_LAYOUT_ALV         =
44.     IMPORTING
45.       et_fieldcat_lvc       = ls_lvc_fieldcat
46. *       ET_SORT_LVC           =
47. *       ET_FILTER_LVC         =
48. *       ES_LAYOUT_LVC         =
49.     TABLES
50.       it_data               = it_tab
51.     EXCEPTIONS
52.       it_data_missing       = 1
53.       OTHERS                = 2.
54. IF sy-subrc <> 0.
55. *     MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
56. *             WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
57. ENDIF.
58.  

GeSHi ©

Da es ja offensichtlich bei Euch schon mal geklappt hat, kann die Lösung doch eigentlich nicht so fern sein ...

[Ramon2764]

die Feldstruktur direkt unter DATA: begin of wa_tab... end of wa_tab mit LIKE definieren, nicht über Bezug auf einen Typen. Der FuBa REUSE_ALV_FIELDCATALOG_MERGE sucht sich offensichtlich die Struktur nur direkt unter einer DATA-Deklaration. In der Doku zum FuBa steht das auch beschrieben.