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,
>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 >