[Home] [Help]
263: AND mut.serial_number = cp_serial_number;
264: BEGIN
265:
266: IF p_lot_code = 1 THEN
267: x_lot_number := fnd_api.g_miss_char;
268: END IF;
269:
270: IF p_lot_code = 2 THEN
271: x_lot_number := fnd_api.g_miss_char;
267: x_lot_number := fnd_api.g_miss_char;
268: END IF;
269:
270: IF p_lot_code = 2 THEN
271: x_lot_number := fnd_api.g_miss_char;
272: FOR lot_rec IN lot_cur(p_mtl_txn_id, p_serial_number)
273: LOOP
274: x_lot_number := lot_rec.lot_number;
275: END LOOP;
784: x_return_status OUT nocopy varchar2)
785: IS
786: BEGIN
787:
788: x_return_status := fnd_api.g_ret_sts_success;
789:
790: x_inst_rec.instance_id := p_inst_h_rec.instance_id;
791: x_inst_rec.instance_number := p_inst_h_rec.instance_number;
792: x_inst_rec.external_reference := p_inst_h_rec.external_reference;
1137: log('time stamp for old fetch : '||to_char(fs_rec.date_time_stamp, 'dd-mon-yyyy hh24:mi:ss'));
1138:
1139: csi_item_instance_pub.get_item_instance_details (
1140: p_api_version => 1.0,
1141: p_commit => fnd_api.g_false,
1142: p_init_msg_list => fnd_api.g_true,
1143: p_validation_level => fnd_api.g_valid_level_full,
1144: p_instance_rec => g_inst_rec,
1145: p_get_parties => fnd_api.g_true,
1138:
1139: csi_item_instance_pub.get_item_instance_details (
1140: p_api_version => 1.0,
1141: p_commit => fnd_api.g_false,
1142: p_init_msg_list => fnd_api.g_true,
1143: p_validation_level => fnd_api.g_valid_level_full,
1144: p_instance_rec => g_inst_rec,
1145: p_get_parties => fnd_api.g_true,
1146: p_party_header_tbl => g_pty_tbl,
1139: csi_item_instance_pub.get_item_instance_details (
1140: p_api_version => 1.0,
1141: p_commit => fnd_api.g_false,
1142: p_init_msg_list => fnd_api.g_true,
1143: p_validation_level => fnd_api.g_valid_level_full,
1144: p_instance_rec => g_inst_rec,
1145: p_get_parties => fnd_api.g_true,
1146: p_party_header_tbl => g_pty_tbl,
1147: p_get_accounts => fnd_api.g_true,
1141: p_commit => fnd_api.g_false,
1142: p_init_msg_list => fnd_api.g_true,
1143: p_validation_level => fnd_api.g_valid_level_full,
1144: p_instance_rec => g_inst_rec,
1145: p_get_parties => fnd_api.g_true,
1146: p_party_header_tbl => g_pty_tbl,
1147: p_get_accounts => fnd_api.g_true,
1148: p_account_header_tbl => g_pa_tbl,
1149: p_get_org_assignments => fnd_api.g_true,
1143: p_validation_level => fnd_api.g_valid_level_full,
1144: p_instance_rec => g_inst_rec,
1145: p_get_parties => fnd_api.g_true,
1146: p_party_header_tbl => g_pty_tbl,
1147: p_get_accounts => fnd_api.g_true,
1148: p_account_header_tbl => g_pa_tbl,
1149: p_get_org_assignments => fnd_api.g_true,
1150: p_org_header_tbl => g_ou_tbl,
1151: p_get_pricing_attribs => fnd_api.g_true,
1145: p_get_parties => fnd_api.g_true,
1146: p_party_header_tbl => g_pty_tbl,
1147: p_get_accounts => fnd_api.g_true,
1148: p_account_header_tbl => g_pa_tbl,
1149: p_get_org_assignments => fnd_api.g_true,
1150: p_org_header_tbl => g_ou_tbl,
1151: p_get_pricing_attribs => fnd_api.g_true,
1152: p_pricing_attrib_tbl => g_prc_tbl,
1153: p_get_ext_attribs => fnd_api.g_true,
1147: p_get_accounts => fnd_api.g_true,
1148: p_account_header_tbl => g_pa_tbl,
1149: p_get_org_assignments => fnd_api.g_true,
1150: p_org_header_tbl => g_ou_tbl,
1151: p_get_pricing_attribs => fnd_api.g_true,
1152: p_pricing_attrib_tbl => g_prc_tbl,
1153: p_get_ext_attribs => fnd_api.g_true,
1154: p_ext_attrib_tbl => g_eav_tbl,
1155: p_ext_attrib_def_tbl => g_ea_tbl,
1149: p_get_org_assignments => fnd_api.g_true,
1150: p_org_header_tbl => g_ou_tbl,
1151: p_get_pricing_attribs => fnd_api.g_true,
1152: p_pricing_attrib_tbl => g_prc_tbl,
1153: p_get_ext_attribs => fnd_api.g_true,
1154: p_ext_attrib_tbl => g_eav_tbl,
1155: p_ext_attrib_def_tbl => g_ea_tbl,
1156: p_get_asset_assignments => fnd_api.g_true,
1157: p_asset_header_tbl => g_asset_tbl,
1152: p_pricing_attrib_tbl => g_prc_tbl,
1153: p_get_ext_attribs => fnd_api.g_true,
1154: p_ext_attrib_tbl => g_eav_tbl,
1155: p_ext_attrib_def_tbl => g_ea_tbl,
1156: p_get_asset_assignments => fnd_api.g_true,
1157: p_asset_header_tbl => g_asset_tbl,
1158: p_resolve_id_columns => fnd_api.g_false,
1159: p_time_stamp => fs_rec.date_time_stamp,
1160: x_return_status => l_return_status,
1154: p_ext_attrib_tbl => g_eav_tbl,
1155: p_ext_attrib_def_tbl => g_ea_tbl,
1156: p_get_asset_assignments => fnd_api.g_true,
1157: p_asset_header_tbl => g_asset_tbl,
1158: p_resolve_id_columns => fnd_api.g_false,
1159: p_time_stamp => fs_rec.date_time_stamp,
1160: x_return_status => l_return_status,
1161: x_msg_count => l_msg_count,
1162: x_msg_data => l_msg_data);
1160: x_return_status => l_return_status,
1161: x_msg_count => l_msg_count,
1162: x_msg_data => l_msg_data);
1163:
1164: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1165: RAISE fnd_api.g_exc_error;
1166: END IF;
1167:
1168: -- some missed out or wrong data columns - re-query and populate
1161: x_msg_count => l_msg_count,
1162: x_msg_data => l_msg_data);
1163:
1164: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1165: RAISE fnd_api.g_exc_error;
1166: END IF;
1167:
1168: -- some missed out or wrong data columns - re-query and populate
1169: SELECT customer_view_flag,
1181:
1182: -- get the version label on that day
1183: csi_item_instance_pub.get_version_labels(
1184: p_api_version => 1.0,
1185: p_commit => fnd_api.g_false,
1186: p_init_msg_list => fnd_api.g_true,
1187: p_validation_level => fnd_api.g_valid_level_full,
1188: p_version_label_query_rec => g_vl_qry_rec,
1189: p_time_stamp => fs_rec.date_time_stamp,
1182: -- get the version label on that day
1183: csi_item_instance_pub.get_version_labels(
1184: p_api_version => 1.0,
1185: p_commit => fnd_api.g_false,
1186: p_init_msg_list => fnd_api.g_true,
1187: p_validation_level => fnd_api.g_valid_level_full,
1188: p_version_label_query_rec => g_vl_qry_rec,
1189: p_time_stamp => fs_rec.date_time_stamp,
1190: x_version_label_tbl => g_vl_tbl,
1183: csi_item_instance_pub.get_version_labels(
1184: p_api_version => 1.0,
1185: p_commit => fnd_api.g_false,
1186: p_init_msg_list => fnd_api.g_true,
1187: p_validation_level => fnd_api.g_valid_level_full,
1188: p_version_label_query_rec => g_vl_qry_rec,
1189: p_time_stamp => fs_rec.date_time_stamp,
1190: x_version_label_tbl => g_vl_tbl,
1191: x_return_status => l_return_status,
1191: x_return_status => l_return_status,
1192: x_msg_count => l_msg_count,
1193: x_msg_data => l_msg_data);
1194:
1195: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1196: RAISE fnd_api.g_exc_error;
1197: END IF;
1198:
1199: make_non_header(
1192: x_msg_count => l_msg_count,
1193: x_msg_data => l_msg_data);
1194:
1195: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1196: RAISE fnd_api.g_exc_error;
1197: END IF;
1198:
1199: make_non_header(
1200: p_inst_h_rec => g_inst_rec,
1212: l_csi_txn_rec.inv_material_transaction_id := fs_rec.mtl_txn_id;
1213:
1214: csi_item_instance_pub.update_item_instance(
1215: p_api_version => 1.0,
1216: p_commit => fnd_api.g_false,
1217: p_init_msg_list => fnd_api.g_true,
1218: p_validation_level => fnd_api.g_valid_level_full,
1219: p_instance_rec => l_inst_rec,
1220: p_party_tbl => l_pty_tbl,
1213:
1214: csi_item_instance_pub.update_item_instance(
1215: p_api_version => 1.0,
1216: p_commit => fnd_api.g_false,
1217: p_init_msg_list => fnd_api.g_true,
1218: p_validation_level => fnd_api.g_valid_level_full,
1219: p_instance_rec => l_inst_rec,
1220: p_party_tbl => l_pty_tbl,
1221: p_account_tbl => l_pa_tbl,
1214: csi_item_instance_pub.update_item_instance(
1215: p_api_version => 1.0,
1216: p_commit => fnd_api.g_false,
1217: p_init_msg_list => fnd_api.g_true,
1218: p_validation_level => fnd_api.g_valid_level_full,
1219: p_instance_rec => l_inst_rec,
1220: p_party_tbl => l_pty_tbl,
1221: p_account_tbl => l_pa_tbl,
1222: p_org_assignments_tbl => l_ou_tbl,
1228: x_return_status => l_return_status,
1229: x_msg_count => l_msg_count,
1230: x_msg_data => l_msg_data);
1231:
1232: IF l_return_status not in (fnd_api.g_ret_sts_success, 'W') THEN
1233: RAISE fnd_api.g_exc_error;
1234: END IF;
1235:
1236: l_vl_tbl := g_vl_tbl;
1229: x_msg_count => l_msg_count,
1230: x_msg_data => l_msg_data);
1231:
1232: IF l_return_status not in (fnd_api.g_ret_sts_success, 'W') THEN
1233: RAISE fnd_api.g_exc_error;
1234: END IF;
1235:
1236: l_vl_tbl := g_vl_tbl;
1237:
1246: END LOOP;
1247:
1248: csi_item_instance_pub.update_version_label(
1249: p_api_version => 1.0,
1250: p_commit => fnd_api.g_false,
1251: p_init_msg_list => fnd_api.g_true,
1252: p_validation_level => fnd_api.g_valid_level_full,
1253: p_version_label_tbl => l_vl_tbl,
1254: p_txn_rec => l_csi_txn_rec,
1247:
1248: csi_item_instance_pub.update_version_label(
1249: p_api_version => 1.0,
1250: p_commit => fnd_api.g_false,
1251: p_init_msg_list => fnd_api.g_true,
1252: p_validation_level => fnd_api.g_valid_level_full,
1253: p_version_label_tbl => l_vl_tbl,
1254: p_txn_rec => l_csi_txn_rec,
1255: x_return_status => l_return_status,
1248: csi_item_instance_pub.update_version_label(
1249: p_api_version => 1.0,
1250: p_commit => fnd_api.g_false,
1251: p_init_msg_list => fnd_api.g_true,
1252: p_validation_level => fnd_api.g_valid_level_full,
1253: p_version_label_tbl => l_vl_tbl,
1254: p_txn_rec => l_csi_txn_rec,
1255: x_return_status => l_return_status,
1256: x_msg_count => l_msg_count,
1255: x_return_status => l_return_status,
1256: x_msg_count => l_msg_count,
1257: x_msg_data => l_msg_data);
1258:
1259: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1260: RAISE fnd_api.g_exc_error;
1261: END IF;
1262:
1263: END IF;
1256: x_msg_count => l_msg_count,
1257: x_msg_data => l_msg_data);
1258:
1259: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1260: RAISE fnd_api.g_exc_error;
1261: END IF;
1262:
1263: END IF;
1264:
1266: g_iir_qry_rec.relationship_type_code := 'COMPONENT-OF';
1267:
1268: csi_ii_relationships_pub.get_relationships(
1269: p_api_version => 1.0,
1270: p_commit => fnd_api.g_false,
1271: p_init_msg_list => fnd_api.g_true,
1272: p_validation_level => fnd_api.g_valid_level_full,
1273: p_relationship_query_rec => g_iir_qry_rec,
1274: p_depth => null,
1267:
1268: csi_ii_relationships_pub.get_relationships(
1269: p_api_version => 1.0,
1270: p_commit => fnd_api.g_false,
1271: p_init_msg_list => fnd_api.g_true,
1272: p_validation_level => fnd_api.g_valid_level_full,
1273: p_relationship_query_rec => g_iir_qry_rec,
1274: p_depth => null,
1275: p_time_stamp => fs_rec.date_time_stamp,
1268: csi_ii_relationships_pub.get_relationships(
1269: p_api_version => 1.0,
1270: p_commit => fnd_api.g_false,
1271: p_init_msg_list => fnd_api.g_true,
1272: p_validation_level => fnd_api.g_valid_level_full,
1273: p_relationship_query_rec => g_iir_qry_rec,
1274: p_depth => null,
1275: p_time_stamp => fs_rec.date_time_stamp,
1276: p_active_relationship_only => fnd_api.g_false,
1272: p_validation_level => fnd_api.g_valid_level_full,
1273: p_relationship_query_rec => g_iir_qry_rec,
1274: p_depth => null,
1275: p_time_stamp => fs_rec.date_time_stamp,
1276: p_active_relationship_only => fnd_api.g_false,
1277: x_relationship_tbl => g_iir_tbl,
1278: x_return_status => l_return_status,
1279: x_msg_count => l_msg_count,
1280: x_msg_data => l_msg_data);
1278: x_return_status => l_return_status,
1279: x_msg_count => l_msg_count,
1280: x_msg_data => l_msg_data);
1281:
1282: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1283: RAISE fnd_api.g_exc_error;
1284: END IF;
1285:
1286: IF g_iir_tbl.count > 0 THEN
1279: x_msg_count => l_msg_count,
1280: x_msg_data => l_msg_data);
1281:
1282: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1283: RAISE fnd_api.g_exc_error;
1284: END IF;
1285:
1286: IF g_iir_tbl.count > 0 THEN
1287: FOR l_ind IN g_iir_tbl.FIRST .. g_iir_tbl.LAST
1303: g_iir_qry_rec.relationship_type_code := 'COMPONENT-OF';
1304:
1305: csi_ii_relationships_pub.get_relationships(
1306: p_api_version => 1.0,
1307: p_commit => fnd_api.g_false,
1308: p_init_msg_list => fnd_api.g_true,
1309: p_validation_level => fnd_api.g_valid_level_full,
1310: p_relationship_query_rec => g_iir_qry_rec,
1311: p_depth => NULL,
1304:
1305: csi_ii_relationships_pub.get_relationships(
1306: p_api_version => 1.0,
1307: p_commit => fnd_api.g_false,
1308: p_init_msg_list => fnd_api.g_true,
1309: p_validation_level => fnd_api.g_valid_level_full,
1310: p_relationship_query_rec => g_iir_qry_rec,
1311: p_depth => NULL,
1312: p_time_stamp => fs_rec.date_time_stamp,
1305: csi_ii_relationships_pub.get_relationships(
1306: p_api_version => 1.0,
1307: p_commit => fnd_api.g_false,
1308: p_init_msg_list => fnd_api.g_true,
1309: p_validation_level => fnd_api.g_valid_level_full,
1310: p_relationship_query_rec => g_iir_qry_rec,
1311: p_depth => NULL,
1312: p_time_stamp => fs_rec.date_time_stamp,
1313: p_active_relationship_only => fnd_api.g_false,
1309: p_validation_level => fnd_api.g_valid_level_full,
1310: p_relationship_query_rec => g_iir_qry_rec,
1311: p_depth => NULL,
1312: p_time_stamp => fs_rec.date_time_stamp,
1313: p_active_relationship_only => fnd_api.g_false,
1314: x_relationship_tbl => g_iir_tbl,
1315: x_return_status => l_return_status,
1316: x_msg_count => l_msg_count,
1317: x_msg_data => l_msg_data);
1315: x_return_status => l_return_status,
1316: x_msg_count => l_msg_count,
1317: x_msg_data => l_msg_data);
1318:
1319: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1320: RAISE fnd_api.g_exc_error;
1321: END IF;
1322:
1323: IF g_iir_tbl.count > 0 THEN
1316: x_msg_count => l_msg_count,
1317: x_msg_data => l_msg_data);
1318:
1319: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1320: RAISE fnd_api.g_exc_error;
1321: END IF;
1322:
1323: IF g_iir_tbl.count > 0 THEN
1324: FOR l_ind IN g_iir_tbl.FIRST .. g_iir_tbl.LAST
1335:
1336: IF l_iir_tbl.COUNT > 0 THEN
1337: csi_ii_relationships_pub.update_relationship (
1338: p_api_version => 1.0,
1339: p_commit => fnd_api.g_false,
1340: p_init_msg_list => fnd_api.g_true,
1341: p_validation_level => fnd_api.g_valid_level_full,
1342: p_relationship_tbl => l_iir_tbl,
1343: p_txn_rec => l_csi_txn_rec,
1336: IF l_iir_tbl.COUNT > 0 THEN
1337: csi_ii_relationships_pub.update_relationship (
1338: p_api_version => 1.0,
1339: p_commit => fnd_api.g_false,
1340: p_init_msg_list => fnd_api.g_true,
1341: p_validation_level => fnd_api.g_valid_level_full,
1342: p_relationship_tbl => l_iir_tbl,
1343: p_txn_rec => l_csi_txn_rec,
1344: x_return_status => l_return_status,
1337: csi_ii_relationships_pub.update_relationship (
1338: p_api_version => 1.0,
1339: p_commit => fnd_api.g_false,
1340: p_init_msg_list => fnd_api.g_true,
1341: p_validation_level => fnd_api.g_valid_level_full,
1342: p_relationship_tbl => l_iir_tbl,
1343: p_txn_rec => l_csi_txn_rec,
1344: x_return_status => l_return_status,
1345: x_msg_count => l_msg_count,
1344: x_return_status => l_return_status,
1345: x_msg_count => l_msg_count,
1346: x_msg_data => l_msg_data);
1347:
1348: IF l_return_status not in (fnd_api.g_ret_sts_success, 'W') THEN
1349: RAISE fnd_api.g_exc_error;
1350: END IF;
1351: END IF;
1352:
1345: x_msg_count => l_msg_count,
1346: x_msg_data => l_msg_data);
1347:
1348: IF l_return_status not in (fnd_api.g_ret_sts_success, 'W') THEN
1349: RAISE fnd_api.g_exc_error;
1350: END IF;
1351: END IF;
1352:
1353: UPDATE csi_ii_forward_sync_temp
1354: SET process_flag = 'P'
1355: WHERE instance_id = fs_rec.instance_id;
1356:
1357: EXCEPTION
1358: WHEN fnd_api.g_exc_error THEN
1359: rollback to forward_sync;
1360: l_msg_data := csi_t_gen_utility_pvt.dump_error_stack;
1361: log('Error in forward_sync : '||fs_rec.instance_id||' : '||l_msg_data);
1362: END;
1436: Comp_error EXCEPTION;
1437: --
1438: BEGIN
1439: savepoint Insert_Full_Dump;
1440: IF p_instance_id IS NULL OR p_instance_id = FND_API.G_MISS_NUM THEN
1441: Raise comp_error;
1442: END IF;
1443: -- Get the Transaction Type ID for Txn Type MIGRATED
1444: v_txn_type_id := correction_txn_type_id;
1466:
1467: -- Call Get API with the time stamp
1468: csi_item_instance_pub.get_item_instance_details (
1469: p_api_version => 1.0,
1470: p_commit => fnd_api.g_false,
1471: p_init_msg_list => fnd_api.g_true,
1472: p_validation_level => fnd_api.g_valid_level_full,
1473: p_instance_rec => p_instance_rec,
1474: p_get_parties => fnd_api.g_true,
1467: -- Call Get API with the time stamp
1468: csi_item_instance_pub.get_item_instance_details (
1469: p_api_version => 1.0,
1470: p_commit => fnd_api.g_false,
1471: p_init_msg_list => fnd_api.g_true,
1472: p_validation_level => fnd_api.g_valid_level_full,
1473: p_instance_rec => p_instance_rec,
1474: p_get_parties => fnd_api.g_true,
1475: p_party_header_tbl => p_party_header_tbl,
1468: csi_item_instance_pub.get_item_instance_details (
1469: p_api_version => 1.0,
1470: p_commit => fnd_api.g_false,
1471: p_init_msg_list => fnd_api.g_true,
1472: p_validation_level => fnd_api.g_valid_level_full,
1473: p_instance_rec => p_instance_rec,
1474: p_get_parties => fnd_api.g_true,
1475: p_party_header_tbl => p_party_header_tbl,
1476: p_get_accounts => fnd_api.g_true,
1470: p_commit => fnd_api.g_false,
1471: p_init_msg_list => fnd_api.g_true,
1472: p_validation_level => fnd_api.g_valid_level_full,
1473: p_instance_rec => p_instance_rec,
1474: p_get_parties => fnd_api.g_true,
1475: p_party_header_tbl => p_party_header_tbl,
1476: p_get_accounts => fnd_api.g_true,
1477: p_account_header_tbl => p_account_header_tbl,
1478: p_get_org_assignments => fnd_api.g_true,
1472: p_validation_level => fnd_api.g_valid_level_full,
1473: p_instance_rec => p_instance_rec,
1474: p_get_parties => fnd_api.g_true,
1475: p_party_header_tbl => p_party_header_tbl,
1476: p_get_accounts => fnd_api.g_true,
1477: p_account_header_tbl => p_account_header_tbl,
1478: p_get_org_assignments => fnd_api.g_true,
1479: p_org_header_tbl => p_org_header_tbl,
1480: p_get_pricing_attribs => fnd_api.g_true,
1474: p_get_parties => fnd_api.g_true,
1475: p_party_header_tbl => p_party_header_tbl,
1476: p_get_accounts => fnd_api.g_true,
1477: p_account_header_tbl => p_account_header_tbl,
1478: p_get_org_assignments => fnd_api.g_true,
1479: p_org_header_tbl => p_org_header_tbl,
1480: p_get_pricing_attribs => fnd_api.g_true,
1481: p_pricing_attrib_tbl => p_pricing_attrib_tbl,
1482: p_get_ext_attribs => fnd_api.g_true,
1476: p_get_accounts => fnd_api.g_true,
1477: p_account_header_tbl => p_account_header_tbl,
1478: p_get_org_assignments => fnd_api.g_true,
1479: p_org_header_tbl => p_org_header_tbl,
1480: p_get_pricing_attribs => fnd_api.g_true,
1481: p_pricing_attrib_tbl => p_pricing_attrib_tbl,
1482: p_get_ext_attribs => fnd_api.g_true,
1483: p_ext_attrib_tbl => p_ext_attrib_tbl,
1484: p_ext_attrib_def_tbl => p_ext_attrib_def_tbl,
1478: p_get_org_assignments => fnd_api.g_true,
1479: p_org_header_tbl => p_org_header_tbl,
1480: p_get_pricing_attribs => fnd_api.g_true,
1481: p_pricing_attrib_tbl => p_pricing_attrib_tbl,
1482: p_get_ext_attribs => fnd_api.g_true,
1483: p_ext_attrib_tbl => p_ext_attrib_tbl,
1484: p_ext_attrib_def_tbl => p_ext_attrib_def_tbl,
1485: p_get_asset_assignments => fnd_api.g_true,
1486: p_asset_header_tbl => p_asset_header_tbl,
1481: p_pricing_attrib_tbl => p_pricing_attrib_tbl,
1482: p_get_ext_attribs => fnd_api.g_true,
1483: p_ext_attrib_tbl => p_ext_attrib_tbl,
1484: p_ext_attrib_def_tbl => p_ext_attrib_def_tbl,
1485: p_get_asset_assignments => fnd_api.g_true,
1486: p_asset_header_tbl => p_asset_header_tbl,
1487: p_resolve_id_columns => fnd_api.g_false,
1488: p_time_stamp => sysdate,
1489: x_return_status => x_return_status,
1483: p_ext_attrib_tbl => p_ext_attrib_tbl,
1484: p_ext_attrib_def_tbl => p_ext_attrib_def_tbl,
1485: p_get_asset_assignments => fnd_api.g_true,
1486: p_asset_header_tbl => p_asset_header_tbl,
1487: p_resolve_id_columns => fnd_api.g_false,
1488: p_time_stamp => sysdate,
1489: x_return_status => x_return_status,
1490: x_msg_count => x_msg_count,
1491: x_msg_data => x_msg_data);
1489: x_return_status => x_return_status,
1490: x_msg_count => x_msg_count,
1491: x_msg_data => x_msg_data);
1492: --
1493: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1494: l_msg_index := 1;
1495: l_msg_count := x_msg_count;
1496: WHILE l_msg_count > 0 LOOP
1497: x_msg_data := FND_MSG_PUB.GET ( l_msg_index, FND_API.G_FALSE );
1493: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1494: l_msg_index := 1;
1495: l_msg_count := x_msg_count;
1496: WHILE l_msg_count > 0 LOOP
1497: x_msg_data := FND_MSG_PUB.GET ( l_msg_index, FND_API.G_FALSE );
1498: l_msg_index := l_msg_index + 1;
1499: l_msg_count := l_msg_count - 1;
1500: END LOOP;
1501: log('Error in Get_Item_Instance Details for Instance : '||l_char_ins_id||' '||x_msg_data);
1729: -- Add version Label. Use Get_Version_Label API
1730: p_ver_label_query_rec.instance_id := p_instance_id;
1731: csi_item_instance_pub.get_version_labels (
1732: p_api_version => 1.0,
1733: p_commit => fnd_api.g_false,
1734: p_init_msg_list => l_init_msg_list,
1735: p_validation_level => fnd_api.g_valid_level_full,
1736: p_version_label_query_rec => p_ver_label_query_rec,
1737: p_time_stamp => fnd_api.g_miss_date,
1731: csi_item_instance_pub.get_version_labels (
1732: p_api_version => 1.0,
1733: p_commit => fnd_api.g_false,
1734: p_init_msg_list => l_init_msg_list,
1735: p_validation_level => fnd_api.g_valid_level_full,
1736: p_version_label_query_rec => p_ver_label_query_rec,
1737: p_time_stamp => fnd_api.g_miss_date,
1738: x_version_label_tbl => x_version_label_tbl,
1739: x_return_status => x_return_status,
1733: p_commit => fnd_api.g_false,
1734: p_init_msg_list => l_init_msg_list,
1735: p_validation_level => fnd_api.g_valid_level_full,
1736: p_version_label_query_rec => p_ver_label_query_rec,
1737: p_time_stamp => fnd_api.g_miss_date,
1738: x_version_label_tbl => x_version_label_tbl,
1739: x_return_status => x_return_status,
1740: x_msg_count => x_msg_count,
1741: x_msg_data => x_msg_data);
1739: x_return_status => x_return_status,
1740: x_msg_count => x_msg_count,
1741: x_msg_data => x_msg_data);
1742:
1743: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
1744: IF x_version_label_tbl.count > 0 THEN
1745: l_ctr := l_version_label_tbl.count;
1746: FOR i in x_version_label_tbl.FIRST .. x_version_label_tbl.LAST LOOP
1747: l_ctr := l_ctr + 1;
1756: p_rel_query_rec.object_id := p_instance_id;
1757: p_rel_query_rec.relationship_type_code := 'COMPONENT-OF';
1758: csi_ii_relationships_pub.get_relationships(
1759: p_api_version => 1.0,
1760: p_commit => fnd_api.g_false,
1761: p_init_msg_list => l_init_msg_list,
1762: p_validation_level => fnd_api.g_valid_level_full,
1763: p_relationship_query_rec => p_rel_query_rec,
1764: p_depth => NULL,
1758: csi_ii_relationships_pub.get_relationships(
1759: p_api_version => 1.0,
1760: p_commit => fnd_api.g_false,
1761: p_init_msg_list => l_init_msg_list,
1762: p_validation_level => fnd_api.g_valid_level_full,
1763: p_relationship_query_rec => p_rel_query_rec,
1764: p_depth => NULL,
1765: p_time_stamp => fnd_api.g_miss_date,
1766: p_active_relationship_only => fnd_api.g_true, -- BUG#5897084
1761: p_init_msg_list => l_init_msg_list,
1762: p_validation_level => fnd_api.g_valid_level_full,
1763: p_relationship_query_rec => p_rel_query_rec,
1764: p_depth => NULL,
1765: p_time_stamp => fnd_api.g_miss_date,
1766: p_active_relationship_only => fnd_api.g_true, -- BUG#5897084
1767: x_relationship_tbl => x_relationship_tbl,
1768: x_return_status => x_return_status,
1769: x_msg_count => x_msg_count,
1762: p_validation_level => fnd_api.g_valid_level_full,
1763: p_relationship_query_rec => p_rel_query_rec,
1764: p_depth => NULL,
1765: p_time_stamp => fnd_api.g_miss_date,
1766: p_active_relationship_only => fnd_api.g_true, -- BUG#5897084
1767: x_relationship_tbl => x_relationship_tbl,
1768: x_return_status => x_return_status,
1769: x_msg_count => x_msg_count,
1770: x_msg_data => x_msg_data);
1767: x_relationship_tbl => x_relationship_tbl,
1768: x_return_status => x_return_status,
1769: x_msg_count => x_msg_count,
1770: x_msg_data => x_msg_data);
1771: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
1772: IF x_relationship_tbl.count > 0 THEN
1773: FOR i in x_relationship_tbl.FIRST .. x_relationship_tbl.LAST LOOP
1774: l_exists := 'N';
1775: IF l_ii_relationship_tbl.count > 0 THEN
1793: p_rel_query_rec.subject_id := p_instance_id;
1794: p_rel_query_rec.relationship_type_code := 'COMPONENT-OF';
1795: csi_ii_relationships_pub.get_relationships(
1796: p_api_version => 1.0,
1797: p_commit => fnd_api.g_false,
1798: p_init_msg_list => l_init_msg_list,
1799: p_validation_level => fnd_api.g_valid_level_full,
1800: p_relationship_query_rec => p_rel_query_rec,
1801: p_depth => NULL,
1795: csi_ii_relationships_pub.get_relationships(
1796: p_api_version => 1.0,
1797: p_commit => fnd_api.g_false,
1798: p_init_msg_list => l_init_msg_list,
1799: p_validation_level => fnd_api.g_valid_level_full,
1800: p_relationship_query_rec => p_rel_query_rec,
1801: p_depth => NULL,
1802: p_time_stamp => fnd_api.g_miss_date,
1803: p_active_relationship_only => fnd_api.g_true, -- BUG#5897084
1798: p_init_msg_list => l_init_msg_list,
1799: p_validation_level => fnd_api.g_valid_level_full,
1800: p_relationship_query_rec => p_rel_query_rec,
1801: p_depth => NULL,
1802: p_time_stamp => fnd_api.g_miss_date,
1803: p_active_relationship_only => fnd_api.g_true, -- BUG#5897084
1804: x_relationship_tbl => x_relationship_tbl,
1805: x_return_status => x_return_status,
1806: x_msg_count => x_msg_count,
1799: p_validation_level => fnd_api.g_valid_level_full,
1800: p_relationship_query_rec => p_rel_query_rec,
1801: p_depth => NULL,
1802: p_time_stamp => fnd_api.g_miss_date,
1803: p_active_relationship_only => fnd_api.g_true, -- BUG#5897084
1804: x_relationship_tbl => x_relationship_tbl,
1805: x_return_status => x_return_status,
1806: x_msg_count => x_msg_count,
1807: x_msg_data => x_msg_data);
1804: x_relationship_tbl => x_relationship_tbl,
1805: x_return_status => x_return_status,
1806: x_msg_count => x_msg_count,
1807: x_msg_data => x_msg_data);
1808: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
1809: IF x_relationship_tbl.count > 0 THEN
1810: FOR i in x_relationship_tbl.FIRST .. x_relationship_tbl.LAST LOOP
1811: l_exists := 'N';
1812: IF l_ii_relationship_tbl.count > 0 THEN
2854: l_oracle_schema varchar2(30);
2855: l_return boolean;
2856: BEGIN
2857:
2858: x_return_status := fnd_api.g_ret_sts_success;
2859:
2860: l_return := fnd_installation.get_app_info(
2861: application_short_name => p_product_short_name,
2862: status => l_status,
2865:
2866: IF NOT l_return THEN
2867: fnd_message.set_name('CSI', 'CSI_FND_INVALID_SCHEMA_ERROR');
2868: fnd_msg_pub.add;
2869: RAISE fnd_api.g_exc_error;
2870: END IF;
2871:
2872: x_schema_name := l_oracle_schema;
2873:
2871:
2872: x_schema_name := l_oracle_schema;
2873:
2874: EXCEPTION
2875: WHEN fnd_api.g_exc_error THEN
2876: x_return_status := fnd_api.g_ret_sts_error;
2877: END get_schema_name;
2878:
2879: PROCEDURE truncate_table(
2872: x_schema_name := l_oracle_schema;
2873:
2874: EXCEPTION
2875: WHEN fnd_api.g_exc_error THEN
2876: x_return_status := fnd_api.g_ret_sts_error;
2877: END get_schema_name;
2878:
2879: PROCEDURE truncate_table(
2880: p_table_name in varchar2)
3117: IS
3118:
3119: l_error_rec csi_datastructures_pub.transaction_error_rec;
3120: l_error_id number;
3121: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
3122: l_msg_count number;
3123: l_msg_data varchar2(2000);
3124: l_source_type varchar2(20);
3125: l_csi_txn_type_id number;
3162: p_mtl_source_type_id);
3163:
3164: csi_transactions_pvt.create_txn_error (
3165: p_api_version => 1.0,
3166: p_init_msg_list => fnd_api.g_true,
3167: p_commit => fnd_api.g_false,
3168: p_validation_level => fnd_api.g_valid_level_full,
3169: p_txn_error_rec => l_error_rec,
3170: x_transaction_error_id => l_error_id,
3163:
3164: csi_transactions_pvt.create_txn_error (
3165: p_api_version => 1.0,
3166: p_init_msg_list => fnd_api.g_true,
3167: p_commit => fnd_api.g_false,
3168: p_validation_level => fnd_api.g_valid_level_full,
3169: p_txn_error_rec => l_error_rec,
3170: x_transaction_error_id => l_error_id,
3171: x_return_status => l_return_status,
3164: csi_transactions_pvt.create_txn_error (
3165: p_api_version => 1.0,
3166: p_init_msg_list => fnd_api.g_true,
3167: p_commit => fnd_api.g_false,
3168: p_validation_level => fnd_api.g_valid_level_full,
3169: p_txn_error_rec => l_error_rec,
3170: x_transaction_error_id => l_error_id,
3171: x_return_status => l_return_status,
3172: x_msg_count => l_msg_count,
3171: x_return_status => l_return_status,
3172: x_msg_count => l_msg_count,
3173: x_msg_data => l_msg_data);
3174:
3175: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3176: RAISE fnd_api.g_exc_error;
3177: END IF;
3178:
3179: commit;
3172: x_msg_count => l_msg_count,
3173: x_msg_data => l_msg_data);
3174:
3175: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3176: RAISE fnd_api.g_exc_error;
3177: END IF;
3178:
3179: commit;
3180:
3178:
3179: commit;
3180:
3181: EXCEPTION
3182: WHEN fnd_api.g_exc_error THEN
3183: rollback to pump_txn_error;
3184: l_error_message := csi_t_gen_utility_pvt.dump_error_stack;
3185: log(' Error: '||l_error_message);
3186: END pump_txn_error;
3206:
3207: l_schema_name varchar2(30);
3208: l_object_name varchar2(80);
3209: l_freeze_date date;
3210: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
3211:
3212: BEGIN
3213:
3214: log(date_time_stamp||' begin decode_queue');
3217: p_product_short_name => 'CSI',
3218: x_schema_name => l_schema_name,
3219: x_return_status => l_return_status);
3220:
3221: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3222: RAISE fnd_api.g_exc_error;
3223: END IF;
3224:
3225: l_object_name := l_schema_name||'.csi_xnp_msgs_temp';
3218: x_schema_name => l_schema_name,
3219: x_return_status => l_return_status);
3220:
3221: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3222: RAISE fnd_api.g_exc_error;
3223: END IF;
3224:
3225: l_object_name := l_schema_name||'.csi_xnp_msgs_temp';
3226:
4019: l_temp_message varchar2(540);
4020: l_source_type varchar2(30);
4021:
4022: l_txn_rec csi_datastructures_pub.transaction_rec;
4023: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
4024: l_msg_count number;
4025: l_msg_data varchar2(2000);
4026:
4027: skip_insert exception;
4042: p_product_short_name => 'CSI',
4043: x_schema_name => l_schema_name,
4044: x_return_status => l_return_status);
4045:
4046: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4047: RAISE fnd_api.g_exc_error;
4048: END IF;
4049:
4050: l_object_name := l_schema_name||'.csi_diagnostics_temp';
4043: x_schema_name => l_schema_name,
4044: x_return_status => l_return_status);
4045:
4046: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4047: RAISE fnd_api.g_exc_error;
4048: END IF;
4049:
4050: l_object_name := l_schema_name||'.csi_diagnostics_temp';
4051:
4522: -- for wip errors that are knocked we write a csi transaction '
4523: -- to make the completion goes thru
4524: IF l_err_txn_source_type_id = 5 OR l_unit_txn_found THEN
4525:
4526: l_txn_rec.transaction_id := fnd_api.g_miss_num;
4527: l_txn_rec.transaction_type_id := correction_txn_type_id;
4528: l_txn_rec.source_header_ref := 'DATAFIX';
4529: l_txn_rec.source_line_ref := 'SRLCONTROL TXN MISMATCH';
4530: l_txn_rec.source_transaction_date := l_err_txn_date;
4532: l_txn_rec.inv_material_transaction_id := l_mtl_txn_id_tab(ind);
4533:
4534: csi_transactions_pvt.create_transaction (
4535: p_api_version => 1.0,
4536: p_commit => fnd_api.g_false,
4537: p_init_msg_list => fnd_api.g_true,
4538: p_validation_level => fnd_api.g_valid_level_full,
4539: p_success_if_exists_flag => 'Y',
4540: p_transaction_rec => l_txn_rec,
4533:
4534: csi_transactions_pvt.create_transaction (
4535: p_api_version => 1.0,
4536: p_commit => fnd_api.g_false,
4537: p_init_msg_list => fnd_api.g_true,
4538: p_validation_level => fnd_api.g_valid_level_full,
4539: p_success_if_exists_flag => 'Y',
4540: p_transaction_rec => l_txn_rec,
4541: x_return_status => l_return_status,
4534: csi_transactions_pvt.create_transaction (
4535: p_api_version => 1.0,
4536: p_commit => fnd_api.g_false,
4537: p_init_msg_list => fnd_api.g_true,
4538: p_validation_level => fnd_api.g_valid_level_full,
4539: p_success_if_exists_flag => 'Y',
4540: p_transaction_rec => l_txn_rec,
4541: x_return_status => l_return_status,
4542: x_msg_count => l_msg_count,
4993: FUNCTION check_contracts(
4994: p_instance_id IN number)
4995: RETURN BOOLEAN
4996: IS
4997: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
4998: l_msg_count number;
4999: l_msg_data varchar2(2000);
5000: l_contracts_tbl oks_entitlements_pub.output_tbl_ib;
5001: l_inp_rec oks_entitlements_pub.input_rec_ib;
5097: AND mtl_creation_date < p_mtl_creation_date
5098: ORDER BY mtl_creation_date desc, mtl_txn_id desc;
5099:
5100: skip_txn exception;
5101: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
5102: l_msg_data varchar2(2000);
5103: l_msg_count number;
5104: l_txn_rec csi_datastructures_pub.transaction_rec;
5105:
5290: WHERE inv_material_transaction_id = missing_csi_rec.mtl_txn_id;
5291: EXCEPTION
5292: WHEN no_data_found THEN
5293:
5294: l_txn_rec.transaction_id := fnd_api.g_miss_num;
5295: l_txn_rec.transaction_type_id := correction_txn_type_id;
5296: l_txn_rec.source_header_ref := 'DATAFIX';
5297: l_txn_rec.source_line_ref := 'TXNPUMP FOR PROGRESSED';
5298: l_txn_rec.source_transaction_date := missing_csi_rec.mtl_txn_date;
5300: l_txn_rec.inv_material_transaction_id := missing_csi_rec.mtl_txn_id;
5301:
5302: csi_transactions_pvt.create_transaction (
5303: p_api_version => 1.0,
5304: p_commit => fnd_api.g_false,
5305: p_init_msg_list => fnd_api.g_true,
5306: p_validation_level => fnd_api.g_valid_level_full,
5307: p_success_if_exists_flag => 'Y',
5308: p_transaction_rec => l_txn_rec,
5301:
5302: csi_transactions_pvt.create_transaction (
5303: p_api_version => 1.0,
5304: p_commit => fnd_api.g_false,
5305: p_init_msg_list => fnd_api.g_true,
5306: p_validation_level => fnd_api.g_valid_level_full,
5307: p_success_if_exists_flag => 'Y',
5308: p_transaction_rec => l_txn_rec,
5309: x_return_status => l_return_status,
5302: csi_transactions_pvt.create_transaction (
5303: p_api_version => 1.0,
5304: p_commit => fnd_api.g_false,
5305: p_init_msg_list => fnd_api.g_true,
5306: p_validation_level => fnd_api.g_valid_level_full,
5307: p_success_if_exists_flag => 'Y',
5308: p_transaction_rec => l_txn_rec,
5309: x_return_status => l_return_status,
5310: x_msg_count => l_msg_count,
5857: WHERE instance_id = p_instance_rec.instance_id;
5858:
5859: IF p_instance_rec.location_type_code = 'INVENTORY' THEN
5860:
5861: IF (nvl(p_instance_rec.vld_organization_id, fnd_api.g_miss_num) =
5862: nvl(l_vld_organization_id, fnd_api.g_miss_num))
5863: AND
5864: (nvl(p_instance_rec.inv_organization_id,fnd_api.g_miss_num) =
5865: nvl(l_inv_organization_id, fnd_api.g_miss_num))
5858:
5859: IF p_instance_rec.location_type_code = 'INVENTORY' THEN
5860:
5861: IF (nvl(p_instance_rec.vld_organization_id, fnd_api.g_miss_num) =
5862: nvl(l_vld_organization_id, fnd_api.g_miss_num))
5863: AND
5864: (nvl(p_instance_rec.inv_organization_id,fnd_api.g_miss_num) =
5865: nvl(l_inv_organization_id, fnd_api.g_miss_num))
5866: AND
5860:
5861: IF (nvl(p_instance_rec.vld_organization_id, fnd_api.g_miss_num) =
5862: nvl(l_vld_organization_id, fnd_api.g_miss_num))
5863: AND
5864: (nvl(p_instance_rec.inv_organization_id,fnd_api.g_miss_num) =
5865: nvl(l_inv_organization_id, fnd_api.g_miss_num))
5866: AND
5867: (nvl(p_instance_rec.inv_subinventory_name, fnd_api.g_miss_char) =
5868: nvl(l_inv_subinventory_name, fnd_api.g_miss_char))
5861: IF (nvl(p_instance_rec.vld_organization_id, fnd_api.g_miss_num) =
5862: nvl(l_vld_organization_id, fnd_api.g_miss_num))
5863: AND
5864: (nvl(p_instance_rec.inv_organization_id,fnd_api.g_miss_num) =
5865: nvl(l_inv_organization_id, fnd_api.g_miss_num))
5866: AND
5867: (nvl(p_instance_rec.inv_subinventory_name, fnd_api.g_miss_char) =
5868: nvl(l_inv_subinventory_name, fnd_api.g_miss_char))
5869: AND
5863: AND
5864: (nvl(p_instance_rec.inv_organization_id,fnd_api.g_miss_num) =
5865: nvl(l_inv_organization_id, fnd_api.g_miss_num))
5866: AND
5867: (nvl(p_instance_rec.inv_subinventory_name, fnd_api.g_miss_char) =
5868: nvl(l_inv_subinventory_name, fnd_api.g_miss_char))
5869: AND
5870: (nvl(p_instance_rec.inventory_revision, fnd_api.g_miss_char) =
5871: nvl(l_inventory_revision, fnd_api.g_miss_char))
5864: (nvl(p_instance_rec.inv_organization_id,fnd_api.g_miss_num) =
5865: nvl(l_inv_organization_id, fnd_api.g_miss_num))
5866: AND
5867: (nvl(p_instance_rec.inv_subinventory_name, fnd_api.g_miss_char) =
5868: nvl(l_inv_subinventory_name, fnd_api.g_miss_char))
5869: AND
5870: (nvl(p_instance_rec.inventory_revision, fnd_api.g_miss_char) =
5871: nvl(l_inventory_revision, fnd_api.g_miss_char))
5872: AND
5866: AND
5867: (nvl(p_instance_rec.inv_subinventory_name, fnd_api.g_miss_char) =
5868: nvl(l_inv_subinventory_name, fnd_api.g_miss_char))
5869: AND
5870: (nvl(p_instance_rec.inventory_revision, fnd_api.g_miss_char) =
5871: nvl(l_inventory_revision, fnd_api.g_miss_char))
5872: AND
5873: (nvl(p_instance_rec.inv_locator_id, fnd_api.g_miss_num) =
5874: nvl(l_inv_locator_id, fnd_api.g_miss_num))
5867: (nvl(p_instance_rec.inv_subinventory_name, fnd_api.g_miss_char) =
5868: nvl(l_inv_subinventory_name, fnd_api.g_miss_char))
5869: AND
5870: (nvl(p_instance_rec.inventory_revision, fnd_api.g_miss_char) =
5871: nvl(l_inventory_revision, fnd_api.g_miss_char))
5872: AND
5873: (nvl(p_instance_rec.inv_locator_id, fnd_api.g_miss_num) =
5874: nvl(l_inv_locator_id, fnd_api.g_miss_num))
5875: AND
5869: AND
5870: (nvl(p_instance_rec.inventory_revision, fnd_api.g_miss_char) =
5871: nvl(l_inventory_revision, fnd_api.g_miss_char))
5872: AND
5873: (nvl(p_instance_rec.inv_locator_id, fnd_api.g_miss_num) =
5874: nvl(l_inv_locator_id, fnd_api.g_miss_num))
5875: AND
5876: (nvl(p_instance_rec.location_type_code, fnd_api.g_miss_char) =
5877: nvl(l_location_type_code, fnd_api.g_miss_char))
5870: (nvl(p_instance_rec.inventory_revision, fnd_api.g_miss_char) =
5871: nvl(l_inventory_revision, fnd_api.g_miss_char))
5872: AND
5873: (nvl(p_instance_rec.inv_locator_id, fnd_api.g_miss_num) =
5874: nvl(l_inv_locator_id, fnd_api.g_miss_num))
5875: AND
5876: (nvl(p_instance_rec.location_type_code, fnd_api.g_miss_char) =
5877: nvl(l_location_type_code, fnd_api.g_miss_char))
5878: AND
5872: AND
5873: (nvl(p_instance_rec.inv_locator_id, fnd_api.g_miss_num) =
5874: nvl(l_inv_locator_id, fnd_api.g_miss_num))
5875: AND
5876: (nvl(p_instance_rec.location_type_code, fnd_api.g_miss_char) =
5877: nvl(l_location_type_code, fnd_api.g_miss_char))
5878: AND
5879: (nvl(p_instance_rec.location_id, fnd_api.g_miss_num) =
5880: nvl(l_location_id, fnd_api.g_miss_num))
5873: (nvl(p_instance_rec.inv_locator_id, fnd_api.g_miss_num) =
5874: nvl(l_inv_locator_id, fnd_api.g_miss_num))
5875: AND
5876: (nvl(p_instance_rec.location_type_code, fnd_api.g_miss_char) =
5877: nvl(l_location_type_code, fnd_api.g_miss_char))
5878: AND
5879: (nvl(p_instance_rec.location_id, fnd_api.g_miss_num) =
5880: nvl(l_location_id, fnd_api.g_miss_num))
5881: AND
5875: AND
5876: (nvl(p_instance_rec.location_type_code, fnd_api.g_miss_char) =
5877: nvl(l_location_type_code, fnd_api.g_miss_char))
5878: AND
5879: (nvl(p_instance_rec.location_id, fnd_api.g_miss_num) =
5880: nvl(l_location_id, fnd_api.g_miss_num))
5881: AND
5882: (nvl(p_instance_rec.instance_usage_code, fnd_api.g_miss_char) =
5883: nvl(l_instance_usage_code, fnd_api.g_miss_char))
5876: (nvl(p_instance_rec.location_type_code, fnd_api.g_miss_char) =
5877: nvl(l_location_type_code, fnd_api.g_miss_char))
5878: AND
5879: (nvl(p_instance_rec.location_id, fnd_api.g_miss_num) =
5880: nvl(l_location_id, fnd_api.g_miss_num))
5881: AND
5882: (nvl(p_instance_rec.instance_usage_code, fnd_api.g_miss_char) =
5883: nvl(l_instance_usage_code, fnd_api.g_miss_char))
5884: AND
5878: AND
5879: (nvl(p_instance_rec.location_id, fnd_api.g_miss_num) =
5880: nvl(l_location_id, fnd_api.g_miss_num))
5881: AND
5882: (nvl(p_instance_rec.instance_usage_code, fnd_api.g_miss_char) =
5883: nvl(l_instance_usage_code, fnd_api.g_miss_char))
5884: AND
5885: (nvl(p_instance_rec.lot_number, fnd_api.g_miss_char) =
5886: nvl(l_lot_number, fnd_api.g_miss_char))
5879: (nvl(p_instance_rec.location_id, fnd_api.g_miss_num) =
5880: nvl(l_location_id, fnd_api.g_miss_num))
5881: AND
5882: (nvl(p_instance_rec.instance_usage_code, fnd_api.g_miss_char) =
5883: nvl(l_instance_usage_code, fnd_api.g_miss_char))
5884: AND
5885: (nvl(p_instance_rec.lot_number, fnd_api.g_miss_char) =
5886: nvl(l_lot_number, fnd_api.g_miss_char))
5887: THEN
5881: AND
5882: (nvl(p_instance_rec.instance_usage_code, fnd_api.g_miss_char) =
5883: nvl(l_instance_usage_code, fnd_api.g_miss_char))
5884: AND
5885: (nvl(p_instance_rec.lot_number, fnd_api.g_miss_char) =
5886: nvl(l_lot_number, fnd_api.g_miss_char))
5887: THEN
5888: l_not_the_same := FALSE;
5889: END IF;
5882: (nvl(p_instance_rec.instance_usage_code, fnd_api.g_miss_char) =
5883: nvl(l_instance_usage_code, fnd_api.g_miss_char))
5884: AND
5885: (nvl(p_instance_rec.lot_number, fnd_api.g_miss_char) =
5886: nvl(l_lot_number, fnd_api.g_miss_char))
5887: THEN
5888: l_not_the_same := FALSE;
5889: END IF;
5890:
5889: END IF;
5890:
5891: ELSIF p_instance_rec.location_type_code = 'PROJECT' THEN
5892:
5893: IF (nvl(p_instance_rec.accounting_class_code, fnd_api.g_miss_char) =
5894: nvl(l_accounting_class_code, fnd_api.g_miss_char))
5895: AND
5896: (nvl(p_instance_rec.location_type_code, fnd_api.g_miss_char) =
5897: nvl(l_location_type_code, fnd_api.g_miss_char))
5890:
5891: ELSIF p_instance_rec.location_type_code = 'PROJECT' THEN
5892:
5893: IF (nvl(p_instance_rec.accounting_class_code, fnd_api.g_miss_char) =
5894: nvl(l_accounting_class_code, fnd_api.g_miss_char))
5895: AND
5896: (nvl(p_instance_rec.location_type_code, fnd_api.g_miss_char) =
5897: nvl(l_location_type_code, fnd_api.g_miss_char))
5898: AND
5892:
5893: IF (nvl(p_instance_rec.accounting_class_code, fnd_api.g_miss_char) =
5894: nvl(l_accounting_class_code, fnd_api.g_miss_char))
5895: AND
5896: (nvl(p_instance_rec.location_type_code, fnd_api.g_miss_char) =
5897: nvl(l_location_type_code, fnd_api.g_miss_char))
5898: AND
5899: (nvl(p_instance_rec.location_id, fnd_api.g_miss_num) =
5900: nvl(l_location_id, fnd_api.g_miss_num))
5893: IF (nvl(p_instance_rec.accounting_class_code, fnd_api.g_miss_char) =
5894: nvl(l_accounting_class_code, fnd_api.g_miss_char))
5895: AND
5896: (nvl(p_instance_rec.location_type_code, fnd_api.g_miss_char) =
5897: nvl(l_location_type_code, fnd_api.g_miss_char))
5898: AND
5899: (nvl(p_instance_rec.location_id, fnd_api.g_miss_num) =
5900: nvl(l_location_id, fnd_api.g_miss_num))
5901: AND
5895: AND
5896: (nvl(p_instance_rec.location_type_code, fnd_api.g_miss_char) =
5897: nvl(l_location_type_code, fnd_api.g_miss_char))
5898: AND
5899: (nvl(p_instance_rec.location_id, fnd_api.g_miss_num) =
5900: nvl(l_location_id, fnd_api.g_miss_num))
5901: AND
5902: (nvl(p_instance_rec.pa_project_id, fnd_api.g_miss_num) =
5903: nvl(l_pa_project_id, fnd_api.g_miss_num))
5896: (nvl(p_instance_rec.location_type_code, fnd_api.g_miss_char) =
5897: nvl(l_location_type_code, fnd_api.g_miss_char))
5898: AND
5899: (nvl(p_instance_rec.location_id, fnd_api.g_miss_num) =
5900: nvl(l_location_id, fnd_api.g_miss_num))
5901: AND
5902: (nvl(p_instance_rec.pa_project_id, fnd_api.g_miss_num) =
5903: nvl(l_pa_project_id, fnd_api.g_miss_num))
5904: AND
5898: AND
5899: (nvl(p_instance_rec.location_id, fnd_api.g_miss_num) =
5900: nvl(l_location_id, fnd_api.g_miss_num))
5901: AND
5902: (nvl(p_instance_rec.pa_project_id, fnd_api.g_miss_num) =
5903: nvl(l_pa_project_id, fnd_api.g_miss_num))
5904: AND
5905: (nvl(p_instance_rec.pa_project_task_id, fnd_api.g_miss_num) =
5906: nvl(l_pa_project_task_id, fnd_api.g_miss_num))
5899: (nvl(p_instance_rec.location_id, fnd_api.g_miss_num) =
5900: nvl(l_location_id, fnd_api.g_miss_num))
5901: AND
5902: (nvl(p_instance_rec.pa_project_id, fnd_api.g_miss_num) =
5903: nvl(l_pa_project_id, fnd_api.g_miss_num))
5904: AND
5905: (nvl(p_instance_rec.pa_project_task_id, fnd_api.g_miss_num) =
5906: nvl(l_pa_project_task_id, fnd_api.g_miss_num))
5907: AND
5901: AND
5902: (nvl(p_instance_rec.pa_project_id, fnd_api.g_miss_num) =
5903: nvl(l_pa_project_id, fnd_api.g_miss_num))
5904: AND
5905: (nvl(p_instance_rec.pa_project_task_id, fnd_api.g_miss_num) =
5906: nvl(l_pa_project_task_id, fnd_api.g_miss_num))
5907: AND
5908: (nvl(p_instance_rec.instance_usage_code, fnd_api.g_miss_char) =
5909: nvl(l_instance_usage_code, fnd_api.g_miss_char))
5902: (nvl(p_instance_rec.pa_project_id, fnd_api.g_miss_num) =
5903: nvl(l_pa_project_id, fnd_api.g_miss_num))
5904: AND
5905: (nvl(p_instance_rec.pa_project_task_id, fnd_api.g_miss_num) =
5906: nvl(l_pa_project_task_id, fnd_api.g_miss_num))
5907: AND
5908: (nvl(p_instance_rec.instance_usage_code, fnd_api.g_miss_char) =
5909: nvl(l_instance_usage_code, fnd_api.g_miss_char))
5910: THEN
5904: AND
5905: (nvl(p_instance_rec.pa_project_task_id, fnd_api.g_miss_num) =
5906: nvl(l_pa_project_task_id, fnd_api.g_miss_num))
5907: AND
5908: (nvl(p_instance_rec.instance_usage_code, fnd_api.g_miss_char) =
5909: nvl(l_instance_usage_code, fnd_api.g_miss_char))
5910: THEN
5911: l_not_the_same := FALSE;
5912: END IF;
5905: (nvl(p_instance_rec.pa_project_task_id, fnd_api.g_miss_num) =
5906: nvl(l_pa_project_task_id, fnd_api.g_miss_num))
5907: AND
5908: (nvl(p_instance_rec.instance_usage_code, fnd_api.g_miss_char) =
5909: nvl(l_instance_usage_code, fnd_api.g_miss_char))
5910: THEN
5911: l_not_the_same := FALSE;
5912: END IF;
5913:
5912: END IF;
5913:
5914: ELSIF p_instance_rec.location_type_code = 'WIP' THEN
5915:
5916: IF (nvl(p_instance_rec.location_type_code, fnd_api.g_miss_char) =
5917: nvl(l_location_type_code, fnd_api.g_miss_char))
5918: AND
5919: (nvl(p_instance_rec.location_id, fnd_api.g_miss_num) =
5920: nvl(l_location_id, fnd_api.g_miss_num))
5913:
5914: ELSIF p_instance_rec.location_type_code = 'WIP' THEN
5915:
5916: IF (nvl(p_instance_rec.location_type_code, fnd_api.g_miss_char) =
5917: nvl(l_location_type_code, fnd_api.g_miss_char))
5918: AND
5919: (nvl(p_instance_rec.location_id, fnd_api.g_miss_num) =
5920: nvl(l_location_id, fnd_api.g_miss_num))
5921: AND
5915:
5916: IF (nvl(p_instance_rec.location_type_code, fnd_api.g_miss_char) =
5917: nvl(l_location_type_code, fnd_api.g_miss_char))
5918: AND
5919: (nvl(p_instance_rec.location_id, fnd_api.g_miss_num) =
5920: nvl(l_location_id, fnd_api.g_miss_num))
5921: AND
5922: (nvl(p_instance_rec.instance_usage_code, fnd_api.g_miss_char) =
5923: nvl(l_instance_usage_code, fnd_api.g_miss_char))
5916: IF (nvl(p_instance_rec.location_type_code, fnd_api.g_miss_char) =
5917: nvl(l_location_type_code, fnd_api.g_miss_char))
5918: AND
5919: (nvl(p_instance_rec.location_id, fnd_api.g_miss_num) =
5920: nvl(l_location_id, fnd_api.g_miss_num))
5921: AND
5922: (nvl(p_instance_rec.instance_usage_code, fnd_api.g_miss_char) =
5923: nvl(l_instance_usage_code, fnd_api.g_miss_char))
5924: AND
5918: AND
5919: (nvl(p_instance_rec.location_id, fnd_api.g_miss_num) =
5920: nvl(l_location_id, fnd_api.g_miss_num))
5921: AND
5922: (nvl(p_instance_rec.instance_usage_code, fnd_api.g_miss_char) =
5923: nvl(l_instance_usage_code, fnd_api.g_miss_char))
5924: AND
5925: (nvl(p_instance_rec.lot_number, fnd_api.g_miss_char) =
5926: nvl(l_lot_number, fnd_api.g_miss_char))
5919: (nvl(p_instance_rec.location_id, fnd_api.g_miss_num) =
5920: nvl(l_location_id, fnd_api.g_miss_num))
5921: AND
5922: (nvl(p_instance_rec.instance_usage_code, fnd_api.g_miss_char) =
5923: nvl(l_instance_usage_code, fnd_api.g_miss_char))
5924: AND
5925: (nvl(p_instance_rec.lot_number, fnd_api.g_miss_char) =
5926: nvl(l_lot_number, fnd_api.g_miss_char))
5927: AND
5921: AND
5922: (nvl(p_instance_rec.instance_usage_code, fnd_api.g_miss_char) =
5923: nvl(l_instance_usage_code, fnd_api.g_miss_char))
5924: AND
5925: (nvl(p_instance_rec.lot_number, fnd_api.g_miss_char) =
5926: nvl(l_lot_number, fnd_api.g_miss_char))
5927: AND
5928: (nvl(p_instance_rec.inv_organization_id, fnd_api.g_miss_num) =
5929: nvl(l_inv_organization_id, fnd_api.g_miss_num))
5922: (nvl(p_instance_rec.instance_usage_code, fnd_api.g_miss_char) =
5923: nvl(l_instance_usage_code, fnd_api.g_miss_char))
5924: AND
5925: (nvl(p_instance_rec.lot_number, fnd_api.g_miss_char) =
5926: nvl(l_lot_number, fnd_api.g_miss_char))
5927: AND
5928: (nvl(p_instance_rec.inv_organization_id, fnd_api.g_miss_num) =
5929: nvl(l_inv_organization_id, fnd_api.g_miss_num))
5930: AND
5924: AND
5925: (nvl(p_instance_rec.lot_number, fnd_api.g_miss_char) =
5926: nvl(l_lot_number, fnd_api.g_miss_char))
5927: AND
5928: (nvl(p_instance_rec.inv_organization_id, fnd_api.g_miss_num) =
5929: nvl(l_inv_organization_id, fnd_api.g_miss_num))
5930: AND
5931: (nvl(p_instance_rec.inv_subinventory_name, fnd_api.g_miss_char) =
5932: nvl(l_inv_subinventory_name, fnd_api.g_miss_char))
5925: (nvl(p_instance_rec.lot_number, fnd_api.g_miss_char) =
5926: nvl(l_lot_number, fnd_api.g_miss_char))
5927: AND
5928: (nvl(p_instance_rec.inv_organization_id, fnd_api.g_miss_num) =
5929: nvl(l_inv_organization_id, fnd_api.g_miss_num))
5930: AND
5931: (nvl(p_instance_rec.inv_subinventory_name, fnd_api.g_miss_char) =
5932: nvl(l_inv_subinventory_name, fnd_api.g_miss_char))
5933: AND
5927: AND
5928: (nvl(p_instance_rec.inv_organization_id, fnd_api.g_miss_num) =
5929: nvl(l_inv_organization_id, fnd_api.g_miss_num))
5930: AND
5931: (nvl(p_instance_rec.inv_subinventory_name, fnd_api.g_miss_char) =
5932: nvl(l_inv_subinventory_name, fnd_api.g_miss_char))
5933: AND
5934: (nvl(p_instance_rec.inventory_revision, fnd_api.g_miss_char) =
5935: nvl(l_inventory_revision, fnd_api.g_miss_char))
5928: (nvl(p_instance_rec.inv_organization_id, fnd_api.g_miss_num) =
5929: nvl(l_inv_organization_id, fnd_api.g_miss_num))
5930: AND
5931: (nvl(p_instance_rec.inv_subinventory_name, fnd_api.g_miss_char) =
5932: nvl(l_inv_subinventory_name, fnd_api.g_miss_char))
5933: AND
5934: (nvl(p_instance_rec.inventory_revision, fnd_api.g_miss_char) =
5935: nvl(l_inventory_revision, fnd_api.g_miss_char))
5936: AND
5930: AND
5931: (nvl(p_instance_rec.inv_subinventory_name, fnd_api.g_miss_char) =
5932: nvl(l_inv_subinventory_name, fnd_api.g_miss_char))
5933: AND
5934: (nvl(p_instance_rec.inventory_revision, fnd_api.g_miss_char) =
5935: nvl(l_inventory_revision, fnd_api.g_miss_char))
5936: AND
5937: (nvl(p_instance_rec.inv_locator_id, fnd_api.g_miss_num) =
5938: nvl(l_inv_locator_id, fnd_api.g_miss_num))
5931: (nvl(p_instance_rec.inv_subinventory_name, fnd_api.g_miss_char) =
5932: nvl(l_inv_subinventory_name, fnd_api.g_miss_char))
5933: AND
5934: (nvl(p_instance_rec.inventory_revision, fnd_api.g_miss_char) =
5935: nvl(l_inventory_revision, fnd_api.g_miss_char))
5936: AND
5937: (nvl(p_instance_rec.inv_locator_id, fnd_api.g_miss_num) =
5938: nvl(l_inv_locator_id, fnd_api.g_miss_num))
5939: AND
5933: AND
5934: (nvl(p_instance_rec.inventory_revision, fnd_api.g_miss_char) =
5935: nvl(l_inventory_revision, fnd_api.g_miss_char))
5936: AND
5937: (nvl(p_instance_rec.inv_locator_id, fnd_api.g_miss_num) =
5938: nvl(l_inv_locator_id, fnd_api.g_miss_num))
5939: AND
5940: (nvl(p_instance_rec.wip_job_id, fnd_api.g_miss_num) =
5941: nvl(l_wip_job_id, fnd_api.g_miss_num))
5934: (nvl(p_instance_rec.inventory_revision, fnd_api.g_miss_char) =
5935: nvl(l_inventory_revision, fnd_api.g_miss_char))
5936: AND
5937: (nvl(p_instance_rec.inv_locator_id, fnd_api.g_miss_num) =
5938: nvl(l_inv_locator_id, fnd_api.g_miss_num))
5939: AND
5940: (nvl(p_instance_rec.wip_job_id, fnd_api.g_miss_num) =
5941: nvl(l_wip_job_id, fnd_api.g_miss_num))
5942: THEN
5936: AND
5937: (nvl(p_instance_rec.inv_locator_id, fnd_api.g_miss_num) =
5938: nvl(l_inv_locator_id, fnd_api.g_miss_num))
5939: AND
5940: (nvl(p_instance_rec.wip_job_id, fnd_api.g_miss_num) =
5941: nvl(l_wip_job_id, fnd_api.g_miss_num))
5942: THEN
5943: l_not_the_same := FALSE;
5944: END IF;
5937: (nvl(p_instance_rec.inv_locator_id, fnd_api.g_miss_num) =
5938: nvl(l_inv_locator_id, fnd_api.g_miss_num))
5939: AND
5940: (nvl(p_instance_rec.wip_job_id, fnd_api.g_miss_num) =
5941: nvl(l_wip_job_id, fnd_api.g_miss_num))
5942: THEN
5943: l_not_the_same := FALSE;
5944: END IF;
5945:
5944: END IF;
5945:
5946: ELSIF p_instance_rec.location_type_code = 'IN_TRANSIT' THEN
5947:
5948: IF (nvl(p_instance_rec.location_type_code, fnd_api.g_miss_char) =
5949: nvl(l_location_type_code, fnd_api.g_miss_char))
5950: AND
5951: (nvl(p_instance_rec.location_id, fnd_api.g_miss_num) =
5952: nvl(l_location_id, fnd_api.g_miss_num))
5945:
5946: ELSIF p_instance_rec.location_type_code = 'IN_TRANSIT' THEN
5947:
5948: IF (nvl(p_instance_rec.location_type_code, fnd_api.g_miss_char) =
5949: nvl(l_location_type_code, fnd_api.g_miss_char))
5950: AND
5951: (nvl(p_instance_rec.location_id, fnd_api.g_miss_num) =
5952: nvl(l_location_id, fnd_api.g_miss_num))
5953: AND
5947:
5948: IF (nvl(p_instance_rec.location_type_code, fnd_api.g_miss_char) =
5949: nvl(l_location_type_code, fnd_api.g_miss_char))
5950: AND
5951: (nvl(p_instance_rec.location_id, fnd_api.g_miss_num) =
5952: nvl(l_location_id, fnd_api.g_miss_num))
5953: AND
5954: (nvl(p_instance_rec.instance_usage_code, fnd_api.g_miss_char) =
5955: nvl(l_instance_usage_code, fnd_api.g_miss_char))
5948: IF (nvl(p_instance_rec.location_type_code, fnd_api.g_miss_char) =
5949: nvl(l_location_type_code, fnd_api.g_miss_char))
5950: AND
5951: (nvl(p_instance_rec.location_id, fnd_api.g_miss_num) =
5952: nvl(l_location_id, fnd_api.g_miss_num))
5953: AND
5954: (nvl(p_instance_rec.instance_usage_code, fnd_api.g_miss_char) =
5955: nvl(l_instance_usage_code, fnd_api.g_miss_char))
5956: AND
5950: AND
5951: (nvl(p_instance_rec.location_id, fnd_api.g_miss_num) =
5952: nvl(l_location_id, fnd_api.g_miss_num))
5953: AND
5954: (nvl(p_instance_rec.instance_usage_code, fnd_api.g_miss_char) =
5955: nvl(l_instance_usage_code, fnd_api.g_miss_char))
5956: AND
5957: (nvl(p_instance_rec.lot_number, fnd_api.g_miss_char) =
5958: nvl(l_lot_number, fnd_api.g_miss_char))
5951: (nvl(p_instance_rec.location_id, fnd_api.g_miss_num) =
5952: nvl(l_location_id, fnd_api.g_miss_num))
5953: AND
5954: (nvl(p_instance_rec.instance_usage_code, fnd_api.g_miss_char) =
5955: nvl(l_instance_usage_code, fnd_api.g_miss_char))
5956: AND
5957: (nvl(p_instance_rec.lot_number, fnd_api.g_miss_char) =
5958: nvl(l_lot_number, fnd_api.g_miss_char))
5959: AND
5953: AND
5954: (nvl(p_instance_rec.instance_usage_code, fnd_api.g_miss_char) =
5955: nvl(l_instance_usage_code, fnd_api.g_miss_char))
5956: AND
5957: (nvl(p_instance_rec.lot_number, fnd_api.g_miss_char) =
5958: nvl(l_lot_number, fnd_api.g_miss_char))
5959: AND
5960: (nvl(p_instance_rec.inv_organization_id, fnd_api.g_miss_num) =
5961: nvl(l_inv_organization_id, fnd_api.g_miss_num))
5954: (nvl(p_instance_rec.instance_usage_code, fnd_api.g_miss_char) =
5955: nvl(l_instance_usage_code, fnd_api.g_miss_char))
5956: AND
5957: (nvl(p_instance_rec.lot_number, fnd_api.g_miss_char) =
5958: nvl(l_lot_number, fnd_api.g_miss_char))
5959: AND
5960: (nvl(p_instance_rec.inv_organization_id, fnd_api.g_miss_num) =
5961: nvl(l_inv_organization_id, fnd_api.g_miss_num))
5962: AND
5956: AND
5957: (nvl(p_instance_rec.lot_number, fnd_api.g_miss_char) =
5958: nvl(l_lot_number, fnd_api.g_miss_char))
5959: AND
5960: (nvl(p_instance_rec.inv_organization_id, fnd_api.g_miss_num) =
5961: nvl(l_inv_organization_id, fnd_api.g_miss_num))
5962: AND
5963: (nvl(p_instance_rec.inv_subinventory_name, fnd_api.g_miss_char) =
5964: nvl(l_inv_subinventory_name, fnd_api.g_miss_char))
5957: (nvl(p_instance_rec.lot_number, fnd_api.g_miss_char) =
5958: nvl(l_lot_number, fnd_api.g_miss_char))
5959: AND
5960: (nvl(p_instance_rec.inv_organization_id, fnd_api.g_miss_num) =
5961: nvl(l_inv_organization_id, fnd_api.g_miss_num))
5962: AND
5963: (nvl(p_instance_rec.inv_subinventory_name, fnd_api.g_miss_char) =
5964: nvl(l_inv_subinventory_name, fnd_api.g_miss_char))
5965: AND
5959: AND
5960: (nvl(p_instance_rec.inv_organization_id, fnd_api.g_miss_num) =
5961: nvl(l_inv_organization_id, fnd_api.g_miss_num))
5962: AND
5963: (nvl(p_instance_rec.inv_subinventory_name, fnd_api.g_miss_char) =
5964: nvl(l_inv_subinventory_name, fnd_api.g_miss_char))
5965: AND
5966: (nvl(p_instance_rec.inventory_revision, fnd_api.g_miss_char) =
5967: nvl(l_inventory_revision, fnd_api.g_miss_char))
5960: (nvl(p_instance_rec.inv_organization_id, fnd_api.g_miss_num) =
5961: nvl(l_inv_organization_id, fnd_api.g_miss_num))
5962: AND
5963: (nvl(p_instance_rec.inv_subinventory_name, fnd_api.g_miss_char) =
5964: nvl(l_inv_subinventory_name, fnd_api.g_miss_char))
5965: AND
5966: (nvl(p_instance_rec.inventory_revision, fnd_api.g_miss_char) =
5967: nvl(l_inventory_revision, fnd_api.g_miss_char))
5968: AND
5962: AND
5963: (nvl(p_instance_rec.inv_subinventory_name, fnd_api.g_miss_char) =
5964: nvl(l_inv_subinventory_name, fnd_api.g_miss_char))
5965: AND
5966: (nvl(p_instance_rec.inventory_revision, fnd_api.g_miss_char) =
5967: nvl(l_inventory_revision, fnd_api.g_miss_char))
5968: AND
5969: (nvl(p_instance_rec.inv_locator_id, fnd_api.g_miss_num) =
5970: nvl(l_inv_locator_id, fnd_api.g_miss_num))
5963: (nvl(p_instance_rec.inv_subinventory_name, fnd_api.g_miss_char) =
5964: nvl(l_inv_subinventory_name, fnd_api.g_miss_char))
5965: AND
5966: (nvl(p_instance_rec.inventory_revision, fnd_api.g_miss_char) =
5967: nvl(l_inventory_revision, fnd_api.g_miss_char))
5968: AND
5969: (nvl(p_instance_rec.inv_locator_id, fnd_api.g_miss_num) =
5970: nvl(l_inv_locator_id, fnd_api.g_miss_num))
5971: AND
5965: AND
5966: (nvl(p_instance_rec.inventory_revision, fnd_api.g_miss_char) =
5967: nvl(l_inventory_revision, fnd_api.g_miss_char))
5968: AND
5969: (nvl(p_instance_rec.inv_locator_id, fnd_api.g_miss_num) =
5970: nvl(l_inv_locator_id, fnd_api.g_miss_num))
5971: AND
5972: (nvl(p_instance_rec.in_transit_order_line_id, fnd_api.g_miss_num) =
5973: nvl(l_in_transit_order_line_id, fnd_api.g_miss_num))
5966: (nvl(p_instance_rec.inventory_revision, fnd_api.g_miss_char) =
5967: nvl(l_inventory_revision, fnd_api.g_miss_char))
5968: AND
5969: (nvl(p_instance_rec.inv_locator_id, fnd_api.g_miss_num) =
5970: nvl(l_inv_locator_id, fnd_api.g_miss_num))
5971: AND
5972: (nvl(p_instance_rec.in_transit_order_line_id, fnd_api.g_miss_num) =
5973: nvl(l_in_transit_order_line_id, fnd_api.g_miss_num))
5974: THEN
5968: AND
5969: (nvl(p_instance_rec.inv_locator_id, fnd_api.g_miss_num) =
5970: nvl(l_inv_locator_id, fnd_api.g_miss_num))
5971: AND
5972: (nvl(p_instance_rec.in_transit_order_line_id, fnd_api.g_miss_num) =
5973: nvl(l_in_transit_order_line_id, fnd_api.g_miss_num))
5974: THEN
5975: l_not_the_same := FALSE;
5976: END IF;
5969: (nvl(p_instance_rec.inv_locator_id, fnd_api.g_miss_num) =
5970: nvl(l_inv_locator_id, fnd_api.g_miss_num))
5971: AND
5972: (nvl(p_instance_rec.in_transit_order_line_id, fnd_api.g_miss_num) =
5973: nvl(l_in_transit_order_line_id, fnd_api.g_miss_num))
5974: THEN
5975: l_not_the_same := FALSE;
5976: END IF;
5977:
6010: FROM csi_diagnostics_temp
6011: WHERE process_flag = 'X';
6012:
6013: l_txn_rec csi_datastructures_pub.transaction_rec;
6014: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
6015: l_msg_count number;
6016: l_msg_data varchar2(2000);
6017:
6018: BEGIN
6033: WHERE inv_material_transaction_id = knock_rec.mtl_txn_id;
6034: EXCEPTION
6035: WHEN no_data_found THEN
6036:
6037: l_txn_rec.transaction_id := fnd_api.g_miss_num;
6038: l_txn_rec.transaction_type_id := correction_txn_type_id;
6039: l_txn_rec.source_header_ref := 'DATAFIX';
6040: l_txn_rec.source_line_ref := 'FUTURE TXN IS PROCESSED';
6041: l_txn_rec.source_transaction_date := knock_rec.mtl_txn_date;
6043: l_txn_rec.inv_material_transaction_id := knock_rec.mtl_txn_id;
6044:
6045: csi_transactions_pvt.create_transaction (
6046: p_api_version => 1.0,
6047: p_commit => fnd_api.g_false,
6048: p_init_msg_list => fnd_api.g_true,
6049: p_validation_level => fnd_api.g_valid_level_full,
6050: p_success_if_exists_flag => 'Y',
6051: p_transaction_rec => l_txn_rec,
6044:
6045: csi_transactions_pvt.create_transaction (
6046: p_api_version => 1.0,
6047: p_commit => fnd_api.g_false,
6048: p_init_msg_list => fnd_api.g_true,
6049: p_validation_level => fnd_api.g_valid_level_full,
6050: p_success_if_exists_flag => 'Y',
6051: p_transaction_rec => l_txn_rec,
6052: x_return_status => l_return_status,
6045: csi_transactions_pvt.create_transaction (
6046: p_api_version => 1.0,
6047: p_commit => fnd_api.g_false,
6048: p_init_msg_list => fnd_api.g_true,
6049: p_validation_level => fnd_api.g_valid_level_full,
6050: p_success_if_exists_flag => 'Y',
6051: p_transaction_rec => l_txn_rec,
6052: x_return_status => l_return_status,
6053: x_msg_count => l_msg_count,
6081:
6082: l_error_message varchar2(2000);
6083: l_msg_data varchar2(2000);
6084: l_msg_count number;
6085: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
6086:
6087: BEGIN
6088:
6089: x_return_status := fnd_api.g_ret_sts_success;
6085: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
6086:
6087: BEGIN
6088:
6089: x_return_status := fnd_api.g_ret_sts_success;
6090:
6091: l_txn_rec := p_txn_rec;
6092: l_instance_rec := p_instance_rec;
6093: l_parties_tbl := p_parties_tbl;
6096: savepoint create_instance;
6097:
6098: csi_transactions_pvt.create_transaction (
6099: p_api_version => 1.0,
6100: p_commit => fnd_api.g_false,
6101: p_init_msg_list => fnd_api.g_true,
6102: p_validation_level => fnd_api.g_valid_level_full,
6103: p_success_if_exists_flag => 'Y',
6104: p_transaction_rec => l_txn_rec,
6097:
6098: csi_transactions_pvt.create_transaction (
6099: p_api_version => 1.0,
6100: p_commit => fnd_api.g_false,
6101: p_init_msg_list => fnd_api.g_true,
6102: p_validation_level => fnd_api.g_valid_level_full,
6103: p_success_if_exists_flag => 'Y',
6104: p_transaction_rec => l_txn_rec,
6105: x_return_status => l_return_status,
6098: csi_transactions_pvt.create_transaction (
6099: p_api_version => 1.0,
6100: p_commit => fnd_api.g_false,
6101: p_init_msg_list => fnd_api.g_true,
6102: p_validation_level => fnd_api.g_valid_level_full,
6103: p_success_if_exists_flag => 'Y',
6104: p_transaction_rec => l_txn_rec,
6105: x_return_status => l_return_status,
6106: x_msg_count => l_msg_count,
6105: x_return_status => l_return_status,
6106: x_msg_count => l_msg_count,
6107: x_msg_data => l_msg_data );
6108:
6109: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6110: raise fnd_api.g_exc_error;
6111: END IF;
6112:
6113: l_instance_rec.mfg_serial_number_flag := 'Y';
6106: x_msg_count => l_msg_count,
6107: x_msg_data => l_msg_data );
6108:
6109: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6110: raise fnd_api.g_exc_error;
6111: END IF;
6112:
6113: l_instance_rec.mfg_serial_number_flag := 'Y';
6114:
6138: AND organization_id = l_instance_rec.vld_organization_id;
6139:
6140: csi_item_instance_pub.create_item_instance(
6141: p_api_version => 1.0,
6142: p_commit => fnd_api.g_false,
6143: p_init_msg_list => fnd_api.g_true,
6144: p_validation_level => fnd_api.g_valid_level_full,
6145: p_instance_rec => l_instance_rec,
6146: p_party_tbl => l_parties_tbl,
6139:
6140: csi_item_instance_pub.create_item_instance(
6141: p_api_version => 1.0,
6142: p_commit => fnd_api.g_false,
6143: p_init_msg_list => fnd_api.g_true,
6144: p_validation_level => fnd_api.g_valid_level_full,
6145: p_instance_rec => l_instance_rec,
6146: p_party_tbl => l_parties_tbl,
6147: p_account_tbl => l_pty_accts_tbl,
6140: csi_item_instance_pub.create_item_instance(
6141: p_api_version => 1.0,
6142: p_commit => fnd_api.g_false,
6143: p_init_msg_list => fnd_api.g_true,
6144: p_validation_level => fnd_api.g_valid_level_full,
6145: p_instance_rec => l_instance_rec,
6146: p_party_tbl => l_parties_tbl,
6147: p_account_tbl => l_pty_accts_tbl,
6148: p_org_assignments_tbl => l_org_units_tbl,
6157: l_msg_data := csi_t_gen_utility_pvt.dump_error_stack;
6158: log(' create status :'||l_return_status||' '||l_msg_data);
6159:
6160: -- For Bug 4057183
6161: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
6162: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
6163: raise fnd_api.g_exc_error;
6164: END IF;
6165:
6158: log(' create status :'||l_return_status||' '||l_msg_data);
6159:
6160: -- For Bug 4057183
6161: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
6162: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
6163: raise fnd_api.g_exc_error;
6164: END IF;
6165:
6166: IF nvl(l_txn_rec.transaction_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
6159:
6160: -- For Bug 4057183
6161: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
6162: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
6163: raise fnd_api.g_exc_error;
6164: END IF;
6165:
6166: IF nvl(l_txn_rec.transaction_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
6167: UPDATE csi_transactions
6162: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
6163: raise fnd_api.g_exc_error;
6164: END IF;
6165:
6166: IF nvl(l_txn_rec.transaction_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
6167: UPDATE csi_transactions
6168: SET inv_material_transaction_id = null
6169: WHERE transaction_id = l_txn_rec.transaction_id;
6170: END IF;
6171:
6172: commit;
6173:
6174: EXCEPTION
6175: WHEN fnd_api.g_exc_error THEN
6176: rollback to create_instance;
6177: x_return_status := fnd_api.g_ret_sts_error;
6178: x_error_message := csi_t_gen_utility_pvt.dump_error_stack;
6179: END create_instance;
6173:
6174: EXCEPTION
6175: WHEN fnd_api.g_exc_error THEN
6176: rollback to create_instance;
6177: x_return_status := fnd_api.g_ret_sts_error;
6178: x_error_message := csi_t_gen_utility_pvt.dump_error_stack;
6179: END create_instance;
6180:
6181: PROCEDURE update_instance(
6201:
6202: l_error_message varchar2(2000);
6203: l_msg_data varchar2(2000);
6204: l_msg_count number;
6205: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
6206:
6207: BEGIN
6208:
6209: x_return_status := fnd_api.g_ret_sts_success;
6205: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
6206:
6207: BEGIN
6208:
6209: x_return_status := fnd_api.g_ret_sts_success;
6210:
6211: l_txn_rec := p_txn_rec;
6212: l_instance_rec := p_instance_rec;
6213: l_parties_tbl := p_parties_tbl;
6245: log(' not the same');
6246:
6247: csi_transactions_pvt.create_transaction (
6248: p_api_version => 1.0,
6249: p_commit => fnd_api.g_false,
6250: p_init_msg_list => fnd_api.g_true,
6251: p_validation_level => fnd_api.g_valid_level_full,
6252: p_success_if_exists_flag => 'Y',
6253: p_transaction_rec => l_txn_rec,
6246:
6247: csi_transactions_pvt.create_transaction (
6248: p_api_version => 1.0,
6249: p_commit => fnd_api.g_false,
6250: p_init_msg_list => fnd_api.g_true,
6251: p_validation_level => fnd_api.g_valid_level_full,
6252: p_success_if_exists_flag => 'Y',
6253: p_transaction_rec => l_txn_rec,
6254: x_return_status => l_return_status,
6247: csi_transactions_pvt.create_transaction (
6248: p_api_version => 1.0,
6249: p_commit => fnd_api.g_false,
6250: p_init_msg_list => fnd_api.g_true,
6251: p_validation_level => fnd_api.g_valid_level_full,
6252: p_success_if_exists_flag => 'Y',
6253: p_transaction_rec => l_txn_rec,
6254: x_return_status => l_return_status,
6255: x_msg_count => l_msg_count,
6254: x_return_status => l_return_status,
6255: x_msg_count => l_msg_count,
6256: x_msg_data => l_msg_data );
6257:
6258: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6259: raise fnd_api.g_exc_error;
6260: END IF;
6261:
6262: UPDATE csi_item_instances
6255: x_msg_count => l_msg_count,
6256: x_msg_data => l_msg_data );
6257:
6258: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6259: raise fnd_api.g_exc_error;
6260: END IF;
6261:
6262: UPDATE csi_item_instances
6263: SET last_vld_organization_id = l_instance_rec.vld_organization_id,
6268: p_instance_id => l_instance_rec.instance_id,
6269: p_csi_txn_rec => l_txn_rec,
6270: x_return_status => l_return_status);
6271:
6272: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6273: raise fnd_api.g_exc_error;
6274: END IF;
6275:
6276: IF nvl(l_instance_rec.active_end_date, fnd_api.g_miss_date) <> fnd_api.g_miss_date THEN
6269: p_csi_txn_rec => l_txn_rec,
6270: x_return_status => l_return_status);
6271:
6272: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6273: raise fnd_api.g_exc_error;
6274: END IF;
6275:
6276: IF nvl(l_instance_rec.active_end_date, fnd_api.g_miss_date) <> fnd_api.g_miss_date THEN
6277: l_parties_tbl.delete;
6272: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6273: raise fnd_api.g_exc_error;
6274: END IF;
6275:
6276: IF nvl(l_instance_rec.active_end_date, fnd_api.g_miss_date) <> fnd_api.g_miss_date THEN
6277: l_parties_tbl.delete;
6278: l_pty_accts_tbl.delete;
6279: END IF;
6280:
6298: WHERE instance_id = l_instance_rec.instance_id;
6299:
6300: csi_item_instance_pub.update_item_instance(
6301: p_api_version => 1.0,
6302: p_commit => fnd_api.g_false,
6303: p_init_msg_list => fnd_api.g_true,
6304: p_validation_level => fnd_api.g_valid_level_full,
6305: p_instance_rec => l_instance_rec,
6306: p_party_tbl => l_parties_tbl,
6299:
6300: csi_item_instance_pub.update_item_instance(
6301: p_api_version => 1.0,
6302: p_commit => fnd_api.g_false,
6303: p_init_msg_list => fnd_api.g_true,
6304: p_validation_level => fnd_api.g_valid_level_full,
6305: p_instance_rec => l_instance_rec,
6306: p_party_tbl => l_parties_tbl,
6307: p_account_tbl => l_pty_accts_tbl,
6300: csi_item_instance_pub.update_item_instance(
6301: p_api_version => 1.0,
6302: p_commit => fnd_api.g_false,
6303: p_init_msg_list => fnd_api.g_true,
6304: p_validation_level => fnd_api.g_valid_level_full,
6305: p_instance_rec => l_instance_rec,
6306: p_party_tbl => l_parties_tbl,
6307: p_account_tbl => l_pty_accts_tbl,
6308: p_org_assignments_tbl => l_org_units_tbl,
6318: l_msg_data := csi_t_gen_utility_pvt.dump_error_stack;
6319: log(' update status :'||l_return_status||' '||l_msg_data);
6320:
6321: -- For Bug 4057183
6322: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
6323: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
6324: raise fnd_api.g_exc_error;
6325: END IF;
6326:
6319: log(' update status :'||l_return_status||' '||l_msg_data);
6320:
6321: -- For Bug 4057183
6322: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
6323: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
6324: raise fnd_api.g_exc_error;
6325: END IF;
6326:
6327: IF nvl(l_txn_rec.transaction_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
6320:
6321: -- For Bug 4057183
6322: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
6323: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
6324: raise fnd_api.g_exc_error;
6325: END IF;
6326:
6327: IF nvl(l_txn_rec.transaction_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
6328: UPDATE csi_transactions
6323: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
6324: raise fnd_api.g_exc_error;
6325: END IF;
6326:
6327: IF nvl(l_txn_rec.transaction_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
6328: UPDATE csi_transactions
6329: SET inv_material_transaction_id = null
6330: WHERE transaction_id = l_txn_rec.transaction_id;
6331: END IF;
6331: END IF;
6332:
6333: ELSE
6334: log(' the same');
6335: IF nvl(l_instance_rec.active_end_date, fnd_api.g_miss_date) <> fnd_api.g_miss_date THEN
6336: UPDATE csi_item_instances
6337: SET active_end_date = l_instance_rec.active_end_date
6338: WHERE instance_id = l_instance_rec.instance_id;
6339: END IF;
6337: SET active_end_date = l_instance_rec.active_end_date
6338: WHERE instance_id = l_instance_rec.instance_id;
6339: END IF;
6340:
6341: IF nvl(l_instance_rec.active_end_date, fnd_api.g_miss_date) = fnd_api.g_miss_date THEN
6342: UPDATE csi_item_instances
6343: SET active_end_date = null
6344: WHERE instance_id = l_instance_rec.instance_id;
6345: END IF;
6347:
6348: commit;
6349:
6350: EXCEPTION
6351: WHEN fnd_api.g_exc_error THEN
6352: rollback to update_instance;
6353: x_return_status := fnd_api.g_ret_sts_error;
6354: x_error_message := csi_t_gen_utility_pvt.dump_error_stack;
6355: END update_instance;
6349:
6350: EXCEPTION
6351: WHEN fnd_api.g_exc_error THEN
6352: rollback to update_instance;
6353: x_return_status := fnd_api.g_ret_sts_error;
6354: x_error_message := csi_t_gen_utility_pvt.dump_error_stack;
6355: END update_instance;
6356:
6357: PROCEDURE fix_soiship(
6366: l_instance_rec csi_datastructures_pub.instance_rec;
6367: l_parties_tbl csi_datastructures_pub.party_tbl;
6368: l_pty_accts_tbl csi_datastructures_pub.party_account_tbl;
6369:
6370: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
6371: l_error_message varchar2(2000);
6372:
6373: BEGIN
6374:
6371: l_error_message varchar2(2000);
6372:
6373: BEGIN
6374:
6375: x_return_status := fnd_api.g_ret_sts_success;
6376:
6377: log(' '||p_diag_txn_rec.serial_number||
6378: ' '||p_diag_txn_rec.mtl_txn_id||
6379: ' '||p_diag_txn_rec.source_type||
6384: LOOP
6385:
6386: l_txn_rec := p_txn_rec;
6387:
6388: l_instance_rec.instance_id := nvl(p_diag_txn_rec.inst_id,fnd_api.g_miss_num);
6389: l_instance_rec.location_type_code := 'INVENTORY';
6390: l_instance_rec.instance_usage_code := 'RETURNED';
6391: l_instance_rec.inventory_item_id := inv_rec.item_id;
6392: l_instance_rec.serial_number := p_diag_txn_rec.serial_number;
6428: x_error_message => l_error_message);
6429:
6430: END IF;
6431:
6432: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6433: x_return_status := l_return_status;
6434: x_error_message := l_error_message;
6435: END IF;
6436:
6521: l_instance_ids_list csi_datastructures_pub.id_tbl;
6522: l_txn_rec csi_datastructures_pub.transaction_rec;
6523: l_diag_txn_rec diag_txn_rec;
6524:
6525: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
6526: l_msg_count number;
6527: l_msg_data varchar2(2000);
6528:
6529: l_error_message varchar2(2000);
6542: l_order_line_id
6543: FROM mtl_material_transactions
6544: WHERE transaction_id = txn_rec.mtl_txn_id;
6545:
6546: l_txn_rec.transaction_id := fnd_api.g_miss_num;
6547: l_txn_rec.transaction_type_id := correction_txn_type_id;
6548: l_txn_rec.source_header_ref := 'DATAFIX';
6549: l_txn_rec.source_line_ref := 'SOISHIP';
6550: l_txn_rec.source_line_ref_id := l_order_line_id;
6581: p_txn_rec => l_txn_rec,
6582: x_return_status => l_return_status,
6583: x_error_message => l_error_message);
6584:
6585: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6586:
6587: l_serials_fixed := FALSE;
6588: rollback to soiship_srl_upd;
6589:
6644: AND serial_number is null;
6645:
6646: EXCEPTION
6647: WHEN no_data_found THEN
6648: l_instance_id := fnd_api.g_miss_num;
6649: WHEN too_many_rows THEN
6650: stack_message('Too many inventory instances for this non srl item.');
6651: raise fnd_api.g_exc_error;
6652: END;
6647: WHEN no_data_found THEN
6648: l_instance_id := fnd_api.g_miss_num;
6649: WHEN too_many_rows THEN
6650: stack_message('Too many inventory instances for this non srl item.');
6651: raise fnd_api.g_exc_error;
6652: END;
6653:
6654: IF nvl(l_instance_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
6655:
6650: stack_message('Too many inventory instances for this non srl item.');
6651: raise fnd_api.g_exc_error;
6652: END;
6653:
6654: IF nvl(l_instance_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
6655:
6656: l_instance_rec.instance_id := l_instance_id;
6657: l_instance_rec.quantity := l_quantity + stage_rec.quantity;
6658: l_instance_rec.object_version_number := l_object_version_number;
6660: l_instance_rec.instance_status_id := 3;
6661:
6662: csi_item_instance_pub.update_item_instance(
6663: p_api_version => 1.0,
6664: p_commit => fnd_api.g_false,
6665: p_init_msg_list => fnd_api.g_true,
6666: p_validation_level => fnd_api.g_valid_level_full,
6667: p_instance_rec => l_instance_rec,
6668: p_party_tbl => l_parties_tbl,
6661:
6662: csi_item_instance_pub.update_item_instance(
6663: p_api_version => 1.0,
6664: p_commit => fnd_api.g_false,
6665: p_init_msg_list => fnd_api.g_true,
6666: p_validation_level => fnd_api.g_valid_level_full,
6667: p_instance_rec => l_instance_rec,
6668: p_party_tbl => l_parties_tbl,
6669: p_account_tbl => l_pty_accts_tbl,
6662: csi_item_instance_pub.update_item_instance(
6663: p_api_version => 1.0,
6664: p_commit => fnd_api.g_false,
6665: p_init_msg_list => fnd_api.g_true,
6666: p_validation_level => fnd_api.g_valid_level_full,
6667: p_instance_rec => l_instance_rec,
6668: p_party_tbl => l_parties_tbl,
6669: p_account_tbl => l_pty_accts_tbl,
6670: p_org_assignments_tbl => l_org_units_tbl,
6677: x_msg_count => l_msg_count,
6678: x_msg_data => l_msg_data);
6679:
6680: -- For Bug 4057183
6681: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
6682: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
6683: raise fnd_api.g_exc_error;
6684: END IF;
6685:
6678: x_msg_data => l_msg_data);
6679:
6680: -- For Bug 4057183
6681: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
6682: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
6683: raise fnd_api.g_exc_error;
6684: END IF;
6685:
6686: ELSE
6679:
6680: -- For Bug 4057183
6681: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
6682: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
6683: raise fnd_api.g_exc_error;
6684: END IF;
6685:
6686: ELSE
6687:
6684: END IF;
6685:
6686: ELSE
6687:
6688: l_instance_rec.instance_id := fnd_api.g_miss_num;
6689: l_instance_rec.location_type_code := 'INVENTORY';
6690: l_instance_rec.instance_usage_code := 'IN_INVENTORY';
6691: l_instance_rec.inventory_item_id := stage_rec.item_id;
6692: l_instance_rec.inv_organization_id := stage_rec.organization_id;
6706: WHERE mssi.organization_id = l_instance_rec.inv_organization_id
6707: AND mssi.secondary_inventory_name = l_instance_rec.inv_subinventory_name
6708: AND haou.organization_id = mssi.organization_id;
6709:
6710: l_parties_tbl(1).instance_party_id := fnd_api.g_miss_num;
6711: l_parties_tbl(1).party_source_table := 'HZ_PARTIES';
6712: l_parties_tbl(1).party_id := l_internal_party_id;
6713: l_parties_tbl(1).relationship_type_code := 'OWNER';
6714: l_parties_tbl(1).contact_flag := 'N';
6715: l_parties_tbl(1).object_version_number := 1.0;
6716:
6717: csi_item_instance_pub.create_item_instance(
6718: p_api_version => 1.0,
6719: p_commit => fnd_api.g_false,
6720: p_init_msg_list => fnd_api.g_true,
6721: p_validation_level => fnd_api.g_valid_level_full,
6722: p_instance_rec => l_instance_rec,
6723: p_party_tbl => l_parties_tbl,
6716:
6717: csi_item_instance_pub.create_item_instance(
6718: p_api_version => 1.0,
6719: p_commit => fnd_api.g_false,
6720: p_init_msg_list => fnd_api.g_true,
6721: p_validation_level => fnd_api.g_valid_level_full,
6722: p_instance_rec => l_instance_rec,
6723: p_party_tbl => l_parties_tbl,
6724: p_account_tbl => l_pty_accts_tbl,
6717: csi_item_instance_pub.create_item_instance(
6718: p_api_version => 1.0,
6719: p_commit => fnd_api.g_false,
6720: p_init_msg_list => fnd_api.g_true,
6721: p_validation_level => fnd_api.g_valid_level_full,
6722: p_instance_rec => l_instance_rec,
6723: p_party_tbl => l_parties_tbl,
6724: p_account_tbl => l_pty_accts_tbl,
6725: p_org_assignments_tbl => l_org_units_tbl,
6731: x_msg_count => l_msg_count,
6732: x_msg_data => l_msg_data );
6733:
6734: -- For Bug 4057183
6735: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
6736: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
6737: raise fnd_api.g_exc_error;
6738: END IF;
6739:
6732: x_msg_data => l_msg_data );
6733:
6734: -- For Bug 4057183
6735: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
6736: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
6737: raise fnd_api.g_exc_error;
6738: END IF;
6739:
6740: END IF;
6733:
6734: -- For Bug 4057183
6735: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
6736: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
6737: raise fnd_api.g_exc_error;
6738: END IF;
6739:
6740: END IF;
6741:
6752: WHERE inv_material_transaction_id = txn_rec.mtl_txn_id
6753: AND processed_flag = 'E';
6754:
6755: EXCEPTION
6756: WHEN fnd_api.g_exc_error THEN
6757: rollback to stage_soiship_instances;
6758: l_error_message := csi_t_gen_utility_pvt.dump_error_stack;
6759: UPDATE csi_diagnostics_temp
6760: SET process_flag = 'E',
6782: l_instance_rec csi_datastructures_pub.instance_rec;
6783: l_parties_tbl csi_datastructures_pub.party_tbl;
6784: l_pty_accts_tbl csi_datastructures_pub.party_account_tbl;
6785:
6786: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
6787: l_error_message varchar2(2000);
6788:
6789: BEGIN
6790:
6787: l_error_message varchar2(2000);
6788:
6789: BEGIN
6790:
6791: x_return_status := fnd_api.g_ret_sts_success;
6792:
6793: FOR inv_rec IN inv_cur (p_diag_txn_rec.mtl_txn_id)
6794: LOOP
6795:
6792:
6793: FOR inv_rec IN inv_cur (p_diag_txn_rec.mtl_txn_id)
6794: LOOP
6795:
6796: l_txn_rec.transaction_id := fnd_api.g_miss_num;
6797: l_txn_rec.transaction_type_id := correction_txn_type_id;
6798: l_txn_rec.source_header_ref := 'DATAFIX';
6799: l_txn_rec.source_line_ref := p_diag_txn_rec.process_code;
6800: l_txn_rec.source_line_ref_id := inv_rec.trx_source_line_id;
6800: l_txn_rec.source_line_ref_id := inv_rec.trx_source_line_id;
6801: l_txn_rec.source_transaction_date := inv_rec.mtl_txn_date;
6802: l_txn_rec.transaction_date := inv_rec.mtl_txn_date;
6803:
6804: l_instance_rec.instance_id := nvl(p_diag_txn_rec.inst_id,fnd_api.g_miss_num);
6805: l_instance_rec.location_type_code := 'INVENTORY';
6806: l_instance_rec.instance_usage_code := 'IN_INVENTORY';
6807: l_instance_rec.inventory_item_id := inv_rec.item_id;
6808: l_instance_rec.serial_number := p_diag_txn_rec.serial_number;
6831: x_return_status => l_return_status,
6832: x_error_message => l_error_message);
6833: ELSE
6834:
6835: l_parties_tbl(1).instance_party_id := fnd_api.g_miss_num;
6836: l_parties_tbl(1).party_source_table := 'HZ_PARTIES';
6837: l_parties_tbl(1).party_id := p_diag_txn_rec.internal_party_id;
6838: l_parties_tbl(1).relationship_type_code := 'OWNER';
6839: l_parties_tbl(1).contact_flag := 'N';
6847: x_return_status => l_return_status,
6848: x_error_message => l_error_message);
6849: END IF;
6850:
6851: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6852: x_return_status := l_return_status;
6853: x_error_message := l_error_message;
6854: END IF;
6855:
6885: AND diag_seq_id > p_diag_seq_id
6886: ORDER by diag_seq_id asc;
6887:
6888: l_prev_txn_rec prev_txn_cur%rowtype;
6889: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
6890: l_error_message varchar2(2000);
6891:
6892: BEGIN
6893:
6890: l_error_message varchar2(2000);
6891:
6892: BEGIN
6893:
6894: x_return_status := fnd_api.g_ret_sts_success;
6895:
6896: IF p_diag_txn_rec.inst_id is not null THEN
6897: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
6898: csi_gen_utility_pvt.populate_install_param_rec;
6913: IF l_prev_txn_rec.mtl_action_id = 21 and l_prev_txn_rec.mtl_src_type_id = 8 THEN
6914: FOR inv_rec IN inv_cur (p_diag_txn_rec.mtl_txn_id)
6915: LOOP
6916:
6917: l_txn_rec.transaction_id := fnd_api.g_miss_num;
6918: l_txn_rec.transaction_type_id := correction_txn_type_id;
6919: l_txn_rec.source_header_ref := 'DATAFIX';
6920: l_txn_rec.source_line_ref := p_diag_txn_rec.process_code;
6921: l_txn_rec.source_line_ref_id := inv_rec.trx_source_line_id;
6943: p_pty_accts_tbl => l_pty_accts_tbl,
6944: x_return_status => l_return_status,
6945: x_error_message => l_error_message);
6946:
6947: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6948: x_return_status := l_return_status;
6949: x_error_message := l_error_message;
6950: END IF;
6951: ELSE
6959:
6960: FOR inv_rec IN inv_cur (p_diag_txn_rec.mtl_txn_id)
6961: LOOP
6962:
6963: l_txn_rec.transaction_id := fnd_api.g_miss_num;
6964: l_txn_rec.transaction_type_id := correction_txn_type_id;
6965: l_txn_rec.source_header_ref := 'DATAFIX';
6966: l_txn_rec.source_line_ref := p_diag_txn_rec.process_code;
6967: l_txn_rec.source_line_ref_id := inv_rec.trx_source_line_id;
6967: l_txn_rec.source_line_ref_id := inv_rec.trx_source_line_id;
6968: l_txn_rec.source_transaction_date := inv_rec.mtl_txn_date;
6969: l_txn_rec.transaction_date := inv_rec.mtl_txn_date;
6970:
6971: l_instance_rec.instance_id := nvl(p_diag_txn_rec.inst_id,fnd_api.g_miss_num);
6972: l_instance_rec.location_type_code := 'INVENTORY';
6973:
6974: IF p_diag_txn_rec.serial_code = 6 THEN
6975: l_instance_rec.instance_usage_code := 'RETURNED';
7004: p_pty_accts_tbl => l_pty_accts_tbl,
7005: x_return_status => l_return_status,
7006: x_error_message => l_error_message);
7007:
7008: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7009: x_return_status := l_return_status;
7010: x_error_message := l_error_message;
7011: END IF;
7012:
7026: l_instance_rec csi_datastructures_pub.instance_rec;
7027: l_parties_tbl csi_datastructures_pub.party_tbl;
7028: l_pty_accts_tbl csi_datastructures_pub.party_account_tbl;
7029:
7030: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
7031: l_error_message varchar2(2000);
7032:
7033: BEGIN
7034:
7031: l_error_message varchar2(2000);
7032:
7033: BEGIN
7034:
7035: x_return_status := fnd_api.g_ret_sts_success;
7036:
7037: FOR inv_rec IN inv_cur (p_diag_txn_rec.mtl_txn_id)
7038: LOOP
7039:
7036:
7037: FOR inv_rec IN inv_cur (p_diag_txn_rec.mtl_txn_id)
7038: LOOP
7039:
7040: l_txn_rec.transaction_id := fnd_api.g_miss_num;
7041: l_txn_rec.transaction_type_id := correction_txn_type_id;
7042: l_txn_rec.source_header_ref := 'DATAFIX';
7043: l_txn_rec.source_line_ref := p_diag_txn_rec.process_code;
7044: l_txn_rec.source_line_ref_id := inv_rec.trx_source_line_id;
7044: l_txn_rec.source_line_ref_id := inv_rec.trx_source_line_id;
7045: l_txn_rec.source_transaction_date := inv_rec.mtl_txn_date;
7046: l_txn_rec.transaction_date := inv_rec.mtl_txn_date;
7047:
7048: l_instance_rec.instance_id := nvl(p_diag_txn_rec.inst_id,fnd_api.g_miss_num);
7049: l_instance_rec.location_type_code := 'INVENTORY';
7050: l_instance_rec.instance_usage_code := 'IN_INVENTORY';
7051: l_instance_rec.inventory_item_id := inv_rec.item_id;
7052: l_instance_rec.serial_number := p_diag_txn_rec.serial_number;
7075: x_return_status => l_return_status,
7076: x_error_message => l_error_message);
7077: ELSE
7078:
7079: l_parties_tbl(1).instance_party_id := fnd_api.g_miss_num;
7080: l_parties_tbl(1).party_source_table := 'HZ_PARTIES';
7081: l_parties_tbl(1).party_id := p_diag_txn_rec.internal_party_id;
7082: l_parties_tbl(1).relationship_type_code := 'OWNER';
7083: l_parties_tbl(1).contact_flag := 'N';
7091: x_return_status => l_return_status,
7092: x_error_message => l_error_message);
7093: END IF;
7094:
7095: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7096: x_return_status := l_return_status;
7097: x_error_message := l_error_message;
7098: END IF;
7099:
7110: l_instance_rec csi_datastructures_pub.instance_rec;
7111: l_parties_tbl csi_datastructures_pub.party_tbl;
7112: l_pty_accts_tbl csi_datastructures_pub.party_account_tbl;
7113:
7114: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
7115: l_error_message varchar2(2000);
7116:
7117: BEGIN
7118:
7115: l_error_message varchar2(2000);
7116:
7117: BEGIN
7118:
7119: x_return_status := fnd_api.g_ret_sts_success;
7120:
7121: FOR inv_rec IN inv_cur (p_diag_txn_rec.mtl_txn_id)
7122: LOOP
7123:
7120:
7121: FOR inv_rec IN inv_cur (p_diag_txn_rec.mtl_txn_id)
7122: LOOP
7123:
7124: l_txn_rec.transaction_id := fnd_api.g_miss_num;
7125: l_txn_rec.transaction_type_id := correction_txn_type_id;
7126: l_txn_rec.source_header_ref := 'DATAFIX';
7127: l_txn_rec.source_line_ref := p_diag_txn_rec.process_code;
7128: l_txn_rec.source_line_ref_id := inv_rec.mtl_source_id;
7128: l_txn_rec.source_line_ref_id := inv_rec.mtl_source_id;
7129: l_txn_rec.source_transaction_date := inv_rec.mtl_txn_date;
7130: l_txn_rec.transaction_date := inv_rec.mtl_txn_date;
7131:
7132: l_instance_rec.instance_id := nvl(p_diag_txn_rec.inst_id,fnd_api.g_miss_num);
7133: l_instance_rec.location_type_code := 'WIP';
7134: l_instance_rec.instance_usage_code := 'IN_WIP';
7135: l_instance_rec.inventory_item_id := inv_rec.item_id;
7136: l_instance_rec.serial_number := p_diag_txn_rec.serial_number;
7160: x_return_status => l_return_status,
7161: x_error_message => l_error_message);
7162: END IF;
7163:
7164: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7165: x_return_status := l_return_status;
7166: x_error_message := l_error_message;
7167: END IF;
7168:
7179: l_instance_rec csi_datastructures_pub.instance_rec;
7180: l_parties_tbl csi_datastructures_pub.party_tbl;
7181: l_pty_accts_tbl csi_datastructures_pub.party_account_tbl;
7182:
7183: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
7184: l_error_message varchar2(2000);
7185:
7186: BEGIN
7187:
7184: l_error_message varchar2(2000);
7185:
7186: BEGIN
7187:
7188: x_return_status := fnd_api.g_ret_sts_success;
7189:
7190: FOR inv_rec IN inv_cur (p_diag_txn_rec.mtl_txn_id)
7191: LOOP
7192:
7189:
7190: FOR inv_rec IN inv_cur (p_diag_txn_rec.mtl_txn_id)
7191: LOOP
7192:
7193: l_txn_rec.transaction_id := fnd_api.g_miss_num;
7194: l_txn_rec.transaction_type_id := correction_txn_type_id;
7195: l_txn_rec.source_header_ref := 'DATAFIX';
7196: l_txn_rec.source_line_ref := p_diag_txn_rec.process_code;
7197: l_txn_rec.source_line_ref_id := inv_rec.mtl_source_id;
7197: l_txn_rec.source_line_ref_id := inv_rec.mtl_source_id;
7198: l_txn_rec.source_transaction_date := inv_rec.mtl_txn_date;
7199: l_txn_rec.transaction_date := inv_rec.mtl_txn_date;
7200:
7201: l_instance_rec.instance_id := nvl(p_diag_txn_rec.inst_id,fnd_api.g_miss_num);
7202: l_instance_rec.location_type_code := 'WIP';
7203: l_instance_rec.instance_usage_code := 'IN_WIP';
7204: l_instance_rec.inventory_item_id := inv_rec.item_id;
7205: l_instance_rec.serial_number := p_diag_txn_rec.serial_number;
7229: x_return_status => l_return_status,
7230: x_error_message => l_error_message);
7231: END IF;
7232:
7233: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7234: x_return_status := l_return_status;
7235: x_error_message := l_error_message;
7236: END IF;
7237:
7248: l_instance_rec csi_datastructures_pub.instance_rec;
7249: l_parties_tbl csi_datastructures_pub.party_tbl;
7250: l_pty_accts_tbl csi_datastructures_pub.party_account_tbl;
7251:
7252: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
7253: l_error_message varchar2(2000);
7254:
7255: BEGIN
7256:
7253: l_error_message varchar2(2000);
7254:
7255: BEGIN
7256:
7257: x_return_status := fnd_api.g_ret_sts_success;
7258:
7259: FOR inv_rec IN inv_cur (p_diag_txn_rec.mtl_txn_id)
7260: LOOP
7261:
7258:
7259: FOR inv_rec IN inv_cur (p_diag_txn_rec.mtl_txn_id)
7260: LOOP
7261:
7262: l_txn_rec.transaction_id := fnd_api.g_miss_num;
7263: l_txn_rec.transaction_type_id := correction_txn_type_id;
7264: l_txn_rec.source_header_ref := 'DATAFIX';
7265: l_txn_rec.source_line_ref := p_diag_txn_rec.process_code;
7266: l_txn_rec.source_line_ref_id := inv_rec.trx_source_line_id;
7266: l_txn_rec.source_line_ref_id := inv_rec.trx_source_line_id;
7267: l_txn_rec.source_transaction_date := inv_rec.mtl_txn_date;
7268: l_txn_rec.transaction_date := inv_rec.mtl_txn_date;
7269:
7270: l_instance_rec.instance_id := nvl(p_diag_txn_rec.inst_id,fnd_api.g_miss_num);
7271: l_instance_rec.location_type_code := 'INVENTORY';
7272: l_instance_rec.instance_usage_code := 'IN_INVENTORY';
7273: l_instance_rec.inventory_item_id := inv_rec.item_id;
7274: l_instance_rec.serial_number := p_diag_txn_rec.serial_number;
7297: x_return_status => l_return_status,
7298: x_error_message => l_error_message);
7299: ELSE
7300:
7301: l_parties_tbl(1).instance_party_id := fnd_api.g_miss_num;
7302: l_parties_tbl(1).party_source_table := 'HZ_PARTIES';
7303: l_parties_tbl(1).party_id := p_diag_txn_rec.internal_party_id;
7304: l_parties_tbl(1).relationship_type_code := 'OWNER';
7305: l_parties_tbl(1).contact_flag := 'N';
7313: x_return_status => l_return_status,
7314: x_error_message => l_error_message);
7315: END IF;
7316:
7317: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7318: x_return_status := l_return_status;
7319: x_error_message := l_error_message;
7320: END IF;
7321:
7334: l_pty_accts_tbl csi_datastructures_pub.party_account_tbl;
7335:
7336: l_location_type_code varchar2(30);
7337:
7338: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
7339: l_error_message varchar2(2000);
7340:
7341: BEGIN
7342:
7339: l_error_message varchar2(2000);
7340:
7341: BEGIN
7342:
7343: x_return_status := fnd_api.g_ret_sts_success;
7344:
7345: IF p_diag_txn_rec.inst_id is not null THEN
7346:
7347: SELECT location_type_code
7351:
7352: FOR inv_rec IN inv_cur (p_diag_txn_rec.mtl_txn_id)
7353: LOOP
7354:
7355: l_txn_rec.transaction_id := fnd_api.g_miss_num;
7356: l_txn_rec.transaction_type_id := correction_txn_type_id;
7357: l_txn_rec.source_header_ref := 'DATAFIX';
7358: l_txn_rec.source_line_ref := p_diag_txn_rec.process_code;
7359: l_txn_rec.source_line_ref_id := inv_rec.trx_source_line_id;
7389: p_pty_accts_tbl => l_pty_accts_tbl,
7390: x_return_status => l_return_status,
7391: x_error_message => l_error_message);
7392:
7393: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7394: x_return_status := l_return_status;
7395: x_error_message := l_error_message;
7396: END IF;
7397:
7411: l_instance_rec csi_datastructures_pub.instance_rec;
7412: l_parties_tbl csi_datastructures_pub.party_tbl;
7413: l_pty_accts_tbl csi_datastructures_pub.party_account_tbl;
7414:
7415: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
7416: l_error_message varchar2(2000);
7417:
7418: BEGIN
7419:
7416: l_error_message varchar2(2000);
7417:
7418: BEGIN
7419:
7420: x_return_status := fnd_api.g_ret_sts_success;
7421:
7422: SELECT transfer_transaction_id
7423: INTO l_mtl_xfer_txn_id
7424: FROM mtl_material_transactions
7428: p_diag_txn_rec.mtl_txn_id,
7429: l_mtl_xfer_txn_id)
7430: LOOP
7431:
7432: l_txn_rec.transaction_id := fnd_api.g_miss_num;
7433: l_txn_rec.transaction_type_id := correction_txn_type_id;
7434: l_txn_rec.source_header_ref := 'DATAFIX';
7435: l_txn_rec.source_line_ref := p_diag_txn_rec.process_code;
7436: l_txn_rec.source_line_ref_id := inv_rec.trx_source_line_id;
7436: l_txn_rec.source_line_ref_id := inv_rec.trx_source_line_id;
7437: l_txn_rec.source_transaction_date := inv_rec.mtl_txn_date;
7438: l_txn_rec.transaction_date := inv_rec.mtl_txn_date;
7439:
7440: l_instance_rec.instance_id := nvl(p_diag_txn_rec.inst_id,fnd_api.g_miss_num);
7441: l_instance_rec.location_type_code := 'INVENTORY';
7442: l_instance_rec.instance_usage_code := 'IN_INVENTORY';
7443: l_instance_rec.inventory_item_id := inv_rec.item_id;
7444: l_instance_rec.serial_number := p_diag_txn_rec.serial_number;
7467: x_return_status => l_return_status,
7468: x_error_message => l_error_message);
7469: ELSE
7470:
7471: l_parties_tbl(1).instance_party_id := fnd_api.g_miss_num;
7472: l_parties_tbl(1).party_source_table := 'HZ_PARTIES';
7473: l_parties_tbl(1).party_id := p_diag_txn_rec.internal_party_id;
7474: l_parties_tbl(1).relationship_type_code := 'OWNER';
7475: l_parties_tbl(1).contact_flag := 'N';
7483: x_return_status => l_return_status,
7484: x_error_message => l_error_message);
7485: END IF;
7486:
7487: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7488: x_return_status := l_return_status;
7489: x_error_message := l_error_message;
7490: END IF;
7491:
7504: l_pty_accts_tbl csi_datastructures_pub.party_account_tbl;
7505:
7506: l_project_location_id number;
7507:
7508: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
7509: l_error_message varchar2(2000);
7510:
7511: BEGIN
7512:
7509: l_error_message varchar2(2000);
7510:
7511: BEGIN
7512:
7513: x_return_status := fnd_api.g_ret_sts_success;
7514:
7515: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
7516: csi_gen_utility_pvt.populate_install_param_rec;
7517: END IF;
7521:
7522: FOR inv_rec IN inv_cur (p_diag_txn_rec.mtl_txn_id)
7523: LOOP
7524:
7525: l_txn_rec.transaction_id := fnd_api.g_miss_num;
7526: l_txn_rec.transaction_type_id := correction_txn_type_id;
7527: l_txn_rec.source_header_ref := 'DATAFIX';
7528: l_txn_rec.source_line_ref := p_diag_txn_rec.process_code;
7529: l_txn_rec.source_line_ref_id := inv_rec.trx_source_line_id;
7530: l_txn_rec.source_transaction_date := inv_rec.mtl_txn_date;
7531: l_txn_rec.transaction_date := inv_rec.mtl_txn_date;
7532:
7533:
7534: l_instance_rec.instance_id := nvl(p_diag_txn_rec.inst_id,fnd_api.g_miss_num);
7535: l_instance_rec.accounting_class_code := 'PROJECT';
7536: l_instance_rec.location_type_code := 'PROJECT';
7537: l_instance_rec.location_id := l_project_location_id;
7538: l_instance_rec.pa_project_id := inv_rec.source_project_id;
7561: x_return_status => l_return_status,
7562: x_error_message => l_error_message);
7563: ELSE
7564:
7565: l_parties_tbl(1).instance_party_id := fnd_api.g_miss_num;
7566: l_parties_tbl(1).party_source_table := 'HZ_PARTIES';
7567: l_parties_tbl(1).party_id := p_diag_txn_rec.internal_party_id;
7568: l_parties_tbl(1).relationship_type_code := 'OWNER';
7569: l_parties_tbl(1).contact_flag := 'N';
7577: x_return_status => l_return_status,
7578: x_error_message => l_error_message);
7579: END IF;
7580:
7581: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7582: x_return_status := l_return_status;
7583: x_error_message := l_error_message;
7584: END IF;
7585:
7608: l_pricing_tbl csi_datastructures_pub.pricing_attribs_tbl;
7609: l_assets_tbl csi_datastructures_pub.instance_asset_tbl;
7610: l_instance_ids_list csi_datastructures_pub.id_tbl;
7611:
7612: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
7613: l_msg_data varchar2(2000);
7614: l_msg_count number;
7615: l_error_message varchar2(2000);
7616:
7617: user_error exception;
7618:
7619: BEGIN
7620:
7621: x_return_status := fnd_api.g_ret_sts_success;
7622:
7623: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
7624: csi_gen_utility_pvt.populate_install_param_rec;
7625: END IF;
7628: --
7629: FOR inv_rec IN inv_cur (p_diag_txn_rec.mtl_txn_id)
7630: LOOP
7631:
7632: l_txn_rec.transaction_id := fnd_api.g_miss_num;
7633: l_txn_rec.transaction_type_id := correction_txn_type_id;
7634: l_txn_rec.source_header_ref := 'DATAFIX';
7635: l_txn_rec.source_line_ref := p_diag_txn_rec.process_code;
7636: l_txn_rec.source_line_ref_id := inv_rec.trx_source_line_id;
7652: AND haou.organization_id = mssi.organization_id;
7653:
7654: IF l_src_serial_code in (2, 5) THEN
7655:
7656: l_instance_rec.instance_id := nvl(p_diag_txn_rec.inst_id,fnd_api.g_miss_num);
7657: l_instance_rec.location_type_code := 'INVENTORY';
7658: l_instance_rec.location_id := l_inv_location_id;
7659: l_instance_rec.instance_usage_code := 'IN_TRANSIT';
7660: l_instance_rec.inventory_item_id := inv_rec.item_id;
7678: x_return_status => l_return_status,
7679: x_error_message => l_error_message);
7680: ELSE
7681:
7682: l_parties_tbl(1).instance_party_id := fnd_api.g_miss_num;
7683: l_parties_tbl(1).party_source_table := 'HZ_PARTIES';
7684: l_parties_tbl(1).party_id := l_internal_party_id;
7685: l_parties_tbl(1).relationship_type_code := 'OWNER';
7686: l_parties_tbl(1).contact_flag := 'N';
7694: x_return_status => l_return_status,
7695: x_error_message => l_error_message);
7696: END IF;
7697:
7698: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7699: x_return_status := l_return_status;
7700: x_error_message := l_error_message;
7701: END IF;
7702: ELSIF l_src_serial_code in (1,6) THEN
7729: l_instance_rec.quantity := l_instance_quantity + 1;
7730:
7731: EXCEPTION
7732: WHEN no_data_found THEN
7733: l_instance_rec.instance_id := fnd_api.g_miss_num;
7734: l_instance_rec.quantity := 1;
7735: WHEN too_many_rows THEN
7736: x_return_status := fnd_api.g_ret_sts_error;
7737: x_error_message := 'Multiple non serial in_transit instances found.';
7732: WHEN no_data_found THEN
7733: l_instance_rec.instance_id := fnd_api.g_miss_num;
7734: l_instance_rec.quantity := 1;
7735: WHEN too_many_rows THEN
7736: x_return_status := fnd_api.g_ret_sts_error;
7737: x_error_message := 'Multiple non serial in_transit instances found.';
7738: RAISE user_error;
7739: END;
7740:
7737: x_error_message := 'Multiple non serial in_transit instances found.';
7738: RAISE user_error;
7739: END;
7740:
7741: IF nvl(l_instance_rec.instance_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
7742:
7743: l_instance_rec.active_end_date := null;
7744: l_instance_rec.instance_status_id := 3;
7745:
7744: l_instance_rec.instance_status_id := 3;
7745:
7746: csi_item_instance_pub.update_item_instance(
7747: p_api_version => 1.0,
7748: p_commit => fnd_api.g_false,
7749: p_init_msg_list => fnd_api.g_true,
7750: p_validation_level => fnd_api.g_valid_level_full,
7751: p_instance_rec => l_instance_rec,
7752: p_party_tbl => l_parties_tbl,
7745:
7746: csi_item_instance_pub.update_item_instance(
7747: p_api_version => 1.0,
7748: p_commit => fnd_api.g_false,
7749: p_init_msg_list => fnd_api.g_true,
7750: p_validation_level => fnd_api.g_valid_level_full,
7751: p_instance_rec => l_instance_rec,
7752: p_party_tbl => l_parties_tbl,
7753: p_account_tbl => l_pty_accts_tbl,
7746: csi_item_instance_pub.update_item_instance(
7747: p_api_version => 1.0,
7748: p_commit => fnd_api.g_false,
7749: p_init_msg_list => fnd_api.g_true,
7750: p_validation_level => fnd_api.g_valid_level_full,
7751: p_instance_rec => l_instance_rec,
7752: p_party_tbl => l_parties_tbl,
7753: p_account_tbl => l_pty_accts_tbl,
7754: p_org_assignments_tbl => l_org_units_tbl,
7761: x_msg_count => l_msg_count,
7762: x_msg_data => l_msg_data);
7763:
7764: -- For Bug 4057183
7765: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
7766: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
7767: x_return_status := l_return_status;
7768: x_error_message := csi_t_gen_utility_pvt.dump_error_stack;
7769: RAISE user_error;
7762: x_msg_data => l_msg_data);
7763:
7764: -- For Bug 4057183
7765: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
7766: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
7767: x_return_status := l_return_status;
7768: x_error_message := csi_t_gen_utility_pvt.dump_error_stack;
7769: RAISE user_error;
7770: END IF;
7782: l_instance_rec.inv_subinventory_name := null;
7783: l_instance_rec.inv_locator_id := null;
7784: l_instance_rec.lot_number := l_lot_number;
7785:
7786: l_parties_tbl(1).instance_party_id := fnd_api.g_miss_num;
7787: l_parties_tbl(1).instance_id := fnd_api.g_miss_num;
7788: l_parties_tbl(1).party_source_table := 'HZ_PARTIES';
7789: l_parties_tbl(1).party_id := l_internal_party_id;
7790: l_parties_tbl(1).relationship_type_code := 'OWNER';
7783: l_instance_rec.inv_locator_id := null;
7784: l_instance_rec.lot_number := l_lot_number;
7785:
7786: l_parties_tbl(1).instance_party_id := fnd_api.g_miss_num;
7787: l_parties_tbl(1).instance_id := fnd_api.g_miss_num;
7788: l_parties_tbl(1).party_source_table := 'HZ_PARTIES';
7789: l_parties_tbl(1).party_id := l_internal_party_id;
7790: l_parties_tbl(1).relationship_type_code := 'OWNER';
7791: l_parties_tbl(1).contact_flag := 'N';
7798: p_pty_accts_tbl => l_pty_accts_tbl,
7799: x_return_status => l_return_status,
7800: x_error_message => l_error_message);
7801:
7802: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7803: x_return_status := l_return_status;
7804: x_error_message := l_error_message;
7805: RAISE user_error;
7806: END IF;
7851: p_pty_accts_tbl => l_pty_accts_tbl,
7852: x_return_status => l_return_status,
7853: x_error_message => l_error_message);
7854:
7855: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7856: x_return_status := l_return_status;
7857: x_error_message := l_error_message;
7858: END IF;
7859: END IF;
7891: l_internal_party_id number;
7892: l_intransit_location_id number;
7893: l_lot_number varchar2(80);
7894:
7895: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
7896: l_msg_count number;
7897: l_msg_data varchar2(2000);
7898:
7899: l_error_message varchar2(2000);
7899: l_error_message varchar2(2000);
7900:
7901: BEGIN
7902:
7903: x_return_status := fnd_api.g_ret_sts_success;
7904:
7905: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
7906: csi_gen_utility_pvt.populate_install_param_rec;
7907: END IF;
7911: --
7912: FOR inv_rec IN inv_cur (p_diag_txn_rec.mtl_txn_id)
7913: LOOP
7914:
7915: l_txn_rec.transaction_id := fnd_api.g_miss_num;
7916: l_txn_rec.transaction_type_id := correction_txn_type_id;
7917: l_txn_rec.source_header_ref := 'DATAFIX';
7918: l_txn_rec.source_line_ref := p_diag_txn_rec.process_code;
7919: l_txn_rec.source_line_ref_id := inv_rec.trx_source_line_id;
7932: WHERE inventory_item_id = inv_rec.item_id
7933: AND organization_id = inv_rec.organization_id;
7934:
7935: IF l_src_serial_code in (2, 5, 6) THEN
7936: l_instance_rec.instance_id := nvl(p_diag_txn_rec.inst_id,fnd_api.g_miss_num);
7937:
7938: IF l_dest_serial_code = 1 THEN
7939: l_instance_rec.location_type_code := 'HZ_LOCATIONS';
7940: l_instance_rec.location_type_code := 'OUT_OF_ENTERPRISE';
7984: x_return_status => l_return_status,
7985: x_error_message => l_error_message);
7986: ELSE
7987:
7988: l_parties_tbl(1).instance_party_id := fnd_api.g_miss_num;
7989: l_parties_tbl(1).party_source_table := 'HZ_PARTIES';
7990: l_parties_tbl(1).party_id := l_internal_party_id;
7991: l_parties_tbl(1).relationship_type_code := 'OWNER';
7992: l_parties_tbl(1).contact_flag := 'N';
8000: x_return_status => l_return_status,
8001: x_error_message => l_error_message);
8002: END IF;
8003:
8004: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8005: x_return_status := l_return_status;
8006: x_error_message := l_error_message;
8007: END IF;
8008:
8032: l_instance_rec.quantity := l_instance_quantity + inv_rec.quantity;
8033:
8034: EXCEPTION
8035: WHEN no_data_found THEN
8036: l_instance_rec.instance_id := fnd_api.g_miss_num;
8037: l_instance_rec.object_version_number := 1;
8038: l_instance_rec.quantity := inv_rec.quantity;
8039: END;
8040:
8053: WHEN no_data_found THEN
8054: l_instance_rec.in_transit_order_line_id := inv_rec.trx_source_line_id;
8055: END;
8056:
8057: IF nvl(l_instance_rec.instance_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
8058:
8059: l_instance_rec.active_end_date := null;
8060: l_instance_rec.instance_status_id := 3;
8061:
8060: l_instance_rec.instance_status_id := 3;
8061:
8062: csi_item_instance_pub.update_item_instance(
8063: p_api_version => 1.0,
8064: p_commit => fnd_api.g_false,
8065: p_init_msg_list => fnd_api.g_true,
8066: p_validation_level => fnd_api.g_valid_level_full,
8067: p_instance_rec => l_instance_rec,
8068: p_party_tbl => l_parties_tbl,
8061:
8062: csi_item_instance_pub.update_item_instance(
8063: p_api_version => 1.0,
8064: p_commit => fnd_api.g_false,
8065: p_init_msg_list => fnd_api.g_true,
8066: p_validation_level => fnd_api.g_valid_level_full,
8067: p_instance_rec => l_instance_rec,
8068: p_party_tbl => l_parties_tbl,
8069: p_account_tbl => l_pty_accts_tbl,
8062: csi_item_instance_pub.update_item_instance(
8063: p_api_version => 1.0,
8064: p_commit => fnd_api.g_false,
8065: p_init_msg_list => fnd_api.g_true,
8066: p_validation_level => fnd_api.g_valid_level_full,
8067: p_instance_rec => l_instance_rec,
8068: p_party_tbl => l_parties_tbl,
8069: p_account_tbl => l_pty_accts_tbl,
8070: p_org_assignments_tbl => l_org_units_tbl,
8077: x_msg_count => l_msg_count,
8078: x_msg_data => l_msg_data);
8079:
8080: -- For Bug 4057183
8081: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
8082: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
8083: x_return_status := l_return_status;
8084: x_error_message := csi_t_gen_utility_pvt.dump_error_stack;
8085: END IF;
8078: x_msg_data => l_msg_data);
8079:
8080: -- For Bug 4057183
8081: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
8082: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
8083: x_return_status := l_return_status;
8084: x_error_message := csi_t_gen_utility_pvt.dump_error_stack;
8085: END IF;
8086:
8097: l_instance_rec.inv_subinventory_name := null;
8098: l_instance_rec.inv_locator_id := null;
8099: l_instance_rec.lot_number := null;
8100:
8101: l_parties_tbl(1).instance_party_id := fnd_api.g_miss_num;
8102: l_parties_tbl(1).instance_id := fnd_api.g_miss_num;
8103: l_parties_tbl(1).party_source_table := 'HZ_PARTIES';
8104: l_parties_tbl(1).party_id := l_internal_party_id;
8105: l_parties_tbl(1).relationship_type_code := 'OWNER';
8098: l_instance_rec.inv_locator_id := null;
8099: l_instance_rec.lot_number := null;
8100:
8101: l_parties_tbl(1).instance_party_id := fnd_api.g_miss_num;
8102: l_parties_tbl(1).instance_id := fnd_api.g_miss_num;
8103: l_parties_tbl(1).party_source_table := 'HZ_PARTIES';
8104: l_parties_tbl(1).party_id := l_internal_party_id;
8105: l_parties_tbl(1).relationship_type_code := 'OWNER';
8106: l_parties_tbl(1).contact_flag := 'N';
8114: x_return_status => l_return_status,
8115: x_error_message => l_error_message);
8116: END IF;
8117:
8118: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8119: x_return_status := l_return_status;
8120: x_error_message := l_error_message;
8121: END IF;
8122:
8187: l_instance_id number;
8188: l_quantity number;
8189: l_object_version_number number;
8190:
8191: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
8192: l_error_message varchar2(2000);
8193: l_msg_data varchar2(2000);
8194: l_msg_count number;
8195:
8194: l_msg_count number;
8195:
8196: BEGIN
8197:
8198: x_return_status := fnd_api.g_ret_sts_success;
8199:
8200: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
8201: csi_gen_utility_pvt.populate_install_param_rec;
8202: END IF;
8224: FROM mtl_system_items
8225: WHERE inventory_item_id = inv_rec.item_id
8226: AND organization_id = inv_rec.xfer_organization_id;
8227:
8228: l_txn_rec.transaction_id := fnd_api.g_miss_num;
8229: l_txn_rec.transaction_type_id := correction_txn_type_id;
8230: l_txn_rec.source_header_ref := 'DATAFIX';
8231: l_txn_rec.source_line_ref := p_diag_txn_rec.process_code;
8232: l_txn_rec.source_line_ref_id := inv_rec.trx_source_line_id;
8234: l_txn_rec.transaction_date := inv_rec.mtl_txn_date;
8235:
8236: IF l_src_serial_code in (2, 5) THEN
8237:
8238: l_instance_rec.instance_id := nvl(p_diag_txn_rec.inst_id,fnd_api.g_miss_num);
8239: l_instance_rec.location_type_code := 'INVENTORY';
8240: l_instance_rec.instance_usage_code := 'IN_INVENTORY';
8241: l_instance_rec.inventory_item_id := inv_rec.item_id;
8242: l_instance_rec.serial_number := p_diag_txn_rec.serial_number;
8265: x_return_status => l_return_status,
8266: x_error_message => l_error_message);
8267: ELSE
8268:
8269: l_parties_tbl(1).instance_party_id := fnd_api.g_miss_num;
8270: l_parties_tbl(1).party_source_table := 'HZ_PARTIES';
8271: l_parties_tbl(1).party_id := l_internal_party_id;
8272: l_parties_tbl(1).relationship_type_code := 'OWNER';
8273: l_parties_tbl(1).contact_flag := 'N';
8281: x_return_status => l_return_status,
8282: x_error_message => l_error_message);
8283: END IF;
8284:
8285: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8286: x_return_status := l_return_status;
8287: x_error_message := l_error_message;
8288: END IF;
8289: ELSE
8323: AND serial_number is null;
8324:
8325: EXCEPTION
8326: WHEN no_data_found THEN
8327: l_instance_id := fnd_api.g_miss_num;
8328: WHEN too_many_rows THEN
8329: stack_message('Too many inventory instances for this non srl item.');
8330: raise fnd_api.g_exc_error;
8331: END;
8326: WHEN no_data_found THEN
8327: l_instance_id := fnd_api.g_miss_num;
8328: WHEN too_many_rows THEN
8329: stack_message('Too many inventory instances for this non srl item.');
8330: raise fnd_api.g_exc_error;
8331: END;
8332:
8333: IF nvl(l_instance_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
8334:
8329: stack_message('Too many inventory instances for this non srl item.');
8330: raise fnd_api.g_exc_error;
8331: END;
8332:
8333: IF nvl(l_instance_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
8334:
8335: l_instance_rec.instance_id := l_instance_id;
8336: l_instance_rec.quantity := l_quantity + stage_rec.quantity;
8337: l_instance_rec.object_version_number := l_object_version_number;
8339: l_instance_rec.instance_status_id := 3;
8340:
8341: csi_item_instance_pub.update_item_instance(
8342: p_api_version => 1.0,
8343: p_commit => fnd_api.g_false,
8344: p_init_msg_list => fnd_api.g_true,
8345: p_validation_level => fnd_api.g_valid_level_full,
8346: p_instance_rec => l_instance_rec,
8347: p_party_tbl => l_parties_tbl,
8340:
8341: csi_item_instance_pub.update_item_instance(
8342: p_api_version => 1.0,
8343: p_commit => fnd_api.g_false,
8344: p_init_msg_list => fnd_api.g_true,
8345: p_validation_level => fnd_api.g_valid_level_full,
8346: p_instance_rec => l_instance_rec,
8347: p_party_tbl => l_parties_tbl,
8348: p_account_tbl => l_pty_accts_tbl,
8341: csi_item_instance_pub.update_item_instance(
8342: p_api_version => 1.0,
8343: p_commit => fnd_api.g_false,
8344: p_init_msg_list => fnd_api.g_true,
8345: p_validation_level => fnd_api.g_valid_level_full,
8346: p_instance_rec => l_instance_rec,
8347: p_party_tbl => l_parties_tbl,
8348: p_account_tbl => l_pty_accts_tbl,
8349: p_org_assignments_tbl => l_org_units_tbl,
8358:
8359: log(' update_item_instance:nsrl: '||l_return_status);
8360:
8361: -- For Bug 4057183
8362: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
8363: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
8364: raise fnd_api.g_exc_error;
8365: END IF;
8366:
8359: log(' update_item_instance:nsrl: '||l_return_status);
8360:
8361: -- For Bug 4057183
8362: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
8363: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
8364: raise fnd_api.g_exc_error;
8365: END IF;
8366:
8367: ELSE
8360:
8361: -- For Bug 4057183
8362: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
8363: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
8364: raise fnd_api.g_exc_error;
8365: END IF;
8366:
8367: ELSE
8368:
8365: END IF;
8366:
8367: ELSE
8368:
8369: l_instance_rec.instance_id := fnd_api.g_miss_num;
8370: l_instance_rec.location_type_code := 'INVENTORY';
8371: l_instance_rec.instance_usage_code := 'IN_INVENTORY';
8372: l_instance_rec.inventory_item_id := stage_rec.item_id;
8373: l_instance_rec.inv_organization_id := stage_rec.organization_id;
8387: WHERE mssi.organization_id = l_instance_rec.inv_organization_id
8388: AND mssi.secondary_inventory_name = l_instance_rec.inv_subinventory_name
8389: AND haou.organization_id = mssi.organization_id;
8390:
8391: l_parties_tbl(1).instance_party_id := fnd_api.g_miss_num;
8392: l_parties_tbl(1).party_source_table := 'HZ_PARTIES';
8393: l_parties_tbl(1).party_id := l_internal_party_id;
8394: l_parties_tbl(1).relationship_type_code := 'OWNER';
8395: l_parties_tbl(1).contact_flag := 'N';
8396: l_parties_tbl(1).object_version_number := 1.0;
8397:
8398: csi_item_instance_pub.create_item_instance(
8399: p_api_version => 1.0,
8400: p_commit => fnd_api.g_false,
8401: p_init_msg_list => fnd_api.g_true,
8402: p_validation_level => fnd_api.g_valid_level_full,
8403: p_instance_rec => l_instance_rec,
8404: p_party_tbl => l_parties_tbl,
8397:
8398: csi_item_instance_pub.create_item_instance(
8399: p_api_version => 1.0,
8400: p_commit => fnd_api.g_false,
8401: p_init_msg_list => fnd_api.g_true,
8402: p_validation_level => fnd_api.g_valid_level_full,
8403: p_instance_rec => l_instance_rec,
8404: p_party_tbl => l_parties_tbl,
8405: p_account_tbl => l_pty_accts_tbl,
8398: csi_item_instance_pub.create_item_instance(
8399: p_api_version => 1.0,
8400: p_commit => fnd_api.g_false,
8401: p_init_msg_list => fnd_api.g_true,
8402: p_validation_level => fnd_api.g_valid_level_full,
8403: p_instance_rec => l_instance_rec,
8404: p_party_tbl => l_parties_tbl,
8405: p_account_tbl => l_pty_accts_tbl,
8406: p_org_assignments_tbl => l_org_units_tbl,
8414:
8415: log(' create_item_instance:nsrl: '||l_return_status);
8416:
8417: -- For Bug 4057183
8418: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
8419: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
8420: raise fnd_api.g_exc_error;
8421: END IF;
8422:
8415: log(' create_item_instance:nsrl: '||l_return_status);
8416:
8417: -- For Bug 4057183
8418: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
8419: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
8420: raise fnd_api.g_exc_error;
8421: END IF;
8422:
8423: END IF;
8416:
8417: -- For Bug 4057183
8418: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
8419: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
8420: raise fnd_api.g_exc_error;
8421: END IF;
8422:
8423: END IF;
8424: EXCEPTION
8421: END IF;
8422:
8423: END IF;
8424: EXCEPTION
8425: WHEN fnd_api.g_exc_error THEN
8426: x_return_status := fnd_api.g_ret_sts_error;
8427: x_error_message := csi_t_gen_utility_pvt.dump_error_stack;
8428: log(' error: '||x_error_message);
8429: END;
8422:
8423: END IF;
8424: EXCEPTION
8425: WHEN fnd_api.g_exc_error THEN
8426: x_return_status := fnd_api.g_ret_sts_error;
8427: x_error_message := csi_t_gen_utility_pvt.dump_error_stack;
8428: log(' error: '||x_error_message);
8429: END;
8430: END LOOP;
8429: END;
8430: END LOOP;
8431:
8432: -- handle soi destination instance
8433: IF nvl(p_diag_txn_rec.inst_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
8434: IF l_src_serial_code = 6 THEN
8435:
8436: init_plsql_tables(
8437: px_instance_rec => l_instance_rec,
8481: p_pty_accts_tbl => l_pty_accts_tbl,
8482: x_return_status => l_return_status,
8483: x_error_message => l_error_message);
8484:
8485: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8486: x_return_status := l_return_status;
8487: x_error_message := l_error_message;
8488: END IF;
8489:
8497:
8498: PROCEDURE fix_all(
8499: p_diag_txn_rec IN diag_txn_rec)
8500: IS
8501: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
8502: l_error_message varchar2(2000);
8503: l_fixed boolean := FALSE;
8504: BEGIN
8505:
8594: x_return_status => l_return_status,
8595: x_error_message => l_error_message);
8596: END IF;
8597:
8598: IF l_return_status = fnd_api.g_ret_sts_success THEN
8599: UPDATE csi_diagnostics_temp
8600: SET process_flag = 'P'
8601: WHERE diag_seq_id = p_diag_txn_rec.diag_seq_id;
8602:
8952: WHEN no_data_found THEN
8953: null;
8954: END;
8955:
8956: l_instance_rec.instance_id := fnd_api.g_miss_num;
8957: l_instance_rec.inventory_item_id := srl_rec.inventory_item_id;
8958: l_instance_rec.serial_number := srl_rec.serial_number;
8959: l_instance_rec.lot_number := srl_rec.lot_number;
8960: l_instance_rec.mfg_serial_number_flag := 'Y';
9034: */
9035:
9036: l_latest_txn := TRUE;
9037:
9038: l_txn_rec.transaction_id := fnd_api.g_miss_num;
9039: l_txn_rec.transaction_type_id := correction_txn_type_id;
9040: l_txn_rec.source_header_ref := 'DATAFIX';
9041: l_txn_rec.source_line_ref := 'SRLSYNC';
9042: l_txn_rec.source_transaction_date := sysdate;
9151: log(' Owner Party ID : '||l_owner_party_id);
9152: log(' Owner Account ID: '||l_owner_account_id);
9153:
9154: IF l_change_owner_flag = 'Y' THEN
9155: l_parties_tbl(1).instance_party_id := fnd_api.g_miss_num;
9156: l_parties_tbl(1).party_source_table := 'HZ_PARTIES';
9157: l_parties_tbl(1).party_id := l_internal_party_id;
9158: l_parties_tbl(1).relationship_type_code := 'OWNER';
9159: l_parties_tbl(1).contact_flag := 'N';
9158: l_parties_tbl(1).relationship_type_code := 'OWNER';
9159: l_parties_tbl(1).contact_flag := 'N';
9160: l_parties_tbl(1).object_version_number := 1.0;
9161: ELSE
9162: l_parties_tbl(1).instance_party_id := fnd_api.g_miss_num;
9163: l_parties_tbl(1).party_source_table := 'HZ_PARTIES';
9164: l_parties_tbl(1).party_id := l_owner_party_id;
9165: l_parties_tbl(1).relationship_type_code := 'OWNER';
9166: l_parties_tbl(1).contact_flag := 'N';
9165: l_parties_tbl(1).relationship_type_code := 'OWNER';
9166: l_parties_tbl(1).contact_flag := 'N';
9167: l_parties_tbl(1).object_version_number := 1.0;
9168:
9169: l_pty_accts_tbl(1).ip_account_id := fnd_api.g_miss_num;
9170: l_pty_accts_tbl(1).party_account_id := l_owner_account_id;
9171: l_pty_accts_tbl(1).relationship_type_code := 'OWNER';
9172: l_pty_accts_tbl(1).bill_to_address := fnd_api.g_miss_num;
9173: l_pty_accts_tbl(1).ship_to_address := fnd_api.g_miss_num;
9168:
9169: l_pty_accts_tbl(1).ip_account_id := fnd_api.g_miss_num;
9170: l_pty_accts_tbl(1).party_account_id := l_owner_account_id;
9171: l_pty_accts_tbl(1).relationship_type_code := 'OWNER';
9172: l_pty_accts_tbl(1).bill_to_address := fnd_api.g_miss_num;
9173: l_pty_accts_tbl(1).ship_to_address := fnd_api.g_miss_num;
9174: l_pty_accts_tbl(1).instance_party_id := fnd_api.g_miss_num;
9175: l_pty_accts_tbl(1).parent_tbl_index := 1;
9176:
9169: l_pty_accts_tbl(1).ip_account_id := fnd_api.g_miss_num;
9170: l_pty_accts_tbl(1).party_account_id := l_owner_account_id;
9171: l_pty_accts_tbl(1).relationship_type_code := 'OWNER';
9172: l_pty_accts_tbl(1).bill_to_address := fnd_api.g_miss_num;
9173: l_pty_accts_tbl(1).ship_to_address := fnd_api.g_miss_num;
9174: l_pty_accts_tbl(1).instance_party_id := fnd_api.g_miss_num;
9175: l_pty_accts_tbl(1).parent_tbl_index := 1;
9176:
9177: END IF;
9170: l_pty_accts_tbl(1).party_account_id := l_owner_account_id;
9171: l_pty_accts_tbl(1).relationship_type_code := 'OWNER';
9172: l_pty_accts_tbl(1).bill_to_address := fnd_api.g_miss_num;
9173: l_pty_accts_tbl(1).ship_to_address := fnd_api.g_miss_num;
9174: l_pty_accts_tbl(1).instance_party_id := fnd_api.g_miss_num;
9175: l_pty_accts_tbl(1).parent_tbl_index := 1;
9176:
9177: END IF;
9178:
9202: log(' csi_item_instance_pub.update_item_instance');
9203:
9204: csi_item_instance_pub.update_item_instance(
9205: p_api_version => 1.0,
9206: p_commit => fnd_api.g_false,
9207: p_init_msg_list => fnd_api.g_true,
9208: p_validation_level => fnd_api.g_valid_level_full,
9209: p_instance_rec => l_instance_rec,
9210: p_party_tbl => l_parties_tbl,
9203:
9204: csi_item_instance_pub.update_item_instance(
9205: p_api_version => 1.0,
9206: p_commit => fnd_api.g_false,
9207: p_init_msg_list => fnd_api.g_true,
9208: p_validation_level => fnd_api.g_valid_level_full,
9209: p_instance_rec => l_instance_rec,
9210: p_party_tbl => l_parties_tbl,
9211: p_account_tbl => l_pty_accts_tbl,
9204: csi_item_instance_pub.update_item_instance(
9205: p_api_version => 1.0,
9206: p_commit => fnd_api.g_false,
9207: p_init_msg_list => fnd_api.g_true,
9208: p_validation_level => fnd_api.g_valid_level_full,
9209: p_instance_rec => l_instance_rec,
9210: p_party_tbl => l_parties_tbl,
9211: p_account_tbl => l_pty_accts_tbl,
9212: p_org_assignments_tbl => l_org_units_tbl,
9219: x_msg_count => l_msg_count,
9220: x_msg_data => l_msg_data);
9221:
9222: -- For Bug 4057183
9223: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
9224: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
9225: raise fnd_api.g_exc_error;
9226: END IF;
9227:
9220: x_msg_data => l_msg_data);
9221:
9222: -- For Bug 4057183
9223: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
9224: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
9225: raise fnd_api.g_exc_error;
9226: END IF;
9227:
9228: ELSE -- instance not found
9221:
9222: -- For Bug 4057183
9223: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
9224: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
9225: raise fnd_api.g_exc_error;
9226: END IF;
9227:
9228: ELSE -- instance not found
9229:
9230: log(' csi_item_instance_pub.create_item_instance');
9231:
9232: csi_item_instance_pub.create_item_instance(
9233: p_api_version => 1.0,
9234: p_commit => fnd_api.g_false,
9235: p_init_msg_list => fnd_api.g_true,
9236: p_validation_level => fnd_api.g_valid_level_full,
9237: p_instance_rec => l_instance_rec,
9238: p_party_tbl => l_parties_tbl,
9231:
9232: csi_item_instance_pub.create_item_instance(
9233: p_api_version => 1.0,
9234: p_commit => fnd_api.g_false,
9235: p_init_msg_list => fnd_api.g_true,
9236: p_validation_level => fnd_api.g_valid_level_full,
9237: p_instance_rec => l_instance_rec,
9238: p_party_tbl => l_parties_tbl,
9239: p_account_tbl => l_pty_accts_tbl,
9232: csi_item_instance_pub.create_item_instance(
9233: p_api_version => 1.0,
9234: p_commit => fnd_api.g_false,
9235: p_init_msg_list => fnd_api.g_true,
9236: p_validation_level => fnd_api.g_valid_level_full,
9237: p_instance_rec => l_instance_rec,
9238: p_party_tbl => l_parties_tbl,
9239: p_account_tbl => l_pty_accts_tbl,
9240: p_org_assignments_tbl => l_org_units_tbl,
9246: x_msg_count => l_msg_count,
9247: x_msg_data => l_msg_data );
9248:
9249: -- For Bug 4057183
9250: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
9251: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
9252: raise fnd_api.g_exc_error;
9253: END IF;
9254:
9247: x_msg_data => l_msg_data );
9248:
9249: -- For Bug 4057183
9250: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
9251: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
9252: raise fnd_api.g_exc_error;
9253: END IF;
9254:
9255: END IF;
9248:
9249: -- For Bug 4057183
9250: -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
9251: IF l_return_status not in (fnd_api.g_ret_sts_success,'W') THEN
9252: raise fnd_api.g_exc_error;
9253: END IF;
9254:
9255: END IF;
9256:
9262: fill(to_char(srl_rec.organization_id), 9)||
9263: fill(to_char(srl_rec.serial_code), 2)||
9264: fill(to_char(srl_rec.lot_code), 2));
9265: log(l_skip_error);
9266: WHEN fnd_api.g_exc_error THEN
9267: l_error_message := csi_t_gen_utility_pvt.dump_error_stack;
9268: log(fill(srl_rec.serial_number, 15)||
9269: fill(to_char(srl_rec.inventory_item_id), 9)||
9270: fill(to_char(srl_rec.organization_id), 9)||
9981: vld_org_id_mig NumTabType;
9982: order_line_id_mig NumTabType;
9983: l_schema_name varchar2(30);
9984: l_object_name varchar2(80);
9985: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
9986: l_sql_stmt varchar2(2000);
9987: --
9988: Type V30Type is VARRAY(10000) of VARCHAR2(30);
9989: serial_number_mig V30Type;
9997: p_product_short_name => 'CS',
9998: x_schema_name => l_schema_name,
9999: x_return_status => l_return_status);
10000:
10001: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10002: RETURN;
10003: END IF;
10004: --
10005: l_object_name := l_schema_name||'.CS_CUSTOMER_PRODUCTS_ALL_OLD cp';
10183: v_freeze_date DATE;
10184: v_rev VARCHAR2(3);
10185: l_schema_name varchar2(30);
10186: l_object_name varchar2(80);
10187: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
10188: l_sql_stmt varchar2(2000);
10189: --
10190: BEGIN
10191: get_schema_name(
10192: p_product_short_name => 'CS',
10193: x_schema_name => l_schema_name,
10194: x_return_status => l_return_status);
10195: --
10196: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10197: RETURN;
10198: END IF;
10199: --
10200: l_object_name := l_schema_name||'.CS_CUSTOMER_PRODUCTS_ALL_OLD cp';
10864: ,x_msg_count => x_msg_count
10865: ,x_msg_data => x_msg_data
10866: );
10867: --
10868: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10869: Raise Comp_error;
10870: END IF;
10871: Exception
10872: when Process_next then
10882: --
10883: OKS_IBINT_PUB.IB_interface
10884: (
10885: P_Api_Version => 1.0,
10886: P_init_msg_list => fnd_api.g_true,
10887: P_single_txn_date_flag => 'Y',
10888: P_Batch_type => NULL,
10889: P_Batch_ID => NULL,
10890: P_OKS_Txn_Inst_tbl => px_oks_txn_inst_tbl,
10892: x_msg_count => x_msg_count,
10893: x_msg_data => x_msg_data
10894: );
10895: --
10896: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
10897: Raise Comp_error;
10898: END IF;
10899: END IF;
10900: commit;
11185: ,x_msg_count => x_msg_count
11186: ,x_msg_data => x_msg_data
11187: );
11188: --
11189: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11190: UPDATE CSI_EXPIRE_INSTANCES_TEMP
11191: set processed_flag = 'E',
11192: error_message = x_msg_data
11193: where rowid = exp.rowid;
11213: IF px_oks_txn_inst_tbl.count > 0 THEN
11214: OKS_IBINT_PUB.IB_interface
11215: (
11216: P_Api_Version => 1.0,
11217: P_init_msg_list => fnd_api.g_true,
11218: P_single_txn_date_flag => 'Y',
11219: P_Batch_type => NULL,
11220: P_Batch_ID => NULL,
11221: P_OKS_Txn_Inst_tbl => px_oks_txn_inst_tbl,
13380: l_error_message varchar2(2000);
13381:
13382: l_msg_count number;
13383: l_msg_data varchar2(2000);
13384: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
13385:
13386: CURSOR soisrl_cur IS
13387: SELECT msn.serial_number,
13388: msn.inventory_item_id,
13403: END IF;
13404: --
13405: l_internal_party_id := csi_datastructures_pub.g_install_param_rec.internal_party_id;
13406: --
13407: l_txn_rec.transaction_id := fnd_api.g_miss_num;
13408: l_txn_rec.transaction_type_id := correction_txn_type_id;
13409: l_txn_rec.source_header_ref := 'DATAFIX';
13410: l_txn_rec.source_line_ref := 'SRLSOI RETURNED FIX';
13411: l_txn_rec.source_transaction_date := sysdate;
13522: IF l_change_owner_flag = 'Y' THEN
13523: l_instance_rec.active_end_date := sysdate;
13524:
13525: -- build internal party record
13526: l_parties_tbl(1).instance_party_id := fnd_api.g_miss_num;
13527: l_parties_tbl(1).party_source_table := 'HZ_PARTIES';
13528: l_parties_tbl(1).party_id := l_internal_party_id;
13529: l_parties_tbl(1).relationship_type_code := 'OWNER';
13530: l_parties_tbl(1).contact_flag := 'N';
15174: l_loop_count := 0;
15175: l_inst_ref := 0;
15176: FOR tld_rec in tld_cur(csi_rec.trx_source_line_id)
15177: LOOP
15178: IF nvl(tld_rec.instance_id, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
15179: l_inst_ref := 1;
15180: --
15181: END IF;
15182: l_loop_count := l_loop_count + 1;
15506: -- if not found then
15507:
15508: IF l_transaction_line_id is null THEN
15509: -- create transaction details
15510: l_line_rec.transaction_line_id := fnd_api.g_miss_num;
15511: l_line_rec.source_transaction_type_id := 53;
15512: l_line_rec.source_transaction_id := l_rma_txn_tbl(i).mtl_src_line_id;
15513: l_line_rec.source_transaction_table := 'OE_ORDER_LINES_ALL';
15514: l_line_rec.inv_material_txn_flag := 'Y';
15514: l_line_rec.inv_material_txn_flag := 'Y';
15515: l_line_rec.object_version_number := 1.0;
15516:
15517: -- transaction line details table
15518: l_line_dtl_tbl(1).transaction_line_id := fnd_api.g_miss_num;
15519: l_line_dtl_tbl(1).txn_line_detail_id := fnd_api.g_miss_num;
15520: l_line_dtl_tbl(1).sub_type_id := l_sub_type_id;
15521: l_line_dtl_tbl(1).instance_exists_flag := 'Y';
15522: l_line_dtl_tbl(1).instance_id := l_instance_tbl(j).instance_id;
15515: l_line_rec.object_version_number := 1.0;
15516:
15517: -- transaction line details table
15518: l_line_dtl_tbl(1).transaction_line_id := fnd_api.g_miss_num;
15519: l_line_dtl_tbl(1).txn_line_detail_id := fnd_api.g_miss_num;
15520: l_line_dtl_tbl(1).sub_type_id := l_sub_type_id;
15521: l_line_dtl_tbl(1).instance_exists_flag := 'Y';
15522: l_line_dtl_tbl(1).instance_id := l_instance_tbl(j).instance_id;
15523: l_line_dtl_tbl(1).source_transaction_flag := 'Y';
15530: l_line_dtl_tbl(1).preserve_detail_flag := 'Y';
15531: l_line_dtl_tbl(1).object_version_number := 1.0;
15532:
15533: IF l_change_owner = 'Y' THEN
15534: l_pty_dtl_tbl(1).txn_party_detail_id := fnd_api.g_miss_num;
15535: l_pty_dtl_tbl(1).txn_line_detail_id := fnd_api.g_miss_num;
15536: l_pty_dtl_tbl(1).party_source_table := 'HZ_PARTIES';
15537: l_pty_dtl_tbl(1).party_source_id := l_internal_party_id;
15538: l_pty_dtl_tbl(1).relationship_type_code := 'OWNER';
15531: l_line_dtl_tbl(1).object_version_number := 1.0;
15532:
15533: IF l_change_owner = 'Y' THEN
15534: l_pty_dtl_tbl(1).txn_party_detail_id := fnd_api.g_miss_num;
15535: l_pty_dtl_tbl(1).txn_line_detail_id := fnd_api.g_miss_num;
15536: l_pty_dtl_tbl(1).party_source_table := 'HZ_PARTIES';
15537: l_pty_dtl_tbl(1).party_source_id := l_internal_party_id;
15538: l_pty_dtl_tbl(1).relationship_type_code := 'OWNER';
15539: l_pty_dtl_tbl(1).contact_flag := 'N';
15548: WHERE instance_id = l_instance_tbl(j).instance_id
15549: AND relationship_type_code = 'OWNER';
15550: EXCEPTION
15551: WHEN no_data_found THEN
15552: l_pty_dtl_tbl(1).instance_party_id := fnd_api.g_miss_num;
15553: END;
15554: END IF;
15555:
15556: -- api call
15555:
15556: -- api call
15557: csi_t_txn_details_grp.create_transaction_dtls(
15558: p_api_version => 1.0,
15559: p_commit => fnd_api.g_false,
15560: p_init_msg_list => fnd_api.g_true,
15561: p_validation_level => fnd_api.g_valid_level_full,
15562: px_txn_line_rec => l_line_rec,
15563: px_txn_line_detail_tbl => l_line_dtl_tbl,
15556: -- api call
15557: csi_t_txn_details_grp.create_transaction_dtls(
15558: p_api_version => 1.0,
15559: p_commit => fnd_api.g_false,
15560: p_init_msg_list => fnd_api.g_true,
15561: p_validation_level => fnd_api.g_valid_level_full,
15562: px_txn_line_rec => l_line_rec,
15563: px_txn_line_detail_tbl => l_line_dtl_tbl,
15564: px_txn_party_detail_tbl => l_pty_dtl_tbl,
15557: csi_t_txn_details_grp.create_transaction_dtls(
15558: p_api_version => 1.0,
15559: p_commit => fnd_api.g_false,
15560: p_init_msg_list => fnd_api.g_true,
15561: p_validation_level => fnd_api.g_valid_level_full,
15562: px_txn_line_rec => l_line_rec,
15563: px_txn_line_detail_tbl => l_line_dtl_tbl,
15564: px_txn_party_detail_tbl => l_pty_dtl_tbl,
15565: px_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
15570: x_return_status => l_return_status,
15571: x_msg_count => l_msg_count,
15572: x_msg_data => l_msg_data);
15573:
15574: IF l_return_status <> fnd_api.g_ret_sts_success THEN
15575: RAISE fnd_api.g_exc_error;
15576: END IF;
15577:
15578: l_processed_flag := 'Y';
15571: x_msg_count => l_msg_count,
15572: x_msg_data => l_msg_data);
15573:
15574: IF l_return_status <> fnd_api.g_ret_sts_success THEN
15575: RAISE fnd_api.g_exc_error;
15576: END IF;
15577:
15578: l_processed_flag := 'Y';
15579: -- else check if count of source line detail
15641: CLOSE rma_cur;
15642: END IF;
15643:
15644: EXCEPTION
15645: WHEN fnd_api.g_exc_error THEN
15646: null;
15647: WHEN others THEN
15648: null;
15649: log(' Other Error:'||substr(sqlerrm, 1,250));
16038: l_prev_rec.old_relationship_type_code := l_org_hist_tbl(j).old_relationship_type_code;
16039: l_prev_rec.new_relationship_type_code := l_org_hist_tbl(j).new_relationship_type_code;
16040: END IF;
16041: --
16042: IF nvl(l_org_hist_tbl(j).old_active_start_date,fnd_api.g_miss_date) <>
16043: nvl(l_org_hist_tbl(j).new_active_start_date,fnd_api.g_miss_date) THEN
16044: l_prev_rec.old_active_start_date := l_org_hist_tbl(j).old_active_start_date;
16045: l_prev_rec.new_active_start_date := l_org_hist_tbl(j).new_active_start_date;
16046: END IF;
16039: l_prev_rec.new_relationship_type_code := l_org_hist_tbl(j).new_relationship_type_code;
16040: END IF;
16041: --
16042: IF nvl(l_org_hist_tbl(j).old_active_start_date,fnd_api.g_miss_date) <>
16043: nvl(l_org_hist_tbl(j).new_active_start_date,fnd_api.g_miss_date) THEN
16044: l_prev_rec.old_active_start_date := l_org_hist_tbl(j).old_active_start_date;
16045: l_prev_rec.new_active_start_date := l_org_hist_tbl(j).new_active_start_date;
16046: END IF;
16047: --
16044: l_prev_rec.old_active_start_date := l_org_hist_tbl(j).old_active_start_date;
16045: l_prev_rec.new_active_start_date := l_org_hist_tbl(j).new_active_start_date;
16046: END IF;
16047: --
16048: IF nvl(l_org_hist_tbl(j).old_active_end_date,fnd_api.g_miss_date) <>
16049: nvl(l_org_hist_tbl(j).new_active_end_date,fnd_api.g_miss_date) THEN
16050: l_prev_rec.old_active_end_date := l_org_hist_tbl(j).old_active_end_date;
16051: l_prev_rec.new_active_end_date := l_org_hist_tbl(j).new_active_end_date;
16052: END IF;
16045: l_prev_rec.new_active_start_date := l_org_hist_tbl(j).new_active_start_date;
16046: END IF;
16047: --
16048: IF nvl(l_org_hist_tbl(j).old_active_end_date,fnd_api.g_miss_date) <>
16049: nvl(l_org_hist_tbl(j).new_active_end_date,fnd_api.g_miss_date) THEN
16050: l_prev_rec.old_active_end_date := l_org_hist_tbl(j).old_active_end_date;
16051: l_prev_rec.new_active_end_date := l_org_hist_tbl(j).new_active_end_date;
16052: END IF;
16053: --