96: END IF;
97:
98: -- If this page is being called the first time
99: -- parse the sqlcount to get totalcount
100: l_ccursor := DBMS_SQL.OPEN_CURSOR;
101: DBMS_SQL.PARSE(l_ccursor,p_sqlcount,DBMS_SQL.NATIVE);
102: DBMS_SQL.DEFINE_COLUMN(l_ccursor,1,l_totalcount);
103: l_dummy1 := DBMS_SQL.EXECUTE_AND_FETCH(l_ccursor);
104: DBMS_SQL.COLUMN_VALUE(l_ccursor,1,l_totalcount);
97:
98: -- If this page is being called the first time
99: -- parse the sqlcount to get totalcount
100: l_ccursor := DBMS_SQL.OPEN_CURSOR;
101: DBMS_SQL.PARSE(l_ccursor,p_sqlcount,DBMS_SQL.NATIVE);
102: DBMS_SQL.DEFINE_COLUMN(l_ccursor,1,l_totalcount);
103: l_dummy1 := DBMS_SQL.EXECUTE_AND_FETCH(l_ccursor);
104: DBMS_SQL.COLUMN_VALUE(l_ccursor,1,l_totalcount);
105: DBMS_SQL.CLOSE_CURSOR(l_ccursor);
98: -- If this page is being called the first time
99: -- parse the sqlcount to get totalcount
100: l_ccursor := DBMS_SQL.OPEN_CURSOR;
101: DBMS_SQL.PARSE(l_ccursor,p_sqlcount,DBMS_SQL.NATIVE);
102: DBMS_SQL.DEFINE_COLUMN(l_ccursor,1,l_totalcount);
103: l_dummy1 := DBMS_SQL.EXECUTE_AND_FETCH(l_ccursor);
104: DBMS_SQL.COLUMN_VALUE(l_ccursor,1,l_totalcount);
105: DBMS_SQL.CLOSE_CURSOR(l_ccursor);
106:
99: -- parse the sqlcount to get totalcount
100: l_ccursor := DBMS_SQL.OPEN_CURSOR;
101: DBMS_SQL.PARSE(l_ccursor,p_sqlcount,DBMS_SQL.NATIVE);
102: DBMS_SQL.DEFINE_COLUMN(l_ccursor,1,l_totalcount);
103: l_dummy1 := DBMS_SQL.EXECUTE_AND_FETCH(l_ccursor);
104: DBMS_SQL.COLUMN_VALUE(l_ccursor,1,l_totalcount);
105: DBMS_SQL.CLOSE_CURSOR(l_ccursor);
106:
107: -- Set certain numbers and names
100: l_ccursor := DBMS_SQL.OPEN_CURSOR;
101: DBMS_SQL.PARSE(l_ccursor,p_sqlcount,DBMS_SQL.NATIVE);
102: DBMS_SQL.DEFINE_COLUMN(l_ccursor,1,l_totalcount);
103: l_dummy1 := DBMS_SQL.EXECUTE_AND_FETCH(l_ccursor);
104: DBMS_SQL.COLUMN_VALUE(l_ccursor,1,l_totalcount);
105: DBMS_SQL.CLOSE_CURSOR(l_ccursor);
106:
107: -- Set certain numbers and names
108: l_totalpossible := NVL(p_totalcount,l_totalcount);
101: DBMS_SQL.PARSE(l_ccursor,p_sqlcount,DBMS_SQL.NATIVE);
102: DBMS_SQL.DEFINE_COLUMN(l_ccursor,1,l_totalcount);
103: l_dummy1 := DBMS_SQL.EXECUTE_AND_FETCH(l_ccursor);
104: DBMS_SQL.COLUMN_VALUE(l_ccursor,1,l_totalcount);
105: DBMS_SQL.CLOSE_CURSOR(l_ccursor);
106:
107: -- Set certain numbers and names
108: l_totalpossible := NVL(p_totalcount,l_totalcount);
109: for l_pos1 in p_coldata.FIRST .. p_coldata.COUNT loop
465: );
466: END IF;
467:
468: -- Now parse the actual query
469: l_rcursor := DBMS_SQL.OPEN_CURSOR;
470: DBMS_SQL.PARSE(l_rcursor,l_sql,DBMS_SQL.NATIVE);
471:
472: IF DBMS_SQL.IS_OPEN(l_rcursor) THEN
473: for l_pos1 in p_head.FIRST .. p_head.COUNT loop
466: END IF;
467:
468: -- Now parse the actual query
469: l_rcursor := DBMS_SQL.OPEN_CURSOR;
470: DBMS_SQL.PARSE(l_rcursor,l_sql,DBMS_SQL.NATIVE);
471:
472: IF DBMS_SQL.IS_OPEN(l_rcursor) THEN
473: for l_pos1 in p_head.FIRST .. p_head.COUNT loop
474: l_colstore(l_pos1) := '';
468: -- Now parse the actual query
469: l_rcursor := DBMS_SQL.OPEN_CURSOR;
470: DBMS_SQL.PARSE(l_rcursor,l_sql,DBMS_SQL.NATIVE);
471:
472: IF DBMS_SQL.IS_OPEN(l_rcursor) THEN
473: for l_pos1 in p_head.FIRST .. p_head.COUNT loop
474: l_colstore(l_pos1) := '';
475: DBMS_SQL.DEFINE_COLUMN(l_rcursor,l_pos1,l_colstore(l_pos1),32000);
476: end loop;
471:
472: IF DBMS_SQL.IS_OPEN(l_rcursor) THEN
473: for l_pos1 in p_head.FIRST .. p_head.COUNT loop
474: l_colstore(l_pos1) := '';
475: DBMS_SQL.DEFINE_COLUMN(l_rcursor,l_pos1,l_colstore(l_pos1),32000);
476: end loop;
477: l_dummy2 := DBMS_SQL.EXECUTE(l_rcursor);
478: ELSE
479: DBMS_SQL.CLOSE_CURSOR(l_rcursor);
473: for l_pos1 in p_head.FIRST .. p_head.COUNT loop
474: l_colstore(l_pos1) := '';
475: DBMS_SQL.DEFINE_COLUMN(l_rcursor,l_pos1,l_colstore(l_pos1),32000);
476: end loop;
477: l_dummy2 := DBMS_SQL.EXECUTE(l_rcursor);
478: ELSE
479: DBMS_SQL.CLOSE_CURSOR(l_rcursor);
480: COMMIT;
481: END IF;
475: DBMS_SQL.DEFINE_COLUMN(l_rcursor,l_pos1,l_colstore(l_pos1),32000);
476: end loop;
477: l_dummy2 := DBMS_SQL.EXECUTE(l_rcursor);
478: ELSE
479: DBMS_SQL.CLOSE_CURSOR(l_rcursor);
480: COMMIT;
481: END IF;
482: l_startnum := NVL(p_startnum,1);
483:
520: loop
521:
522: BEGIN
523: -- Fetch the rows
524: IF DBMS_SQL.IS_OPEN(l_rcursor) THEN
525: l_dummy3 := DBMS_SQL.FETCH_ROWS(l_rcursor);
526:
527: IF l_dummy3 > 0 THEN
528: -- Store in local plsql table of variables
521:
522: BEGIN
523: -- Fetch the rows
524: IF DBMS_SQL.IS_OPEN(l_rcursor) THEN
525: l_dummy3 := DBMS_SQL.FETCH_ROWS(l_rcursor);
526:
527: IF l_dummy3 > 0 THEN
528: -- Store in local plsql table of variables
529: for l_pos1 in p_head.FIRST .. p_head.COUNT loop
526:
527: IF l_dummy3 > 0 THEN
528: -- Store in local plsql table of variables
529: for l_pos1 in p_head.FIRST .. p_head.COUNT loop
530: DBMS_SQL.COLUMN_VALUE(l_rcursor,l_pos1,l_colstore(l_pos1));
531: end loop;
532: ELSE
533: DBMS_SQL.CLOSE_CURSOR(l_rcursor);
534: COMMIT;
529: for l_pos1 in p_head.FIRST .. p_head.COUNT loop
530: DBMS_SQL.COLUMN_VALUE(l_rcursor,l_pos1,l_colstore(l_pos1));
531: end loop;
532: ELSE
533: DBMS_SQL.CLOSE_CURSOR(l_rcursor);
534: COMMIT;
535: END IF;
536: ELSE
537: DBMS_SQL.CLOSE_CURSOR(l_rcursor);
533: DBMS_SQL.CLOSE_CURSOR(l_rcursor);
534: COMMIT;
535: END IF;
536: ELSE
537: DBMS_SQL.CLOSE_CURSOR(l_rcursor);
538: COMMIT;
539: END IF;
540:
541: EXCEPTION
578:
579: end loop;
580:
581: -- Close the cursor
582: IF DBMS_SQL.IS_OPEN(l_rcursor) THEN
583: DBMS_SQL.CLOSE_CURSOR(l_rcursor);
584: COMMIT;
585: END IF;
586: l_string := l_string ||'';
579: end loop;
580:
581: -- Close the cursor
582: IF DBMS_SQL.IS_OPEN(l_rcursor) THEN
583: DBMS_SQL.CLOSE_CURSOR(l_rcursor);
584: COMMIT;
585: END IF;
586: l_string := l_string ||'';
587: l_string := l_string ||'';
596:
597: exception
598: when others then
599: x_string := SQLERRM;
600: IF DBMS_SQL.IS_OPEN(l_rcursor) THEN
601: DBMS_SQL.CLOSE_CURSOR(l_rcursor);
602: COMMIT;
603: END IF;
604: end lov_data;
597: exception
598: when others then
599: x_string := SQLERRM;
600: IF DBMS_SQL.IS_OPEN(l_rcursor) THEN
601: DBMS_SQL.CLOSE_CURSOR(l_rcursor);
602: COMMIT;
603: END IF;
604: end lov_data;
605: