Screen Design Complications

Hi,
Iam working on screen desiging since last one week.
Unlike VB it is not so user friendly.
I want best source of examples and more stuff on screen designing. The best and more and more examples on each screen design element. The events to be triggered on selecting a particualr screen element etc...
please arrange the best and more and more examples to understand and develop self -explanatory topics on screen designing

MPP Action Events
    When ever acction is performed on Screen raises PAI event and We can handle where action events related Code Functionality.
PBO ( Process Before Output )
   This event is similer to Initialization of Selection-Screen.
    This event used In mpp to Add Title Bar,
Menu Bar for the screen. Default Properties of the screen can be loaded.
   This event is fired when Screen is Loading for the first Time, and when ever action is Perfomed on the screen.
  When ever PAI is called ,  the event reloads the screen, hence PBO will be called automatically.
  IF the select statement is used in PBO, see that  statement is declared in a conditional statement. Else the statement is executed for number of times when ever we load the screen and action is performed.
example code:
1) Top include file.
   data : okcode like sy-ucomm,
             a type i.
2) PBO and PAI code.
MODULE STATUS_0101 OUTPUT.
if a = 0.
   MESSAGE S000(ZMSGCLS).
   a = 1.
endif.
ENDMODULE.
MODULE USER_COMMAND_0101 INPUT.
  CASE OKCODE.
     WHEN 'RAISE'.
     WHEN 'EXIT'.
       LEAVE PROGRAM.
  ENDCASE.

Similar Messages

  • How to show screen design in .srf (from Screen Painter) using SDK?

    How to show screen design in .srf (from Screen Painter) using SDK?

    You need to use the LoadBatchActions method of the Application object to load .SRF files.
    John.

  • Visual studio lightswitch takes very long time (hangs for 20 sec) when changing entities properties in screen design

    hi, I have lightswitch project that is growing up every day. Now it has 200 database table and about 450 default screens. When I first started the lightswitch project with few tables
    (about 50 tables), it responses very fast. Gradually when I created the screens, the response takes 10 seconds for any changes I made in the screens or on the tables (*.lsml). Now, it takes 20 seconds (-+2 sec) to be able to do the next change!. For example,
    changing the group name, entity input type, width, table summary property ,arrange fields in the groups, change display name (which I change the most),,etc. Just imaging that I can change 3 things on a minute! I am using lightswitch with VB coding , but no
    programing codes (yet), I uses only HTML screens, no extensions, connected with SQL express 2012 (but I think that has nothing to do with the slowness since the problem is on the screens design time), I have created the project from scratch three times, with
    visual studio 2013 ultimate update 3, update 4, and now with Update 5 CTP 1 !! Yet, the same result. Strange that the freezing time is always about 20 seconds!! Any idea why this is happening? Any resolution?! Regards, Hasan

    Hi Michael 
    again i appreciate your answer ... 
    i was trying to implement your suggested workaround of my problem, unfortunately, it won't work with me !  i cannot split the
    project to smaller modules because of:
    all screens are connected to each other's with buttons and clicks (view selected) 
    i have changed all the "display names" of tables fields (translation). i would have problem in translation whenever i
    need to add tables or fields in the database, then i need to repeat that for all modules. i know that i can use other translation method, but i have already translated thousands of words !
    i have spent 2 months in 2013 to learn MVC, but i did not like it. it is somehow complex for me. i am a volunteer developer (actually i
    am network designer ). 
    i may lose the authentication , as i need to log-in to each module separately.
    is there any root solution to this problem ; the VS Lightswitch (or IDE) slowness when there
    is a lot of screens? maybe in VS2015?
    i had great hopes for the lightswitch, and still it is the only IDE that i can use for the "Charity
    ERP" project.
    regards,
    Hasan

  • Screen design

    hi,
    i have to design some data entry screens and update custom tables. what are the tips for screen design or the process flow ?  any tip will be helpful..
    thks

    hi,
    I didnt get your question exactly but if you want to design screen  , open the transaction se51( Screen painter). Mention your program name and a screen number ( 4 digit number) and click on 'create' and give its description.
    First create the layout ( layout tab ) of your screen ie. the various components ( raadiobutton, text , any table ) and give unique name to all the components. for creating these component , just use drag and drop.
    now comes the programing part, first click on the 'Flow Logic' of the screen. you have two standard events here ie PAI and PBO which includes two commented module.  In PBO ( process before output) create a module for what ever operation you want to do on screen before displaying it. In PAI ( process after input) create a module for what ever operation you want to do on screen after displaying it or any user action.

  • Screen Design in BPA 11g

    Hi
    I am trying to design a screen in BPA 11g
    i am unable to do so but i can create a screen object and use it in access diagram and EPC but unable to specify the exact screen design
    Let me know how to design a screen in BPA
    Thanks & Regards
    Bala

    Dear Indiranjithn,
    all you have to do is type "webdynpro" on SDN and press the "search" button.
    ;o)
    There's a whole sea of links about what you're looking for.
    You could start here for example:
    [http://www.sdn.sap.com/irj/sdn/nw-wdabap]
    Kind Regards
    /Ricardo Quintas

  • Can not select and delete a query in the screen designer

    I am getting mad with that problem...
    The problem is that I had a query(query1) based in another query(query2), both created in the query designer.
    I think some changes been made to query2 so query 1 was giving some erros. 
    I am trying to delete query 1, but it still appears in the data sources.
    And when I try to erase it from the screens, when I select the query visual studio closes...
    So please, how can I erase that query definitely?
    Thank you for your help!

    Hi promqueen,
    Thank you fro posting in MSDN forum.
    Since this forum is to discuss: visual studio WPF/SL Designer, Visual Studio Guidance Automation Toolkit, Developer
    Documentation and Help System, and Visual Studio Editor. So I am afraid that this issue is out of support range of this forum.
    I am moving your question to the moderator forum ("Where is the forum for..?"). The owner of the forum will direct you to a right forum.
    Thanks for your understanding.
    Best Regards,
    We are trying to better understand customer views on social support experience, so your participation in this interview project would be greatly appreciated if you have time. Thanks for helping make community forums a great place.
    Click
    HERE to participate the survey.

  • SEARCH HELP for a screen designed in HTML

    Hello All,
    i have designed a screen with input fields in html and i have called the screen in abap report...everything works fine but now i need to assign search help to the fields......
    can anyone help me in this....thanks in advance
    points will be rewarded.
    cheers
    sundeep
    Message was edited by:
            sundeep telkar

    solved

  • Selection-screen design

    Hi everyone,
    I am working on a project for which I have to design a selection-screen.
    The requirement is such that there are 3 obligatory fields to be filled by the user, which are as follows:
    P_LAUFD(parameter,obligatory-date),
    P_LAUFI(parameter,obligatory-id),
    P_FILENM(parameter,obligatory-filename),
    P_LOKAAL(checkbox).
    The requirement is such that when the user does not check the checkbox the search help for P_FILENM should show the files from the application server,and when it is checked the files from the presentation server should be shown.
    The code that I have written is listed below, but there is  a problem with it.
    When I don't enter  anything in the first 2 fields, the search field for the 3rd field functions as required, but if I first enter something in the first 2 fields and then click on the checkbox, the search help for P_FILENM does not function as reaquired.
    Please advise.
    Also if possible could you'll  kindly   explain the sequence of events that is getting triggered?
    *&  Include           Z6890_PROJINCLUDE_SEL_SCREEN                     *
    TABLES : SSCRFIELDS.
    DATA: FILE LIKE DXFIELDS-LONGPATH.
    DATA V_FILENAME LIKE IBIPPARMS-PATH.
    DATA: TMP TYPE SSCRFIELDS-UCOMM.
    SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
    PARAMETERS: P_LAUFD TYPE  D OBLIGATORY,
                P_LAUFI(6) TYPE C OBLIGATORY.
    SELECTION-SCREEN END OF BLOCK B1.
    SELECTION-SCREEN SKIP.
    SELECTION-SCREEN BEGIN OF BLOCK B2 WITH FRAME TITLE TEXT-002.
    PARAMETERS: P_FILENM(128) TYPE C OBLIGATORY.
    SELECTION-SCREEN BEGIN OF LINE.
    SELECTION-SCREEN POSITION 33.
    PARAMETER: P_LOKAAL AS CHECKBOX USER-COMMAND SRC.
    SELECTION-SCREEN COMMENT 35(6) TEXT-003.
    SELECTION-SCREEN END OF LINE.
    SELECTION-SCREEN END OF BLOCK B2.
    SELECTION-SCREEN SKIP.
    SELECTION-SCREEN BEGIN OF BLOCK B3 WITH FRAME TITLE TEXT-004.
    PARAMETERS: P_DEL(2) TYPE C .
    SELECTION-SCREEN BEGIN OF LINE.
    SELECTION-SCREEN COMMENT 1(12) TEXT-005 FOR FIELD P_APPL.
    SELECTION-SCREEN POSITION 33.
    PARAMETERS:  P_APPL(3) TYPE C.
    SELECTION-SCREEN POSITION 37.
    PARAMETERS: P_APDESC(40) TYPE C.
    SELECTION-SCREEN END OF LINE.
    PARAMETERS: P_MKDT(8) TYPE N,
                P_NOINV(6) TYPE N.
    SELECTION-SCREEN BEGIN OF LINE.
    SELECTION-SCREEN COMMENT 1(12) TEXT-006 FOR FIELD P_TOAMNT.
    SELECTION-SCREEN POSITION 33.
    PARAMETERS: P_TOAMNT(13) TYPE N.
    SELECTION-SCREEN POSITION 47.
    PARAMETERS: P_TEKEN(1) TYPE C.
    SELECTION-SCREEN END OF LINE.
    PARAMETERS: P_DESC(60) TYPE C.
    SELECTION-SCREEN END OF BLOCK B3.
    ***********************************************************************************************REPORT  Z6890_PROJ_REPORT_DRAFT                 .
    DATA: BEGIN OF GW_LINE,
          TEXT(700) TYPE C,
          END OF GW_LINE.
    DATA: GIN_FILE LIKE TABLE OF GW_LINE.
    INCLUDE Z6890_PROJINCLUDE_SEL_SCREEN.
    AT SELECTION-SCREEN.
      CASE SY-UCOMM.
        WHEN  'EXEC'.
          IF P_LOKAAL = 'X'.
            PERFORM MV_DATA_FRM_PRES_INT .
          ELSE.
            PERFORM OPEN_FILE_ONAPP_SERVER.
          ENDIF.
          LOOP AT SCREEN.
            IF SCREEN-NAME = 'P_DEL'.
              SCREEN-INPUT = 0.
              SCREEN-OUTPUT = 1.
              P_DEL = 'HI'.
            ENDIF.
            IF SCREEN-NAME = 'P_APPL'.
              SCREEN-INPUT = 0.
              SCREEN-OUTPUT = 1.
              P_APPL = 'CHF'.
            ENDIF.
            MODIFY SCREEN.
          ENDLOOP.
        WHEN 'BACK'.
          LEAVE PROGRAM.
        WHEN 'EXIT'.
          LEAVE PROGRAM.
        WHEN 'CANCEL'.
          LEAVE PROGRAM.
      ENDCASE.
    AT SELECTION-SCREEN  OUTPUT.
      SET PF-STATUS 'PROJ'.
      LOOP AT SCREEN.
        IF SCREEN-NAME = 'P_DEL'.
          SCREEN-INPUT = 0.
          SCREEN-OUTPUT = 1.
        ENDIF.
        IF SCREEN-NAME = 'P_APPL'.
          SCREEN-INPUT = 0.
          SCREEN-OUTPUT = 1.
        ENDIF.
        IF SCREEN-NAME = 'P_APDESC'.
          SCREEN-INPUT = 0.
          SCREEN-OUTPUT = 1.
        ENDIF.
        IF SCREEN-NAME = 'P_MKDT'.
          SCREEN-INPUT = 0.
          SCREEN-OUTPUT = 1.
        ENDIF.
        IF SCREEN-NAME = 'P_NOINV'.
          SCREEN-INPUT = 0.
          SCREEN-OUTPUT = 1.
        ENDIF.
        IF SCREEN-NAME = 'P_TOAMNT'.
          SCREEN-INPUT = 0.
          SCREEN-OUTPUT = 1.
        ENDIF.
        IF SCREEN-NAME = 'P_TEKEN'.
          SCREEN-INPUT = 0.
          SCREEN-OUTPUT = 1.
        ENDIF.
        IF SCREEN-NAME = 'P_DESC'.
          SCREEN-INPUT = 0.
          SCREEN-OUTPUT = 1.
        ENDIF.
        MODIFY SCREEN.
      ENDLOOP.
    AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_LAUFD.
      CALL FUNCTION 'F4_DATE'
       EXPORTING
         DATE_FOR_FIRST_MONTH               = SY-DATUM
         DISPLAY                            = ' '
        FACTORY_CALENDAR_ID                = ' '
        GREGORIAN_CALENDAR_FLAG            = ' '
        HOLIDAY_CALENDAR_ID                = ' '
        PROGNAME_FOR_FIRST_MONTH           = ' '
       IMPORTING
         SELECT_DATE                        = P_LAUFD
        SELECT_WEEK                        =
        SELECT_WEEK_BEGIN                  =
        SELECT_WEEK_END                    =
      EXCEPTIONS
        CALENDAR_BUFFER_NOT_LOADABLE       = 1
        DATE_AFTER_RANGE                   = 2
        DATE_BEFORE_RANGE                  = 3
        DATE_INVALID                       = 4
        FACTORY_CALENDAR_NOT_FOUND         = 5
        HOLIDAY_CALENDAR_NOT_FOUND         = 6
        PARAMETER_CONFLICT                 = 7
        OTHERS                             = 8
      IF SY-SUBRC <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
            WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
      ENDIF.
    AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_FILENM.
      IF TMP = SSCRFIELDS-UCOMM.
        CLEAR SSCRFIELDS-UCOMM.
        CLEAR TMP.
      ELSE.
        SSCRFIELDS-UCOMM = 'SRC'.
      ENDIF.
      CASE SSCRFIELDS-UCOMM.
        WHEN 'SRC'.
          TMP = SSCRFIELDS-UCOMM.
          CALL FUNCTION '/SAPDMC/LSM_F4_FRONTEND_FILE'
    EXPORTING
       PATHNAME               =
               CHANGING
                 PATHFILE               = V_FILENAME
             EXCEPTIONS
               CANCELED_BY_USER       = 1
       SYSTEM_ERROR           = 2
       OTHERS                 = 3
          IF SY-SUBRC <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
            WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
            IF SY-SUBRC = 1.
              MESSAGE I000(Z6890_PROJ) .
            ENDIF.
          ENDIF.
          P_FILENM = V_FILENAME.
          CLEAR SSCRFIELDS-UCOMM.
        WHEN OTHERS.
          CALL FUNCTION 'F4_DXFILENAME_TOPRECURSION'
               EXPORTING
                 I_LOCATION_FLAG       = 'A'
                 I_SERVER              = 'ides47_i47_00'
                 I_PATH                = 'D:\usr\sap\'
                 FILEMASK              = '.'
                 FILEOPERATION         = 'R'
               IMPORTING
          O_LOCATION_FLAG       =
          O_SERVER              =
                 O_PATH                = FILE
          ABEND_FLAG            =
        EXCEPTIONS
          RFC_ERROR             = 1
          ERROR_WITH_GUI        = 2
          OTHERS                = 3
          IF SY-SUBRC <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
            WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
          ENDIF.
          P_FILENM = FILE.
         CLEAR SSCRFIELDS-UCOMM.
      ENDCASE.
    *&      Form  MV_DATA_FRM_PRES_INT
          text
    -->  p1        text
    <--  p2        text
    FORM MV_DATA_FRM_PRES_INT .
      DATA: F_NAME TYPE STRING.
      F_NAME = P_FILENM.
      CALL FUNCTION 'GUI_UPLOAD'
        EXPORTING
          FILENAME                      = F_NAME
         FILETYPE                      = 'ASC'
      HAS_FIELD_SEPARATOR           = ' '
      HEADER_LENGTH                 = 0
      READ_BY_LINE                  = 'X'
      DAT_MODE                      = ' '
      CODEPAGE                      = ' '
      IGNORE_CERR                   = ABAP_TRUE
      REPLACEMENT                   = '#'
    IMPORTING
      FILELENGTH                    =
      HEADER                        =
        TABLES
          DATA_TAB                      = GIN_FILE
    EXCEPTIONS
       FILE_OPEN_ERROR               = 1
      FILE_READ_ERROR               = 2
      NO_BATCH                      = 3
      GUI_REFUSE_FILETRANSFER       = 4
      INVALID_TYPE                  = 5
      NO_AUTHORITY                  = 6
      UNKNOWN_ERROR                 = 7
      BAD_DATA_FORMAT               = 8
      HEADER_NOT_ALLOWED            = 9
      SEPARATOR_NOT_ALLOWED         = 10
      HEADER_TOO_LONG               = 11
      UNKNOWN_DP_ERROR              = 12
      ACCESS_DENIED                 = 13
      DP_OUT_OF_MEMORY              = 14
      DISK_FULL                     = 15
      DP_TIMEOUT                    = 16
      OTHERS                        = 17
      IF SY-SUBRC <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
            WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
      ENDIF.
      IF SY-SUBRC = 1.
       LEAVE TO LIST-PROCESSING.
       WRITE: / 'Error: File could not be opened!'.
        MESSAGE I001(Z6890_PROJ) WITH P_FILENM.
      ENDIF.
      BREAK-POINT.
    ENDFORM.                    " MV_DATA_FRM_PRES_INT
    *&      Form  OPEN_FILE_ONAPP_SERVER
          text
    -->  p1        text
    <--  p2        text
    FORM OPEN_FILE_ONAPP_SERVER  .
    ENDFORM.

    Hi Piyush,
    Add the below code in your program.
    *Note: you have to take two parameters for files.
    If you select check box then p_pc parameter is visible.
    if you dont select check box then p_app parameter is visible.
    PARAMETERS: p_chk1 AS CHECKBOX USER-COMMAND rusr.
    SELECTION-SCREEN: BEGIN OF BLOCK blk1 WITH FRAME.
    PARAMETERS: p_pc  LIKE rlgrap-filename MODIF ID abc.
    PARAMETERS: p_app LIKE rlgrap-filename MODIF ID def.
    SELECTION-SCREEN: END OF BLOCK blk1.
    AT SELECTION-SCREEN OUTPUT.
      LOOP AT SCREEN.
        IF screen-group1 = 'ABC'.
          CLEAR: p_pc, p_app.
          IF p_chk1 = 'X'.
            screen-active = 1.
          ELSE.
            screen-active = 0.
          ENDIF.
          MODIFY SCREEN.
        ENDIF.
        IF screen-group1 = 'DEF'.
          CLEAR: p_pc, p_app.
          IF p_chk1 <> 'X'.
            screen-active = 1.
          ELSE.
            screen-active = 0.
          ENDIF.
          MODIFY SCREEN.
        ENDIF.
      ENDLOOP.
    AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_app.
      PERFORM get_fname_app.
    AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_pc.
      CALL FUNCTION 'F4_FILENAME'
        IMPORTING
          file_name = p_pc.
    *&      Form  get_fname_app
          text
    FORM get_fname_app.
      DATA: c_fnh_mask TYPE dxfields-filemask VALUE '.',
      search_dir TYPE dxfields-longpath VALUE '/sapglobal/users',
      file_path LIKE dxfields-longpath.
      CALL FUNCTION 'F4_DXFILENAME_TOPRECURSION'
        EXPORTING
          i_location_flag = 'A'
          i_server        = ' '
          i_path          = search_dir
          filemask        = c_fnh_mask
          fileoperation   = 'R'
        IMPORTING
          o_path          = file_path
        EXCEPTIONS
          rfc_error       = 1
          OTHERS          = 2.
      IF sy-subrc EQ 0.
        p_app = file_path.
      ENDIF.
    ENDFORM.                    "get_fname_app

  • Display Html screen, design view and CSS screen at the same time ?

    Hello everyone !
    Well this is my problem :
    I am on a Dual Screen monitor, in one screen i have the ''code inspector'' to view my html code and the second screen i have the Design view.
    Problem is,  i hate switching always my tabs when I need to work on my Html and my CSS.
    I was wondering if anyone found a way to display, i don't know maybe 2 code inspector or simply find a way to split the screen so I can see html and css at the same time ?
    Thanks a lot !
    Nick

    If you're using Dreamweaver CS4, this is very easy. View the HTML in the Code Inspector, and have Vertical Split view in the main Document window. In the Related Files toolbar, select the stylesheet.

  • Webdynpro info for screen design

    Hi
    Can any one tell me how to design a screen,which can be editable once opened & can be changes to display mode & vice-versa on same screen.
    Is it also possible to restrict the screen display to users,if let vendor no. is in editable mode by some other user.
    regds
    Vipin

    Hi,
    There are various events in Web dynpro.
    WDDOINIT - like initialization in normal ABAP.
    WDDOAFTERACTION - like PAI
    WDDOBEFOREACTION = PBO
    You can write what ever logic you want in this methods to set selection screen to edit mode or non-edit mode.
    Regards,
    Rahul Wagh

  • About screen designing

    hi,
       I have designed a tablecontrol screen with 2 tabstrip buttons as Reservation and Cancellation. and also having the push buttons with icons like 'ADD', 'Change Hotel', 'PageDown' and 'Page Up',
        Here, my problem is While I am clicking ADD push button it should append new rows to the table. How to code it in Module user command?
       and also want for the other radio buttons as well.
    Can any one please helpme out in this regard, because I am very new to Module pool programmes.
    Thank you,
    -kanthi.

    Hi,
    check this sample program:
    *& Module pool       ZSUDHA_TRANS4_PRACTICE                            *
    PROGRAM  zsudha_trans4_practice                  .
    TABLES:knbk.
    CONTROLS tc TYPE TABLEVIEW USING SCREEN 200.
    DATA:v_kunnr LIKE knbk-kunnr,
         v_ucomm LIKE sy-ucomm,
         sel TYPE c.
    DATA:BEGIN OF itab OCCURS 0,
         banks TYPE knbk-banks,
         bankl TYPE knbk-bankl,
         bankn TYPE knbk-bankn,
         bkont TYPE knbk-bkont,
         koinh TYPE knbk-koinh,
         chk TYPE c,
         END OF itab.
    *&      Module  mod1  INPUT
          text
    MODULE mod1 INPUT.
      IF v_kunnr IS INITIAL.
        MESSAGE e000(zz) WITH 'Please enter the customer number.'.
      ENDIF.
      IF v_kunnr <> ' '.
        SELECT  SINGLE kunnr FROM knbk INTO (v_kunnr) WHERE kunnr = v_kunnr.
        IF sy-subrc NE 0.
          MESSAGE e000(zz) WITH 'Please enter a valid customer number.'.
        ENDIF.
      ENDIF.
    ENDMODULE.                 " mod1  INPUT
    *&      Module  USER_COMMAND_0100  INPUT
          text
    MODULE user_command_0100 INPUT.
      CLEAR  : itab,v_ucomm.
      REFRESH: itab.
      CASE sy-ucomm.
        WHEN 'DISPLAY' OR 'CHANGE'.
          IF v_kunnr IS NOT INITIAL.
            SELECT banks
             bankl
             bankn
             bkont
             koinh
             FROM knbk
             INTO TABLE itab
             WHERE kunnr = v_kunnr.
          ENDIF.
          v_ucomm = sy-ucomm.
          LEAVE TO SCREEN 200.
        WHEN 'BACK'.
          LEAVE TO SCREEN 0.
        WHEN 'EXIT'.
          LEAVE TO SCREEN 0.
        WHEN 'CANC'.
          LEAVE TO SCREEN 0.
      ENDCASE.
    ENDMODULE.                 " USER_COMMAND_0100  INPUT
    *&      Module  USER_COMMAND_0200  INPUT
          text
    MODULE user_command_0200 INPUT.
      CASE sy-ucomm.
        WHEN 'DELETE'.
          DELETE itab WHERE chk = 'X'.
          CLEAR itab-chk.
          DESCRIBE TABLE itab LINES tc-lines.
        WHEN 'SAVE'.
          MODIFY  itab INDEX tc-current_line.
        WHEN 'INSERT'.
          CLEAR itab.
          APPEND itab.
          DESCRIBE TABLE itab LINES tc-lines.
        WHEN 'LIST'.
          LEAVE TO LIST-PROCESSING.
          LOOP AT itab.
            WRITE:/ itab-banks,itab-bankl,itab-bankn,itab-bkont,itab-koinh.
          ENDLOOP.
        WHEN 'BACK'.
          LEAVE TO SCREEN 100.
        WHEN 'EXIT'.
          LEAVE TO SCREEN 0.
        WHEN 'CANC'.
          LEAVE TO SCREEN 0.
      ENDCASE.
    ENDMODULE.                 " USER_COMMAND_0200  INPUT
    *&      Module  STATUS_0200  OUTPUT
          text
    MODULE status_0200 OUTPUT.
      IF v_ucomm = 'DISPLAY'.
        LOOP AT SCREEN.
          screen-input = 0.
          MODIFY SCREEN.
        ENDLOOP.
      ELSE.
        LOOP AT SCREEN.
          screen-input = 1.
          MODIFY SCREEN.
        ENDLOOP.
      ENDIF.
      SET PF-STATUS 'XXX'.
      IF v_ucomm = 'DISPLAY'.
        SET TITLEBAR 'XXX'.
      ELSE.
        SET TITLEBAR 'CHNG'.
      ENDIF.
    ENDMODULE.                 " STATUS_0200  OUTPUT
    *&      Module  mod2  INPUT
          text
    MODULE mod2 INPUT.
      IF sel = 'X'.
        itab-chk = sel.
        MODIFY itab INDEX tc-current_line.
      ELSE.
        CLEAR itab-chk.
      ENDIF.
    ENDMODULE.                 " mod2  INPUT
    *&      Module  STATUS_0100  OUTPUT
          text
    MODULE status_0100 OUTPUT.
      SET PF-STATUS 'XX1'.
      SET TITLEBAR 'XX1'.
    ENDMODULE.                 " STATUS_0100  OUTPUT
    regards,
    keerthi

  • Screen designing

    Hi guruji's,
                   I need to develop a screen that will contain 2 text fields like, spfli-carrid, and spfli-connid, and also a push button so that when i hit the button the data in those text boxes must be saved in the database. Also i have to add search help and F1 help. and the entire program should be having 2 parts, one screen layout designed in SE51 and a program, just show me the way, and if possible give me some useful documents on dialog programming.

    Use the Screen Painter For Designing the Screen....

  • Screen designer

    Dear colleagues,
    I'm looking for a tool, where I can design SAP screens, before its real development with screen painter. I need this tool to prepare presentations.
    Do you know such tools ?
    Best regards,
    Svetlin

    Hi Svetlin,
    Please you can check GuiXT tool.
    http://help.sap.com/saphelp_erp2004/helpdata/en/89/91b9d8194f11d5b3a30050dae02d7c/content.htm
    http://www.synactive.com
    http://service.sap.com/guixt
    Hope this will help.
    Regards,
    Ferry Lianto

  • Is it right way to nest HBox and VBox for screen design ?

    Hi,
    I am designing main screen of my application which contains lots of HBox and VBox.
    Which makes application slow and complicated.
    So is there any other way of doing it?
    Thanks.

    Grid layout? (still in preview)
    MiGLayout in JFXtras? (still in beta for 1.3, AFAIK)
    [Custom Layout|http://learnjavafx.typepad.com/weblog/2010/05/a-javafx-13-custom-layout-example.html]? (hard...)

  • Ipod Touch 4th gen Screen design

    I dropped my ipod touch 4th gen and the screen break instantly.
    Its just a half a meter drop and it crack. I went to the service center. They told me that they does not repair the screen but have to buy a new one when my ipod still can listen to Mp3, Play game, surf net using wifi.
    Its my fault that I dropped but I think most product in the market which dropped on the floor wont break like how my ipod touch 4th gen did

    My son dropped his ipod touch 4th gen of the couch and less than 30 cm fall landed on cd case which was cushioned by carpet. Screen crack resulting. I am considering taking apple to the small claims tribunal in Victoria as I believe the product doesn't meet its basic intended purpose of being portable. With such a fragile screen caution should be used at all times. A safety screen should be provided with the product when sold as it is really of poor quality and is very fragile. I am not anti apple and up until this product they have been a fantastic product. In our family we have a ipad, two iphones and three other ipods. My first nano is still kicking strong. All these items have had occassional drops and normal wear and tear subjected too be portable. Look lets be honest if my son dropped on concrete or threw against the wall fair enough one would expect it to break. But a 30 cm fall on a plastic cd case this product breaks easier that an egg shell. It is a pathetic design for something that should be portable. I have not got 140 dollars to fork out on another ipod touch when it will break again if it is sneeezed on.

Maybe you are looking for