3226:
3227: truncate_table(l_object_name);
3228:
3229: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
3230: csi_gen_utility_pvt.populate_install_param_rec;
3231: END IF;
3232:
3233: l_freeze_date := csi_datastructures_pub.g_install_param_rec.freeze_date;
3234:
3431: INTO l_release
3432: FROM sys.dual;
3433: --
3434: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
3435: csi_gen_utility_pvt.populate_install_param_rec;
3436: END IF;
3437: --
3438: l_freeze_date := csi_datastructures_pub.g_install_param_rec.freeze_date;
3439: --
3715:
3716: BEGIN
3717:
3718: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
3719: csi_gen_utility_pvt.populate_install_param_rec;
3720: END IF;
3721: --
3722: l_freeze_date := csi_datastructures_pub.g_install_param_rec.freeze_date;
3723: --
3805:
3806: log(date_time_stamp||' begin pump_err_missing_txn');
3807:
3808: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
3809: csi_gen_utility_pvt.populate_install_param_rec;
3810: END IF;
3811: --
3812: l_freeze_date := csi_datastructures_pub.g_install_param_rec.freeze_date;
3813: --
4058: INTO l_release
4059: FROM sys.dual;
4060: --
4061: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
4062: csi_gen_utility_pvt.populate_install_param_rec;
4063: END IF;
4064: --
4065: l_internal_party_id := csi_datastructures_pub.g_install_param_rec.internal_party_id;
4066: l_freeze_date := csi_datastructures_pub.g_install_param_rec.freeze_date;
6124: AND mssi.secondary_inventory_name = l_instance_rec.inv_subinventory_name
6125: AND haou.organization_id = mssi.organization_id;
6126: ELSIF l_instance_rec.location_type_code = 'WIP' THEN
6127: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
6128: csi_gen_utility_pvt.populate_install_param_rec;
6129: END IF;
6130: --
6131: l_instance_rec.location_id := csi_datastructures_pub.g_install_param_rec.wip_location_id;
6132: END IF;
6229: END IF;
6230:
6231: IF l_instance_rec.location_type_code = 'WIP' THEN
6232: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
6233: csi_gen_utility_pvt.populate_install_param_rec;
6234: END IF;
6235: --
6236: l_instance_rec.location_id := csi_datastructures_pub.g_install_param_rec.wip_location_id;
6237: END IF;
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;
6899: END IF;
6900: --
6901: l_intransit_location_id := csi_datastructures_pub.g_install_param_rec.in_transit_location_id;
6902: --
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;
7518: --
7519: l_project_location_id := csi_datastructures_pub.g_install_param_rec.project_location_id;
7520: --
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;
7626: --
7627: l_internal_party_id := csi_datastructures_pub.g_install_param_rec.internal_party_id;
7628: --
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;
7908: --
7909: l_internal_party_id := csi_datastructures_pub.g_install_param_rec.internal_party_id;
7910: l_intransit_location_id := csi_datastructures_pub.g_install_param_rec.in_transit_location_id;
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;
8203: --
8204: l_internal_party_id := csi_datastructures_pub.g_install_param_rec.internal_party_id;
8205: l_intransit_location_id := csi_datastructures_pub.g_install_param_rec.in_transit_location_id;
8766: WHERE transaction_type_id = 53
8767: AND default_flag = 'Y';
8768: --
8769: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
8770: csi_gen_utility_pvt.populate_install_param_rec;
8771: END IF;
8772: --
8773: l_freeze_date := csi_datastructures_pub.g_install_param_rec.freeze_date;
8774:
8915: INTO l_release
8916: FROM sys.dual;
8917: --
8918: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
8919: csi_gen_utility_pvt.populate_install_param_rec;
8920: END IF;
8921: --
8922: l_internal_party_id := csi_datastructures_pub.g_install_param_rec.internal_party_id;
8923: l_freeze_date := csi_datastructures_pub.g_install_param_rec.freeze_date;
10257: return;
10258: end;
10259: --
10260: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
10261: csi_gen_utility_pvt.populate_install_param_rec;
10262: END IF;
10263: --
10264: v_freeze_date := csi_datastructures_pub.g_install_param_rec.freeze_date;
10265: --
10762: ,1
10763: );
10764: --
10765: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
10766: csi_gen_utility_pvt.populate_install_param_rec;
10767: END IF;
10768: --
10769: l_internal_party_id := csi_datastructures_pub.g_install_param_rec.internal_party_id;
10770: --
12221: Comp_error EXCEPTION;
12222: Process_next EXCEPTION;
12223: BEGIN
12224: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
12225: csi_gen_utility_pvt.populate_install_param_rec;
12226: END IF;
12227: --
12228: v_freeze_date := csi_datastructures_pub.g_install_param_rec.freeze_date;
12229: --
12260: Raise comp_error;
12261: End;
12262: -- Get the Internal Party ID
12263: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
12264: csi_gen_utility_pvt.populate_install_param_rec;
12265: END IF;
12266: --
12267: v_party_id := csi_datastructures_pub.g_install_param_rec.internal_party_id;
12268: --
13393:
13394: BEGIN
13395:
13396: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
13397: csi_gen_utility_pvt.populate_install_param_rec;
13398: END IF;
13399: --
13400: l_internal_party_id := csi_datastructures_pub.g_install_param_rec.internal_party_id;
13401: --
13649: p_file_segment1 => 'csinonsy',
13650: p_file_segment2 => to_char(sysdate, 'hh24miss'));
13651: --
13652: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
13653: csi_gen_utility_pvt.populate_install_param_rec;
13654: END IF;
13655: --
13656: v_freeze_date := csi_datastructures_pub.g_install_param_rec.freeze_date;
13657: --
13688: Raise comp_error;
13689: End;
13690: -- Get the Internal Party ID
13691: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
13692: csi_gen_utility_pvt.populate_install_param_rec;
13693: END IF;
13694: --
13695: v_party_id := csi_datastructures_pub.g_install_param_rec.internal_party_id;
13696: --
15111: out(l_message);
15112:
15113: --
15114: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
15115: csi_gen_utility_pvt.populate_install_param_rec;
15116: END IF;
15117: --
15118: l_ownership_override := csi_datastructures_pub.g_install_param_rec.ownership_override_at_txn;
15119: --
15436: WHERE transaction_type_id = 53
15437: AND default_flag = 'Y';
15438:
15439: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
15440: csi_gen_utility_pvt.populate_install_param_rec;
15441: END IF;
15442: l_internal_party_id := csi_datastructures_pub.g_install_param_rec.internal_party_id;
15443:
15444: --Changed to use the BULK COLLECT for cursor for bug5248037--
16471: log(' parameter - Show Instances :'||p_show_instances);
16472: log(' parameter - Mode of execution :'||p_mode);
16473: --
16474: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
16475: csi_gen_utility_pvt.populate_install_param_rec;
16476: END IF;
16477: --
16478: IF csi_datastructures_pub.g_install_param_rec.fetch_flag = 'N' OR
16479: csi_datastructures_pub.g_install_param_rec.freeze_flag = 'N' THEN