topic Re: conversions in Application Development and Automation Discussions

conversions

Former Member — Mon, 14 Jan 2008 12:39:47 GMT

hi,

I have used two radio buttons on selection screens to select appilication server or presentation server to down load the flat files i want to know the procedure when i select the one radio button and execute the particular code for that rado button should be executed. please explain.

Re: conversions

Former Member — Mon, 14 Jan 2008 12:42:46 GMT

Hi,

selection-screen begin of screen 100 title title.

selection-screen begin of block b1 with frame title text-t01.

parameter:rad1 radiobutton group rad user-command frad1 default 'X',

rad2 radiobutton group rad .

selection-screen end of block b1.

selection-screen end of screen 100.

if rad1 = 'X'.

CODE FOR APPLICATION SERVER

endif.

if rad2 = 'X'.

CODE FOR PRESENTATION SERVER.

endif.

PLZ REWARD IF HELPFUL.

REGARDS,

SRIKANTH

Edited by: srikanth tulasi on Jan 14, 2008 1:47 PM

Re: conversions

Former Member — Mon, 14 Jan 2008 12:45:25 GMT

declare the two rabio buttons as follows.

parameters: rb1 RADIOBUTTON GROUP grp,

rb2 RADIOBUTTON GROUP grp.

if rb1 = 'X'.

code for first radio button.

elseif rb2 = 'X'.

code for second radio button.

endif.

Re: conversions

Former Member — Mon, 14 Jan 2008 12:47:10 GMT


PARAMETERS : rad1 RADIOBUTTON group grp,
             rad2 RADIOBUTTON group grp.
             

  IF rad1 EQ 'X'.
   PERFORM application_server. 
  ELSE.
  PERFORM presentation_server.
  ENDIF.
  
  FORM application_server.
  "code for application server
  ENDFORM.
  
  FORM presentation_server.
  "code for presentation server
  ENDFORM.

Re: conversions

Former Member — Mon, 14 Jan 2008 12:58:09 GMT

Deepika,

Let's assume you have defined the radio buttons on the selection screen like this:

parameters button_1 type c radiobutton group B1 default 'X'.

parameters button_2 type c radiobutton group B1.

To execute one or the other procedure, you need this in your program:

start-of-selection.

if button_1 = 'X'.

perform download_to_app_server.

else.

perform download_to_pres_server.

endif.

Ger