How to call selection screen before smartforms?

Hi experts,
I wanna call a selection screen before displaying smartforms. In NACE transaction, I have program that calls the smartforms and In that program, I wanna add a selection screen with three fields whom values comes from a value range that prepared by me. I don't wanna use popup selection FM's because as ,I said, I wanna display the values according to a value range.
Do you know any way to do this?

REPORT zsd_rv56td00.
SET EXTENDED CHECK OFF.
TABLES: vbpla, thead, ttxern, ttxit, t005, vbddl, stxh, sadr. "SADR40A
INCLUDE vttkdata.                      "Shipment Header
INCLUDE vttsdata.                      "Shipment Segment
INCLUDE vttpdata.                      "Shipment Items
INCLUDE vbpadata.                      "Partner
INCLUDE vtfadata.                      "Flow
INCLUDE sadrdata.                      "Address
INCLUDE vtlfdata.                      "Delivery Selection
INCLUDE rvadtabl.                      "Messages
INCLUDE vsedata.                       "shipping units
INCLUDE rv56acom.                      "I/O-Structure
*INCLUDE zsd_form_screens.
SET EXTENDED CHECK ON.
DATA:
xscreen(1)              TYPE c,
retcode                 LIKE sy-subrc VALUE 0,
there_was_output(1)     TYPE c        VALUE space,
new_page_was_ordered(1) TYPE c        VALUE space.
CONSTANTS:
no(1) VALUE space,
yes(1) VALUE 'X'.
TABLES : tpar,vbak.                                         "n_742056.
SELECTION-SCREEN BEGIN OF SCREEN 900.
SELECTION-SCREEN BEGIN OF BLOCK b1.
SELECT-OPTIONS :
s_ulke FOR vbak-zzcikisulke,
s_gumruk FOR vbak-zzvarisgumruk,
s_ant FOR vbak-zzantrepo.
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN END OF SCREEN 900.
Florian as you can see I created the screen! It exists!

Similar Messages

How to cal selection screen in module pool

Hi abapers,
I have to use selection screen in module pool programme..How to call selection screen in module pool.
Regards,
ramya

YOU HAVE TO DEFINE YOUR SELECTION SCREEN LIKE THIS
SELECTION-SCREEN BEGIN OF SCREEN 123 AS WINDOW TITLE TEXT-456.
SELECTION-SCREEN BEGIN OF BLOCK BL1 WITH FRAME TITLE TEXT-BL1
                                      NO INTERVALS.
    SELECT-OPTIONS SEL1 FOR SY-SUBRC.
    PARAMETERS     PAR1 LIKE SPFLI-CARRID.
    SELECTION-SCREEN COMMENT /10(20) TEXT-COM.
SELECTION-SCREEN END OF BLOCK BL1.
SELECTION-SCREEN END OF SCREEN 123.
SELECTION-SCREEN ULINE.
SELECTION-SCREEN BEGIN OF SCREEN 99.
SELECTION-SCREEN PUSHBUTTON 15(25) PUBU
                   USER-COMMAND US01.
SELECT-OPTIONS SEL2 FOR SPFLI_WA-CONNID.
PARAMETERS     PAR2 TYPE I.
SELECTION-SCREEN END OF SCREEN 99.
THEN YOU HAVE TO CALL THAT
CALL SELECTION-SCREEN scr.
AFTER THAT YOU CAN CALL THE ANOTHER SCREEN..
CALL SCREEN..
REGARDS
SHIBA DUTTA

Issue with CALL SELECTION-SCREEN

Hi experts,
I am working on a report.
Here on the selection screen , based on the selection of some radiobuttons ,i want to call a secondary selection screen.
So i am using the following program code ,
AT SELECTION-SCREEN on BLOCk blk.
IF p_abc = c_x.
    CALL SELECTION-SCREEN 100 STARTING AT 20 5.
    IF sy-subrc <> 0.
      MESSAGE text-011 TYPE c_e .
    ENDIF.
ENDIF.
so currently , once i complete my slection on the screen 100 , the popup screen stays there and rest of the programing logic is executed correctly.
My issue is that , once i complete my slection on the screen 100, i want that the pop up should be closed
And then the the rest of the program logic should continue.
please guide me how ,this can be done.
Regards,
Rajesh Kumar.

Hi
The event AT SELECTION-SCREEN and AT SELECTION-SCREEN ON BLOCK are very similar, only the second event see the part of selection-screen defined in the block.
This events are triggered as soon as the user does something: so press ENTER, F8,........
If u want the second-selction screen is shown once and the main selection-screen has to be displayed under the second one, u can try to run the second one only if the report has to run, so if the user has pressed F8, code ONLI.
AT SELECTION-SCREEN on BLOCk blk.
CHECK SY-UCOMM = 'ONLI'.
IF p_abc = c_x.
CALL SELECTION-SCREEN 100 STARTING AT 20 5.
IF sy-subrc 0.
     MESSAGE text-011 TYPE c_e .
ENDIF.
ENDIF.
In tihs way the rest of the program will be executed, else u need to move all code of the event START-OF-SELECTION and END-OF-SELECTION in the event AT SELECTION-SCREEN, or, just as I said before, to move the calling of POPUP to event START-OF-SELECTION.
Max

CALL SELECTION SCREEN problem

Hello!
I have a problem. In my riport I have a selection screen (1000), a main screen (2000), and a screen (400) this is called inside a loop, to fill some datas when you hit the print button.
CLEAR L_TOTAL.
SORT LT_EBAN BY BNFPO.
LOOP AT LT_EBAN.
    GT_ITEM2-FIELD01 = SY-TABIX.
    GT_ITEM2-FIELD02 = LT_EBAN-MATNR.
*---Part name, Type, Maker
    SPLIT LT_EBAN-TXZ01 AT ',' INTO GT_ITEM2-FIELD03 GT_ITEM2-FIELD04 GT_ITEM2-FIELD05.
     CONCATENATE GT_ITEM2-FIELD03 '/' GT_ITEM2-FIELD04 INTO DESCR.
     ITEM = LT_EBAN-BNFPO.
     CALL SCREEN 400 STARTING AT 20 7 ENDING AT 60 18.
*---Machine
    GT_ITEM2-FIELD06 = ST_400-MACHINE.
After this, i could not use the LEAVE TO SCREEN 0, because it's not going back to secreen '2000' , I'm getting a blank 400 screen.
Thatswhy I used CALL SCREEN '2000', and it's fine.
But in the case of the Selection screen (1000) something is wrong.
On the screen 2000 I using this logic.
MODULE EXIT_2000 INPUT.
CASE OK_CODE.
    WHEN 'BACK' OR 'EXIT'.
      CLEAR OK_CODE.
       CALL SELECTION-SCREEN '1000'.
       LEAVE PROGRAM.
    WHEN 'CANC'.
      PERFORM EXIT_PROGRAM.
      LEAVE PROGRAM.
ENDCASE.
CLEAR OK_CODE.
ENDMODULE.                 " exit_2000 INPUT
With this logic, the program is going to the SELECTION-SCREEN, when I hit the back button, and when we are already on the SELECTION-SCREEN, it's leaving the program. This is also ok.
But when I hit the back button, and on the SELECTION-SCREEN I want to run the program again, it's not going to the program logic, it's jumping to this CALL SELECTION-SCREEN '1000', and leaving of course.
START-OF-SELECTION.
PERFORM DSP1_PROC.
IF GT_DISPLAY[] IS INITIAL.
    MESSAGE S208(00) WITH 'No data.'.
    EXIT.
ENDIF.
IF S_RET = '1'.
    MESSAGE I208 WITH 'Document not found'.
    S_RET = ' '.
ELSE.
    S_RET = ' '.
    CALL SCREEN '2000'.
ENDIF.
So my question is, that the above logic, when I running the program first time It's working good, at the START-OF-SELECTION, but when I trying to runnig from the SELECTION-SCREEN "second time", from the   START-OF-SELECTION it's jumping to the CALL SELECTION-SCREEN '1000'. How can I avoid this. I want that from the START-OF-SELECTION, never go to the CALL SELECTION-SCREEN '1000'.
Thank You
Edited by: Roland on Dec 5, 2011 11:27 AM

Hi Max!
Yeah, I was thinking the same, that the problem is with that loop.
But I don't know, how can I solved in a different way, because when we hit the print button, we getting all the items from a table, and we starting looping on them. In the loop we passing the values to a GT_ITEM table, later this table is connected with an excell, so it will be printed out in an excell form.
So I have to call this screen so many times, how many items we have. Sometimes just 1, sometimes 4, 6, 9, and so on.
For this items I have to add 2 more fields, wich are uploaded by the user. ( The other fields are coming from the table)
So if I going out from the loop after the CALL SCREEN 400, I think the next item wont be get the values. Or maybe any of them, because this is before the APPEND GT_ITEM. So this methode wont be called, no data would be in the table, nothing will be printed.
*-Item
SELECT BNFPO MATNR TXZ01 MENGE MEINS ERNAM PREIS BEDNR EBELN EBELP
    INTO CORRESPONDING FIELDS OF TABLE LT_EBAN
    FROM EBAN
   WHERE BANFN = GT_DISPLAY-BANFN
     AND LOEKZ = ' '.
CLEAR L_TOTAL.
SORT LT_EBAN BY BNFPO.
LOOP AT LT_EBAN.
    GT_ITEM2-FIELD01 = SY-TABIX.
    GT_ITEM2-FIELD02 = LT_EBAN-MATNR.
*---Part name, Type, Maker
    SPLIT LT_EBAN-TXZ01 AT ',' INTO GT_ITEM2-FIELD03 GT_ITEM2-FIELD04 GT_ITEM2-FIELD05.
     CONCATENATE GT_ITEM2-FIELD03 '/' GT_ITEM2-FIELD04 INTO DESCR.
     ITEM = LT_EBAN-BNFPO.
     CALL SCREEN 400 STARTING AT 20 7 ENDING AT 60 18.
*---Machine
    GT_ITEM2-FIELD06 = ST_400-MACHINE.
*---Using Qty
    WRITE ST_400-USING UNIT LT_EBAN-MEINS TO GT_ITEM2-FIELD08.
*---Now Stock
    CLEAR L_LABST.
    SELECT SUM( LABST ) INTO L_LABST
      FROM ZMM0460T
     WHERE MATNR = LT_EBAN-MATNR
       AND WERKS = '3A10'.
    WRITE L_LABST UNIT LT_EBAN-MEINS TO GT_ITEM2-FIELD09.
    WRITE LT_EBAN-MENGE UNIT LT_EBAN-MEINS TO GT_ITEM2-FIELD10.
    IF NOT LT_EBAN-EBELN IS INITIAL.
      CLEAR LS_EKPO.
      SELECT SINGLE NETPR WAERS PEINH
        INTO CORRESPONDING FIELDS OF LS_EKPO
        FROM EKPO AS A INNER JOIN EKKO AS B ON A~EBELN EQ B~EBELN
       WHERE A~EBELN = LT_EBAN-EBELN
         AND A~EBELP = LT_EBAN-EBELP.
      IF LS_EKPO-WAERS <> 'HUF'.
        CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY'
          EXPORTING
            DATE             = SY-DATUM
            FOREIGN_AMOUNT   = LS_EKPO-NETPR
            FOREIGN_CURRENCY = LS_EKPO-WAERS
            LOCAL_CURRENCY   = 'HUF'
          IMPORTING
            LOCAL_AMOUNT     = LS_EKPO-NETPR.
      ENDIF.
      IF LS_EKPO-PEINH IS INITIAL. LS_EKPO-PEINH = 1. ENDIF.
      LT_EBAN-PREIS = LS_EKPO-NETPR / LS_EKPO-PEINH.
    ENDIF.
    WRITE LT_EBAN-PREIS CURRENCY 'HUF' TO GT_ITEM2-FIELD11.
    CONDENSE GT_ITEM2-FIELD11.
    CONCATENATE GT_ITEM2-FIELD11 'Ft' INTO GT_ITEM2-FIELD11
      SEPARATED BY SPACE.
    L_NETWR = LT_EBAN-MENGE * LT_EBAN-PREIS.
    WRITE L_NETWR CURRENCY 'HUF' TO GT_ITEM2-FIELD12.
    CONDENSE GT_ITEM2-FIELD12.
    CONCATENATE GT_ITEM2-FIELD12 'Ft' INTO GT_ITEM2-FIELD12
      SEPARATED BY SPACE.
    L_TOTAL = L_TOTAL + L_NETWR.
*---Unit
    SELECT SINGLE UNIT INTO GT_ITEM2-FIELD13
      FROM ZMM0500T
     WHERE PERNR = LT_EBAN-BEDNR.
*---Name
    SELECT SINGLE SNAME INTO GT_ITEM2-FIELD14
      FROM PA0001
     WHERE PERNR = LT_EBAN-BEDNR
       AND ENDDA = '99991231'.
*---Append
    GT_ITEM2-CNTR01 = ''.
    APPEND GT_ITEM2. CLEAR: GT_ITEM2, ST_400, DESCR, ITEM.
ENDLOOP.
GT_ITEM2-FIELD11 = 'Total'.
WRITE L_TOTAL CURRENCY 'HUF' TO GT_ITEM2-FIELD12.
CONDENSE GT_ITEM2-FIELD12.
CONCATENATE GT_ITEM2-FIELD12 'Ft' INTO GT_ITEM2-FIELD12
    SEPARATED BY SPACE.
GT_ITEM2-CNTR01 = 'B'.
APPEND GT_ITEM2. CLEAR GT_ITEM2.
ANy idea?
Thank You
Edited by: Roland on Dec 5, 2011 1:36 PM
Edited by: Roland on Dec 5, 2011 1:50 PM

Problem in Call Selection Screen

Hi,
I am facing a problem on the call selection screen. The no. of nested screens that can be called by using call selection screen is 50. When the count reaches to 51 it is going to short dump. How can i avoid the dump. What is the system field that captures the nested screens count.
Thanx in advance,

Maximum number of nested CALL SCREEN is 50, I think you cannot call 51th screen in a row.
To avoid short dump you can handle exception <b>DYNP_TOO_MANY_CALL_SCREENS</b> and give error (or information) message 'Maximum number of nested sccreen level is 50' .
TRY .
      CALL SCREEN 100.
    CATCH cx_root .
      MESSAGE e100(00).
ENDTRY.

How to skip selection screen? Please help!

Hi Experts,
       I have a report program that has a default selection screen (1000) and ALV output. First selection screen is displayed and on execution ALV is shown.
My requirement is, if the user is not authorized to run this report then selection screen should be skipped and instead display a error page. This error page is nothing but some write statements in ABAP displaying error icon and error info.
Currently I have written the authorization check in the INITIALIZATION event. Here I am setting a flag if the user is not authorized followed by "write" statements showing error info.
But when I run the report, error info is not displayed and instead selection screen loads even though the user is not authorized. I have written the selection screen code in the TOP include.
So what shall I do? How to skip the selection screen?
Are there any other better ways to handle my case?
Thanks
Gopal

Got it.
CODE:
REPORT zzsorttry                               .
SELECTION-SCREEN BEGIN OF SCREEN 1001.
PARAMETERS : p_vbeln TYPE vbak-vbeln.
SELECTION-SCREEN END OF SCREEN 1001.
DATA : flag.
INITIALIZATION.
*C-- Put your authorization check here.
IF 1 = 1.
    flag = 1.
    LEAVE TO LIST-PROCESSING .
ELSE.
    CALL selection-screen 1001.
ENDIF.
START-OF-SELECTION.
IF flag IS NOT INITIAL.
    CLEAR flag.
    WRITE: 'User', sy-uname , 'not authorized to use this report'.
ENDIF.

How to call ALV Report and SMARTFORMS through Pushbutton

hi,
i have created a report.My task is to create two buttons:
1)ALV Report.
2)SMARTFROMS.
Through these button i have to call ALV Report and SMARTFORMS. i have created both button and when i execute the program,
it shows me the button but not working when i click on it.
this is the coding i have used in my report for calling ALV Report.
''Tables sscrfields,
DATA flag(1) Type c.
selection-screen: begin of screen 500 AS WINDOW TITLE tit,
BEGIN OF LINE,
PUSHBUTTON 2(18) but1 USER-COMMAND cli1,
end of line,
BEGIN OF LINE,
PUSHBUTTON 2(18) but2 USER-COMMAND cli2,
end of line,
end of screen 500.
SET PF-STATUS 'STATUS_0100'.
at selection-screen.
case sscrfields.
WHEN 'cli1'.
flag = '1'.
WHEN 'cli2'.
flag = '2'.
endcase.
at USER-COMMAND.
CASE SY-UCOMM.
WHEN 'Detail'.
select vbakkunnr VBakernam VBAkaudat vbakaufnr vbapKWMENG vbapmatnr vbap~ARKTX
into but1
from vbak inner join vbap
on vbakvbeln = vbapvbeln.
ENDSELECT.
ENDCASE.
START-OF-SELECTION.
tit = 'Format'.
but1 = 'ALV Report'.
but2 = 'SMARTFORMS'.
CALL SELECTION-SCREEN 500.
and i also use in my report
''case sscrfields-ucomm'' and ''submit my_report'' but the still button doesn't show the result.
Thanks & Regards,

Hi,
         I understood your requirement. What i found is, you are creating screen 500 and call it after START-OF-SELECTION,
at that time your AT USER-COMMAND doesn't work.
So what i would suggest , u should create GUI STATUS named ' PFSTAT'
having one functional key 'EXIT' that is standard u can just name it
and
other two u can assign in Freely assigned Function keys as 'BUT1' & 'BUT2'. and than in Application Toolbar u jst have it in ITEM LIST by typing BUT1 and BUT2.
For 'BUT1' text would be 'ALV' and 'BUT2' text would be 'SMARTFORMS'.
Now in Program you can code,,,
START-OF-SELECTION.
SET PF-STATUS 'PFSTAT'.
WRITE:/ 'TEST'.
at user-command.
case SY-UCOMM.
    WHEN 'BUT1'.
    WHEN 'BUT2'.
    WHEN 'EXIT'.
       LEAVE PROGRAM.
endcase.
In Program u set PF STATUS and use at user-command event, whcih gets triggered when u click on button . When u execute program you get two button in application tooldbar.
Please do needful.
Thanks,
Saurin SHah

How to Call another screen using the ABAP Report which is displaying ALV ou

Hello All,
I am developing a ABAP report in which I want to transfer the stock from material to another material.
My Report will include 3 to screens.
The first sleection screen will display all the material with their stock value.
When we execute the report I will get the list of materials along with their current stock. On the top of the output screen I want the Execute button. Also , each line of the output should have checkbox or the ALV provides the functionality of editing one cell like that.....Once the user tick the checkbox or the cell....then I want to move to another screen where user can enter the Quantity and then user will tick ok and then I will call one function module so that the material documnet is posted and transfer of posting form material to material is done successfully.
Could anyone please help me out how to call another screen from the output screen where user can enter the Quantity amount....
I dont want to use the Dialog programming.....I want to create the simple ALV Abap report.
Regards,
Komal Bhutada.

Hi Raymond,
Thanks for the input...I will try this in my code .....
Can you please help me how to insert the checkbox in the ALV Output....so that I can select one of row and then press execute to process further?..
Thanks for the information.
Regards,
Komal.

Call selection screen exit

Hi,all
I've found a problem arising from this sentence "call SELECTION-SCREEN 1001 STARTING AT 10 10",in the main screen. (here the type of screen 1001 is 'Modal Dialog Box')
The 'close' button on the right-top correr of the screen has no effect to close the
screen 1001,so how can I catch the event of click on that button?
Thanks

you need to write the code as below
case sy-ucomm.
when 'EXIT'.
leave to screen 0. " always use screen 0 for modal dialog box.
when "BACK'
leave to screen 0
WHEN 'CANC'.
leave to screen 0
endcase.
Please activate buttons in Menu Painter.
Thanks
Seshu

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
RK

Hai 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

How to avoid selection-screen?

Hi,
i have this short report:
TABLES: MARA.
SELECT-OPTIONS: S_MATNR FOR MARA-MATNR.
AT SELECTION-SCREEN.
IF SY-BATCH = 'X'.
* how to avoid selection screen
ENDIF.
START-OF-SELECTION.
SELECT * FROM MARA WHERE MATNR IN S_MATNR.
    WRITE: / MARA-MATNR.
ENDSELECT.
END-OF-SELECTION.
in batch i don't want the selection-screen. Is it possible? How can i do this?
Thanks.
regards, Dieter

Dieter Gröhn wrote:
> Hi,
>
> i have this short report:
>
>
> TABLES: MARA.
> SELECT-OPTIONS: S_MATNR FOR MARA-MATNR.
> *
> AT SELECTION-SCREEN.
>   IF SY-BATCH = 'X'.
> * how to avoid selection screen
>   ENDIF.
> *
> ************************************************************************
> START-OF-SELECTION.
> *
>   SELECT * FROM MARA WHERE MATNR IN S_MATNR.
>     WRITE: / MARA-MATNR.
>   ENDSELECT.
> *
> END-OF-SELECTION.
>
>
> in batch i don't want the selection-screen. Is it possible? How can i do this?
>
> Thanks.
>
> regards, Dieter
Please check the value of the variable sy-binpt, I believe the value of the variable sy-binpt will be set to 'X' if the program is called from a bath input, hope this helps.

How to call the screen in methods could u please explain

hi,
how to call the screen in methods could u please explain clearly with example

HI ,
CALL SCREEN - Call a screen
Basic form
CALL SCREEN scr.
Addition:
... STARTING AT x1 y1 ... ENDING AT x2 y2
Effect
Calls the screen scr; scr is the number of a screen of the main program. You use SET SCREEN 0. or LEAVE SCREEN. to define the return from the CALL screen.
Note
Please consult Data Area and Modularization Unit Organization documentation as well.
Addition
... STARTING AT x1 y1 ENDING AT x2 y2
Effect
The coordinates x1, y1 (start column and start line in the window) and x2, y2 (end column and end line in the window) define the size and position of the CALL screen ("top left - bottom right"). Besides these coordinates, you can also see the contents of the primary window, but cannot perform any action there.
Note
If "ENDING AT ..." is not specified, suitable values are substituted for x2 and y2, taking into account the size of the called screen.
Exceptions
Non-Catchable Exceptions
Cause: No further screen level (call screen); the maximum number of nested screen levels is restricted to 50 at present.
Runtime Error: DYNP_TOO_MANY_CALL_SCREENS
THX

Short dump while using call selection-screen mdynnr

Hi ALL,
I need your help and information.
In programmes, We are using the statament " CALL SELECTION-SCREEN MDYNNR "
and passing the screens dynamically into variable mdynnr.
And the programme is going to dump after executing 50 times.
When we
can we use any other statement instead of CALL SELECTION-SCREEN MDYNNR.
Your information helps us lot.
Thanks in advance.
Srinivasa Reddy.

Hi,
As you know Call Screen is the statement, but you will get the problem if you are going to call it in the same LUW repeatedly. So, FM is the only convenient way to do it. This is very easy. Just create a FM and replace you statement with this FM. Hopefully this will solve your problem.
Check this comment " When you call a new main program in order to use a screen sequence (for example, using CALL TRANSACTION), a new SAP LUW begins. This may be an undesired effect, especially when you are trying to modularize a transaction that updates the database.
An alternative to this is to use an external procedure, whose main program is linked to a screen sequence, and which contains the corresponding dialog modules. Procedures run in the same SAP LUW and internal session as their calling program."
Thanks,

HOW TO USE SELECTION SCREEN

HOW TO USE SELECTION SCREEN
I WANT TO INSERT PURCHASE DOCUMENT NUMBER
AND WANT TO SEE ALL INFORMATION FOR THAT PURCHASE DOCUMNET NUMBER.
THANKS IN ADVANCED.

The main use of the selection-screen is to select screen in the back ground
ex :
TABNAME
IN THE ABOVE FIGURE TABNAME IS THE FIELD AND THE BACK END IS CREATED SCREEN IN THE BACK END
THIS SCREEN CREATION WE CAN USED THE SCREEN SELECTION

How to pass selection screen parameters in text elements?

how to pass selection screen parameters in text elements?

don't you mean he other way around. Assign text-elements (selection texts) to select options?
This you do in the menu where you can find text-elements, selection texts.
menu Goto->text elements->selection texts.
Edited by: Micky Oestreich on May 10, 2008 2:45 PM

How to call selection screen before smartforms?

Similar Messages

Maybe you are looking for