Do you need to create or modify tables or structures in the Workbench from an ABAP program? It is easier than you...
By submitting your email address, you agree to receive emails regarding relevant topic offers from TechTarget and its partners. You can withdraw your consent at any time. Contact TechTarget at 275 Grove Street, Newton, MA.
think. This example demonstrates the use of the DDIF_TABL_GET, DDIF_TABL_PUT and DDIF_TABL_ACTIVATE function modules from the SDIF function group. First, it reads information from the COPA table CE31000 and then creates and activates a new dictionary structure with those fields whose name starts with 'VV'.
DATA: t_dd03p LIKE dd03p OCCURS 0 WITH HEADER LINE, wa_dd02v LIKE dd02v . START-OF-SELECTION . CALL FUNCTION 'DDIF_TABL_GET' EXPORTING name = 'CE31000' IMPORTING dd02v_wa = wa_dd02v TABLES dd03p_tab = t_dd03p. DELETE t_dd03p WHERE fieldname(2) NE 'VV'. wa_dd02v-tabclass = 'INTTAB' . wa_dd02v-tabname = 'YCOPAINC' . wa_dd02v-as4user = sy-uname . wa_dd02v-as4time = sy-uzeit . wa_dd02v-as4date = sy-datum . wa_dd02v-applclass = '' . wa_dd02v-authclass = '' . FIELD-SYMBOLS: <fs> LIKE LINE OF t_dd03p. LOOP AT t_dd03p ASSIGNING <fs> . <fs>-tabname = 'YCOPAINC'. ENDLOOP . CALL FUNCTION 'DDIF_TABL_PUT' EXPORTING name = 'YCOPAINC' dd02v_wa = wa_dd02v TABLES dd03p_tab = t_dd03p. CALL FUNCTION 'DDIF_TABL_ACTIVATE' EXPORTING name = 'YCOPAINC'.