I want to display  parameters when i check check box

hi,
i want to display select options when i check check in the selection screen .
if the check box was not checked then those parameters should not be seen.

hi,
check this..
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
SELECT-OPTIONS : S_MATNR FOR MARA-MATNR.
parameterS: check1 as checkbox user-command US1.
SELECTION-SCREEN END OF BLOCK B1.
SELECTION-SCREEN BEGIN OF BLOCK B2 WITH FRAME title text-001.
parameter : p_MATNR1 like MARA-MATNR modif id PRO.
SELECTION-SCREEN END OF BLOCK B2.
AT SELECTION-SCREEN OUTPUT.
  IF NOT check1 IS INITIAL.
    LOOP AT SCREEN.
      IF SCREEN-GROUP1 = 'PRO'.
        SCREEN-INVISIBLE = '0'.
        SCREEN-INPUT  = '1'.
        MODIFY SCREEN.
      ENDIF.
    ENDLOOP.
  ELSE.
    LOOP AT SCREEN.
      IF SCREEN-GROUP1 = 'PRO'.
        SCREEN-INVISIBLE = '1'.
        SCREEN-INPUT  = '0'.
        MODIFY SCREEN.
      ENDIF.
    ENDLOOP.
  ENDIF.
regards,
priya.
Message was edited by:
        Priya

Similar Messages

  • Using a checkbox in numbers- if,then, I want to display today's date if checked, and keep that date, the day it was checked, not the current day

    Using a checkbox in numbers- if,then, I want to display today's date if checked, and keep that date, the day it was checked, not the current day

    this will not work.  Numbers does not provide a timestamp.  you can, however, enter the formula "=now()" in any cell, then copy that same cell, then paste (using the command "Edit > Paste Formula Results"
    If you need a time stamp often,
    make a single cell table with the formula (mentioned earlier).
    and copy and paste as needed

  • I don't want my password "remembered" when opening my email box.

    I checking the "remember my password" box when I set up my email account. Now I don't want my password "remembered" when I open my email...how do I edit the "remember" feature?

    Remembered passwords are stored here:
    Tools > Options > Security > Passwords tab
    or
    Menu icon > Options > Options > Security > Passwords tab
    * click on 'Saved Passwords' button
    * Click on 'show passwords' button.
    There will be two entries for the mail account:
    * Mailbox:// for the mail account
    * smtp:// for the mail account.
    * select these two items and click on 'Remove' button
    * click on 'Close' button
    * click on OK

  • Want remote display

    Dear friends
    i have two sun blade-100 systems in diffrent rooms i want to see the display of the other systems user's activity like " i want to see the netscape brousing of other system's user"
    remotely from my system

    I think you need to be more clear in your question. Do you want to display applications from a remote SUN box locally on your terminal? That can be done easily.
    1. On your local box give permission to display applications via the "xhost" command.
    % xhost <IP address of remote server> (or hostname)
    or
    % xhost +
    (to allow any server to display their apps on your local machine. Less secure...but maybe you don't care)
    2. Login to remote box and point the DISPLAY variable back to your local machine. Thus
    % export DISPLAY=10.124.8.100:0
    (if your local box was 10.124.8.100) and assuming you are using the bash shell.
    3. On remote box, start a GUI app, e.g. Netscape or xterm...should be on your local machine now.
    Easy. If your local box is a PC, you need 3rd party application, like "exceed" to be running.
    However, if you want to "snoop" on users of these 2 boxes in different rooms, that's a different ball game. You need to be more clear on your question :)
    Patrick/

  • I have only a single texbox.i want to display names , date,priortiy in the same textbox when i typed @ names should be display names like when u type comment in facebook for particular person it will display name. when i type ! date should be display and

    i have only a single texbox.i want to display<big style="margin:0px;padding:0px;border:0px;color:#111111;font-family:'Segoe
    UI', Arial, sans-serif;line-height:normal;"> names , date,priortiy </big>in the same textbox <big
    style="margin:0px;padding:0px;border:0px;color:#111111;font-family:'Segoe UI', Arial, sans-serif;line-height:normal;">when i typed @ names should be display names</big> like
    when u type comment in facebook for particular person it will display name. when i type ! date should be display and when i type * priority should be display in same textbox like
    example <big style="margin:0px;padding:0px;border:0px;color:#111111;font-family:'Segoe UI', Arial, sans-serif;line-height:normal;">@
    names !today date or tomorrow date etc * priority high,low ,medium etc</big>

    This is my first time posting here, so I'm sorry, I re-read my post several times and honestly did think I provided enough information, but you're right, it wasn't the right kind. So please (continue to) bear with me, I'm really not trying to be ignorant. I honestly assumed the issue was something I was doing wrong in Bridge, nothing to do with my computer specs.
    I am using a late-2008 Macbook, running Yosemite 10.1.1 (screenshot below)
    On the Mac I am using Bridge CC 6.1.1.115 and Photoshop CC 2014 (2014.2.1 release, 20141014.r.257 x64)
    Here is a link to the System Info from Photoshop on the Mac
    Here is a screenshot of my System Overview on the Mac
    Here is a screenshot of my Photoshop performance preferences on the Mac
    I am also using a Dell desktop with Windows 8, running Photoshop CC 2014 (2014.2.1 release, 20141014.r.257 x32) and Bridge CC 6.1.0.116 x32 (on a separate CC account with separate files that I don't try to sync or anything)
    Here is a link to the System Info from Photoshop on the Windows computer.
    Here is a screenshot of the system overview on the Windows
    Here is a screenshot of my Photoshop Performance preferences on the Windows computer
    I work with jpg, psd, ai, svg, and pdf files. Most of my stacks are three different file types of the same image, usually jpg, psd/ai, and pdf.
    I have not recieved any error messages
    I am not having issues opening raw files, I am not having printing issues, I have listed the troubleshooting steps I have taken.
    Is there any information you need that I missed? I'm trying not to be a dingus, but I'll have to ask you to be patient with me in the meantime. I haven't ever looked up half the hardware/software details that were suggested and I don't know how to off the top of my head, so I provided what I already knew how to

  • I want  to display a text when button pressed

    Hi guys
    I want to display a text when a button is pressed , but the compiler says cannot resolve variable text ,can you please help me
    here is my program
    import  java.awt.Color .*;   import java.awt .*; import java.awt.event.*; import java.awt.event.*;   import javax.swing.*; import javax.swing.JTable.*;   public class sannaa extends JFrame implements  ActionListener {[code] public sannaa( )  {
    super("����� ������" ); setLayout(new FlowLayout()); TextField text = new TextField(20); JButton ok=new JButton( "return"   ); add(text); ok.addActionListener(this);  
    Container   contentPane  =  getContentPane(    ); 
    JLabel hellolabel=new JLabel("google"); hellolabel.setForeground(Color.black); hellolabel.setBackground(Color.blue);   String[ ] columnNames =
    {"First Name",   "Last Name", "Sport",
                             "# of Years",
                             "Vegetarian"};
                            Object [    ][     ] data =
    {"Mary", "Campione", "Snowboarding", new Integer(5), new Boolean(false)},
    {"Alison", "Huml", "Rowing", new Integer(3), new Boolean(true)},
    {"Kathy", "Walrath", "Knitting", new Integer(2), new Boolean (false)},
    {"Sharon", "Zakhour", "Speed reading", new Integer(20), new Boolean(true)},
    {"Philip", "Milne", "Pool", new Integer(10), new Boolean(false)} };
    JTable table = new JTable(data, columnNames); JButton enter=new JButton( "search"   ); ok.setBackground(Color.pink); ok.setForeground(Color.white); JFrame frame=new JFrame("EL  "); enter.setMaximumSize(new Dimension(900,
                                           100)); enter.setForeground(Color.blue); contentPane.setBackground( Color.white); for(int i=0;i<10;i++) {[code]JButton rami=new JButton( ""+ "" +i );
    contentPane.add(rami);
    rami.setBackground(Color.blue); }
    contentPane.add(ok);
    JPanel panel=new JPanel(new BorderLayout(500,500) ); contentPane.setLayout(new FlowLayout( )); contentPane.add(panel); panel.add(enter,  BorderLayout.PAGE_START); panel.add(table, BorderLayout.PAGE_START); panel.add(hellolabel,  BorderLayout.PAGE_START); panel.setBackground( Color.white ); panel.setLayout(new BorderLayout()); panel.add(table.getTableHeader(),BorderLayout.PAGE_START )  panel.add(table, BorderLayout.CENTER); panel.add(hellolabel,BorderLayout.PAGE_END);   setVisible(true); }
    public void actionPerformed(ActionEvent   e  ) {  [code] text.setText("Button Clicked ");
    public static void main (String [] args) {[code] sannaa van=new sannaa( );
    } }  

    Thanks
    I have changed my program to the following and its compiled truely, but when I press thte button in the application no text appeared?
    help me please
    import  java.awt.Color .*;   import java.awt .*; import java.awt.event.*; import java.awt.event.*;   import javax.swing.*; import javax.swing.JTable.*;    public class sannaa extends JFrame implements  ActionListener { 
    public sannaa(   ) {
    super("����� ������" ); JButton ok=new JButton( "return"   );
    ok.addActionListener(this);  
    Container   contentPane  =  getContentPane(
    JLabel hellolabel=new JLabel("google");
    hellolabel.setForeground(Color.black); hellolabel.setBackground(Color.blue);
        String[ ] columnNames =
    {"First Name",   "Last Name", "Sport",
                             "# of Years",
      "Vegetarian"};
                            Object [    ][     ] data =
    {"Mary", "Campione", "Snowboarding", new Integer(5),
    new Boolean(false)},
    {"Alison", "Huml", "Rowing", new Integer(3), new
    Boolean(true)},
    {"Kathy", "Walrath", "Knitting", new Integer(2),
    new Boolean (false)},
    "Sharon", "Zakhour", "Speed reading", new
    Integer(20), new Boolean(true)},
    {"Philip", "Milne", "Pool", new Integer(10),
    new Boolean(false)} };
    JTable table = new JTable(data,
      columnNames); JButton enter=new JButton( "search"
         ); ok.setBackground(Color.pink); ok.setForeground(Color.white); JFrame frame=new JFrame("EL  "); enter.setMaximumSize(new Dimension(900,
      100));
    enter.setForeground(Color.blue); contentPane.setBackground( Color.white);
    for(int i=0;i<10;i++) {  [code]JButton rami=new JButton( ""+ "" +i );
    contentPane.add(rami);
    rami.setBackground(Color.blue); }
    contentPane.add(ok);
    JPanel panel=new JPanel(new
      BorderLayout(500,500) ); contentPane.setLayout(new FlowLayout(
      )); contentPane.add(panel); panel.add(enter,  BorderLayout.PAGE_START);
      panel.add(table,
      BorderLayout.PAGE_START); panel.add(hellolabel,
       BorderLayout.PAGE_START); panel.setBackground( Color.white ); panel.setLayout(new BorderLayout());   panel.add(table.getTableHeader(),BorderLayout.PAGE_START ) ;
       panel.add(table, BorderLayout.CENTER);
    panel.add(hellolabel,BorderLayout.PAGE_END);
       setVisible(true); }
    public void actionPerformed(ActionEvent   e  )
      {  [code] TextField text=new TextField ("") ;
    text.setText("Button Clicked     ");     }
    public static void main (String [] args)
    sannaa van=new sannaa( ); } }  

  • Error in sql server with a trigger (I want to display a customize message, when the user left a blank field or null) How can I do?

    How I display a customize message(with a trigger)when a user left a blank field? I want to the stop the insert statament if the user left  the status field in blank. I create a trigger but now I can't enter a row, i used an instead trigger
    too but doesn't work. I want to display a customize message when the user left the
    status field in blank or null. 
     I have the following code:
    CREATE TRIGGER [dbo].[BLANKFIELD] 
    ON [dbo].[Status] 
    FOR INSERT 
    AS 
    BEGIN 
    IF (SELECT COUNT(*) FROM inserted WHERE Status IS NULL) =1
     PRINT 'Please Fill the Status  field is required'
    Rollback;
    END 

    I agree with other comments that you should do this with specifying that the column is NOT NULL to prevent it from being NULL and a constraint if you don't want it to be blank (spaces or the empty string - note that the empty string is not the same thing
    as NULL).
    But for completeness, the reason your trigger does not ever allow you to enter a row is the code
    IF (SELECT COUNT(*) FROM inserted WHERE Status IS NULL) =1
    PRINT 'Please Fill the Status field is required'
    Rollback;
    Since you don't have a begin/end block after IF, the only conditionally executed statement is the one immediately following the IF (that is the PRINT).  So the Rollback is always executed whether or not the IF is true and so all updates are rejected.
    So if you were to do this in a trigger you could do something like the following
    CREATE TRIGGER [dbo].[BLANKFIELD]
    ON [dbo].[Status]
    FOR INSERT
    AS
    BEGIN
    IF EXISTS(SELECT * FROM inserted WHERE Status IS NULL)
    BEGIN
    PRINT 'Please Fill the Status field is required';
    Rollback;
    END
    END
    (As José noted, there can be more than one row in the inserted pseudo table, so you don't want to test whether the COUNT = 1, instead just whether one or more rows exist where the Status  is null.  If you want to prevent Status is NULL, or all
    spaces, or the empty string, then your IF statement would be
    IF EXISTS(SELECT * FROM inserted WHERE ISNULL(Status, '') = '')
    Tom

  • Hello find my mac displays offline when I'm using the actual mac I want to find at the time, can anyone help?, Hello find my mac displays offline when I'm using the actual mac I want to find at the time, can anyone help?

    Hello find my mac displays offline when I'm using the actual mac I want to find at the time, can anyone help?, Hello find my mac displays offline when I'm using the actual mac I want to find at the time, can anyone help?

    Welcome to the Apple community.
    Is your Mac connected to the network via ethernet. Mac's thatareI connected via ethernet cannot be located using "find my phone".

  • I want to display html textbox information in worddoc when i click submit

    hi ,
    my problem is i want to display html textbox information in worddoc when i click on submit button. i want do open word doc when i perform submit
    please help its very urgent.
    Thanks.
    Raj

    Send the request to a servlet, make it create the doc file, set the response MIME type and stream the file through the response's output stream to show it in the Office IE plug-in.

  • I love osx mountain lion my question is why was air play taken out of specific app like quick time and iTunes i dont always want to display my whole computer when i am in airplay mode

    i love osx mountain lion my question is why was air play taken out of specific app like quick time and iTunes i dont always want to display my whole computer when i am in airplay mode

    Funny, my iTunes still has AirPlay capability without AirPlay Mirroring active.

  • When executing query...in the result i want to display each row values

    Hi All,
    When executing query...in the result area i want to display  each row values.
    Example:  query result is like this
    Business Area   Sales   Material 
    kh02                 1000      2000
                            2000       300
                            5000        400
                            6990       1000
    Kh03                1400        700
                             200        500
                              50          60
    but i need like this
    kh02               1000         2000
    kh02                500           600
    kh02                400           300
    kh03                1400         700
    kh03               200            500
    Why i need like this because am exporting to Excel spread sheet and i have to send as i show above ....i am doing manual but the file is very big like 95, 969 records i have to change manual...like this i have to change 8 files.
    please advice me easy way
    i willl be very gr8ful
    Thanks
    sidhartha

    Hi,
    that'S exactly what hide repeated key values does. If this option is on your result is:
    Kh02 1000 1500
    blank 500 456
    blank 600 700
    kh03 400 500
    balnk 500 600
    If you turn it off, the result will be:
    Kh02 1000 1500
    Kh02 500 456
    kh02 600 700
    kh03 400 500
    kh03 500 600
    Exaclty what you want. Try it, it should work
    Regards,
    Juergen

  • When opening a Word document... an option box displays which I placed a check to 'Do this automatically...' but when redoing same process... option box display.

    We're using EBS application that has a option to open/create download Word document. When we use Firefox v30 to open a Word document, a option box displays to inform where the document is to be open and/or save and a check box which is unmarked... which states... 'Do this automatically for files like this from now on'. I've checked the box and clicked 'OK'. I also checked Firefox options to the application and I checked and verified the Word document settings to 'default'. What happens after re-checking the process to open a Word document... the same open option box displays again... the check box is engage though. I would think that after selecting the box... this display box will not display but directly open the Word document. Please let me know if there is another setting or suggestion.
    Thanks,
    Wil

    The server must
    * Send the correct Content-Type header (e.g. ''application/msword'' MIME type).
    * Not send the ''Content-Disposition: attachment'' header.
    You can use the Web Console to examine the response headers for the file request in question and see if the above two conditions are met.
    * https://developer.mozilla.org/docs/Tools/Web_Console
    If they're not, the workarounds are the Force Content-Type and InlineDisposition add-ons, respectively. I don't know if Force Content-Type still works though.
    * https://addons.mozilla.org/firefox/addon/force-content-type/
    * https://addons.mozilla.org/firefox/addon/inlinedisposition/

  • When working in iPhoto I kept getting a dialog box that asked if I wanted to delete the photo.  I checked the little box that said do not show this again.  Well, I want to get this warning box back but I don't know where to find it.

    Hi I was organizing pictures in iphoto.  I am new at this.  I was deleting a bunch of duplicate pictures and I kept getting a 'warning box" that kept asking "are you sure you want to delete?"  I knew I wanted to delete all these pics so I checked the box that said "check box if you dont want to see this warning."  So checked the box.  Now I want to get that warning box back.  Any ideas?  I can't find anything on the internet or manuals.  thanks

    Try trash the com.apple.iPhoto.plist file from the HD/Users/ Your Name / library / preferences folder.
    (On 10.7: Hold the option (or alt) key while clicking on the Go menu in Finder to access the User Library)
    (Remember you'll need to reset your User options afterwards. These include minor settings like the window colour and so on. Note: If you've moved your library you'll need to point iPhoto at it again.)
    What's the plist file?
    For new users: Every application on your Mac has an accompanying plist file. It records certain User choices. For instance, in your favourite Word Processor it remembers your choice of Default Font, on your Web Browser is remembers things like your choice of Home Page. It even recalls what windows you had open last if your app allows you to pick up from where you left off last. The iPhoto plist file remembers things like the location of the Library, your choice of background colour, whether you are running a Referenced or Managed Library, what preferences you have for autosplitting events and so on. Trashing the plist file forces the app to generate a new one on the next launch, and this restores things to the Factory Defaults. Hence, if you've changed any of these things you'll need to reset them. If you haven't, then no bother. Trashing the plist file is Mac troubleshooting 101.

  • I want to display a DIV , when a radiobutton is clicked... how ?

    how do I achieve it ? I found some examples googling around but none works good yet... please help..

    Hey hey ! I did it !
    Here one way just if someone is interested :
    Insert into the body
    TEXT BEFORE BLOCK<br>
    <input type="radio" id="accept" onclick="document.getElementById('house').style.display = 'block', document.getElementById('decline').checked = 0"> I ACCEPT<br>
    <input type="radio" id="decline" onclick="document.getElementById('house').style.display = 'none',document.getElementById('accept').checked = 0"> I DECLINE<br>
    <div id="house" style="display:none">
    Good, Accepted !!!. <br>
    Second line bla bla bla
    </div>
    <br>
    text after block comes here....

  • I want to display specific line to be color in alvlist how

    i want to display specific line to be color in alvlist
    i write the code as follows here document type is initial. then that line is to be
    appeared as color line but problem is initially it is appeared correct later i moved to next previous screens  error lines are to be colored where i have to clear 
      loop at it_doclist where blart eq space.
          gt_layout-info_fieldname  = 'COLOR_LINE'.
          it_doclist-color_line = 'C600'.
          modify it_doclist .
          clear:it_doclist.
      endloop.
    please help me exactly
    Thanks
    Ramana reddy

    u r requiremnt is not clear...but any how check this code....
    it has a form for assigning colors....
    rewardif useful
    REPORT zppb001_prd_posting_upload
           NO STANDARD PAGE HEADING LINE-SIZE 255
           MESSAGE-ID zpp.
    INCLUDE bdcrecx1.
    TYPE-POOLS  :slis.
    DATA:   wk_success(5) TYPE c,     "To store the successfull Hits
            wk_failure(5) TYPE c,     "To store the failed Hits
            l_mstring(600),           "To store Message texts
            t_date TYPE zservice_date,"To store Uploaded Date
            wk_lines(5) TYPE c,       "To store No of Records
            lines(5) TYPE c,          "To store No of Records
            wk_len(150) TYPE c,       "To store File path
            wk_alp TYPE i,            "To store path length
            lent TYPE i,              "To store path length
            b(4).                     "To store File extension
    DATA:   alvfld TYPE slis_t_fieldcat_alv WITH HEADER LINE,
            v_events TYPE slis_t_event WITH HEADER LINE,
            wk_events LIKE LINE OF v_events,
            it_list_comments TYPE slis_t_listheader,
            wk_list_comments LIKE LINE OF it_list_comments,
            wk_layout TYPE slis_layout_alv.
    CONSTANTS: c_formname_top_of_page TYPE slis_formname
                                   VALUE 'F_TOP_OF_PAGE'.
    --TO STORE FINAL DATA TO BE POSTED--
    Generated data section with specific formatting - DO NOT CHANGE  ***
    DATA: BEGIN OF record OCCURS 0,
            budat_002(010),
            bktxt_004(025),
            matnr_005(018),
            werks_006(004),
            alort_007(004),
            erfmg_008(017),
          END OF record.
    End generated data section ***
    DATA: BEGIN OF messages OCCURS 0,       "TO STORE FINAL STATUS DISPLAY
           budat_002(010),
           bktxt_004(025),
           matnr_005(018),
           maktx TYPE makt-maktx,
           werks_006(004),
           alort_007(004),
           erfmg_008(017),
           msg_e(400),
           msg_s(600),
           msgtyp TYPE c,
           line_color(4),
          END OF messages.
    DATA: BEGIN OF st_record1 ,
           matnr_005(018),
           werks_006(004),
           budat_002(010),
           bktxt_004(025),
           erfmg_007(017),
           erfmg_008(017),
           alort_007(004),
          END OF st_record1.
    DEFINE alv_macro.
      move : &1 to alvfld-col_pos,
             &2 to alvfld-fieldname,
             &3 to alvfld-seltext_m.
      if &2 = 'MATNR_005' or &2 = 'MAKTX'.
        alvfld-fix_column = 'X'.
      endif.
      append alvfld.clear alvfld.
    END-OF-DEFINITION.
    DATA : record1 LIKE TABLE OF st_record1 WITH HEADER LINE,
           it_excel LIKE TABLE OF alsmex_tabline WITH HEADER LINE,
           messtab1 LIKE bdcmsgcoll OCCURS 0 WITH HEADER LINE,
           it_acc LIKE TABLE OF record WITH HEADER LINE,
           it_rej LIKE TABLE OF record WITH HEADER LINE.
    SELECTION-SCREEN SKIP 1.
    SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-002.
    PARAMETERS: p_file TYPE localfile OBLIGATORY .
    SELECTION-SCREEN END OF BLOCK b1.
    AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.
      CALL FUNCTION 'KD_GET_FILENAME_ON_F4'
        EXPORTING
          static    = 'X'
        CHANGING
          file_name = p_file.
    AT SELECTION-SCREEN ON p_file.
      wk_len = p_file.
      CONDENSE wk_len NO-GAPS.
      lent = STRLEN( wk_len ).
      wk_alp = lent - 4.
      b = wk_len+wk_alp(lent).
      IF ( b NE '.txt' ) AND ( b NE '.xls' ).
        MESSAGE e939.
        CLEAR p_file.
        STOP.
      ENDIF.
    START-OF-SELECTION.
      PERFORM upload_fun.
      PERFORM open_group.
      PERFORM fill_bdc_table.
      PERFORM close_group.
      PERFORM assign_colors.
      PERFORM f_event_build.
      SORT messages BY matnr_005 ASCENDING.
      PERFORM assign_columns.
      PERFORM count.
      IF ctu = 'X'.
        PERFORM alv.
      ENDIF.
      FREE:messages,messtab1,record1.
    END-OF-SELECTION.
    --FORM UPLOAD_FUN--
    FORM upload_fun.
    REFRESH: record1, it_acc, it_rej, record, messages, messtab1, it_excel.
      PERFORM fetch_from_flat_file.
      CLEAR it_excel.
      DESCRIBE TABLE it_excel.
      IF sy-tfill = 0.
        MESSAGE i937. STOP.
      ENDIF.
      LOOP AT it_excel.
        CASE it_excel-col.
          WHEN '0001'. MOVE: it_excel-value TO record1-matnr_005.
          WHEN '0002'. MOVE: it_excel-value TO record1-werks_006.
          WHEN '0003'. MOVE: it_excel-value TO record1-budat_002.
          WHEN '0004'. MOVE: it_excel-value TO record1-bktxt_004.
          WHEN '0005'. MOVE: it_excel-value TO record1-erfmg_007.
          WHEN '0006'. MOVE: it_excel-value TO record1-erfmg_008.
          WHEN '0007'. MOVE: it_excel-value TO record1-alort_007.
        ENDCASE.
        AT END OF row.
          APPEND record1. CLEAR record1.
        ENDAT.
      ENDLOOP.
      DELETE record1 WHERE matnr_005 EQ ' '.
    --DO NOT UPLOAD WHERE PRD QTY = 0--
      DELETE record1 WHERE ( erfmg_007 = 0 OR erfmg_007 = ' ' )
                      AND  ( erfmg_008 = 0 OR erfmg_008 = ' ' ).
      DESCRIBE TABLE record1[].
      IF sy-tfill > 0.
    --MOVE ACCEPTED QTY AND FETCH THE RESPECTIVE STGLOC-**
        LOOP AT record1 WHERE erfmg_007 NE 0 AND erfmg_007 NE ' '.
          MOVE:    record1-budat_002 TO it_acc-budat_002,
                   record1-bktxt_004 TO it_acc-bktxt_004,
                   record1-matnr_005 TO it_acc-matnr_005,
                   record1-werks_006 TO it_acc-werks_006,
                   record1-erfmg_007 TO it_acc-erfmg_008.
          APPEND it_acc. CLEAR: it_acc,record1.
        ENDLOOP.
    --MOVE ELPRO FOR THE ACCEPTED ENTRIES--
        LOOP AT it_acc.
          SELECT SINGLE elpro INTO it_acc-alort_007
                                            FROM mkal CLIENT SPECIFIED
                                            WHERE mandt = sy-mandt
                                            AND matnr = it_acc-matnr_005
                                            AND werks = it_acc-werks_006.
          MODIFY it_acc TRANSPORTING alort_007. CLEAR: it_acc.
        ENDLOOP.
    --MOVE PRD QTY FOR REJECTED QTY--
        LOOP AT record1 WHERE erfmg_008 NE 0 AND erfmg_008 NE ' '.
          MOVE: record1-budat_002 TO it_rej-budat_002,
                record1-bktxt_004 TO it_rej-bktxt_004,
                record1-matnr_005 TO it_rej-matnr_005,
                record1-werks_006 TO it_rej-werks_006,
                record1-erfmg_008 TO it_rej-erfmg_008,
                record1-alort_007 TO it_rej-alort_007.
          APPEND it_rej. CLEAR: it_rej, record1.
        ENDLOOP.
    --MOVE ACCEPTED AND REJECTED READINGS TO FINAL TABLE
        APPEND LINES OF it_acc TO record. APPEND LINES OF it_rej TO record.
        FREE : it_rej, it_acc, record1.
      ELSE.
        MESSAGE i937.
        STOP.
      ENDIF.
    ENDFORM.                    " UPLOAD_FUN
    --FORM fill_bdc_table--
    FORM fill_bdc_table.
      IF NOT record[] IS INITIAL.
        LOOP AT record.
          PERFORM bdc_dynpro USING 'SAPLBARM' '0800'.
          PERFORM bdc_field  USING 'BDC_CURSOR' 'RM61B-BKTXT'.
          PERFORM bdc_field  USING 'BDC_OKCODE' '=ISTDA'.
          PERFORM bdc_field  USING 'RM61B-BUDAT' record-budat_002.
          PERFORM bdc_field  USING 'RM61B-BKTXT' record-bktxt_004.
          PERFORM bdc_field  USING 'RM61B-MATNR' record-matnr_005.
          PERFORM bdc_field  USING 'RM61B-WERKS' record-werks_006.
          PERFORM bdc_field  USING 'RM61B-ALORT' record-alort_007.
          PERFORM bdc_field  USING 'RM61B-ERFMG' record-erfmg_008.
          PERFORM bdc_dynpro USING 'SAPLCOWB' '0130'.
          PERFORM bdc_field  USING 'BDC_OKCODE' '=WEIT'.
          PERFORM bdc_field  USING 'BDC_CURSOR' 'G_COWB_HEADER-MNGTXT'.
          PERFORM bdc_transaction USING 'MFBF'.
          CLEAR messtab.
          messtab1[] = messtab[].
          LOOP AT messtab1 WHERE msgtyp = 'S' OR msgtyp = 'E'.
            SELECT SINGLE * FROM t100 WHERE sprsl = messtab1-msgspra
                                      AND   arbgb = messtab1-msgid
                                      AND   msgnr = messtab1-msgnr.
            IF sy-subrc = 0.
              l_mstring = t100-text.
              PERFORM store_messages.
              CLEAR l_mstring.
            ENDIF.
          ENDLOOP.
          MOVE-CORRESPONDING record TO messages.
         SELECT SINGLE maktx INTO messages-maktx FROM makt CLIENT SPECIFIED
                                                 WHERE mandt = sy-mandt
                                              AND matnr = messages-matnr_005
                                              AND spras = 'EN'.
          APPEND messages.
          CLEAR: messages, messtab1. REFRESH messtab1.
        ENDLOOP.
      ENDIF.
    ENDFORM.                    "fill_bdc_table
    --FORM assign_columns--
    FORM assign_columns .
      REFRESH alvfld.
      alv_macro '1' 'MATNR_005' 'PART NO'.
      alv_macro '2' 'MAKTX' 'DESCRIPTION'.
      alv_macro '3' 'WERKS_006' 'PLANT'.
      alv_macro '4' 'BUDAT_002' 'POSTING DATE'.
      alv_macro '5' 'BKTXT_004' 'SHIFT'.
      alv_macro '6' 'ERFMG_008' 'QUANTITY'.
      alv_macro '7' 'ALORT_007' 'STGLOC'.
      alv_macro '8' 'MSG_E' 'ERRORS DUE TO'.
      alv_macro '9' 'MSG_S' 'STATUS'.
    ENDFORM.                    " assign_columns
    --FORM f_event_build--
    FORM f_event_build .
      CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
        EXPORTING
          i_list_type = 0
        IMPORTING
          et_events   = v_events[].
      READ TABLE v_events WITH KEY name = slis_ev_top_of_page
                                               INTO wk_events.
      wk_layout-info_fieldname = 'LINE_COLOR'.
      wk_layout-colwidth_optimize    = 'X'.
      IF sy-subrc = 0.
        MOVE c_formname_top_of_page TO wk_events-form.
        MODIFY v_events FROM wk_events INDEX sy-tabix.
      ENDIF.
    ENDFORM.                    " f_event_build
    --FORM f_top_of_page--
    FORM f_top_of_page.
      WRITE sy-datum TO t_date.
      CLEAR: it_list_comments[].
      wk_list_comments-typ  = 'H'. "H=Header, S=Selection, A=Action
      wk_list_comments-key  = ''.
    CONCATENATE 'UPLOADED STATUS FOR PRODUCTION POSTING ON - ' t_date INTO
                                 wk_list_comments-info SEPARATED BY space.
      APPEND wk_list_comments TO it_list_comments.
      CLEAR wk_list_comments.
      DESCRIBE TABLE messages LINES wk_lines.
      lines = wk_lines.
      wk_list_comments-typ  = 'S'. "H=Header, S=Selection, A=Action
      wk_list_comments-key  = ''.
      CONCATENATE 'Total No of Hits:' lines INTO wk_list_comments-info
                                                      SEPARATED BY space.
      APPEND wk_list_comments TO it_list_comments.
      CLEAR wk_list_comments.
      wk_list_comments-typ  = 'S'. "H=Header, S=Selection, A=Action
      wk_list_comments-key  = ''.
      CONCATENATE 'Successfull Hits:' wk_success INTO
                wk_list_comments-info SEPARATED BY space.
      APPEND wk_list_comments TO it_list_comments.
      CLEAR wk_list_comments.
      wk_list_comments-typ  = 'S'. "H=Header, S=Selection, A=Action
      wk_list_comments-key  = ''.
      CONCATENATE '    Failed Hits:' '   ' wk_failure INTO
                              wk_list_comments-info
                              SEPARATED BY space.
      APPEND wk_list_comments TO it_list_comments.
      CLEAR wk_list_comments.
      CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
        EXPORTING
          i_logo             = 'ENJOYSAP_LOGO'
          it_list_commentary = it_list_comments.
    ENDFORM.                    "F_TOP_OF_PAGE
    --FORM assign_colors--
    FORM assign_colors .
      LOOP AT messages.
        CASE messages-msgtyp.
          WHEN 'E'.
            messages-line_color = 'C601'.
          WHEN 'S'.
            messages-line_color = 'C501'.
        ENDCASE.
        MODIFY messages TRANSPORTING line_color.
      ENDLOOP.
    ENDFORM.                    " assign_colors
    --FORM COUNT--
    FORM count .
      CLEAR: wk_failure, wk_success.
      LOOP AT messages.
        CASE messages-msgtyp.
          WHEN 'E'.
            ADD 1 TO wk_failure.
          WHEN 'S'.
            ADD 1 TO wk_success.
        ENDCASE.
      ENDLOOP.
    ENDFORM.                    " COUNT
    --FORM ALV--
    FORM alv .
      CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
        EXPORTING
          i_callback_program = sy-repid
          is_layout          = wk_layout
          it_fieldcat        = alvfld[]
          it_events          = v_events[]
        TABLES
          t_outtab           = messages
        EXCEPTIONS
          program_error      = 1
          OTHERS             = 2.
    ENDFORM.                    " ALV
    --FETCH_FROM_FLAT_FILE--
    FORM fetch_from_flat_file .
      CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
        EXPORTING
          filename                = p_file
          i_begin_col             = 1 "From 1st Column
          i_begin_row             = 2 "From 2nd row
          i_end_col               = 7 "Till 7th Column
          i_end_row               = 65000 "Till Row
        TABLES
          intern                  = it_excel
        EXCEPTIONS
          inconsistent_parameters = 1
          upload_ole              = 2
          OTHERS                  = 3.
    ENDFORM.                    " FETCH_FROM_FLAT_FILE
    --FORM STORE_MESSAGES--
    FORM store_messages.
      IF l_mstring CS '&1'.
        REPLACE '&1' WITH messtab1-msgv1 INTO l_mstring.
        REPLACE '&2' WITH messtab1-msgv2 INTO l_mstring.
        REPLACE '&3' WITH messtab1-msgv3 INTO l_mstring.
        REPLACE '&4' WITH messtab1-msgv4 INTO l_mstring.
      ELSE.
        REPLACE '&' WITH messtab1-msgv1 INTO l_mstring.
        REPLACE '&' WITH messtab1-msgv2 INTO l_mstring.
        REPLACE '&' WITH messtab1-msgv3 INTO l_mstring.
        REPLACE '&' WITH messtab1-msgv4 INTO l_mstring.
      ENDIF.
      CONDENSE l_mstring.
      IF messtab1-msgtyp = 'E'.
    CONCATENATE messages-msg_s l_mstring INTO l_mstring SEPARATED BY space.
        MOVE l_mstring TO messages-msg_e.
        MOVE 'E' TO messages-msgtyp.
        MOVE 'Document Not Posted' TO messages-msg_s.
      ELSEIF messtab1-msgtyp = 'S'.
    CONCATENATE messages-msg_s l_mstring INTO l_mstring SEPARATED BY space.
        MOVE l_mstring TO messages-msg_s.
        MOVE 'S' TO messages-msgtyp.
      ENDIF.
    ENDFORM.                    " store_messages

Maybe you are looking for