topic Re: loop at screen query in Application Development and Automation Discussions

loop at screen query

Former Member — Thu, 16 Jul 2009 04:58:14 GMT

Hi all,

i want to make a particular field inactive when i select a checkbox.. for this i need to write loop at screen.

but how ll i mention for this filed inactive a particular field and where do we need to write this loop at.?? in which event?

Re: loop at screen query

Former Member — Thu, 16 Jul 2009 05:01:14 GMT

Hi ,

use can use this.

AT SELECTION-SCREEN OUTPUT.

if chekbox = 'X'.

LOOP AT SCREEN.

IF SCREEN-GROUP1 = 'SC1'.

SCREEN-INTENSIFIED = '1'.

MODIFY SCREEN.

CONTINUE.

ENDIF.

IF SCREEN-GROUP1 = 'SC2'.

SCREEN-INTENSIFIED = '0'.

MODIFY SCREEN.

ENDIF.

ENDLOOP.

endif.

Please let me know if you still need any more help.

Thanks and regards,

Rajeshwar.

Re: loop at screen query

sridhar_meesala — Thu, 16 Jul 2009 05:03:47 GMT

Hi,

I think you have to write it in AT SELECTION-SCREEN EVENT

LOOP AT SCREEN.
IFscreen-name = 'p_name'.
Screen-Input = 0.
Modify Screen.
ENDIF.
ENDLOOP.

Thanks,

Sri.

Edited by: Sri on Jul 16, 2009 10:35 AM

Re: loop at screen query

Former Member — Thu, 16 Jul 2009 05:05:30 GMT

HI,

Use AT SELECTION-SCREEN EVENT as follows:

AT SELECTION-SCREEN OUTPUT.

LOOP AT SCREEN.

IF PR_FERT = 'X' AND SCREEN-NAME = 'P_MTART' AND P_MTART EQ SPACE.

P_MTART = 'FERT'.

SCREEN-INPUT = 0.

MODIFY SCREEN.

ELSEIF PR_FERT = 'X' AND SCREEN-NAME = 'P_MTART'.

P_MTART = 'FERT'.

SCREEN-INPUT = 0.

MODIFY SCREEN.

ELSEIF PR_FGBO = 'X' AND SCREEN-NAME = 'P_MTART'.

P_MTART = 'FGBO'.

SCREEN-INPUT = 0.

MODIFY SCREEN.

ELSEIF PR_FGEQ = 'X' AND SCREEN-NAME = 'P_MTART'.

P_MTART = 'FGBO'.

SCREEN-INPUT = 0.

MODIFY SCREEN.

ELSEIF PR_ALL = 'X'.

IF P_MTART = 'FGBO' OR P_MTART = 'FERT'.

CLEAR P_MTART.

ENDIF.

ENDLOOP.

This is a sample code for material related Selection Screen.

Regds,

Anil

Re: loop at screen query

Former Member — Thu, 16 Jul 2009 05:08:34 GMT

Hi,

Check this



PARAMETERS: P_CHECK AS CHECKBOX USER-COMMAND FLAG,
                         P_FPATH TYPE RLGRAP-FILENAME.


AT SELECTION-SCREEN OUTPUT.
    LOOP AT SCREEN.
      IF P_CHECK EQ 'X'.
        IF SCREEN-NAME EQ 'P_FPATH'.
          SCREEN-INPUT = '1'.
          MODIFY SCREEN.
        ENDIF.
      ELSE.
          IF SCREEN-NAME EQ 'P_FPATH'.
          SCREEN-INPUT = '0'.
          MODIFY SCREEN.
        ENDIF.
      ENDIF.
    ENDLOOP.

Re: loop at screen query

Former Member — Thu, 16 Jul 2009 05:21:02 GMT

Hi ,

You should write the code means loop at screen at the AT SELECTION-SCREEN OUTPUT event.

"AT SELECTION-SCREEN OUTPUT event--------------------------------------
AT SELECTION-SCREEN OUTPUT .
*Looping at SCREEN table to modify the table----------------------------
  LOOP AT SCREEN .
    IF  p_chkbox EQ 'X' .
      IF screen-name CS 'FIELD_NAME' .
        screen-active = 0 .
      ENDIF.                           " IF SCREEN-GROUP1 EQ 'GRP' .
      MODIFY SCREEN.
    ENDIF.                             " IF P_USER IS INITIAL .
  ENDLOOP.                             " LOOP AT SCREEN .

You can check this link also for similar type reqirement with radiobuttons - -

[https://wiki.sdn.sap.com/wiki/pages/viewpage.action?pageId=111870085]

Regards

Pinaki

Re: loop at screen query

Former Member — Thu, 16 Jul 2009 05:30:48 GMT

its not working for me...

Re: loop at screen query

Former Member — Thu, 16 Jul 2009 05:37:02 GMT

Hi Poonam,

Try like this.

AT SELECTION-SCREEN OUTPUT .

*Looping at SCREEN table to modify the table----

LOOP AT SCREEN .

IF p_chkbox EQ 'X' .

IF screen-name = s_field-low .

screen-active = 0 .

ENDIF.

MODIFY SCREEN.

ENDIF.

ENDLOOP.

Regards,

Vijay

Re: loop at screen query

Former Member — Thu, 16 Jul 2009 05:37:42 GMT

Are u doing module Pool programming or normal Report.

In module pool write in PBO

Re: loop at screen query

Former Member — Thu, 16 Jul 2009 05:38:01 GMT

Hi,

I guess its better to add it to PBO and PAI both. i.e to 'at selection screen' and 'at selection screen output'.

Also you need to analyze at runtime as where exactly you are missing. ensure that you are using Uppercase in quotes while mentioning the fieldname/fieldgroup.

Regards,

Nirmal

Re: loop at screen query

Former Member — Thu, 16 Jul 2009 06:21:02 GMT

I have used as default 'X' for that check box so it ll not work in at selection-screen output..

i guess i shud not write it here/.

Re: loop at screen query

Former Member — Thu, 16 Jul 2009 07:26:56 GMT

Hi Poonam,

Would you please send your code so that I can analyze because the following code

is working fine here only you need to ENTER after clicking or unchecking the checkbox.

PARAMETERS : p_chkbox TYPE c AS CHECKBOX DEFAULT 'X',
             field TYPE char5.

AT SELECTION-SCREEN OUTPUT .

  LOOP AT SCREEN .
    IF  p_chkbox EQ 'X' .
      IF screen-name CS 'FIELD' .
        screen-active = 0 .
      ENDIF.                          
      MODIFY SCREEN.
    ENDIF.                            
  ENDLOOP.                             " LOOP AT SCREEN .

Regards

Pinaki

Re: loop at screen query

Former Member — Thu, 16 Jul 2009 08:32:34 GMT

Hi pinaki,

i want to check if checkbox is initial.

then make screen-active = 0.

Re: loop at screen query

Former Member — Thu, 16 Jul 2009 08:43:46 GMT

Then write the code like that only --

PARAMETERS : p_chkbox TYPE c AS CHECKBOX DEFAULT 'X',
             field TYPE char5.
 
AT SELECTION-SCREEN OUTPUT .
 
  LOOP AT SCREEN .
    IF  p_chkbox NE 'X' .  " Instead of EQ use NE
      IF screen-name CS 'FIELD' .
        screen-active = 0 .
      ENDIF.                          
      MODIFY SCREEN.
    ENDIF.                            
  ENDLOOP.

Hope this will resolve issue .

Regards

Pinaki

Re: loop at screen query

Former Member — Thu, 16 Jul 2009 08:47:35 GMT

Hi,

I guess you are missing the addition USER-COMMAND. Try this.

PARAMETERS : p_chkbox TYPE c AS CHECKBOX DEFAULT 'X' USER-COMMAND rad,

field TYPE char5.

AT SELECTION-SCREEN OUTPUT .

IF p_chkbox EQ 'X'.

LOOP AT SCREEN .

IF screen-name CS 'FIELD' .

screen-active = 1 .

ENDIF.

MODIFY SCREEN.

ENDLOOP.

ELSE.

LOOP AT SCREEN .

IF screen-name CS 'FIELD' .

screen-active = 0 .

ENDIF.

MODIFY SCREEN.

ENDLOOP.

ENDIF.

AT SELECTION-SCREEN.

IF p_chkbox EQ 'X'.

LOOP AT SCREEN .

IF screen-name CS 'FIELD' .

screen-active = 1 .

ENDIF.

MODIFY SCREEN.

ENDLOOP.

ELSE.

LOOP AT SCREEN .

IF screen-name CS 'FIELD' .

screen-active = 0 .

ENDIF.

MODIFY SCREEN.

ENDLOOP.

ENDIF.

Regards,

Nirmal

Re: loop at screen query

Former Member — Thu, 16 Jul 2009 09:49:05 GMT

PARAMETERS : p_cst as checkbox DEFAULT 'X' USER-COMMAND gtx.

AT SELECTION-SCREEN.

LOOP AT SCREEN .

*Disabling the field rep name

IF screen-name CS 'p_pname'. " name of the parameter you want to mak in active...

screen-input = '0'.

screen-output = '1'.

ENDIF.

MODIFY SCREEN.

CLEAR screen.

ENDLOOP.

Re: loop at screen query

Former Member — Thu, 16 Jul 2009 10:05:27 GMT

To do this, you need to use the event AT SELECTION-SCREEN OUTPUT.

Here, you should check according to field group, and for both "checked and "unchecked" options. So there will be four scenarios to check as follows (don't forget to write MODIFY SCREEN!!):

If rb = 'X'.

loop at screen.

if screen-group1' = 'G1'.

screen-invisible = '1'.

screen-active = '0'.

modify screen.

else.

screen-invisible = '0'.

screen-active = '1'.

modify screen.

endif.

endloop.

elseif rb = ' '.

loop at screen.

if screen-group1' = 'G1'.

screen-invisible = '0'.

screen-active = '1'.

modify screen.

else.

screen-invisible = '1'.

screen-active = '0'.

modify screen.

endif.

endloop.

endif.

Hope this helps!

Cheers,

Shailesh.