159: );
160:
161:
162: PROCEDURE define_columns(
163: p_system_rec IN csi_datastructures_pub.system_rec,
164: p_cur_get_systems IN NUMBER
165: )
166: IS
167: BEGIN
203: END define_columns;
204:
205: PROCEDURE get_column_values(
206: p_cur_get_systems IN NUMBER,
207: x_sys_rec OUT NOCOPY csi_datastructures_pub.system_rec
208: )
209: IS
210: BEGIN
211: DBMS_SQL.COLUMN_VALUE(p_cur_get_systems, 1, x_sys_rec.system_id);
246: END get_column_values;
247:
248:
249: PROCEDURE bind(
250: p_system_query_rec IN csi_datastructures_pub.system_query_rec,
251: p_cur_get_systems IN NUMBER
252: )
253: IS
254: BEGIN
273: END bind;
274:
275:
276: PROCEDURE gen_select(
277: p_system_query_rec IN csi_datastructures_pub.system_query_rec,
278: x_select_cl OUT NOCOPY VARCHAR2
279: )
280: IS
281: BEGIN
294:
295: END gen_select;
296:
297: PROCEDURE gen_systems_where(
298: p_system_query_rec IN csi_datastructures_pub.system_query_rec,
299: p_active_systems_only IN VARCHAR2,
300: x_systems_where OUT NOCOPY VARCHAR2
301: )
302: IS
445: END IF;
446: END;
447:
448:
449: PROCEDURE get_history( p_sys_rec IN csi_datastructures_pub.system_rec
450: ,p_new_rec OUT NOCOPY csi_datastructures_pub.system_rec
451: ,p_flag OUT NOCOPY VARCHAR2
452: ,p_time_stamp IN DATE
453: )
446: END;
447:
448:
449: PROCEDURE get_history( p_sys_rec IN csi_datastructures_pub.system_rec
450: ,p_new_rec OUT NOCOPY csi_datastructures_pub.system_rec
451: ,p_flag OUT NOCOPY VARCHAR2
452: ,p_time_stamp IN DATE
453: )
454: IS
903: p_api_version IN NUMBER ,
904: p_commit IN VARCHAR2,
905: p_init_msg_list IN VARCHAR2,
906: p_validation_level IN NUMBER,
907: p_system_query_rec IN csi_datastructures_pub.system_query_rec,
908: p_time_stamp IN DATE ,
909: p_active_systems_only IN VARCHAR2,
910: x_systems_tbl OUT NOCOPY csi_datastructures_pub.systems_tbl,
911: x_return_status OUT NOCOPY VARCHAR2,
906: p_validation_level IN NUMBER,
907: p_system_query_rec IN csi_datastructures_pub.system_query_rec,
908: p_time_stamp IN DATE ,
909: p_active_systems_only IN VARCHAR2,
910: x_systems_tbl OUT NOCOPY csi_datastructures_pub.systems_tbl,
911: x_return_status OUT NOCOPY VARCHAR2,
912: x_msg_count OUT NOCOPY NUMBER ,
913: x_msg_data OUT NOCOPY VARCHAR2
914: )
916:
917: l_api_name CONSTANT VARCHAR2(30) := 'get_systems';
918: l_api_version CONSTANT NUMBER := 1.0;
919: l_return_status_full VARCHAR2(1);
920: l_crit_systems_rec csi_datastructures_pub.system_query_rec := p_system_query_rec;
921: l_systems_where VARCHAR2(2000) := '';
922: l_cur_get_systems NUMBER;
923: l_select_cl VARCHAR2(2000) := '';
924: l_def_systems_rec csi_datastructures_pub.system_rec;
920: l_crit_systems_rec csi_datastructures_pub.system_query_rec := p_system_query_rec;
921: l_systems_where VARCHAR2(2000) := '';
922: l_cur_get_systems NUMBER;
923: l_select_cl VARCHAR2(2000) := '';
924: l_def_systems_rec csi_datastructures_pub.system_rec;
925: l_ignore NUMBER;
926: l_return_tot_count VARCHAR2(1) := fnd_api.g_false;
927: l_returned_rec_count NUMBER := 0;
928: l_sys_rec csi_datastructures_pub.system_rec;
924: l_def_systems_rec csi_datastructures_pub.system_rec;
925: l_ignore NUMBER;
926: l_return_tot_count VARCHAR2(1) := fnd_api.g_false;
927: l_returned_rec_count NUMBER := 0;
928: l_sys_rec csi_datastructures_pub.system_rec;
929: l_tot_rec_count NUMBER := 0;
930: l_start_rec_prt NUMBER :=1;
931: l_rec_requested NUMBER :=1000000;
932: l_new_rec csi_datastructures_pub.system_rec;
928: l_sys_rec csi_datastructures_pub.system_rec;
929: l_tot_rec_count NUMBER := 0;
930: l_start_rec_prt NUMBER :=1;
931: l_rec_requested NUMBER :=1000000;
932: l_new_rec csi_datastructures_pub.system_rec;
933: l_flag VARCHAR2(4);
934: l_active_systems_only VARCHAR2(1):= p_active_systems_only;
935: l_debug_level NUMBER;
936: l_systems_tbl csi_datastructures_pub.systems_tbl;
932: l_new_rec csi_datastructures_pub.system_rec;
933: l_flag VARCHAR2(4);
934: l_active_systems_only VARCHAR2(1):= p_active_systems_only;
935: l_debug_level NUMBER;
936: l_systems_tbl csi_datastructures_pub.systems_tbl;
937: l_sys_count NUMBER := 0;
938: l_last_purge_date DATE;
939:
940: BEGIN
1210:
1211: END check_parent_child_constraint;
1212:
1213:
1214: PROCEDURE validate_history(p_old_systems_rec IN csi_datastructures_pub.system_rec,
1215: p_new_systems_rec IN csi_datastructures_pub.system_rec,
1216: p_transaction_id IN NUMBER,
1217: p_flag IN VARCHAR2,
1218: p_sysdate IN DATE,
1211: END check_parent_child_constraint;
1212:
1213:
1214: PROCEDURE validate_history(p_old_systems_rec IN csi_datastructures_pub.system_rec,
1215: p_new_systems_rec IN csi_datastructures_pub.system_rec,
1216: p_transaction_id IN NUMBER,
1217: p_flag IN VARCHAR2,
1218: p_sysdate IN DATE,
1219: x_return_status OUT NOCOPY VARCHAR2,
1219: x_return_status OUT NOCOPY VARCHAR2,
1220: x_msg_count OUT NOCOPY NUMBER,
1221: x_msg_data OUT NOCOPY VARCHAR2)
1222: IS
1223: l_old_systems_rec csi_datastructures_pub.system_rec :=p_old_systems_rec;
1224: l_new_systems_rec csi_datastructures_pub.system_rec :=p_new_systems_rec;
1225: l_transaction_id NUMBER := p_transaction_id;
1226: l_full_dump NUMBER;
1227: l_systems_hist_rec csi_datastructures_pub.system_history_rec;
1220: x_msg_count OUT NOCOPY NUMBER,
1221: x_msg_data OUT NOCOPY VARCHAR2)
1222: IS
1223: l_old_systems_rec csi_datastructures_pub.system_rec :=p_old_systems_rec;
1224: l_new_systems_rec csi_datastructures_pub.system_rec :=p_new_systems_rec;
1225: l_transaction_id NUMBER := p_transaction_id;
1226: l_full_dump NUMBER;
1227: l_systems_hist_rec csi_datastructures_pub.system_history_rec;
1228:
1223: l_old_systems_rec csi_datastructures_pub.system_rec :=p_old_systems_rec;
1224: l_new_systems_rec csi_datastructures_pub.system_rec :=p_new_systems_rec;
1225: l_transaction_id NUMBER := p_transaction_id;
1226: l_full_dump NUMBER;
1227: l_systems_hist_rec csi_datastructures_pub.system_history_rec;
1228:
1229: CURSOR sys_hist_csr (p_sys_hist_id NUMBER) IS
1230: SELECT *
1231: FROM csi_systems_h
1236:
1237: BEGIN
1238: x_return_status := fnd_api.g_ret_sts_success;
1239:
1240: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
1241: csi_gen_utility_pvt.populate_install_param_rec;
1242: END IF;
1243: --
1244: l_full_dump := csi_datastructures_pub.g_install_param_rec.history_full_dump_frequency;
1240: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
1241: csi_gen_utility_pvt.populate_install_param_rec;
1242: END IF;
1243: --
1244: l_full_dump := csi_datastructures_pub.g_install_param_rec.history_full_dump_frequency;
1245: --
1246: IF l_full_dump IS NULL THEN
1247: FND_MESSAGE.SET_NAME('CSI','CSI_API_GET_FULL_DUMP_FAILED');
1248: FND_MSG_PUB.ADD;
2504: p_api_version IN NUMBER,
2505: p_commit IN VARCHAR2,
2506: p_init_msg_list IN VARCHAR2,
2507: p_validation_level IN NUMBER,
2508: p_system_rec IN csi_datastructures_pub.system_rec,
2509: p_txn_rec IN OUT NOCOPY csi_datastructures_pub.transaction_rec,
2510: x_system_id OUT NOCOPY NUMBER,
2511: x_return_status OUT NOCOPY VARCHAR2,
2512: x_msg_count OUT NOCOPY NUMBER,
2505: p_commit IN VARCHAR2,
2506: p_init_msg_list IN VARCHAR2,
2507: p_validation_level IN NUMBER,
2508: p_system_rec IN csi_datastructures_pub.system_rec,
2509: p_txn_rec IN OUT NOCOPY csi_datastructures_pub.transaction_rec,
2510: x_system_id OUT NOCOPY NUMBER,
2511: x_return_status OUT NOCOPY VARCHAR2,
2512: x_msg_count OUT NOCOPY NUMBER,
2513: x_msg_data OUT NOCOPY VARCHAR2
2899: p_api_version IN NUMBER,
2900: p_commit IN VARCHAR2,
2901: p_init_msg_list IN VARCHAR2,
2902: p_validation_level IN NUMBER,
2903: p_system_rec IN csi_datastructures_pub.system_rec,
2904: p_txn_rec IN OUT NOCOPY csi_datastructures_pub.transaction_rec,
2905: x_return_status OUT NOCOPY VARCHAR2,
2906: x_msg_count OUT NOCOPY NUMBER,
2907: x_msg_data OUT NOCOPY VARCHAR2
2900: p_commit IN VARCHAR2,
2901: p_init_msg_list IN VARCHAR2,
2902: p_validation_level IN NUMBER,
2903: p_system_rec IN csi_datastructures_pub.system_rec,
2904: p_txn_rec IN OUT NOCOPY csi_datastructures_pub.transaction_rec,
2905: x_return_status OUT NOCOPY VARCHAR2,
2906: x_msg_count OUT NOCOPY NUMBER,
2907: x_msg_data OUT NOCOPY VARCHAR2
2908: )
3039: l_api_name CONSTANT VARCHAR2(30) := 'update_system';
3040: l_api_version_number CONSTANT NUMBER := 1.0;
3041: l_rowid rowid;
3042: l_object_version_number NUMBER;
3043: l_old_systems_rec csi_datastructures_pub.system_rec;
3044: l_new_systems_rec csi_datastructures_pub.system_rec:=p_system_rec;
3045: l_systems_hist_rec csi_datastructures_pub.system_history_rec;
3046: l_count NUMBER;
3047: l_full_dump NUMBER;
3040: l_api_version_number CONSTANT NUMBER := 1.0;
3041: l_rowid rowid;
3042: l_object_version_number NUMBER;
3043: l_old_systems_rec csi_datastructures_pub.system_rec;
3044: l_new_systems_rec csi_datastructures_pub.system_rec:=p_system_rec;
3045: l_systems_hist_rec csi_datastructures_pub.system_history_rec;
3046: l_count NUMBER;
3047: l_full_dump NUMBER;
3048: l_debug_level NUMBER;
3041: l_rowid rowid;
3042: l_object_version_number NUMBER;
3043: l_old_systems_rec csi_datastructures_pub.system_rec;
3044: l_new_systems_rec csi_datastructures_pub.system_rec:=p_system_rec;
3045: l_systems_hist_rec csi_datastructures_pub.system_history_rec;
3046: l_count NUMBER;
3047: l_full_dump NUMBER;
3048: l_debug_level NUMBER;
3049: l_customer_id NUMBER;
3046: l_count NUMBER;
3047: l_full_dump NUMBER;
3048: l_debug_level NUMBER;
3049: l_customer_id NUMBER;
3050: l_instance_id_lst csi_datastructures_pub.id_tbl;
3051: l_transaction_date DATE;
3052: l_party_id NUMBER;
3053: l_party_tbl csi_datastructures_pub.party_tbl;
3054: l_party_account_tbl csi_datastructures_pub.party_account_tbl;
3049: l_customer_id NUMBER;
3050: l_instance_id_lst csi_datastructures_pub.id_tbl;
3051: l_transaction_date DATE;
3052: l_party_id NUMBER;
3053: l_party_tbl csi_datastructures_pub.party_tbl;
3054: l_party_account_tbl csi_datastructures_pub.party_account_tbl;
3055: l_init_party_tbl csi_datastructures_pub.party_tbl;
3056: l_init_party_account_tbl csi_datastructures_pub.party_account_tbl;
3057: l_bill_to NUMBER;
3050: l_instance_id_lst csi_datastructures_pub.id_tbl;
3051: l_transaction_date DATE;
3052: l_party_id NUMBER;
3053: l_party_tbl csi_datastructures_pub.party_tbl;
3054: l_party_account_tbl csi_datastructures_pub.party_account_tbl;
3055: l_init_party_tbl csi_datastructures_pub.party_tbl;
3056: l_init_party_account_tbl csi_datastructures_pub.party_account_tbl;
3057: l_bill_to NUMBER;
3058: l_ship_to NUMBER;
3051: l_transaction_date DATE;
3052: l_party_id NUMBER;
3053: l_party_tbl csi_datastructures_pub.party_tbl;
3054: l_party_account_tbl csi_datastructures_pub.party_account_tbl;
3055: l_init_party_tbl csi_datastructures_pub.party_tbl;
3056: l_init_party_account_tbl csi_datastructures_pub.party_account_tbl;
3057: l_bill_to NUMBER;
3058: l_ship_to NUMBER;
3059: l_contact_party_id NUMBER;
3052: l_party_id NUMBER;
3053: l_party_tbl csi_datastructures_pub.party_tbl;
3054: l_party_account_tbl csi_datastructures_pub.party_account_tbl;
3055: l_init_party_tbl csi_datastructures_pub.party_tbl;
3056: l_init_party_account_tbl csi_datastructures_pub.party_account_tbl;
3057: l_bill_to NUMBER;
3058: l_ship_to NUMBER;
3059: l_contact_party_id NUMBER;
3060: l_call_flag VARCHAR2(1);
3069: l_location_tbl csi_item_instance_pvt.location_tbl;
3070: l_generic_id_tbl csi_item_instance_pvt.generic_id_tbl;
3071: l_lookup_tbl csi_item_instance_pvt.lookup_tbl;
3072: l_ins_count_rec csi_item_instance_pvt.ins_count_rec;
3073: l_instance_rec csi_datastructures_pub.instance_rec;
3074: l_temp_instance_rec csi_datastructures_pub.instance_rec;
3075: l_install_to NUMBER;
3076: px_oks_txn_inst_tbl oks_ibint_pub.txn_instance_tbl;
3077: px_child_inst_tbl csi_item_instance_grp.child_inst_tbl;
3070: l_generic_id_tbl csi_item_instance_pvt.generic_id_tbl;
3071: l_lookup_tbl csi_item_instance_pvt.lookup_tbl;
3072: l_ins_count_rec csi_item_instance_pvt.ins_count_rec;
3073: l_instance_rec csi_datastructures_pub.instance_rec;
3074: l_temp_instance_rec csi_datastructures_pub.instance_rec;
3075: l_install_to NUMBER;
3076: px_oks_txn_inst_tbl oks_ibint_pub.txn_instance_tbl;
3077: px_child_inst_tbl csi_item_instance_grp.child_inst_tbl;
3078: l_batch_id NUMBER;
3977: p_api_version IN NUMBER,
3978: p_commit IN VARCHAR2,
3979: p_init_msg_list IN VARCHAR2,
3980: p_validation_level IN NUMBER,
3981: p_system_rec IN csi_datastructures_pub.system_rec,
3982: p_txn_rec IN OUT NOCOPY csi_datastructures_pub.transaction_rec,
3983: x_instance_id_lst OUT NOCOPY csi_datastructures_pub.id_tbl,
3984: x_return_status OUT NOCOPY VARCHAR2,
3985: x_msg_count OUT NOCOPY NUMBER,
3978: p_commit IN VARCHAR2,
3979: p_init_msg_list IN VARCHAR2,
3980: p_validation_level IN NUMBER,
3981: p_system_rec IN csi_datastructures_pub.system_rec,
3982: p_txn_rec IN OUT NOCOPY csi_datastructures_pub.transaction_rec,
3983: x_instance_id_lst OUT NOCOPY csi_datastructures_pub.id_tbl,
3984: x_return_status OUT NOCOPY VARCHAR2,
3985: x_msg_count OUT NOCOPY NUMBER,
3986: x_msg_data OUT NOCOPY VARCHAR2
3979: p_init_msg_list IN VARCHAR2,
3980: p_validation_level IN NUMBER,
3981: p_system_rec IN csi_datastructures_pub.system_rec,
3982: p_txn_rec IN OUT NOCOPY csi_datastructures_pub.transaction_rec,
3983: x_instance_id_lst OUT NOCOPY csi_datastructures_pub.id_tbl,
3984: x_return_status OUT NOCOPY VARCHAR2,
3985: x_msg_count OUT NOCOPY NUMBER,
3986: x_msg_data OUT NOCOPY VARCHAR2
3987: ) IS
4042: l_tl_csr tl_csr%ROWTYPE;
4043: l_sysdate DATE :=SYSDATE;
4044: l_api_version_number CONSTANT NUMBER := 1.0;
4045: l_api_name CONSTANT VARCHAR2(30) := 'expire_system';
4046: l_system_rec csi_datastructures_pub.system_rec;
4047: l_old_systems_rec csi_datastructures_pub.system_rec;
4048: l_new_systems_rec csi_datastructures_pub.system_rec;
4049: l_instance_rec csi_datastructures_pub.instance_rec;
4050: l_init_instance_rec csi_datastructures_pub.instance_rec;
4043: l_sysdate DATE :=SYSDATE;
4044: l_api_version_number CONSTANT NUMBER := 1.0;
4045: l_api_name CONSTANT VARCHAR2(30) := 'expire_system';
4046: l_system_rec csi_datastructures_pub.system_rec;
4047: l_old_systems_rec csi_datastructures_pub.system_rec;
4048: l_new_systems_rec csi_datastructures_pub.system_rec;
4049: l_instance_rec csi_datastructures_pub.instance_rec;
4050: l_init_instance_rec csi_datastructures_pub.instance_rec;
4051: l_debug_level NUMBER;
4044: l_api_version_number CONSTANT NUMBER := 1.0;
4045: l_api_name CONSTANT VARCHAR2(30) := 'expire_system';
4046: l_system_rec csi_datastructures_pub.system_rec;
4047: l_old_systems_rec csi_datastructures_pub.system_rec;
4048: l_new_systems_rec csi_datastructures_pub.system_rec;
4049: l_instance_rec csi_datastructures_pub.instance_rec;
4050: l_init_instance_rec csi_datastructures_pub.instance_rec;
4051: l_debug_level NUMBER;
4052: l_ext_attrib_values_tbl csi_datastructures_pub.extend_attrib_values_tbl;
4045: l_api_name CONSTANT VARCHAR2(30) := 'expire_system';
4046: l_system_rec csi_datastructures_pub.system_rec;
4047: l_old_systems_rec csi_datastructures_pub.system_rec;
4048: l_new_systems_rec csi_datastructures_pub.system_rec;
4049: l_instance_rec csi_datastructures_pub.instance_rec;
4050: l_init_instance_rec csi_datastructures_pub.instance_rec;
4051: l_debug_level NUMBER;
4052: l_ext_attrib_values_tbl csi_datastructures_pub.extend_attrib_values_tbl;
4053: l_party_tbl csi_datastructures_pub.party_tbl;
4046: l_system_rec csi_datastructures_pub.system_rec;
4047: l_old_systems_rec csi_datastructures_pub.system_rec;
4048: l_new_systems_rec csi_datastructures_pub.system_rec;
4049: l_instance_rec csi_datastructures_pub.instance_rec;
4050: l_init_instance_rec csi_datastructures_pub.instance_rec;
4051: l_debug_level NUMBER;
4052: l_ext_attrib_values_tbl csi_datastructures_pub.extend_attrib_values_tbl;
4053: l_party_tbl csi_datastructures_pub.party_tbl;
4054: l_account_tbl csi_datastructures_pub.party_account_tbl;
4048: l_new_systems_rec csi_datastructures_pub.system_rec;
4049: l_instance_rec csi_datastructures_pub.instance_rec;
4050: l_init_instance_rec csi_datastructures_pub.instance_rec;
4051: l_debug_level NUMBER;
4052: l_ext_attrib_values_tbl csi_datastructures_pub.extend_attrib_values_tbl;
4053: l_party_tbl csi_datastructures_pub.party_tbl;
4054: l_account_tbl csi_datastructures_pub.party_account_tbl;
4055: l_pricing_attrib_tbl csi_datastructures_pub.pricing_attribs_tbl;
4056: l_org_assignments_tbl csi_datastructures_pub.organization_units_tbl;
4049: l_instance_rec csi_datastructures_pub.instance_rec;
4050: l_init_instance_rec csi_datastructures_pub.instance_rec;
4051: l_debug_level NUMBER;
4052: l_ext_attrib_values_tbl csi_datastructures_pub.extend_attrib_values_tbl;
4053: l_party_tbl csi_datastructures_pub.party_tbl;
4054: l_account_tbl csi_datastructures_pub.party_account_tbl;
4055: l_pricing_attrib_tbl csi_datastructures_pub.pricing_attribs_tbl;
4056: l_org_assignments_tbl csi_datastructures_pub.organization_units_tbl;
4057: l_asset_assignment_tbl csi_datastructures_pub.instance_asset_tbl;
4050: l_init_instance_rec csi_datastructures_pub.instance_rec;
4051: l_debug_level NUMBER;
4052: l_ext_attrib_values_tbl csi_datastructures_pub.extend_attrib_values_tbl;
4053: l_party_tbl csi_datastructures_pub.party_tbl;
4054: l_account_tbl csi_datastructures_pub.party_account_tbl;
4055: l_pricing_attrib_tbl csi_datastructures_pub.pricing_attribs_tbl;
4056: l_org_assignments_tbl csi_datastructures_pub.organization_units_tbl;
4057: l_asset_assignment_tbl csi_datastructures_pub.instance_asset_tbl;
4058: l_exists VARCHAR2(1);
4051: l_debug_level NUMBER;
4052: l_ext_attrib_values_tbl csi_datastructures_pub.extend_attrib_values_tbl;
4053: l_party_tbl csi_datastructures_pub.party_tbl;
4054: l_account_tbl csi_datastructures_pub.party_account_tbl;
4055: l_pricing_attrib_tbl csi_datastructures_pub.pricing_attribs_tbl;
4056: l_org_assignments_tbl csi_datastructures_pub.organization_units_tbl;
4057: l_asset_assignment_tbl csi_datastructures_pub.instance_asset_tbl;
4058: l_exists VARCHAR2(1);
4059: --
4052: l_ext_attrib_values_tbl csi_datastructures_pub.extend_attrib_values_tbl;
4053: l_party_tbl csi_datastructures_pub.party_tbl;
4054: l_account_tbl csi_datastructures_pub.party_account_tbl;
4055: l_pricing_attrib_tbl csi_datastructures_pub.pricing_attribs_tbl;
4056: l_org_assignments_tbl csi_datastructures_pub.organization_units_tbl;
4057: l_asset_assignment_tbl csi_datastructures_pub.instance_asset_tbl;
4058: l_exists VARCHAR2(1);
4059: --
4060: Process_next EXCEPTION;
4053: l_party_tbl csi_datastructures_pub.party_tbl;
4054: l_account_tbl csi_datastructures_pub.party_account_tbl;
4055: l_pricing_attrib_tbl csi_datastructures_pub.pricing_attribs_tbl;
4056: l_org_assignments_tbl csi_datastructures_pub.organization_units_tbl;
4057: l_asset_assignment_tbl csi_datastructures_pub.instance_asset_tbl;
4058: l_exists VARCHAR2(1);
4059: --
4060: Process_next EXCEPTION;
4061:
5389: PROCEDURE validate_systems(
5390: p_init_msg_list IN VARCHAR2,
5391: p_validation_level IN NUMBER,
5392: p_validation_mode IN VARCHAR2,
5393: p_system_rec IN csi_datastructures_pub.system_rec,
5394: x_return_status OUT NOCOPY VARCHAR2,
5395: x_msg_count OUT NOCOPY NUMBER,
5396: x_msg_data OUT NOCOPY VARCHAR2
5397: )
5534: p_api_version IN NUMBER ,
5535: p_commit IN VARCHAR2,
5536: p_init_msg_list IN VARCHAR2,
5537: p_validation_level IN NUMBER,
5538: p_system_query_rec IN csi_datastructures_pub.system_query_rec,
5539: p_time_stamp IN DATE,
5540: p_active_systems_only IN VARCHAR2,
5541: x_system_header_tbl OUT NOCOPY csi_datastructures_pub.system_header_tbl,
5542: x_return_status OUT NOCOPY VARCHAR2,
5537: p_validation_level IN NUMBER,
5538: p_system_query_rec IN csi_datastructures_pub.system_query_rec,
5539: p_time_stamp IN DATE,
5540: p_active_systems_only IN VARCHAR2,
5541: x_system_header_tbl OUT NOCOPY csi_datastructures_pub.system_header_tbl,
5542: x_return_status OUT NOCOPY VARCHAR2,
5543: x_msg_count OUT NOCOPY NUMBER,
5544: x_msg_data OUT NOCOPY VARCHAR2
5545: )
5547:
5548: l_api_name CONSTANT VARCHAR2(30) := 'get_system_details';
5549: l_api_version CONSTANT NUMBER := 1.0;
5550: l_return_status_full VARCHAR2(1);
5551: l_crit_systems_rec csi_datastructures_pub.system_query_rec := p_system_query_rec;
5552: l_systems_where VARCHAR2(2000) := '';
5553: l_cur_get_systems NUMBER;
5554: l_select_cl VARCHAR2(2000) := '';
5555: l_def_systems_rec csi_datastructures_pub.system_rec;
5551: l_crit_systems_rec csi_datastructures_pub.system_query_rec := p_system_query_rec;
5552: l_systems_where VARCHAR2(2000) := '';
5553: l_cur_get_systems NUMBER;
5554: l_select_cl VARCHAR2(2000) := '';
5555: l_def_systems_rec csi_datastructures_pub.system_rec;
5556: l_ignore NUMBER;
5557: l_return_tot_count VARCHAR2(1) := fnd_api.g_false;
5558: l_returned_rec_count NUMBER := 0;
5559: l_sys_rec csi_datastructures_pub.system_rec;
5555: l_def_systems_rec csi_datastructures_pub.system_rec;
5556: l_ignore NUMBER;
5557: l_return_tot_count VARCHAR2(1) := fnd_api.g_false;
5558: l_returned_rec_count NUMBER := 0;
5559: l_sys_rec csi_datastructures_pub.system_rec;
5560: l_tot_rec_count NUMBER := 0;
5561: l_start_rec_prt NUMBER :=1;
5562: l_rec_requested NUMBER :=1000000;
5563: l_new_rec csi_datastructures_pub.system_rec;
5559: l_sys_rec csi_datastructures_pub.system_rec;
5560: l_tot_rec_count NUMBER := 0;
5561: l_start_rec_prt NUMBER :=1;
5562: l_rec_requested NUMBER :=1000000;
5563: l_new_rec csi_datastructures_pub.system_rec;
5564: l_flag VARCHAR2(4);
5565: l_active_systems_only VARCHAR2(1):= p_active_systems_only;
5566: l_debug_level NUMBER;
5567: l_systems_tbl csi_datastructures_pub.systems_tbl;
5563: l_new_rec csi_datastructures_pub.system_rec;
5564: l_flag VARCHAR2(4);
5565: l_active_systems_only VARCHAR2(1):= p_active_systems_only;
5566: l_debug_level NUMBER;
5567: l_systems_tbl csi_datastructures_pub.systems_tbl;
5568: l_sys_hdr_count NUMBER := 0;
5569: l_last_purge_date DATE;
5570: --
5571: Process_next EXCEPTION;
5792:
5793: END get_system_details;
5794: --
5795: PROCEDURE Resolve_ID_Columns
5796: (p_system_header_tbl IN OUT NOCOPY csi_datastructures_pub.system_header_tbl)
5797: IS
5798: --
5799: l_sys_type VARCHAR2(30) := 'CSI_SYSTEM_TYPE';
5800: BEGIN
6096: ,p_init_msg_list IN VARCHAR2
6097: ,p_validation_level IN NUMBER
6098: ,p_transaction_id IN NUMBER
6099: ,p_system_id IN NUMBER
6100: ,x_system_history_tbl OUT NOCOPY csi_datastructures_pub.systems_history_tbl
6101: ,x_return_status OUT NOCOPY VARCHAR2
6102: ,x_msg_count OUT NOCOPY NUMBER
6103: ,x_msg_data OUT NOCOPY VARCHAR2
6104: ) IS
6109: FROM CSI_SYSTEMS_H
6110: WHERE transaction_id = p_txn_id
6111: AND system_id = p_sys_id;
6112: --
6113: l_old_sys_header_rec csi_datastructures_pub.system_header_rec;
6114: l_new_sys_header_rec csi_datastructures_pub.system_header_rec;
6115: l_old_sys_header_tbl csi_datastructures_pub.system_header_tbl;
6116: l_new_sys_header_tbl csi_datastructures_pub.system_header_tbl;
6117: l_sys_history_rec csi_datastructures_pub.system_history_rec;
6110: WHERE transaction_id = p_txn_id
6111: AND system_id = p_sys_id;
6112: --
6113: l_old_sys_header_rec csi_datastructures_pub.system_header_rec;
6114: l_new_sys_header_rec csi_datastructures_pub.system_header_rec;
6115: l_old_sys_header_tbl csi_datastructures_pub.system_header_tbl;
6116: l_new_sys_header_tbl csi_datastructures_pub.system_header_tbl;
6117: l_sys_history_rec csi_datastructures_pub.system_history_rec;
6118: l_temp_sys_hist_rec csi_datastructures_pub.system_history_rec;
6111: AND system_id = p_sys_id;
6112: --
6113: l_old_sys_header_rec csi_datastructures_pub.system_header_rec;
6114: l_new_sys_header_rec csi_datastructures_pub.system_header_rec;
6115: l_old_sys_header_tbl csi_datastructures_pub.system_header_tbl;
6116: l_new_sys_header_tbl csi_datastructures_pub.system_header_tbl;
6117: l_sys_history_rec csi_datastructures_pub.system_history_rec;
6118: l_temp_sys_hist_rec csi_datastructures_pub.system_history_rec;
6119: l_temp_sys_header_rec csi_datastructures_pub.system_header_rec;
6112: --
6113: l_old_sys_header_rec csi_datastructures_pub.system_header_rec;
6114: l_new_sys_header_rec csi_datastructures_pub.system_header_rec;
6115: l_old_sys_header_tbl csi_datastructures_pub.system_header_tbl;
6116: l_new_sys_header_tbl csi_datastructures_pub.system_header_tbl;
6117: l_sys_history_rec csi_datastructures_pub.system_history_rec;
6118: l_temp_sys_hist_rec csi_datastructures_pub.system_history_rec;
6119: l_temp_sys_header_rec csi_datastructures_pub.system_header_rec;
6120: l_api_name CONSTANT VARCHAR2(30) := 'get_system_history';
6113: l_old_sys_header_rec csi_datastructures_pub.system_header_rec;
6114: l_new_sys_header_rec csi_datastructures_pub.system_header_rec;
6115: l_old_sys_header_tbl csi_datastructures_pub.system_header_tbl;
6116: l_new_sys_header_tbl csi_datastructures_pub.system_header_tbl;
6117: l_sys_history_rec csi_datastructures_pub.system_history_rec;
6118: l_temp_sys_hist_rec csi_datastructures_pub.system_history_rec;
6119: l_temp_sys_header_rec csi_datastructures_pub.system_header_rec;
6120: l_api_name CONSTANT VARCHAR2(30) := 'get_system_history';
6121: l_api_version CONSTANT NUMBER := 1.0;
6114: l_new_sys_header_rec csi_datastructures_pub.system_header_rec;
6115: l_old_sys_header_tbl csi_datastructures_pub.system_header_tbl;
6116: l_new_sys_header_tbl csi_datastructures_pub.system_header_tbl;
6117: l_sys_history_rec csi_datastructures_pub.system_history_rec;
6118: l_temp_sys_hist_rec csi_datastructures_pub.system_history_rec;
6119: l_temp_sys_header_rec csi_datastructures_pub.system_header_rec;
6120: l_api_name CONSTANT VARCHAR2(30) := 'get_system_history';
6121: l_api_version CONSTANT NUMBER := 1.0;
6122: l_sys_count NUMBER := 0;
6115: l_old_sys_header_tbl csi_datastructures_pub.system_header_tbl;
6116: l_new_sys_header_tbl csi_datastructures_pub.system_header_tbl;
6117: l_sys_history_rec csi_datastructures_pub.system_history_rec;
6118: l_temp_sys_hist_rec csi_datastructures_pub.system_history_rec;
6119: l_temp_sys_header_rec csi_datastructures_pub.system_header_rec;
6120: l_api_name CONSTANT VARCHAR2(30) := 'get_system_history';
6121: l_api_version CONSTANT NUMBER := 1.0;
6122: l_sys_count NUMBER := 0;
6123: BEGIN