create or replace procedure Do_Liquidat 
is
  v_cursor clinic.clinic_types.CLINIC_CURSOR;   -- fee_code 游标;
begin
         open v_cursor for '
           select S.*,DECODE(s.sex_code,''1'',(select C.CONSTANT_VALUE
             FROM hisdict.constant_both C
             WHERE c.constant_code = s.sex_code))
           from HISDICT.SEX_DICT S';
end Do_Liquidat;