Dynamic icon in the table control

hi friends ,
I wanna to place a command with the icon changing when the status changed .Pls show me how .Thks .

hI jACK
I am trying to get it .
as these text store in the table D021T and able to modify the table where the text can be modified to the ICON from PUSHBUTTON.
MODULE status_0100 OUTPUT.
SET PF-STATUS 'xxxxxxxx'.
SET TITLEBAR 'xxx'.
DATA RESULT(60).
LOOP AT SCREEN.
IF screen-name = 'BB'.
CALL FUNCTION 'ICON_CREATE'
EXPORTING
    name                        = 'ICON_GREEN_LIGHT'
TEXT                        = ' '
INFO                        = ' '
ADD_STDINF                  = 'X'
IMPORTING
   RESULT                      = RESULT
EXCEPTIONS
ICON_NOT_FOUND              = 1
OUTPUTFIELD_TOO_SHORT       = 2
UPDATE D021T SET DTXT = RESULT WHERE PROG = 'ZMTEST_99'.
MODIFY SCREEN.
endif.
ENDLOOP.
ENDMODULE.                 " STATUS_0100 OUTPUT
still i am trying .
I will come back to you.
Regards
Ramchander Rao.K

Similar Messages

Add change Icon in the Table Control tool bar.

Hi Abapers,
I need to add "change" icon in the table control. I added it but when I click on it is not working.
My requirement is that when I run my custom report, all the fields should be shown is in display mode. Then when I click on the "change" icon, all fields should be enabled for change.
I have already referred to the standard progs BCALV_* but it does not have the "change" icon.
plz give me any reference prg or sample code.
Thanks
Nani.

Hi Nani,
Track the function code of change icon in user command. if it is clicked then put a flag eq X.
check that flag in PBO, if it is eq X then screen-input = 1 or vice versa.
try this code:
in PBO:
LOOP AT SCREEN
IF WS_EDIT = 'X'
SCREEN-INPUT = 1
ELSE
SCREEN-INPUT = 0
ENDIF
MODIFY SCREEN
ENDLOOP
Hope it will work fine
Regards
Krishnendu

Is it possible to add icons to a field in the table control ?

Dear Gurus,
Greetings..............
Is it possible to add icons to the line item of a field in the table control ?
Thanks in advance
Raj Kumar

HI
YES IT IS POSSIBLE.
DO THE FOLLOWING
1.DECLARE INCLUDE <ICON>.
2.IN YOUR INTERNAL TABLE DECLARE FIELD ICON
icon(4) TYPE c,
3. POPULATE YOUR INTERNAL TABLE WITH APPROPRIATE ICONS BY SELECTING FROM INCLUDE SPECIFIED ABOVE.
EG:
wa2-icon = '@5C@'.
4.PASS IT TO FIELDCAT
wa_fieldcat-fieldname = 'ICON'.
wa_fieldcat-icon = 'X'. " Displayed as Icon
wa_fieldcat-tabname = ' '.
wa_fieldcat-seltext = 'Status'.
wa_fieldcat-coltext = text-001.
APPEND wa_fieldcat TO it_fieldcat.

Dynamic output & input fields in the table control

HI Guys,
How can one change the attribute of input field to output field basically greying of field) dynamically
based on the some flag. Loop at screen does not work. I need to change the attributes
of field 'outfiled' and output field display only'.
Any help is highly appreciated.
Regards,
Harsha

Hi Harsha,
I generated a table control (ERP 6.2) and somewhere I found the coding like this (the name of the table control is TABLE_CONTROL):
*&spwizard: output module for tc 'TABLE_CONTROL'. do not change this lin
*&spwizard: get lines of tablecontrol
module TABLE_CONTROL_get_lines output.
g_TABLE_CONTROL_lines = sy-loopc.
If I do a loop at the screen at this place, I can control the individual input/output for the screen fields (the table fields). In my work area (WA_CONTROL) I can see the actual value of fields. Depending on this, I choose to enable/disable input via:
loop at screen.
if wa_control-material <> ' '.
screen-input = '0'.
modify screen.
endif.
endloop.

How to remove the "table control" icon in ITS based ESS screen

Hi All,
I have upgraded my external ITS 620 to patch level 28. Earlier we were on patch 04.
Since then I am seeing the table control in my ESS screens (ITS Based),
In some thread i got to know that the table control is totally redefined / modified from patch 22 of ITS.
Is it possible that we can remove / hide the table control from the screens.
I dont want to let the users access the "Table Settings" screen at all....can u plz tell me how to do it
regards,
PK

we could not remove the table control...it seems like we can not remove it as the table control also appears in the r3 screens also..

How to delete a column from the table control in module pool?

Hi,
can any one please tell How to delete a column from the table control in module pool?
thanks in advance
warm regards
HareeshKumar N

hi hareesh,
I think it is better to hide it.
How to hide: You can check this link
Dynamic Hide column in table control

New columns in the table control do not appear

Hi,
We have a requirement to add two fields(columns) in a table control for a transaction upon clicking Create button and those two fields should be editable. We have added the two fields in the table control. But, they do not appear in the transaction ( If I delete an existing column, then I am able see the new column). Have checked everywhere, but not sure if I am missing something here. There is no hide statement used.
Appreciate help on this.
Thanks,
Pavan

Hi Pavan,
What I understood is you are adding fields to the table control dynamically.\
For that you have to use field-symbols to add fields to the work area dynamically.
( If this is not your actual requirement share your code with me I will try to solve it. )
Regards,
Swaroop

Dynamic header text in table control - Dialog programming

Hi All,
I have a table control on one of my dialog screens. I need to dynamically change the column header texts on this control in my PBO. Does anyone know how to do this? I have found all kinds of ways to modify the other characteristics of the fields at run time in the PBO (active, input/output, invisible, etc.) - but not to change the header text! Any help is appreciated.
thanks,
Matt

Hi Hymavathi,
I appreciate your help! This didn't solve the issue, however,...I have used the method you'd mentioned before (many times) for setting it inside the loop at screen:
%_<screenname>_%_APP_%-TEXT = <text something>.
- but only in ABAP reports. It doesn't seem to recogize it (the table control column header text) within a dialog program. I keep getting a compile error. (saying that the %_<screenname>_%_APP_%-TEXT doesn't exist.
I tried the suggestion that you stated below (from lateesh) - yet it only let me place i/o field in title text area (not the column header text). Am still searching...

Dynamic Tool TIP in Table Control

Dear Friends,
Thanks in Advance.
How to implement Dynamic Tool TIP in the Table Control for Particularly One Columnn.
i.e rows in that Column.
Note : Column contains Currency Type Data
For that column, i am calculating the Quantity Multiplied with the Exchange Rate.
That Calculation should be visible in the Tool TIP.
Regards:
Sridhar.J

Hi
Take Text Element Radio button there and give any number and activate.
If the Visible lenght of the Table Control Field is less than actual length of the Content, it automatically displays the Tool Tip.
I just did it.
Hope this serves your purpose.
Get it fram Sam
" Hey Sreedhar, Let us know how can we do it , it will be helpful.
Cheers
Ram
Edited by: Ramchander Krishnamraju on Jan 2, 2010 4:06 AM

Dynamic field labels in table control

Hi experts,
My requirement is to display dynamic field labels in table control can we do this. I am much aware
that we can do it in alv_grid. Please let me know.
Thanks in advance.
Sri

Hi Anubhab,
Thanks. With your help i could able to solve the problem. Let me put this in some
more detail.
When we are pulling the field from a table to table control we need to make sure the fields should have a data elements. After pulling all the fields to a table control ,we need to drag out and delete the current table control column headings and then drop in the (new) I/O fields into their place. I then set the text on these new fields within the PBO. If we try to drop the (new) I/O fields on top of the existing ones with out deleting it won't work.
Thanks & Regards.
Srikanth

Dynamically assign fields to table control

Hi All,
I have some requirements with me... I have a report which has an output table. The output table will be filled based on some conditions.
ex... 1) select name, id, date
2) select name, id, time (just an ex)
My output table contains name, id, date, time.
So, I would like to dynamically display the fields on to the table control to either display 1) or 2).
Is it doable thru Visual Composer?
Please suggest.....
Regards,
Manjunatha.T.S

When you use a JDBC system, the fields may change at runtime.
So, generally, any fields that come out of the stored procedure at runtime will be displayed in the table.
Lior

Status control icon display in table control

Hi,
In the workarea the field of status control icon is showing Red/green/yellow that is ok but when i am modifying the internal table from this work area then text(Red or green something...) is coming insted of status Icon.
So how to modify internal table from this workarea so that i can display icon in my table control's internal table ?Your input is highly appreciated..
Thanx
Prince Raja

DATA : c_green(4) TYPE c VALUE '@08@',
       c_red(4) TYPE c VALUE '@0A@'.
      IF flag = 'X'.
        READ TABLE it_output INTO is_output WITH KEY
                                  bukrs = is_final-bukrs
                                  anln1 = is_final-anln1
                                  anln2 = is_final-anln2
                                  BINARY SEARCH.
        IF sy-subrc = 0.
          is_output-c_icon = c_green.
          is_output-leabg_n = is_final-leabg.
          is_output-message = it_return-message.
* Modify the output internal table with the changed new values
          MODIFY it_output FROM is_output
                           TRANSPORTING c_icon leabg_n message
                           WHERE bukrs = is_output-bukrs
                             AND anln1 = is_output-anln1
                             AND anln2 = is_output-anln2.
        ENDIF.
Regards
Gopi

ISSUE IN THE TABLE CONTROL

HAI FRIENDS,
I HAVE DISPLAYED THE VALUES IN THE TABLE CONTROL
I HAVE DEFINED 'CHECK' FOR SELECTING THE FIELDS OF TABLE CONTROL
THE ISSUE STARTS HERE
WHEN I CHECK TOP FIELDS OF TABLE CONTROL
THEN SCROLLED VERTICALLY, THE TABLE CONTROL TO SELECT I.E CHECK THE
BOTTOM FIELDS OF TABLE CONTROL.
THE TOP FIELDS WATEVER CHECK WHERE CHECKS DISPAPEARS FOR TOP FIELDS .
BY THIS I UNABLE TO SELECT THE FIELDS OF TABLE.
PLZ HELP ME URGENTLY NEEDED.
MY MONDAY I NEEDED

You use an internal table for values in table control..
One of the fields( very first field) in that itab is used for check - uncheck..
u have make it 'X' when u click any row...
I think this might be the problem in ur case.. when u scroll PAI starts... in that PAI check the value of check box for that particular field...
Regards
Prax

Getting values from the table control to the program

Hi Gurus,
i created a program for sales order creation to transfer order creation and to insert multiple values i defined my own selection screen by inserting table control before that the code executed succesfully but after inserting the table control it is not creating any documents
code before inserting table control:-
REPORT zcl120_sales_n_delivery.
                  SALES DOCUMENT CREATION
PARAMETERS: p_auart TYPE auart OBLIGATORY.
PARAMETERS: p_vkorg TYPE vkorg OBLIGATORY.
PARAMETERS: p_vtweg TYPE vtweg OBLIGATORY.
PARAMETERS: p_spart TYPE vtweg OBLIGATORY.
PARAMETERS: p_sold TYPE kunnr OBLIGATORY.
PARAMETERS: p_ship TYPE kunnr OBLIGATORY.
*ITEM
PARAMETERS: p_matnr TYPE matnr OBLIGATORY.
PARAMETERS: p_menge TYPE kwmeng OBLIGATORY.
PARAMETERS: p_plant TYPE werks_d OBLIGATORY.
PARAMETERS: p_itcat TYPE pstyv OBLIGATORY.
DATA DECLARATIONS.
DATA: v_vbeln LIKE vbak-vbeln.
DATA: header LIKE bapisdhead1.
DATA: headerx LIKE bapisdhead1x.
DATA: item LIKE bapisditem OCCURS 0 WITH HEADER LINE.
DATA: itemx LIKE bapisditemx OCCURS 0 WITH HEADER LINE.
DATA: partner LIKE bapipartnr OCCURS 0 WITH HEADER LINE.
DATA: return LIKE bapiret2 OCCURS 0 WITH HEADER LINE.
DATA: lt_schedules_inx TYPE STANDARD TABLE OF bapischdlx
WITH HEADER LINE.
DATA: lt_schedules_in TYPE STANDARD TABLE OF bapischdl
WITH HEADER LINE.
HEADER DATA
header-doc_type = p_auart.
headerx-doc_type = 'X'.
header-sales_org = p_vkorg.
headerx-sales_org = 'X'.
header-distr_chan = p_vtweg.
headerx-distr_chan = 'X'.
header-division = p_spart.
headerx-division = 'X'.
headerx-updateflag = 'I'.
partner-partn_role = 'AG'.
partner-partn_numb = p_sold.
APPEND partner.
partner-partn_role = 'WE'.
partner-partn_numb = p_ship.
APPEND partner.
item-material = p_matnr.
item-plant = p_plant.
item-target_qty = p_menge.
item-target_qu = 'ST'.
item-item_categ = p_itcat.
APPEND item.
itemx-updateflag = 'I'.
itemx-material = 'X'.
itemx-plant = 'X'.
itemx-target_qty = 'X'.
itemx-target_qu = 'X'.
itemx-item_categ = 'X'.
APPEND itemx.
Fill schedule lines
lt_schedules_in-itm_number = '000010'.
lt_schedules_in-sched_line = '0001'.
lt_schedules_in-req_qty = p_menge.
APPEND lt_schedules_in.
Fill schedule line flags
lt_schedules_inx-itm_number = '000010'.
lt_schedules_inx-sched_line = '0001'.
lt_schedules_inx-updateflag = 'X'.
lt_schedules_inx-req_qty = 'X'.
APPEND lt_schedules_inx.
Call the BAPI
CALL FUNCTION 'BAPI_SALESDOCU_CREATEFROMDATA1'
EXPORTING
    sales_header_in     = header
    sales_header_inx    = headerx
IMPORTING
    salesdocument_ex    = v_vbeln
TABLES
    return              = return
    sales_items_in      = item
    sales_items_inx     = itemx
    sales_schedules_in = lt_schedules_in
    sales_schedules_inx = lt_schedules_inx
    sales_partners      = partner.
LOOP AT return WHERE type = 'E' OR type = 'A'.
EXIT.
ENDLOOP.
IF sy-subrc = 0.
WRITE / return-message.
WRITE: / 'Error in creating document'.
ELSE.
COMMIT WORK AND WAIT.
WRITE: / 'Document ', v_vbeln, ' created'.
ENDIF.
                  DELIVERY ORDER CREATION
*PARAMETERS: p_vbeln LIKE vbak-vbeln.
DATA: BEGIN OF t_vbap OCCURS 0,
        vbeln LIKE vbap-vbeln,
        posnr LIKE vbap-posnr,
        kwmeng LIKE vbap-kwmeng,
        matnr LIKE vbap-matnr,
        werks LIKE vbap-werks,
      END OF t_vbap.
DATA: t_request TYPE STANDARD TABLE OF bapideliciousrequest
      WITH HEADER LINE.
DATA: t_created TYPE STANDARD TABLE OF bapideliciouscreateditems
      WITH HEADER LINE.
DATA: t_return TYPE STANDARD TABLE OF bapiret2 WITH HEADER LINE.
SELECT vbeln posnr kwmeng matnr werks
       INTO TABLE t_vbap
       FROM vbap
       WHERE vbeln = v_vbeln
LOOP AT t_vbap.
t_request-document_numb = t_vbap-vbeln.
t_request-document_item = t_vbap-posnr.
t_request-quantity_sales_uom = t_vbap-kwmeng.
t_request-id = 1.
t_request-document_type = 'A'.
t_request-delivery_date      = sy-datum.
t_request-material = t_vbap-matnr.
t_request-plant = t_vbap-werks.
t_request-date = sy-datum.
t_request-goods_issue_date = sy-datum.
t_request-goods_issue_time = sy-uzeit.
APPEND t_request.
ENDLOOP.
CALL FUNCTION 'BAPI_DELIVERYPROCESSING_EXEC'
TABLES
    request      = t_request
    createditems = t_created
    return       = t_return.
READ TABLE t_return WITH KEY type = 'E'.
IF sy-subrc = 0.
MESSAGE e208(00) WITH 'Delivery creation error'.
ENDIF.
COMMIT WORK.
READ TABLE t_created INDEX 1.
WRITE: / 'Delivery Number : ',
         t_created-document_numb.
                  CREATE TRANSFER ORDER
DATA: w_tanum TYPE ltak-tanum.
CALL FUNCTION 'L_TO_CREATE_DN'
EXPORTING
    i_lgnum                          = '010'
    i_vbeln                          = t_created-document_numb
IMPORTING
   e_tanum                          = w_tanum
EXCEPTIONS
   foreign_lock                     = 1
   dn_completed                     = 2
   partial_delivery_forbidden       = 3
   xfeld_wrong                      = 4
   ldest_wrong                      = 5
   drukz_wrong                      = 6
   dn_wrong                         = 7
   squit_forbidden                  = 8
   no_to_created                    = 9
   teilk_wrong                      = 10
   update_without_commit            = 11
   no_authority                     = 12
   no_picking_allowed               = 13
   dn_hu_not_choosable              = 14
   input_error                      = 15
   OTHERS                           = 16
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
COMMIT WORK AND WAIT.
WRITE: / 'Transfer order number',
       w_tanum.
Code after inserting table control:-
REPORT zcl120_sales_n_delivery.
                  SALES DOCUMENT CREATION
DATA: p_auart TYPE auart .
DATA: p_vkorg TYPE vkorg .
DATA: p_vtweg TYPE vtweg .
DATA: p_spart TYPE vtweg .
DATA: p_sold TYPE kunnr .
DATA: p_ship TYPE kunnr .
*ITEM
data:
begin of it_item occurs 0,
   p_matnr TYPE matnr,
   p_menge TYPE kwmeng,
   p_plant TYPE werks_d,
   p_itcat TYPE pstyv,
end of it_item.
DATA DECLARATIONS.
DATA: v_vbeln LIKE vbak-vbeln.
DATA: header LIKE bapisdhead1.
DATA: headerx LIKE bapisdhead1x.
DATA: item LIKE bapisditem OCCURS 0 WITH HEADER LINE.
DATA: itemx LIKE bapisditemx OCCURS 0 WITH HEADER LINE.
DATA: partner LIKE bapipartnr OCCURS 0 WITH HEADER LINE.
DATA: return LIKE bapiret2 OCCURS 0 WITH HEADER LINE.
DATA: lt_schedules_inx TYPE STANDARD TABLE OF bapischdlx
WITH HEADER LINE.
DATA: lt_schedules_in TYPE STANDARD TABLE OF bapischdl
WITH HEADER LINE.
DATA:
W_COUNTER TYPE I,
IT_NUM(6) TYPE C value '000010',
IT_LINE(4) TYPE C value '0001'.
CALL SCREEN 100.
HEADER DATA
header-doc_type = p_auart.
headerx-doc_type = 'X'.
header-sales_org = p_vkorg.
headerx-sales_org = 'X'.
header-distr_chan = p_vtweg.
headerx-distr_chan = 'X'.
header-division = p_spart.
headerx-division = 'X'.
headerx-updateflag = 'I'.
partner-partn_role = 'AG'.
partner-partn_numb = p_sold.
APPEND partner.
partner-partn_role = 'WE'.
partner-partn_numb = p_ship.
APPEND partner.
loop at it_item.
CLEAR ITEM.
item-material = it_item-p_matnr.
item-plant = it_item-p_plant.
item-target_qty = it_item-p_menge.
item-target_qu = 'ST'.
item-item_categ = it_item-p_itcat.
APPEND item.
W_COUNTER = W_COUNTER + 1.
endloop.
DO W_COUNTER TIMES.
itemx-updateflag = 'I'.
itemx-material = 'X'.
itemx-plant = 'X'.
itemx-target_qty = 'X'.
itemx-target_qu = 'X'.
itemx-item_categ = 'X'.
APPEND itemx.
ENDDO.
Fill schedule lines
LOOP AT IT_ITEM.
CLEAR lt_schedules_in.
lt_schedules_in-itm_number = IT_NUM.
lt_schedules_in-sched_line = IT_LINE.
lt_schedules_in-req_qty = IT_ITEM-p_menge.
APPEND lt_schedules_in.
IT_NUM = IT_NUM + 10.
IT_LINE = IT_LINE + 1.
ENDLOOP.
IT_NUM = '000010'.
IT_LINE = '0001'.
Fill schedule line flags
LOOP AT IT_ITEM.
CLEAR lt_schedules_inx.
lt_schedules_inx-itm_number = IT_NUM.
lt_schedules_inx-sched_line = IT_LINE.
lt_schedules_inx-updateflag = 'X'.
lt_schedules_inx-req_qty = 'X'.
APPEND lt_schedules_inx.
IT_NUM = IT_NUM + 10.
IT_LINE = IT_LINE + 1.
ENDLOOP.
Call the BAPI
CALL FUNCTION 'BAPI_SALESDOCU_CREATEFROMDATA1'
EXPORTING
    sales_header_in     = header
    sales_header_inx    = headerx
IMPORTING
    salesdocument_ex    = v_vbeln
TABLES
    return              = return
    sales_items_in      = item
    sales_items_inx     = itemx
    sales_schedules_in = lt_schedules_in
    sales_schedules_inx = lt_schedules_inx
    sales_partners      = partner.
LOOP AT return WHERE type = 'E' OR type = 'A'.
EXIT.
ENDLOOP.
IF sy-subrc = 0.
WRITE / return-message.
WRITE: / 'Error in creating document'.
ELSE.
COMMIT WORK AND WAIT.
WRITE: / 'Document ', v_vbeln, ' created'.
ENDIF.
                  DELIVERY ORDER CREATION
*PARAMETERS: p_vbeln LIKE vbak-vbeln.
DATA: BEGIN OF t_vbap OCCURS 0,
        vbeln LIKE vbap-vbeln,
        posnr LIKE vbap-posnr,
        kwmeng LIKE vbap-kwmeng,
        matnr LIKE vbap-matnr,
        werks LIKE vbap-werks,
      END OF t_vbap.
DATA: t_request TYPE STANDARD TABLE OF bapideliciousrequest
      WITH HEADER LINE.
DATA: t_created TYPE STANDARD TABLE OF bapideliciouscreateditems
      WITH HEADER LINE.
DATA: t_return TYPE STANDARD TABLE OF bapiret2 WITH HEADER LINE.
SELECT vbeln posnr kwmeng matnr werks
       INTO TABLE t_vbap
       FROM vbap
       WHERE vbeln = v_vbeln
LOOP AT t_vbap.
t_request-document_numb = t_vbap-vbeln.
t_request-document_item = t_vbap-posnr.
t_request-quantity_sales_uom = t_vbap-kwmeng.
t_request-id = 1.
t_request-document_type = 'A'.
t_request-delivery_date      = sy-datum.
t_request-material = t_vbap-matnr.
t_request-plant = t_vbap-werks.
t_request-date = sy-datum.
t_request-goods_issue_date = sy-datum.
t_request-goods_issue_time = sy-uzeit.
APPEND t_request.
ENDLOOP.
CALL FUNCTION 'BAPI_DELIVERYPROCESSING_EXEC'
TABLES
    request      = t_request
    createditems = t_created
    return       = t_return.
READ TABLE t_return WITH KEY type = 'E'.
IF sy-subrc = 0.
MESSAGE e208(00) WITH 'Delivery creation error'.
ENDIF.
COMMIT WORK.
READ TABLE t_created INDEX 1.
WRITE: / 'Delivery Number : ',
         t_created-document_numb.
                  CREATE TRANSFER ORDER
DATA: w_tanum TYPE ltak-tanum.
CALL FUNCTION 'L_TO_CREATE_DN'
EXPORTING
    i_lgnum                          = '010'
    i_vbeln                          = t_created-document_numb
IMPORTING
   e_tanum                          = w_tanum
EXCEPTIONS
   foreign_lock                     = 1
   dn_completed                     = 2
   partial_delivery_forbidden       = 3
   xfeld_wrong                      = 4
   ldest_wrong                      = 5
   drukz_wrong                      = 6
   dn_wrong                         = 7
   squit_forbidden                  = 8
   no_to_created                    = 9
   teilk_wrong                      = 10
   update_without_commit            = 11
   no_authority                     = 12
   no_picking_allowed               = 13
   dn_hu_not_choosable              = 14
   input_error                      = 15
   OTHERS                           = 16
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
COMMIT WORK AND WAIT.
WRITE: / 'Transfer order number',
       w_tanum.
*&SPWIZARD: DECLARATION OF TABLECONTROL 'TAB_CON1' ITSELF
CONTROLS: TAB_CON1 TYPE TABLEVIEW USING SCREEN 0100.
*&SPWIZARD: OUTPUT MODULE FOR TC 'TAB_CON1'. DO NOT CHANGE THIS LINE!
*&SPWIZARD: UPDATE LINES FOR EQUIVALENT SCROLLBAR
MODULE TAB_CON1_CHANGE_TC_ATTR OUTPUT.
DESCRIBE TABLE IT_ITEM LINES TAB_CON1-lines.
ENDMODULE.
*&      Module STATUS_0100 OUTPUT
      text
module STATUS_0100 output.
   SET PF-STATUS 'MENU'.
SET TITLEBAR 'xxx'.
endmodule.                 " STATUS_0100 OUTPUT
*&      Module USER_COMMAND_0100 INPUT
      text
module USER_COMMAND_0100 input.
IF SY-UCOMM EQ 'START'.
LEAVE to screen 0 .
ENDIF.
endmodule.                 " USER_COMMAND_0100 INPUT
*&      Module APPEND_IT_ITEM INPUT
      text
module APPEND_IT_ITEM input.
APPEND IT_ITEM.
CLEAR IT_ITEM.
endmodule.                 " APPEND_IT_ITEM INPUT
plz help me where the error is

Hi,
Do same as suggested by Ramesh. Add one user command button after clicking that do the looping and call new screen.
Ashven.

How to validate the dates in the table control ?

How to validate the dates in the table control ?
Can I write like this ?
LOOP AT it_tab .
CHAIN.
FIELD : it_tab-strtdat,it_tab-enddat.
module date_validation.
ENDCHAIN.
ENDLOOP.
Module Date_validation.
ranges : vdat type sy-datum.
vdat-sign = 'I'.
VDAT-LOW = it_tab-STRTDAT.
VDAT-HIGH = it_tab-ENDDAT.
VDAT-OPTION = 'BT'.
APPEND VDAT.
WHAT CODE I have to write here to validate ?
and If I write like this How can we know which is the current row being add ?
It loops total internal table ..?
Bye,
Muttu.

Hi,
I think there is no need to put chain endchain.
To do validation you have to write module in PAI which does required validations.
Thanks
DARSHAN PATEL

Dynamic icon in the table control

Similar Messages

Maybe you are looking for