SELECTION SCREEN INPUTS FROZEN

Hi Guru's
I have prepared a web dynpro java application using standard bapi. I have used 'tray' under which selection fields and output table is created. However, after deployment selection screen input area becomes read only that is it freezes. Please help me asap.

Hi,
You might be trying to display your output in the table.
1. Check that you have binded proper values to the table datasource.
2. Check the size of the node binded to the table.
You can write this line to know the size of the output node returned after executing the RFC.
wdComponentAPI.getMessageManager().reportSuccess(wdContext.node<nodename>().size()+"");
If the size is 0 that means that your BAPI is not returning anything.
Regards,
Murtuza

Similar Messages

How i can show the selection screen input field in the top of page in alv

hi ,
          how i can show the selection screen input field in the top of page in alv grid output.
tell me the process

Hi,
excample from my program:
FORM topof_page.
DATA: l_it_header   TYPE TABLE OF slis_listheader WITH HEADER LINE,
        l_info        LIKE l_it_header-info.
DATA: l_it_textpool TYPE TABLE OF textpool WITH HEADER LINE.
DATA: l_key LIKE l_it_textpool-key.
READ TEXTPOOL c_repid INTO l_it_textpool LANGUAGE sy-langu.
DEFINE m_selinfo.
    if not &1 is initial.
      clear l_it_header.
      l_it_header-typ   = 'S'.
      l_key = '&1'.
      translate l_key to upper case.
      read table l_it_textpool with key key = l_key.
      if sy-subrc = 0.
        shift l_it_textpool-entry left deleting leading space.
        l_it_header-key = l_it_textpool-entry .
      endif.
      loop at &1.
        case &1-option.
          when 'EQ'
            or 'BT'
            or 'CP'.
            write &1-low to l_it_header-info.
          when others.
            write &1-low to l_it_header-info.
            concatenate &1-option
                        l_it_header-info
                   into l_it_header-info
                   separated by space.
        endcase.
        if not &1-high is initial.
          write &1-high to l_info left-justified.
          concatenate l_it_header-info
                      l_info
                 into l_it_header-info
                 separated by space.
        endif.
        if &1-sign = 'E'.
          concatenate ']'
                      l_it_header-info
                 into l_it_header-info.
        endif.
        append l_it_header.
        clear: l_it_header-key,
               l_it_header-info.
      endloop.
    endif.
END-OF-DEFINITION.
m_selinfo: s_trmdat,
             s_trmext,
             s_trmint,
             s_fkdat,
             s_delno,
             s_vbeln,
             s_deact,
             s_kdmat.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
       EXPORTING
            it_list_commentary = l_it_header[].
ENDFORM.
I hope, this will help you.
Regards
Nicole

To display the user login details in selection-screen( input screen )

HI Experts,
I have a requirement.
Assume there is a report on travel details. Report access has been given to all in the organization based on authorization level.
Before excecuting the report, in the selection-screen(input screen) itself I need to display the login user details.
suppose user A belongs to ITS-business unit and user B-belongs to RDS-business unit and Industry group-Multi markets.
so when User B logs into production system and try to access the report, in the selection screen, i need to display like
user-id-- XXXX Business Unit---RDS and IG -
Multi Markets
how to achieve this? User details will vary based on login.
Regards,
Praveen

check this
REPORT Z_demo.
*& Function Modules: HR_GET_EMPLOYEE_DATA
*& HR_IMAGE_EXISTS
*& SCMS_DOC_URL_READ
*& HR_IMAGE_RESET
*& Class & Methods : CL_GUI_DOCKING_CONTAINER
*& CL_GUI_PICTURE->SET_POSITION
*& CL_GUI_PICTURE->SET_DISPLAY_MODE
*& CL_GUI_PICTURE->DISPLAY_MODE_FIT
*& CL_GUI_PICTURE->LOAD_PICTURE_FROM_URL_ASYNC
*REPORT ZEMPLOYEE.
TABLES: PA0001, PERSON.
*----------------------Declaration for Image------------------------*
DATA: DOCKING_CONT TYPE REF TO CL_GUI_DOCKING_CONTAINER, " Custom Container
 PICTURE TYPE REF TO CL_GUI_PICTURE.
*--------------------Declaration of Internal table------------------*
DATA: ITAB_EMPDATA LIKE TABLE OF PERSON.
DATA: ITAB_DATA LIKE TABLE OF PERSON WITH HEADER LINE.
DATA: P_CONNECT_INFO LIKE TABLE OF TOAV0 WITH HEADER LINE.
DATA: P_DOCUMENT_TYPE LIKE TOAV0-RESERVE.
DATA: URL(255) TYPE C.
DATA: HANDLE TYPE I.
DATA: PPERNR TYPE PA0001-PERNR.
*----------------------Start of Selection Screen----------------------*
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE text-099.
SELECTION-SCREEN SKIP 2.
SELECTION-SCREEN COMMENT 40(25) TEXT-010 .
SELECTION-SCREEN SKIP 1.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 20(15) TEXT-002 FOR FIELD PERNR.
PARAMETERS PERNR TYPE PA0001-PERNR.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 20(15) TEXT-008 FOR FIELD ENAME.
PARAMETERS ENAME TYPE PA0001-ENAME.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 20(15) TEXT-003 FOR FIELD PERSG.
PARAMETERS PERSG TYPE PA0001-PERSG.
SELECTION-SCREEN COMMENT 45(15) TEXT-009 FOR FIELD WERKS.
PARAMETERS WERKS TYPE PA0001-WERKS.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 20(15) TEXT-004 FOR FIELD PERSK.
PARAMETERS PERSK TYPE PA0001-PERSK.
SELECTION-SCREEN COMMENT 45(15) TEXT-005 FOR FIELD KOSTL.
PARAMETERS KOSTL TYPE PA0001-KOSTL.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 20(15) TEXT-006 FOR FIELD ORGEH.
PARAMETERS ORGEH TYPE PA0001-ORGEH.
PARAMETERS ORGEHTXT TYPE PERSON-ORGEH_TXT .
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 20(15) TEXT-007 FOR FIELD PLANS.
PARAMETERS PLANS TYPE PA0001-PLANS.
PARAMETERS PLANSTXT TYPE PERSON-PLANS_TXT .
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN SKIP 2.
SELECTION-SCREEN END OF BLOCK B1.
*AT SELECTION-SCREEN OUTPUT.
AT SELECTION-SCREEN OUTPUT .
LOOP AT SCREEN.
 IF SCREEN-NAME = 'ENAME'
 OR SCREEN-NAME = 'PERSG'
 OR SCREEN-NAME = 'PERSK'
 OR SCREEN-NAME = 'KOSTL'
 OR SCREEN-NAME = 'WERKS'
 OR SCREEN-NAME = 'ORGEH'
 OR SCREEN-NAME = 'PLANS'
 OR SCREEN-NAME = 'ORGEHTXT'
 OR SCREEN-NAME = 'PLANSTXT'.
 SCREEN-INPUT = '0'.
 MODIFY SCREEN.
 ENDIF.
ENDLOOP.
LOOP AT SCREEN.
 IF SCREEN-NAME = 'ORGEHTXT'
 OR SCREEN-NAME = 'PLANSTXT'.
 SCREEN-OUTPUT = '1'.
 MODIFY SCREEN.
 ENDIF.
ENDLOOP.
PERFORM GET_PIC.
*AT SELECTION-SCREEN .
AT SELECTION-SCREEN .
PPERNR = PERNR.
CALL FUNCTION 'HR_GET_EMPLOYEE_DATA'
 EXPORTING
 PERSON_ID = PPERNR
 SELECTION_BEGIN = SY-DATUM
 SELECTION_END = SY-DATUM
 IMPORTING
 PERSONAL_DATA = ITAB_DATA
 EXCEPTIONS
 PERSON_NOT_FOUND = 1
 NO_ACTIVE_INTEGRATION = 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.
ENAME = ITAB_DATA-ENAME.
PERSG = ITAB_DATA-PERSG.
PERSK = ITAB_DATA-PERSK.
ORGEH = ITAB_DATA-ORGEH.
PLANS = ITAB_DATA-PLANS.
KOSTL = ITAB_DATA-KOSTL.
WERKS = ITAB_DATA-WERKS.
ORGEHTXT = ITAB_DATA-ORGEH_TXT.
PLANSTXT = ITAB_DATA-PLANS_TXT.
*Function Module To check Existance of Image
CALL FUNCTION 'HR_IMAGE_EXISTS'
 EXPORTING
 P_PERNR = PPERNR
 IMPORTING
 P_CONNECT_INFO = P_CONNECT_INFO
 EXCEPTIONS
 OTHERS = 2.
 P_DOCUMENT_TYPE = P_CONNECT_INFO-RESERVE.
*Function Module To Get the URL of Image
CALL FUNCTION 'SCMS_DOC_URL_READ'
 EXPORTING
 STOR_CAT = SPACE
 CREP_ID = P_CONNECT_INFO-ARCHIV_ID
 DOC_ID = P_CONNECT_INFO-ARC_DOC_ID
 COMP_ID = 'DATA'
 DP_URL_ONLY = 'X'
 IMPORTING
 URL = URL
 EXCEPTIONS
 OTHERS = 10.
IF SY-SUBRC <> 0.
ENDIF.
*Method To load Image from URL
CALL METHOD PICTURE->LOAD_PICTURE_FROM_URL_ASYNC
 EXPORTING
 URL = URL.
IF SY-SUBRC NE 0.
ENDIF.
IF PPERNR NE PERNR.
*Function Module To Reset Image
 CALL FUNCTION 'HR_IMAGE_RESET'
 EXPORTING
 HANDLE = HANDLE
 EXCEPTIONS
 INVALID_HANDLE = 1
 OTHERS = 2.
 IF SY-SUBRC <> 0.
 ENDIF.
ENDIF.
*& Form Get_Pic
FORM GET_PIC.
DATA: REPID LIKE SY-REPID.
REPID = SY-REPID.
IF PICTURE IS INITIAL.
*Object To Create the Custom Container
 CREATE OBJECT PICTURE
 EXPORTING
 PARENT = DOCKING_CONT.
 CHECK SY-SUBRC = 0.
*Method To Set Position of Image
 CALL METHOD PICTURE->SET_POSITION
 EXPORTING
 HEIGHT = 47
 LEFT = 610
 TOP = 25
 WIDTH = 70.
*Method To Set Display Mode Fit to Container
 CALL METHOD PICTURE->SET_DISPLAY_MODE
 EXPORTING
 DISPLAY_MODE = CL_GUI_PICTURE=>DISPLAY_MODE_FIT.
ELSE.
*Function Module To Reset Image
 CALL FUNCTION 'HR_IMAGE_RESET'
 EXPORTING
 HANDLE = HANDLE
 EXCEPTIONS
 INVALID_HANDLE = 1
 OTHERS = 2.
 IF SY-SUBRC <> 0.
 ENDIF.
ENDIF.
ENDFORM. "Get_pic

How to use dynamic selection screen inputs in main program

hi all,
its a report where in it calls one dynamic selection screen( user need to enter the parameters here) after that i need to use those inputs for some check, can any buddy help how to use/ get that input parameters into main program.
regards,
vara..

Hi,
i think u have created that dynamic selection screen in seperate program and calling to ur main program.instead of that u just create that synamic selection screen program as include program and include it in ur main program.
or u need to use set/get parameter id concept.
rgds,
bharat.

Selection-screen: Input help for VTWEG

Hello!
Can anybody help me with the following problem:
I have two select-options (VKORG and VTWEG) on my selection screen. Now there should be the possibility to restrict the values shown as input help for VTWEG after having selected a value for VKORG.
I've already tried to do this by using a matchcode object but for VKORG and VTWEG I was not able to find suitable search helps.
In my opinion this should be possible without using the "AT SELECTION-SCREEN ON VALUE-REQUEST FOR ...". If not, it would be interesting to getting to know your approaches to this task.
Thank you in advance!

you can refer to the following code
and you can write the code in the same way as per your requirement
*& Report ZRKTEST5 *
REPORT ZRKTEST5 .
DATA: PROGNAME TYPE SY-REPID,
 DYNNUM TYPE SY-DYNNR,
 DYNPRO_VALUES TYPE TABLE OF DYNPREAD,
 FIELD_VALUE LIKE LINE OF DYNPRO_VALUES.
DATA: BEGIN OF T_T001L OCCURS 0,
 WERKS TYPE WERKS_D,
 LGORT TYPE LGORT_D,
 END OF T_T001L.
DATA: V_WERKS TYPE WERKS_D,
 V_LGORT TYPE LGORT_D.
SELECTION-SCREEN BEGIN OF BLOCK B1.
PARAMETERS: P_PLANT LIKE MSEG-WERKS,
 P_STOLOC LIKE MSEG-LGORT.
SELECTION-SCREEN END OF BLOCK B1.
INITIALIZATION.
PROGNAME = SY-REPID.
DYNNUM = SY-DYNNR.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_STOLOC.
CLEAR: FIELD_VALUE, DYNPRO_VALUES. REFRESH DYNPRO_VALUES.
FIELD_VALUE-FIELDNAME = 'P_PLANT'.
APPEND FIELD_VALUE TO DYNPRO_VALUES.
CALL FUNCTION 'DYNP_VALUES_READ'
 EXPORTING
 DYNAME = PROGNAME
 DYNUMB = DYNNUM
 TRANSLATE_TO_UPPER = 'X'
 TABLES
 DYNPFIELDS = DYNPRO_VALUES.
READ TABLE DYNPRO_VALUES INDEX 1 INTO FIELD_VALUE.
SELECT WERKS LGORT INTO TABLE T_T001L FROM T001L WHERE WERKS = FIELD_Value-fieldvalue.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
 EXPORTING
 RETFIELD = 'P_STOLOC'
 DYNPPROG = PROGNAME
 DYNPNR = DYNNUM
 DYNPROFIELD = 'P_STOLOC'
 VALUE_ORG = 'S'
 TABLES
 VALUE_TAB = T_T001L.
START-OF-SELECTION.
WRITE:/ 'TEST F4 PROGRAM'.
END-OF-SELECTION.

reward points if helpfull
Regards
Vikure

Selection-Screen input

Hi all,
i'm working on report.
on selection screen i need to display month field i,e i need to take month from these fields
GSV01,GSV02,GSV03,GSV04,GSV05.....
if 01 means month should be april,
02 means month should be may,...
how to do this...
regards
Suprith

PARAMETERS : p_quan like ---- ,
             P_MONTH LIKE ----- modif id MQ1.
initialization.
loop at screen.
IF SCREEN-GROUP1 = 'MQ1'.
        SCREEN-INTENSIFIED = '1'.
        SCREEN-ACTIVE      = 1.
        SCREEN-DISPLAY_3D = '1'.
        SCREEN-INPUT       = '0'.
        MODIFY SCREEN.
endif.
endloop.
at selection-screen.
at selection-screen output.
loop at screen.
IF SCREEN-GROUP1 = 'MQ1'.
        SCREEN-INTENSIFIED = '1'.
        SCREEN-ACTIVE      = 1.
        SCREEN-DISPLAY_3D = '1'.
        SCREEN-INPUT       = '0'.
        MODIFY SCREEN.
endif.
endloop.
CASE P_QUAN:
     0:
P_MONTH = 'APRIL'.
----------SO ON.
Hope it is helpful.
Rhea.

Field catalog restriction with the selection screen input

Hi,
I am doing ALV grid report.In that I am facing problem,fieldcat has to display according to the input given in the selection screen.
my selection screen value is s_gstrp+4(2) that is month given inthe input.
     PERFORM FIELD_CATALOG TABLES IT_FIELDCAT
       USING: 'IT_COL_PLAF' 'PWWRK' 'X' 'Plant' ' ',
             'IT_COL_PLAF' 'MATNR' ' ' 'Material' ' ',
             'IT_COL_PLAF' 'MAKTX' ' ' 'Material description' ' ',
             'IT_COL_PLAF' 'MEINS' ' ' 'Unit' ' '.
      PERFORM FIELD_CATALOG TABLES IT_FIELDCAT USING:
                 'IT_COL_PLAF' 'GSMNG_01' ' ' 'Jan-Qty' ' '.
      PERFORM FIELD_CATALOG TABLES IT_FIELDCAT USING:
                 'IT_COL_PLAF' 'GSMNG_02' ' ' 'Feb-Qty' ' '.
        PERFORM FIELD_CATALOG TABLES IT_FIELDCAT USING:
                 'IT_COL_PLAF' 'GSMNG_03' ' ' 'Mar-Qty' ' '.
      PERFORM FIELD_CATALOG TABLES IT_FIELDCAT USING:
          'IT_COL_PLAF' 'GSMNG_04' ' ' 'Apr-Qty' ' '.
         PERFORM FIELD_CATALOG TABLES IT_FIELDCAT USING:
          'IT_COL_PLAF' 'GSMNG_05' ' ' 'May-Qty' ' '.
          PERFORM FIELD_CATALOG TABLES IT_FIELDCAT USING:
          'IT_COL_PLAF' 'GSMNG_06' ' ' 'Jun-Qty' ' '.
        PERFORM FIELD_CATALOG TABLES IT_FIELDCAT USING:
          'IT_COL_PLAF' 'GSMNG_07' ' ' 'Jul-Qty' ' '.
        PERFORM FIELD_CATALOG TABLES IT_FIELDCAT USING:
         'IT_COL_PLAF' 'GSMNG_08' ' ' 'Aug-Qty' ' '.
          PERFORM FIELD_CATALOG TABLES IT_FIELDCAT USING:
          'IT_COL_PLAF' 'GSMNG_09' ' ' 'Sep-Qty' ' '.
         PERFORM FIELD_CATALOG TABLES IT_FIELDCAT USING:
         'IT_COL_PLAF' 'GSMNG_10' ' ' 'Oct-Qty' ' '.
         PERFORM FIELD_CATALOG TABLES IT_FIELDCAT USING:
         'IT_COL_PLAF' 'GSMNG_11' ' ' 'Nov-Qty' ' '.
        PERFORM FIELD_CATALOG TABLES IT_FIELDCAT USING:
        'IT_COL_PLAF' 'GSMNG_12' ' ' 'Dec-Qty' ' '.
if month given in select-option : sep to dec ie,1.09.2009 to 31.12.2009.
then my field cat has to display,sep qty,oct,qty,nov qty,dec,qty.
Suggest some ideas.
regards,
Bathri

hi,
Use
if month ge 09 .
PERFORM FIELD_CATALOG TABLES IT_FIELDCAT USING:
          'IT_COL_PLAF' 'GSMNG_09' ' ' 'Sep-Qty' ' '.
endif.
if month ge 10.
         PERFORM FIELD_CATALOG TABLES IT_FIELDCAT USING:
         'IT_COL_PLAF' 'GSMNG_10' ' ' 'Oct-Qty' ' '.
endif.
if month ge 11.
         PERFORM FIELD_CATALOG TABLES IT_FIELDCAT USING:
         'IT_COL_PLAF' 'GSMNG_11' ' ' 'Nov-Qty' ' '.
endif.
if month ge 12.
        PERFORM FIELD_CATALOG TABLES IT_FIELDCAT USING:
        'IT_COL_PLAF' 'GSMNG_12' ' ' 'Dec-Qty' ' '.
endif.
if month given in select-option : sep to dec ie,1.09.2009 to 31.12.2009.
then my field cat has to display,sep qty,oct,qty,nov qty,dec,qty.
If if you give month in selection screen you will get relevant month details .
Regards
Nandan.N

BEx Report Performance with selection-screen input

Hello Gurus,
My Bex report is working fine when the report had run with out PLANT filter in the selection-screen but when report had run with plant in the selection-screen , report running for forever.
Please let me know what I need to do improve the performance.
Saleem.

Hi Saleem, Just a few thoughts;
1. Check the M-table in RSD1 for 0PLANT. In Table View edit any blank or null values. Run the same restrictions you apply in the query at Info provider level > Display Data. If there's any lapse; you can judge where exactly the problem lies.
2. If you are using Infocube & that your master is >20% fact; you can declare the Info object as 'Line Item Dimension'.
3. Create Variants. Esp. if you are running the query for same set of data. Try Variable Preselection: You can restrict both the values + varaiables in the filter level. When you execute the values will be visibly pre-selected in selection screen.
4. As discussed in previous messages, running a SQL trace using RSRT may prove useful.

Splitting the date based on the selection screen input

Hi all,
In the Selection screen of my report i had maintained two fields
SELECT-OPTIONS : S_DATE    FOR TPCDATE-FROM_DATE.
PARAMETERS      : P_NUMBER TYPE ZMMAREA-NUMBER.
I need to code such that
S_DATE should be splitted into P_NUMBER times
for example if P_NUMBER is 4 i need S_DATE should be splitted into 4 equal parts or near by equal parts
                    IF P_NUMBER is 2 i need S_DATE should be splitted into 2 equal parts or near by equal parts
Please suggest me the code of if any Function module exists fot this date splitting
Thanks in advance
Ajay.D

though date question are not allowed, this requirement sounds little different.
you can take a difference between those days by: S_date-high - S_date-low.
then divide the difference by p_number. now you get the split positions.
now in a do enddo you can negate the dates by the split amount you got from the divisions.
like...
PARAMETERS: num type i.
select-OPTIONS: s_date for sy-datum.
data : gv_split type i, gv_temp type sy-datum.
gv_split = s_date-high - s_date-low.
gv_split = gv_split / num.
gv_temp = s_date-high.
do num times.
gv_temp = gv_temp - gv_split.
WRITE / gv_temp.
enddo.

Problem with selection screen input

my problem is when i enter l2_gr or l1_vbeln or l2_vbeln, in the selection screen, the output should come according to that.I am not getting the correct result.
form summ_report.
data: l2gr like ekbe-belnr.
 select fs_plant fv_plant f~r_plant
 fl1_sto pl1_delivery p~l1_gr
 pl2_sto pl2_delivery p~bsl_err_message
 kebeln pl1_pgi p~l2_pgi
 into (dochdr-swerks, dochdr-vwerks, dochdr-rwerks,
 dochdr-l1sto, docitem-l1xblnr, docitem-l1gr,
 docitem-l2sto, docitem-l2xblnr, docitem-err_msg,
 tabekko-ebeln, docitem-l1pgi, docitem-l2pgi)
 from zdochdr as f inner join zdocitem as p
 on fl1_sto = pl1_sto inner join
 ekko as k on pl1_sto = kebeln
 where f~s_plant in s_werks and
 f~v_plant in v_werks and
 f~r_plant in r_werks and
 f~l1_sto in l1_sto and
 p~l1_delivery in l1_xblnr and
 p~l1_gr in l1_gr and
 p~l2_sto in l2_sto and
 p~l2_delivery in l2_xblnr and
 k~aedat in s_aedat.
move : dochdr-swerks to final_data-i_swerks,
 dochdr-vwerks to final_data-i_vwerks,
 dochdr-rwerks to final_data-i_rwerks,
 dochdr-l1sto to final_data-i_l1sto,
 docitem-l1xblnr to final_data-i_l1xblnr,
 docitem-l1gr to final_data-i_l1gr,
 docitem-l2sto to final_data-i_l2sto,
 docitem-l2xblnr to final_data-i_l2xblnr,
 docitem-l2pgi to final_data-i_l2pgi,
 docitem-l1pgi to final_data-i_l1pgi,
 docitem-err_msg to final_data-i_errmsg.
 append final_data.
 endselect.
L2 Goods receipt
loop at final_data.
select single belnr from ekbe into l2gr
 where ebeln = final_data-i_l2sto and
 belnr in l2_gr and
 bwart = '101' and
 bewtp = 'E' and
 vgabe = '1'.
if sy-subrc eq 0.
 move l2gr to final_data-i_l2gr.
endif.
leg1 Billing document
select vbeln from vbfa into (tabvbfa-vbeln)
where vbeln in l1_vbeln and vbelv in (final_data-i_l2xblnr,final_data-i_l1xblnr).
select single vbeln from vbrk into tabvbrk-vbeln
 where vbeln = tabvbfa-vbeln and fkart = 'IV'.
if sy-subrc eq 0.
 move tabvbrk-vbeln to final_data-i_l1vbeln.
endif.
 endselect.
leg2 Billing document
select vbeln from vbfa into (tabvbfa-vbeln1)
 where vbeln in l2_vbeln and
 vbelv in (final_data-i_l2xblnr,
 final_data-i_l1xblnr).
select single vbeln from vbrk into tabvbrk-vbeln1 where
 vbeln = tabvbfa-vbeln1 and fkart = 'ZTYS'.
 if sy-subrc eq 0.
 move tabvbrk-vbeln1 to final_data-i_l2vbeln.
 endif.
 endselect.
if not l2_gr is initial or
 not l1_vbeln is initial or
 not l2_vbeln is initial. modify final_data.
else.
 delete final_data.
endif.
endloop.
endform.
please help....
Thanks,
fractal.

I think the code in bold is what you are trying to do.
form summ_report.
data: l2gr like ekbe-belnr.
select f~s_plant f~v_plant f~r_plant
 f~l1_sto p~l1_delivery p~l1_gr
 p~l2_sto p~l2_delivery p~bsl_err_message
 k~ebeln p~l1_pgi p~l2_pgi
 into (dochdr-swerks, dochdr-vwerks, dochdr-rwerks,
 dochdr-l1sto, docitem-l1xblnr, docitem-l1gr,
 docitem-l2sto, docitem-l2xblnr, docitem-err_msg,
 tabekko-ebeln, docitem-l1pgi, ocitem-l2pgi)
 from zdochdr as f inner join zdocitem as p
 on f~l1_sto = p~l1_sto inner join ekko as k
 on p~l1_sto = k~ebeln
 where f~s_plant in s_werks
 and f~v_plant in v_werks
 and f~r_plant in r_werks
 and f~l1_sto in l1_sto
 and p~l1_delivery in l1_xblnr
 and p~l1_gr in l1_gr
 and p~l2_sto in l2_sto
 and p~l2_delivery in l2_xblnr
 and k~aedat in s_aedat.
 move: dochdr-swerks to final_data-i_swerks,
 dochdr-vwerks to final_data-i_vwerks,
 dochdr-rwerks to final_data-i_rwerks,
 dochdr-l1sto to final_data-i_l1sto,
 docitem-l1xblnr to final_data-i_l1xblnr,
 docitem-l1gr to final_data-i_l1gr,
 docitem-l2sto to final_data-i_l2sto,
 docitem-l2xblnr to final_data-i_l2xblnr,
 docitem-l2pgi to final_data-i_l2pgi,
 docitem-l1pgi to final_data-i_l1pgi,
 docitem-err_msg to final_data-i_errmsg.
 append final_data.
endselect.
* L2 Goods receipt
loop at final_data.
 select single belnr from ekbe
 into l2gr
 where ebeln = final_data-i_l2sto
 and belnr in l2_gr
 and bwart = '101'
 and bewtp = 'E'
 and vgabe = '1'.
 if sy-subrc eq 0.
 move l2gr to final_data-i_l2gr.
 endif.
* leg1 Billing document
 select vbeln from vbfa
 into tabvbfa-vbeln
 where vbeln in l1_vbeln
 and vbelv in (final_data-i_l2xblnr,final_data-i_l1xblnr).
 select single vbeln from vbrk
 into tabvbrk-vbeln
 where vbeln = tabvbfa-vbeln
 and fkart = 'IV'.
 if sy-subrc eq 0.
 move tabvbrk-vbeln to final_data-i_l1vbeln.
 endif.
 endselect.
* leg2 Billing document
 select vbeln from vbfa
 into tabvbfa-vbeln1
 where vbeln in l2_vbeln
 and vbelv in (final_data-i_l2xblnr, final_data-i_l1xblnr).
 select single vbeln from vbrk
 into tabvbrk-vbeln1
 where vbeln = tabvbfa-vbeln1
 and fkart = 'ZTYS'.
 if sy-subrc eq 0.
 move tabvbrk-vbeln1 to final_data-i_l2vbeln.
 endif.
 endselect.
 if not final_data-i_l2gr is initial or
 not final_data-i_l1vbeln is initial or
 not final_data-i_l2vbeln is initial.
 modify final_data.
 else.
 delete final_data.
 endif.
endloop.
endform.

Printer option in selection screen (Input Parameter)

Hi All,
I want to give printer option in selection screen.
Please do needful help.
Regards.

Hi,
in the PF-STATUS if u enable the Printer Icon on Application Tool Bar and in the PAI Event in the
User Command Module get the FCODE and apply the following FM ALINK_PRINT_FRONTEND
Hope this works ....
Best of luck!!
Thanks
Ravi

Help reqd for Selection Screen Input paramter

Hi Friends,
I've developed a noraml ALV grid report which have Date selection option as input selection parameter. In that , I want to declare last month date as defualt value to date-low range. Whenever the Tcode is entered, it should show the date ranges with my default values as date-low is last month date and date-high is current system date (this one I've given as sy-datlo).
Please help me how to declare last month date to my low range field.
thanks & regards
sankar.

Hi Suhas,
i think so there is no need to specify the sign and options.
SELECT-OPTIONS:so_dat for sy-datum.
INITIALIZATION.
so_dat-low = sy-datum.
so_dat-high = sy-datum.
append so_dat.
START-OF-SELECTION.
BREAK-POINT.
it assigns BT by default.
Sankar:Please provide your code

Running a report in background from selection screen input

Hi,
i had created one report and i want to sechedule it in background based on the condition that if a check box is checked it will run in background otherwise in foreground.

Hi Raymond,
you was quicker
Didn't know this solution yet. Great.
(Hint, you have tho check the SY-BATCH also, otherwise the Job wants to schedule itselfs again, tried it right now).
IF sy-batch IS INITIAL.
    IF sscrfields-ucomm EQ 'ONLI' AND checkbox = 'X'.
      sscrfields-ucomm = 'SJOB'.
    ENDIF.
ENDIF.
Regards, Uwe

Compare the input filename in the selection screen

In the selection screen input field
there is an option of selecting the directory and file name and not the extension .
This is used to download the datas
Extension can be selected by using the option button
rtf
csv.
the user has to give only the filename and not the extension.
suppose if the user input is C:\temp\file1.rtf.
Either i should take only the filename
or i should display the message give only the filename and not the extension . its already been selected!!!!
I want to compare the input string contains .doc
how to do the comparison and to get the above results mentiond
Thanks in advance

Because the requirment is there are two option buttion for selecting the download file format
But unknowingly if the user gives the filename along with the extension. I need to handle that error
giving some error message or information message
By comparing the last 4 letters of the filename.. either.doc or rtf or csv or watever
so how to do that
then after comparing that i should give the user a msg doc type is already selected give only the filename
I hope u understand my req

How can i display output in the same selection screen?

I've a requirement. Suppose in my selection screen there are three input fields. On the basis of this selection screens input It will display the output in the same selection screen. Can it be possible? .
Can it be possible to modify the default screen no for the selection screen 1000?
Thanks in advance.
Abhijit

Hi Abijit,
Whatever changes made in STANDARD SELECETION SCREEN 1000 or screens generated using 'SELECTION-SCREEN' statements, are not permanent.
It will get back to its original appearance, while you execute again or some time later.
Whenever you get into 'CHANGE' mode of these screens, an information will be displayed as follows ;
Selection screen: Report generation makes screen
changes ineffective
Regards,
R.Nagarajan.

SELECTION SCREEN INPUTS FROZEN

Similar Messages

Maybe you are looking for