Radio Buttons & Repeat Groups

Seems like it should be easy, but I've not been able to
figure it out.
I'm pulling a list of records from a mySql DB, populate those
within a Form/Table so that a user can select one of the records
via a Radio Button. Upon Submit, I'd like to be able to retrieve
that record selected on a subsequent page either by a key
associated with the radio button, or the necessary form variables
being set once the Radion Button is selected.
So far, creating the record set and displaying it is no
problem within a single row table defined as repeating. All works
well. How do I associate a radio button with a record within the
record set? Is there a better way?

Button Groups are not 2 dimensional... you'll have to use the listeners to fix your problem.

Similar Messages

Radio button and group

Hi All,
Not quite follow what dev guide says about radio button and group implementation.
I tried but always got strange behavior.
I have a subtab with two radio buttons (rbt1 and rbt2)
rbt1 property defined as:
Initial Value: Y
Checked Value: Y
Unchecked Value: N
rbt2 property defined as:
Initial Value: Y
Checked Value: N
Unchecked Value: Y
Also, In my subtab PR, I init these two bts as a group:
OAMessageRadioButtonBean colButton1 =
(OAMessageRadioButtonBean)webBean.findChildRecursive("rbt1");
colButton1.setName("colGroup");
colButton1.setSelectedValue("Y");
OAMessageRadioButtonBean colButton2 =
(OAMessageRadioButtonBean)webBean.findChildRecursive("rbt2");
colButton2.setName("colGroup");
colButton2.setSelectedValue("N");
When the subtab render first time, rbt1 is checked and rbt2 is unchecked as expected. but when I go to other subtab then come back, the rbt1 is unchecked and rbt2 is checked (switch automatically).
The subtab PR is the only place I set this radio button value and group as showing above. Somewhere wrong with my logic or setting?
Regards,
KJ

Hi All,
Got issue resolved. When I was replying Ranjit previous post, I mentioned both of buttons bind to same VO attribute. Since the first rbt1 has defined checked and unchecked values (Y & N) and both of buttons are defined in same group, so I took off second rbt2 attribute binding then it works (won't switch automatically anymore).
I still defined init values for both of buttons and also removed setSelectedValue() method calls from PR.
Thanks again for the great helping.
KJ

Dynamic radio button and group

Hi, we have create dynamic radio button and group on “application creation complete” event , but which I am try to get number of radio button its show zero, see below code
import flash.utils.setTimeout;
import mx.controls.Alert;
import mx.events.FlexEvent;
import spark.components.RadioButton;
import spark.components.RadioButtonGroup;
private var rbg:RadioButtonGroup;
private var rb1:RadioButton;
private var rb2:RadioButton;
private var dcount:int = 0;
protected function application1_creationCompleteHandler(event:FlexEvent):void
     // TODO Auto-generated method stub
     // TODO Auto-generated method stub
     rb1 = new RadioButton();
     rb2 = new RadioButton();
     rbg = new RadioButtonGroup();
     rb1.label = "Radio1";
     rb2.label = "Radio2";
     rb1.group = rbg;
     rb2.group = rbg;
     vbox1.addChild(rb1);
     vbox1.addChild(rb2);
     checkRadioButton ();
protected function checkRadioButton ():void
     Alert.show("In checkRadioButton function : " + rb1.group.numRadioButtons.toString());
If I put some Time interval to call checkRadioButton function its working fine,
//checkRadioButton ();
setTimeout(checkRadioButton,1000);
but this is not best practice.
why this happen ….can anybody clear this or any other way to do this.
Thanks in advance

@manjeet.patel,
Just write the below line of code
vbox1.validateNow();
You need not use setTimeout() function
vbox1.addChild(rb1);
vbox1.addChild(rb2);
vbox1.validateNow();
Thanks,
Bhasker

Sets of Radio buttons all grouped together

I am creating a form with many sets of radio buttons. Each set contains 3 buttons. When I add the 4th button, Designer groups it with the first three. When I add a 5th button, it is automatically grouped with the first 4. I need to separate the buttons into groups of 3. How do I manually choose which radio buttons to group together?
Eric

Doing this is little tricky... Add all your radio buttons and then choose all the ones you want to group in a different set holding Ctrl key. And then click your mouse button (right). Then choose 'Wrap in New Radio Button Group'.
Good luck,
SekharN.

Layering radio button exclusion groups

I would like to create a table using radio buttons, where the heading row is one exclusion group, and the two rows below it are two more exclusion groups.
Then, I would like each column underneath the heading to be a separate mini exclusion group.
Finally, for whichever button is selected in the heading row, I would like only the mini exclusion group directly beneath it to be able to be used.
Is this even possible, or can radio buttons only belong to one group at a time?
Shoshana

The script isn't too complicated. The problem is that you have to get around the fact that Acrobat will always let a form with a radio button group flagged as mandatory be submitted regardless of whether a radio button within the group has been selected prior to submission.
You can do this by using two buttons: The first is a regular (non-submitting) button while the second is the actual email submit button. The catch is that the real email submit button is hidden (it can't be seen on the form, nor can it be clicked on by the user).
The first step, which isn't really necessary but would be good practice, would be to mark the radio button group which contains the radio buttons as being mandatory. You can do this by selecting any of the radio buttons in the group which should be mandatory, going to the Object palette and setting the Type property to
User Entered - Required. This will have the effect of Acrobat being able to highlight the radio buttons in red if the user chooses to "Highlight required fields" when filling the form.
The second step is setting-up the two buttons. This step is identical to the second step described in the following thread (about making a check box mandatory for email submission):
Mandatory check box before form submission. Have a look at the first reply to the thread. You should start reading at the paragraph that begins with, "The second part..."
The script checks that the value of the check box is "1". Your script would simply check that the radio button group's rawValue property isn't an empty string.
Stefan
Adobe Systems

How do i get a text field to autopopulate based on responses in two groups of radio buttons

I am using Adobe Acrobat Pro and am very new to this.
What I want to achieve:
I have two sets of radio buttons; one group is "Likelihood" choices and the other group are "Consequence" choices. Based on what the user picks in those two groups, I want the form to auto-populate the risk rating in another field. E.g If the user picks "Insignificant" in the consequence group and "Rare" in the likelihood group; the field titled Risk Rating should display the word "Low". If they pick "Insignificant" and "Almost Certain" the Risk Rating field should display "Moderate". Please let me know if you need further information. Thanks in advance.

You can use something like this code as the custom calculation script of the risk rating field:
var consequence = this.getField("Consequence").valueAsString;
var likelihood = this.getField("Likelihood").valueAsString;
if (consequence=="Insignificant" && likelihood=="Rare") event.value = "Low";
else if (consequence=="Insignificant" && likelihood=="Almost Certain") event.value = "Moderate";
// etc.
else event.value = "";
Edit: Fixed small mistake in code.

Radio Buttons + Required Input/Output Fields in Dialog Programming

Hi All,
Please find the below issue.
I have 2 Radio buttons
RB1 and RB2 defined in group RG.
And by default RB1 is selected.
I also have 3 Input.Output Fields.
F1 , F2 & F3.
Now before displaying the Screen for the end user,
I need to display as follows:
A)
RB1 = X -
> Selected.
RB2 = Space -
>Not Selected.
F1 -
> Visible.
F2 & F3 -
>Invisible.
B)
RB1 = space -
> Not Selected.
RB2 = X -
>Selected.
F1 -
>Invisible.
F2 -
>Visible.
F3 -
>Visible.
When i am debugging, the value of RB1 is not X though it is selected on the screen (by default due to Radio Button Group) & hence the below code is not working.
*_PBO:_*
LOOP AT SCREEN.
IF RB1 = 'X' AND ( SCREEN-NAME = 'TXT2' OR SCREEN-NAME = 'TXT3' ).
         SCREEN-INVISIBLE = 1.
ELSEIF RB1 = 'X' AND ( SCREEN-NAME = 'F2' OR SCREEN-NAME = 'F3 ).
         SCREEN-ACTIVE = 0.
ENDIF.
Modify Screen.
ENDLOOP.
But when i select RB2 = X on the screen.
Value is getting populated .
Waiting for your hints/ideas/suggestions
Thanks
Sri.

Alright, you defined the radio buttons and grouped them. Did you also assign Fcode to the radio button group? if not already assigned the assign something to FctCode to the radio button. If you can double click on one and assign a name, this will automatically assign to other one. If you already did that... just ignore it.
Next, by defualt, RB1 will not be having 'X' though it shows selected but you can always make it by just writing the following statement in PBO (If you dont want to mislead anybody)
if RB1 = space and RB2 = space.
RB1 = 'X'.
endif.
If you have already done that the next step would be.... Assign a screen group value to the fields F1, F2 and F3.
for example, double click on the field F1, add GR1 in groups in first box and do the same for field text/label if any. Same way, assign GR2 to F2 and F3.
Then add the following code in PBO. (Someone or you can write it better. This is just an example)
LOOP AT SCREEN.
    if RB1 = 'X'.
       if screen-group1 = 'GR2'.
          screen-input = 0.
          screen-invisible = 1.
       endif.
    endif.
    if RB2 = 'X'.
       if screen-group1 = 'GR1'.
          screen-input = 0.
          screen-invisible = 1.
       endif.
    endif.
    MODIFY SCREEN.
ENDLOOP.
Good luck... It is working code.,

I have 6 radio buttons.i want to use a case statement to read them.

i have 6 radio buttons.i grouped them.i want to read them in a subroutine using a case statement.how can i read them

Hi Leela,
You cannot use the Case statement to read the radio buttons.
nstead you will have to use Loop at Screen under At Selection Screen Output.
Please refer to the below code or the reference:
*& Report ZHYPERION                                                   *
*& Project : SubSea7
Created on : 07/02/2007
Created by : Puneet Jhari.
*& Purpose : For SAP Interface download Hyperion.
REPORT zhyperion NO STANDARD PAGE HEADING MESSAGE-ID zhyper.
Start of Data Declaration
TYPE-POOLS : truxs,vrm.
TABLES : glpct,cepc.
DATA : var TYPE i,
        total TYPE f.
DATA : BEGIN OF wa2,
       ryear LIKE glpct-ryear,
       rbukrs LIKE glpct-rbukrs,
       racct LIKE glpct-racct,
       ksl01 LIKE glpct-ksl01,
       END OF wa2.
DATA : BEGIN OF wa3,
       ryear LIKE glpct-ryear,
       rbukrs LIKE glpct-rbukrs,
       racct LIKE glpct-racct,
       ksl01 LIKE glpct-ksl01,
       END OF wa3.
DATA : BEGIN OF wa4,
       racct LIKE glpct-racct,
       END OF wa4.
DATA : BEGIN OF wa5,
       rbukrs LIKE glpct-rbukrs,
       racct LIKE glpct-racct,
       total1(8) TYPE p DECIMALS 2,
       END OF wa5.
DATA : BEGIN OF wa9,
       khinr LIKE cepc-khinr,
       racct LIKE glpct-racct,
       total1(8) TYPE p DECIMALS 2,
       END OF wa9.
DATA : BEGIN OF wa6,
       khinr LIKE cepc-khinr,
       prctr LIKE cepc-prctr,
       rprctr LIKE glpct-rprctr,
       ryear LIKE glpct-ryear,
       rbukrs LIKE glpct-rbukrs,
       racct LIKE glpct-racct,
       ksl01 LIKE glpct-ksl01,
       END OF wa6.
DATA : BEGIN OF wa7,
       khinr LIKE cepc-khinr,
       prctr LIKE cepc-prctr,
       rprctr LIKE glpct-rprctr,
       ryear LIKE glpct-ryear,
       rbukrs LIKE glpct-rbukrs,
       racct LIKE glpct-racct,
       ksl01 LIKE glpct-ksl01,
       END OF wa7.
DATA : itab3 LIKE TABLE OF wa2,
       itab4 LIKE TABLE OF wa3,
       itab5 LIKE TABLE OF wa4 WITH HEADER LINE,
       itab6 LIKE TABLE OF wa5 WITH HEADER LINE,
       itab7 LIKE TABLE OF wa6,
       itab8 LIKE TABLE OF wa7,
       itab10 LIKE TABLE OF wa9.
DATA : flag(1) TYPE c,
       temp(6) TYPE c.
DATA : itab2 TYPE truxs_t_text_data,
       itab9 TYPE truxs_t_text_data WITH HEADER LINE.
DATA : name TYPE vrm_id,
       list TYPE vrm_values,
       value LIKE LINE OF list,
       FILNAM11 TYPE STRING,
       FILNAM21 TYPE STRING.
End of Data Declaration
Begin of Selection Screen
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
PARAMETERS: r1 DEFAULT 'X' RADIOBUTTON GROUP g1 USER-COMMAND rad1,
r2 RADIOBUTTON GROUP g1 .
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN BEGIN OF BLOCK b3 WITH FRAME TITLE text-005.
PARAMETERS: rbukrs1 TYPE glpct-rbukrs MODIF ID ful,
            khinr1 TYPE cepc-khinr AS LISTBOX VISIBLE LENGTH 20
            MODIF ID sam ,
            ryear1 TYPE glpct-ryear MODIF ID ful,
            ryear2 TYPE glpct-ryear MODIF ID sam,
            rpmax1 TYPE i MODIF ID ful,
            rpmax2 TYPE i MODIF ID sam,
            filnam1 TYPE rlgrap-filename MODIF ID ful,
            filnam2 TYPE RLGRAP-FILENAME MODIF ID sam.
SELECTION-SCREEN END OF BLOCK b3.
End of Selection Screen
AT SELECTION-SCREEN OUTPUT
AT SELECTION-SCREEN OUTPUT.
PERFORM populate.          "For populating the drop-down list.
CLEAR VALUE.
REFRESH LIST.
NAME = 'KHINR1'.
VALUE-KEY = '1S7_NOCASV'.
VALUE-TEXT = '1S7_NOCASV'.
APPEND VALUE TO LIST.
VALUE-KEY = '1S7_NOCJOT'.
VALUE-TEXT = '1S7_NOCJOT'.
APPEND VALUE TO LIST.
LOOP AT SCREEN.            "For toggling between the selection screens.
    IF r1 EQ 'X'.
      IF screen-group1 = 'SAM'.
        screen-active = 0.
      ENDIF.
    ELSEIF r2 EQ 'X'.
      IF screen-group1 = 'FUL'.
        screen-active = 0.
      ENDIF.
    ENDIF.
    MODIFY SCREEN.
ENDLOOP.
For the Drop-Down Listbox
CALL FUNCTION 'VRM_SET_VALUES'
    EXPORTING
      id                    = name
      values                = list
EXCEPTIONS
ID_ILLEGAL_NAME       = 1
OTHERS                = 2
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
Begin of Data Selection
START-OF-SELECTION.
When Company Code radio button is selected.
IF r1 EQ 'X'.            "If Company Code radio button is selected.
    IF rbukrs1 IS INITIAL.
      MESSAGE i002.
      LEAVE TO SCREEN 1000.
    ENDIF.
    IF rpmax1 IS INITIAL.
      MESSAGE i002.
      LEAVE TO SCREEN 1000.
    ENDIF.
    IF ryear1 IS INITIAL.
      MESSAGE i002.
      LEAVE TO SCREEN 1000.
    ENDIF.
    IF filnam1 IS INITIAL.
      MESSAGE i002.
      LEAVE TO SCREEN 1000.
    ENDIF.
MOVE FILNAM1 TO FILNAM11.
    CASE rpmax1.
      WHEN '01'.
        SELECT ryear rbukrs racct ksl01
FROM glpct INTO TABLE itab3 WHERE rbukrs EQ rbukrs1 AND ryear EQ ryear1.
      WHEN '02'.
        SELECT ryear rbukrs racct ksl02
FROM glpct INTO TABLE itab3 WHERE rbukrs EQ rbukrs1 AND ryear EQ ryear1.
      WHEN '03'.
        SELECT ryear rbukrs racct ksl03
FROM glpct INTO TABLE itab3 WHERE rbukrs EQ rbukrs1 AND ryear EQ ryear1.
      WHEN '04'.
        SELECT ryear rbukrs racct ksl04
FROM glpct INTO TABLE itab3 WHERE rbukrs EQ rbukrs1 AND ryear EQ ryear1.
      WHEN '05'.
        SELECT ryear rbukrs racct ksl05
FROM glpct INTO TABLE itab3 WHERE rbukrs EQ rbukrs1 AND ryear EQ ryear1.
      WHEN '06'.
        SELECT ryear rbukrs racct ksl06
FROM glpct INTO TABLE itab3 WHERE rbukrs EQ rbukrs1 AND ryear EQ ryear1.
      WHEN '07'.
        SELECT ryear rbukrs racct ksl07
FROM glpct INTO TABLE itab3 WHERE rbukrs EQ rbukrs1 AND ryear EQ ryear1.
      WHEN '08'.
        SELECT ryear rbukrs racct ksl08
FROM glpct INTO TABLE itab3 WHERE rbukrs EQ rbukrs1 AND ryear EQ ryear1.
      WHEN '09'.
        SELECT ryear rbukrs racct ksl09
FROM glpct INTO TABLE itab3 WHERE rbukrs EQ rbukrs1 AND ryear EQ ryear1.
      WHEN '10'.
        SELECT ryear rbukrs racct ksl10
FROM glpct INTO TABLE itab3 WHERE rbukrs EQ rbukrs1 AND ryear EQ ryear1.
      WHEN '11'.
        SELECT ryear rbukrs racct ksl11
FROM glpct INTO TABLE itab3 WHERE rbukrs EQ rbukrs1 AND ryear EQ ryear1.
      WHEN '12'.
        SELECT ryear rbukrs racct ksl12
FROM glpct INTO TABLE itab3 WHERE rbukrs EQ rbukrs1 AND ryear EQ ryear1.
      WHEN '13'.
        SELECT ryear rbukrs racct ksl13
FROM glpct INTO TABLE itab3 WHERE rbukrs EQ rbukrs1 AND ryear EQ ryear1.
      WHEN '14'.
        SELECT ryear rbukrs racct ksl14
FROM glpct INTO TABLE itab3 WHERE rbukrs EQ rbukrs1 AND ryear EQ ryear1.
      WHEN '15'.
        SELECT ryear rbukrs racct ksl15
FROM glpct INTO TABLE itab3 WHERE rbukrs EQ rbukrs1 AND ryear EQ ryear1.
      WHEN '16'.
        SELECT ryear rbukrs racct ksl16
FROM glpct INTO TABLE itab3 WHERE rbukrs EQ rbukrs1 AND ryear EQ ryear1.
    ENDCASE.
    MOVE itab3 TO itab4.
    LOOP AT itab3 INTO wa2.
      flag = 0.
      LOOP AT itab5 INTO wa4.
        IF wa2-racct EQ wa4-racct.
          flag = 1.
          EXIT.
        ENDIF.
      ENDLOOP.
      DELETE ADJACENT DUPLICATES FROM itab5.
      IF flag = 1.
        CONTINUE.
      ENDIF.
      LOOP AT itab4 INTO wa3.
        IF wa2-rbukrs EQ wa3-rbukrs AND wa2-racct EQ wa3-racct AND
        wa2-ryear EQ wa3-ryear.
          total = total + wa3-ksl01.
        ENDIF.
      ENDLOOP.
      wa5-rbukrs = wa2-rbukrs.
      wa5-racct = wa2-racct+4(6).
      wa5-total1 = total.
      APPEND wa5 TO itab6.
      CLEAR total.
      APPEND wa2-racct TO itab5.
    ENDLOOP.
If no data is available corresponding to the values entered.
    IF itab6[] IS INITIAL.
      MESSAGE i003.
    ENDIF.
For making the file Comma separated
    CALL FUNCTION 'SAP_CONVERT_TO_TEX_FORMAT'
      EXPORTING
        i_field_seperator          = ','
I_LINE_HEADER              =
I_FILENAME                 =
I_APPL_KEEP                = ' '
      TABLES
        i_tab_sap_data             = itab6
     CHANGING
       i_tab_converted_data       = itab2
EXCEPTIONS
CONVERSION_FAILED          = 1
OTHERS                     = 2
    IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
For downloading it to the Presentation Server
   MOVE itab2[] TO itab9[].
   OPEN DATASET filnam1 FOR OUTPUT IN LEGACY TEXT MODE.
   LOOP AT itab9.
     TRANSFER itab9 TO filnam1.
   ENDLOOP.
   CLOSE DATASET filnam1.
   IF sy-subrc EQ 0.
     MESSAGE s004.
   ENDIF.
CALL FUNCTION 'GUI_DOWNLOAD'
EXPORTING
BIN_FILESIZE                    =
    filename                        = FILNAM11
FILETYPE                        = 'ASC'
APPEND                          = ' '
WRITE_FIELD_SEPARATOR           = ' '
HEADER                          = '00'
TRUNC_TRAILING_BLANKS           = ' '
WRITE_LF                        = 'X'
COL_SELECT                      = ' '
COL_SELECT_MASK                 = ' '
DAT_MODE                        = ' '
CONFIRM_OVERWRITE               = ' '
NO_AUTH_CHECK                   = ' '
CODEPAGE                        = ' '
IGNORE_CERR                     = ABAP_TRUE
REPLACEMENT                     = '#'
WRITE_BOM                       = ' '
TRUNC_TRAILING_BLANKS_EOL       = 'X'
WK1_N_FORMAT                    = ' '
WK1_N_SIZE                      = ' '
WK1_T_FORMAT                    = ' '
WK1_T_SIZE                      = ' '
WRITE_LF_AFTER_LAST_LINE        = ABAP_TRUE
IMPORTING
FILELENGTH                      =
tables
    data_tab                        = itab2
FIELDNAMES                      =
EXCEPTIONS
FILE_WRITE_ERROR                = 1
NO_BATCH                        = 2
GUI_REFUSE_FILETRANSFER         = 3
INVALID_TYPE                    = 4
NO_AUTHORITY                    = 5
UNKNOWN_ERROR                   = 6
HEADER_NOT_ALLOWED              = 7
SEPARATOR_NOT_ALLOWED           = 8
FILESIZE_NOT_ALLOWED            = 9
HEADER_TOO_LONG                 = 10
DP_ERROR_CREATE                 = 11
DP_ERROR_SEND                   = 12
DP_ERROR_WRITE                  = 13
UNKNOWN_DP_ERROR                = 14
ACCESS_DENIED                   = 15
DP_OUT_OF_MEMORY                = 16
DISK_FULL                       = 17
DP_TIMEOUT                      = 18
FILE_NOT_FOUND                  = 19
DATAPROVIDER_EXCEPTION          = 20
CONTROL_FLUSH_ERROR             = 21
OTHERS                          = 22
IF sy-subrc eq 0.
message s004.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
When Region radio button is selected.
ELSEIF r2 EQ 'X'.
    IF khinr1 IS INITIAL.
      MESSAGE i002.
      LEAVE TO SCREEN 1000.
    ENDIF.
    IF rpmax2 IS INITIAL.
      MESSAGE i002.
      LEAVE TO SCREEN 1000.
    ENDIF.
    IF ryear2 IS INITIAL.
      MESSAGE i002.
      LEAVE TO SCREEN 1000.
    ENDIF.
    IF filnam2 IS INITIAL.
      MESSAGE i002.
      LEAVE TO SCREEN 1000.
    ENDIF.
MOVE FILNAM2 TO FILNAM21.
    CASE rpmax2.
      WHEN '01'.
       SELECT ckhinr cprctr grprctr gryear grbukrs gracct g~ksl01
       INTO CORRESPONDING FIELDS OF TABLE itab7
       FROM ( glpct AS g
               INNER JOIN cepc AS c ON grprctr = cprctr )
       WHERE c~khinr = khinr1 AND
             g~ryear = ryear2.
      WHEN '02'.
       SELECT ckhinr cprctr grprctr gryear grbukrs gracct g~ksl02
       INTO CORRESPONDING FIELDS OF TABLE itab7
       FROM ( glpct AS g
               INNER JOIN cepc AS c ON grprctr = cprctr )
       WHERE c~khinr = khinr1 AND
             g~ryear = ryear2.
      WHEN '03'.
       SELECT ckhinr cprctr grprctr gryear grbukrs gracct g~ksl03
       INTO CORRESPONDING FIELDS OF TABLE itab7
       FROM ( glpct AS g
               INNER JOIN cepc AS c ON grprctr = cprctr )
       WHERE c~khinr = khinr1 AND
             g~ryear = ryear2.
      WHEN '04'.
       SELECT ckhinr cprctr grprctr gryear grbukrs gracct g~ksl04
       INTO CORRESPONDING FIELDS OF TABLE itab7
       FROM ( glpct AS g
               INNER JOIN cepc AS c ON grprctr = cprctr )
       WHERE c~khinr = khinr1 AND
             g~ryear = ryear2.
      WHEN '05'.
       SELECT ckhinr cprctr grprctr gryear grbukrs gracct g~ksl05
       INTO CORRESPONDING FIELDS OF TABLE itab7
       FROM ( glpct AS g
               INNER JOIN cepc AS c ON grprctr = cprctr )
       WHERE c~khinr = khinr1 AND
             g~ryear = ryear2.
      WHEN '06'.
       SELECT ckhinr cprctr grprctr gryear grbukrs gracct g~ksl06
       INTO CORRESPONDING FIELDS OF TABLE itab7
       FROM ( glpct AS g
               INNER JOIN cepc AS c ON grprctr = cprctr )
       WHERE c~khinr = khinr1 AND
             g~ryear = ryear2.
      WHEN '07'.
       SELECT ckhinr cprctr grprctr gryear grbukrs gracct g~ksl07
       INTO CORRESPONDING FIELDS OF TABLE itab7
       FROM ( glpct AS g
               INNER JOIN cepc AS c ON grprctr = cprctr )
       WHERE c~khinr = khinr1 AND
             g~ryear = ryear2.
      WHEN '08'.
       SELECT ckhinr cprctr grprctr gryear grbukrs gracct g~ksl08
       INTO CORRESPONDING FIELDS OF TABLE itab7
       FROM ( glpct AS g
               INNER JOIN cepc AS c ON grprctr = cprctr )
       WHERE c~khinr = khinr1 AND
             g~ryear = ryear2.
      WHEN '09'.
       SELECT ckhinr cprctr grprctr gryear grbukrs gracct g~ksl09
       INTO CORRESPONDING FIELDS OF TABLE itab7
       FROM ( glpct AS g
               INNER JOIN cepc AS c ON grprctr = cprctr )
       WHERE c~khinr = khinr1 AND
             g~ryear = ryear2.
      WHEN '10'.
       SELECT ckhinr cprctr grprctr gryear grbukrs gracct g~ksl10
       INTO CORRESPONDING FIELDS OF TABLE itab7
       FROM ( glpct AS g
               INNER JOIN cepc AS c ON grprctr = cprctr )
       WHERE c~khinr = khinr1 AND
             g~ryear = ryear2.
      WHEN '11'.
       SELECT ckhinr cprctr grprctr gryear grbukrs gracct g~ksl11
       INTO CORRESPONDING FIELDS OF TABLE itab7
       FROM ( glpct AS g
               INNER JOIN cepc AS c ON grprctr = cprctr )
       WHERE c~khinr = khinr1 AND
             g~ryear = ryear2.
      WHEN '12'.
       SELECT ckhinr cprctr grprctr gryear grbukrs gracct g~ksl12
       INTO CORRESPONDING FIELDS OF TABLE itab7
       FROM ( glpct AS g
               INNER JOIN cepc AS c ON grprctr = cprctr )
       WHERE c~khinr = khinr1 AND
             g~ryear = ryear2.
      WHEN '13'.
       SELECT ckhinr cprctr grprctr gryear grbukrs gracct g~ksl13
       INTO CORRESPONDING FIELDS OF TABLE itab7
       FROM ( glpct AS g
               INNER JOIN cepc AS c ON grprctr = cprctr )
       WHERE c~khinr = khinr1 AND
             g~ryear = ryear2.
      WHEN '14'.
       SELECT ckhinr cprctr grprctr gryear grbukrs gracct g~ksl14
       INTO CORRESPONDING FIELDS OF TABLE itab7
       FROM ( glpct AS g
               INNER JOIN cepc AS c ON grprctr = cprctr )
       WHERE c~khinr = khinr1 AND
             g~ryear = ryear2.
      WHEN '15'.
       SELECT ckhinr cprctr grprctr gryear grbukrs gracct g~ksl15
       INTO CORRESPONDING FIELDS OF TABLE itab7
       FROM ( glpct AS g
               INNER JOIN cepc AS c ON grprctr = cprctr )
       WHERE c~khinr = khinr1 AND
             g~ryear = ryear2.
      WHEN '16'.
       SELECT ckhinr cprctr grprctr gryear grbukrs gracct g~ksl16
       INTO CORRESPONDING FIELDS OF TABLE itab7
       FROM ( glpct AS g
               INNER JOIN cepc AS c ON grprctr = cprctr )
       WHERE c~khinr = khinr1 AND
             g~ryear = ryear2.
    ENDCASE.
    MOVE itab7 TO itab8.
    LOOP AT itab7 INTO wa6.
      flag = 0.
      LOOP AT itab5 INTO wa4.
        IF wa6-racct EQ wa4-racct.
          flag = 1.
          EXIT.
        ENDIF.
      ENDLOOP.
      DELETE ADJACENT DUPLICATES FROM itab5.
      IF flag = 1.
        CONTINUE.
      ENDIF.
      LOOP AT itab8 INTO wa7.
        IF wa6-rbukrs EQ wa7-rbukrs AND wa6-racct EQ wa7-racct AND
        wa6-ryear EQ wa7-ryear.
          total = total + wa7-ksl01.
        ENDIF.
      ENDLOOP.
      wa9-khinr = khinr1.
      wa9-racct = wa6-racct+4(6).
      wa9-total1 = total.
      APPEND wa9 TO itab10.
      CLEAR total.
      APPEND wa6-racct TO itab5.
    ENDLOOP.
*If no data is available corresponding to the values entered.
    IF itab10 IS INITIAL.
      MESSAGE i003.
    ENDIF.
For making the file Comma separated
    CALL FUNCTION 'SAP_CONVERT_TO_TEX_FORMAT'
      EXPORTING
        i_field_seperator          = ','
I_LINE_HEADER              =
I_FILENAME                 =
I_APPL_KEEP                = ' '
      TABLES
        i_tab_sap_data             = itab10
     CHANGING
       i_tab_converted_data       = itab2
EXCEPTIONS
CONVERSION_FAILED          = 1
OTHERS                     = 2
    IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
For downloading it to the Presentation Server
   MOVE itab2[] TO itab9[].
   OPEN DATASET filnam2 FOR OUTPUT IN LEGACY TEXT MODE.
   LOOP AT itab9.
     TRANSFER itab9 TO filnam2.
   ENDLOOP.
   CLOSE DATASET filnam2.
   IF sy-subrc EQ 0.
     MESSAGE s004.
   ENDIF.
CALL FUNCTION 'GUI_DOWNLOAD'
EXPORTING
BIN_FILESIZE                    =
    filename                        = FILNAM21
FILETYPE                        = 'ASC'
APPEND                          = ' '
WRITE_FIELD_SEPARATOR           = ' '
HEADER                          = '00'
TRUNC_TRAILING_BLANKS           = ' '
WRITE_LF                        = 'X'
COL_SELECT                      = ' '
COL_SELECT_MASK                 = ' '
DAT_MODE                        = ' '
CONFIRM_OVERWRITE               = ' '
NO_AUTH_CHECK                   = ' '
CODEPAGE                        = ' '
IGNORE_CERR                     = ABAP_TRUE
REPLACEMENT                     = '#'
WRITE_BOM                       = ' '
TRUNC_TRAILING_BLANKS_EOL       = 'X'
WK1_N_FORMAT                    = ' '
WK1_N_SIZE                      = ' '
WK1_T_FORMAT                    = ' '
WK1_T_SIZE                      = ' '
WRITE_LF_AFTER_LAST_LINE        = ABAP_TRUE
IMPORTING
FILELENGTH                      =
tables
    data_tab                        = itab2
FIELDNAMES                      =
EXCEPTIONS
FILE_WRITE_ERROR                = 1
NO_BATCH                        = 2
GUI_REFUSE_FILETRANSFER         = 3
INVALID_TYPE                    = 4
NO_AUTHORITY                    = 5
UNKNOWN_ERROR                   = 6
HEADER_NOT_ALLOWED              = 7
SEPARATOR_NOT_ALLOWED           = 8
FILESIZE_NOT_ALLOWED            = 9
HEADER_TOO_LONG                 = 10
DP_ERROR_CREATE                 = 11
DP_ERROR_SEND                   = 12
DP_ERROR_WRITE                  = 13
UNKNOWN_DP_ERROR                = 14
ACCESS_DENIED                   = 15
DP_OUT_OF_MEMORY                = 16
DISK_FULL                       = 17
DP_TIMEOUT                      = 18
FILE_NOT_FOUND                  = 19
DATAPROVIDER_EXCEPTION          = 20
CONTROL_FLUSH_ERROR             = 21
OTHERS                          = 22
IF sy-subrc eq 0.
message s004.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDIF.
*&      Form POPULATE
      text
FORM populate.
CLEAR value.
REFRESH list.
name = 'KHINR1'.
value-key = '1S7_SUBSEA'.
value-text = '1S7_SUBSEA'.
APPEND value TO list.
value-key = '1S7_GEN'.
value-text = '1S7_GEN'.
APPEND value TO list.
value-key = '1S7'.
value-text = '1S7'.
APPEND value TO list.
value-key = '1S7_CORPTP'.
value-text = '1S7_CORPTP'.
APPEND value TO list.
value-key = '1S7_BRRE'.
value-text = '1S7_BRRE'.
APPEND value TO list.
value-key = '1S7_BRCON'.
value-text = '1S7_BRCON'.
APPEND value TO list.
value-key = '1S7_BRCJOB'.
value-text = '1S7_BRCJOB'.
APPEND value TO list.
value-key = '1S7_BRCJBU'.
value-text = '1S7_BRCJBU'.
APPEND value TO list.
value-key = '1S7_BRCJCO'.
value-text = '1S7_BRCJCO'.
APPEND value TO list.
value-key = '1S7_BRCJIR'.
value-text = '1S7_BRCJIR'.
APPEND value TO list.
value-key = '1S7_BRCJEN'.
value-text = '1S7_BRCJEN'.
APPEND value TO list.
value-key = '1S7_BRCJPI'.
value-text = '1S7_BRCJPI'.
APPEND value TO list.
value-key = '1S7_BRCJSU'.
value-text = '1S7_BRCJSU'.
APPEND value TO list.
value-key = '1S7_BRCJFL'.
value-text = '1S7_BRCJFL'.
APPEND value TO list.
value-key = '1S7_BRCJOT'.
value-text = '1S7_BRCJOT'.
APPEND value TO list.
value-key = '1S7_BRCASV'.
value-text = '1S7_BRCASV'.
APPEND value TO list.
value-key = '1S7_BRCASE'.
value-text = '1S7_BRCASE'.
APPEND value TO list.
value-key = '1S7_BRCOOC'.
value-text = '1S7_BRCOOC'.
APPEND value TO list.
value-key = '1S7_BRCOHD'.
value-text = '1S7_BRCOHD'.
APPEND value TO list.
value-key = '1S7_BRCGEN'.
value-text = '1S7_BRCGEN'.
APPEND value TO list.
value-key = '1S7_BRDRI'.
value-text = '1S7_BRDRI'.
APPEND value TO list.
value-key = '1S7_BRDJOB'.
value-text = '1S7_BRDJOB'.
APPEND value TO list.
value-key = '1S7_BRDASV'.
value-text = '1S7_BRDASV'.
APPEND value TO list.
value-key = '1S7_BRDASE'.
value-text = '1S7_BRDASE'.
APPEND value TO list.
value-key = '1S7_BRDAEW'.
value-text = '1S7_BRDAEW'.
APPEND value TO list.
value-key = '1S7_BRDAEO'.
value-text = '1S7_BRDAEO'.
APPEND value TO list.
value-key = '1S7_BRDAET'.
value-text = '1S7_BRDAET'.
APPEND value TO list.
value-key = '1S7_BRDOOC'.
value-text = '1S7_BRDOOC'.
APPEND value TO list.
value-key = '1S7_BRDOHD'.
value-text = '1S7_BRDOHD'.
APPEND value TO list.
value-key = '1S7_BRVER'.
value-text = '1S7_BRVER'.
APPEND value TO list.
value-key = '1S7_BRVJOB'.
value-text = '1S7_BRVJOB'.
APPEND value TO list.
value-key = '1S7_BRVASV'.
value-text = '1S7_BRVASV'.
APPEND value TO list.
value-key = '1S7_BRVASE'.
value-text = '1S7_BRVASE'.
APPEND value TO list.
value-key = '1S7_BRVOOC'.
value-text = '1S7_BRVOOC'.
APPEND value TO list.
value-key = '1S7_BRVOHD'.
value-text = '1S7_BRVOHD'.
APPEND value TO list.
value-key = '1S7_UKRE'.
value-text = '1S7_UKRE'.
APPEND value TO list.
value-key = '1S7_UKCON'.
value-text = '1S7_UKCON'.
APPEND value TO list.
value-key = '1S7_UKCJOB'.
value-text = '1S7_UKCJOB'.
APPEND value TO list.
value-key = '1S7_UKCJBU'.
value-text = '1S7_UKCJBU'.
APPEND value TO list.
value-key = '1S7_UKCJCO'.
value-text = '1S7_UKCJCO'.
APPEND value TO list.
value-key = '1S7_UKCJIR'.
value-text = '1S7_UKCJIR'.
APPEND value TO list.
value-key = '1S7_UKCJEN'.
value-text = '1S7_UKCJEN'.
APPEND value TO list.
value-key = '1S7_UKCJPI'.
value-text = '1S7_UKCJPI'.
APPEND value TO list.
value-key = '1S7_UKCJSU'.
value-text = '1S7_UKCJSU'.
APPEND value TO list.
value-key = '1S7_UKCJFL'.
value-text = '1S7_UKCJFL'.
APPEND value TO list.
value-key = '1S7_UKCJOT'.
value-text = '1S7_UKCJOT'.
APPEND value TO list.
value-key = '1S7_UKCASV'.
value-text = '1S7_UKCASV'.
APPEND value TO list.
value-key = '1S7_UKCASE'.
value-text = '1S7_UKCASE'.
APPEND value TO list.
value-key = '1S7_UKCOOC'.
value-text = '1S7_UKCOOC'.
APPEND value TO list.
value-key = '1S7_UKBA'.
value-text = '1S7_UKBA'.
APPEND value TO list.
value-key = '1S7_UKBATE'.
value-text = '1S7_UKBATE'.
APPEND value TO list.
value-key = '1S7_UKCOHD'.
value-text = '1S7_UKCOHD'.
APPEND value TO list.
value-key = '1S7_UKCGEN'.
value-text = '1S7_UKCGEN'.
APPEND value TO list.
value-key = '1S7_UKDRI'.
value-text = '1S7_UKDRI'.
APPEND value TO list.
value-key = '1S7_UKDJOB'.
value-text = '1S7_UKDJOB'.
APPEND value TO list.
value-key = '1S7_UKDASV'.
value-text = '1S7_UKDASV'.
APPEND value TO list.
value-key = '1S7_UKDASE'.
value-text = '1S7_UKDASE'.
APPEND value TO list.
value-key = '1S7_UKDAEW'.
value-text = '1S7_UKDAEW'.
APPEND value TO list.
value-key = '1S7_UKDAEO'.
value-text = '1S7_UKDAEO'.
APPEND value TO list.
value-key = '1S7_UKDAET'.
value-text = '1S7_UKDAET'.
APPEND value TO list.
value-key = '1S7_UKDOOC'.
value-text = '1S7_UKDOOC'.
APPEND value TO list.
value-key = '1S7_UKDOHD'.
value-text = '1S7_UKDOHD'.
APPEND value TO list.
value-key = '1S7_UKVER'.
value-text = '1S7_UKVER'.
APPEND value TO list.
value-key = '1S7_UKVJOB'.
value-text = '1S7_UKVJOB'.
APPEND value TO list.
value-key = '1S7_UKVASV'.
value-text = '1S7_UKVASV'.
APPEND value TO list.
value-key = '1S7_UKVASE'.
value-text = '1S7_UKVASE'.
APPEND value TO list.
value-key = '1S7_UKVOOC'.
value-text = '1S7_UKVOOC'.
APPEND value TO list.
value-key = '1S7_UKVOHD'.
value-text = '1S7_UKVOHD'.
APPEND value TO list.
value-key = '1S7_NORE'.
value-text = '1S7_NORE'.
APPEND value TO list.
value-key = '1S7_NOCON'.
value-text = '1S7_NOCON'.
APPEND value TO list.
value-key = '1S7_NOCJOB'.
value-text = '1S7_NOCJOB'.
APPEND value TO list.
value-key = '1S7_NOCJBU'.
value-text = '1S7_NOCJBU'.
APPEND value TO list.
value-key = '1S7_NOCJCO'.
value-text = '1S7_NOCJCO'.
APPEND value TO list.
value-key = '1S7_NOCJIR'.
value-text = '1S7_NOCJIR'.
APPEND value TO list.
value-key = '1S7_NOCJEN'.
value-text = '1S7_NOCJEN'.
APPEND value TO list.
value-key = '1S7_NOCJPI'.
value-text = '1S7_NOCJPI'.
APPEND value TO list.
value-key = '1S7_NOCJSU'.
value-text = '1S7_NOCJSU'.
APPEND value TO list.
value-key = '1S7_NOCJFL'.
value-text = '1S7_NOCJFL'.
APPEND value TO list.
value-key = '1S7_NOCJOT'.
value-text = '1S7_NOCJOT'.
APPEND value TO list.
value-key = '1S7_NOCASV'.
value-text = '1S7_NOCASV'.
APPEND value TO list.
value-key = '1S7_NOCASE'.
value-text = '1S7_NOCASE'.
APPEND value TO list.
value-key = '1S7_NOCOOC'.
value-text = '1S7_NOCOOC'.
APPEND value TO list.
value-key = '1S7_NOCOHD'.
value-text = '1S7_NOCOHD'.
APPEND value TO list.
value-key = '1S7_NOCGEN'.
value-text = '1S7_NOCGEN'.
APPEND value TO list.
value-key = '1S7_NODRI'.
value-text = '1S7_NODRI'.
APPEND value TO list.
value-key = '1S7_NODJOB'.
value-text = '1S7_NODJOB'.
APPEND value TO list.
value-key = '1S7_NODASV'.
value-text = '1S7_NODASV'.
APPEND value TO list.
value-key = '1S7_NODASE'.
value-text = '1S7_NODASE'.
APPEND value TO list.
value-key = '1S7_NODAEW'.
value-text = '1S7_NODAEW'.
APPEND value TO list.
value-key = '1S7_NODAEO'.
value-text = '1S7_NODAEO'.
APPEND value TO list.
value-key = '1S7_NODAET'.
value-text = '1S7_NODAET'.
APPEND value TO list.
value-key = '1S7_NODOOC'.
value-text = '1S7_NODOOC'.
APPEND value TO list.
value-key = '1S7_NODOHD'.
value-text = '1S7_NODOHD'.
APPEND value TO list.
value-key = '1S7_NOVER'.
value-text = '1S7_NOVER'.
APPEND value TO list.
value-key = '1S7_NOVJOB'.
value-text = '1S7_NOVJOB'.
APPEND value TO list.
value-key = '1S7_NOVASV'.
value-text = '1S7_NOVASV'.
APPEND value TO list.
value-key = '1S7_NOVASE'.
value-text = '1S7_NOVASE'.
APPEND value TO list.
value-key = '1S7_NOVOOC'.
value-text = '1S7_NOVOOC'.
APPEND value TO list.
value-key = '1S7_NOVOHD'.
value-text = '1S7_NOVOHD'.
APPEND value TO list.
value-key = '1S7_GORE'.
value-text = '1S7_GORE'.
APPEND value TO list.
value-key = '1S7_GOCON'.
value-text = '1S7_GOCON'.
APPEND value TO list.
value-key = '1S7_GOCJOB'.
value-text = '1S7_GOCJOB'.
APPEND value TO list.
value-key = '1S7_GOCJBU'.
value-text = '1S7_GOCJBU'.
APPEND value TO list.
value-key = '1S7_GOCJCO'.
value-text = '1S7_GOCJCO'.
APPEND value TO list.
value-key = '1S7_GOCJIR'.
value-text = '1S7_GOCJIR'.
APPEND value TO list.
value-key = '1S7_GOCJEN'.
value-text = '1S7_GOCJEN'.
APPEND value TO list.
value-key = '1S7_GOCJPI'.
value-text = '1S7_GOCJPI'.
APPEND value TO list.
value-key = '1S7_GOCJSU'.
value-text = '1S7_GOCJSU'.
APPEND value TO list.
value-key = '1S7_GOCJFL'.
value-text = '1S7_GOCJFL'.
APPEND value TO list.
value-key = '1S7_GOCJOT'.
value-text = '1S7_GOCJOT'.
APPEND value TO list.
value-key = '1S7_GOCASV'.
value-text = '1S7_GOCASV'.
APPEND value TO list.
value-key = '1S7_GOCASE'.
value-text = '1S7_GOCASE'.
APPEND value TO list.
value-key = '1S7_GOCOOC'.
value-text = '1S7_GOCOOC'.
APPEND value TO list.
value-key = '1S7_GOCOHD'.
value-text = '1S7_GOCOHD'.
APPEND value TO list.
value-key = '1S7_GOCGEN'.
value-text = '1S7_GOCGEN'.
APPEND value TO list.
value-key = '1S7_GODRI'.
value-text = '1S7_GODRI'.
APPEND value TO list.
value-key = '1S7_GODJOB'.
value-text = '1S7_GODJOB'.
APPEND value TO list.
value-key = '1S7_GODASV'.
value-text = '1S7_GODASV'.
APPEND value TO list.
value-key = '1S7_GODASE'.
value-text = '1S7_GODASE'.
APPEND value TO list.
value-key = '1S7_GODAEW'.
value-text = '1S7_GODAEW'.
APPEND value TO list.
value-key = '1S7_GODAEO'.
value-text = '1S7_GODAEO'.
APPEND value TO list.
value-key = '1S7_GODAET'.
value-text = '1S7_GODAET'.
APPEND value TO list.
value-key = '1S7_GODOOC'.
value-text = '1S7_GODOOC'.
APPEND value TO list.
value-key = '1S7_GODOHD'.
value-text = '1S7_GODOHD'.
APPEND value TO list.
value-key = '1S7_GOVER'.
value-text = '1S7_GOVER'.
APPEND value TO list.
value-key = '1S7_GOVJOB'.
value-text = '1S7_GOVJOB'.
APPEND value TO list.
value-key = '1S7_GOVASV'.
value-text = '1S7_GOVASV'.
APPEND value TO list.
value-key = '1S7_GOVASE'.
value-text = '1S7_GOVASE'.
APPEND value TO list.
value-key = '1S7_GOVOOC'.
value-text = '1S7_GOVOOC'.
APPEND value TO list.
value-key = '1S7_GOVOHD'.
value-text = '1S7_GOVOHD'.
APPEND value TO list.
value-key = '1S7_GVRE'.
value-text = '1S7_GVRE'.
APPEND value TO list.
value-key = '1S7_GVCON'.
value-text = '1S7_GVCON'.
APPEND value TO list.
value-key = '1S7_GVCJOB'.
value-text = '1S7_GVCJOB'.
APPEND value TO list.
value-key = '1S7_GVCJBU'.
value-text = '1S7_GVCJBU'.
APPEND value TO list.
value-key = '1S7_GVCJCO'.
value-text = '1S7_GVCJCO'.
APPEND value TO list.
value-key = '1S7_GVCJIR'.
value-text = '1S7_GVCJIR'.
APPEND value TO list.
value-key = '1S7_GVCJEN'.
value-text = '1S7_GVCJEN'.
APPEND value TO list.
value-key = '1S7_GVCJPI'.
value-text = '1S7_GVCJPI'.
APPEND value TO list.
value-key = '1S7_GVCJSU'.
value-text = '1S7_GVCJSU'.
APPEND value TO list.
value-key = '1S7_GVCJFL'.
value-text = '1S7_GVCJFL'.
APPEND value TO list.
value-key = '1S7_GVCJOT'.
value-text = '1S7_GVCJOT'.
APPEND value TO list.
value-key = '1S7_GVCASV'.
value-text = '1S7_GVCASV'.
APPEND value TO list.
value-key = '1S7_GVCASE'.
value-text = '1S7_GVCASE'.
APPEND value TO list.
value-key = '1S7_GVCOOC'.
value-text = '1S7_GVCOOC'.
APPEND value TO list.
value-key = '1S7_GVCOHD'.
value-text = '1S7_GVCOHD'.
APPEND value TO list.
value-key = '1S7_GVCGEN'.
value-text = '1S7_GVCGEN'.
APPEND value TO list.
value-key = '1S7_GVDRI'.
value-text = '1S7_GVDRI'.
APPEND value TO list.
value-key = '1S7_GVDJOB'.
value-text = '1S7_GVDJOB'.
APPEND value TO list.
value-key = '1S7_GVDASV'.
value-text = '1S7_GVDASV'.
APPEND value TO list.
value-key = '1S7_GVDASE'.
value-text = '1S7_GVDASE'.
APPEND value TO list.
value-key = '1S7_GVDOOC'.
value-text = '1S7_GVDOOC'.
APPEND value TO list.
value-key = '1S7_GVDOHD'.
value-text = '1S7_GVDOHD'.
APPEND value TO list.
value-key = '1S7_GVVER'.
value-text = '1S7_GVVER'.
APPEND value TO list.
value-key = '1S7_GVVJOB'.
value-text = '1S7_GVVJOB'.
APPEND value TO list.
value-key = '1S7_GVVASV'.
value-text = '1S7_GVVASV'.
APPEND value TO list.
value-key = '1S7_GVVASE'.
value-text = '1S7_GVVASE'.
APPEND value TO list.
value-key = '1S7_GVVOOC'.
value-text = '1S7_GVVOOC'.
APPEND value TO list.
value-key = '1S7_GVVOHD'.
value-text = '1S7_GVVOHD'.
APPEND value TO list.
value-key = '1S7_GCRE'.
value-text = '1S7_GCRE'.
APPEND value TO list.
value-key = '1S7_GCCON'.
value-text = '1S7_GCCON'.
APPEND value TO list.
value-key = '1S7_GCCJOB'.
value-text = '1S7_GCCJOB'.
APPEND value TO list.
value-key = '1S7_GCCJBU'.
value-text = '1S7_GCCJBU'.
APPEND value TO list.
value-key = '1S7_GCCJCO'.
value-text = '1S7_GCCJCO'.
APPEND value TO list.
value-key = '1S7_GCCJIR'.
value-text = '1S7_GCCJIR'.
APPEND value TO list.
value-key = '1S7_GCCJEN'.
value-text = '1S7_GCCJEN'.
APPEND value TO list.
value-key = '1S7_GCCJPI'.
value-text = '1S7_GCCJPI'.
APPEND value TO list.
value-key = '1S7_GCCJSU'.
value-text = '1S7_GCCJSU'.
APPEND value TO list.
value-key = '1S7_GCCJFL'.
value-text = '1S7_GCCJFL'.
APPEND value TO list.
value-key = '1S7_GCCJOT'.
value-text = '1S7_GCCJOT'.
APPEND value TO list.
value-key = '1S7_GCCASV'.
value-text = '1S7_GCCASV'.
APPEND value TO list.
value-key = '1S7_GCCASE'.
value-text = '1S7_GCCASE'.
APPEND value TO list.
value-key = '1S7_GCCOOC'.
value-text = '1S7_GCCOOC'.
APPEND value TO list.
value-key = '1S7_GCCOHD'.
value-text = '1S7_GCCOHD'.
APPEND value TO list.
value-key = '1S7_GCCRD'.
value-text = '1S7_GCCRD'.
APPEND value TO list.
value-key = '1S7_GCCGEN'.
value-text = '1S7_GCCGEN'.
APPEND value TO list.
value-key = '1S7_GCDRI'.
value-text = '1S7_GCDRI'.
APPEND value TO list.
value-key = '1S7_GCDJOB'.
value-text = '1S7_GCDJOB'.
APPEND value TO list.
value-key = '1S7_GCDASV'.
value-text = '1S7_GCDASV'.
APPEND value TO list.
value-key = '1S7_GCDASE'.
value-text = '1S7_GCDASE'.
APPEND value TO list.
value-key = '1S7_GCDOOC'.
value-text = '1S7_GCDOOC'.
APPEND value TO list.
value-key = '1S7_GCDOHD'.
value-text = '1S7_GCDOHD'.
APPEND value TO list.
value-key = '1S7_GCVER'.
value-text = '1S7_GCVER'.
APPEND value TO list.
value-key = '1S7_GCVJOB'.
value-text = '1S7_GCVJOB'.
APPEND value TO list.
value-key = '1S7_GCVASV'.
value-text = '1S7_GCVASV'.
APPEND value TO list.
value-key = '1S7_GCVASE'.
value-text = '1S7_GCVASE'.
APPEND value TO list.
value-key = '1S7_GCVOOC'.
value-text = '1S7_GCVOOC'.
APPEND value TO list.
value-key = '1S7_GCVOHD'.

Radio button question

I want achieve like this in UI
Showing two radio button and grouping then is simple. But what I need is between those radiobuttons (in page direction), I would like to have some other components which makes sense for each selected radio.
Radio1
SomeComponents
Radio2
SomeComponents

The Tomahawk library version of selectOneRadio supports this with layout="spread". Then use Tomahawk radio components anywhere within the form.

Radio Buttons Defaulting to YES when form is saved

Hello, I'm researching a problem a user has informed me of, and I haven't seen this topic listed anywhere, nor have I been able to figure out why the problem is happening.
My form has 5 radio button exclusion groups, each with a YES or NO selection.
When the form is saved with a selection of NO for each group then re-opened, the selected value has changed to YES for all but the first group.
Anyone have an idea why this is happening?

Is there any script on the form that could be changing the values after loading?
As a test, add a button on the form and use this code on the click event:
xfa.host.exportData();
When the button is clicked, it will allow the user to choose a filename to save the data into (it will have an XDP extension). Once it is saved change the extension to XML and open it in your browser. Check and see that those button groups are being set. If they are not it could be that they are not bound correctly. Check to see if the Binding is set to none (if so you are excluding these from your data).
Hope that helps.

Global binding for radio buttons needs tweaking

When selecting global binding for a text or numeric field, its corresponding field with the same name also changes to global binding.
However when doing this for radio button exclusion groups, the other radio button groups don't automatically change to global. You have to do it manually.

Found the problem in another topic:
scott sheck - 1:30am Jun 29, 07 PST (#6 of 7)
A pasted radio button is automatically added to an existing exclusion group if the last added item was a radio button. This is in the help.
I wish there was a default to turn this off because I don't want to add a temporary item just to get a new exclusion group.

Help with radio buttons and show/hide javascript

Hi. I'm new working with LiveCycle and also pretty much at a basic/beginner level of javascripting. I'm creating a pdf fillable form and one of the tasks I've been given is to add a function where if Option A is chosen by the user, then the correspondng table will appear, and if Option B is chosen another table will appear. After some searching I Iearned more about how radio buttons can be used, so I created a set of radio buttons. I have tried several different things, the latest was making both tables "hidden", and then taking to the radio button list group and applying the show/hide script to each of the radio buttons in the group. Still nothing seems to be working as I want it to. The table remains hidden when I click on the . This is what the code looks like right now. I know I'm obviously doing something wrong, this seems like such a basic thing to code. Getting to the frustration point, if you can sort me out with what I am missing/overlooking please let me know. Many thanks!
Note. The radio buttons are not in the same table, they are higher up in the form outside of the tables that I am trying to show/hide, but they are in the same subform. I don't know if that might be an issue?
form1.#subform[0].RadioButtonList::click - (JavaScript, client)
form1.#subform[0].RadioButtonList.#field[0]::click - (JavaScript, client)
   if ( RadioButtonList.#field[0].selectedIndex == 1)
     form1.#subform[0].Table1_Work.presence = "visible"
   else
   form1.#subform[0].Table1_Work.presence = "hidden"
form1.#subform[0].RadioButtonList.#field[1]::click - (JavaScript, client)
   if ( RadioButtonList.#field[1].selectedIndex == 2)
    form1.#subform[0].Table1_Official.presence = "visible"
else
     form1.#subform[0].Table1_Official.presence = "hidden"

Hi,
For starters you have unnamed pages, which is not a good idea. This makes it more difficult to reference objects. In your JavaScript you would have to resolve the node, however the simpliest route would be to name the page first. Something like "page1". Have a look at this example for referencing objects: http://assure.ly/kUP02y.
Next I would not place the script in each of the radio buttons, as this is likely to cause conflicts and is doubling the script. The best place to put the script is in the click event of the radio button exclusion group. This contains all of the radio buttons. See an example here: http://assure.ly/h7whb8 and https://acrobat.com/#d=ALebgueDXjewHjGyYRdrmw.
You syntax for JavaScript if/else statements is potentially incorrect. The script within the statements should be wrapped in curly brackets. While you can get away with it for single lines, I would not be inclined to take that approach. So:
if (a test) {
     // do something
else {
     // do something else
With the radio button exclusion group you can use its rawValue, just specify it in the Object > Binding palette. So on the basis of chaning the page name:
if (this.rawValue == "1") {
     page1.Table1_Work.presence = "visible";
else {
     page1.Table1_Work.presence = "hidden";
There is a syntax checker button in the Script Editor that should highlight errors.
Niall

SQL Queries, filter with multiple radio Buttons

I am trying to figure out how to filter my datagridview with SQL queries so that both of them have to be met for data to show up not just one.
My datagridview is bound to an Access Database.
I basically would want it filtered by 'Width' and 'Wood Type'
I have radio buttons in group boxes so a width and wood can be selected. However only one Query is applied at a time.

Public Class Form1
Private Sub StickersBindingNavigatorSaveItem_Click(sender As Object, e As EventArgs)
Me.Validate()
Me.StickersBindingSource.EndEdit()
Me.TableAdapterManager.UpdateAll(Me.TestDataSet)
End Sub
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
'TODO: This line of code loads data into the 'TestDataSet.Stickers' table. You can move, or remove it, as needed.
Me.StickersTableAdapter.Fill(Me.TestDataSet.Stickers)
AcceptButton = Button1
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
End Sub
Private Sub RadioButton1_CheckedChanged(sender As Object, e As EventArgs) Handles RadioButton1.CheckedChanged
Try
Me.StickersTableAdapter.Wood_Oak(Me.TestDataSet.Stickers)
Catch ex As System.Exception
System.Windows.Forms.MessageBox.Show(ex.Message)
End Try
End Sub
Private Sub RadioButton2_CheckedChanged(sender As Object, e As EventArgs) Handles RadioButton2.CheckedChanged
Try
Me.StickersTableAdapter.Wood_Walnut(Me.TestDataSet.Stickers)
Catch ex As System.Exception
System.Windows.Forms.MessageBox.Show(ex.Message)
End Try
End Sub
Private Sub RadioButton3_CheckedChanged(sender As Object, e As EventArgs) Handles RadioButton3.CheckedChanged
Try
Me.StickersTableAdapter.Width14(Me.TestDataSet.Stickers)
Catch ex As System.Exception
System.Windows.Forms.MessageBox.Show(ex.Message)
End Try
End Sub
Private Sub RadioButton4_CheckedChanged(sender As Object, e As EventArgs) Handles RadioButton4.CheckedChanged
Try
Me.StickersTableAdapter.Width18(Me.TestDataSet.Stickers)
Catch ex As System.Exception
System.Windows.Forms.MessageBox.Show(ex.Message)
End Try
End Sub
Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged
If RadioButton5.Checked = True Then
If TextBox1.Text = "" Then
Else
Me.StickersBindingSource.Filter = "Width LIKE '" & TextBox1.Text & "%'"
DataGridView1.Refresh()
End If
ElseIf RadioButton6.Checked = True Then
If TextBox1.Text = "" Then
Else
Me.StickersBindingSource.Filter = "[Wood Type] LIKE '" & TextBox1.Text & "%'"
DataGridView1.Refresh()
End If
ElseIf RadioButton5.Checked = False And RadioButton6.Checked = False Then
MsgBox("Please Select a Search Criteria")
End If
End Sub
Private Sub TextBox2_TextChanged(sender As Object, e As EventArgs) Handles TextBox2.TextChanged
Try
Me.StickersTableAdapter.SearchWood(Me.TestDataSet.Stickers)
Catch ex As System.Exception
System.Windows.Forms.MessageBox.Show(ex.Message)
End Try
End Sub
End Class

Capturing user response based on radio button

I am trying to capture user response based on yes or no reply to a required radio button. If they answer yes, they need to provide details. The radio button values are N and Y, nothing listed under item, the captions are turned off. I used the LiveCyclePopUp.pdf sample by George Kaiser as a go-by and modified for my radio button/text field name and added the visible/invisible, but no luck.
Here is what I'm trying, but it's not working, nothing happens when I click either yes or no, am using javascript.
Once this is working right, if possible, I would like to add to my submit button a double check to make sure if this radio button answer is Y and the text box is null, go back and provide the answer, but the most important part is to get this part working. Any ideas what I'm missing? Thank you!
switch (this.rawValue)
    case "Y":
    Response25AY.presence = "visible";
    Response25AY = xfa.host.response("Please enter "YES" details (date, injury details, corrective action) below", "Q25A YES DETAILS", "Please enter "YES" details (date, injury details, corrective action) here . . . ");
    break;
    case "N":
    Response25AY.presence = "invisible";
    break;

Hi,
Firstly, the syntax is JavaScript, so when setting the Response25AY, you would need to include .rawValue:
Use of quotation marks within the script will give a syntax error (around the YES).
A small note: I would not duplicate the question as a default value. It does not really add value.
So this should be closer:
Response25AY.rawValue = xfa.host.response("Please enter YES details (date, injury details, corrective action) below", "Q25A YES DETAILS");
Can you check the relative reference from the radio button group to the Response25AY object. It may be that the reference in the script is not full enough and is incomplete.
Also I would place this script in the click event of the radio button exclusion group.
Lastly, check the JavaScript Console (Control+J) when previewing the form, for errors.
Hope that helps,
Niall

2 sets of Radio Buttons in a Form-complications

Hello everyone,
I have been looking around for code to assist me in building a form. I have developed the form, and just have a couple problems that I can't figure out.
In one question on the form the user can choose from one set of radio buttons and select one of the five options. Then I have a second set of radio buttons, that the user can again only choose one option. My problem is that I only want the user to be able to select from the second set of radio buttons if they selected a certain option in the first set. An example to clear up my problem:
Did you finish the training:
Yes
Half
None
So if the user selected yes from the first set of radio buttons, I want the second set of radio buttons to now be selectable:
The training was:
Up-beat and enjoyable
Snoozer
The conditions that I am using are very different than these but this is just a simple skit. So how do I make the second set of radio buttons unselectable until the user selects a specific radio button from the first set of radio buttons.
Thanks, I really appreciate the help!

If you have a radio button exclusion group called 'completion' with three items 'Yes','Half', and 'None' and a second radio button exclusion group called 'completion', go to the 'feedback' Value tab and set the type to 'readOnly'.
Add the following script to the 'completion' change event...
// form1.page1.subform1.completion::change - (JavaScript, client)
if (this.rawValue == "Yes") {
form1.page1.subform1.feedback.access = "";
else {
form1.page1.subform1.feedback.access = "readOnly";
form1.page1.subform1.feedback.rawValue = "";
If the user selects 'Yes', the 'feedback' group is available for selection. If the user does not select 'Yes', 'feedback' is reset and made readOnly.
Steve

Radio Buttons & Repeat Groups

Similar Messages

Maybe you are looking for