568:
569: ------------------------------------------
570: -- Build and execute dynamic SQL cursor --
571: ------------------------------------------
572: cur := dbms_sql.open_cursor;
573: dbms_sql.parse(cur, selc||mainc||andc||orderc, dbms_sql.v7);
574:
575: dbms_sql.define_column(cur, 1, pct, 3);
576: dbms_sql.define_column(cur, 2, title, 256);
569: ------------------------------------------
570: -- Build and execute dynamic SQL cursor --
571: ------------------------------------------
572: cur := dbms_sql.open_cursor;
573: dbms_sql.parse(cur, selc||mainc||andc||orderc, dbms_sql.v7);
574:
575: dbms_sql.define_column(cur, 1, pct, 3);
576: dbms_sql.define_column(cur, 2, title, 256);
577: dbms_sql.define_column(cur, 3, app, 50);
571: ------------------------------------------
572: cur := dbms_sql.open_cursor;
573: dbms_sql.parse(cur, selc||mainc||andc||orderc, dbms_sql.v7);
574:
575: dbms_sql.define_column(cur, 1, pct, 3);
576: dbms_sql.define_column(cur, 2, title, 256);
577: dbms_sql.define_column(cur, 3, app, 50);
578: dbms_sql.define_column(cur, 4, fn, 256);
579:
572: cur := dbms_sql.open_cursor;
573: dbms_sql.parse(cur, selc||mainc||andc||orderc, dbms_sql.v7);
574:
575: dbms_sql.define_column(cur, 1, pct, 3);
576: dbms_sql.define_column(cur, 2, title, 256);
577: dbms_sql.define_column(cur, 3, app, 50);
578: dbms_sql.define_column(cur, 4, fn, 256);
579:
580: rows := dbms_sql.execute(cur);
573: dbms_sql.parse(cur, selc||mainc||andc||orderc, dbms_sql.v7);
574:
575: dbms_sql.define_column(cur, 1, pct, 3);
576: dbms_sql.define_column(cur, 2, title, 256);
577: dbms_sql.define_column(cur, 3, app, 50);
578: dbms_sql.define_column(cur, 4, fn, 256);
579:
580: rows := dbms_sql.execute(cur);
581:
574:
575: dbms_sql.define_column(cur, 1, pct, 3);
576: dbms_sql.define_column(cur, 2, title, 256);
577: dbms_sql.define_column(cur, 3, app, 50);
578: dbms_sql.define_column(cur, 4, fn, 256);
579:
580: rows := dbms_sql.execute(cur);
581:
582:
576: dbms_sql.define_column(cur, 2, title, 256);
577: dbms_sql.define_column(cur, 3, app, 50);
578: dbms_sql.define_column(cur, 4, fn, 256);
579:
580: rows := dbms_sql.execute(cur);
581:
582:
583: i := 1;
584: while (TRUE) loop
581:
582:
583: i := 1;
584: while (TRUE) loop
585: rows := dbms_sql.fetch_rows(cur);
586:
587: -- Bug 3315934 Added row_limit to resolve performance issues
588: -- Will display all rows if no limit is specified.
589: if (rows = 0 or (row_limit is not null and i > row_limit)) then
589: if (rows = 0 or (row_limit is not null and i > row_limit)) then
590: exit;
591: end if;
592:
593: dbms_sql.column_value(cur, 1, pct);
594: dbms_sql.column_value(cur, 2, title);
595: dbms_sql.column_value(cur, 3, app);
596: dbms_sql.column_value(cur, 4, fn);
597:
590: exit;
591: end if;
592:
593: dbms_sql.column_value(cur, 1, pct);
594: dbms_sql.column_value(cur, 2, title);
595: dbms_sql.column_value(cur, 3, app);
596: dbms_sql.column_value(cur, 4, fn);
597:
598: scores(i) := pct;
591: end if;
592:
593: dbms_sql.column_value(cur, 1, pct);
594: dbms_sql.column_value(cur, 2, title);
595: dbms_sql.column_value(cur, 3, app);
596: dbms_sql.column_value(cur, 4, fn);
597:
598: scores(i) := pct;
599: titles(i) := title;
592:
593: dbms_sql.column_value(cur, 1, pct);
594: dbms_sql.column_value(cur, 2, title);
595: dbms_sql.column_value(cur, 3, app);
596: dbms_sql.column_value(cur, 4, fn);
597:
598: scores(i) := pct;
599: titles(i) := title;
600: apps(i) := app;
601: file_names(i) := fn;
602:
603: i := i + 1;
604: end loop;
605: dbms_sql.close_cursor(cur);
606:
607: if (atg = TRUE) then
608:
609: scores(i) := 0;