eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.JTF_DIAGNOSTIC_COREAPI dependencies on DBMS_SQL

Line 1248: v_describe dbms_sql.desc_tab;

1244: l_feedback_txt varchar2(200);
1245:
1246: v_values V2T;
1247: v_options V2T;
1248: v_describe dbms_sql.desc_tab;
1249:
1250: T_VARCHAR2 constant integer := 1;
1251: T_NUMBER constant integer := 2;
1252: T_LONG constant integer := 8;

Line 1278: v_cursor_id := DBMS_SQL.OPEN_CURSOR;

1274: execute immediate 'alter session set nls_date_format =
1275: ''MM-DD-YYYY HH24:MI''';
1276: end if;
1277: begin
1278: v_cursor_id := DBMS_SQL.OPEN_CURSOR;
1279: DBMS_SQL.PARSE(v_cursor_id, p_sql_statement, DBMS_SQL.V7);
1280: DBMS_SQL.DESCRIBE_COLUMNS(v_cursor_id, column_high, v_describe);
1281: hold_sql := 'select ';
1282: hold_sql_needed := null;

Line 1279: DBMS_SQL.PARSE(v_cursor_id, p_sql_statement, DBMS_SQL.V7);

1275: ''MM-DD-YYYY HH24:MI''';
1276: end if;
1277: begin
1278: v_cursor_id := DBMS_SQL.OPEN_CURSOR;
1279: DBMS_SQL.PARSE(v_cursor_id, p_sql_statement, DBMS_SQL.V7);
1280: DBMS_SQL.DESCRIBE_COLUMNS(v_cursor_id, column_high, v_describe);
1281: hold_sql := 'select ';
1282: hold_sql_needed := null;
1283: hold_exclude_cols := false;

Line 1280: DBMS_SQL.DESCRIBE_COLUMNS(v_cursor_id, column_high, v_describe);

1276: end if;
1277: begin
1278: v_cursor_id := DBMS_SQL.OPEN_CURSOR;
1279: DBMS_SQL.PARSE(v_cursor_id, p_sql_statement, DBMS_SQL.V7);
1280: DBMS_SQL.DESCRIBE_COLUMNS(v_cursor_id, column_high, v_describe);
1281: hold_sql := 'select ';
1282: hold_sql_needed := null;
1283: hold_exclude_cols := false;
1284: hold_sql_remain := ltrim(substr(replace(p_sql_statement,l_newline,' '), 7));

Line 1293: DBMS_SQL.DEFINE_COLUMN(v_cursor_id, value_counter,

1289: hold_length := to_number(v_describe(value_counter).col_max_len);
1290: end if;
1291: if v_describe(value_counter).col_type in (T_DATE, T_VARCHAR2,
1292: T_NUMBER, T_CHAR, T_ROWID) then
1293: DBMS_SQL.DEFINE_COLUMN(v_cursor_id, value_counter,
1294: hold_string, greatest(TO_NUMBER(hold_length),30));
1295: elsif v_describe(value_counter).col_type = T_CLOB then
1296: DBMS_SQL.DEFINE_COLUMN(v_cursor_id, value_counter, hold_clob);
1297: else

Line 1296: DBMS_SQL.DEFINE_COLUMN(v_cursor_id, value_counter, hold_clob);

1292: T_NUMBER, T_CHAR, T_ROWID) then
1293: DBMS_SQL.DEFINE_COLUMN(v_cursor_id, value_counter,
1294: hold_string, greatest(TO_NUMBER(hold_length),30));
1295: elsif v_describe(value_counter).col_type = T_CLOB then
1296: DBMS_SQL.DEFINE_COLUMN(v_cursor_id, value_counter, hold_clob);
1297: else
1298: null;
1299: end if;
1300: hold_string := v_describe(value_counter).col_name;

Line 1340: DBMS_SQL.CLOSE_CURSOR(v_cursor_id);

1336: end if;
1337: hold_sql_needed := ', ';
1338: end loop;
1339: if hold_exclude_cols then
1340: DBMS_SQL.CLOSE_CURSOR(v_cursor_id);
1341: hold_sql := hold_sql || ' ' ||
1342: substr(p_sql_statement,instr(lower(p_sql_statement),' from '));
1343: row_counter := Display_SQL (hold_sql, table_alias, display_longs,
1344: p_feedback, p_max_rows, p_current_exec + 1) + 1;

Line 1355: v_dummy := DBMS_SQL.EXECUTE(v_cursor_id);

1351: --Always print the header if user doesnot want to hide headers
1352: line_out('
' || temp || '');
1353: end if;
1354:
1355: v_dummy := DBMS_SQL.EXECUTE(v_cursor_id);
1356:
1357: row_counter := 1;
1358: loop
1359: if DBMS_SQL.FETCH_ROWS(v_cursor_id) = 0 then

Line 1359: if DBMS_SQL.FETCH_ROWS(v_cursor_id) = 0 then

1355: v_dummy := DBMS_SQL.EXECUTE(v_cursor_id);
1356:
1357: row_counter := 1;
1358: loop
1359: if DBMS_SQL.FETCH_ROWS(v_cursor_id) = 0 then
1360: if row_counter > 1 then
1361: Show_Table('END');
1362: end if;
1363: exit;

Line 1379: DBMS_SQL.COLUMN_VALUE(v_cursor_id,value_counter,hold_string);

1375: end if;
1376: for value_counter in 1..column_high loop
1377: if v_describe(value_counter).col_type in
1378: (T_DATE, T_VARCHAR2, T_NUMBER, T_CHAR, T_ROWID) then
1379: DBMS_SQL.COLUMN_VALUE(v_cursor_id,value_counter,hold_string);
1380: else
1381: DBMS_SQL.COLUMN_VALUE(v_cursor_id,value_counter,hold_clob);
1382: hold_string := 'CLOB';
1383: end if;

Line 1381: DBMS_SQL.COLUMN_VALUE(v_cursor_id,value_counter,hold_clob);

1377: if v_describe(value_counter).col_type in
1378: (T_DATE, T_VARCHAR2, T_NUMBER, T_CHAR, T_ROWID) then
1379: DBMS_SQL.COLUMN_VALUE(v_cursor_id,value_counter,hold_string);
1380: else
1381: DBMS_SQL.COLUMN_VALUE(v_cursor_id,value_counter,hold_clob);
1382: hold_string := 'CLOB';
1383: end if;
1384: hold_string := nvl(hold_string,' ');
1385: hold_option := null;

Line 1420: DBMS_SQL.CLOSE_CURSOR(v_cursor_id);

1416: Show_Table('END');
1417: exit;
1418: end if;
1419: end loop;
1420: DBMS_SQL.CLOSE_CURSOR(v_cursor_id);
1421: end if;
1422: if p_current_exec = 0 and p_feedback = 'Y' then
1423: if row_counter = 1 then
1424: if hideHeader = FALSE then

Line 1447: error_position := DBMS_SQL.LAST_ERROR_POSITION;

1443: return row_counter-1;
1444: exception
1445: when others then
1446: line_out('
');
1447: error_position := DBMS_SQL.LAST_ERROR_POSITION;
1448: ErrorPrint(sqlerrm || ' occurred in Display_SQL');
1449: ActionErrorPrint('Please report the error below to your support '||
1450: 'representative');
1451: line_out('Position: ' || error_position || ' of ' ||

Line 1462: DBMS_SQL.CLOSE_CURSOR(v_cursor_id);

1458: replace(substr(p_sql_statement,error_position+1,
1459: error_position_end),l_newline,'
') || '');
1460: line_out(replace(substr(p_sql_statement,error_position+
1461: error_position_end+1),l_newline,'
') || '
');
1462: DBMS_SQL.CLOSE_CURSOR(v_cursor_id);
1463: if p_current_exec = 0 then
1464: execute immediate 'alter session set nls_date_format = ''' ||
1465: l_hold_date_format || '''';
1466: end if;

Line 2086: l_cursor := dbms_sql.open_cursor;

2082: 'where rg.responsibility_id = '||to_char(p_resp_id)||' '||
2083: 'and rg.user_id = '||to_char(l_user_id);
2084: end if;
2085: begin
2086: l_cursor := dbms_sql.open_cursor;
2087: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
2088: dbms_sql.define_column(l_cursor, 1, l_app_id);
2089: l_num_rows := dbms_sql.execute_and_fetch(l_cursor, TRUE);
2090: dbms_sql.column_value(l_cursor, 1, l_app_id);

Line 2087: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);

2083: 'and rg.user_id = '||to_char(l_user_id);
2084: end if;
2085: begin
2086: l_cursor := dbms_sql.open_cursor;
2087: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
2088: dbms_sql.define_column(l_cursor, 1, l_app_id);
2089: l_num_rows := dbms_sql.execute_and_fetch(l_cursor, TRUE);
2090: dbms_sql.column_value(l_cursor, 1, l_app_id);
2091: dbms_sql.close_cursor(l_cursor);

Line 2088: dbms_sql.define_column(l_cursor, 1, l_app_id);

2084: end if;
2085: begin
2086: l_cursor := dbms_sql.open_cursor;
2087: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
2088: dbms_sql.define_column(l_cursor, 1, l_app_id);
2089: l_num_rows := dbms_sql.execute_and_fetch(l_cursor, TRUE);
2090: dbms_sql.column_value(l_cursor, 1, l_app_id);
2091: dbms_sql.close_cursor(l_cursor);
2092:

Line 2089: l_num_rows := dbms_sql.execute_and_fetch(l_cursor, TRUE);

2085: begin
2086: l_cursor := dbms_sql.open_cursor;
2087: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
2088: dbms_sql.define_column(l_cursor, 1, l_app_id);
2089: l_num_rows := dbms_sql.execute_and_fetch(l_cursor, TRUE);
2090: dbms_sql.column_value(l_cursor, 1, l_app_id);
2091: dbms_sql.close_cursor(l_cursor);
2092:
2093: exception

Line 2090: dbms_sql.column_value(l_cursor, 1, l_app_id);

2086: l_cursor := dbms_sql.open_cursor;
2087: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
2088: dbms_sql.define_column(l_cursor, 1, l_app_id);
2089: l_num_rows := dbms_sql.execute_and_fetch(l_cursor, TRUE);
2090: dbms_sql.column_value(l_cursor, 1, l_app_id);
2091: dbms_sql.close_cursor(l_cursor);
2092:
2093: exception
2094: when no_data_found then

Line 2091: dbms_sql.close_cursor(l_cursor);

2087: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
2088: dbms_sql.define_column(l_cursor, 1, l_app_id);
2089: l_num_rows := dbms_sql.execute_and_fetch(l_cursor, TRUE);
2090: dbms_sql.column_value(l_cursor, 1, l_app_id);
2091: dbms_sql.close_cursor(l_cursor);
2092:
2093: exception
2094: when no_data_found then
2095: raise inv_resp;

Line 2100: dbms_sql.close_cursor(l_cursor);

2096: when too_many_rows then
2097: if p_app_id is null then
2098: raise no_app;
2099: else
2100: dbms_sql.close_cursor(l_cursor);
2101: l_cursor := dbms_sql.open_cursor;
2102: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
2103: dbms_sql.define_column(l_cursor, 1, l_app_id);
2104: l_num_rows := dbms_sql.execute(l_cursor);

Line 2101: l_cursor := dbms_sql.open_cursor;

2097: if p_app_id is null then
2098: raise no_app;
2099: else
2100: dbms_sql.close_cursor(l_cursor);
2101: l_cursor := dbms_sql.open_cursor;
2102: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
2103: dbms_sql.define_column(l_cursor, 1, l_app_id);
2104: l_num_rows := dbms_sql.execute(l_cursor);
2105: while dbms_sql.fetch_rows(l_cursor) > 0 loop

Line 2102: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);

2098: raise no_app;
2099: else
2100: dbms_sql.close_cursor(l_cursor);
2101: l_cursor := dbms_sql.open_cursor;
2102: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
2103: dbms_sql.define_column(l_cursor, 1, l_app_id);
2104: l_num_rows := dbms_sql.execute(l_cursor);
2105: while dbms_sql.fetch_rows(l_cursor) > 0 loop
2106: dbms_sql.column_value(l_cursor, 1, l_app_id);

Line 2103: dbms_sql.define_column(l_cursor, 1, l_app_id);

2099: else
2100: dbms_sql.close_cursor(l_cursor);
2101: l_cursor := dbms_sql.open_cursor;
2102: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
2103: dbms_sql.define_column(l_cursor, 1, l_app_id);
2104: l_num_rows := dbms_sql.execute(l_cursor);
2105: while dbms_sql.fetch_rows(l_cursor) > 0 loop
2106: dbms_sql.column_value(l_cursor, 1, l_app_id);
2107: if l_app_id = p_app_id then

Line 2104: l_num_rows := dbms_sql.execute(l_cursor);

2100: dbms_sql.close_cursor(l_cursor);
2101: l_cursor := dbms_sql.open_cursor;
2102: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
2103: dbms_sql.define_column(l_cursor, 1, l_app_id);
2104: l_num_rows := dbms_sql.execute(l_cursor);
2105: while dbms_sql.fetch_rows(l_cursor) > 0 loop
2106: dbms_sql.column_value(l_cursor, 1, l_app_id);
2107: if l_app_id = p_app_id then
2108: exit;

Line 2105: while dbms_sql.fetch_rows(l_cursor) > 0 loop

2101: l_cursor := dbms_sql.open_cursor;
2102: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
2103: dbms_sql.define_column(l_cursor, 1, l_app_id);
2104: l_num_rows := dbms_sql.execute(l_cursor);
2105: while dbms_sql.fetch_rows(l_cursor) > 0 loop
2106: dbms_sql.column_value(l_cursor, 1, l_app_id);
2107: if l_app_id = p_app_id then
2108: exit;
2109: end if;

Line 2106: dbms_sql.column_value(l_cursor, 1, l_app_id);

2102: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
2103: dbms_sql.define_column(l_cursor, 1, l_app_id);
2104: l_num_rows := dbms_sql.execute(l_cursor);
2105: while dbms_sql.fetch_rows(l_cursor) > 0 loop
2106: dbms_sql.column_value(l_cursor, 1, l_app_id);
2107: if l_app_id = p_app_id then
2108: exit;
2109: end if;
2110: end loop;

Line 2111: dbms_sql.close_cursor(l_cursor);

2107: if l_app_id = p_app_id then
2108: exit;
2109: end if;
2110: end loop;
2111: dbms_sql.close_cursor(l_cursor);
2112: if l_app_id <> p_app_id then
2113: raise inv_app;
2114: end if;
2115: end if;

Line 2117: l_cursor := dbms_sql.open_cursor;

2113: raise inv_app;
2114: end if;
2115: end if;
2116: end;
2117: l_cursor := dbms_sql.open_cursor;
2118: if g_appl_version = '11.5' then
2119: sqltxt := 'begin '||
2120: 'fnd_global.apps_initialize(:user, :resp, '||
2121: ':appl, :secg); '||

Line 2123: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);

2119: sqltxt := 'begin '||
2120: 'fnd_global.apps_initialize(:user, :resp, '||
2121: ':appl, :secg); '||
2122: 'end; ';
2123: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
2124: dbms_sql.bind_variable(l_cursor,':user',l_user_id);
2125: dbms_sql.bind_variable(l_cursor,':resp',p_resp_id);
2126: dbms_sql.bind_variable(l_cursor,':appl',l_app_id);
2127: dbms_sql.bind_variable(l_cursor,':secg',p_sec_grp_id);

Line 2124: dbms_sql.bind_variable(l_cursor,':user',l_user_id);

2120: 'fnd_global.apps_initialize(:user, :resp, '||
2121: ':appl, :secg); '||
2122: 'end; ';
2123: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
2124: dbms_sql.bind_variable(l_cursor,':user',l_user_id);
2125: dbms_sql.bind_variable(l_cursor,':resp',p_resp_id);
2126: dbms_sql.bind_variable(l_cursor,':appl',l_app_id);
2127: dbms_sql.bind_variable(l_cursor,':secg',p_sec_grp_id);
2128: else

Line 2125: dbms_sql.bind_variable(l_cursor,':resp',p_resp_id);

2121: ':appl, :secg); '||
2122: 'end; ';
2123: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
2124: dbms_sql.bind_variable(l_cursor,':user',l_user_id);
2125: dbms_sql.bind_variable(l_cursor,':resp',p_resp_id);
2126: dbms_sql.bind_variable(l_cursor,':appl',l_app_id);
2127: dbms_sql.bind_variable(l_cursor,':secg',p_sec_grp_id);
2128: else
2129: sqltxt := 'begin '||

Line 2126: dbms_sql.bind_variable(l_cursor,':appl',l_app_id);

2122: 'end; ';
2123: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
2124: dbms_sql.bind_variable(l_cursor,':user',l_user_id);
2125: dbms_sql.bind_variable(l_cursor,':resp',p_resp_id);
2126: dbms_sql.bind_variable(l_cursor,':appl',l_app_id);
2127: dbms_sql.bind_variable(l_cursor,':secg',p_sec_grp_id);
2128: else
2129: sqltxt := 'begin '||
2130: 'fnd_global.apps_initialize(:user,:resp,:appl); '||

Line 2127: dbms_sql.bind_variable(l_cursor,':secg',p_sec_grp_id);

2123: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
2124: dbms_sql.bind_variable(l_cursor,':user',l_user_id);
2125: dbms_sql.bind_variable(l_cursor,':resp',p_resp_id);
2126: dbms_sql.bind_variable(l_cursor,':appl',l_app_id);
2127: dbms_sql.bind_variable(l_cursor,':secg',p_sec_grp_id);
2128: else
2129: sqltxt := 'begin '||
2130: 'fnd_global.apps_initialize(:user,:resp,:appl); '||
2131: 'end; ';

Line 2132: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);

2128: else
2129: sqltxt := 'begin '||
2130: 'fnd_global.apps_initialize(:user,:resp,:appl); '||
2131: 'end; ';
2132: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
2133: dbms_sql.bind_variable(l_cursor,':user',l_user_id);
2134: dbms_sql.bind_variable(l_cursor,':resp',p_resp_id);
2135: dbms_sql.bind_variable(l_cursor,':appl',l_app_id);
2136: end if;

Line 2133: dbms_sql.bind_variable(l_cursor,':user',l_user_id);

2129: sqltxt := 'begin '||
2130: 'fnd_global.apps_initialize(:user,:resp,:appl); '||
2131: 'end; ';
2132: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
2133: dbms_sql.bind_variable(l_cursor,':user',l_user_id);
2134: dbms_sql.bind_variable(l_cursor,':resp',p_resp_id);
2135: dbms_sql.bind_variable(l_cursor,':appl',l_app_id);
2136: end if;
2137: l_num_rows := dbms_sql.execute(l_cursor);

Line 2134: dbms_sql.bind_variable(l_cursor,':resp',p_resp_id);

2130: 'fnd_global.apps_initialize(:user,:resp,:appl); '||
2131: 'end; ';
2132: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
2133: dbms_sql.bind_variable(l_cursor,':user',l_user_id);
2134: dbms_sql.bind_variable(l_cursor,':resp',p_resp_id);
2135: dbms_sql.bind_variable(l_cursor,':appl',l_app_id);
2136: end if;
2137: l_num_rows := dbms_sql.execute(l_cursor);
2138: g_user_id := l_user_id;

Line 2135: dbms_sql.bind_variable(l_cursor,':appl',l_app_id);

2131: 'end; ';
2132: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
2133: dbms_sql.bind_variable(l_cursor,':user',l_user_id);
2134: dbms_sql.bind_variable(l_cursor,':resp',p_resp_id);
2135: dbms_sql.bind_variable(l_cursor,':appl',l_app_id);
2136: end if;
2137: l_num_rows := dbms_sql.execute(l_cursor);
2138: g_user_id := l_user_id;
2139: g_resp_id := p_resp_id;

Line 2137: l_num_rows := dbms_sql.execute(l_cursor);

2133: dbms_sql.bind_variable(l_cursor,':user',l_user_id);
2134: dbms_sql.bind_variable(l_cursor,':resp',p_resp_id);
2135: dbms_sql.bind_variable(l_cursor,':appl',l_app_id);
2136: end if;
2137: l_num_rows := dbms_sql.execute(l_cursor);
2138: g_user_id := l_user_id;
2139: g_resp_id := p_resp_id;
2140: g_appl_id := l_app_id;
2141: g_org_id := Get_Profile_Option('ORG_ID');

Line 3329: l_cols dbms_sql.desc_tab;

3325: l_row_counter number;
3326: l_row_str varchar2(32767) := null;
3327: l_column_high binary_integer := 1;
3328: l_cursor number;
3329: l_cols dbms_sql.desc_tab;
3330: l_number_value number;
3331: l_date_value date;
3332: l_varchar_value varchar2(32767);
3333: l_dummy integer;

Line 3359: l_cursor := DBMS_SQL.OPEN_CURSOR;

3355: l_max_rows := p_max_rows;
3356: end if;
3357: l_headers := p_headers;
3358: l_disp_lengths := p_disp_lengths;
3359: l_cursor := DBMS_SQL.OPEN_CURSOR;
3360: begin
3361: DBMS_SQL.PARSE(l_cursor, p_sql_statement, DBMS_SQL.V7);
3362: exception when others then
3363: ErrorPrint('Unable to parse the statement passed to Display_SQL: '||

Line 3361: DBMS_SQL.PARSE(l_cursor, p_sql_statement, DBMS_SQL.V7);

3357: l_headers := p_headers;
3358: l_disp_lengths := p_disp_lengths;
3359: l_cursor := DBMS_SQL.OPEN_CURSOR;
3360: begin
3361: DBMS_SQL.PARSE(l_cursor, p_sql_statement, DBMS_SQL.V7);
3362: exception when others then
3363: ErrorPrint('Unable to parse the statement passed to Display_SQL: '||
3364: sqlerrm);
3365: ActionErrorPrint('Review the SQL statement below for errors and provide '||

Line 3371: DBMS_SQL.DESCRIBE_COLUMNS(l_cursor, l_column_high, l_cols);

3367: p_sql_statement);
3368: raise param_error;
3369: end;
3370:
3371: DBMS_SQL.DESCRIBE_COLUMNS(l_cursor, l_column_high, l_cols);
3372: if l_column_high <> l_disp_lengths.count then
3373: ErrorPrint('The column length is not specified for the correct number '||
3374: 'of columns in call to Display_SQL');
3375: ActionErrorPrint('You must spefify the display length for each and every '||

Line 3396: DBMS_SQL.DEFINE_COLUMN(l_cursor, i, l_number_value);

3392: 'columns of type '||l_cols(i).col_type);
3393: raise param_error;
3394: end if;
3395: if l_cols(i).col_type = T_NUMBER then
3396: DBMS_SQL.DEFINE_COLUMN(l_cursor, i, l_number_value);
3397: elsif l_cols(i).col_type = T_DATE then
3398: DBMS_SQL.DEFINE_COLUMN(l_cursor, i, l_date_value);
3399: l_disp_lengths(i) := greatest(l_disp_lengths(i),11);
3400: elsif l_cols(i).col_type = T_VARCHAR2 then

Line 3398: DBMS_SQL.DEFINE_COLUMN(l_cursor, i, l_date_value);

3394: end if;
3395: if l_cols(i).col_type = T_NUMBER then
3396: DBMS_SQL.DEFINE_COLUMN(l_cursor, i, l_number_value);
3397: elsif l_cols(i).col_type = T_DATE then
3398: DBMS_SQL.DEFINE_COLUMN(l_cursor, i, l_date_value);
3399: l_disp_lengths(i) := greatest(l_disp_lengths(i),11);
3400: elsif l_cols(i).col_type = T_VARCHAR2 then
3401: DBMS_SQL.DEFINE_COLUMN(l_cursor, i, l_varchar_value,
3402: l_cols(i).col_max_len);

Line 3401: DBMS_SQL.DEFINE_COLUMN(l_cursor, i, l_varchar_value,

3397: elsif l_cols(i).col_type = T_DATE then
3398: DBMS_SQL.DEFINE_COLUMN(l_cursor, i, l_date_value);
3399: l_disp_lengths(i) := greatest(l_disp_lengths(i),11);
3400: elsif l_cols(i).col_type = T_VARCHAR2 then
3401: DBMS_SQL.DEFINE_COLUMN(l_cursor, i, l_varchar_value,
3402: l_cols(i).col_max_len);
3403: else
3404: null;
3405: end if;

Line 3419: l_dummy := dbms_sql.execute(l_cursor);

3415: l_disp_lengths(i) := nvl(l_disp_lengths(i),length(l_headers(i)));
3416: l_headers(i) := lpad(l_headers(i),l_disp_lengths(i),' ');
3417: end if;
3418: end loop;
3419: l_dummy := dbms_sql.execute(l_cursor);
3420: l_row_counter := 0;
3421: while dbms_sql.fetch_rows(l_cursor) <> 0 loop
3422: if l_row_counter = 0 then
3423: Show_Table_Header(l_headers, l_disp_lengths);

Line 3421: while dbms_sql.fetch_rows(l_cursor) <> 0 loop

3417: end if;
3418: end loop;
3419: l_dummy := dbms_sql.execute(l_cursor);
3420: l_row_counter := 0;
3421: while dbms_sql.fetch_rows(l_cursor) <> 0 loop
3422: if l_row_counter = 0 then
3423: Show_Table_Header(l_headers, l_disp_lengths);
3424: end if;
3425: l_row_counter := l_row_counter + 1;

Line 3432: dbms_sql.column_value(l_cursor, i, l_number_value);

3428: exit;
3429: end if;
3430: for i in 1..l_column_high loop
3431: if l_cols(i).col_type = T_NUMBER then
3432: dbms_sql.column_value(l_cursor, i, l_number_value);
3433: if length(to_char(l_number_value)) > l_disp_lengths(i) then
3434: l_varchar_value := rpad('*',l_disp_lengths(i),'*');
3435: else
3436: if i = 1 then

Line 3449: dbms_sql.column_value(l_cursor, i, l_date_value);

3445: l_disp_lengths(i),' ');
3446: end if;
3447: end if;
3448: elsif l_cols(i).col_type = T_DATE then
3449: dbms_sql.column_value(l_cursor, i, l_date_value);
3450: if i = 1 and l_date_value is null then
3451: l_varchar_value := rpad(l_return,l_disp_lengths(i)+1, ' ');
3452: else
3453: l_varchar_value:=rpad(nvl(to_char(l_date_value,'MM-DD-YYYY'),' '),

Line 3457: dbms_sql.column_value(l_cursor, i, l_varchar_value);

3453: l_varchar_value:=rpad(nvl(to_char(l_date_value,'MM-DD-YYYY'),' '),
3454: l_disp_lengths(i), ' ');
3455: end if;
3456: elsif l_cols(i).col_type = T_VARCHAR2 then
3457: dbms_sql.column_value(l_cursor, i, l_varchar_value);
3458: if i = 1 and l_varchar_value is null then
3459: l_varchar_value := rpad(l_return,l_disp_lengths(i)+1,' ');
3460: else
3461: l_varchar_value := rpad(substr(nvl(l_varchar_value,' '),1,

Line 4253: l_cursor := dbms_sql.open_cursor;

4249: 'where rg.responsibility_id = '||to_char(p_resp_id)||' '||
4250: 'and rg.user_id = '||to_char(l_user_id);
4251: end if;
4252: begin
4253: l_cursor := dbms_sql.open_cursor;
4254: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
4255: dbms_sql.define_column(l_cursor, 1, l_app_id);
4256: l_num_rows := dbms_sql.execute_and_fetch(l_cursor, TRUE);
4257: dbms_sql.column_value(l_cursor, 1, l_app_id);

Line 4254: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);

4250: 'and rg.user_id = '||to_char(l_user_id);
4251: end if;
4252: begin
4253: l_cursor := dbms_sql.open_cursor;
4254: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
4255: dbms_sql.define_column(l_cursor, 1, l_app_id);
4256: l_num_rows := dbms_sql.execute_and_fetch(l_cursor, TRUE);
4257: dbms_sql.column_value(l_cursor, 1, l_app_id);
4258: dbms_sql.close_cursor(l_cursor);

Line 4255: dbms_sql.define_column(l_cursor, 1, l_app_id);

4251: end if;
4252: begin
4253: l_cursor := dbms_sql.open_cursor;
4254: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
4255: dbms_sql.define_column(l_cursor, 1, l_app_id);
4256: l_num_rows := dbms_sql.execute_and_fetch(l_cursor, TRUE);
4257: dbms_sql.column_value(l_cursor, 1, l_app_id);
4258: dbms_sql.close_cursor(l_cursor);
4259:

Line 4256: l_num_rows := dbms_sql.execute_and_fetch(l_cursor, TRUE);

4252: begin
4253: l_cursor := dbms_sql.open_cursor;
4254: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
4255: dbms_sql.define_column(l_cursor, 1, l_app_id);
4256: l_num_rows := dbms_sql.execute_and_fetch(l_cursor, TRUE);
4257: dbms_sql.column_value(l_cursor, 1, l_app_id);
4258: dbms_sql.close_cursor(l_cursor);
4259:
4260: exception

Line 4257: dbms_sql.column_value(l_cursor, 1, l_app_id);

4253: l_cursor := dbms_sql.open_cursor;
4254: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
4255: dbms_sql.define_column(l_cursor, 1, l_app_id);
4256: l_num_rows := dbms_sql.execute_and_fetch(l_cursor, TRUE);
4257: dbms_sql.column_value(l_cursor, 1, l_app_id);
4258: dbms_sql.close_cursor(l_cursor);
4259:
4260: exception
4261: when no_data_found then

Line 4258: dbms_sql.close_cursor(l_cursor);

4254: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
4255: dbms_sql.define_column(l_cursor, 1, l_app_id);
4256: l_num_rows := dbms_sql.execute_and_fetch(l_cursor, TRUE);
4257: dbms_sql.column_value(l_cursor, 1, l_app_id);
4258: dbms_sql.close_cursor(l_cursor);
4259:
4260: exception
4261: when no_data_found then
4262: raise inv_resp;

Line 4267: dbms_sql.close_cursor(l_cursor);

4263: when too_many_rows then
4264: if p_app_id is null then
4265: raise no_app;
4266: else
4267: dbms_sql.close_cursor(l_cursor);
4268: l_cursor := dbms_sql.open_cursor;
4269: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
4270: dbms_sql.define_column(l_cursor, 1, l_app_id);
4271: l_num_rows := dbms_sql.execute(l_cursor);

Line 4268: l_cursor := dbms_sql.open_cursor;

4264: if p_app_id is null then
4265: raise no_app;
4266: else
4267: dbms_sql.close_cursor(l_cursor);
4268: l_cursor := dbms_sql.open_cursor;
4269: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
4270: dbms_sql.define_column(l_cursor, 1, l_app_id);
4271: l_num_rows := dbms_sql.execute(l_cursor);
4272: while dbms_sql.fetch_rows(l_cursor) > 0 loop

Line 4269: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);

4265: raise no_app;
4266: else
4267: dbms_sql.close_cursor(l_cursor);
4268: l_cursor := dbms_sql.open_cursor;
4269: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
4270: dbms_sql.define_column(l_cursor, 1, l_app_id);
4271: l_num_rows := dbms_sql.execute(l_cursor);
4272: while dbms_sql.fetch_rows(l_cursor) > 0 loop
4273: dbms_sql.column_value(l_cursor, 1, l_app_id);

Line 4270: dbms_sql.define_column(l_cursor, 1, l_app_id);

4266: else
4267: dbms_sql.close_cursor(l_cursor);
4268: l_cursor := dbms_sql.open_cursor;
4269: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
4270: dbms_sql.define_column(l_cursor, 1, l_app_id);
4271: l_num_rows := dbms_sql.execute(l_cursor);
4272: while dbms_sql.fetch_rows(l_cursor) > 0 loop
4273: dbms_sql.column_value(l_cursor, 1, l_app_id);
4274: if l_app_id = p_app_id then

Line 4271: l_num_rows := dbms_sql.execute(l_cursor);

4267: dbms_sql.close_cursor(l_cursor);
4268: l_cursor := dbms_sql.open_cursor;
4269: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
4270: dbms_sql.define_column(l_cursor, 1, l_app_id);
4271: l_num_rows := dbms_sql.execute(l_cursor);
4272: while dbms_sql.fetch_rows(l_cursor) > 0 loop
4273: dbms_sql.column_value(l_cursor, 1, l_app_id);
4274: if l_app_id = p_app_id then
4275: exit;

Line 4272: while dbms_sql.fetch_rows(l_cursor) > 0 loop

4268: l_cursor := dbms_sql.open_cursor;
4269: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
4270: dbms_sql.define_column(l_cursor, 1, l_app_id);
4271: l_num_rows := dbms_sql.execute(l_cursor);
4272: while dbms_sql.fetch_rows(l_cursor) > 0 loop
4273: dbms_sql.column_value(l_cursor, 1, l_app_id);
4274: if l_app_id = p_app_id then
4275: exit;
4276: end if;

Line 4273: dbms_sql.column_value(l_cursor, 1, l_app_id);

4269: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
4270: dbms_sql.define_column(l_cursor, 1, l_app_id);
4271: l_num_rows := dbms_sql.execute(l_cursor);
4272: while dbms_sql.fetch_rows(l_cursor) > 0 loop
4273: dbms_sql.column_value(l_cursor, 1, l_app_id);
4274: if l_app_id = p_app_id then
4275: exit;
4276: end if;
4277: end loop;

Line 4278: dbms_sql.close_cursor(l_cursor);

4274: if l_app_id = p_app_id then
4275: exit;
4276: end if;
4277: end loop;
4278: dbms_sql.close_cursor(l_cursor);
4279: if l_app_id <> p_app_id then
4280: raise inv_app;
4281: end if;
4282: end if;

Line 4284: l_cursor := dbms_sql.open_cursor;

4280: raise inv_app;
4281: end if;
4282: end if;
4283: end;
4284: l_cursor := dbms_sql.open_cursor;
4285: if g_appl_version = '11.5' then
4286: sqltxt := 'begin '||
4287: 'fnd_global.apps_initialize(:user, :resp, '||
4288: ':appl, :secg); '||

Line 4290: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);

4286: sqltxt := 'begin '||
4287: 'fnd_global.apps_initialize(:user, :resp, '||
4288: ':appl, :secg); '||
4289: 'end; ';
4290: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
4291: dbms_sql.bind_variable(l_cursor,':user',l_user_id);
4292: dbms_sql.bind_variable(l_cursor,':resp',p_resp_id);
4293: dbms_sql.bind_variable(l_cursor,':appl',l_app_id);
4294: dbms_sql.bind_variable(l_cursor,':secg',p_sec_grp_id);

Line 4291: dbms_sql.bind_variable(l_cursor,':user',l_user_id);

4287: 'fnd_global.apps_initialize(:user, :resp, '||
4288: ':appl, :secg); '||
4289: 'end; ';
4290: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
4291: dbms_sql.bind_variable(l_cursor,':user',l_user_id);
4292: dbms_sql.bind_variable(l_cursor,':resp',p_resp_id);
4293: dbms_sql.bind_variable(l_cursor,':appl',l_app_id);
4294: dbms_sql.bind_variable(l_cursor,':secg',p_sec_grp_id);
4295: else

Line 4292: dbms_sql.bind_variable(l_cursor,':resp',p_resp_id);

4288: ':appl, :secg); '||
4289: 'end; ';
4290: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
4291: dbms_sql.bind_variable(l_cursor,':user',l_user_id);
4292: dbms_sql.bind_variable(l_cursor,':resp',p_resp_id);
4293: dbms_sql.bind_variable(l_cursor,':appl',l_app_id);
4294: dbms_sql.bind_variable(l_cursor,':secg',p_sec_grp_id);
4295: else
4296: sqltxt := 'begin '||

Line 4293: dbms_sql.bind_variable(l_cursor,':appl',l_app_id);

4289: 'end; ';
4290: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
4291: dbms_sql.bind_variable(l_cursor,':user',l_user_id);
4292: dbms_sql.bind_variable(l_cursor,':resp',p_resp_id);
4293: dbms_sql.bind_variable(l_cursor,':appl',l_app_id);
4294: dbms_sql.bind_variable(l_cursor,':secg',p_sec_grp_id);
4295: else
4296: sqltxt := 'begin '||
4297: 'fnd_global.apps_initialize(:user,:resp,:appl); '||

Line 4294: dbms_sql.bind_variable(l_cursor,':secg',p_sec_grp_id);

4290: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
4291: dbms_sql.bind_variable(l_cursor,':user',l_user_id);
4292: dbms_sql.bind_variable(l_cursor,':resp',p_resp_id);
4293: dbms_sql.bind_variable(l_cursor,':appl',l_app_id);
4294: dbms_sql.bind_variable(l_cursor,':secg',p_sec_grp_id);
4295: else
4296: sqltxt := 'begin '||
4297: 'fnd_global.apps_initialize(:user,:resp,:appl); '||
4298: 'end; ';

Line 4299: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);

4295: else
4296: sqltxt := 'begin '||
4297: 'fnd_global.apps_initialize(:user,:resp,:appl); '||
4298: 'end; ';
4299: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
4300: dbms_sql.bind_variable(l_cursor,':user',l_user_id);
4301: dbms_sql.bind_variable(l_cursor,':resp',p_resp_id);
4302: dbms_sql.bind_variable(l_cursor,':appl',l_app_id);
4303: end if;

Line 4300: dbms_sql.bind_variable(l_cursor,':user',l_user_id);

4296: sqltxt := 'begin '||
4297: 'fnd_global.apps_initialize(:user,:resp,:appl); '||
4298: 'end; ';
4299: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
4300: dbms_sql.bind_variable(l_cursor,':user',l_user_id);
4301: dbms_sql.bind_variable(l_cursor,':resp',p_resp_id);
4302: dbms_sql.bind_variable(l_cursor,':appl',l_app_id);
4303: end if;
4304: l_num_rows := dbms_sql.execute(l_cursor);

Line 4301: dbms_sql.bind_variable(l_cursor,':resp',p_resp_id);

4297: 'fnd_global.apps_initialize(:user,:resp,:appl); '||
4298: 'end; ';
4299: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
4300: dbms_sql.bind_variable(l_cursor,':user',l_user_id);
4301: dbms_sql.bind_variable(l_cursor,':resp',p_resp_id);
4302: dbms_sql.bind_variable(l_cursor,':appl',l_app_id);
4303: end if;
4304: l_num_rows := dbms_sql.execute(l_cursor);
4305: g_user_id := l_user_id;

Line 4302: dbms_sql.bind_variable(l_cursor,':appl',l_app_id);

4298: 'end; ';
4299: dbms_sql.parse(l_cursor, sqltxt, dbms_sql.native);
4300: dbms_sql.bind_variable(l_cursor,':user',l_user_id);
4301: dbms_sql.bind_variable(l_cursor,':resp',p_resp_id);
4302: dbms_sql.bind_variable(l_cursor,':appl',l_app_id);
4303: end if;
4304: l_num_rows := dbms_sql.execute(l_cursor);
4305: g_user_id := l_user_id;
4306: g_resp_id := p_resp_id;

Line 4304: l_num_rows := dbms_sql.execute(l_cursor);

4300: dbms_sql.bind_variable(l_cursor,':user',l_user_id);
4301: dbms_sql.bind_variable(l_cursor,':resp',p_resp_id);
4302: dbms_sql.bind_variable(l_cursor,':appl',l_app_id);
4303: end if;
4304: l_num_rows := dbms_sql.execute(l_cursor);
4305: g_user_id := l_user_id;
4306: g_resp_id := p_resp_id;
4307: g_appl_id := l_app_id;
4308: g_org_id := Get_Profile_Option('ORG_ID');