Multiple selection screen

[Former Member]

Hi,

I have two selection screens. one is thedefault screen which contains two radio

buttons r1,r2.Other screeen say '200' is having SELECT-OPTIONS and

PARAMETERS which has to be validated using another program when we enter

values.If I select radio button one it should call the screen 200.If I select radio button

it should call one function.I am getting dump "you requested too many consecutive

nested call screens".what i have to do avoid this dump?

I have reffered the related link of same kind of question .But i dont get the point.

Regards,

Mythili

[former_member188685]

You post your code. so that we can see what is wrong in that.

[Former Member]

REPORT zup_effort_estimation MESSAGE-ID zup_messages.

INCLUDE ztest_effort_estimation_top.

*INCLUDE zup_effort_estimation_top.

----

---

• Selection Screen *

----

---

• radio button

SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-010.

PARAMETERS: create RADIOBUTTON GROUP rad1 DEFAULT 'X',

retrieve RADIOBUTTON GROUP rad1.

SELECTION-SCREEN END OF BLOCK b1.

*Object details

SELECTION-SCREEN BEGIN OF SCREEN 2000.

SELECTION-SCREEN SKIP.

SELECT-OPTIONS: s_pgmid FOR tadir-pgmid

NO INTERVALS NO-EXTENSION,

s_object FOR tadir-object

NO INTERVALS NO-EXTENSION,

s_name FOR tadir-obj_name

NO INTERVALS.

SELECTION-SCREEN SKIP.

PARAMETERS: p_user TYPE xuser.

PARAMETERS: p_rfc LIKE rfcdes-rfcdest.

SELECTION-SCREEN SKIP.

SELECTION-SCREEN END OF SCREEN 2000.

----

---

• At Selection-Screen output *

----

---

*AT SELECTION-SCREEN OUTPUT.

AT SELECTION-SCREEN OUTPUT.

IF create = 'X'.

LOOP AT SCREEN.

screen-active = 0.

MODIFY SCREEN.

CALL SELECTION-SCREEN 2000.

ENDLOOP.

ENDIF.

----

---

• Initialization *

----

---

INITIALIZATION.

• Set options restrictions.

PERFORM set_restrict_list.

LOOP AT SCREEN.

IF screen-name = '%_P_USER_%_APP_%-TEXT' OR

screen-name = 'P_USER'.

screen-invisible = 1.

screen-active = 0.

MODIFY SCREEN.

ENDIF.

ENDLOOP.

----

---

• At Selection-Screen *

----

---

AT SELECTION-SCREEN.

TRANSLATE p_rfc TO UPPER CASE.

CHECK sy-ucomm = 'ONLI'.

• Validate PGMID-OBJECT entry.

PERFORM valid_pgmid_object USING s_pgmid-low s_object-low.

• Validate RFC destinations.

PERFORM check_rfc_destination.

----

---

• START OF SELECTION *

----

---

START-OF-SELECTION.

CALL SCREEN 0120.

INCLUDE ztest_effort_estimation_pbo.

• INCLUDE zup_effort_estimation_pbo.

INCLUDE ztest_effort_estimation_pai.

• INCLUDE zup_effort_estimation_pai.

INCLUDE ztest_effort_estimation_form.

• INCLUDE zup_effort_estimation_form.

[former_member188685]

why are you calling the screen 2000 in loop.

AT SELECTION-SCREEN OUTPUT.
IF create = 'X'.
LOOP AT SCREEN.
screen-active = 0.
MODIFY SCREEN.
CALL SELECTION-SCREEN 2000.  "For what 

ENDLOOP.
ENDIF.

[former_member188685]

Correct the code the following way...

AT SELECTION-SCREEN OUTPUT.
IF create = 'X'.
LOOP AT SCREEN.
screen-active = 0.
MODIFY SCREEN.
ENDLOOP.
CALL SELECTION-SCREEN 2000.  "Take it out of the loop
ENDIF.

[Former Member]

Hi,

I called thaT screen because I have requirements lik that .

I have solved the issue.Just I copied the Call selection screen block under

AT SELECTION SCREEN.

Thanks!

Regards,

Mythili