Can I define a vertical SELECTION-SCREEN block ?
Hi, I started getting to know the SELECTION-SCREEN statements now, I was wondering if there's a way to define a vertical screen block instead of an horizontal one.
Also, can I set the size of a given block ? Let's say I don't want it to extend to the right margin of the screen. Can I limit it to the middle, for instance ?
Here's a code excerpt so you can understand a little what I'm intending to do (I want to place the operators vertically on the screen).
SELECTION-SCREEN BEGIN OF BLOCK BOX1 WITH FRAME TITLE S_TBOX1.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 20(10) S_COMM.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF BLOCK BOX2 WITH FRAME TITLE S_TBOX2.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN PUSHBUTTON (3) S_PB1 USER-COMMAND 'XXX'.
SELECTION-SCREEN PUSHBUTTON (3) S_PB2 USER-COMMAND 'XXX'.
SELECTION-SCREEN PUSHBUTTON (3) S_PB3 USER-COMMAND 'XXX'.
SELECTION-SCREEN PUSHBUTTON (3) S_PB4 USER-COMMAND 'XXX'.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK BOX2.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN PUSHBUTTON (3) S_PB5 USER-COMMAND 'XXX'.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK BOX1.
INITIALIZATION.
S_COMM = 'CALCULATOR'.
Ok, I thought of that but... now I need the answer for the 2nd question I posted: is it possible to limit the extension of the block, so it ends right after the 4 buttons column ?
SELECTION-SCREEN BEGIN OF BLOCK BOX1 WITH FRAME TITLE S_TBOX1.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 20(10) S_COMM.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF BLOCK BOX2 WITH FRAME TITLE S_TBOX2.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN PUSHBUTTON (3) S_PB1 USER-COMMAND 'XXX'.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN SKIP.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN PUSHBUTTON (3) S_PB2 USER-COMMAND 'XXX'.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN SKIP.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN PUSHBUTTON (3) S_PB3 USER-COMMAND 'XXX'.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN SKIP.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN PUSHBUTTON (3) S_PB4 USER-COMMAND 'XXX'.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK BOX2.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN PUSHBUTTON (3) S_PB5 USER-COMMAND 'XXX'.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK BOX1.
INITIALIZATION.
S_COMM = 'CALCULATOR'.
Similar Messages
-
How to define our own selection screen for logical database in abap-hr?
Hi Friends,
Can u please help me
How to define your own selection screens for logical database.
we use to do like(goto->attributes-HRReportcatagerious ).but How to desin using customer table like t599c, t599f and how to add to my logical database?
Thanks in advance
charancheck out this online help
http://help.sap.com/saphelp_erp2004/helpdata/en/9f/dba65c35c111d1829f0000e829fbfe/frameset.htm
Regards
Raja -
How to write selection-screen block on 15th position?
Hello all,
I want to write selection-screen block on 15th position, How can I do this?
I know that we can write parameter/select-option on perticuler position using following code.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE t7.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN POSITION 15.
PARAMETERS: fdat LIKE SY-DATUM,
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK b1.
It writes parameter(FDAT) on 15th position. How can I write whole block on 15th position?Hi,
For this u have to use comment lines. See the below simple program...
SELECTION-SCREEN COMMENT /2(50) TEXT-001 MODIF ID SC1.
SELECTION-SCREEN SKIP 2.
SELECTION-SCREEN COMMENT /10(30) COMM1.
SELECTION-SCREEN ULINE.
PARAMETERS: R1 RADIOBUTTON GROUP RAD1,
R2 RADIOBUTTON GROUP RAD1,
R3 RADIOBUTTON GROUP RAD1.
SELECTION-SCREEN ULINE /1(50).
SELECTION-SCREEN COMMENT /10(30) COMM2.
SELECTION-SCREEN ULINE.
PARAMETERS: S1 RADIOBUTTON GROUP RAD2,
S2 RADIOBUTTON GROUP RAD2,
S3 RADIOBUTTON GROUP RAD2.
SELECTION-SCREEN ULINE /1(50).
INITIALIZATION.
COMM1 ='Radio Button Group 1'.
COMM2 ='Radio Button Group 2'.
LOOP AT SCREEN.
IF SCREEN-GROUP1 = 'SC1'.
SCREEN-INTENSIFIED = '1'.
MODIFY SCREEN.
ENDIF.
ENDLOOP. -
Depndng on chkbox, should display selection screen block on selectionscreen
Hi,
Depending upon the chkbox it should display selection screen block on selection screen.
If not checked it should display B3 and If checked it should display Block B2 .
SELECTION-SCREEN BEGIN OF BLOCK B1.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS P_DAT AS CHECKBOX USER-COMMAND FLAG.
SELECTION-SCREEN COMMENT 3(79) text-112.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK B1.
SELECTION-SCREEN BEGIN OF BLOCK B2 WITH FRAME TITLE TEXT-109.
PARAMETER: p_year1 LIKE ce1rh03-gjahr,
p_perid1 LIKE ce1rh03-perde.
SELECTION-SCREEN END OF BLOCK B2.
SELECTION-SCREEN BEGIN OF BLOCK B3 WITH FRAME TITLE TEXT-109.
PARAMETER: p_year LIKE ce1rh03-gjahr MODIF ID MO1,
p_period LIKE ce1rh03-perde MODIF ID MO1.
SELECTION-SCREEN END OF BLOCK B3.
If P_Dat is checked .... It should display the Block B2 and
If p_Dat is not checked .... it should display the Block B3
Any suggestions will be appreciated!
Regards,
KittuHello Kittu,
You can try this code:
SELECTION-SCREEN BEGIN OF BLOCK b1.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS p_dat AS CHECKBOX USER-COMMAND flag.
SELECTION-SCREEN COMMENT 3(79) text-112.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-109.
PARAMETER: p_year1 TYPE gjahr MODIF ID mo1,
p_perid1 TYPE perio MODIF ID mo1.
SELECTION-SCREEN END OF BLOCK b2.
SELECTION-SCREEN BEGIN OF BLOCK b3 WITH FRAME TITLE text-110.
PARAMETER: p_year TYPE gjahr MODIF ID mo2,
p_period TYPE perio MODIF ID mo2.
SELECTION-SCREEN END OF BLOCK b3.
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
IF p_dat = 'X' AND screen-group1 = 'MO2'.
screen-active = '0'.
ELSEIF p_dat <> 'X' AND screen-group1 = 'MO1'.
screen-active = '0'.
ENDIF.
MODIFY SCREEN.
ENDLOOP.
Hope this helps.
BR,
Suhas -
Making one selection screen block invisible
Hi,
I want to make one selection-screen block invisible based on one check box value.I have built the screen as follows:
PARAMETERS: pcheck1 TYPE char1 AS CHECKBOX.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-004.
PARAMETERS: pproj TYPE xxxx ,
psproj TYPE xxxx ,
pobjec TYPE xxxx .
SELECTION-SCREEN END OF BLOCK b2.
based on the pcheck value I want to meke the above "SELECTION-SCREEN BEGIN OF BLOCK b2 " invisible/visible.Can you please tell me how to do it?You need to set values in structure SCREEN:
screen-invisible = '1' .
screen-input = '0' .
screen-output = '0' .
for all items contained in block.
For example:
AT SELECTION-SCREEN OUTPUT.
IF <condition>.
LOOP AT SCREEN.
CASE screen-name.
WHEN <block_name> OR
<parameter1> or <parameter1_text> or
<parameter_N> or <parameter_N_text> .
screen-invisible = 1.
screen-input = 0.
screen-output = 0.
WHEN OTHERS.
ENDCASE.
MODIFY SCREEN.
ENDLOOP.
You can find names of variables which contain parameter texts using debuger.
ELSEIF sy-tcode = 'ZEUA_EDB_EXPORT'.
p_path = 'ZUA_EDB_EXPORT'.
ENDIF. -
How to make selection-screen block as unvisible?
hi,
in report program there are two selection screen blocks like this.
SELECTION-SCREEN BEGIN OF BLOCK b1.
parameters: rb1 as radiobutton group r1 user-command ucomm,
rb2 as radiobutton group r1,
rb3 as radiobutton group r1,
rb4 as radiobutton group r1,
SELECTION-SCREEN BEGIN OF BLOCK b2.
parameters: ip1 type string.
select-options: date for pernr-begda.
SELECTION-SCREEN END OF BLOCK b2.
SELECTION-SCREEN END OD BLOCK b1.
Now when i clicked on rb4 the selecetion screen block b2 has to be visible.
And rest of things i.e for rb1, rb2, rb3 it should not visible. it should be disabled.
Regards,
Shankar.hi,
i am doing like this.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text.
SELECTION-SCREEN SKIP 1.
SELECT-OPTIONS: pernr FOR person-pernr.
SELECTION-SCREEN SKIP 1.
PARAMETERS: tempname LIKE rlgrap-filename.
SELECTION-SCREEN SKIP 1.
PARAMETERS: rb_p1 TYPE c RADIOBUTTON GROUP r1 USER-COMMAND rbg,
rb_p2 TYPE c RADIOBUTTON GROUP r1,
rb_p3 TYPE c RADIOBUTTON GROUP r1,
rb_p4 TYPE c RADIOBUTTON GROUP r1.
SELECTION-SCREEN SKIP 1.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text1.
PARAMETERS: country(25) TYPE c MODIF ID ccc.
SELECT-OPTIONS:Fromdate FOR person-begda NO-EXTENSION MODIF ID ccc.
SELECTION-SCREEN END OF BLOCK b2.
SELECTION-SCREEN END OF BLOCK b1.
AT SELECTION-SCREEN OUTPUT.
IF rb_p4 = ' ' .
LOOP AT SCREEN.
IF SCREEN-NAME = 'COUNTRY'
OR SCREEN-NAME = 'FROMDATE-LOW'
OR SCREEN-NAME = 'FROMDATE-HIGH'
OR SCREEN-GROUP1 = 'CCC'.
screen-input = 0. "Disable
ENDIF.
MODIFY SCREEN.
ENDLOOP.
ENDIF.
IF rb_p4 = 'X' .
LOOP AT SCREEN.
IF SCREEN-NAME = 'COUNTRY'
OR SCREEN-NAME = 'FROMDATE-LOW'
OR SCREEN-NAME = 'FROMDATE-HIGH'
OR SCREEN-GROUP1 = 'CCC'.
screen-input = 1. "Disable
ENDIF.
MODIFY SCREEN.
ENDLOOP.
ENDIF.
Now it's making as disabled the fields which are in block B2.
Acutually my requirement is when i ever user selects RB_P4 then only that screen has to appear. and for rest of 3 RB it should not visible. it should be invisible.
for this wat to do....
Regards,
Shankar. -
How to place selection screen block adjacent to other block
hi all,
I want a selection screen block side by side, is it possible
without using screen painter, if it is let me know.
Thanks & Regards
RKHai RK check the following syntax
CALL SELECTION-SCREEN dynnr
[STARTING AT col1 lin1
[ENDING AT col2 lin2]]
[USING SELECTION-SET variant].
before this you need to create two screens -
Enable / Disable selection screen block
Hi, could u pls tell me how do I enable/disable selection screen block written below based on radio button selected??
Block to be enabled / disabled :
*----APO Version and RFC destination block
SELECTION-SCREEN BEGIN OF BLOCK b4 WITH FRAME TITLE text-013.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 01(20) text-e11. "APO Planning Version
SELECTION-SCREEN POSITION 29.
SELECT-OPTIONS s_apover FOR w_version NO INTERVALS.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 01(20) text-e09. "APO RFC Destination
SELECTION-SCREEN POSITION 32.
PARAMETERS : p_aporfc LIKE rfcdes-rfcdest.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK b4.
Radiobuttons :
Material Type
SELECTION-SCREEN BEGIN OF BLOCK ss04 WITH FRAME TITLE text-072 .
PARAMETERS :
Load only FERTs
p_FERT RADIOBUTTON GROUP styp DEFAULT 'X' USER-COMMAND rusr ,
Load ROH/HALBs
p_HALB RADIOBUTTON GROUP styp .
SELECTION-SCREEN END OF BLOCK ss04 .
Thanx in advanceHi
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
PARAMETERS: pa_file TYPE rlgrap-filename MODIF ID abc,
pa_lifnr TYPE lfa1-lifnr MODIF ID abc,
pa_vkorg TYPE vbak-vkorg MODIF ID abc.
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-002.
PARAMETERS: pa_kunnr TYPE vbak-kunnr MODIF ID def.
SELECT-OPTIONS: s_lifnr FOR gs_lfa1-lifnr MODIF ID def,
s_date FOR gs_lfa1-erdat MODIF ID def,
s_augru FOR gs_vbak-augru MODIF ID def,
s_vbeln FOR gs_vbak-vbeln MODIF ID def.
SELECTION-SCREEN END OF BLOCK b2.
SELECTION-SCREEN BEGIN OF BLOCK b3 WITH FRAME TITLE text-003.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pa_upd RADIOBUTTON GROUP g1 USER-COMMAND uc01 DEFAULT 'X'."#EC *
SELECTION-SCREEN COMMENT 3(60) text-004 FOR FIELD pa_upd.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pa_rep RADIOBUTTON GROUP g1 ."#EC *
SELECTION-SCREEN COMMENT 3(60) text-005 FOR FIELD pa_rep.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK b3.
IF pa_rep EQ gc_x.
LOOP AT SCREEN.
IF screen-group1 = gc_abc.
screen-input = gc_zero_num.
ELSEIF screen-group1 = gc_def.
screen-active = gc_one_num.
ENDIF.
MODIFY SCREEN.
ENDLOOP.
ELSEIF pa_upd EQ gc_x.
*For Reprocessing
LOOP AT SCREEN.
IF screen-group1 = gc_def.
screen-input = gc_zero_num.
ELSEIF screen-group1 = gc_abc.
screen-active = gc_one_num.
ENDIF.
MODIFY SCREEN.
CLEAR pa_upd.
ENDLOOP.
ENDIF.
REPORT zrich_001.
PARAMETERS: p_rad1 RADIOBUTTON GROUP grp1 DEFAULT 'X'
user-command chk,
p_rad2 RADIOBUTTON GROUP grp1.
SELECT-OPTIONS: s_datum1 FOR sy-datum MODIF ID d1,
s_datum2 FOR sy-datum MODIF ID d2.
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
IF p_rad1 = 'X'
AND screen-group1 = 'D2'.
screen-active = '0'.
ENDIF.
IF p_rad2 = 'X'
AND screen-group1 = 'D1'.
screen-active = '0'.
ENDIF.
MODIFY SCREEN.
ENDLOOP.
Regards
Anji -
Nested Selection Screen Blocks
Hi friends,
My requirement is to display the two nested blocks in the selection screen and the radio button parameters defined should come in a single group.
as below........
! Begin Block1
! * Radio Button 1!
! Begin Block2
! * Radio Button 2 !
! * Radio Button 3 !
! * Radio Button 4 !
! End Block2 !
! End Block 1 !
My Requirement is all Radio Buttons 1 2 3 & 4 should be under one group only. I just need nested frames as shown above
Thanks & Regards,
Kumar.Hi,
In one group you can not declare only one radio button, you need atleast two radio button for a group.
if there is a single radio button only, then better you make it as check box.
Nesting of blocks is possible.
you can do that.
In one block there should be atleast two radio button for using Group.
regards,
Ruchika
Reward if useful................ -
Regarding hiding Selection screen block
hi all ,
i have 2 blocks in the selection screen. the First block has 4 radiobuttons and the second block has 4 parameters.
i need to hide the block 2 based on the radiobutton checked in the initail block.
if radiobutton 1 or 2 is selected then the block should not be visible and if the rdbtn 3 or 4 is selected the block should be visible
i have wriiten the code but it doesn't work at all. the block is hidden but when i select the radiobtn 3 or 4 it doesn't work
the code i hve wriiten is as follows
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
PARAMETERS: par1 RADIOBUTTON GROUP rg2 DEFAULT 'X' USER-COMMAND ucom1
PARAMETERS: par2 RADIOBUTTON GROUP rg2 .
PARAMETERS: par3 RADIOBUTTON GROUP rg2 .
PARAMETERS: par4 RADIOBUTTON GROUP rg2
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN BEGIN OF BLOCK a1 WITH FRAME TITLE text-001.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETER p_pwwrk TYPE plaf-pwwrk MODIF ID FSC.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS p_wch TYPE cr_hname MODIF ID FSC.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECT-OPTIONS s_mdv01 FOR g_mdv01 MODIF ID FSC.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK a1.
I have declared this after Initialization.
AT SELECTION-SCREEN OUTPUT.
if par3 eq 'X' or par4 eq 'X'.
LOOP AT SCREEN.
IF screen-group1 = 'FSC'.
screen-active = 0.
MODIFY SCREEN.
ENDIF.
ENDLOOP.
endif.
can anybody please suggest.
Thanx
SrinivasHiding Input Fields Locate the document in its SAP Library structure
To suppress the display of the input field on the selection screen, you use the following syntax:
PARAMETERS p ...... NO-DISPLAY ......
Although parameter p is declared, it is not displayed on the selection screen.
If the parameter belongs to the standard selection screen, you can assign a value to it either by using the DEFAULT addition when you declare it, or during the INITIALIZATION event. If you call the executable program using the SUBMIT statement, the calling program can also pass the value.
When you use user-defined selection screens, you can assign a value to the parameter at any time before calling the selection screen.
If you want to display a parameter only in certain cases, for example, depending on the values entered by the user in other input fields of the selection screen, you cannot use the NO-DISPLAY addition. If you use NO-DISPLAY, the parameter actually is an element of the interface for program calls, but not an element of the selection screen. As a result, you cannot make it visible using the MODIFY SCREEN statement.
To hide a parameter that is an element of the selection screen, you must declare it without the NO-DISPLAY addition and suppress its display using the MODIFY SCREEN statement.
We can Hide parameter / select option in selection screen dynamically by manipulating screen object.
SCREEN is like an internal table with a header line. However, you do not have to declare it in your program. Go to debugging mode and then view structure of screen.
You can modify SCREEN in your ABAP program during the PBO event of a screen. Its contents override the static attributes of the screen fields for a single screen call. The only statements that you can use with SCREEN are:
LOOP AT SCREEN.
MODIFY SCREEN.
ENDLOOP.
We can hide parameter by set screen-active to 0.
Here is example of how to hide parameter in selection screen. Write it, and change click on radiobutton to hide parameter.
REPORT ZAALGAL0006.
DATA: d_ucomm LIKE sy-ucomm.
PARAMETERS: p_grpa1(10) MODIF ID A,
p_grpa2(5) MODIF ID A,
p_grpb1(2) MODIF ID B.
PARAMETERS: p_actA RADIOBUTTON GROUP rad1 USER-COMMAND ACT DEFAULT 'X',
p_actB RADIOBUTTON GROUP rad1.
AT SELECTION-SCREEN.
d_ucomm = sy-ucomm.
AT SELECTION-SCREEN OUTPUT.
LOOP AT screen.
IF p_actA = 'X'.
IF screen-group1 = 'B'.
screen-active = 0.
ENDIF.
ELSEIF p_actB = 'X'.
IF screen-group1 = 'A'.
screen-active = 0.
ENDIF.
ENDIF.
MODIFY screen.
ENDLOOP.
START-OF-SELECTION.
regards,
srinivas
<b>*reward for useful answers*</b> -
Define Ranges on Selection screen
Hi All,
I have a requirement to define company code as ranges on the selection screen, and then I have loop thru those company codes to get the plants. Any idea how I can define ranges and then use it in the program?
Sample code will be really helpful.
Thanks,
David.Hi,
selection-screen begin of block 1 with frame title text-100.
select-options : s_ccode for t001-bukrs.
selection-screen end of block 1.
aRs -
Define path in selection screen to write the output file to pres. server
Hi can anyone tell me how to declare a variable so that the user can specify his own path name in the selection screen to store the output file in the presentation server. and please tell me how to link up the output file to the selection screen specified path.
thanks in advance.DATA: FILE_TAB TYPE STRING.
SELECTION-SCREEN BEGIN OF BLOCK B02 WITH FRAME TITLE TEXT-B02.
PARAMETERS:
P_FILE TYPE RLGRAP-FILENAME OBLIGATORY LOWER CASE.
SELECTION-SCREEN END OF BLOCK B02.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_FILE.
PERFORM OPEN_FILE USING P_FILE.
FORM OPEN_FILE USING L_FILE.
CALL FUNCTION 'KD_GET_FILENAME_ON_F4'
CHANGING
FILE_NAME = L_FILE
EXCEPTIONS
MASK_TOO_LONG = 1
OTHERS = 2.
IF SY-SUBRC <> 0.
SY-MSGTY = 'I'.
MESSAGE ID SY-MSGID
TYPE SY-MSGTY
NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
STOP.
ENDIF.
ENDFORM.
FILE_TAB = P_FILE.
CALL FUNCTION 'GUI_DOWNLOAD'
*Complete the FM
Greetings,
Blag. -
Can I make two differents selection screen in my program?
Hi experts!!
I don't know how to male this, the problem is that I need to make two differents selection screen in my program because I have two differents kinds of button,
BUTTON1 BUTTON2 BUTTON3
When I press button1 I received.
BUTTON4 BUTTON5 BUTTON6
Now If I press on button4, how can I pick up the event? the name or something associate to this button4?
Thanks a lot and regards
RebecaHi and thanks,
I've tried with your code, Velu Lakshmanan, and I only received another screen with the buttons... I need to put this button in the same screen, now I've this, but I can't receive the event associate to the second's buttons,
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
SELECTION-SCREEN SKIP.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN PUSHBUTTON 1(79) DTP USER-COMMAND DTP
VISIBLE LENGTH 25.
SELECTION-SCREEN PUSHBUTTON 28(79) EMP USER-COMMAND EMP
VISIBLE LENGTH 25.
SELECTION-SCREEN PUSHBUTTON 55(79) ABS USER-COMMAND ABS
VISIBLE LENGTH 25.
PARAMETERS: PROC_TYP TYPE I DEFAULT 1 NO-DISPLAY.
SELECTION-SCREEN END OF LINE.
* Informes de datos de tiempo.
SELECTION-SCREEN SKIP.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN PUSHBUTTON 1(25) TEXT-FED USER-COMMAND FED MODIF ID DT1.
SELECTION-SCREEN PUSHBUTTON 28(25) TEXT-DCH USER-COMMAND DCH MODIF ID DT1.
SELECTION-SCREEN PUSHBUTTON 55(25) TEXT-ACH USER-COMMAND ACH MODIF ID DT1.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN PUSHBUTTON 1(25) TEXT-FII USER-COMMAND FII MODIF ID DT1.
SELECTION-SCREEN PUSHBUTTON 28(25) TEXT-PTB USER-COMMAND PTB MODIF ID DT1.
SELECTION-SCREEN PUSHBUTTON 55(25) TEXT-PTS USER-COMMAND PTS MODIF ID DT1.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN PUSHBUTTON 1(25) TEXT-ACI USER-COMMAND ACI MODIF ID DT1.
SELECTION-SCREEN PUSHBUTTON 28(25) TEXT-FIM USER-COMMAND FIM MODIF ID DT1.
SELECTION-SCREEN PUSHBUTTON 55(25) TEXT-LDH USER-COMMAND LDH MODIF ID DT1.
SELECTION-SCREEN END OF LINE.
* Informes de empleados
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN PUSHBUTTON 1(25) TEXT-LDP USER-COMMAND LDP MODIF ID EM1.
SELECTION-SCREEN PUSHBUTTON 28(25) TEXT-PDF USER-COMMAND PDF MODIF ID EM1.
SELECTION-SCREEN PUSHBUTTON 55(25) TEXT-LDT USER-COMMAND LDT MODIF ID EM1.
SELECTION-SCREEN END OF LINE.
* Informes de bajas
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN PUSHBUTTON 1(25) TEXT-BAJ USER-COMMAND BAJ MODIF ID AB1.
SELECTION-SCREEN PUSHBUTTON 28(25) TEXT-VMA USER-COMMAND VMA MODIF ID AB1.
SELECTION-SCREEN PUSHBUTTON 55(25) TEXT-SDE USER-COMMAND SDE MODIF ID AB1.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN PUSHBUTTON 1(25) TEXT-LDB USER-COMMAND LDB MODIF ID AB1.
SELECTION-SCREEN PUSHBUTTON 28(25) TEXT-LDA USER-COMMAND LDA MODIF ID AB1.
SELECTION-SCREEN PUSHBUTTON 55(25) TEXT-DHT USER-COMMAND DHT MODIF ID AB1.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK B1.
* Pintamos los botones que necesitemos mostrar según la opción seleccionada
AT SELECTION-SCREEN.
CASE SSCRFIELDS-UCOMM.
WHEN 'DTP'. PROC_TYP = 1.
WHEN 'EMP'. PROC_TYP = 2.
WHEN 'ABS'. PROC_TYP = 3.
ENDCASE.
AT SELECTION-SCREEN OUTPUT.
CASE PROC_TYP.
* Cuando el botón que ha seleccionado es "Datos de tiempo"
WHEN 1.
CALL FUNCTION 'ICON_CREATE'
EXPORTING
NAME = ICON_OKAY
TEXT = TEXT-DTP
INFO = TEXT-AUS
IMPORTING
RESULT = DTP.
EMP = TEXT-EMP.
ABS = TEXT-ABS.
LOOP AT SCREEN.
IF SCREEN-GROUP1 EQ 'DT1'.
SCREEN-INPUT = '1'. SCREEN-INVISIBLE = '0'. MODIFY SCREEN.
ENDIF.
IF SCREEN-GROUP1 EQ 'EM1'.
SCREEN-INPUT = '0'. SCREEN-INVISIBLE = '1'. MODIFY SCREEN.
ENDIF.
IF SCREEN-GROUP1 EQ 'AB1'.
SCREEN-INPUT = '0'. SCREEN-INVISIBLE = '1'. MODIFY SCREEN.
ENDIF.
ENDLOOP.
WHEN 2.
CALL FUNCTION 'ICON_CREATE'
EXPORTING
NAME = ICON_OKAY
TEXT = TEXT-EMP
INFO = TEXT-AUS
IMPORTING
RESULT = EMP.
DTP = TEXT-DTP.
ABS = TEXT-ABS.
LOOP AT SCREEN.
IF SCREEN-GROUP1 EQ 'DT1'.
SCREEN-INPUT = '0'. SCREEN-INVISIBLE = '1'. MODIFY SCREEN.
ENDIF.
IF SCREEN-GROUP1 EQ 'EM1'.
SCREEN-INPUT = '1'. SCREEN-INVISIBLE = '0'. MODIFY SCREEN.
ENDIF.
IF SCREEN-GROUP1 EQ 'AB1'.
SCREEN-INPUT = '0'. SCREEN-INVISIBLE = '1'. MODIFY SCREEN.
ENDIF.
ENDLOOP.
WHEN 3.
CALL FUNCTION 'ICON_CREATE'
EXPORTING
NAME = ICON_OKAY
TEXT = TEXT-ABS
INFO = TEXT-AUS
IMPORTING
RESULT = ABS.
DTP = TEXT-DTP.
EMP = TEXT-EMP.
LOOP AT SCREEN.
IF SCREEN-GROUP1 EQ 'DT1'.
SCREEN-INPUT = '0'. SCREEN-INVISIBLE = '1'. MODIFY SCREEN.
ENDIF.
IF SCREEN-GROUP1 EQ 'EM1'.
SCREEN-INPUT = '0'. SCREEN-INVISIBLE = '1'. MODIFY SCREEN.
ENDIF.
IF SCREEN-GROUP1 EQ 'AB1'.
SCREEN-INPUT = '1'. SCREEN-INVISIBLE = '0'. MODIFY SCREEN.
ENDIF.
ENDLOOP.
ENDCASE.
Help please... I don't know how can I make this.....
If I use screen...how can I put this screen in the correct place?
Thanks a lot
Regards,
Rebeca -
Selection-screen block disappearing
Hi All ,
Can any one tell me how can i make a block in the selection screen invisible . rt now i am using the below code for selection screen ,
SELECTION-SCREEN BEGIN OF BLOCK BLK1 WITH FRAME TITLE TEXT-001.
PARAMETERS: P_SALE RADIOBUTTON GROUP GRP DEFAULT 'X',
P_BILL RADIOBUTTON GROUP GRP .
SELECTION-SCREEN END OF BLOCK BLK1.
SELECTION-SCREEN BEGIN OF BLOCK BLK2 WITH FRAME TITLE TEXT-002.
PARAMETERS MODIF ID SAL.
SELECT-OPTIONS: S_vkorg for TVKO-VKORG obligatory MODIF ID SAL,
S_VTWEG for TVTW-VTWEG obligatory MODIF ID SAL,
S_SPART for TSPA-SPART obligatory MODIF ID SAL.
SELECTION-SCREEN END OF BLOCK BLK2.
SELECTION-SCREEN BEGIN OF BLOCK BLK3 WITH FRAME TITLE TEXT-003.
SELECT-OPTIONS: S_vkorg1 for TVKO-VKORG obligatory MODIF ID BIL,
S_VTWEG1 for TVTW-VTWEG obligatory MODIF ID BIL,
S_SPART1 for TSPA-SPART obligatory MODIF ID BIL,
S_FKDAT for VBRK-FKDAT obligatory MODIF ID BIL.
SELECTION-SCREEN END OF BLOCK BLK3.
my requirement is , when i select the RB P_SALE the BLK3 have to be invisible and when i select the RB P_BILL BLK2 have to be invisible .
Thanks & Regards ,
Sabu.Hi,
you have to do little modification to your selection scree.
yse the following logic which i have used.
*selection-screen begin of block blk11 with frame title text-002.
*parameters : so_plant radiobutton group a USER-COMMAND fcod MODIF ID m1 DEFAULT 'X'.
*parameters : so_ven radiobutton group a MODIF ID m1 .
*parameters : so_cust radiobutton group a MODIF ID m1.
*selection-screen end of block blk11.
*at selection-screen OUTPUT .
PERFORM chng_screen.
*AT SELECTION-SCREEN.
LOOP AT SCREEN.
IF screen-group1 = 'M2'.
IF screen-input NE '1'.
v_flag = 'X'.
ELSE.
clear v_flag.
ENDIF.
ENDIF.
endloop.
*form chng_screen.
*LOOP AT SCREEN.
if so_plant = 'X'.
IF screen-group1 = 'M3'.
screen-input = space.
screen-active = 0.
modify screen.
ELSEIF screen-group1 = 'M2'.
screen-input = 1.
screen-active = 1.
modify screen.
ELSEIF screen-group1 = 'M4'.
screen-input = 1.
screen-active = 0.
modify screen.
ENDIF.
ELSEIF SO_VEN = 'X'.
IF screen-group1 = 'M2'.
screen-input = space.
screen-active = 0.
modify screen.
elseif screen-group1 = 'M3'.
screen-input = 1.
screen-active = 1.
modify screen.
ELSEIF screen-group1 = 'M4'.
screen-input = 1.
screen-active = 0.
modify screen.
ENDIF.
ELSEIF SO_CUST = 'X'.
IF screen-group1 = 'M2'.
screen-input = space.
screen-active = 0.
modify screen.
ELSEIF screen-group1 = 'M3'.
screen-input = 1.
screen-active = 0.
modify screen.
ELSEIF screen-group1 = 'M4'.
screen-input = 1.
screen-active = 1.
modify screen.
ENDIF.
ENDIF.
*ENDLOOP.
*endform. -
Coloring SELECTION-SCREEN blocks
How do I manage to change the background color of a block?
To be precise, of this block:
SELECTION-SCREEN BEGIN OF BLOCK b002 WITH FRAME.
SELECT-OPTIONS: so_lp FOR lqua-lgpla.
PARAMETERS: pa_matnr LIKE lqua-matnr.
SELECTION-SCREEN END OF BLOCK b002.
Thanks.u cannot apply colors at selection-screen level, i believe.But u can make the fields look intensified, invisible and such sought by looping and changing the screen attributes.
reward if helpful
kiran
Maybe you are looking for
-
Lost iTunes Library after upgrading to iTunes 7.7 HELP PLEASE
I have two issues on hand : after upgrading to iTunes 7.7 I opened iTunes and all of my music was gone except for about 1,000+ songs (3.2 GB) when I originally had about 20GB worth of songs. How can I recover my full library into iTunes ? Second issu
-
HT1369 I can't get my computer to connect me to the itunes store
I'm able to listen to my purchased music but i can't go to the store to purchase. I keep getting an error that its not connected to the network
-
I have built the first handful of pages for a site using DW CS4. I have a couple of glitches that I can't seem to get sorted out. Here is the site: http://www.prospectrealty1.fatcow.com/index.html First question is regarding the main (in the header)
-
How Do I Convert A (0,1) To A Boolean in LabVIEW?
I would like to convert an array of (0,1) to boolean. I did not find the function in LabView. There is only the function boolean to (0,1). Gnaoui Bouchachiya
-
Hey I tried to update my iTunes from the internet from the iTunes website and now my iTunes keepes saying it has encountered a problem and must close. I have unistalled it and reinstalled it and it says the samething! HELP! I'm going crazy without my