227: l_dummy NUMBER;
228:
229: CURSOR c_seq IS
230: SELECT TO_CHAR(ams_source_codes_gen_s.NEXTVAL)
231: FROM DUAL;
232:
233: CURSOR c_prefix IS
234: SELECT tag
235: FROM ams_lookups
367: l_code VARCHAR2(30);
368:
369: CURSOR c_seq IS
370: SELECT TO_CHAR(ams_source_codes_gen_s.NEXTVAL)
371: FROM DUAL;
372:
373: BEGIN
374:
375: LOOP
423: AND active_flag = 'Y';
424:
425: CURSOR c_sourcecode_seq IS
426: SELECT AMS_SOURCE_CODES_S.NEXTVAL
427: FROM DUAL;
428:
429: CURSOR c_related_source_code IS
430: SELECT 1
431: FROM ams_source_codes