How can i know the row number of my table is being modified?

HI all,
I have a table in my web dynpro and several columns as checkbox... I put an event OnToggle in these columns.
Do you know any way to get the row or the row number?
If i use the method get_static_attributes return to me the selected row not the modified.
Thanks in advance !

EDIT: thanks ! is solved, i need to pass CONTEXT_ELEMENT' in the <ELEMNT_NAME>
This is my code:
DATA table_element TYPE REF TO if_wd_context_element.
DATA row_index TYPE i.
table_element = wdevent->get_context_element('CONTEXT_ELEMENT').
IF NOT table_element IS INITIAL.
row_index = table_element->get_index( ).
ENDIF.
Edited by: Husalban RM on Sep 15, 2010 4:53 PM

Similar Messages

How can I know the GUID number of the business partner in SRM server?*

hai friends
How can I know the GUID number of the business partner in SRM server?
regards
vinaykrishna

Hi,
Go to transaction SE16, table BUT000... put in the number of Business Parnet and execute. Doble click in the line and you'll see the field PARTNER GUID with the number GUID.
Rgs,
Pedro Marques

How can i know the Column Position in a table

Dear all
How can i know the Column position in a table ..
For example :-
I have a table
Desc EMPLOYEES
Empid
Ename
Sal
I want to know the Empid is in 1st position , ename is in 2nd position and sal is in 3rd position .
is it possible ?

Hi
SELECT * FROM ALL_TAB_COLUMNS WHERE
TABLE_NAME ='EMPLOYEES' AND owner=<OwNeR nAmE> ;)

How can I get the row number of display automatically on a table?

I have a table of measurements, and I would like the row number to be displayed on each row. The challenge is that each time I run the program, the total number of rows will be different, so I would like the numbers to update every time I run the program based on the current number of rows.
I have attached a picture to illustrate what I am trying to do.
Solved!
Go to Solution.
Attachments:
picture of table.JPG ‏70 KB

Find the attached example (saved in version 2009), and you can extract what you need for your code...!!
I am not allergic to Kudos, in fact I love Kudos.
Make your LabVIEW experience more CONVENIENT.
Attachments:
Example (Enter Row Header).vi ‏12 KB

How do I know the Column number after shifting table columns?

I create a table with column name "a", "b", "c"
Then I shift those column around..
Is there a way Java can tell me the column number of heading "b"? (For example)
Thanks!

As mentioned above you generally don't need to worry about columns being moved but, from the JTable API, this may be what you are looking for:
int convertColumnIndexToModel(int viewColumnIndex)
int convertColumnIndexToView(int modelColumnIndex)

I can't get the row number of the current selection

Hi all,
How can I get the row number of a selection if I don't know the range selected? I need it to store in variable.
I've tried in many ways, but unsuccesfully.
Thank's in advance.

If you already know the document's name, the sheet's name and the table's name, the easy way is :
--Here you may replace the three values by the current ones
set dName to 1
set sName to 1
set tName to 1
tell application "Numbers" to tell document dName to tell sheet sName to tell table tName
tell first cell of the selection range to set {rowNum1, columnNum1} to {address of its row, address of its column}
tell last cell of the selection range to set {rowNum2, columnNum2} to {address of its row, address of its column}
end tell
Yvan KOENIG (VALLAURIS, France) mercredi 9 février 2011 17:22:21

How can we know the return code of BDC Program ?

Hi All,
Please tell me : How can we know the return code of BDC Program when being exceuted in Session or in Transaction mode.
In my program, we are uploading data from Excel sheet to SAP via BDC
The records that are not updated we want to create a log file.
Now to know whether a record is updated ot not, wat syst field shloud be used?
Its urgent....
<b>Reward Point will be there ....</b>
Thanks,
Harish

Hi harish,
try the logic in this code ...
i had attached input file in the end.
TYPES: begin of errmess,
        msgnr type t100-msgnr,
        text type t100-text,
       end of errmess.
TABLES : t100.
DATA: BEGIN OF DD_VA01,
       AUART TYPE VBAK-AUART,
       KUNNR TYPE RV45A-KUNNR,
       BSTKD TYPE VBKD-BSTKD,
       MABNR TYPE RV45A-MABNR,
       KWMENG(2) type C,
       KBETR(2) type C,
      END OF DD_VA01.
DATA:IT_VA01     Like TABLE OF DD_VA01,
     WA_VA01     Like LINE OF IT_VA01,
     WA_VA01_F   Like LINE OF IT_VA01,
     IT_BDCDATA TYPE TABLE OF BDCDATA,
     WA_BDCDATA Like Line OF IT_BDCDATA,
     W_FNAME     TYPE STRING,
     messtab like bdcmsgcoll occurs 0 with header line,
     it_errmess type table of errmess,
     wa_errmess like line of it_errmess,
     err_message type string.
data: zf1 type i,
      zc1 type c value '2',
      fn(20) type c.
Main Code ************************************************************
PERFORM get_input using 'C:\Documents and Settings\ic881592\Desktop\Daran_bdc_VA01-e.txt'.
SORT IT_VA01 BY AUART KUNNR BSTKD.
LOOP AT IT_VA01 INTO WA_VA01.
if WA_VA01_F-AUART <> WA_VA01-AUART OR
     WA_VA01_F-KUNNR <> WA_VA01-KUNNR OR
     WA_VA01_F-BSTKD <> WA_VA01-BSTKD.
       PERFORM set_header_flag.
       PERFORM create_bdc_header_data.
endif.
PERFORM create_bdc_item_data.
ENDLOOP.
PERFORM call_transaction.
PERFORM errorlog.
Procedures ***********************************************************
form get_input using w_fname.
CALL FUNCTION 'GUI_UPLOAD'
    EXPORTING
      FILENAME            = W_FNAME
      HAS_FIELD_SEPARATOR = '#'
    TABLES
      DATA_TAB            = IT_VA01.
endform.
form call_transaction.
    PERFORM bdc_field       using 'BDC_OKCODE' '/11'.
    CALL TRANSACTION 'VA01' USING IT_BDCDATA MODE 'A' messages into messtab.
    refresh it_bdcdata.
endform.
FORM set_header_flag.
       WA_VA01_F-AUART = WA_VA01-AUART.
       WA_VA01_F-KUNNR = WA_VA01-KUNNR.
       WA_VA01_F-BSTKD = WA_VA01-BSTKD.
       if zf1 = 1.
           PERFORM call_transaction.
       endif.
       zf1 = 1.
endform.   "set_header_flag.
form create_bdc_header_data.
     perform bdc_dynpro      using 'SAPMV45A' '0101'.
     perform bdc_field       using 'VBAK-AUART' WA_VA01-AUART.
     perform bdc_field       using 'BDC_OKCODE' '/00'.
     perform bdc_dynpro      using 'SAPMV45A' '4001'.
     perform bdc_field       using 'KUAGV-KUNNR' WA_VA01-KUNNR.
     perform bdc_field       using 'VBKD-BSTKD' WA_VA01-BSTKD.
     perform bdc_field       using 'BDC_OKCODE' '/00'.
     perform bdc_dynpro      using 'SAPMSSY0' '0120'.
     perform bdc_field       using 'BDC_CURSOR' '04/06'.
     perform bdc_field       using 'BDC_OKCODE' '=CHOO'.
     perform bdc_dynpro      using 'SAPMV45A' '4001'.
     PERFORM bdc_field       USING 'BDC_OKCODE' '=POAN'.
endform. "create_bdcdata
FORM create_bdc_item_data.
     CONCATENATE 'RV45A-KWMENG(' zc1 ')' INTO FN.
     perform bdc_field       using 'BDC_CURSOR' FN.
     perform bdc_field       using FN WA_VA01-KWMENG.
     CONCATENATE 'KOMV-KBETR(' zc1 ')' INTO FN.
     perform bdc_field       using FN WA_VA01-KBETR.
     CONCATENATE 'RV45A-MABNR(' zc1 ')' INTO FN.
     perform bdc_field       using FN WA_VA01-MABNR.
     perform bdc_dynpro      using 'SAPMV45A' '4001'.
     PERFORM bdc_field       USING 'BDC_OKCODE' '=POAN'.
ENDFORM.
form errorlog.
LOOP AT MESSTAB .
    if MESSTAB-MSGNR = '311' or MESSTAB-MSGTYP = 'E'.
        SELECT SINGLE msgnr text FROM T100
                        into wa_errmess
                        WHERE SPRSL = MESSTAB-MSGSPRA
                          AND ARBGB = MESSTAB-MSGID
                          AND MSGNR = MESSTAB-MSGNR.
        IF SY-SUBRC = 0.
          err_message = wa_errmess-TEXT.
          IF err_message CS '&1'.
            REPLACE '&1' WITH MESSTAB-MSGV1 INTO err_message.
            REPLACE '&2' WITH MESSTAB-MSGV2 INTO err_message.
            REPLACE '&3' WITH MESSTAB-MSGV3 INTO err_message.
            REPLACE '&4' WITH MESSTAB-MSGV4 INTO err_message.
          ELSE.
            REPLACE '&' WITH MESSTAB-MSGV1 INTO err_message.
            REPLACE '&' WITH MESSTAB-MSGV2 INTO err_message.
            REPLACE '&' WITH MESSTAB-MSGV3 INTO err_message.
            REPLACE '&' WITH MESSTAB-MSGV4 INTO err_message.
          ENDIF.
          CONDENSE err_message.
          WRITE: / MESSTAB-MSGTYP, err_message .
        ELSE.
          WRITE: / MESSTAB.
        ENDIF.
    endif.
ENDLOOP.
endform. "errorlog
FORM BDC_DYNPRO USING PROGRAM DYNPRO.
WA_BDCDATA-PROGRAM = PROGRAM.
WA_BDCDATA-DYNPRO   = DYNPRO.
WA_BDCDATA-DYNBEGIN = 'X'.
APPEND WA_BDCDATA TO IT_BDCDATA.
CLEAR WA_BDCDATA.
ENDFORM.
FORM BDC_FIELD USING FNAM FVAL.
WA_BDCDATA-FNAM = FNAM.
WA_BDCDATA-FVAL = FVAL.
APPEND WA_BDCDATA TO IT_BDCDATA.
CLEAR WA_BDCDATA.
ENDFORM.
input file :
OR     2148     0001235     R-1162     8     17
OR     2148     0001235     R-1161     2     30
OR     2148     0001235     100-400     6     25
OR     2148     0001235     R-1162     4     12
OR     2148     0001236     R-1162     3     12
OR     2148     0001236     R-1161     2     30
OR     2148     0001236     100-400     1     25
OR     2148     0001236     R-1162     7     12
OR     2148     0001236     R-1161     8     30
OR     2148     0001236     100-400     10     25
OR     2148     0001235     R-1161     5     30
OR     2148     0001235     100-400     2     25
OR     2148     0001235     R-11621     3     12
OR     2148     0001235     R-1161     2     30
OR     2148     0001235     100-400     1     25
OR     2148     0001235     R-1162     7     12
OR     2148     0001235     R-1161     8     30
OR     2148     0001235     100-400     10     25
OR     2148     0001236     R-1162     8     17
OR     2148     0001236     R-1161     2     30
OR     2148     0001236     100-400     6     25
OR     2148     0001236     R-1162     4     12
OR     2148     0001236     R-1161     5     30
OR     2148     0001236     100-400     2     25

How can i know the number of lines in field-symbol internal table

how can i know the number of lines in field-symbol internal table

Hi,
If your field symbol has been defined as an internal table :
Use std describe as
Data: l type i.
describe <fs> lines l.
'l' will contain the number of lines as needed.
FYI
The size of this storage area in a field symbols depends on the number of table lines which is not fixed, but determined dynamically at runtime.
Regards,
Amit

My iphone was stolen and called police. Now the ditective needs to know my IMEI number. I need to know the number of the stolen one. How can I get the IMEI number?

My iphone was stolen and called police. Now the ditective needs to know my IMEI number.I need to know the number of the stolen one. How can I get the IMEI number?

Quickest place to look is in the label attached to the box the phone came in.
Not around anymore? Maybe the carrier you used the phone with can facilitate the information. Also, when under contract, the IMEI is listed in the paperwork. Apple, alas, is quite unhelpful with that information.

How can i know the RPM of my HD?

I guys...
Simple question...
How can i know the RPM of my HD?
I have a Mac mini and i would like to know that.
Any ideas?.
Thanks so much!!!

Hi!!
It doesn't show...
Vendor:          NVidia
Product:          MCP79 AHCI
Link Speed:          3 Gigabit
Negotiated Link Speed:          1.5 Gigabit
Description:          AHCI Version 1.20 Supported
FUJITSU MHZ2120BH G1:
Capacity:          120.03 GB (120,034,123,776 bytes)
Model:          FUJITSU MHZ2120BH G1
Revision:          00810009
Serial Number:                  K64PT9427599
Native Command Queuing:          Yes
Queue Depth:          32
Removable Media:          No
Detachable Drive:          No
BSD Name:          disk0
Medium Type:          Rotational
Bay Name:          Lower
Partition Map Type:          GPT (GUID Partition Table)
S.M.A.R.T. status:          Verified
Volumes:
Capacity:          209.7 MB (209,715,200 bytes)
Writable:          Yes
BSD Name:          disk0s1
Macintosh HD:
Capacity:          119.69 GB (119,690,149,888 bytes)
Available:          21.38 GB (21,376,569,344 bytes)
Writable:          Yes
File System:          Journaled HFS+
BSD Name:          disk0s2
Mount Point:          /
FUJITSU MHZ2120BH G1:
Capacity:          120.03 GB (120,034,123,776 bytes)
Model:          FUJITSU MHZ2120BH G1
Revision:          00810009
Serial Number:                  K64PT9427599
Native Command Queuing:          Yes
Queue Depth:          32
Removable Media:          No
Detachable Drive:          No
BSD Name:          disk0
Medium Type:          Rotational
Bay Name:          Lower
Partition Map Type:          GPT (GUID Partition Table)
S.M.A.R.T. status:          Verified
Volumes:
Capacity:          209.7 MB (209,715,200 bytes)
Writable:          Yes
BSD Name:          disk0s1
Macintosh HD:
Capacity:          119.69 GB (119,690,149,888 bytes)
Available:          21.38 GB (21,376,569,344 bytes)
Writable:          Yes
File System:          Journaled HFS+
BSD Name:          disk0s2
Mount Point:          /
Those are the 2 texts...
Any idea?
Thanks!!

How can I know the name of instance (SID)?

Dear all,
After I install the Oracle client in my computer, I would like to change the tnsname.ora. However, I don't know the name of instance (SID) because I am not the one install the database and the DBA is gone. So, how can I know the SID name and the port number as well.
Best Regards,
amy

Hey,
The sid defaults to the database name.
http://www.adp-gmbh.ch/ora/misc/identifiers.html
you can find it by
select name from v$database;
or by
show parameter db_name (run this in sql prompt)
Run the above on the database server.

How can i know the no of servlets

how can i know the no of servlets present in single application

you webapp (servlet) can create a static variable. when a request has been made, you increment this number...provides a request parameter (http param) that will return this count number.

How can I display the rows into columns.

How can I display the rows into columns. I mean
Create table STYLE_M
(Master varchar2(10), child varchar2(10));
Insert itno style_m
('MASTER1','CHILD1');
Insert itno style_m
('MASTER2','CHILD1');
Insert itno style_m
('MASTER2','CHILD2');
Insert itno style_m
('MASTER3','CHILD1');
Insert itno style_m
('MASTER3','CHILD2');
Insert itno style_m
('MASTER3','CHILD3');
Note : The Master may have any number of childs.
I want to display like this..
Master child1, child2, child3, .......(dynamic)
MASTER1 CHILD1
MASTER2 CHILD1 CHILD2
MASTER3 CHILD1 CHILD2 CHILD3
Sorry for disturbing you. Please hlp me out if you have any slution.
Thanks alot.
Ram Dontineni

Here's a straight SQL "non-dynamic" approach.
This would be used if you knew the amount of children.
SELECT
     master,
     MAX(DECODE(r, 1, child, NULL)) || ' ' || MAX(DECODE(r, 2, child, NULL)) || ' ' || MAX(DECODE(r, 3, child, NULL)) children
FROM
     SELECT
          master,
          child,
          ROW_NUMBER() OVER(PARTITION BY master ORDER BY child) r
     FROM
          style_m
GROUP BY
     master
MASTER     CHILDREN
MASTER1    CHILD1
MASTER2    CHILD1 CHILD2
MASTER3    CHILD1 CHILD2 CHILD3             Since you said that the number of children can vary, I incorporated the same logic into a dynamic query.
SET AUTOPRINT ON
VAR x REFCURSOR
DECLARE
        v_sql           VARCHAR2(1000) := 'SELECT master, ';
        v_group_by      VARCHAR2(200) := 'FROM (SELECT master, child, ROW_NUMBER() OVER(PARTITION BY master ORDER BY child) r FROM style_m) GROUP BY master';
        v_count         PLS_INTEGER;
BEGIN
        SELECT
                MAX(COUNT(*))
        INTO    v_count
        FROM
                style_m
        GROUP BY
                master;
        FOR i IN 1..v_count
        LOOP
                v_sql := v_sql || 'MAX(DECODE(r, ' || i || ', child, NULL))' || ' || '' '' || ';
        END LOOP;
                v_sql := RTRIM(v_sql, ' || '' '' ||') ||' children ' || v_group_by;
                OPEN :x FOR v_sql;
END;
PL/SQL procedure successfully completed.
MASTER     CHILDREN
MASTER1    CHILD1
MASTER2    CHILD1 CHILD2
MASTER3    CHILD1 CHILD2 CHILD3I'll point your other thread to this one.

How can I check the serial number in WM?

Dear Experts
I have a question: how can I check the serial number in WM? Like I want to know which storage type a serial number exist in. Is there a report can show this information? Currently I only can check the serial number at storage location level.
Please help. If there is no such a report, which table can I use for develpment?
Thanks a lot!
Tony

Hi Tony,
Unfortunatelly, you cannot manage serial numbers in bins with ERP WM. For this, you need to have a look to the new warehousing solution from SAP, I mean EWM (extended warehouse management) in SCM. There you can manage an see serial numbers in bins.
Rgds,
Philippe

Hi experts . how can we know the stock details for a perticular plant?

hi experts . how can we know the stock details for a perticular plant

check this code
REPORT YSG_MATSTK_REP    LINE-SIZE 220
                          LINE-COUNT 50(5).
*&                       DATA DECLARATION                              *
TABLES: MARA,              "GENERAL MASTER DATA
        MARC,              "PLANT DATA FOR MATERIAL
        MARD,              "STORAGE LOCATION DATA FOR MATERIAL
        MBEW,              "MATERIAL VALUATION
        MVKE,              "SALES DATA FOR MATERIAL
        MAKT.              "MATERIAL DESCRIPTION
DATA: BEGIN OF I_MARA OCCURS 0,
           MATNR LIKE MARA-MATNR,"MATERIAL NUMBER
           MBRSH LIKE MARA-MBRSH,"INDUSTRY SECTOR
           MEINS LIKE MARA-MEINS,"BASE UNIT OF MEASURE
      END OF I_MARA.
DATA: BEGIN OF I_MARC OCCURS 0,
          MATNR LIKE MARC-MATNR,"MATERIAL NUMBER
          WERKS LIKE MARC-WERKS,"PLANT
          LVORM LIKE MARC-LVORM,"FLAG MATERIAL FOR DELETION AT PLANT
                                "LEVEL
          PSTAT LIKE MARC-PSTAT,"MAINTENANCE STATUS
          DISPO LIKE MARC-DISPO,"MRP CONTROLLER
      END OF I_MARC.
DATA: BEGIN OF I_MAKT OCCURS 0,
           MATNR LIKE MAKT-MATNR,"MATERIAL NUMBER
           MAKTX LIKE MAKT-MAKTX,"MATERIAL DESCRIPTION
      END OF I_MAKT.
DATA: BEGIN OF I_MVKE OCCURS 0,
           MATNR LIKE MVKE-MATNR,"MATERIAL NUMBER
           VKORG LIKE MVKE-VKORG,"SALES ORGANIZATION
           VTWEG LIKE MVKE-VTWEG,"DISTRIBUTION CHANNEL
      END OF I_MVKE.
DATA: BEGIN OF I_MARD OCCURS 0,
           MATNR LIKE MARD-MATNR,"MATERIAL NUMBER
           LGORT LIKE MARD-LGORT,"STORAGE LOCATION
           LABST LIKE MARD-LABST,"VALUATED STOCK WITH UNRESTRICTED USE
      END OF I_MARD.
DATA: BEGIN OF I_OUT OCCURS 0,
        MATNR LIKE MARC-MATNR,
        WERKS LIKE MARC-WERKS,
        LVORM LIKE MARC-LVORM,
        PSTAT LIKE MARC-PSTAT,
        DISPO LIKE MARC-DISPO,
        MBRSH LIKE MARA-MBRSH,
        MEINS LIKE MARA-MEINS,
        MAKTX LIKE MAKT-MAKTX,
        VKORG LIKE MVKE-VKORG,
        VTWEG LIKE MVKE-VTWEG,
        LGORT LIKE MARD-LGORT,
        LABST LIKE MARD-LABST,
      END OF I_OUT.
DATA : TOT TYPE I. " TOT - TOTAL TO PRINT STOCK
*&                   S E L E C T I O N - S C R E E N                   *
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-100.
SELECT-OPTIONS: S_MATNR FOR MARA-MATNR OBLIGATORY.
PARAMETERS: P_WERKS LIKE MARC-WERKS OBLIGATORY.
SELECT-OPTIONS: S_LGORT FOR MARD-LGORT,
                S_DISPO FOR MARC-DISPO.
SELECTION-SCREEN END OF BLOCK B1.
*&                  I N I T I A L I Z A T I O N                      *
INITIALIZATION.
S_MATNR-SIGN = 'I'.
S_MATNR-OPTION = 'EQ'.
S_MATNR-LOW = 'M-14'.
S_MATNR-HIGH = 'M-18'.
P_WERKS = '3000'.
S_LGORT-SIGN = 'I'.
S_LGORT-OPTION = 'EQ'.
S_LGORT-LOW = '0001'.
S_LGORT-HIGH = '0004'.
S_DISPO-SIGN = 'I'.
S_DISPO-OPTION = 'EQ'.
S_DISPO-LOW = '001'.
S_DISPO-HIGH = '002'.
APPEND S_DISPO.
APPEND S_LGORT.
APPEND S_MATNR.
CLEAR S_DISPO.
CLEAR S_LGORT.
CLEAR S_MATNR.
*&             S T A R T - O F - S E L E C T I O N                     *
START-OF-SELECTION.
SELECT MATNR WERKS LVORM DISPO FROM MARC
INTO CORRESPONDING FIELDS OF TABLE I_MARC
                      WHERE WERKS EQ P_WERKS
                      AND MATNR IN S_MATNR
                      AND DISPO IN S_DISPO
                      AND WERKS = P_WERKS.
IF I_MARC[] IS INITIAL.
    WRITE:/ 'NO MATCHING DATA AVAILABLE FROM MARC'.
    EXIT.
ENDIF.
SELECT MATNR LGORT LABST FROM MARD INTO TABLE I_MARD
                      FOR ALL ENTRIES IN I_MARC
                      WHERE MATNR = I_MARC-MATNR
                      AND WERKS EQ P_WERKS
                      AND LGORT IN S_LGORT.
IF I_MARD[] IS INITIAL.
    WRITE:/ 'NO MATCHING DATA AVAILABLE FROM MARD'.
    EXIT.
ENDIF.
SELECT MATNR VKORG VTWEG FROM MVKE INTO TABLE I_MVKE
                      FOR ALL ENTRIES IN I_MARC
                      WHERE MATNR = I_MARC-MATNR.
IF I_MVKE[] IS INITIAL.
    WRITE:/ 'NO MATCHING DATA AVAILABLE FROM MVKE'.
    EXIT.
ENDIF.
LOOP AT I_MARC.
    MOVE-CORRESPONDING I_MARC TO I_OUT.
    CLEAR MARC.
    SELECT SINGLE MATNR MBRSH MEINS FROM MARA
                     INTO CORRESPONDING FIELDS OF MARA
                     WHERE MATNR = I_OUT-MATNR.
    IF SY-SUBRC = 0.
      MOVE: MARA-MBRSH TO I_OUT-MBRSH,
            MARA-MEINS TO I_OUT-MEINS.
    ELSE.
      CONTINUE.
    ENDIF.
    SELECT SINGLE MATNR MAKTX FROM MAKT
                    INTO CORRESPONDING FIELDS OF MAKT
                    WHERE MATNR = I_OUT-MATNR.
    IF SY-SUBRC = 0.
      MOVE: MAKT-MAKTX TO I_OUT-MAKTX.
    ELSE.
      CONTINUE.
    ENDIF.
    LOOP AT I_MARD WHERE MATNR = I_MARC-MATNR.
      MOVE: I_MARD-LABST TO I_OUT-LABST,
            I_MARD-LGORT TO I_OUT-LGORT.
      APPEND I_OUT.
    ENDLOOP.
    LOOP AT I_MVKE WHERE MATNR = I_MARC-MATNR.
      MOVE: I_MVKE-VKORG TO I_OUT-VKORG,
            I_MVKE-VTWEG TO I_OUT-VTWEG.
      APPEND I_OUT.
    ENDLOOP.
    CLEAR I_OUT.
ENDLOOP.
CALL FUNCTION 'GUI_DOWNLOAD'
EXPORTING
    FILENAME = 'C:\matstk.TXT'
   FILETYPE                        = 'ASC'
TABLES
    DATA_TAB                        = I_OUT.
*&                  T O P - O F - P A G E                              *
TOP-OF-PAGE.
WRITE:/ 'DATE:' ,SY-DATUM.
*&                  E N D - O F - P A G E                              *
END-OF-PAGE.
WRITE: / SY-ULINE,
         /100 'PAGNO: ',SY-PAGNO,
         SY-ULINE.
*&        E N D -- O F -- S E L E C T I O N                           *
END-OF-SELECTION.
LOOP AT I_OUT.
    AT FIRST.
      WRITE :/ 'MATERIAL EXTRACTION REPORT',
               SY-ULINE.
    ENDAT.
    WRITE:/    SY-VLINE,
               I_OUT-MATNR,SY-VLINE,
               I_OUT-MEINS,SY-VLINE,
               I_OUT-WERKS,SY-VLINE,
               I_OUT-LVORM,SY-VLINE,
               I_OUT-PSTAT,SY-VLINE,
               I_OUT-DISPO,SY-VLINE,
               I_OUT-MBRSH,SY-VLINE,
               I_OUT-MAKTX,SY-VLINE,
               I_OUT-VKORG,SY-VLINE,
               I_OUT-VTWEG,SY-VLINE,
               I_OUT-LGORT,SY-VLINE,
               I_OUT-LABST,SY-VLINE.
    TOT = TOT + I_OUT-LABST.
    AT NEW MATNR.
      WRITE : 'NEW RECORD',
               SY-VLINE.
    ENDAT.
    AT END OF LABST.
      WRITE : 'STOCK = ',
               TOT,
               SY-VLINE,
               SY-ULINE.
    ENDAT.
    AT LAST.
      FORMAT COLOR 7 INTENSIFIED OFF.
      WRITE : /159 'TOTAL STOCK = ',
                 TOT.
    ENDAT.
ENDLOOP.
    WRITE : /159 'TOTAL STOCK = ',
                 TOT.
regards,
srinivas
<b>*reward for useful answers*</b>

How can i know the row number of my table is being modified?

Similar Messages

Maybe you are looking for