29:
30: CURSOR C_CLIENT_NUMBER(v_clientid varchar2)
31: IS
32: Select client_number
33: from ASG_USER
34: where upper(user_name) = upper(v_clientid);
35:
36: v_client_number number;
37: BEGIN
122: Prev_Num INTEGER;
123: Ret_Flag BOOLEAN := FALSE;
124: CURSOR client_num_cur(StartNum INTEGER) IS
125: SELECT client_number
126: FROM ASG_USER
127: WHERE client_number > StartNum
128: ORDER BY client_number;
129: CURSOR start_num_cur(StartNum INTEGER) IS
130: SELECT client_number
127: WHERE client_number > StartNum
128: ORDER BY client_number;
129: CURSOR start_num_cur(StartNum INTEGER) IS
130: SELECT client_number
131: FROM ASG_USER
132: WHERE client_number = StartNum;
133: CURSOR max_client_num_cur IS
134: SELECT MAX(Client_Number)
135: FROM ASG_USER;
131: FROM ASG_USER
132: WHERE client_number = StartNum;
133: CURSOR max_client_num_cur IS
134: SELECT MAX(Client_Number)
135: FROM ASG_USER;
136: BEGIN
137:
138: if (StartNum >= MaxClientNum) then
139: return(0);