<?xml version="1.0" encoding="UTF-8"?>
<rss xmlns:content="http://purl.org/rss/1.0/modules/content/" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#" xmlns:taxo="http://purl.org/rss/1.0/modules/taxonomy/" version="2.0">
  <channel>
    <title>topic Re: Dynamic Select in Application Development and Automation Discussions</title>
    <link>https://community.sap.com/t5/application-development-and-automation-discussions/dynamic-select/m-p/1662990#M293737</link>
    <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;Hi Sudhir,&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;If iam not wrong , you want to use the same form for multiple purpose.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;You can use this code&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;data: p_table(10),&lt;/P&gt;&lt;P&gt;      p_intotable(4),&lt;/P&gt;&lt;P&gt;    p_foralltab(4).&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;p_table = kotd001&lt;/P&gt;&lt;P&gt;p_intotable = itab say for example for into table&lt;/P&gt;&lt;P&gt;  p_foralltab = jtab say for example of for all entries&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;SELECT knumh&lt;/P&gt;&lt;P&gt;matwa&lt;/P&gt;&lt;P&gt;FROM (p_table) into table (p_intotable) for all entries in (p_foralltab).&lt;/P&gt;&lt;P&gt;you can use this way.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Reaward points if it is helpful.&lt;/P&gt;&lt;P&gt;Reagrds,&lt;/P&gt;&lt;P&gt;Kiran I&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
    <pubDate>Mon, 27 Nov 2006 11:56:48 GMT</pubDate>
    <dc:creator>Former Member</dc:creator>
    <dc:date>2006-11-27T11:56:48Z</dc:date>
    <item>
      <title>Dynamic Select</title>
      <link>https://community.sap.com/t5/application-development-and-automation-discussions/dynamic-select/m-p/1662987#M293734</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;Hi All&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;I need to pass internal tables to a select query dynamically. The database table from which i am selecting remains the same but the internal tables are subjected to change. Since I am using for all entries addition, the interpreter refuses to recognize the structure of the internal table on which i am using for all entries.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;The code i tried to work with is as follows, but it throws a syntax error, saying "the structure of &amp;lt;fs_tab2&amp;gt; is unknown, there is no component matwa".&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;form sel_kotd001 using value(fp_tab1)&lt;/P&gt;&lt;P&gt;value(fp_tab2).&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;field-symbols:&amp;lt;fs_tab1&amp;gt; type standard table,&lt;/P&gt;&lt;P&gt;&amp;lt;fs_tab2&amp;gt; type standard table.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;assign fp_tab1 to &amp;lt;fs_tab1&amp;gt;.&lt;/P&gt;&lt;P&gt;assign fp_tab2 to &amp;lt;fs_tab2&amp;gt;.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;SELECT knumh&lt;/P&gt;&lt;P&gt;matwa&lt;/P&gt;&lt;P&gt;FROM kotd001&lt;/P&gt;&lt;P&gt;INTO TABLE &amp;lt;fs_tab1&amp;gt;&lt;/P&gt;&lt;P&gt;FOR ALL ENTRIES IN &amp;lt;fs_tab2&amp;gt;&lt;/P&gt;&lt;P&gt;WHERE matwa EQ &amp;lt;fs_tab2&amp;gt;-matwa.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;endform. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;any help in this regard will be appreciated&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;thanks&lt;/P&gt;&lt;P&gt;Sudhir&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Mon, 27 Nov 2006 11:45:49 GMT</pubDate>
      <guid>https://community.sap.com/t5/application-development-and-automation-discussions/dynamic-select/m-p/1662987#M293734</guid>
      <dc:creator>Former Member</dc:creator>
      <dc:date>2006-11-27T11:45:49Z</dc:date>
    </item>
    <item>
      <title>Re: Dynamic Select</title>
      <link>https://community.sap.com/t5/application-development-and-automation-discussions/dynamic-select/m-p/1662988#M293735</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;Modify your statement like this&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;SELECT knumh&lt;/P&gt;&lt;P&gt;matwa&lt;/P&gt;&lt;P&gt;FROM kotd001&lt;/P&gt;&lt;P&gt;INTO &amp;lt;i&amp;gt;&amp;lt;b&amp;gt;corresponding fields of&amp;lt;/b&amp;gt;&amp;lt;/i&amp;gt; TABLE &amp;lt;fs_tab1&amp;gt;&lt;/P&gt;&lt;P&gt;FOR ALL ENTRIES IN &amp;lt;fs_tab2&amp;gt;&lt;/P&gt;&lt;P&gt;WHERE matwa EQ &amp;lt;fs_tab2&amp;gt;-matwa.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;regards,&lt;/P&gt;&lt;P&gt;Ravi&lt;/P&gt;&lt;P&gt;note - Please mark all the helpful answers&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Mon, 27 Nov 2006 11:51:42 GMT</pubDate>
      <guid>https://community.sap.com/t5/application-development-and-automation-discussions/dynamic-select/m-p/1662988#M293735</guid>
      <dc:creator>Former Member</dc:creator>
      <dc:date>2006-11-27T11:51:42Z</dc:date>
    </item>
    <item>
      <title>Re: Dynamic Select</title>
      <link>https://community.sap.com/t5/application-development-and-automation-discussions/dynamic-select/m-p/1662989#M293736</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;Hi ravi&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;It does not work, the problem is with the recognition of structure of field symbol &amp;lt;fs_tab2&amp;gt; . . . . . it says "The specified type has no structure and therefore no component called MATWA" . . . .&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Mon, 27 Nov 2006 11:56:28 GMT</pubDate>
      <guid>https://community.sap.com/t5/application-development-and-automation-discussions/dynamic-select/m-p/1662989#M293736</guid>
      <dc:creator>Former Member</dc:creator>
      <dc:date>2006-11-27T11:56:28Z</dc:date>
    </item>
    <item>
      <title>Re: Dynamic Select</title>
      <link>https://community.sap.com/t5/application-development-and-automation-discussions/dynamic-select/m-p/1662990#M293737</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;Hi Sudhir,&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;If iam not wrong , you want to use the same form for multiple purpose.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;You can use this code&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;data: p_table(10),&lt;/P&gt;&lt;P&gt;      p_intotable(4),&lt;/P&gt;&lt;P&gt;    p_foralltab(4).&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;p_table = kotd001&lt;/P&gt;&lt;P&gt;p_intotable = itab say for example for into table&lt;/P&gt;&lt;P&gt;  p_foralltab = jtab say for example of for all entries&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;SELECT knumh&lt;/P&gt;&lt;P&gt;matwa&lt;/P&gt;&lt;P&gt;FROM (p_table) into table (p_intotable) for all entries in (p_foralltab).&lt;/P&gt;&lt;P&gt;you can use this way.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Reaward points if it is helpful.&lt;/P&gt;&lt;P&gt;Reagrds,&lt;/P&gt;&lt;P&gt;Kiran I&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Mon, 27 Nov 2006 11:56:48 GMT</pubDate>
      <guid>https://community.sap.com/t5/application-development-and-automation-discussions/dynamic-select/m-p/1662990#M293737</guid>
      <dc:creator>Former Member</dc:creator>
      <dc:date>2006-11-27T11:56:48Z</dc:date>
    </item>
    <item>
      <title>Re: Dynamic Select</title>
      <link>https://community.sap.com/t5/application-development-and-automation-discussions/dynamic-select/m-p/1662991#M293738</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;Hi,&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Check this :&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;PRE&gt;&lt;CODE&gt;
PARAMETERS    :  p_tab LIKE dd03l-tabname,
                 p_opt LIKE rfc_db_opt-text.

FIELD-SYMBOLS : &amp;lt;lt_data&amp;gt; TYPE table. 

SELECT * FROM (p_tab)
          CLIENT SPECIFIED
   INTO CORRESPONDING FIELDS OF TABLE &amp;lt;lt_data&amp;gt;
          UP TO p_rows ROWS
    WHERE mandt = p_mandt
                 AND (p_opt).
&lt;/CODE&gt;&lt;/PRE&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Regards&lt;/P&gt;&lt;P&gt;Appana&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Mon, 27 Nov 2006 12:27:18 GMT</pubDate>
      <guid>https://community.sap.com/t5/application-development-and-automation-discussions/dynamic-select/m-p/1662991#M293738</guid>
      <dc:creator>Laxmana_Appana_</dc:creator>
      <dc:date>2006-11-27T12:27:18Z</dc:date>
    </item>
    <item>
      <title>Re: Dynamic Select</title>
      <link>https://community.sap.com/t5/application-development-and-automation-discussions/dynamic-select/m-p/1662992#M293739</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;Hi,&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Just try&lt;/P&gt;&lt;P&gt;assign &amp;lt;b&amp;gt;(fp_tab1)&amp;lt;/b&amp;gt; to &amp;lt;fs_tab1&amp;gt;.&lt;/P&gt;&lt;P&gt;assign &amp;lt;b&amp;gt;(fp_tab2)&amp;lt;/b&amp;gt; to &amp;lt;fs_tab2&amp;gt;.&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Mon, 27 Nov 2006 12:36:35 GMT</pubDate>
      <guid>https://community.sap.com/t5/application-development-and-automation-discussions/dynamic-select/m-p/1662992#M293739</guid>
      <dc:creator>jayanthi_jayaraman</dc:creator>
      <dc:date>2006-11-27T12:36:35Z</dc:date>
    </item>
    <item>
      <title>Re: Dynamic Select</title>
      <link>https://community.sap.com/t5/application-development-and-automation-discussions/dynamic-select/m-p/1662993#M293740</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;When you use CORRESPONDING FIELDS, the system does not check for fields at design time. I guess you have not use CORRESPONDING clause.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Regards,&lt;/P&gt;&lt;P&gt;Ravi&lt;/P&gt;&lt;P&gt;Note - Please mark all the helpful answers&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Mon, 27 Nov 2006 12:41:11 GMT</pubDate>
      <guid>https://community.sap.com/t5/application-development-and-automation-discussions/dynamic-select/m-p/1662993#M293740</guid>
      <dc:creator>Former Member</dc:creator>
      <dc:date>2006-11-27T12:41:11Z</dc:date>
    </item>
    <item>
      <title>Re: Dynamic Select</title>
      <link>https://community.sap.com/t5/application-development-and-automation-discussions/dynamic-select/m-p/1662994#M293741</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;&amp;lt;b&amp;gt;you can check this code for dynamic internal table create&amp;lt;/b&amp;gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;======&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;REPORT Z_DOWNLOAD_UPLOAD_ANY_TABLE .&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;----------------------------------------------------------------------&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;Program for&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;----------------------------------------------------------------------&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;1. Downloading Data of any DB table to a tab delimited ASCII file&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;*&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;----------------------------------------------------------------------&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;2. Checking if a tab delimited ASCII file has the structure of a&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;   DB table and showing its contents&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;----------------------------------------------------------------------&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;3. Uploading a tab delimited ASCII file to a DB table with the same&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;   structure&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;----------------------------------------------------------------------&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;4. Showing the data of any DB table&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;*&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;======================================================================&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;======================================================================&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;DATA DECLARATIONS&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;======================================================================&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;TYPES : DATA_OBJECT  TYPE REF TO DATA.&lt;/P&gt;&lt;P&gt;DATA  : MITAB TYPE REF TO DATA .&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;TYPE-POOLS : SLIS .&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;DATA  : IT_FIELDCAT TYPE STANDARD TABLE OF slis_fieldcat_alv&lt;/P&gt;&lt;P&gt;        WITH HEADER LINE .&lt;/P&gt;&lt;P&gt;DATA : IT_FIELDCATALOG Type LVC_T_FCAT .&lt;/P&gt;&lt;P&gt;DATA : WA_FIELDCATALOG Type LVC_S_FCAT .&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;DATA : I_STRUCTURE_NAME LIKE DD02L-TABNAME .&lt;/P&gt;&lt;P&gt;DATA : I_CALLBACK_PROGRAM LIKE SY-REPID .&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;DATA  : DYN_LINE TYPE DATA_OBJECT .&lt;/P&gt;&lt;P&gt;FIELD-SYMBOLS : &amp;lt;fs_ITAB&amp;gt; TYPE  STANDARD  TABLE .&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;DATA : TABLE_NAME_IS_VALID TYPE C .&lt;/P&gt;&lt;P&gt;DATA : DYNAMIC_IT_INSTANTIATED TYPE C .&lt;/P&gt;&lt;P&gt;CONSTANTS BUTTONSELECTED TYPE C VALUE 'X' .&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;======================================================================&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;SELECTION SCREEN DEFAULT&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;======================================================================&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;selection-screen begin of line.&lt;/P&gt;&lt;P&gt;SELECTION-SCREEN COMMENT 5(29) T_tabl.&lt;/P&gt;&lt;P&gt;PARAMETERS : MTABLE_N LIKE RSRD1-TBMA_VAL&lt;/P&gt;&lt;P&gt;             mATCHCODE OBJECT DD_DBTB_16 OBLIGATORY .&lt;/P&gt;&lt;P&gt;selection-screen end of line.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;selection-screen begin of line.&lt;/P&gt;&lt;P&gt;SELECTION-SCREEN COMMENT 5(29) T_file.&lt;/P&gt;&lt;P&gt;PARAMETERS : MFILENAM LIKE RLGRAP-FILENAME .&lt;/P&gt;&lt;P&gt;selection-screen end of line.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;selection-screen begin of line.&lt;/P&gt;&lt;P&gt;SELECTION-SCREEN COMMENT 5(29) T_down.&lt;/P&gt;&lt;P&gt;PARAMETERS : P_DOWNLD RADIOBUTTON GROUP GRP1&lt;/P&gt;&lt;P&gt;             user-command M_UCOMM .&lt;/P&gt;&lt;P&gt;selection-screen end of line.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;selection-screen begin of line.&lt;/P&gt;&lt;P&gt;SELECTION-SCREEN COMMENT 5(29) T_chkf.&lt;/P&gt;&lt;P&gt;PARAMETERS : P_chkfil RADIOBUTTON GROUP GRP1 .&lt;/P&gt;&lt;P&gt;selection-screen end of line.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;selection-screen begin of line.&lt;/P&gt;&lt;P&gt;SELECTION-SCREEN COMMENT 5(29) T_upld.&lt;/P&gt;&lt;P&gt;PARAMETERS : P_UPLOAD RADIOBUTTON GROUP GRP1 .&lt;/P&gt;&lt;P&gt;selection-screen end of line.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;selection-screen begin of line.&lt;/P&gt;&lt;P&gt;SELECTION-SCREEN COMMENT 5(29) T_show.&lt;/P&gt;&lt;P&gt;PARAMETERS : P_show_t RADIOBUTTON GROUP GRP1 .&lt;/P&gt;&lt;P&gt;selection-screen end of line.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;======================================================================&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;AT SELECTION SCREEN OUTPUT&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;======================================================================&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;AT SELECTION-SCREEN OUTPUT .&lt;/P&gt;&lt;P&gt;  PERFORM CHECK_FILENAME .&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;======================================================================&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;AT SELECTION SCREEN ON VALUE REQUEST FOR FILENAME&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;======================================================================&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;AT SELECTION-SCREEN ON VALUE-REQUEST FOR MFILENAM .&lt;/P&gt;&lt;P&gt;  PERFORM F4_FOR_FILENAME .&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;======================================================================&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;Initialization .&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;======================================================================&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;Initialization .&lt;/P&gt;&lt;P&gt;  T_tabl = 'Table Name' .&lt;/P&gt;&lt;P&gt;  T_file = 'File Name' .&lt;/P&gt;&lt;P&gt;  T_down = 'Download Table' .&lt;/P&gt;&lt;P&gt;  T_chkf = 'Check File to Upload' .&lt;/P&gt;&lt;P&gt;  T_upld = 'Upload File' .&lt;/P&gt;&lt;P&gt;  T_show = 'Show Table Contents' .&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;======================================================================&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;START OF SELECTION&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;======================================================================&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;START-OF-SELECTION .&lt;/P&gt;&lt;P&gt;  PERFORM CHECK_TABLE_NAME_IS_VALID .&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;======================================================================&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;END OF SELECTION&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;======================================================================&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;END-OF-SELECTION .&lt;/P&gt;&lt;P&gt;  IF TABLE_NAME_IS_VALID EQ ' ' .&lt;/P&gt;&lt;P&gt;    message i398(00) with 'INVALID TABLE NAME' .&lt;/P&gt;&lt;P&gt;  ELSE .&lt;/P&gt;&lt;P&gt;    PERFORM INSTANTIATE_DYNAMIC_INTERNAL_T  .&lt;/P&gt;&lt;P&gt;    CHECK  DYNAMIC_IT_INSTANTIATED = 'X' .&lt;/P&gt;&lt;P&gt;    CASE BUTTONSELECTED .&lt;/P&gt;&lt;P&gt;      WHEN P_DOWNLD .&lt;/P&gt;&lt;P&gt;        PERFORM SELECT_AND_DOWNLOAD .&lt;/P&gt;&lt;P&gt;      when P_chkfil .&lt;/P&gt;&lt;P&gt;        perform CHECK_FILE_TO_UPLOAD .&lt;/P&gt;&lt;P&gt;      WHEN P_UPLOAD .&lt;/P&gt;&lt;P&gt;        PERFORM UPLOAD_FROM_FILE .&lt;/P&gt;&lt;P&gt;      when P_SHOW_T .&lt;/P&gt;&lt;P&gt;        PERFORM SHOW_CONTENTS .&lt;/P&gt;&lt;P&gt;    ENDCASE .&lt;/P&gt;&lt;P&gt;  ENDIF .&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;&amp;amp;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;*&amp;amp;      Form  CHECK_TABLE_NAME_IS_VALID&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;&amp;amp;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;      text&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt; --&amp;gt;  p1        text&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt; &amp;lt;--  p2        text&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;FORM CHECK_TABLE_NAME_IS_VALID.&lt;/P&gt;&lt;P&gt;  DATA MCOUNT TYPE I .&lt;/P&gt;&lt;P&gt;  tables dd02l .&lt;/P&gt;&lt;P&gt;  CLEAR TABLE_NAME_IS_VALID .&lt;/P&gt;&lt;P&gt;  SELECT COUNT(*) INTO MCOUNT FROM TADIR&lt;/P&gt;&lt;P&gt;  WHERE  PGMID = 'R3TR'&lt;/P&gt;&lt;P&gt;  AND    OBJECT = 'TABL'&lt;/P&gt;&lt;P&gt;  AND    OBJ_NAME = MTABLE_N .&lt;/P&gt;&lt;P&gt;  IF MCOUNT EQ 1 .&lt;/P&gt;&lt;P&gt;    clear dd02l .&lt;/P&gt;&lt;P&gt;    select single * from dd02l where TABNAME  = MTABLE_N .&lt;/P&gt;&lt;P&gt;    IF SY-SUBRC eq 0.&lt;/P&gt;&lt;P&gt;      if dd02l-tabclass = 'TRANSP' .&lt;/P&gt;&lt;P&gt;        TABLE_NAME_IS_VALID = 'X' .&lt;/P&gt;&lt;P&gt;      endif .&lt;/P&gt;&lt;P&gt;    ENDIF.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;  ENDIF .&lt;/P&gt;&lt;P&gt;ENDFORM.                    " CHECK_TABLE_NAME_IS_VALID&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;&amp;amp;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;*&amp;amp;      Form  SELECT_AND_DOWNLOAD&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;&amp;amp;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;      text&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt; --&amp;gt;  p1        text&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt; &amp;lt;--  p2        text&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;FORM SELECT_AND_DOWNLOAD.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;  CLEAR : &amp;lt;FS_ITAB&amp;gt; .&lt;/P&gt;&lt;P&gt;  SELECT * FROM (MTABLE_N)&lt;/P&gt;&lt;P&gt;  INTO CORRESPONDING FIELDS OF TABLE &amp;lt;FS_ITAB&amp;gt;   .&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;  PERFORM CHECK_FILENAME.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;  CALL FUNCTION 'WS_DOWNLOAD'&lt;/P&gt;&lt;P&gt;       EXPORTING&lt;/P&gt;&lt;P&gt;            FILENAME                = MFILENAM&lt;/P&gt;&lt;P&gt;            FILETYPE                = 'DAT'&lt;/P&gt;&lt;P&gt;       TABLES&lt;/P&gt;&lt;P&gt;            DATA_TAB                = &amp;lt;FS_ITAB&amp;gt;&lt;/P&gt;&lt;P&gt;       EXCEPTIONS&lt;/P&gt;&lt;P&gt;            FILE_OPEN_ERROR         = 1&lt;/P&gt;&lt;P&gt;            FILE_WRITE_ERROR        = 2&lt;/P&gt;&lt;P&gt;            INVALID_FILESIZE        = 3&lt;/P&gt;&lt;P&gt;            INVALID_TYPE            = 4&lt;/P&gt;&lt;P&gt;            NO_BATCH                = 5&lt;/P&gt;&lt;P&gt;            UNKNOWN_ERROR           = 6&lt;/P&gt;&lt;P&gt;            INVALID_TABLE_WIDTH     = 7&lt;/P&gt;&lt;P&gt;            GUI_REFUSE_FILETRANSFER = 8&lt;/P&gt;&lt;P&gt;            CUSTOMER_ERROR          = 9&lt;/P&gt;&lt;P&gt;            OTHERS                  = 10.&lt;/P&gt;&lt;P&gt;  IF SY-SUBRC eq 0.&lt;/P&gt;&lt;P&gt;    MESSAGE I398(00) WITH 'Table' mtable_n&lt;/P&gt;&lt;P&gt;                          'successfully downloaded to '&lt;/P&gt;&lt;P&gt;                          mfilenam .&lt;/P&gt;&lt;P&gt;  ENDIF.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;ENDFORM.                    " SELECT_AND_DOWNLOAD&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;&amp;amp;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;*&amp;amp;      Form  UPLOAD_FROM_FILE&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;&amp;amp;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;      text&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt; --&amp;gt;  p1        text&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt; &amp;lt;--  p2        text&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;FORM UPLOAD_FROM_FILE.&lt;/P&gt;&lt;P&gt;  DATA : ANS TYPE C .&lt;/P&gt;&lt;P&gt;  DATA : lines_of_itab TYPE I .&lt;/P&gt;&lt;P&gt;  DATA : MSY_SUBRC TYPE I .&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;  CALL FUNCTION 'POPUP_TO_CONFIRM_STEP'&lt;/P&gt;&lt;P&gt;       EXPORTING&lt;/P&gt;&lt;P&gt;            TEXTLINE1 = 'Are you sure you wish to upload'&lt;/P&gt;&lt;P&gt;            TEXTLINE2 = 'data from ASCII File to DB table '&lt;/P&gt;&lt;P&gt;            TITEL     = 'Confirmation of Data Upload'&lt;/P&gt;&lt;P&gt;       IMPORTING&lt;/P&gt;&lt;P&gt;            ANSWER    = ANS.&lt;/P&gt;&lt;P&gt;  if ans = 'J' .&lt;/P&gt;&lt;P&gt;    PERFORM CHECK_FILENAME.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;    CLEAR MSY_SUBRC .&lt;/P&gt;&lt;P&gt;    CALL FUNCTION 'WS_UPLOAD'&lt;/P&gt;&lt;P&gt;         EXPORTING&lt;/P&gt;&lt;P&gt;              FILENAME                = MFILENAM&lt;/P&gt;&lt;P&gt;              FILETYPE                = 'DAT'&lt;/P&gt;&lt;P&gt;         TABLES&lt;/P&gt;&lt;P&gt;              DATA_TAB                = &amp;lt;FS_ITAB&amp;gt;&lt;/P&gt;&lt;P&gt;         EXCEPTIONS&lt;/P&gt;&lt;P&gt;              CONVERSION_ERROR        = 1&lt;/P&gt;&lt;P&gt;              FILE_OPEN_ERROR         = 2&lt;/P&gt;&lt;P&gt;              FILE_READ_ERROR         = 3&lt;/P&gt;&lt;P&gt;              INVALID_TYPE            = 4&lt;/P&gt;&lt;P&gt;              NO_BATCH                = 5&lt;/P&gt;&lt;P&gt;              UNKNOWN_ERROR           = 6&lt;/P&gt;&lt;P&gt;              INVALID_TABLE_WIDTH     = 7&lt;/P&gt;&lt;P&gt;              GUI_REFUSE_FILETRANSFER = 8&lt;/P&gt;&lt;P&gt;              CUSTOMER_ERROR          = 9&lt;/P&gt;&lt;P&gt;              OTHERS                  = 10.&lt;/P&gt;&lt;P&gt;    MSY_SUBRC = MSY_SUBRC  + SY-SUBRC .&lt;/P&gt;&lt;P&gt;    IF SY-SUBRC eq 0.&lt;/P&gt;&lt;P&gt;      describe table &amp;lt;FS_ITAB&amp;gt; lines lines_of_itab .&lt;/P&gt;&lt;P&gt;      IF LINES_OF_ITAB GT 0 .&lt;/P&gt;&lt;P&gt;        DELETE (MTABLE_N) FROM TABLE &amp;lt;fs_itab&amp;gt; .&lt;/P&gt;&lt;P&gt;        commit work .&lt;/P&gt;&lt;P&gt;        insert (MTABLE_N) FROM TABLE &amp;lt;fs_itab&amp;gt; .&lt;/P&gt;&lt;P&gt;        MSY_SUBRC = MSY_SUBRC  + SY-SUBRC .&lt;/P&gt;&lt;P&gt;      ENDIF .&lt;/P&gt;&lt;P&gt;    ENDIF.&lt;/P&gt;&lt;P&gt;    IF  MSY_SUBRC EQ 0  .&lt;/P&gt;&lt;P&gt;      MESSAGE I398(00) WITH LINES_OF_ITAB&lt;/P&gt;&lt;P&gt;                           'Record(s) inserted in table'&lt;/P&gt;&lt;P&gt;                            MTABLE_N .&lt;/P&gt;&lt;P&gt;    ELSE .&lt;/P&gt;&lt;P&gt;      MESSAGE I398(00) WITH&lt;/P&gt;&lt;P&gt;                      'Errors occurred No Records inserted in table'&lt;/P&gt;&lt;P&gt;                       MTABLE_N .&lt;/P&gt;&lt;P&gt;    ENDIF .&lt;/P&gt;&lt;P&gt;  endif .&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;ENDFORM.                    " UPLOAD_FROM_FILE&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;&amp;amp;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;*&amp;amp;      Form  F4_FOR_FILENAME&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;&amp;amp;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;      text&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt; --&amp;gt;  p1        text&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt; &amp;lt;--  p2        text&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;FORM F4_FOR_FILENAME.&lt;/P&gt;&lt;P&gt;  CALL FUNCTION 'WS_FILENAME_GET'&lt;/P&gt;&lt;P&gt;       EXPORTING&lt;/P&gt;&lt;P&gt;            DEF_PATH         = 'C:\'&lt;/P&gt;&lt;P&gt;            MASK             = ',&lt;STRONG&gt;.&lt;/STRONG&gt;,&lt;STRONG&gt;.&lt;/STRONG&gt;.'&lt;/P&gt;&lt;P&gt;            MODE             = '0'&lt;/P&gt;&lt;P&gt;       IMPORTING&lt;/P&gt;&lt;P&gt;            FILENAME         = MFILENAM&lt;/P&gt;&lt;P&gt;       EXCEPTIONS&lt;/P&gt;&lt;P&gt;            INV_WINSYS       = 1&lt;/P&gt;&lt;P&gt;            NO_BATCH         = 2&lt;/P&gt;&lt;P&gt;            SELECTION_CANCEL = 3&lt;/P&gt;&lt;P&gt;            SELECTION_ERROR  = 4&lt;/P&gt;&lt;P&gt;            OTHERS           = 5.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;ENDFORM.                    " F4_FOR_FILENAME&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;&amp;amp;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;*&amp;amp;      Form  CHECK_FILENAME&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;&amp;amp;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;      text&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt; --&amp;gt;  p1        text&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt; &amp;lt;--  p2        text&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;FORM CHECK_FILENAME.&lt;/P&gt;&lt;P&gt;  IF MFILENAM IS INITIAL&lt;/P&gt;&lt;P&gt;  and not ( MTABLE_N is initial  )&lt;/P&gt;&lt;P&gt;  AND P_show_t ne BUTTONSELECTED.&lt;/P&gt;&lt;P&gt;    CONCATENATE 'C:\' MTABLE_N  '.TXT'  INTO MFILENAM.&lt;/P&gt;&lt;P&gt;  ENDIF .&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;ENDFORM.                    " CHECK_FILENAME&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;&amp;amp;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;*&amp;amp;      Form  INSTANTIATE_DYNAMIC_INTERNAL_T&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;&amp;amp;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;      text&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt; --&amp;gt;  p1        text&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt; &amp;lt;--  p2        text&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;FORM INSTANTIATE_DYNAMIC_INTERNAL_T.&lt;/P&gt;&lt;P&gt;  CLEAR DYNAMIC_IT_INSTANTIATED .&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;-----&amp;gt; Step 1 - Finding Field Names and ALV GRID Fieldcatalog&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;  I_STRUCTURE_NAME =  MTABLE_N .&lt;/P&gt;&lt;P&gt;  CLEAR IT_FIELDCAT[] .&lt;/P&gt;&lt;P&gt;  CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'&lt;/P&gt;&lt;P&gt;       EXPORTING&lt;/P&gt;&lt;P&gt;            I_STRUCTURE_NAME       = I_STRUCTURE_NAME&lt;/P&gt;&lt;P&gt;       CHANGING&lt;/P&gt;&lt;P&gt;            CT_FIELDCAT            = IT_FIELDCAT[]&lt;/P&gt;&lt;P&gt;       EXCEPTIONS&lt;/P&gt;&lt;P&gt;            INCONSISTENT_INTERFACE = 1&lt;/P&gt;&lt;P&gt;            PROGRAM_ERROR          = 2&lt;/P&gt;&lt;P&gt;            OTHERS                 = 3.&lt;/P&gt;&lt;P&gt;  IF SY-SUBRC EQ 0.&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;-----&amp;gt; Step 2 - Creating Field Catalog of the Object&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;                                              cl_alv_table_create&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;    LOOP AT IT_FIELDCAT .&lt;/P&gt;&lt;P&gt;      CLEAR WA_FIELDCATALOG .&lt;/P&gt;&lt;P&gt;      MOVE-CORRESPONDING IT_FIELDCAT TO  WA_FIELDCATALOG .&lt;/P&gt;&lt;P&gt;      WA_FIELDCATALOG-REF_FIELD = IT_FIELDCAT-fieldname .&lt;/P&gt;&lt;P&gt;      WA_FIELDCATALOG-REF_TABLE = mtable_n .&lt;/P&gt;&lt;P&gt;      APPEND  WA_FIELDCATALOG  TO it_fieldcatALOG .&lt;/P&gt;&lt;P&gt;    ENDLOOP .&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;-----&amp;gt; Step 3 - Creating Internal Table Dynamicaly&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;    CALL METHOD cl_alv_table_create=&amp;gt;create_dynamic_table&lt;/P&gt;&lt;P&gt;      EXPORTING&lt;/P&gt;&lt;P&gt;        it_fieldcatalog = it_fieldcatALOG&lt;/P&gt;&lt;P&gt;      IMPORTING&lt;/P&gt;&lt;P&gt;        ep_table        = MITAB .&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;    ASSIGN MITAB-&amp;gt;* TO &amp;lt;FS_ITAB&amp;gt; .&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;    DYNAMIC_IT_INSTANTIATED = 'X' .&lt;/P&gt;&lt;P&gt;  ENDIF.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;ENDFORM.                    " INSTANTIATE_DYNAMIC_INTERNAL_T&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;&amp;amp;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;*&amp;amp;      Form  SHOW_CONTENTS&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;&amp;amp;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;      text&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt; --&amp;gt;  p1        text&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt; &amp;lt;--  p2        text&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;FORM SHOW_CONTENTS.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;  CLEAR : &amp;lt;FS_ITAB&amp;gt; .&lt;/P&gt;&lt;P&gt;  SELECT * FROM (MTABLE_N)&lt;/P&gt;&lt;P&gt;  INTO CORRESPONDING FIELDS OF TABLE &amp;lt;FS_ITAB&amp;gt;   .&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;  I_CALLBACK_PROGRAM = SY-REPID .&lt;/P&gt;&lt;P&gt;  CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'&lt;/P&gt;&lt;P&gt;       EXPORTING&lt;/P&gt;&lt;P&gt;            I_CALLBACK_PROGRAM = I_CALLBACK_PROGRAM&lt;/P&gt;&lt;P&gt;            IT_FIELDCAT        = IT_FIELDCAT[]&lt;/P&gt;&lt;P&gt;       TABLES&lt;/P&gt;&lt;P&gt;            T_OUTTAB           = &amp;lt;FS_ITAB&amp;gt;&lt;/P&gt;&lt;P&gt;       EXCEPTIONS&lt;/P&gt;&lt;P&gt;            PROGRAM_ERROR      = 1&lt;/P&gt;&lt;P&gt;            OTHERS             = 2.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;ENDFORM.                    " SHOW_CONTENTS&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;&amp;amp;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;*&amp;amp;      Form  CHECK_FILE_TO_UPLOAD&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;&amp;amp;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;      text&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt; --&amp;gt;  p1        text&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt; &amp;lt;--  p2        text&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;FORM CHECK_FILE_TO_UPLOAD.&lt;/P&gt;&lt;P&gt;  PERFORM CHECK_FILENAME.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt; CLEAR MSY_SUBRC .&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;  CALL FUNCTION 'WS_UPLOAD'&lt;/P&gt;&lt;P&gt;       EXPORTING&lt;/P&gt;&lt;P&gt;            FILENAME                = MFILENAM&lt;/P&gt;&lt;P&gt;            FILETYPE                = 'DAT'&lt;/P&gt;&lt;P&gt;       TABLES&lt;/P&gt;&lt;P&gt;            DATA_TAB                = &amp;lt;FS_ITAB&amp;gt;&lt;/P&gt;&lt;P&gt;       EXCEPTIONS&lt;/P&gt;&lt;P&gt;            CONVERSION_ERROR        = 1&lt;/P&gt;&lt;P&gt;            FILE_OPEN_ERROR         = 2&lt;/P&gt;&lt;P&gt;            FILE_READ_ERROR         = 3&lt;/P&gt;&lt;P&gt;            INVALID_TYPE            = 4&lt;/P&gt;&lt;P&gt;            NO_BATCH                = 5&lt;/P&gt;&lt;P&gt;            UNKNOWN_ERROR           = 6&lt;/P&gt;&lt;P&gt;            INVALID_TABLE_WIDTH     = 7&lt;/P&gt;&lt;P&gt;            GUI_REFUSE_FILETRANSFER = 8&lt;/P&gt;&lt;P&gt;            CUSTOMER_ERROR          = 9&lt;/P&gt;&lt;P&gt;            OTHERS                  = 10.&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt; MSY_SUBRC = MSY_SUBRC  + SY-SUBRC .&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;  IF SY-SUBRC eq 0.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;    I_CALLBACK_PROGRAM = SY-REPID .&lt;/P&gt;&lt;P&gt;    CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'&lt;/P&gt;&lt;P&gt;         EXPORTING&lt;/P&gt;&lt;P&gt;              I_CALLBACK_PROGRAM = I_CALLBACK_PROGRAM&lt;/P&gt;&lt;P&gt;              IT_FIELDCAT        = IT_FIELDCAT[]&lt;/P&gt;&lt;P&gt;         TABLES&lt;/P&gt;&lt;P&gt;              T_OUTTAB           = &amp;lt;FS_ITAB&amp;gt;&lt;/P&gt;&lt;P&gt;         EXCEPTIONS&lt;/P&gt;&lt;P&gt;              PROGRAM_ERROR      = 1&lt;/P&gt;&lt;P&gt;              OTHERS             = 2.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;  endif .&lt;/P&gt;&lt;P&gt;ENDFORM.                    " CHECK_FILE_TO_UPLOAD&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Mon, 27 Nov 2006 13:28:33 GMT</pubDate>
      <guid>https://community.sap.com/t5/application-development-and-automation-discussions/dynamic-select/m-p/1662994#M293741</guid>
      <dc:creator>Former Member</dc:creator>
      <dc:date>2006-11-27T13:28:33Z</dc:date>
    </item>
  </channel>
</rss>

