thank you
i try it, no result no errors

	 DO CASE
CASE INLIST(Thisform.Optiongroup1.Value,1,2)
    REPLACE prior WITH 1 in (cAlias)
CASE INLIST(Thisform.Optiongroup1.Value,3,4)
    REPLACE prior WITH 2 in (cAlias)
ENDCASE

>Hi,
>
>in that case you should wrap the value-assign in a 'do case...endcase' clause.
>
>

>DO CASE
>CASE INLIST(Thisform.Optiongroup1.Value,1,2)
>    REPLACE prior WITH 1 (alias)
>CASE INLIST(Thisform.Optiongroup1.Value,3,4)
>    REPLACE prior WITH 2 (alis)
>ENDCASE
>