DBA Data[Home] [Help]

APPS.PO_VENDORS_SV dependencies on DBMS_SQL

Line 1078: cid := dbms_sql.open_cursor;

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

Line 1137: IF dbms_sql.is_open(cid) THEN

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

Line 1138: dbms_sql.close_cursor(cid);

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

Line 1143: IF dbms_sql.is_open(cid) THEN

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

Line 1144: dbms_sql.close_cursor(cid);

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

Line 1223: X_cid := dbms_sql.open_cursor;

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

Line 1269: IF dbms_sql.is_open(X_cid) THEN

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

Line 1270: dbms_sql.close_cursor(X_cid);

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

Line 1284: IF dbms_sql.is_open(X_cid) THEN

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

Line 1285: dbms_sql.close_cursor(X_cid);

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

Line 1307: IF dbms_sql.is_open(X_cid) THEN

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

Line 1308: dbms_sql.close_cursor(X_cid);

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

Line 1313: IF dbms_sql.is_open(X_cid) THEN

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

Line 1314: dbms_sql.close_cursor(X_cid);

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