How to iplement together: AT-LINE-SELECTION with GUI STATUS

If I load SET PF-STATUS '111' then don't see icon from at-line selection and reverse.
It is possible to implement in one program this two elements?

Hi,
When you define pf-status the list processing feature disappers and screen processing works. So only the user action double click can happen on the lists. The default functuion key for double click is F2. So assgn it to a user command and it will work on double click on the list.
Regards,
Renjith Michael.

Similar Messages

How to delete Pending WIP Move Transactions with running status

hello,
can any one guide me, how to delete Pending WIP Move Transactions with running status
thanks in advance
sadiq

Please refer to the following note:
Note: 105647.1 - WIP and COST Frequently Used Troubleshooting Scripts
https://metalink2.oracle.com/metalink/plsql/ml2_documents.showDocument?p_database_id=NOT&p_id=105647.1

In interactive how to use AT LINE-SELECTION WITH SET PF-STATUS

Hi all,
I am developing an interactive report in which i am using gui status (pf-status ) for AT USER-COMMAND and AT LINE-SELECTION event .But when i used at line-selection event is not working with pf-status even though i use PICK function code .
plz help me to work with both the event i.e.
AT USER-COMMAND.
AT LINE-SELECTION.
Thanks a lot in Advance .
Regards,
Tarak

hi,
In PBO of Module Pool, Please Write in this way
MODULE status_9001 OUTPUT.
Set the PF-STATUS
SET PF-STATUS '9001'.
To Set the Title of Screen
SET TITLEBAR 'TITLE'.
ENDMODULE
Setting PF status to the (SAP) system default
set pf-status 'BASIC'.
How to check for pf-status
AT USER-COMMAND.
CASE SY-UCOMM.
WHEN 'ART'.
PERFORM STYR_ARTSKONTI.
WHEN 'PST'.
PERFORM STYR_POSTER.
WHEN 'BIL'.
PERFORM VIS_BILAG.
ENDCASE..

How to remove symbol of line selection in module pool

Hello Experts,
I am working on a module pool where I have created a line selection.
In this line selection when we click on the order number I have made a coding where it call new transaction.
But I dont want the default symbol which comes during line selection..the magnifying type symbol.
How can I delete this symbol.
My coding is:
at pbo:
MODULE CALL_STATUS_LIST OUTPUT.
LEAVE TO LIST-PROCESSING AND RETURN TO SCREEN 0.
SET PF-STATUS SPACE.
SUPPRESS DIALOG.
ENDMODULE. " call_status_list OUTPUT
at line-selection.
and than the coding.
Thanks and Regrds,
Nikhil.

Hi Keshu,
Not working,
I have used this coding:
DATA: pf_itab TYPE TABLE OF sy-ucomm.
APPEND 'PICK' TO pf_itab.
SET PF-STATUS 'STA3' EXCLUDING pf_itab.
but than again my line selection does not work.
Thanks,
Nikhil.

Can not use 'AT LINE-SELECTION' with SET PF-STATUS

Hi experts,
my code is like below:
PARAMATERS: .....
SET PF-STATUS 'st_nam'.
Perform Load_data . ' For list display
START-OF-SELECTION.
AT LINE-SELECTION.
Perform list_detail.
AT USER-COMMAND.
CALL SCREEN '1001'.
END-OF-SELECTION.
When I execute the report , the basic was displayed , but when then i double click on the list to call the next screen '1001'. It did not work , but if i omit the SET PF-STATUS m AT LINE-SELECTION worked week , so in this case what has happened i how can i solve this problem,
Thaks,
PS: Reward immediately

Hi,
Thank you very much for your helpful answers, I have copied the report downto my system and test it , When i used SET PF-STATUS , i can not use AT LINE-SELECTION to capture events ...May be we can not use these 2 statements in parallel,...:D
Thanks,

Multi Line Selection with ALV Grid

Dear all
what do I have to do to make multiple line selection available in an ALV Grid (Version 4.7)?
Herbert

Hi Herbert again,
Once you displayed your alv output display, then select rows in the alv display.
then when you click for interactive buttion (ie. like Refresh functionality), In debug mode you can see internal table with Sell field active (i.e. marked "X") which you have selected.
e.g.
FORM user_command USING lv_ucomm TYPE sy-ucomm ls_selfield TYPE slis_selfield.
DATA:
        lv_ref_grid   TYPE REF TO cl_gui_alv_grid.
CLEAR : gv_tcode.
*-- to ensure that only new processed data is displayed
IF lv_ref_grid IS INITIAL.
    CALL FUNCTION 'GET_GLOBALS_FROM_SLVC_FULLSCR'
      IMPORTING
        e_grid = lv_ref_grid.
ENDIF.
IF NOT lv_ref_grid IS INITIAL.
    CALL METHOD lv_ref_grid->check_changed_data.
ENDIF.
CASE lv_ucomm.
    WHEN '&IC1'.
      IF ls_selfield-fieldname = 'MATNR'.
        READ TABLE gt_gi INTO gs_gi INDEX ls_selfield-tabindex.
        IF sy-subrc = 0.
          gv_tcode = 'MMBE'.
          SET PARAMETER ID 'MAT' FIELD gs_gi-matnr.
          CALL TRANSACTION gv_tcode AND SKIP FIRST SCREEN. "#EC CI_CALLTA "MMBE
        ENDIF.
      ENDIF.
    WHEN 'COPY'.
      LOOP AT gt_gi INTO gs_gi WHERE sel = 'X'.
        gs_gi-sel = ' '.
        APPEND gs_gi TO gt_gi.
        CLEAR gs_gi.
      ENDLOOP.
    WHEN 'POST'.
      REFRESH : gt_error[].
    WHEN OTHERS.
ENDCASE.
ENDFORM.                    " USER_COMMAND
I hope you clear now.
Feel free to ask any doubts.
Thanks and regards,
Vijay

AT LINE-SELECTION with ALV

Hi,
Am creating a FM where all data declaration,subroutines and selection screen will be in separate includes.Delivary order number is fetched based on sales order number given as input by the user.
Output is displayed using ALV.
Interactive List:Now in the list,when i click on sales document number it should take me to the trasaction VA03 and when i double click on delivary document number it should take me to VL03.
AT LINE-SELECTION is not working.where should i insert at line-selection?
INCLUDE ZSU_3TOP
INCLUDE ZSU_SELECTION_SCREEN.
INCLUDE ZSU_FORMS2.
START-OF-SELECTION.
PERFORM DISPLAY.
PERFORM BUILD_ALV.
PERFORM ALV_GRID.
AT LINE-SELECTION.
SET PARAMETER ID 'SAL' FIELD S_VBELN.
CALL TRANSACTION 'VA03'.
s_vbeln is the selection option for sales order number as input.

Hi,
    I am helping u with just a part of my code with similar to ur requirement, in this my code dynamic Subrubroutines are being called u can work accordingly i hope it will help u out .and u can call as other transactions also.
FORM user_command USING ucomm LIKE sy-ucomm
                        selfield TYPE slis_selfield.
DATA : wa_out LIKE LINE OF it_output.
CASE ucomm.
Double click => launches whatever you want
WHEN '&IC1'.
   CHECK sy-lsind = 1.
    CLEAR wa_output2.
    READ TABLE it_output INDEX SELFIELD-TABINDEX INTO wa_out.
    LOOP AT it_output2 INTO wa_output2 WHERE matnr EQ wa_out-matnr AND
                                             vstel EQ wa_out-vstel.
     IF wa_output2-lsmeng NE wa_output2-kwmeng.
       CLEAR wa_output2.
       CONTINUE.
     ENDIF.
      FORMAT INTENSIFIED ON COLOR 3.
      wa_orders-vbeln = wa_output2-vbeln.
      wa_orders-audat = wa_output2-audat.
      wa_orders-kunnr = wa_output2-kunnr.
      SELECT SINGLE * FROM kna1 WHERE kunnr = wa_orders-kunnr.
      wa_orders-name1 = kna1-name1.
      wa_orders-vstel = wa_output2-vstel.
      wa_orders-kwmeng = wa_output2-kwmeng.
      PERFORM get_dqty.
      wa_orders-lsmeng = n_dqty.
      APPEND wa_orders TO it_orders.
      CLEAR wa_orders.
      CLEAR wa_output2.
    ENDLOOP.
    FORMAT RESET.
    CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
      EXPORTING
        i_callback_program      = SY-REPID
        i_structure_name        = 'IT_ORDERS'
        it_fieldcat             = FIELD_CAT2
        i_callback_user_command = 'CALL_VA02'
      TABLES
        t_outtab           = IT_ORDERS
      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.
    REFRESH IT_ORDERS.
ENDCASE.
ENDFORM.
*&      Form call_va02
      text
     -->SELFIELD   text
FORM call_va02 USING ucom     TYPE sy-ucomm
                     selfield TYPE slis_selfield.
DATA : wa_out2 LIKE LINE OF it_orders.
READ TABLE it_orders INDEX SELFIELD-TABINDEX INTO wa_out2.
SET PARAMETER ID 'AUN' FIELD WA_OUT2-VBELN.
CALL TRANSACTION 'VA02' .
ENDFORM.                                                    "call_va02
FORM build_fldcat2 CHANGING ix_fldcat TYPE slis_t_fieldcat_alv.
field_cat-fieldname = 'VBELN'.
field_cat-tabname    = 'IT_ORDERS'.
field_cat-col_pos    = 1.
field_cat-seltext_m = 'Order No.'.
field_cat-ddictxt    = 'M'.
field_cat-outputlen = 15.
APPEND field_cat TO ix_fldcat.
CLEAR field_cat.
field_cat-fieldname = 'AUDAT'.
field_cat-tabname    = 'IT_ORDERS'.
field_cat-col_pos    = 2.
field_cat-seltext_m = 'Date'.
field_cat-ddictxt    = 'M'.
field_cat-outputlen = 10.
APPEND field_cat TO ix_fldcat.
CLEAR field_cat.
field_cat-fieldname = 'KUNNR'.
field_cat-tabname    = 'IT_ORDERS'.
field_cat-col_pos    = 3.
field_cat-seltext_m = 'Dealer'.
field_cat-ddictxt    = 'M'.
field_cat-outputlen = 10.
APPEND field_cat TO ix_fldcat.
CLEAR field_cat.
field_cat-fieldname = 'NAME1'.
field_cat-tabname    = 'IT_ORDERS'.
field_cat-col_pos    = 4.
field_cat-seltext_m = 'Name'.
field_cat-ddictxt    = 'M'.
field_cat-outputlen = 25.
APPEND field_cat TO ix_fldcat.
CLEAR field_cat.
field_cat-fieldname = 'VSTEL'.
field_cat-tabname    = 'IT_ORDERS'.
field_cat-col_pos    = 5.
field_cat-seltext_m = 'Plant'.
field_cat-ddictxt    = 'M'.
field_cat-outputlen = 5.
APPEND field_cat TO ix_fldcat.
CLEAR field_cat.
field_cat-fieldname = 'KWMENG'.
field_cat-tabname    = 'IT_ORDERS'.
field_cat-col_pos    = 6.
field_cat-seltext_m = 'Order Qty'.
field_cat-ddictxt    = 'M'.
field_cat-outputlen = 10.
APPEND field_cat TO ix_fldcat.
CLEAR field_cat.
field_cat-fieldname = 'LSMENG'.
field_cat-tabname    = 'IT_ORDERS'.
field_cat-col_pos    = 7.
field_cat-seltext_m = 'Delivered Qty'.
field_cat-ddictxt    = 'M'.
field_cat-outputlen = 15.
APPEND field_cat TO ix_fldcat.
CLEAR field_cat.
ENDFORM.
FORM get_dqty.
CLEAR n_dqty.
SELECT vbeln
          posnn
          vbelv
          vbtyp_n
          FROM vbfa
          INTO TABLE it_delivery
          WHERE vbelv   = wa_output2-vbeln AND
                vbtyp_n = 'J'              AND
                posnv   = wa_output2-posnr.
LOOP AT it_delivery INTO wa_delivery.
    SELECT vbeln
            matnr
            lfimg
            FROM lips
            INTO TABLE it_link
            WHERE vbeln = wa_delivery-vbeln AND
                  posnr = wa_delivery-posnn.
    LOOP AT it_link INTO wa_link.
      n_dqty = n_dqty + wa_link-lfimg.
    ENDLOOP.
ENDLOOP.
REFRESH: it_delivery, it_link.
ENDFORM.
Regards,
Chandresh.

How do you specify a line number with getline() (c++)

How do you specify which line for getline() to read with c++ similiar to how awk uses $1, $2, $3 , etc etc...
Example:(Ignore the underscores)
Line1 Line2
10____10
20____20
30____30
40____40
if I were making a program to remove 10 on the first line and 20 on the second line how would I tell getline which line to read
Example source code:
#include <cstdio>
#include <fstream>
#include <string>
#include <iostream>
using namespace std;
int main()
string line;
string line2;
ifstream in("/Users/lundquisted/Desktop/infile.txt");
ofstream out("/Users/lundquisted/Desktop/outfile.txt");
while( getline(in,line) )
if(line != "10")
out << line << endl;
while (getline(in,line2) )
if(line2 != "20")
out << line2 << endl;
in.close();
out.close();
remove("/Users/lundquisted/Desktop/infile.txt");
rename("/Users/lundquisted/Desktop/outfile.txt","/Users/lundquisted/Desktop/inf ile.txt");
return 0;
}

Eric Lundquist wrote:
store the output of a system() command within a c++ program to a string and/or variable
A number of apps call Unix utilities and capture both stdout and stderr, typically for viewing in a log window, but for other uses as well. Xcode, for example, starts up gcc and does various things with the text that gcc might otherwise print in a Terminal window. Most apps that rely on Unix commands that way don't use "system()", which is a rather crude way of launching utilities that leaves the parent program with very little control. Usually, the best way to manage helper utils from a Cocoa app is by using NSTask and NSPipe. If you spend some time with the two following pages, you'll learn how to do almost anything you want with command line utils from inside a Cocoa app:
[http://www.cocoadevcentral.com/articles/000025.php]
[http://macosx.com/forums/archive/t-3927.html]
The first link goes to a great tutorial on using NSTask. Capturing stdout and stderr are only covered briefly towards the end, however. Note the last comment explaining why "system()" is a bad idea.
The second link goes to a forum thread. Scroll down to the code posted by "blb" for some very clear examples of launching with NSTask and reading the output with NSPipe.
If you really want to use a shell command, you could give NSTask a command like ' +bash -c "ls -lt | grep drwx"+ ' (see how setArguments: is used in the tutorial).
If you just want to do something cheap and dirty with "system()" so you can see some awk output while you're learning how to do things the right way, I guess you could do something like this:
system(" cat ~/random.txt | awk '{print $2}' > MyFile.txt");
NSString *myString = [NSString stringWithContentsOfFile:@"MyFile.txt"
encoding:NSUTF8StringEncoding error:nil];
Of course you can just read MyFile.txt into cin if you're not using Cocoa.
- Ray

How to handle the single line selection in table control

Hi All,
   I am facing a problem in the table control of modulepool program.
   I have line selection as "Single" in the table control attributes. But when i am selecting a line in the table control as long as it is in the same page,the line selection is single but when i am selecting the line in the next page,the previous selection is not deselected. So I am seeing two selection for "Single line selector" attribute.
   Could any one help me solve this problem?
Thanks & Regards,
S.Lakshmi

Hi Lakshmi,
Just Go to Table control , click on it , you can see the attributes screen , there you can see option for
<b>Line selection</b>
none
multiple selection
single selection
check the radio button single selection.
that will solve your problem..
regards
vijay

How to change the Short text of a GUI Status .

Hi Guys ,
   Can any one guide me on how to change the short text of an already existing GUI Status .
I have already tried doing these :Opened the GUI Status in change mode and changed the short texts of the Application tool bar ,
                           Menu Bar ,
                           Function Keys ,
thinking that this will update in the Short text .. but that didnt happen ...
Below is what I need ...
Requirement :
GUI Status : Status_001 .
Short Text : New GUI Status .
Change the Short Text to " Changed GUI Status ' .
Regards,
Ranjita

Hi Ranjita,
Do this...
go to SE80
Open the program.. open node GUI Status
Double click on the status you want to change
go to menu GOTO>ATTRIBUTES>STATUS
click on continue or simply enter
Here change the short text and continue or enter
activate it
Hope this helps..
Regards,
Kinshuk

How to get the hour glass in the GUI status bar.

Hi all,
how can I get the hour glass and a corresponding text in the GUI status bar? Like during the compilation I would like to show a message 'Processing data ...'.
Best regards,
Nils

A good example is provided in https://www.sdn.sap.com/irj/servlet/prt/portal/prtroot/com.sap.km.cm.docs/library/webas/abap/abap code samples/abap objects/abap code sample progress indicator.pdf

How to allow for Multi-line selection in a jdbtable

Hello, I have a JDBTABLE connected to qryEmployee. There is another tab le called enrollment. I would like to give the user the ability to select multiple rows in the employee table so I can add it to the enrollment table (dataset). Can this be done?
TIA

table.getSelectionModel().setSelectionMode(...);

How to create a single line textbox with up-down button?

Hello,
I mean for example is a text box for percentage. You can type in the value, or click the up or down button to get the value you desire. I tried attaching a small-sized vertical JScrollBar to a JTextField, but it is getting complicated that I need 2 different listeners(AdjustmentListener & FocusListener) for this.
If you have done this before, or maybe you have some suggestions, I would appreciate the help. These are some conditions that the percent text box needs:
- a click on up/down button increase/decrease the value by 1.
- the user types in a value more than 100 or less than 0 and press one of the button(up/down), setText to 100 or 0.
- the user types in a value in range, increase/decrease that value when up/down button is clicked.
Thank you for your time.

That's called a "spinner". I understand that it's a standard component in SDK 1.4, but I haven't looked at that myself, it's still in its beta stages. If you go to this page:
http://www.toedter.com/en/jcalendar.html
you will see an example (JSpinField), and you can download it for your own use.

How to add button in reuse_alv not in gui status

hi guys,
my question how can i add button to reuse_alv not in gui_status or pf_status ? and also i have an internal table which contains a checkbox field when user select one or more check box and push button , new table will be sended to batch input program.how can i do add button part, the rest of it is done.?

Hi,The following sample report ZUS_SDN_ALV_BUTTON_CLICK_LTXT shows a possible way how to handle the BUTTON_CLICK event in order to retrieve a longtext for a ALV entry. Please note that for the sake of simplicity I have choosen an obsolete function module for text editing (only enter numerical values otherwise the function module crashes).
*& Report ZUS_SDN_ALV_BUTTON_CLICK_LTXT
*& Screen '0100' contains no elements.
*& ok_code -> assigned to GD_OKCODE
*& Flow logic:
    * PROCESS BEFORE OUTPUT.
    * MODULE STATUS_0100.
    * PROCESS AFTER INPUT.
    * MODULE USER_COMMAND_0100.
*& PURPOSE: Demonstrate event BUTTON_CLICK for entering long text
REPORT zus_sdn_alv_button_click_ltxt.
TYPE-POOLS: icon.
TYPES: BEGIN OF ty_s_outtab.
INCLUDE TYPE knb1.
TYPES: button TYPE iconname.
TYPES: line TYPE bapi_line.
TYPES: END OF ty_s_outtab.
TYPES: ty_t_outtab TYPE STANDARD TABLE OF ty_s_outtab
WITH DEFAULT KEY.
DATA:
gd_okcode TYPE ui_func,
gd_repid TYPE syst-repid,
go_docking TYPE REF TO cl_gui_docking_container,
go_grid TYPE REF TO cl_gui_alv_grid,
gt_fcat TYPE lvc_t_fcat,
gt_variant TYPE disvariant,
gs_layout TYPE lvc_s_layo.
DATA:
gs_outtab TYPE ty_s_outtab,
gt_outtab TYPE ty_t_outtab.
    * CLASS lcl_eventhandler DEFINITION
CLASS lcl_eventhandler DEFINITION.
PUBLIC SECTION.
CLASS-METHODS:
handle_button_click FOR EVENT button_click OF cl_gui_alv_grid
IMPORTING
es_col_id
es_row_no
sender.
ENDCLASS. "lcl_eventhandler DEFINITION
    * CLASS lcl_eventhandler IMPLEMENTATION
CLASS lcl_eventhandler IMPLEMENTATION.
METHOD handle_button_click.
    * define local data
DATA:
ld_answer(1) TYPE c,
ls_outtab TYPE ty_s_outtab.
CHECK ( sender = go_grid ).
READ TABLE gt_outtab INTO ls_outtab INDEX es_row_no-row_id.
" Note: This function module is obsolete and crashes if
" non-numerical values are entered. Choose a more
" appropriate way of entering the longtext.
CALL FUNCTION 'POPUP_TO_GET_VALUE'
EXPORTING
fieldname = 'LINE'
tabname = 'BAPITGB'
titel = 'Enter Longtext'
valuein = ls_outtab-line
IMPORTING
answer = ld_answer
valueout = ls_outtab-line
EXCEPTIONS
fieldname_not_found = 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.
IF ( ld_answer NE 'C' ). " 'C' = cancel
MODIFY gt_outtab FROM ls_outtab INDEX es_row_no-row_id
TRANSPORTING line.
ENDIF.
    * Triggers PAI of the dynpro with the specified ok-code
CALL METHOD cl_gui_cfw=>set_new_ok_code( 'REFRESH' ).
ENDMETHOD. "handle_button_click
ENDCLASS. "lcl_eventhandler IMPLEMENTATION
START-OF-SELECTION.
SELECT * FROM knb1
INTO CORRESPONDING FIELDS OF TABLE gt_outtab
WHERE bukrs = '1000'.
CLEAR: gs_outtab.
gs_outtab-button = icon_change_text.
MODIFY gt_outtab FROM gs_outtab
TRANSPORTING button LINE
where ( bukrs NE space ). " modify all lines
PERFORM build_fieldcatalog.
    * Create docking container
CREATE OBJECT go_docking
EXPORTING
parent = cl_gui_container=>screen0
ratio = 90
EXCEPTIONS
OTHERS = 6.
IF sy-subrc 0.
    * MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
    * WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
    * Create ALV grids
CREATE OBJECT go_grid
EXPORTING
i_parent = go_docking
EXCEPTIONS
OTHERS = 5.
IF sy-subrc 0.
    * MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
    * WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
    * Set event handler
SET HANDLER: lcl_eventhandler=>handle_button_click FOR go_grid.
    * Display data
gs_layout-grid_title = 'Customers'.
CALL METHOD go_grid->set_table_for_first_display
EXPORTING
is_layout = gs_layout
CHANGING
it_outtab = gt_outtab
it_fieldcatalog = gt_fcat
EXCEPTIONS
OTHERS = 4.
IF sy-subrc 0.
    * MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
    * WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
    * Link the docking container to the target dynpro
gd_repid = syst-repid.
CALL METHOD go_docking->link
EXPORTING
repid = gd_repid
dynnr = '0100'
    * CONTAINER =
EXCEPTIONS
OTHERS = 4.
IF sy-subrc 0.
    * MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
    * WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
    * NOTE: dynpro does not contain any elements
CALL SCREEN '0100'.
    * Flow logic of dynpro (does not contain any dynpro elements):
*PROCESS BEFORE OUTPUT.
    * MODULE STATUS_0100.
*PROCESS AFTER INPUT.
    * MODULE USER_COMMAND_0100.
END-OF-SELECTION.
*& Module STATUS_0100 OUTPUT
    * text
MODULE status_0100 OUTPUT.
SET PF-STATUS 'STATUS_0100'. " contains push button "DETAIL"
    * SET TITLEBAR 'xxx'.
CALL METHOD go_grid->refresh_table_display
    * EXPORTING
    * IS_STABLE =
    * I_SOFT_REFRESH =
    * EXCEPTIONS
    * FINISHED = 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.
ENDMODULE. " STATUS_0100 OUTPUT
*& Module USER_COMMAND_0100 INPUT
    * text
MODULE user_command_0100 INPUT.
CASE gd_okcode.
WHEN 'BACK' OR
'END' OR
'CANC'.
SET SCREEN 0. LEAVE SCREEN.
    * Refresh -> pass PAI and PBO where flushing occurs
WHEN 'REFRESH'.
WHEN OTHERS.
ENDCASE.
CLEAR: gd_okcode.
ENDMODULE. " USER_COMMAND_0100 INPUT
*& Form BUILD_FIELDCATALOG
    * text
    * --> p1 text
    * <-- p2 text
FORM build_fieldcatalog .
    * define local data
DATA:
ls_fcat TYPE lvc_s_fcat,
lt_fcat TYPE lvc_t_fcat.
REFRESH: gt_fcat.
CLEAR: lt_fcat.
CALL FUNCTION 'LVC_FIELDCATALOG_MERGE'
EXPORTING
i_structure_name = 'KNB1'
CHANGING
ct_fieldcat = lt_fcat
EXCEPTIONS
OTHERS = 99.
IF sy-subrc 0.
    * MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
    * WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
APPEND LINES OF lt_fcat TO gt_fcat.
CLEAR: lt_fcat.
CALL FUNCTION 'LVC_FIELDCATALOG_MERGE'
EXPORTING
i_structure_name = 'BAPITGB'
CHANGING
ct_fieldcat = lt_fcat
EXCEPTIONS
OTHERS = 99.
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 lt_fcat INTO ls_fcat
WITH KEY fieldname = 'LINE'.
IF ( syst-subrc = 0 ).
INSERT ls_fcat INTO gt_fcat INDEX 4.
ENDIF.
CLEAR: lt_fcat.
CALL FUNCTION 'LVC_FIELDCATALOG_MERGE'
EXPORTING
i_structure_name = 'ICON'
CHANGING
ct_fieldcat = lt_fcat
EXCEPTIONS
OTHERS = 99.
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 lt_fcat INTO ls_fcat
WITH KEY fieldname = 'NAME'.
IF ( syst-subrc = 0 ).
ls_fcat-fieldname = 'BUTTON'.
ls_fcat-style = cl_gui_alv_grid=>mc_style_button.
INSERT ls_fcat INTO gt_fcat INDEX 4.
ENDIF.
LOOP AT gt_fcat INTO ls_fcat.
ls_fcat-col_pos = syst-tabix.
MODIFY gt_fcat FROM ls_fcat INDEX syst-tabix.
ENDLOOP.
ENDFORM. " BUILD_FIELDCATALOG[/code]
Reward If Found Useful.

How to make a line intersect with a path at random angles?

How do you make a line intersect with the anchor point of a half circle when you want the line to continue on past the anchor point of the half circle at a random angle?

Howdy.
Try this:
Lock the semicircle. With the pen tool, draw a line from the point of origin to the anchor point of the semicircle. It will still snap even though it's locked.
Now, we use Jet's scale idea. Select the Scale Tool (S). Click on the point of origin to position the reference point. It will snap. Now, while holding down the Shift Key, drag right and down. The line segment will stay snapped to the endpoint while you drag (highlighted). You can drag it as far as you want.
That's it.
Peace,
Lee
PS: It's pretty much all Jet's method with the benefit of the OP's screenshot of what he was trying to accomplish. Jet offered the best answer, it looks like to me.

How to iplement together: AT-LINE-SELECTION with GUI STATUS

Similar Messages

Maybe you are looking for