Urgent : selection screen

Hi Experts ,
   i am passing sub screens dynamically into the selection screen . IN output i am getting vertical scroll bar in subscreen. my requirement is to avoid scroll bar to that perticular subscreen.
pls send the code how to avoid that scroll bar , here i am sending the coed below ( for 1300 sub screen i am getting scroll bar)
pls do needfull .
Thanks,
Nagendra.
tables
TABLES:
sscrfields,
draw,          "Document Info Records
drat,          "Texts for Document Info Records
cabn,          "Characteristic
cawn,          "characteristic values
cawnt,         "characteristic value text
ausp,          "Characteristic values
tdwa,          "Document Types
lfa1,          "Vendors
ekko,          "Purchasing Documents Header
ekpo,          "Purchasing Document items
t023t,         "Material Group Descriptions
klah,          "Classes
cabnt,         "Characteristic descriptions
lfb1,          "Vendor master (company Code)
t059t,         "texts for minority indicators
tdws,          "Document status
tdwst,         "Document Status Text
sos04,         "SAPoffice: screen fields for function group SO04
t006,          "Units of Measurement
tcurx,         "Decimal Places in Currencies
*+MD1K960995
ekbe.
Parameters
Program Parameters
SELECTION-SCREEN BEGIN OF SCREEN 1100 AS SUBSCREEN.
SELECTION-SCREEN BEGIN OF BLOCK buyingguide
                          WITH FRAME TITLE text-104.
Company Code
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) text-300 FOR FIELD s_bukrs.
SELECT-OPTIONS: s_bukrs FOR ekko-bukrs MEMORY ID buk.
SELECTION-SCREEN END   OF LINE.
Purchasing Document Category
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) text-301 FOR FIELD s_bstyp.
SELECT-OPTIONS: s_bstyp FOR ekko-bstyp DEFAULT 'K'.
SELECTION-SCREEN END   OF LINE.
Purchasing Document type
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) text-302 FOR FIELD s_bsart.
SELECT-OPTIONS: s_bsart FOR ekko-bsart MEMORY ID bsa.
SELECTION-SCREEN END   OF LINE.
Purchasing Document Creation Date
SELECTION-SCREEN BEGIN OF LINE. "MD1K964692
SELECTION-SCREEN COMMENT 1(28) text-303 FOR FIELD s_aedat. "MD1K964692
SELECT-OPTIONS: s_aedat FOR ekko-aedat.   "MD1K964692
SELECTION-SCREEN END   OF LINE.           "MD1K964692
Purchasing Document Creator
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) text-304 FOR FIELD s_ernam.
SELECT-OPTIONS: s_ernam FOR ekko-ernam.
SELECTION-SCREEN END   OF LINE.
Purchasing Document Vendor Account Number
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) text-305 FOR FIELD s_lifnr.
SELECT-OPTIONS: s_lifnr FOR ekko-lifnr MEMORY ID lif.
SELECTION-SCREEN END   OF LINE.
Purchasing Organization
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) text-306 FOR FIELD s_ekorg.
SELECT-OPTIONS: s_ekorg FOR ekko-ekorg MEMORY ID eko.
SELECTION-SCREEN END   OF LINE.
*+G1
Purchasing Group
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) text-340 FOR FIELD s_ekorg.
SELECT-OPTIONS: s_ekgrp FOR ekko-ekgrp MEMORY ID ekg.
SELECTION-SCREEN END   OF LINE.
Purchasing Document date
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) text-341 FOR FIELD s_ekorg.
SELECT-OPTIONS: s_bedat FOR ekko-bedat MEMORY ID bed.
SELECTION-SCREEN END   OF LINE.
Purchasing Document item plant
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) text-307 FOR FIELD s_werks.
SELECT-OPTIONS: s_werks FOR ekpo-werks MEMORY ID wrk.
SELECTION-SCREEN END   OF LINE.
*+MD1K971124
*+MD1K971479
Number of Purchasing Info Record
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) text-342 FOR FIELD s_infnr.
SELECT-OPTIONS: s_infnr FOR ekpo-infnr MEMORY ID inf.
SELECTION-SCREEN END   OF LINE.
Purchasing Document item material group
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) text-308 FOR FIELD s_matkl.
SELECT-OPTIONS: s_matkl FOR ekpo-matkl MEMORY ID mkl.
SELECTION-SCREEN END   OF LINE.
Purchasing Document item category
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) text-309 FOR FIELD s_pstyp.
SELECT-OPTIONS: s_pstyp FOR ekpo-pstyp DEFAULT 8 TO 9.
SELECTION-SCREEN END   OF LINE.
Purchasing Document item material number
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) text-310 FOR FIELD s_matnr.
SELECT-OPTIONS: s_matnr FOR ekpo-matnr MEMORY ID mat.
SELECTION-SCREEN END   OF LINE.
Purchasing Document item deletion indicator
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) text-311 FOR FIELD s_loekz.
SELECT-OPTIONS: s_loekz FOR ekpo-loekz DEFAULT space.
SELECTION-SCREEN END   OF LINE.
Purchasing Document
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) text-317 FOR FIELD s_ebeln.
SELECT-OPTIONS: s_ebeln FOR ekko-ebeln MEMORY ID vrt.
SELECTION-SCREEN END   OF LINE.
Purchasing Document item
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) text-312 FOR FIELD s_ebelp.
SELECT-OPTIONS: s_ebelp FOR ekpo-ebelp MEMORY ID bsp.
SELECTION-SCREEN END   OF LINE.
Purchasing Document item purchase req number
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) text-313 FOR FIELD s_banfn.
SELECT-OPTIONS: s_banfn FOR ekpo-banfn MEMORY ID ban.
SELECTION-SCREEN END   OF LINE.
Purchasing Document item reference purchase document
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) text-318 FOR FIELD s_konnr.
SELECT-OPTIONS: s_konnr FOR ekpo-konnr.
SELECTION-SCREEN END   OF LINE.
Purchasing Document item reference purchase document item
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) text-319 FOR FIELD s_ktpnr.
SELECT-OPTIONS: s_ktpnr FOR ekpo-ktpnr.
SELECTION-SCREEN END   OF LINE.
Purchasing Document validity from date
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) text-314 FOR FIELD s_kdatb.
SELECT-OPTIONS: s_kdatb FOR ekko-kdatb.
SELECTION-SCREEN END   OF LINE.
Purchasing Document validity to date
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) text-315 FOR FIELD s_kdate.
SELECT-OPTIONS: s_kdate FOR ekko-kdate DEFAULT sy-datum
                                            TO '99991231'.
SELECTION-SCREEN END   OF LINE.
Vendor Rating
SELECTION-SCREEN BEGIN OF LINE.
*SELECTION-SCREEN COMMENT 1(28) text-316 FOR FIELD s_zmrate.
*SELECT-OPTIONS: s_zmrate FOR ekko-zz_moc_rating.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN END OF BLOCK buyingguide.
SELECTION-SCREEN END OF SCREEN 1100.
SELECTION-SCREEN BEGIN OF SCREEN 1200 AS SUBSCREEN.
SELECTION-SCREEN BEGIN OF BLOCK document
                          WITH FRAME TITLE text-024.
Document number
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) c_dokar FOR FIELD s_dokar.
SELECT-OPTIONS: s_dokar FOR draw-dokar DEFAULT 'CN1'.
SELECTION-SCREEN END   OF LINE.
Document type
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) c_doknr FOR FIELD s_doknr.
SELECT-OPTIONS: s_doknr FOR draw-doknr.
SELECTION-SCREEN END   OF LINE.
Document part
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) c_doktl FOR FIELD s_doktl.
SELECT-OPTIONS: s_doktl FOR draw-doktl.
SELECTION-SCREEN END   OF LINE.
Document version
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) c_dokvr FOR FIELD s_dokvr.
SELECT-OPTIONS: s_dokvr FOR draw-dokvr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN SKIP 1.
Document Status
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) c_dokst FOR FIELD s_dokst.
SELECT-OPTIONS: s_dokst FOR draw-dokst." DEFAULT 'AC'.
SELECTION-SCREEN END   OF LINE.
Document Creation Date
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) c_adat   FOR FIELD s_adat.
SELECT-OPTIONS: s_adat FOR draw-adatum.
SELECTION-SCREEN END   OF LINE.
Document Creator
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) c_dwnam FOR FIELD s_dwnam.
SELECT-OPTIONS: s_dwnam FOR draw-dwnam.
SELECTION-SCREEN END   OF LINE.
Document text
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) c_dktxt FOR FIELD s_dktxt.
SELECT-OPTIONS: s_dktxt FOR drat-dktxt.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN SKIP 1.
Parent Document number
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) c_prear FOR FIELD s_prear.
SELECT-OPTIONS: s_prear FOR draw-prear.
SELECTION-SCREEN END   OF LINE.
Parent Document type
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) c_prenr FOR FIELD s_prenr.
SELECT-OPTIONS: s_prenr FOR draw-prenr.
SELECTION-SCREEN END   OF LINE.
Parent Document part
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) c_pretl FOR FIELD s_pretl.
SELECT-OPTIONS: s_pretl FOR draw-pretl.
SELECTION-SCREEN END   OF LINE.
Parent Document version
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(28) c_prevr FOR FIELD s_prevr.
SELECT-OPTIONS: s_prevr FOR draw-prevr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN END OF BLOCK document.
SELECTION-SCREEN END OF SCREEN 1200.
SELECTION-SCREEN BEGIN OF SCREEN 1300 AS SUBSCREEN.
SELECTION-SCREEN BEGIN OF BLOCK charact
                          WITH FRAME TITLE text-025.
Class
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(31) c_class FOR FIELD p_class.
PARAMETERS: p_class LIKE klah-class OBLIGATORY
                                    MATCHCODE OBJECT clas
                                    DEFAULT 'CONTRACTS'.
SELECTION-SCREEN END   OF LINE.
Class Type
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(31) c_klart FOR FIELD p_klart.
PARAMETERS: p_klart LIKE klah-klart OBLIGATORY DEFAULT '017'.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN SKIP 1.
SELECTION-SCREEN COMMENT /1(67) text-203.
SELECTION-SCREEN COMMENT /5(16) text-204.
SELECTION-SCREEN SKIP 1.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pc_01atm AS CHECKBOX
                              MODIF ID chr.
PARAMETERS: pt_01atm LIKE cabn-atnam OBLIGATORY
                              VISIBLE LENGTH 26
                              MODIF ID chr.
SELECT-OPTIONS: s_01atm FOR ausp-atwrt
                              MODIF ID chr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pc_02atm AS CHECKBOX
                              MODIF ID chr.
PARAMETERS: pt_02atm LIKE cabn-atnam OBLIGATORY
                              VISIBLE LENGTH 26
                              MODIF ID chr.
SELECT-OPTIONS: s_02atm FOR ausp-atwrt
                              MODIF ID chr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pc_03atm AS CHECKBOX
                              MODIF ID chr.
PARAMETERS: pt_03atm LIKE cabn-atnam OBLIGATORY
                              VISIBLE LENGTH 26
                              MODIF ID chr.
SELECT-OPTIONS: s_03atm FOR ausp-atwrt
                              MODIF ID chr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pc_05atm AS CHECKBOX
                              MODIF ID chr.
PARAMETERS: pt_05atm LIKE cabn-atnam OBLIGATORY
                               VISIBLE LENGTH 26
                               MODIF ID chr.
SELECT-OPTIONS: s_05atm FOR ausp-atwrt
                              MODIF ID chr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pc_04atm AS CHECKBOX
                              MODIF ID chr.
PARAMETERS: pt_04atm LIKE cabn-atnam OBLIGATORY
                              VISIBLE LENGTH 26
                              MODIF ID chr.
SELECT-OPTIONS: s_04atm FOR ausp-atwrt
                              MODIF ID chr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pc_06atm AS CHECKBOX
                              MODIF ID chr.
PARAMETERS: pt_06atm LIKE cabn-atnam OBLIGATORY
                              VISIBLE LENGTH 26
                              MODIF ID chr.
SELECT-OPTIONS: s_06atm FOR ausp-atwrt
                              MODIF ID chr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pc_07atm AS CHECKBOX
                              MODIF ID chr.
PARAMETERS: pt_07atm LIKE cabn-atnam OBLIGATORY
                              VISIBLE LENGTH 26
                              MODIF ID chr.
SELECT-OPTIONS: s_07atm FOR ausp-atwrt
                              MODIF ID chr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pc_08atm AS CHECKBOX
                              MODIF ID chr.
PARAMETERS: pt_08atm LIKE cabn-atnam OBLIGATORY
                              VISIBLE LENGTH 26
                              MODIF ID chr.
SELECT-OPTIONS: s_08atm FOR ausp-atwrt
                              MODIF ID chr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pc_09atm AS CHECKBOX
                              MODIF ID chr.
PARAMETERS: pt_09atm LIKE cabn-atnam OBLIGATORY
                              VISIBLE LENGTH 26
                              MODIF ID chr.
SELECT-OPTIONS: s_09atm FOR ausp-atwrt
                              MODIF ID chr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pc_10atm AS CHECKBOX
                              MODIF ID chr.
PARAMETERS: pt_10atm LIKE cabn-atnam OBLIGATORY
                              VISIBLE LENGTH 26
                              MODIF ID chr.
SELECT-OPTIONS: s_10atm FOR ausp-atwrt
                              MODIF ID chr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pc_11atm AS CHECKBOX
                              MODIF ID chr.
PARAMETERS: pt_11atm LIKE cabn-atnam OBLIGATORY
                              VISIBLE LENGTH 26
                              MODIF ID chr.
SELECT-OPTIONS: s_11atm FOR ausp-atwrt
                              MODIF ID chr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pc_12atm AS CHECKBOX
                              MODIF ID chr.
PARAMETERS: pt_12atm LIKE cabn-atnam OBLIGATORY
                              VISIBLE LENGTH 26
                              MODIF ID chr.
SELECT-OPTIONS: s_12atm FOR ausp-atwrt
                              MODIF ID chr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pc_13atm AS CHECKBOX
                              MODIF ID chr.
PARAMETERS: pt_13atm LIKE cabn-atnam OBLIGATORY
                              VISIBLE LENGTH 26
                              MODIF ID chr.
SELECT-OPTIONS: s_13atm FOR ausp-atwrt
                              MODIF ID chr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pc_14atm AS CHECKBOX
                              MODIF ID chr.
PARAMETERS: pt_14atm LIKE cabn-atnam OBLIGATORY
                              VISIBLE LENGTH 26
                              MODIF ID chr.
SELECT-OPTIONS: s_14atm FOR ausp-atwrt
                              MODIF ID chr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pc_15atm AS CHECKBOX
                              MODIF ID chr.
PARAMETERS: pt_15atm LIKE cabn-atnam OBLIGATORY
                              VISIBLE LENGTH 26
                              MODIF ID chr.
SELECT-OPTIONS: s_15atm FOR ausp-atwrt
                              MODIF ID chr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pc_16atm AS CHECKBOX
                              MODIF ID chr.
PARAMETERS: pt_16atm LIKE cabn-atnam OBLIGATORY
                              VISIBLE LENGTH 26
                              MODIF ID chr.
SELECT-OPTIONS: s_16atm FOR ausp-atwrt
                              MODIF ID chr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pc_17atm AS CHECKBOX
                              MODIF ID chr.
PARAMETERS: pt_17atm LIKE cabn-atnam OBLIGATORY
                              VISIBLE LENGTH 26
                              MODIF ID chr.
SELECT-OPTIONS: s_17atm FOR ausp-atwrt
                              MODIF ID chr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pc_18atm AS CHECKBOX
                              MODIF ID chr.
PARAMETERS: pt_18atm LIKE cabn-atnam OBLIGATORY
                              VISIBLE LENGTH 26
                              MODIF ID chr.
SELECT-OPTIONS: s_18atm FOR ausp-atwrt
                              MODIF ID chr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pc_19atm AS CHECKBOX
                              MODIF ID chr.
PARAMETERS: pt_19atm LIKE cabn-atnam OBLIGATORY
                              VISIBLE LENGTH 26
                              MODIF ID chr.
SELECT-OPTIONS: s_19atm FOR ausp-atwrt
                              MODIF ID chr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pc_20atm AS CHECKBOX
                              MODIF ID chr.
PARAMETERS: pt_20atm LIKE cabn-atnam OBLIGATORY
                              VISIBLE LENGTH 26
                              MODIF ID chr.
SELECT-OPTIONS: s_20atm FOR ausp-atwrt
                              MODIF ID chr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pc_21atm AS CHECKBOX
                              MODIF ID chr.
PARAMETERS: pt_21atm LIKE cabn-atnam OBLIGATORY
                              VISIBLE LENGTH 26
                              MODIF ID chr.
SELECT-OPTIONS: s_21atm FOR ausp-atwrt
                              MODIF ID chr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pc_22atm AS CHECKBOX
                              MODIF ID chr.
PARAMETERS: pt_22atm LIKE cabn-atnam OBLIGATORY
                              VISIBLE LENGTH 26
                              MODIF ID chr.
SELECT-OPTIONS: s_22atm FOR ausp-atwrt
                              MODIF ID chr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pc_23atm AS CHECKBOX
                              MODIF ID chr.
PARAMETERS: pt_23atm LIKE cabn-atnam OBLIGATORY
                              VISIBLE LENGTH 26
                              MODIF ID chr.
SELECT-OPTIONS: s_23atm FOR ausp-atwrt
                              MODIF ID chr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pc_24atm AS CHECKBOX
                              MODIF ID chr.
PARAMETERS: pt_24atm LIKE cabn-atnam OBLIGATORY
                              VISIBLE LENGTH 26
                              MODIF ID chr.
SELECT-OPTIONS: s_24atm FOR ausp-atwrt
                              MODIF ID chr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pc_25atm AS CHECKBOX
                              MODIF ID chr.
PARAMETERS: pt_25atm LIKE cabn-atnam OBLIGATORY
                              VISIBLE LENGTH 26
                              MODIF ID chr.
SELECT-OPTIONS: s_25atm FOR ausp-atwrt
                              MODIF ID chr.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN END OF BLOCK charact.
SELECTION-SCREEN END OF SCREEN 1300.
Main Selection screen that will incorporate the subscreens
SELECTION-SCREEN BEGIN OF TABBED BLOCK tabs FOR 24 LINES.
SELECTION-SCREEN TAB (20) text-103 USER-COMMAND ucomm1
                                   DEFAULT SCREEN 1100.
SELECTION-SCREEN TAB (20) text-100 USER-COMMAND ucomm2
                                   DEFAULT SCREEN 1200.
SELECTION-SCREEN TAB (30) text-101 USER-COMMAND ucomm3
                                   DEFAULT SCREEN 1300.
SELECTION-SCREEN END OF BLOCK tabs.
SELECTION-SCREEN BEGIN OF BLOCK misc WITH FRAME TITLE text-061.
    ALV Variant
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(31) text-066 FOR FIELD p_alvvar.
PARAMETERS: p_alvvar LIKE disvariant-variant. "alv variant
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN END   OF BLOCK misc.

hi nagendra,
i got ur problem. i put the subscreen in ur main screen.
i was gone through from ur program. there is number of parameters and select-option. and ur subscreen size is small according to your taken fields.
there is two option
1 ) . make your subscreen size full in main screen .
2) . Or you can put all fields in main screen . it does not matter for codding.
rewards if helpfull.

Similar Messages

Urgent: Selection-screen within Form routines

Hi Experts,
Within Form routines can i declare selection-screen statements. If no how should i declare my objects on selection screen within form routines bcoz when i declared with selection screen statements within form routines iam getting the error as "Within FORM routines and function modules, the SELECTION-SCREEN statement is not allowed".
Regards.
AADI.

Hi Aditya,
U cannot use the Selection-screen in Forms and Function Modules.
Try to use it in an include program and call it from ur program.
Reward if Helpful,
Jagadish.

How can i set dynamice for week on Selection screen..pls help me..Urgent

Hi..All
please Help me .. i am very confused..
i need to set a varient for week which is dynamic on selection screen.
b) Week from current week to current week + 2. (Dynamic selection)how can i set dynamice for week on Selection screen,,
how can i do this..i am alrady set dynamice variant for Date.. there is option for D.. but in case of week there is a no option.
pls help me..urgent
thamks in advance.
mayukh

Hi,
I think the way out is use the dynamic select option while setting up the varinat and use sy-datum to sy-datum+9 which should essentially serve the purpose.
While saving the variant, for that particular date field check the Selection variable checkbox, then Choose D
option and then choose current days + or - option from there.
Rgds,
HR

Reading Text File from selection Screen and populating table (Urgent)

Hi All,
I have some requirment like i in my report i have to initial my Input feild from text file is it good to populate a internal table or range.
I have three feild in a excel file that entry can more then 500
data example
Matnr Date Day
A1 10.07.2007 12
B1 10.07.2007 10
A1 19.07.2007 15
C1 20.08.2007 30
E1 11.09.2007 12
This report for Price Protection claim.
even u can help me out with proper table plz this is urgent.

Hi..
parameters:
p_file(50) type c.
data:
begin of itab occurs 0,
 matnr type vbak-matnr,
 date type sy-datum,
 day(2) type n,
end of itab.
at selection-screen on value-request for p_fname.
perform get_path.
start-of-selection.
CALL FUNCTION 'GUI_UPLOAD'
EXPORTING
 FILENAME = p_fname
 FILETYPE = 'ASC'
 HAS_FIELD_SEPARATOR = 'X'
HEADER_LENGTH = 0
READ_BY_LINE = 'X'
DAT_MODE = ' '
CODEPAGE = ' '
IGNORE_CERR = ABAP_TRUE
REPLACEMENT = '#'
CHECK_BOM = ' '
VIRUS_SCAN_PROFILE =
IMPORTING
FILELENGTH =
HEADER =
 TABLES
 DATA_TAB = itab
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.
This Sub routine is used to get the file name
*There are no interface parameters passed to this subroutine.
FORM get_path .
CALL FUNCTION 'WS_FILENAME_GET'
EXPORTING
 DEF_FILENAME = P_FNAME
DEF_PATH = ' '
MASK = ' '
MODE = ' '
TITLE = ' '
IMPORTING
 FILENAME = P_FNAME
RC =
EXCEPTIONS
 INV_WINSYS = 1
 NO_BATCH = 2
 SELECTION_CANCEL = 3
 SELECTION_ERROR = 4
 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.
ENDFORM. " get_path
data:

Help needed in selection screen - Urgent

Hi Experts,
I have a selection screen. I have three radi buttons in that selection screen. Based on the selection of the radio buttons I need to activate corresponding selection screen parameters.
e.g : if radiobutton1 is selected, njo activation needed,
       if radiobutton2 is selected, activate selection screen parameter p_one,
       if radiobutton3 is selected, activate selection screen parameter p_two.
All three radiobuttons are attached to the same radio button group.
I have assigned the parameters p_one, p_two, p_three to MODIF ID as follows.
p_one - NULL
p_two - t01
p_three - t02.
on the selection of a radio button I want the corresponding parameter to get activated.
please help me.
Regards,
Arul jothi A.

hi
jothi
AT SELECTION-SCREEN OUTPUT.
CASE SY-TCODE.
    WHEN 'ZEDI6'.
      LOOP AT SCREEN.
        CASE SCREEN-GROUP4.
          WHEN '001'.                  "Sales order select
            SCREEN-ACTIVE = '1'.       "1=Active, 0=Don't display
            MODIFY SCREEN.
          WHEN '002'.                  "Delivery select
            SCREEN-ACTIVE = '0'.       "1=Active, 0=Don't display
            MODIFY SCREEN.
          WHEN '003'.                  "Invoice select
            SCREEN-ACTIVE = '0'.       "1=Active, 0=Don't display
            MODIFY SCREEN.
          WHEN '004'.                  "PO Select
            SCREEN-ACTIVE = '0'.       "1=Active, 0=Don't display
            MODIFY SCREEN.
regards
praveen

Need help to disable input selection-screen - very urgent

Hi SAP experts,
I have a requirement where in I need to disable ( Grey out ) the input fileds on the selection screen .
My problem is as I am using ABAP query I am not able to use any events ( AT SELECTION-SCREEN OUTPUT ).
My selection screen looks like this
MATERIAL NUMBER ( SELECT-OPTIONS)
MATERIAL TYPE ( PARAMETERS )
Now I want to add one more check box below the above fields on the selection-screen.When I click on the check-box,the MATERIAL NUMBER must be greyed out and MATERIAL TYPE should remain the same.
Please let me know the coding for the same. All answers would be rewarded.
Thanks in Advance,
Suresh.

Hi,
Check out these codes.
1.
TABLES : mara, makt.
parameter: p_matnr type mara-matnr,
           p_maktx type makt-maktx.
at selection-screen output.
select single maktx
from makt
into p_maktx
where matnr = p_matnr
and spras = 'EN'.
loop at screen.
if screen-name = 'P_MAKTX'.
    screen-input = 0.
    modify screen.
endif.
endloop.
2.
TABLES : mara, makt.
TYPES:BEGIN OF tp_maktx,
      maktx TYPE makt-maktx,
      END OF tp_maktx.
DATA:t_maktx TYPE STANDARD TABLE OF tp_maktx,
     wa_maktx TYPE tp_maktx.
SELECT-OPTIONS: s_matnr FOR mara-matnr.
SELECT-OPTIONS: s_maktx FOR makt-maktx.
INITIALIZATION.
REFRESH s_maktx[].
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
    IF screen-name = 'S_MAKTX-LOW' or screen-name = 'S_MAKTX-HIGH'.
      screen-input = 0.
      MODIFY SCREEN.
    ENDIF.
ENDLOOP.
REFRESH s_maktx[].
if s_matnr[] is not initial.
SELECT maktx FROM makt
INTO TABLE t_maktx
WHERE matnr IN s_matnr
AND spras = 'EN'.
endif.
LOOP AT t_maktx INTO wa_maktx.
    s_maktx-low = wa_maktx-maktx.
    APPEND s_maktx.
    CLEAR:wa_maktx.
ENDLOOP.
3.
TABLES : mara, makt.
parameter p_cb1 type c as checkbox.
parameter p_cb2 type c as checkbox.
parameter p_cb3 type c as checkbox.
initialization.
loop at screen.
if screen-name = 'P_CB3'.
screen-invisible = 1.
modify screen.
endif.
endloop.
at selection-screen output.
*loop at screen.
*if screen-name = 'P_CB3'.
*screen-invisible = 1.
*modify screen.
*endif.
*endloop.
loop at screen.
if p_cb1 = 'X'.
if screen-name = 'P_CB2'.
screen-invisible = 1.
modify screen.
endif.
if screen-name = 'P_CB3'.
screen-invisible = 0.
modify screen.
endif.
endif.
if p_cb2 = 'X'.
if screen-name = 'P_CB3'.
screen-invisible = 1.
modify screen.
endif.
if screen-name = 'P_CB1'.
screen-invisible = 0.
modify screen.
endif.
endif.
if p_cb3 = 'X'.
if screen-name = 'P_CB1'.
screen-invisible = 1.
modify screen.
endif.
if screen-name = 'P_CB2'.
screen-invisible = 0.
modify screen.
endif.
endif.
endloop.
Reward if helpful..
Regards.

How to display current day(13-nov-06) in selection screen-its very urgent

hi all,
iam sending code to change the date from mm/dd/yyyy to dd-mon-yy(10-nov-06).my requirement is i have to keep a parameter and when iam executing thid report say p_text1 is a parameter when iam executing this report in selection screen it has to show 12-nov-06 say current date.any body can suggest me how to do and please send me the sample code.
iam sending the code to change the date format as below.
data: begin of itab occurs 0,
SPRAS type SPRAS,
MNR LIKE T247-MNR,
KTX LIKE T247-KTX,
LTX LIKE T247-LTX,
end of itab.
DATA : month LIKE T247-MNR.
DATA: YEAR(4).
DATA: FINAL(18).
DATA: DAY(2).
DAY = sy-datum+6(2).
MONTH = sy-datum+4(2).
YEAR = sy-datum+0(4).
DAY = sy-datum+6(2).
YEAR = sy-datum+0(4).
select SINGLE * from t247 into itab where mnr = month
AND SPRAS = 'E'.
APPEND ITAB.
CONCATENATE DAY ITAB-KTX YEAR+2(2)
INTO FINAL SEPARATED BY '-'.
WRITE: FINAL.
thanks,
maheedhar.T

keep this entire code in INITIALIZATION EVENT.
data: begin of itab occurs 0,
SPRAS type SPRAS,
MNR LIKE T247-MNR,
KTX LIKE T247-KTX,
LTX LIKE T247-LTX,
end of itab.
DATA : month LIKE T247-MNR.
DATA: YEAR(4).
DATA: FINAL(18).
DATA: DAY(2).
parameters: p_date type char15.
initialization.
DAY = sy-datum+6(2).
MONTH = sy-datum+4(2).
YEAR = sy-datum+0(4).
DAY = sy-datum+6(2).
YEAR = sy-datum+0(4).
select SINGLE * from t247 into itab where mnr = month
AND SPRAS = 'E'.
APPEND ITAB.
CONCATENATE DAY ITAB-KTX YEAR+2(2)
INTO P_DATE SEPARATED BY '-'.

Detailed pop up screen in selection screen - urgent

hai experts,
how can we give a detailed pop up screen in selection screen.
My requirement is,
To display Details of spool Nos taken for current porogram to take print out from end user.
from OWN SPOOL REQUEST displays all other programs........
can any one give a right solution?
reward will avail for use full answer.
thanks in advance.
regards,
jai.m

Hi Jai
May be you can use this FM POPUP_WITH_TABLE_DISPLAY_OK with the list of spool number populated into internal table.
If you are particulary looking for selection screen, then decalre your selection screen as below
Selection-screen begin of screen 9000.
Selection-screen end of screen.
Then use the statement Call selection-screen 9000 starting at x y.
Hope this helps !
Regards
Ranganath

Restricting values F4 help in selection screen-Urgent

Hi,
can anyone pls tell how can I ristrict the values for search help in any field in selection screen.
please tell me the way to hide some values in F4 help in selection screen so that user can not see those data for selection.
Regards

i think u can not hide the data.........
create own f4 help............restrict the data and then pass it the f4 internal table....
fro exp;;;;;
types : begin of ty_tab,
 post_code1 like adrc-post_code1,
 end of ty_tab.
data : it_tab type ty_tab occurs 0.
data : lt_field type table of dfies,
 lw_field type dfies.
select post_code1 from adrc into corresponding fields of table it_tab.
call function 'F4IF_INT_TABLE_VALUE_REQUEST'
 exporting
 retfield = 'POST_CODE1'
 dynpprog = sy-repid
 dynpnr = sy-dynnr
 dynprofield = 'LI_LIST1'
 value_org = 'S'
 tables
 value_tab = it_tab
 field_tab = lt_field
 exceptions
 parameter_error = 1
 no_values_found = 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.
Regards
Anbu

Code for selection screen, urgent

Hi Everyone,
I need code for selection screen.
I have four radio buttons, p1, p2,p3,p4(assume)
If I select second radiobutton, remaining three radiobuttons should be in disable mode and also the information under them should be in disable mode. Give the coding details. Thanks in advance. U will be rewarded.
Regards,
Nagaraju

Hi,
REPORT ZTEST222 .
PARAMETERS : p_add RADIOBUTTON GROUP radi
                         USER-COMMAND radio MODIF ID MOD,
p_disp RADIOBUTTON GROUP radi DEFAULT 'X' MODIF ID pod,
p_chng RADIOBUTTON GROUP radi MODIF ID rad,
p_er_log RADIOBUTTON GROUP radi MODIF ID cod.
SELECT-OPTIONS : s_idn    FOR vendor   MODIF ID mod,
                               s_pcode FOR ws_c_pcode MODIF ID pod.
PARAMETERS: p_plant    LIKE zaw_pol_plan-plant   MODIF ID rad,
             p_zzvend   LIKE zaw_pol_plan-zzvendor   MODIF ID cod.
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
IF p_add EQ 'X'.
      IF screen-group1 EQ 'MOD'.
        screen-active = 1.
        MODIFY SCREEN.
ELSE.
         screen-active = 0.
        MODIFY SCREEN.
ENDIF.
IF p_disp EQ 'X'.
      IF screen-group1 EQ 'POD'.
        screen-active = 1.
        MODIFY SCREEN.
ELSE.
         screen-active = 0.
        MODIFY SCREEN.
ENDIF.
IF p_chng EQ 'X'.
      IF screen-group1 EQ 'RAD'.
        screen-active = 1.
        MODIFY SCREEN.
ELSE.
         screen-active = 0.
        MODIFY SCREEN.
ENDIF.
IF p_er_log EQ 'X'.
      IF screen-group1 EQ 'COD'.
        screen-active = 1.
        MODIFY SCREEN.
ELSE.
         screen-active = 0.
        MODIFY SCREEN.
ENDIF.
Pls. reward if useful
    ENDLOOP.
Pls. reward if useful

Infoset query ('At Selection-Screen') - Urgent

Hi All,
The below code for selection criteria 'At Selection-Screen' for an infoset-query works ok, but i find 2 problems, can someone help.
1. When user presses F4, i wanted the output to display
   SG Singapore
   IN   India
   But at the moment it just displays
   SG
   IN
2. If the user enters any other value apart from the above 2 i do not want the query to execute, instead show something like enter a valid value. But at the moment if i enter another country code manually just to test eg: US, the query runs with this selection which i do not want.
Hope my problem is clear, await inputs.
Code:
AT SELECTION-SCREEN ON VALUE-REQUEST FOR VEN_CTY-LOW.
        IT_LAND-VEN_CTY = 'SG'.
        IT_LAND-LTEXT   = 'Singapore'.
          APPEND IT_LAND.
        IT_LAND-VEN_CTY = 'IN'.
        IT_LAND-LTEXT   = 'India'.
          APPEND IT_LAND.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
      RETFIELD   = 'VEN_CTY'
      VALUE_ORG = 'S'
    TABLES
      VALUE_TAB = IT_LAND
      RETURN_TAB = IT_RETURN
    EXCEPTIONS
      PARAMETER_ERROR = 1
      NO_VALUES_FOUND = 2.
IF SY-SUBRC = 0.
    READ TABLE IT_LAND INDEX 1.
    MOVE IT_RETURN-FIELDVAL TO VEN_CTY-LOW.
ENDIF.

Hi vivek,
for the 2nd problem,
create a range for ingapor and india say r_range.
and
r_range will have two values say india, singapore.
loop at VEN_CTY.
if ven_cty not in r_range.
display error message.
exit.
endloop.
try this and let me know.
reward if helpful.
thanks .
ranya

Urgent: Custom Text in Variable Selection Screen

Hi Experts,
I know that it is not recommended by SAP to customise the variable screen, I am sorry but that is ridiculous coz there are no alternatives provided for even simple editing. I''ve searched every where in SDN to find a way to simply add a custom text element in this bizarre screen.
I need to do that because I have to group variables that look similar in a container and add some instructions to users on how to base their selections.
I am also not sure what exactly the web item whcih is behind this selection screen or perhaps if it is another web template that is being invoked by the standard template ""0analysis_pattern"" and if any what is that web item invoking it.
If you have any clues of how i can achieve this please adivce as soon as you possibly can.
Points will be assigned.
Cheers,
Jad
Edited by: Jad on Apr 30, 2008 8:27 AM

Hello,
To customize your variable screen you should neeed developer access key..you can see whether you have got or not in table Devaccess..
Personalisation of variables is for saving all inputs for future use. ( In your case save without any pre determined values )
Below PDF link will surely answer your doubts.
http://www.ies.state.pa.us/imaginepa/lib/imaginepa/mso2.pdf
The personalization option can be activated in the system (using the program RS_PERS_ACTIVATE or the IMG guide (BW Customizing Implementation Guide -> Business Information Warehouse -> Reporting-Relevant Settings -> General Reporting Settings -> Activate personalization in the BEx).
You can manage your personalization variable through BEX Analyzer "Change Variable Values" menu option "Business Explorer --> change query --> change variable values.
[variables|http://help.sap.com/saphelp_nw04s/helpdata/en/f1/0a56a7e09411d2acb90000e829fbfe/frameset.htm]
Go through this link for making cange in Variable selection screen..
Re: No Text displayed in the Input help in WEB
For creating the Web Template..
Go the web application designer, create a new web template in the template
in the left hand side you will find web items , from there drag and drop table , navigation block for your navigation attributes and in the table you have to assign the data provider
for that first you have to do
<object>
<param name="OWNER" value="SAP_BW"/>
<param name="CMD" value="SET_DATA_PROVIDER"/>
<param name="NAME" value="DATAPROVIDER_1"/>
<param name="QUERY" value="your query name"/>
<param name="INFOCUBE" value="your cube or multiprovider name "/>
DATA_PROVIDER: DATAPROVIDER_1
</object>
now you can asssign the data provider 1 to the table.
you can all the neccessary things you want , like check box, radio button group, charts etc.
while saving this save it in a role.
If you want to do this for a workbook, which has been created in the BEx Analyzer, do the following:
After embedding the query in the workbook, right click -> choose 'properties' in the context menu -> click the 'interaction' tab -> check the 'save and reuse variable values' option.
After doing this, once the workbook or query is refreshed, the already entered variable values are taken.
Also see
http://help.sap.com/saphelp_nw04/helpdata/en/f1/0a5529e09411d2acb90000e829fbfe/frameset.htm
Hope it helps you,Revert me back if you have any queries
Assign points if helpful
Regards
Bala
http://help.sap.com/saphelp_nw04/helpdata/en/00/e8d13f7fb44c21e10000000a1550b0/frameset.htm

Selection-screen .... How to lock the whole block ??? urgent

i have created a selection with two blocks.
selection-screen begin of block d2 with frame title text-005 .
parameters r_create radiobutton group g3 USER-COMMAND u1.
parameters r_add radiobutton group g3.
selection-screen end of block d2.
selection-screen skip 1.
selection-screen begin of block b3 with frame title text-009.
parameters: pvenmap as checkbox default 'X'.
parameters: psermap no-display. "as checkbox default 'X' .
parameters: pmatlmap as checkbox. "default 'X'.
selection-screen end of block b3.
selection-screen begin of block b2 with frame title text-005 .
parameters r_valid no-display." radiobutton group g2 .
parameters r_master radiobutton group g2.
parameters p_sercat like asmd-astyp default 'SERV' no-display.
parameters p_serv radiobutton group sm1 default 'X'.
parameters p_genc radiobutton group sm1.
parameters p_act radiobutton group sm1.
parameters r_agrmt radiobutton group g2.
parameters p_extnum like ekko-ebeln no-display.
selection-screen end of block b2.
Now i want that when radio button r_create is 'X' then block 'B2' should be locked/disabled and when r_add is 'X' then block 'B3' should be locked/disabled.
One method is :-
AT SELECTION-SCREEN ON RADIOBUTTON GROUP g3.
v_ucomm = sscrfields-ucomm .
IF r_create EQ c_x .
      LOOP AT SCREEN.
      IF screen-name = ........
        screen-input = c_0.
        MODIFY SCREEN.
      ENDIF.
      ENDLOOP.
ENDIF.
but is there any other method such that i can disable/lock the whole block, instead of locking each field ???
regards
Rahul

Hi Rahul,
Please check the code below:
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
PARAMETERS: p_file TYPE rlgrap-filename MODIF ID abc, " OBLIGATORY,
            p_lifnr TYPE lfa1-lifnr      MODIF ID abc,
            p_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: p_kunnr TYPE vbak-kunnr MODIF ID def.
SELECT-OPTIONS: s_lifnr FOR lfa1-lifnr MODIF ID def,
                s_date FOR lfa1-erdat MODIF ID def,
                s_augru FOR vbak-augru MODIF ID def,
                s_vbeln FOR 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: upload RADIOBUTTON GROUP g1 USER-COMMAND uc01.
SELECTION-SCREEN COMMENT 3(60) text-025 FOR FIELD upload.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: reprss RADIOBUTTON GROUP g1 .                   "#EC *
SELECTION-SCREEN COMMENT 3(60) text-026 FOR FIELD reprss.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK b3.
AT SELECTION-SCREEN OUTPUT.
IF reprss EQ 'X'.
    LOOP AT SCREEN.
      IF screen-group1 = 'ABC'.
        screen-input = '0'.
      ELSEIF screen-group1 = 'DEF'.
        screen-active = '1'.
      ENDIF.
      MODIFY SCREEN.
    ENDLOOP.
ELSEIF upload EQ 'X'.
    LOOP AT SCREEN.
      IF screen-group1 = 'DEF'.
        screen-input = '0'.
      ELSEIF screen-group1 = 'ABC'.
        screen-active = '1'.
      ENDIF.
      MODIFY SCREEN.
      CLEAR upload.
    ENDLOOP.
Regards
kannaiah
please reward useful points

Hi its urgent...help on selection screen parameters

Hi all,
I need help on selection screen parameters.
requirement is that,
i am having input fields for material, plant ,start date and end date and a check box and an input field for getting the txt file.
when i select the checkbox, it should ignore the mandatory fileds in the selection screen.
and when i get the file input, it should take the input data material, plant, start date and end date from the flat file and populate the corresponding input fields in selection screen.
How to do this..
thanks in advance.

Hi ..
While declare the Matnr, Plant etc dont use the OBLIGATORY addition.
instead of the based on the value of check box validate them .
AT SELECTION-SCREEN.
IF c_box = ' '.
<< validate for mandatory fields>>
endif.
REWARD IF HELPFUL.

Selection Screen problem Urgent ...

Please find below ; It doesn't care of selection screen .For example I want to take all material mtart is 'abc' . How can I build that .For example there is one record instead of mtart (abc ) but when I enter bcd it also get something.
SELECT * FROM mbew
 WHERE matnr in s_matnr
 AND bwkey IN s_bwkey.
 ytab-matnr = mbew-matnr .
 ytab-kaln1 = mbew-kaln1 .
 SELECT SINGLE * FROM makt
 WHERE matnr = ytab-matnr.
 ytab-maktx = makt-maktx .
 SELECT SINGLE * FROM mara
 WHERE matnr = ytab-matnr
 AND matkl IN s_matkl
 AND mtart IN s_mtart.
 ytab-matkl = mara-matkl .
 ytab-mtart = mara-mtart .
 SELECT SINGLE * FROM mvke
 WHERE matnr = ytab-matnr
 AND kondm IN s_kondm .
 ytab-kondm = mvke-kondm .
 SELECT SINGLE * FROM ckmlcr
 WHERE kalnr = ytab-kaln1
 AND bdatj EQ s_bdatj
 AND curtp EQ s_curtp.
 ytab-kalnr = ckmlcr-kalnr .
 ytab-bdatj = ckmlcr-bdatj .
 ytab-curtp = ckmlcr-curtp .
 SELECT SINGLE * FROM vbrp
 WHERE matnr = ytab-matnr.
 ytab-vbeln = vbrp-vbeln .
 ytab-fbuda = vbrp-fbuda .
 ytab-posnr = vbrp-posnr .
 ytab-fkimg = vbrp-fkimg .
 ytab-netwr = vbrp-netwr .
APPEND ytab.
 CLEAR ytab.
ENDSELECT.
Message was edited by:
 yusuf tunay çilesiz

Hi,
The code looks good..Explain your problem clearly..
What ever you give in the selection screen is not getting filtered..??
AFter this select check for sy-subrc..
SELECT SINGLE * FROM mara
WHERE matnr = ytab-matnr
AND matkl IN s_matkl
AND mtart IN s_mtart.
IF SY-SUBRC <> 0.
if you want to skip the record if there is no material found for the corresponding
material, matkl and mtart...use CONTINUE..Which will process the next record in the MBEW select..
CONTINUE.
ENDIF.
Thanks,
Naren

Urgent : selection screen

Similar Messages

Maybe you are looking for