Adding check box in the transaction xd02

hi friends,
My requirement is to add a check box in the customer change : contact person details standard screen in the transaction xd02.
can any one please give me the suggestions for that?

when u find the BADI name go there and add a sub screen with the element you want to put in there. activate the BADI. your task is done.

Similar Messages

Adding Check box in the SRM

Hello
in transaction <Issue Purchase Orders>
after we search for the po's, a list of pos is displayed and actions which can be performed on that.
we need to add a check box next to the output push button in the actions coloum .
when an action is pressed, we need to check if this check box is filled and and do certain tasks.
how can we achive this?
we need to do the same in the transaction < Process Purchase Order >
thanks
Chandrashekar.

when u find the BADI name go there and add a sub screen with the element you want to put in there. activate the BADI. your task is done.

Adding check boxes to the output ALV report ?

Hi,
    I have a requirement to add checkboxes as the first field in the output of an ALV report for all the records. Can any of you help me with this ?.
Thank you.

Hi,
You can add checkbox using ALV grid display.
Call your ALV grid as below. Pass 'wa_layout' with 'WA_LAYOUT-BOX_FIELDNAME' as your selection column name.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
      EXPORTING
        I_CALLBACK_PROGRAM       = SY-REPID
        I_CALLBACK_PF_STATUS_SET = 'F_GUI_STATUS'
        I_CALLBACK_USER_COMMAND = 'F_USERCOMMAND'
        I_GRID_TITLE             = TEXT-026
        IS_LAYOUT                = WA_LAYOUT
        IT_FIELDCAT              = I_FIELDCAT
      TABLES
        T_OUTTAB                 = I_OUTTAB
      EXCEPTIONS
        PROGRAM_ERROR            = 1
        OTHERS                   = 2.
Check below link for more help.
[http://www.sapfans.com/forums/viewtopic.php?t=40968]
Thanks,
Archana

Activating auto PO Check Box in the purchasing view for plant level.

Hi Techies,
Right now i have an issue related to auto PO check box in the purchasing view for the plant level. There are three plants A,B,C.. For the plants A and B the automatic PO check box is visible and the user is able to provide input values. But when it comes to plant C the auto PO field is not available and hence the user is unable to provide input for auto PO.
Is there any configuration to be done to activate the auto PO check box in the purchasing view in the material master with respect to plant C?
If so could you please guide me with the settings?
Thanking you in advance.
Regards,
Gopalakrishnan.S
Edited by: krishu100 on Jul 13, 2011 2:25 AM

Hi Techies thanks for you all info.
Now today i just tried to created a new HALB Material in the plant C which i had issues yesterday. But when i created today a new material the Auto PO feild is available for entry. THen i tried to go to the material which i created yesterday for editing it. But i was unable to do it.
I checked the transactions which most of you referred(Very Useful). I found that all the plant s had the same screen selction setting and set as Opt Entry. The field screen referrence for MM01, MM02 Transaction s are also set as opt entry. The screen reference for HALB is also set as Opt entry. Still i m not able to find the field auto PO in the purchasing field.
So does it mean that a material once created without auto PO enabled or visible can never be updated after that? But i think its not the case and we should be able to edit it(correct me if im wrong).
Really having my fingers crossed to find a solution for this issue.
Regards,
Gopalakrishnan.S

How do can I have the form fill in a check box if the user has entered text in a textbox?

I have a form that is submitting an xml data file that is picked up by MS Word and used to populate a document. However, there's a 'Miscellaneous' field where the user can type in addtional information that would not drop easily into the Word document (exceptions, items not on the drop down lists, etc.). I'd like to test to see if that Miscellaneous field has infomation in it and if it does, to set a invisible checkbox to "1" so that I can insert a text message in the Word document that there's additional information in the .pdf form that will have to be addressed manually in the Word document.
I've tried
if(Misc.rawValue !== "")
otherinfo.rawValue = 1;
but while it doesn't generate a Javascript error, it doesn't set the value either, and I haven't found any function that checks for whether a field is empty. I'm sure there's got to be a way to do this, but I'm stumped. Any help greatly appreciated!
Bill

It appears you are using LiveCycle Designer, so you will have to use the syntax of FormCalc or LiveCycle Designer JavaScript.
For FormCalc:
if(HasValue(Misc)) then
otherinfo = 1
else
otherinfo = 0
endif
For JavaScript
if(HasValue(Misc.rawValue))
otherinfo.rawValue = 1;
else
otherinfo.rawValue = 0;
I added code to clear the check box if the user clears the field.

Creation of check boxes in the ALV report

Hi All,
    With all your support i'm gaining more knowledge, thank's for that,
in my ALV report i want to create a check boxes if the check boxs are elected and processed then the particular records is going to disappear,
How can we do this,
Thanks & Regards
Krishna

hi,
i have done this one.please check my code.
TYPE-POOLS : slis.
TYPES : BEGIN OF st_ekko,
          ebeln TYPE ekko-ebeln,    "Purchasing Document Number
          bstyp TYPE ekko-bstyp,    "Purchasing Document Category
          bsart TYPE ekko-bsart,    "Purchasing Document Type
          aedat TYPE ekko-aedat,    "record created on
          ernam TYPE ekko-ernam,    "Person who Created the Object
          check(1),
        END OF st_ekko.
TYPES : BEGIN OF st_ekpo,
         ebeln TYPE ekko-ebeln,
         ebelp TYPE ekpo-ebelp,    "Item Number of Purchasing Document
         ematn TYPE ekpo-ematn,    "Material number
         matkl TYPE ekpo-matkl,    "Material group
         netpr TYPE ekpo-netpr,    "Net price in purchasing document
        END OF st_ekpo.
TYPES : BEGIN OF st_ebeln,
         ebeln TYPE ekpo-ebeln,
        END OF st_ebeln.
TYPES : BEGIN OF st_eine,
         ebeln TYPE ekko-ebeln,
         ekorg TYPE eine-ekorg,
         ekgrp TYPE eine-ekgrp,
        END OF st_eine.
TYPES : BEGIN OF st_check,
         check(1),
        END OF st_check.
DATA : it_ekpo TYPE STANDARD TABLE OF st_ekpo,
       it_ekko TYPE STANDARD TABLE OF st_ekko,
       wa_ekko LIKE LINE OF it_ekko,
       it_fieldcat TYPE slis_t_fieldcat_alv,
       wa_fieldcat LIKE LINE OF it_fieldcat,
       wa_layout TYPE slis_layout_alv,
       it_events TYPE slis_t_event,
       st_event LIKE LINE OF it_events,
       it_listheadr TYPE slis_t_listheader ,
       wa_listheadr LIKE LINE OF it_listheadr,
       st_printparams TYPE slis_print_alv,
       it_sortinfo TYPE slis_t_sortinfo_alv,
       wa_sortinfo LIKE LINE OF it_sortinfo,
       it_ekposortinfo TYPE slis_t_sortinfo_alv,
       wa_ekposortinfo LIKE LINE OF it_ekposortinfo,
       it_filter TYPE slis_t_filter_alv,
       it_ebeln TYPE STANDARD TABLE OF st_ebeln,
       it_eine TYPE STANDARD TABLE OF st_eine,
       wa_eine TYPE st_eine,
       it_popup TYPE STANDARD TABLE OF st_eine,
       wa_popup TYPE st_eine,
       it_check TYPE STANDARD TABLE OF st_check,
       wa_check TYPE st_check.
DATA : v_ebeln TYPE ekko-ebeln.
                       SELECTION-SCREEN
SELECTION-SCREEN BEGIN OF BLOCK b WITH FRAME TITLE tit.
SELECT-OPTIONS: so_ebeln FOR v_ebeln OBLIGATORY.
SELECTION-SCREEN END OF BLOCK b.
                         INITIALIZATION
INITIALIZATION.
tit = text-000.
                         AT SELECTION-SCREEN ON
AT SELECTION-SCREEN ON so_ebeln.
PERFORM validate_ebeln.
                         START-OF-SELECTION
START-OF-SELECTION.
PERFORM get_ekko_data.
PERFORM get_eine_data.
                         END-OF-SELECTION
END-OF-SELECTION.
PERFORM populate_fieldcat1.
PERFORM populate_layout.
PERFORM get_eventlist.
PERFORM get_ekkosortinfo.
PERFORM ekkodisplay_onalv.
*&      Form POPULATE_FIELDCAT1
FORM populate_fieldcat1.
wa_fieldcat-fieldname = 'EBELN'.
wa_fieldcat-seltext_l = text-004.
wa_fieldcat-no_zero = 'X'.
APPEND wa_fieldcat TO it_fieldcat.
wa_fieldcat-fieldname = 'BSTYP'.
wa_fieldcat-seltext_l = text-005.
APPEND wa_fieldcat TO it_fieldcat.
wa_fieldcat-fieldname = 'BSART'.
wa_fieldcat-seltext_l = text-006.
APPEND wa_fieldcat TO it_fieldcat.
wa_fieldcat-fieldname = 'AEDAT'.
wa_fieldcat-seltext_l = text-007.
APPEND wa_fieldcat TO it_fieldcat.
wa_fieldcat-fieldname = 'ERNAM'.
wa_fieldcat-seltext_l = text-008.
APPEND wa_fieldcat TO it_fieldcat.
ENDFORM.                    "POPULATE_FIELDCAT1
*&      Form populate_fieldcat2
FORM populate_fieldcat2 .
CLEAR wa_fieldcat.
CLEAR it_fieldcat.
REFRESH it_fieldcat.
wa_fieldcat-fieldname = 'EBELN'.
wa_fieldcat-seltext_l = text-004.
wa_fieldcat-hotspot   = 'X'.
wa_fieldcat-no_zero = 'X'.
APPEND wa_fieldcat TO it_fieldcat.
wa_fieldcat-fieldname = 'EBELP'.
wa_fieldcat-seltext_l = text-009.
APPEND wa_fieldcat TO it_fieldcat.
wa_fieldcat-fieldname = 'EMATN'.
wa_fieldcat-seltext_l = text-010.
APPEND wa_fieldcat TO it_fieldcat.
wa_fieldcat-fieldname = 'MATKL'.
wa_fieldcat-seltext_l = text-011.
APPEND wa_fieldcat TO it_fieldcat.
wa_fieldcat-fieldname = 'NETPR'.
wa_fieldcat-seltext_l = text-012.
wa_fieldcat-datatype = 'CURR'.            "Obligatory to perform SUM
wa_fieldcat-do_sum    = 'X'.
APPEND wa_fieldcat TO it_fieldcat.
ENDFORM.                                     "populate_fieldcat2
*&      Form GET_EVENTLIST
FORM get_eventlist.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
    EXPORTING
      i_list_type     = 0
    IMPORTING
      et_events       = it_events[]
    EXCEPTIONS
      list_type_wrong = 1
      OTHERS          = 2.
IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
READ TABLE it_events WITH KEY name = slis_ev_pf_status_set INTO st_event.
IF sy-subrc EQ 0.
    st_event-form = 'SET_PF_STATUS1'.
    APPEND st_event TO it_events.
    CLEAR st_event.
ENDIF.
READ TABLE it_events WITH KEY name = slis_ev_end_of_page INTO st_event.
IF sy-subrc EQ 0.
    st_event-form = 'END_OF_PAGE'.
    APPEND st_event TO it_events.
    CLEAR st_event.
ENDIF.
ENDFORM.                    "GET_EVENTLIST
*&      Form ekpodisplay_onalv
FORM ekpodisplay_onalv .
IF it_ekpo[] IS INITIAL.
    MESSAGE 'NO DATA FOUND' TYPE 'I'.
ELSE.
    CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
     EXPORTING
     i_callback_program                = sy-repid
     i_callback_pf_status_set          = 'SET_PF_STATUS'
     i_callback_user_command           = 'AT_USER_COMMAND1'
     i_callback_top_of_page            = 'TOP_OF_PAGE'
    I_CALLBACK_HTML_TOP_OF_PAGE       = ' '
    I_CALLBACK_HTML_END_OF_LIST       = ' '
    I_STRUCTURE_NAME                  = I_STRUCTURE_NAME
    I_BACKGROUND_ID                   = ' '
    I_GRID_TITLE                      = I_GRID_TITLE
    I_GRID_SETTINGS                   = I_GRID_SETTINGS
       is_layout                         = wa_layout
       it_fieldcat                       = it_fieldcat
    IT_EXCLUDING                      = IT_EXCLUDING
    IT_SPECIAL_GROUPS                 = IT_SPECIAL_GROUPS
     it_sort                           = it_ekposortinfo[]
    IT_FILTER                         = IT_FILTER
    IS_SEL_HIDE                       = IS_SEL_HIDE
    I_DEFAULT                         = 'X'
    I_SAVE                            = ' '
    IS_VARIANT                        = IS_VARIANT
    it_events                         = it_events
    IT_EVENT_EXIT                     = IT_EVENT_EXIT
    IS_PRINT                          = IS_PRINT
    IS_REPREP_ID                      = IS_REPREP_ID
    I_SCREEN_START_COLUMN             = 0
    I_SCREEN_START_LINE               = 0
    I_SCREEN_END_COLUMN               = 0
    I_SCREEN_END_LINE                 = 0
    I_HTML_HEIGHT_TOP                 = 0
    I_HTML_HEIGHT_END                 = 0
    IT_ALV_GRAPHICS                   = IT_ALV_GRAPHICS
    IT_HYPERLINK                      = IT_HYPERLINK
    IT_ADD_FIELDCAT                   = IT_ADD_FIELDCAT
    IT_EXCEPT_QINFO                   = IT_EXCEPT_QINFO
    IR_SALV_FULLSCREEN_ADAPTER        = IR_SALV_FULLSCREEN_ADAPTER
IMPORTING
    E_EXIT_CAUSED_BY_CALLER           = E_EXIT_CAUSED_BY_CALLER
    ES_EXIT_CAUSED_BY_USER            = ES_EXIT_CAUSED_BY_USER
      TABLES
        t_outtab                          = it_ekpo
   EXCEPTIONS
     program_error                     = 1
     OTHERS                            = 2           .
    IF sy-subrc <> 0.
      MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
              WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
    ENDIF.
ENDIF.
ENDFORM.                    "ekpodisplay_onalv
*&      Form SET_PF_STATUS1
FORM set_pf_status1 USING rt_extab TYPE slis_t_extab.
SET PF-STATUS 'MENU' excluding rt_extab.      "Copy from SALV .
ENDFORM.                                        "SET_PF_STATUS1
*&      Form SET_PF_STATUS
FORM set_pf_status USING rt_extab TYPE slis_t_extab.
SET PF-STATUS 'STANDARD' excluding rt_extab. "Copy from SALV .
ENDFORM.                                        "SET_PF_STATUS
*&      Form AT_user_command
FORM at_user_command USING r_ucomm LIKE sy-ucomm
                         rs_selfield TYPE slis_selfield.
CASE r_ucomm.
    WHEN '&IC1'.
      IF rs_selfield-fieldname EQ 'EBELN'.
        READ TABLE it_ekko INTO wa_ekko INDEX rs_selfield-tabindex.
        SELECT ebeln ebelp ematn matkl netpr
          FROM ekpo
          INTO TABLE it_ekpo
         WHERE ebeln EQ wa_ekko-ebeln.
        PERFORM populate_fieldcat2.
        PERFORM populate_layout2.
        PERFORM get_ekposortinfo.
        PERFORM ekpodisplay_onalv.
      ELSE.
        MESSAGE i020(z50871msg) WITH text-013.
      ENDIF.
    WHEN 'SE16'.
      CALL TRANSACTION 'SE16'.
    WHEN 'SE37'.
      CALL TRANSACTION 'SE37'.
    WHEN 'DISP'.
      PERFORM get_popupdata.
      PERFORM get_popupfcat.
      PERFORM display_popup.
ENDCASE.
ENDFORM.                                            "AT_user_command
*&      Form TOP_OF_PAGE
FORM top_of_page.
REFRESH it_listheadr.
wa_listheadr-typ = 'H'.
wa_listheadr-info = text-001.
APPEND wa_listheadr TO it_listheadr.
CLEAR wa_listheadr.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
      it_list_commentary = it_listheadr[]
      i_logo             = 'ENJOYSAP_LOGO'.    "From OAER transaction
ENDFORM.                    "TOP_OF_PAGE
*&      Form build_print_params
FORM build_print_params.
st_printparams-reserve_lines = '3'.               "Lines reserved for footer
st_printparams-no_coverpage = 'X'.
ENDFORM.                    "build_print_params
*&      Form end_of_page
FORM end_of_page.
REFRESH it_listheadr.
wa_listheadr-typ = 'H'.
wa_listheadr-info = sy-pagno.
APPEND wa_listheadr TO it_listheadr.
CLEAR wa_listheadr.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
      it_list_commentary = it_listheadr[].
ENDFORM.                                            "end_of_page
*&      Form GET_EKPOSORTINFO
FORM get_ekposortinfo.
wa_ekposortinfo-up = 'X'.
wa_ekposortinfo-spos = 1.
wa_ekposortinfo-fieldname = 'EBELP'.
wa_ekposortinfo-tabname = 'EKPO'.
APPEND wa_ekposortinfo TO it_ekposortinfo.
CLEAR wa_ekposortinfo.
wa_ekposortinfo-up = 'X'.
wa_ekposortinfo-spos = 2.
wa_ekposortinfo-fieldname = 'EMATN'.
wa_ekposortinfo-tabname = 'EKPO'.
APPEND wa_ekposortinfo TO it_ekposortinfo.
CLEAR wa_ekposortinfo.
ENDFORM.                                           "GET_EKPOSORTINFO
*&      Form POPULATE_LAYOUT
FORM populate_layout.
wa_layout-colwidth_optimize = 'X'.               "column width
wa_layout-zebra = 'X'.
wa_layout-no_hline = 'X'.
wa_layout-no_vline = 'X'.
wa_layout-cell_merge = 'X'.
wa_layout-box_fieldname = 'CHECK'.
wa_layout-box_tabname = 'IT_EKKO'.
wa_layout-window_titlebar = 'PURCHASE ORDER HEADER DETAILS'.
ENDFORM.                                         "POPULATE_LAYOUT
*&      Form get_EKKOsortinfo
FORM get_ekkosortinfo.
wa_sortinfo-up = 'X'.
wa_sortinfo-spos = 1.
wa_sortinfo-fieldname = 'EBELN'.
wa_sortinfo-tabname = 'EKKO'.
APPEND wa_sortinfo TO it_sortinfo.
CLEAR wa_sortinfo.
wa_sortinfo-up = 'X'.
wa_sortinfo-spos = 2.
wa_sortinfo-fieldname = 'BSTYP'.
wa_sortinfo-tabname = 'EKKO'.
APPEND wa_sortinfo TO it_sortinfo.
CLEAR wa_sortinfo.
wa_sortinfo-up = 'X'.
wa_sortinfo-spos = 3.
wa_sortinfo-fieldname = 'AEDAT'.
wa_sortinfo-tabname = 'EKKO'.
APPEND wa_sortinfo TO it_sortinfo.
CLEAR wa_sortinfo.
ENDFORM.                                         "get_EKKOsortinfo
*&      Form EKKODISPLAY_ONALV
FORM ekkodisplay_onalv.
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
    EXPORTING
      i_callback_program       = sy-repid
      i_callback_pf_status_set = 'SET_PF_STATUS1'
      i_callback_user_command = 'AT_USER_COMMAND'
      is_layout                = wa_layout
      it_fieldcat              = it_fieldcat
      it_sort                  = it_sortinfo[]
      it_filter                = it_filter
      it_events                = it_events[]
    TABLES
      t_outtab                 = it_ekko[]
    EXCEPTIONS
      program_error            = 1
      OTHERS                   = 2.
IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
ENDFORM.                                            "EKKODISPLAY_ONALV
*&      Form validate_ebeln
FORM validate_ebeln.
SELECT ebeln
      FROM ekpo
      INTO TABLE it_ebeln
      WHERE ebeln IN so_ebeln.
IF sy-subrc NE 0.
    MESSAGE e020(z50871msg) WITH text-014.
ENDIF.
ENDFORM.                                           "validate_ebeln
*&      Form populate_layout2
FORM populate_layout2 .
CLEAR wa_layout.
wa_layout-colwidth_optimize = 'X'.               "column width
wa_layout-zebra = 'X'.
wa_layout-no_hline = 'X'.
wa_layout-no_vline = 'X'.
wa_layout-cell_merge = 'X'.
wa_layout-window_titlebar = 'PURCHASE ORDER DETAILS SECOND SCREEN'.
ENDFORM.                    " populate_layout2
*&      Form GET_POPUPDATA
FORM get_popupdata .
LOOP AT it_ekko INTO wa_ekko WHERE check = 'X'.
    READ TABLE it_eine INTO wa_eine WITH KEY ebeln = wa_ekko-ebeln.
    IF sy-subrc NE 0.
      MESSAGE i020(z50871msg) WITH text-015 wa_ekko-ebeln .
    ELSE.
      wa_popup-ebeln = wa_eine-ebeln.
      wa_popup-ekorg = wa_eine-ekorg.
      wa_popup-ekgrp = wa_eine-ekgrp.
      APPEND wa_popup TO it_popup.
    ENDIF.
ENDLOOP.
ENDFORM.                    " GET_POPUPDATA
*&      Form GET_POPUPFCAT
FORM get_popupfcat .
CLEAR wa_fieldcat.
REFRESH it_fieldcat.
wa_fieldcat-fieldname = 'EBELN'.
wa_fieldcat-seltext_l = text-004.
wa_fieldcat-hotspot   = 'X'.
APPEND wa_fieldcat TO it_fieldcat.
wa_fieldcat-fieldname = 'EKORG'.
wa_fieldcat-seltext_l = text-016.
APPEND wa_fieldcat TO it_fieldcat.
wa_fieldcat-fieldname = 'EKGRP'.
wa_fieldcat-seltext_l = text-017.
APPEND wa_fieldcat TO it_fieldcat.
ENDFORM.                    " GET_POPUPFCAT
*&      Form DISPLAY_POPUP
FORM display_popup .
LOOP AT it_ekko INTO wa_ekko WHERE check EQ 'X'.
    wa_check-check = wa_ekko-check.
    APPEND wa_check TO it_check.
ENDLOOP.
IF it_check[] IS INITIAL.
    MESSAGE i020(z50871msg) WITH text-018.
ENDIF.
IF NOT it_popup[] IS INITIAL.
    CALL FUNCTION 'REUSE_ALV_POPUP_TO_SELECT'
      EXPORTING
        i_title              = text-003
        i_allow_no_selection = 'X'
        i_scroll_to_sel_line = 'X'
        i_tabname            = 'IT_POPUP'
        it_fieldcat          = it_fieldcat
        i_callback_program   = sy-repid
      TABLES
        t_outtab             = it_popup
      EXCEPTIONS
        program_error        = 1
        OTHERS               = 2.
    IF sy-subrc <> 0.
      MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
              WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
    ENDIF.
ENDIF.
REFRESH it_check.
REFRESH it_popup.
ENDFORM.                    " DISPLAY_POPUP
*&      Form get_ekko_data
FORM get_ekko_data .
SELECT ebeln bstyp bsart aedat ernam
      FROM ekko
      INTO CORRESPONDING FIELDS OF TABLE it_ekko
     WHERE ebeln IN so_ebeln.
IF sy-subrc NE 0.
    MESSAGE e020(z50871msg) WITH text-019.
ENDIF.
ENDFORM.                    " get_ekko_data
*&      Form get_eine_data
FORM get_eine_data .
SELECT ebeln ekorg ekgrp
    FROM eine
    INTO TABLE it_eine
   WHERE ebeln IN so_ebeln.
ENDFORM.                    " get_eine_data
*&      Form at_user_command1
FORM at_user_command1 USING r_ucomm LIKE sy-ucomm
                         rs_selfield TYPE slis_selfield.
    CASE r_ucomm.
    WHEN 'SE16'.
      CALL TRANSACTION 'SE16'.
    WHEN 'SE37'.
      CALL TRANSACTION 'SE37'.
ENDCASE.
regards,
pavan t.

Impact of EU check box in OY01 transaction

Hi,
Can any one explain me the impact of EU check box in OY01 transaction code, as per my knowledge if we selectthe EU check box the country for which we selected the check box it will fall upder the EU tax countries and the same by default will appear while creating Sales Order, but after doing this transaction where we cansee the impact of this chage to this specific country.
pls. suggest me on this and correct me if my assumption is wrong.
Regards,
Lakshmi

Hi,
Not really. The check box will allow certain information to be entered in the company code and customer / vendor master for EU countries. By default it is coded with the country, ie. if you want to put this check on for any other country additional functionalities will not be activated.
As an example, if you go into Company code global parameters in Financial accounting, in the detail screen you will see a button for Additional data. Click on that, you will see additional fields which will only be visible for countries which have the EU check on.
Most of the impact due to this check box is related to EU reporting and usually master based and not transaction based.
Cheers.

Adding check box in selection screen

Hi all,
I have to add a check box to the previous report, I need to fetch the data based on the checkbox. Please tell me how to proceed further with flag set.
Thanx and Regards,
Line.

Hi..
1) do u want this? if checkbox is not checked then no data is read from database and if checked then only data wil be fetched -
tables pa0001.
parameters p_check as checkbox.
data: begin of itab occurs 0.
include structure pa0001.
data end of itab.
start-of-selection.
if p_check = 'X'.
perform read_data.
endif.
if itab[] is not initial.
loop at itab.
write:/ itab-pernr.
endloop.
else.
write: 'No data fetched from database,may be u need to check the Checkbox'.
endif.
*&      Form read_data
      text
--> p1        text
<-- p2        text
FORM read_data .
select * from pa0001 into table itab up to 20 rows.
ENDFORM.                    " read_data
2) Adding fields based on Chekbox -
parameters: p_check AS CHECKBOX MODIF ID ABC USER-COMMAND CH.
parameters: p_pernr like pa0001-pernr modif ID ABD,
            P_DATE LIKE PA0001-BEGDA MODIF ID ABD.
Check sy-ucomm = 'CH'.
AT SELECTION-SCREEN OUTPUT.
loop at screen.
if p_CHECK = 'X'.
   if screen-group1 = 'ABD'.
      SCREEN-ACTIVE = '1'.
      MODIFY SCREEN.
   ENDIF.
ELSE.
if screen-group1 = 'ABD'.
     SCREEN-ACTIVE = '0'.
     MODIFY SCREEN.
     ENDIF.
ENDIF.
ENDLOOP.

How can i add the check box beside the directory?

how can i add the check box beside the directory? anybody can help?
tis r the panel of my program :
// FileTreePanel.java
// JPanel for displaying file system contents in a JTree
// using a custom TreeModel.
package com.deitel.advjhtp1.mvc.tree.filesystem;
import java.io.*;
import java.awt.*;
import java.awt.event.*;
import javax.swing.*;
import javax.swing.tree.*;
import javax.swing.event.*;
import com.deitel.advjhtp1.mvc.tree.filesystem.FileSystemModel;
public class FileTreePanel extends JPanel {
private JTree fileTree;
private FileSystemModel fileSystemModel;
private JTextArea fileDetailsTextArea;
public FileTreePanel( String directory )
fileDetailsTextArea = new JTextArea();
fileDetailsTextArea.setEditable( false );
fileSystemModel = new FileSystemModel(
new File( directory ) );
fileTree = new JTree( fileSystemModel );
fileTree.setEditable( true );
fileTree.addTreeSelectionListener(
new TreeSelectionListener() {
public void valueChanged(
TreeSelectionEvent event )
File file = ( File )
fileTree.getLastSelectedPathComponent();
fileDetailsTextArea.setText(
getFileDetails( file ) );
JSplitPane splitPane = new JSplitPane(
JSplitPane.HORIZONTAL_SPLIT, true,
new JScrollPane( fileTree ),
new JScrollPane( fileDetailsTextArea ) );
setLayout( new BorderLayout() );
add( splitPane, BorderLayout.NORTH );
JCheckBox check = new JCheckBox("Check me");
add( check, BorderLayout.SOUTH );
public Dimension getPreferredSize()
return new Dimension( 400, 200 );
private String getFileDetails( File file )
if ( file == null )
return "";
StringBuffer buffer = new StringBuffer();
buffer.append( "Name: " + file.getName() + "\n" );
buffer.append( "Path: " + file.getPath() + "\n" );
buffer.append( "Size: " + file.length() + "\n" );
return buffer.toString();
public static void main( String args[] )
if ( args.length != 1 )
System.err.println(
"Usage: java FileTreeFrame <path>" );
else {
JFrame frame = new JFrame( "JTree FileSystem Viewer" );
FileTreePanel treePanel = new FileTreePanel( args[ 0 ] );
frame.getContentPane().add( treePanel );
frame.setDefaultCloseOperation( JFrame.EXIT_ON_CLOSE );
frame.pack();
frame.setVisible( true );
}

You can maybe explore button and forms feature in InDesign. It was added in CS6.

Default check on the 'Posting block' check box in the Physical Inventory

I am looking for a default check on the 'Posting block' check box in the Physical Inventory document for T-code MI01 or MI31. Can anyone help in this?

Thanks for your reply. Can you send me the detail process how to do it through Transaction Variant.
Regards,
Tt

Display of check box as the output in the ALV

Hi Experts,
Please guide me with the steps of displaying the check box as the output of an ALV report
thanks

Hi,
Check this program: BALVSD01.
Check this code:
*& Report ZAK_ALV
REPORT ZAK_ALV line-count 10.
TABLES: ekko.
type-pools: slis. "ALV Declarations
*Data Declaration
TYPES: BEGIN OF t_ekko,
ck type c,
ebeln TYPE ekpo-ebeln,
ebelp TYPE ekpo-ebelp,
statu TYPE ekpo-statu,
aedat TYPE ekpo-aedat,
matnr TYPE ekpo-matnr,
menge TYPE ekpo-menge,
meins TYPE ekpo-meins,
netpr TYPE ekpo-netpr,
peinh TYPE ekpo-peinh,
END OF t_ekko.
DATA: it_ekko TYPE STANDARD TABLE OF t_ekko INITIAL SIZE 0,
wa_ekko TYPE t_ekko.
*ALV data declarations
data: fieldcatalog type slis_t_fieldcat_alv with header line,
gd_tab_group type slis_t_sp_group_alv,
gd_layout type slis_layout_alv,
gd_repid like sy-repid,
gt_events type slis_t_event,
gd_prntparams type slis_print_alv.
*Start-of-selection.
START-OF-SELECTION.
perform data_retrieval.
perform build_fieldcatalog.
perform build_layout.
perform build_events.
perform build_print_params.
perform display_alv_report.
*& Form BUILD_FIELDCATALOG
Build Fieldcatalog for ALV Report
form build_fieldcatalog.
There are a number of ways to create a fieldcat.
For the purpose of this example i will build the fieldcatalog manualy
by populating the internal table fields individually and then
appending the rows. This method can be the most time consuming but can
also allow you more control of the final product.
Beware though, you need to ensure that all fields required are
populated. When using some of functionality available via ALV, such as
total. You may need to provide more information than if you were
simply displaying the result
I.e. Field type may be required in-order for
the 'TOTAL' function to work.
fieldcatalog-fieldname = 'CK'.
fieldcatalog-seltext_m = 'CHECKM BOX'.
fieldcatalog-col_pos = 0.
fieldcatalog-outputlen = 10.
fieldcatalog-CHECKBOX = 'X'.
fieldcatalog-EDIT = 'X'.
fieldcatalog-key = ''.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
fieldcatalog-fieldname = 'EBELN'.
fieldcatalog-seltext_m = 'Purchase Order'.
fieldcatalog-col_pos = 0.
fieldcatalog-outputlen = 10.
fieldcatalog-emphasize = 'X'.
fieldcatalog-key = 'X'.
fieldcatalog-no_zero = 'X'.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
fieldcatalog-fieldname = 'EBELP'.
fieldcatalog-seltext_m = 'PO Item'.
fieldcatalog-col_pos = 1.
fieldcatalog-checkbox = 'X'.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
fieldcatalog-fieldname = 'STATU'.
fieldcatalog-seltext_m = 'Status'.
fieldcatalog-col_pos = 2.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
fieldcatalog-fieldname = 'AEDAT'.
fieldcatalog-seltext_m = 'Item change date'.
fieldcatalog-col_pos = 3.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
fieldcatalog-fieldname = 'MATNR'.
fieldcatalog-seltext_m = 'Material Number'.
fieldcatalog-col_pos = 4.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
fieldcatalog-fieldname = 'MENGE'.
fieldcatalog-seltext_m = 'PO quantity'.
fieldcatalog-col_pos = 5.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
fieldcatalog-fieldname = 'MEINS'.
fieldcatalog-seltext_m = 'Order Unit'.
fieldcatalog-col_pos = 6.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
fieldcatalog-fieldname = 'NETPR'.
fieldcatalog-seltext_m = 'Net Price'.
fieldcatalog-col_pos = 7.
fieldcatalog-outputlen = 15.
fieldcatalog-do_sum = 'X'.
fieldcatalog-datatype = 'CURR'.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
fieldcatalog-fieldname = 'PEINH'.
fieldcatalog-seltext_m = 'Price Unit'.
fieldcatalog-col_pos = 8.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
endform. " BUILD_FIELDCATALOG
*& Form BUILD_LAYOUT
Build layout for ALV grid report
form build_layout.
gd_layout-no_input = 'X'.
gd_layout-colwidth_optimize = 'X'.
gd_layout-totals_text = 'Totals'(201).
gd_layout-totals_only = 'X'.
gd_layout-f2code = 'DISP'. "Sets fcode for when double
"click(press f2)
gd_layout-zebra = 'X'.
gd_layout-group_change_edit = 'X'.
gd_layout-header_text = 'helllllo'.
endform. " BUILD_LAYOUT
*& Form DISPLAY_ALV_REPORT
Display report using ALV grid
form display_alv_report.
gd_repid = sy-repid.
call function 'REUSE_ALV_GRID_DISPLAY'
exporting
i_callback_program = gd_repid
i_callback_top_of_page = 'TOP-OF-PAGE' "see FORM
i_callback_user_command = 'USER_COMMAND'
i_grid_title = outtext
is_layout = gd_layout
it_fieldcat = fieldcatalog[]
it_special_groups = gd_tabgroup
it_events = gt_events
is_print = gd_prntparams
i_save = 'X'
is_variant = z_template
tables
t_outtab = it_ekko
exceptions
program_error = 1
others = 2.
if sy-subrc 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
endif.
endform. " DISPLAY_ALV_REPORT
*& Form DATA_RETRIEVAL
Retrieve data form EKPO table and populate itab it_ekko
form data_retrieval.
select ebeln ebelp statu aedat matnr menge meins netpr peinh
up to 100 rows
from ekpo
into CORRESPONDING FIELDS OF table it_ekko.
endform. " DATA_RETRIEVAL
Form TOP-OF-PAGE *
ALV Report Header *
Form top-of-page.
*ALV Header declarations
data: t_header type slis_t_listheader,
wa_header type slis_listheader,
t_line like wa_header-info,
ld_lines type i,
ld_linesc(10) type c.
Title
wa_header-typ = 'H'.
wa_header-info = 'EKKO Table Report'.
append wa_header to t_header.
clear wa_header.
Date
wa_header-typ = 'S'.
wa_header-key = 'Date: '.
CONCATENATE sy-datum+6(2) '.'
sy-datum+4(2) '.'
sy-datum(4) INTO wa_header-info. "todays date
append wa_header to t_header.
clear: wa_header.
Total No. of Records Selected
describe table it_ekko lines ld_lines.
ld_linesc = ld_lines.
concatenate 'Total No. of Records Selected: ' ld_linesc
into t_line separated by space.
wa_header-typ = 'A'.
wa_header-info = t_line.
append wa_header to t_header.
clear: wa_header, t_line.
call function 'REUSE_ALV_COMMENTARY_WRITE'
exporting
it_list_commentary = t_header.
i_logo = 'Z_LOGO'.
endform.
FORM USER_COMMAND *
--> R_UCOMM *
--> RS_SELFIELD *
FORM user_command USING r_ucomm LIKE sy-ucomm
rs_selfield TYPE slis_selfield.
Check function code
CASE r_ucomm.
WHEN '&IC1'.
Check field clicked on within ALVgrid report
IF rs_selfield-fieldname = 'EBELN'.
Read data table, using index of row user clicked on
READ TABLE it_ekko INTO wa_ekko INDEX rs_selfield-tabindex.
Set parameter ID for transaction screen field
SET PARAMETER ID 'BES' FIELD wa_ekko-ebeln.
Sxecute transaction ME23N, and skip initial data entry screen
CALL TRANSACTION 'ME23N' AND SKIP FIRST SCREEN.
ENDIF.
ENDCASE.
ENDFORM.
*& Form BUILD_EVENTS
Build events table
form build_events.
data: ls_event type slis_alv_event.
call function 'REUSE_ALV_EVENTS_GET'
exporting
i_list_type = 0
importing
et_events = gt_events[].
read table gt_events with key name = slis_ev_end_of_page
into ls_event.
if sy-subrc = 0.
move 'END_OF_PAGE' to ls_event-form.
append ls_event to gt_events.
endif.
read table gt_events with key name = slis_ev_end_of_list
into ls_event.
if sy-subrc = 0.
move 'END_OF_LIST' to ls_event-form.
append ls_event to gt_events.
endif.
endform. " BUILD_EVENTS
*& Form BUILD_PRINT_PARAMS
Setup print parameters
form build_print_params.
gd_prntparams-reserve_lines = '3'. "Lines reserved for footer
gd_prntparams-no_coverpage = 'X'.
endform. " BUILD_PRINT_PARAMS
*& Form END_OF_PAGE
form END_OF_PAGE.
data: listwidth type i,
ld_pagepos(10) type c,
ld_page(10) type c.
write: sy-uline(50).
skip.
write:/40 'Page:', sy-pagno .
endform.
*& Form END_OF_LIST
form END_OF_LIST.
data: listwidth type i,
ld_pagepos(10) type c,
ld_page(10) type c.
skip.
write:/40 'Page:', sy-pagno .
endform.

Can i have a check box in the hierarchical tree in the icons place, urgent!!! please

Hi,
I'am working on the Hierarchical Tree structure which should have three levels, I need to have a check box in the place of the icon & if i select a node that node & the child nodes should get selected.
After this when i say move selected ( i'am trying to use picklist class also) the entire checked tree has to move to the display area to the right & should display as tree structure & after this if i save then the checked records which are moved to another text area should get saved!!
How to achieve this? I have the tree structure ready but the check box part is the worrying factor! & then moving the checked records to the right using picklist class is the second problem & finally saving records to database.
Any help in this regard will be deeply appreciated:)
If check box is not possible then i will have to look at other methods, will the tree structure allow checkboxes????
Thanks
Mahesh

No the tree will not allow checkboxes

How to implement Check box in the Rtf based on the value from XML datafield

Hello All ,
It would be great if any one can help me in implementing check box in the rtf based on the data filed value from the XML data.
I need to get in the out put checked boxes like what we say Radio button Yes or No ( If Yes it should be marked ).
If any one worked on this please help us...
Thanks in Advance...

Did you check the user guide,
we have a section over there :)
http://blogs.oracle.com/xmlpublisher/2007/05/22

How to handle the check box in the alv tree display

Hello,
in my ALV Tree Report i have a check box in the output.
I have one check box in the selection screen as select all .
if this is selected then all the check boxes in the output must be selected that is (X).
am using CL_GUI_ALV_TREE for this.
Please give me some input how to make that check boxes 'X' in the above mentioned case.
With Regards,
Sumodh.P

Sumodh,
check this
Re: Select all checkbox in ALV tree
please search before posting
Thanks
Bala Duvvuri

How to enable a check box using the table LVC_S_FCAT

hi,
I am working on reports. I have to have a check box and i am using the table LVC_S_FCAT to get the check box, i am getting the check box. how to enable it.

Hi Preethi,
try to set default the check-box with the
value '0', '1', '-', ' ' and 'X' (0/1 -> only display,
'-' field is not shown, ' ' and 'X' is normal)
and see the differences.
Hope it helps.
Regards, Dieter
Sorry, i thought you meen enable not editable.
Message was edited by: Dieter Gröhn

Adding check box in the transaction xd02

Similar Messages

Maybe you are looking for