Skip to Content
0
Nov 16, 2012 at 11:25 AM

Inserting value in runtime internal Table

66 Views

Hi Experts,

How can I insert some values of internal table (this intertable has 8 fileds) to a runtime internal table(it has 6 fields)?

For example:

TYPES: BEGIN OF ty_final,
banfn TYPE eban-banfn, "Purchase Requisition Number
bnfpo TYPE eban-bnfpo, "Item Number of Purchase Requisition
bsart TYPE eban-bsart, "Purchasing Document Type
matnr TYPE eban-matnr, "Material Number
menge TYPE eban-menge, "Purchase Requisition Quantity
badat TYPE eban-badat, "Requisition (Request) Date
division TYPE eban-werks, "Divisional Plant
dlabst TYPE mard-labst, "Divisional Plant Stock
region TYPE zmmprt_plant-region, "Regional Plant
rlabst TYPE mard-labst, "Regional Plant Stock
END OF ty_final.

data: gt_final TYPE STANDARD TABLE OF ty_final,

gt_ditab TYPE REF TO data,

gwa_ditab type ref to data.

FIELD-SYMBOLS: <gt_ditab> TYPE ANY TABLE,
<gs_ditab> TYPE ANY.

CALL METHOD cl_alv_table_create=>create_dynamic_table
EXPORTING
* i_style_table =
it_fieldcatalog = gt_fieldcat
* i_length_in_byte =
IMPORTING
ep_table = gt_ditab
* e_style_fname =
EXCEPTIONS
generate_subpool_dir_full = 1
OTHERS = 2
.
IF sy-subrc <> 0.
ELSE.
** Assign the dynamic table reference to a field-symbol
ASSIGN gt_ditab->* TO <gt_ditab>.
CREATE DATA gwa_ditab_line LIKE LINE OF <gt_ditab>.
ASSIGN gwa_ditab_line->* TO <gs_ditab>.

ENDIF.

LOOP AT gt_final ASSIGNING <gs_final>.
* Now here based on the values of gt_final I want to populate runtime internal table gt_ditab
ENDLOOP.

or is there any other way to do it?

Please Suggest.

Thanks in advance,

Suman