DBA Data[Home] [Help]

APPS.FND_FLEX_SERVER1 dependencies on DBMS_SQL

Line 4411: cursornum := dbms_sql.open_cursor;

4407: -- Copy SQL string to array for debugging purposes
4408: --
4409: add_sql_string(fnd_dsql.get_text(p_with_debug => TRUE));
4410:
4411: cursornum := dbms_sql.open_cursor;
4412: fnd_dsql.set_cursor(cursornum);
4413:
4414: sql_statement := fnd_dsql.get_text(p_with_debug => FALSE);
4415: dbms_sql.parse(cursornum, sql_statement, dbms_sql.v7);

Line 4415: dbms_sql.parse(cursornum, sql_statement, dbms_sql.v7);

4411: cursornum := dbms_sql.open_cursor;
4412: fnd_dsql.set_cursor(cursornum);
4413:
4414: sql_statement := fnd_dsql.get_text(p_with_debug => FALSE);
4415: dbms_sql.parse(cursornum, sql_statement, dbms_sql.v7);
4416:
4417: fnd_dsql.do_binds;
4418:
4419: nprocessed := dbms_sql.execute(cursornum);

Line 4419: nprocessed := dbms_sql.execute(cursornum);

4415: dbms_sql.parse(cursornum, sql_statement, dbms_sql.v7);
4416:
4417: fnd_dsql.do_binds;
4418:
4419: nprocessed := dbms_sql.execute(cursornum);
4420: IF (fnd_flex_server1.g_debug_level > 0) THEN
4421: add_debug('(DSQL_execute processed ' || to_char(nprocessed));
4422: add_debug(' rows.)');
4423: END IF;

Line 4424: dbms_sql.close_cursor(cursornum);

4420: IF (fnd_flex_server1.g_debug_level > 0) THEN
4421: add_debug('(DSQL_execute processed ' || to_char(nprocessed));
4422: add_debug(' rows.)');
4423: END IF;
4424: dbms_sql.close_cursor(cursornum);
4425: return(nprocessed);
4426:
4427: EXCEPTION
4428: WHEN OTHERS then

Line 4429: if(dbms_sql.is_open(cursornum)) then

4425: return(nprocessed);
4426:
4427: EXCEPTION
4428: WHEN OTHERS then
4429: if(dbms_sql.is_open(cursornum)) then
4430: dbms_sql.close_cursor(cursornum);
4431: end if;
4432: FND_MESSAGE.set_name('FND', 'FLEX-DSQL EXCEPTION');
4433: FND_MESSAGE.set_token('MSG', SQLERRM);

Line 4430: dbms_sql.close_cursor(cursornum);

4426:
4427: EXCEPTION
4428: WHEN OTHERS then
4429: if(dbms_sql.is_open(cursornum)) then
4430: dbms_sql.close_cursor(cursornum);
4431: end if;
4432: FND_MESSAGE.set_name('FND', 'FLEX-DSQL EXCEPTION');
4433: FND_MESSAGE.set_token('MSG', SQLERRM);
4434: FND_MESSAGE.set_token('SQLSTR', SUBSTRB(sql_statement, 1, 1000));

Line 4463: cursornum := dbms_sql.open_cursor;

4459: --
4460: add_sql_string(fnd_dsql.get_text(p_with_debug => TRUE));
4461:
4462: selected_col := NULL;
4463: cursornum := dbms_sql.open_cursor;
4464: fnd_dsql.set_cursor(cursornum);
4465:
4466: sql_statement := fnd_dsql.get_text(p_with_debug => FALSE);
4467: dbms_sql.parse(cursornum, sql_statement, dbms_sql.v7);

Line 4467: dbms_sql.parse(cursornum, sql_statement, dbms_sql.v7);

4463: cursornum := dbms_sql.open_cursor;
4464: fnd_dsql.set_cursor(cursornum);
4465:
4466: sql_statement := fnd_dsql.get_text(p_with_debug => FALSE);
4467: dbms_sql.parse(cursornum, sql_statement, dbms_sql.v7);
4468:
4469: fnd_dsql.do_binds;
4470:
4471: dbms_sql.define_column(cursornum, 1, selected_col, 2000);

Line 4471: dbms_sql.define_column(cursornum, 1, selected_col, 2000);

4467: dbms_sql.parse(cursornum, sql_statement, dbms_sql.v7);
4468:
4469: fnd_dsql.do_binds;
4470:
4471: dbms_sql.define_column(cursornum, 1, selected_col, 2000);
4472: num_returned := dbms_sql.execute_and_fetch(cursornum, TRUE);
4473: if(num_returned = 1) then
4474: dbms_sql.column_value(cursornum, 1, selected_col);
4475: returned_column := selected_col;

Line 4472: num_returned := dbms_sql.execute_and_fetch(cursornum, TRUE);

4468:
4469: fnd_dsql.do_binds;
4470:
4471: dbms_sql.define_column(cursornum, 1, selected_col, 2000);
4472: num_returned := dbms_sql.execute_and_fetch(cursornum, TRUE);
4473: if(num_returned = 1) then
4474: dbms_sql.column_value(cursornum, 1, selected_col);
4475: returned_column := selected_col;
4476: IF (fnd_flex_server1.g_debug_level > 0) THEN

Line 4474: dbms_sql.column_value(cursornum, 1, selected_col);

4470:
4471: dbms_sql.define_column(cursornum, 1, selected_col, 2000);
4472: num_returned := dbms_sql.execute_and_fetch(cursornum, TRUE);
4473: if(num_returned = 1) then
4474: dbms_sql.column_value(cursornum, 1, selected_col);
4475: returned_column := selected_col;
4476: IF (fnd_flex_server1.g_debug_level > 0) THEN
4477: add_debug('(DSQL returned ' || selected_col || ')');
4478: END IF;

Line 4485: dbms_sql.close_cursor(cursornum);

4481: returned_column := NULL;
4482: FND_MESSAGE.set_name('FND', 'FLEX-SSV EXCEPTION');
4483: FND_MESSAGE.set_token('MSG', 'x_dsql_select_one() could not fetch rows');
4484: end if;
4485: dbms_sql.close_cursor(cursornum);
4486: return(num_returned);
4487:
4488: EXCEPTION
4489: WHEN NO_DATA_FOUND or invalid_rowid then

Line 4494: dbms_sql.close_cursor(cursornum);

4490: returned_column := NULL;
4491: IF (fnd_flex_server1.g_debug_level > 0) THEN
4492: add_debug('(DSQL returned: NULL)');
4493: END IF;
4494: dbms_sql.close_cursor(cursornum);
4495: return(0);
4496: WHEN TOO_MANY_ROWS then
4497: dbms_sql.column_value(cursornum, 1, selected_col);
4498: returned_column := selected_col;

Line 4497: dbms_sql.column_value(cursornum, 1, selected_col);

4493: END IF;
4494: dbms_sql.close_cursor(cursornum);
4495: return(0);
4496: WHEN TOO_MANY_ROWS then
4497: dbms_sql.column_value(cursornum, 1, selected_col);
4498: returned_column := selected_col;
4499: IF (fnd_flex_server1.g_debug_level > 0) THEN
4500: add_debug('(DSQL returned: TOO MANY ROWS)');
4501: END IF;

Line 4502: dbms_sql.close_cursor(cursornum);

4498: returned_column := selected_col;
4499: IF (fnd_flex_server1.g_debug_level > 0) THEN
4500: add_debug('(DSQL returned: TOO MANY ROWS)');
4501: END IF;
4502: dbms_sql.close_cursor(cursornum);
4503: return(2);
4504: WHEN OTHERS then
4505: if(dbms_sql.is_open(cursornum)) then
4506: dbms_sql.close_cursor(cursornum);

Line 4505: if(dbms_sql.is_open(cursornum)) then

4501: END IF;
4502: dbms_sql.close_cursor(cursornum);
4503: return(2);
4504: WHEN OTHERS then
4505: if(dbms_sql.is_open(cursornum)) then
4506: dbms_sql.close_cursor(cursornum);
4507: end if;
4508: FND_MESSAGE.set_name('FND', 'FLEX-DSQL EXCEPTION');
4509: FND_MESSAGE.set_token('MSG', SQLERRM);

Line 4506: dbms_sql.close_cursor(cursornum);

4502: dbms_sql.close_cursor(cursornum);
4503: return(2);
4504: WHEN OTHERS then
4505: if(dbms_sql.is_open(cursornum)) then
4506: dbms_sql.close_cursor(cursornum);
4507: end if;
4508: FND_MESSAGE.set_name('FND', 'FLEX-DSQL EXCEPTION');
4509: FND_MESSAGE.set_token('MSG', SQLERRM);
4510: FND_MESSAGE.set_token('SQLSTR', SUBSTRB(sql_statement, 1, 1000));

Line 4537: cursornum := dbms_sql.open_cursor;

4533: -- Copy SQL string to array for debugging purposes
4534: --
4535: add_sql_string(fnd_dsql.get_text(p_with_debug => TRUE));
4536:
4537: cursornum := dbms_sql.open_cursor;
4538: fnd_dsql.set_cursor(cursornum);
4539:
4540: sql_statement := fnd_dsql.get_text(p_with_debug => FALSE);
4541: dbms_sql.parse(cursornum, sql_statement, dbms_sql.v7);

Line 4541: dbms_sql.parse(cursornum, sql_statement, dbms_sql.v7);

4537: cursornum := dbms_sql.open_cursor;
4538: fnd_dsql.set_cursor(cursornum);
4539:
4540: sql_statement := fnd_dsql.get_text(p_with_debug => FALSE);
4541: dbms_sql.parse(cursornum, sql_statement, dbms_sql.v7);
4542:
4543: fnd_dsql.do_binds;
4544:
4545: for i in 1..n_selected_cols loop

Line 4548: dbms_sql.define_column(cursornum, i, selected_cols(i), 2000);

4544:
4545: for i in 1..n_selected_cols loop
4546: -- The following prevents NO-DATA-FOUND exception...
4547: selected_cols(i) := NULL;
4548: dbms_sql.define_column(cursornum, i, selected_cols(i), 2000);
4549: end loop;
4550: num_returned := dbms_sql.execute_and_fetch(cursornum, TRUE);
4551: if(num_returned = 1) then
4552: IF (fnd_flex_server1.g_debug_level > 0) THEN

Line 4550: num_returned := dbms_sql.execute_and_fetch(cursornum, TRUE);

4546: -- The following prevents NO-DATA-FOUND exception...
4547: selected_cols(i) := NULL;
4548: dbms_sql.define_column(cursornum, i, selected_cols(i), 2000);
4549: end loop;
4550: num_returned := dbms_sql.execute_and_fetch(cursornum, TRUE);
4551: if(num_returned = 1) then
4552: IF (fnd_flex_server1.g_debug_level > 0) THEN
4553: add_debug('(DSQL returned');
4554: END IF;

Line 4556: dbms_sql.column_value(cursornum, i, selected_cols(i));

4552: IF (fnd_flex_server1.g_debug_level > 0) THEN
4553: add_debug('(DSQL returned');
4554: END IF;
4555: for i in 1..n_selected_cols loop
4556: dbms_sql.column_value(cursornum, i, selected_cols(i));
4557: IF (fnd_flex_server1.g_debug_level > 0) THEN
4558: add_debug(' ''' || selected_cols(i) || '''');
4559: END IF;
4560: end loop;

Line 4569: dbms_sql.close_cursor(cursornum);

4565: num_returned := -1;
4566: FND_MESSAGE.set_name('FND', 'FLEX-SSV EXCEPTION');
4567: FND_MESSAGE.set_token('MSG', 'x_dsql_select() could not fetch rows');
4568: end if;
4569: dbms_sql.close_cursor(cursornum);
4570: returned_columns := selected_cols;
4571: return(num_returned);
4572:
4573: EXCEPTION

Line 4578: dbms_sql.close_cursor(cursornum);

4574: WHEN NO_DATA_FOUND OR invalid_rowid then
4575: IF (fnd_flex_server1.g_debug_level > 0) THEN
4576: add_debug('(DSQL returned: NULL)');
4577: END IF;
4578: dbms_sql.close_cursor(cursornum);
4579: return(0);
4580: WHEN TOO_MANY_ROWS then
4581: IF (fnd_flex_server1.g_debug_level > 0) THEN
4582: add_debug('(DSQL returned');

Line 4585: dbms_sql.column_value(cursornum, i, selected_cols(i));

4581: IF (fnd_flex_server1.g_debug_level > 0) THEN
4582: add_debug('(DSQL returned');
4583: END IF;
4584: for i in 1..n_selected_cols loop
4585: dbms_sql.column_value(cursornum, i, selected_cols(i));
4586: IF (fnd_flex_server1.g_debug_level > 0) THEN
4587: add_debug(' ''' || selected_cols(i) || '''');
4588: END IF;
4589: end loop;

Line 4594: dbms_sql.close_cursor(cursornum);

4590: IF (fnd_flex_server1.g_debug_level > 0) THEN
4591: add_debug(')');
4592: add_debug('(DSQL returned: TOO MANY ROWS)');
4593: END IF;
4594: dbms_sql.close_cursor(cursornum);
4595: returned_columns := selected_cols;
4596: return(2);
4597: WHEN OTHERS then
4598: if(dbms_sql.is_open(cursornum)) then

Line 4598: if(dbms_sql.is_open(cursornum)) then

4594: dbms_sql.close_cursor(cursornum);
4595: returned_columns := selected_cols;
4596: return(2);
4597: WHEN OTHERS then
4598: if(dbms_sql.is_open(cursornum)) then
4599: dbms_sql.close_cursor(cursornum);
4600: end if;
4601: FND_MESSAGE.set_name('FND', 'FLEX-DSQL EXCEPTION');
4602: FND_MESSAGE.set_token('MSG', SQLERRM);

Line 4599: dbms_sql.close_cursor(cursornum);

4595: returned_columns := selected_cols;
4596: return(2);
4597: WHEN OTHERS then
4598: if(dbms_sql.is_open(cursornum)) then
4599: dbms_sql.close_cursor(cursornum);
4600: end if;
4601: FND_MESSAGE.set_name('FND', 'FLEX-DSQL EXCEPTION');
4602: FND_MESSAGE.set_token('MSG', SQLERRM);
4603: FND_MESSAGE.set_token('SQLSTR', SUBSTRB(sql_statement, 1, 1000));