At 01:16 PM 10/18/2011, Lena Dammstrom wrote:
Hello,
I am wondering if anyone has run into the below scenario, and /or any suggestions Converted a form with a Variable RadioGroup control that is loaded dynamically; From Rbase Win 7.6 to Win 9.1 (32) v9.1.4.10916

In 7.6 when clicking on the radio buttons, the state of the radio button selected is visible (i.e. the circle has a dot in it!) In 9.1 the state of the selected radio button is not visible. (no dot, not a different color. Appears nothing is selected) I put a variable label on form, and the variable label changes based on selected radio button.

I created a simple form from scratch in 7.6 with just the RadioGroup, and again works okay in 7.6 but not in 9.1.
Below is the code (simple form)

--On Before Start
SET VAR vDefaultValue INTEGER = 1
SET VAR vCaption TEXT = NULL
SET VAR vValue TEXT = NULL
SET VAR vTxtValue TEXT = NULL
SET VAR vIntValue INTEGER = NULL
SET VAR vCommand TEXT = NULL
SET VAR vCount INTEGER = 0
SET VAR vDefGroupIndex INTEGER = NULL
SET VAR vDesc TEXT = NULL
SET VAR vProp1 TEXT = ('PROPERTY rdoGroups' & +
    '''CreateRadioButton''')
SET VAR vGroup INTEGER

--On after Start
SET VAR vProp1 TEXT = ('PROPERTY rdoGroups' & +
    '''CreateRadioButton''')
SET VAR vRadioCount INTEGER = 0
SET VAR vDefGroupIndex = NULL
SET VAR vCount = 0
SET VAR vIntValue = 1
SET VAR vDesc = 'Button1'
IF vDefaultValue = vIntValue THEN
  SET VAR vDefGroupIndex = vCount
ENDIF
SET VAR vCount = vCount + 1
SET VAR vTxtValue = (CTXT(.vIntValue))
SET VAR vCaption = ('''' + .vDesc)
SET VAR vValue = ('|' + .vTxtValue & '''')
SET VAR vCommand = (.vProp1 & .vCaption + .vValue)
&vCommand


SET VAR vIntValue = 2
SET VAR vDesc = 'Button2'
IF vDefaultValue = vIntValue THEN
  SET VAR vDefGroupIndex = vCount
ENDIF
SET VAR vCount = vCount + 1
SET VAR vTxtValue = (CTXT(.vIntValue))
SET VAR vCaption = ('''' + .vDesc)
SET VAR vValue = ('|' + .vTxtValue & '''')
SET VAR vCommand = (.vProp1 & .vCaption + .vValue)
&vCommand

--Set up radio control height / spacing
SET VAR vRadioCount INTEGER = (.vCount - 1)
SET VAR vHeight TEXT = NULL
SET VAR vCount = ( (.vCount * 20) + 25)
SET VAR vHeight = ('''' + (CTXT(vCount)) + '''')
PROPERTY rdoGroups HEIGHT &vHeight

--Check Group based on login entity
IF vDefGroupIndex IS NOT NULL THEN
  SET VAR vCommand = +
      'Property rdoGroups RADIOBUTTONS[' + +
      (CTXT(.vDefGroupIndex)) + +
      ']->CHECKED TRUE'
  &vCommand
ENDIF

RECALC VARIABLES


Hello Lena,

There is a trailing space in your variable for vValue. As a result,
the values do not match.

By using the ampersand, a space in added to the following string:

  SET VAR vValue = ('|' + .vTxtValue & '''')

By substituting a plus, your expected results will match and the
radio button will be displayed:

  SET VAR vValue = ('|' + .vTxtValue + '''')


The difference between 7.6 and eXtreme 9.1 is that the trailing
space is no longer automatically dropped. This is because in some
instances the space is needed.

Best regards,

John Minyo II
R:BASE Technologies, Inc.
Customer Service

Reply via email to