open User_cursor for select * from (select a.*,dbms_random.random num from tu_smsvc_koko_user a where City_code1=VarCity and Sex<>ChSex order by num) where num<=3;     
 loop     
   fetch User_cursor into Users; 
   exit when User_cursor%notfound;         
   Mess_age :=Mess_age||Users.Nick_Name||'ID'||Users.USER_ID||',';     
 end loop;     
close User_cursor;