DBA Data[Home] [Help]

APPS.PO_VENDORS_SV dependencies on DBMS_SQL

Line 1079: cid := dbms_sql.open_cursor;

1075: -- dbms_output.put_line(substr(sql_str,1,255));
1076: -- dbms_output.put_line(substr(sql_str,256,255));
1077: -- dbms_output.put_line(substr(sql_str,513,255));
1078:
1079: cid := dbms_sql.open_cursor;
1080:
1081: dbms_sql.parse(cid, sql_str , dbms_sql.native);
1082:
1083: /* Bug 4885978: Changed the length of vendor_name, vendor_num

Line 1081: dbms_sql.parse(cid, sql_str , dbms_sql.native);

1077: -- dbms_output.put_line(substr(sql_str,513,255));
1078:
1079: cid := dbms_sql.open_cursor;
1080:
1081: dbms_sql.parse(cid, sql_str , dbms_sql.native);
1082:
1083: /* Bug 4885978: Changed the length of vendor_name, vendor_num
1084: as specified in PO_VENDORS table */
1085:

Line 1086: dbms_sql.define_column(cid,1,p_vendor_record.vendor_name,240);

1082:
1083: /* Bug 4885978: Changed the length of vendor_name, vendor_num
1084: as specified in PO_VENDORS table */
1085:
1086: dbms_sql.define_column(cid,1,p_vendor_record.vendor_name,240);
1087: dbms_sql.define_column(cid,2,p_vendor_record.vendor_id);
1088: dbms_sql.define_column(cid,3,p_vendor_record.vendor_num,30);
1089:
1090: IF NOT vendor_name_null THEN

Line 1087: dbms_sql.define_column(cid,2,p_vendor_record.vendor_id);

1083: /* Bug 4885978: Changed the length of vendor_name, vendor_num
1084: as specified in PO_VENDORS table */
1085:
1086: dbms_sql.define_column(cid,1,p_vendor_record.vendor_name,240);
1087: dbms_sql.define_column(cid,2,p_vendor_record.vendor_id);
1088: dbms_sql.define_column(cid,3,p_vendor_record.vendor_num,30);
1089:
1090: IF NOT vendor_name_null THEN
1091:

Line 1088: dbms_sql.define_column(cid,3,p_vendor_record.vendor_num,30);

1084: as specified in PO_VENDORS table */
1085:
1086: dbms_sql.define_column(cid,1,p_vendor_record.vendor_name,240);
1087: dbms_sql.define_column(cid,2,p_vendor_record.vendor_id);
1088: dbms_sql.define_column(cid,3,p_vendor_record.vendor_num,30);
1089:
1090: IF NOT vendor_name_null THEN
1091:
1092: dbms_sql.bind_variable(cid,'v_name',p_vendor_record.vendor_name);

Line 1092: dbms_sql.bind_variable(cid,'v_name',p_vendor_record.vendor_name);

1088: dbms_sql.define_column(cid,3,p_vendor_record.vendor_num,30);
1089:
1090: IF NOT vendor_name_null THEN
1091:
1092: dbms_sql.bind_variable(cid,'v_name',p_vendor_record.vendor_name);
1093:
1094: END IF;
1095:
1096: IF NOT vendor_id_null THEN

Line 1098: dbms_sql.bind_variable(cid,'v_id',p_vendor_record.vendor_id);

1094: END IF;
1095:
1096: IF NOT vendor_id_null THEN
1097:
1098: dbms_sql.bind_variable(cid,'v_id',p_vendor_record.vendor_id);
1099:
1100: END IF;
1101:
1102: IF NOT vendor_num_null THEN

Line 1104: dbms_sql.bind_variable(cid,'v_num',p_vendor_record.vendor_num);

1100: END IF;
1101:
1102: IF NOT vendor_num_null THEN
1103:
1104: dbms_sql.bind_variable(cid,'v_num',p_vendor_record.vendor_num);
1105:
1106: END IF;
1107:
1108: rows_processed := dbms_sql.execute_and_fetch(cid);

Line 1108: rows_processed := dbms_sql.execute_and_fetch(cid);

1104: dbms_sql.bind_variable(cid,'v_num',p_vendor_record.vendor_num);
1105:
1106: END IF;
1107:
1108: rows_processed := dbms_sql.execute_and_fetch(cid);
1109:
1110: IF rows_processed = 1 THEN
1111:
1112: IF vendor_name_null THEN

Line 1113: dbms_sql.column_value(cid,1,p_vendor_record.vendor_name);

1109:
1110: IF rows_processed = 1 THEN
1111:
1112: IF vendor_name_null THEN
1113: dbms_sql.column_value(cid,1,p_vendor_record.vendor_name);
1114: END IF;
1115:
1116: IF vendor_id_null THEN
1117: dbms_sql.column_value(cid,2,p_vendor_record.vendor_id);

Line 1117: dbms_sql.column_value(cid,2,p_vendor_record.vendor_id);

1113: dbms_sql.column_value(cid,1,p_vendor_record.vendor_name);
1114: END IF;
1115:
1116: IF vendor_id_null THEN
1117: dbms_sql.column_value(cid,2,p_vendor_record.vendor_id);
1118: END IF;
1119:
1120: IF vendor_num_null THEN
1121: dbms_sql.column_value(cid,3,p_vendor_record.vendor_num);

Line 1121: dbms_sql.column_value(cid,3,p_vendor_record.vendor_num);

1117: dbms_sql.column_value(cid,2,p_vendor_record.vendor_id);
1118: END IF;
1119:
1120: IF vendor_num_null THEN
1121: dbms_sql.column_value(cid,3,p_vendor_record.vendor_num);
1122: END IF;
1123:
1124:
1125: p_vendor_record.error_record.error_status := 'S';

Line 1138: IF dbms_sql.is_open(cid) THEN

1134:
1135: END IF;
1136:
1137:
1138: IF dbms_sql.is_open(cid) THEN
1139: dbms_sql.close_cursor(cid);
1140: END IF;
1141:
1142: EXCEPTION

Line 1139: dbms_sql.close_cursor(cid);

1135: END IF;
1136:
1137:
1138: IF dbms_sql.is_open(cid) THEN
1139: dbms_sql.close_cursor(cid);
1140: END IF;
1141:
1142: EXCEPTION
1143: WHEN others THEN

Line 1144: IF dbms_sql.is_open(cid) THEN

1140: END IF;
1141:
1142: EXCEPTION
1143: WHEN others THEN
1144: IF dbms_sql.is_open(cid) THEN
1145: dbms_sql.close_cursor(cid);
1146: END IF;
1147: p_vendor_record.error_record.error_status := 'U';
1148: p_vendor_record.error_record.error_message := sqlerrm;

Line 1145: dbms_sql.close_cursor(cid);

1141:
1142: EXCEPTION
1143: WHEN others THEN
1144: IF dbms_sql.is_open(cid) THEN
1145: dbms_sql.close_cursor(cid);
1146: END IF;
1147: p_vendor_record.error_record.error_status := 'U';
1148: p_vendor_record.error_record.error_message := sqlerrm;
1149: IF (g_asn_debug = 'Y') THEN

Line 1224: X_cid := dbms_sql.open_cursor;

1220: -- dbms_output.put_line(substr(X_sql_str,1,255));
1221: -- dbms_output.put_line(substr(X_sql_str,256,255));
1222: -- dbms_output.put_line(substr(X_sql_str,513,255));
1223:
1224: X_cid := dbms_sql.open_cursor;
1225:
1226: dbms_sql.parse(X_cid, X_sql_str , dbms_sql.native);
1227:
1228: dbms_sql.define_column(X_cid,1,X_start_date_active);

Line 1226: dbms_sql.parse(X_cid, X_sql_str , dbms_sql.native);

1222: -- dbms_output.put_line(substr(X_sql_str,513,255));
1223:
1224: X_cid := dbms_sql.open_cursor;
1225:
1226: dbms_sql.parse(X_cid, X_sql_str , dbms_sql.native);
1227:
1228: dbms_sql.define_column(X_cid,1,X_start_date_active);
1229: dbms_sql.define_column(X_cid,2,X_end_date_active);
1230: dbms_sql.define_column(X_cid,3,X_enabled_flag,1);

Line 1228: dbms_sql.define_column(X_cid,1,X_start_date_active);

1224: X_cid := dbms_sql.open_cursor;
1225:
1226: dbms_sql.parse(X_cid, X_sql_str , dbms_sql.native);
1227:
1228: dbms_sql.define_column(X_cid,1,X_start_date_active);
1229: dbms_sql.define_column(X_cid,2,X_end_date_active);
1230: dbms_sql.define_column(X_cid,3,X_enabled_flag,1);
1231: dbms_sql.define_column(X_cid,4,X_hold_flag,1);
1232:

Line 1229: dbms_sql.define_column(X_cid,2,X_end_date_active);

1225:
1226: dbms_sql.parse(X_cid, X_sql_str , dbms_sql.native);
1227:
1228: dbms_sql.define_column(X_cid,1,X_start_date_active);
1229: dbms_sql.define_column(X_cid,2,X_end_date_active);
1230: dbms_sql.define_column(X_cid,3,X_enabled_flag,1);
1231: dbms_sql.define_column(X_cid,4,X_hold_flag,1);
1232:
1233: IF NOT X_vendor_name_null THEN

Line 1230: dbms_sql.define_column(X_cid,3,X_enabled_flag,1);

1226: dbms_sql.parse(X_cid, X_sql_str , dbms_sql.native);
1227:
1228: dbms_sql.define_column(X_cid,1,X_start_date_active);
1229: dbms_sql.define_column(X_cid,2,X_end_date_active);
1230: dbms_sql.define_column(X_cid,3,X_enabled_flag,1);
1231: dbms_sql.define_column(X_cid,4,X_hold_flag,1);
1232:
1233: IF NOT X_vendor_name_null THEN
1234:

Line 1231: dbms_sql.define_column(X_cid,4,X_hold_flag,1);

1227:
1228: dbms_sql.define_column(X_cid,1,X_start_date_active);
1229: dbms_sql.define_column(X_cid,2,X_end_date_active);
1230: dbms_sql.define_column(X_cid,3,X_enabled_flag,1);
1231: dbms_sql.define_column(X_cid,4,X_hold_flag,1);
1232:
1233: IF NOT X_vendor_name_null THEN
1234:
1235: dbms_sql.bind_variable(X_cid,'v_name',p_vendor_record.vendor_name);

Line 1235: dbms_sql.bind_variable(X_cid,'v_name',p_vendor_record.vendor_name);

1231: dbms_sql.define_column(X_cid,4,X_hold_flag,1);
1232:
1233: IF NOT X_vendor_name_null THEN
1234:
1235: dbms_sql.bind_variable(X_cid,'v_name',p_vendor_record.vendor_name);
1236:
1237: END IF;
1238:
1239: IF NOT X_vendor_id_null THEN

Line 1241: dbms_sql.bind_variable(X_cid,'v_id',p_vendor_record.vendor_id);

1237: END IF;
1238:
1239: IF NOT X_vendor_id_null THEN
1240:
1241: dbms_sql.bind_variable(X_cid,'v_id',p_vendor_record.vendor_id);
1242:
1243: END IF;
1244:
1245: IF NOT X_vendor_num_null THEN

Line 1247: dbms_sql.bind_variable(X_cid,'v_num',p_vendor_record.vendor_num);

1243: END IF;
1244:
1245: IF NOT X_vendor_num_null THEN
1246:
1247: dbms_sql.bind_variable(X_cid,'v_num',p_vendor_record.vendor_num);
1248:
1249: END IF;
1250:
1251: X_rows_processed := dbms_sql.execute_and_fetch(X_cid);

Line 1251: X_rows_processed := dbms_sql.execute_and_fetch(X_cid);

1247: dbms_sql.bind_variable(X_cid,'v_num',p_vendor_record.vendor_num);
1248:
1249: END IF;
1250:
1251: X_rows_processed := dbms_sql.execute_and_fetch(X_cid);
1252:
1253: IF X_rows_processed = 1 THEN
1254:
1255: dbms_sql.column_value(X_cid,1,X_start_date_active);

Line 1255: dbms_sql.column_value(X_cid,1,X_start_date_active);

1251: X_rows_processed := dbms_sql.execute_and_fetch(X_cid);
1252:
1253: IF X_rows_processed = 1 THEN
1254:
1255: dbms_sql.column_value(X_cid,1,X_start_date_active);
1256: dbms_sql.column_value(X_cid,2,X_end_date_active);
1257: dbms_sql.column_value(X_cid,3,X_enabled_flag);
1258: dbms_sql.column_value(X_cid,4,X_hold_flag);
1259:

Line 1256: dbms_sql.column_value(X_cid,2,X_end_date_active);

1252:
1253: IF X_rows_processed = 1 THEN
1254:
1255: dbms_sql.column_value(X_cid,1,X_start_date_active);
1256: dbms_sql.column_value(X_cid,2,X_end_date_active);
1257: dbms_sql.column_value(X_cid,3,X_enabled_flag);
1258: dbms_sql.column_value(X_cid,4,X_hold_flag);
1259:
1260: -- Check for whether vendor is enabled in the active date range

Line 1257: dbms_sql.column_value(X_cid,3,X_enabled_flag);

1253: IF X_rows_processed = 1 THEN
1254:
1255: dbms_sql.column_value(X_cid,1,X_start_date_active);
1256: dbms_sql.column_value(X_cid,2,X_end_date_active);
1257: dbms_sql.column_value(X_cid,3,X_enabled_flag);
1258: dbms_sql.column_value(X_cid,4,X_hold_flag);
1259:
1260: -- Check for whether vendor is enabled in the active date range
1261:

Line 1258: dbms_sql.column_value(X_cid,4,X_hold_flag);

1254:
1255: dbms_sql.column_value(X_cid,1,X_start_date_active);
1256: dbms_sql.column_value(X_cid,2,X_end_date_active);
1257: dbms_sql.column_value(X_cid,3,X_enabled_flag);
1258: dbms_sql.column_value(X_cid,4,X_hold_flag);
1259:
1260: -- Check for whether vendor is enabled in the active date range
1261:
1262: IF NOT (X_sysdate BETWEEN nvl(X_start_date_active, X_sysdate -1)

Line 1270: IF dbms_sql.is_open(X_cid) THEN

1266: -- dbms_output.put_line('Vendor not active');
1267: p_vendor_record.error_record.error_status := 'E';
1268: p_vendor_record.error_record.error_message := 'VEN_DISABLED';
1269:
1270: IF dbms_sql.is_open(X_cid) THEN
1271: dbms_sql.close_cursor(X_cid);
1272: END IF;
1273:
1274: RETURN;

Line 1271: dbms_sql.close_cursor(X_cid);

1267: p_vendor_record.error_record.error_status := 'E';
1268: p_vendor_record.error_record.error_message := 'VEN_DISABLED';
1269:
1270: IF dbms_sql.is_open(X_cid) THEN
1271: dbms_sql.close_cursor(X_cid);
1272: END IF;
1273:
1274: RETURN;
1275:

Line 1285: IF dbms_sql.is_open(X_cid) THEN

1281: -- dbms_output.put_line('Vendor is on hold');
1282: p_vendor_record.error_record.error_status := 'E';
1283: p_vendor_record.error_record.error_message := 'VEN_HOLD';
1284:
1285: IF dbms_sql.is_open(X_cid) THEN
1286: dbms_sql.close_cursor(X_cid);
1287: END IF;
1288:
1289: RETURN;

Line 1286: dbms_sql.close_cursor(X_cid);

1282: p_vendor_record.error_record.error_status := 'E';
1283: p_vendor_record.error_record.error_message := 'VEN_HOLD';
1284:
1285: IF dbms_sql.is_open(X_cid) THEN
1286: dbms_sql.close_cursor(X_cid);
1287: END IF;
1288:
1289: RETURN;
1290:

Line 1308: IF dbms_sql.is_open(X_cid) THEN

1304: p_vendor_record.error_record.error_message := 'TOOMANYROWS';
1305:
1306: END IF;
1307:
1308: IF dbms_sql.is_open(X_cid) THEN
1309: dbms_sql.close_cursor(X_cid);
1310: END IF;
1311:
1312: EXCEPTION

Line 1309: dbms_sql.close_cursor(X_cid);

1305:
1306: END IF;
1307:
1308: IF dbms_sql.is_open(X_cid) THEN
1309: dbms_sql.close_cursor(X_cid);
1310: END IF;
1311:
1312: EXCEPTION
1313: WHEN OTHERS THEN

Line 1314: IF dbms_sql.is_open(X_cid) THEN

1310: END IF;
1311:
1312: EXCEPTION
1313: WHEN OTHERS THEN
1314: IF dbms_sql.is_open(X_cid) THEN
1315: dbms_sql.close_cursor(X_cid);
1316: END IF;
1317: p_vendor_record.error_record.error_message := sqlerrm;
1318: p_vendor_record.error_record.error_status := 'U';

Line 1315: dbms_sql.close_cursor(X_cid);

1311:
1312: EXCEPTION
1313: WHEN OTHERS THEN
1314: IF dbms_sql.is_open(X_cid) THEN
1315: dbms_sql.close_cursor(X_cid);
1316: END IF;
1317: p_vendor_record.error_record.error_message := sqlerrm;
1318: p_vendor_record.error_record.error_status := 'U';
1319: IF (g_asn_debug = 'Y') THEN