[Home] [Help]
954:
955: -- initialize message list if p_init_msg_list is set to true.
956: IF fnd_api.to_boolean( p_init_msg_list )
957: THEN
958: fnd_msg_pub.initialize;
959: END IF;
960:
961:
962:
987: AND ((p_system_query_rec.system_number IS NULL) OR (p_system_query_rec.system_number = fnd_api.g_miss_char))
988: )
989: THEN
990: fnd_message.set_name('CSI', 'CSI_INVALID_PARAMETERS');
991: fnd_msg_pub.add;
992: x_return_status := fnd_api.g_ret_sts_error;
993: RAISE fnd_api.g_exc_error;
994: END IF;
995:
1042: THEN
1043: csi_gen_utility_pvt.put_line('Warning! History for this entity has already been purged for the datetime stamp passed. ' ||
1044: 'Please provide a valid datetime stamp.');
1045: FND_MESSAGE.Set_Name('CSI', 'CSI_API_HIST_AFTER_PURGE_REQ');
1046: FND_MSG_PUB.ADD;
1047: ELSE
1048: get_history( p_sys_rec => l_sys_rec
1049: ,p_new_rec => l_new_rec
1050: ,p_flag => l_flag
1082: --
1083: dbms_sql.close_cursor(l_cur_get_systems);
1084:
1085: -- standard call to get message count and if count is 1, get message info.
1086: fnd_msg_pub.count_and_get
1087: ( p_count => x_msg_count,
1088: p_data => x_msg_data
1089: );
1090: EXCEPTION
1090: EXCEPTION
1091: WHEN fnd_api.g_exc_error THEN
1092: -- ROLLBACK TO get_systems_pvt;
1093: x_return_status := fnd_api.g_ret_sts_error ;
1094: fnd_msg_pub.count_and_get
1095: (p_count => x_msg_count ,
1096: p_data => x_msg_data
1097: );
1098:
1098:
1099: WHEN fnd_api.g_exc_unexpected_error THEN
1100: -- ROLLBACK TO get_systems_pvt;
1101: x_return_status := fnd_api.g_ret_sts_unexp_error ;
1102: fnd_msg_pub.count_and_get
1103: (p_count => x_msg_count ,
1104: p_data => x_msg_data
1105: );
1106:
1106:
1107: WHEN OTHERS THEN
1108: -- ROLLBACK TO get_systems_pvt;
1109: x_return_status := fnd_api.g_ret_sts_unexp_error ;
1110: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1111: fnd_msg_pub.add_exc_msg(g_pkg_name ,l_api_name);
1112: END IF;
1113: fnd_msg_pub.count_and_get
1114: (p_count => x_msg_count ,
1107: WHEN OTHERS THEN
1108: -- ROLLBACK TO get_systems_pvt;
1109: x_return_status := fnd_api.g_ret_sts_unexp_error ;
1110: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1111: fnd_msg_pub.add_exc_msg(g_pkg_name ,l_api_name);
1112: END IF;
1113: fnd_msg_pub.count_and_get
1114: (p_count => x_msg_count ,
1115: p_data => x_msg_data
1109: x_return_status := fnd_api.g_ret_sts_unexp_error ;
1110: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1111: fnd_msg_pub.add_exc_msg(g_pkg_name ,l_api_name);
1112: END IF;
1113: fnd_msg_pub.count_and_get
1114: (p_count => x_msg_count ,
1115: p_data => x_msg_data
1116: );
1117:
1146: OPEN dup_cur;
1147: FETCH dup_cur INTO l_dummy;
1148: IF (dup_cur%FOUND) THEN
1149: FND_MESSAGE.SET_NAME('CSI', 'CSI_SYSTEM_DUP_NAME');
1150: fnd_msg_pub.add;
1151: x_return_status := fnd_api.g_ret_sts_error;
1152: END IF;
1153:
1154: CLOSE dup_cur;
1196: FETCH par_chld_csr INTO l_dummy;
1197: IF (par_chld_csr%found) THEN
1198: --CLOSE par_chld_csr;
1199: fnd_message.set_name('CSI','CSI_CHILD_PARENT_REL_LOOP');
1200: fnd_msg_pub.add;
1201: x_return_status := fnd_api.g_ret_sts_error;
1202: END IF;
1203: CLOSE par_chld_csr;
1204:
1203: CLOSE par_chld_csr;
1204:
1205: ELSE
1206: fnd_message.set_name('CSI', 'CSI_PARENT_CHILD_INVALID');
1207: fnd_msg_pub.add;
1208: x_return_status := fnd_api.g_ret_sts_error;
1209: END IF;
1210:
1211: END check_parent_child_constraint;
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;
1249: RAISE FND_API.G_EXC_ERROR;
1250: END IF;
1251:
1252: IF p_flag = 'EXPIRE' THEN
2539:
2540: -- initialize message list if p_init_msg_list is set to true.
2541: IF fnd_api.to_boolean( p_init_msg_list )
2542: THEN
2543: fnd_msg_pub.initialize;
2544: END IF;
2545:
2546:
2547: -- debug message
2664: EXCEPTION
2665: WHEN OTHERS THEN
2666: fnd_message.set_name('CSI','CSI_INVALID_COTERM_DATE');
2667: fnd_message.set_token('Coterminate_Day_Month',p_system_rec.coterminate_day_month);
2668: fnd_msg_pub.add;
2669: RAISE fnd_api.g_exc_error;
2670: END;
2671: END IF;
2672:
2743:
2744:
2745: fnd_message.set_name('CSI','CSI_FAILED_TO_VALIDATE_TXN');
2746: fnd_message.set_token('transaction_id',p_txn_rec.transaction_id );
2747: fnd_msg_pub.add;
2748:
2749: RAISE fnd_api.g_exc_error;
2750: RETURN;
2751: END IF;
2857:
2858:
2859:
2860: -- standard call to get message count and if count is 1, get message info.
2861: fnd_msg_pub.count_and_get
2862: ( p_count => x_msg_count,
2863: p_data => x_msg_data
2864: );
2865:
2866: EXCEPTION
2867: WHEN fnd_api.g_exc_error THEN
2868: ROLLBACK TO create_system_pvt;
2869: x_return_status := fnd_api.g_ret_sts_error ;
2870: fnd_msg_pub.count_and_get
2871: (p_count => x_msg_count ,
2872: p_data => x_msg_data
2873: );
2874:
2874:
2875: WHEN fnd_api.g_exc_unexpected_error THEN
2876: ROLLBACK TO create_system_pvt;
2877: x_return_status := fnd_api.g_ret_sts_unexp_error ;
2878: fnd_msg_pub.count_and_get
2879: (p_count => x_msg_count ,
2880: p_data => x_msg_data
2881: );
2882:
2882:
2883: WHEN OTHERS THEN
2884: ROLLBACK TO create_system_pvt;
2885: x_return_status := fnd_api.g_ret_sts_unexp_error ;
2886: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2887: fnd_msg_pub.add_exc_msg(g_pkg_name ,l_api_name);
2888: END IF;
2889: fnd_msg_pub.count_and_get
2890: (p_count => x_msg_count ,
2883: WHEN OTHERS THEN
2884: ROLLBACK TO create_system_pvt;
2885: x_return_status := fnd_api.g_ret_sts_unexp_error ;
2886: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2887: fnd_msg_pub.add_exc_msg(g_pkg_name ,l_api_name);
2888: END IF;
2889: fnd_msg_pub.count_and_get
2890: (p_count => x_msg_count ,
2891: p_data => x_msg_data
2885: x_return_status := fnd_api.g_ret_sts_unexp_error ;
2886: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2887: fnd_msg_pub.add_exc_msg(g_pkg_name ,l_api_name);
2888: END IF;
2889: fnd_msg_pub.count_and_get
2890: (p_count => x_msg_count ,
2891: p_data => x_msg_data
2892: );
2893:
3096:
3097: -- initialize message list if p_init_msg_list is set to true.
3098: IF fnd_api.to_boolean( p_init_msg_list )
3099: THEN
3100: fnd_msg_pub.initialize;
3101: END IF;
3102:
3103: -- initialize api return status to success
3104: x_return_status := fnd_api.g_ret_sts_success;
3122: END IF;
3123: --
3124: IF p_system_rec.customer_id IS NULL THEN
3125: fnd_message.set_name('CSI', 'CSI_API_MANDATORY_CUSTOMER');
3126: fnd_msg_pub.add;
3127: RAISE fnd_api.g_exc_error;
3128: END IF;
3129: --
3130: IF p_system_rec.system_type_code IS NULL THEN
3128: END IF;
3129: --
3130: IF p_system_rec.system_type_code IS NULL THEN
3131: fnd_message.set_name('CSI', 'CSI_API_MANDATORY_SYSTEM_TYPE');
3132: fnd_msg_pub.add;
3133: RAISE fnd_api.g_exc_error;
3134: END IF;
3135: --
3136:
3138: FETCH systems_csr INTO l_sys_csr;
3139: IF ( (l_sys_csr.object_version_number<>p_system_rec.object_version_number)
3140: AND (p_system_rec.object_version_number <> fnd_api.g_miss_num) ) THEN
3141: fnd_message.set_name('CSI', 'CSI_RECORD_CHANGED');
3142: fnd_msg_pub.add;
3143: RAISE fnd_api.g_exc_error;
3144: END IF;
3145: CLOSE systems_csr;
3146:
3236: EXCEPTION
3237: WHEN OTHERS THEN
3238: fnd_message.set_name('CSI','CSI_INVALID_COTERM_DATE');
3239: fnd_message.set_token('Coterminate_Day_Month',p_system_rec.coterminate_day_month);
3240: fnd_msg_pub.add;
3241: RAISE fnd_api.g_exc_error;
3242: END;
3243: END IF;
3244:
3273:
3274: IF NOT(x_return_status = fnd_api.g_ret_sts_success) THEN
3275: fnd_message.set_name('CSI','CSI_FAILED_TO_EXPIRE_SYSTEM');
3276: fnd_message.set_token('SYSTEM_ID',p_system_rec.system_id );
3277: fnd_msg_pub.add;
3278: RAISE fnd_api.g_exc_error;
3279: END IF;
3280: ELSIF ( p_system_rec.end_date_active IS NOT NULL
3281: AND p_system_rec.end_date_active <> fnd_api.g_miss_date
3300: IF l_transaction_date > p_system_rec.end_date_active
3301: THEN
3302: fnd_message.set_name('CSI','CSI_HAS_TXNS');
3303: fnd_message.set_token('END_DATE_ACTIVE',p_system_rec.end_date_active );
3304: fnd_msg_pub.add;
3305: RAISE fnd_api.g_exc_error;
3306: -- srramakr. If the Active end date is < sysdate, then call to Expire_System
3307: -- was missed. Fixed as a part of Bug 2230262.
3308: ELSE
3321:
3322: IF NOT(x_return_status = fnd_api.g_ret_sts_success) THEN
3323: fnd_message.set_name('CSI','CSI_FAILED_TO_EXPIRE_SYSTEM');
3324: fnd_message.set_token('SYSTEM_ID',p_system_rec.system_id );
3325: fnd_msg_pub.add;
3326: RAISE fnd_api.g_exc_error;
3327: END IF;
3328: END IF;
3329: -- The exception has moved up since any Raise wihin the block will hit this exception
3445:
3446: IF NOT(x_return_status = fnd_api.g_ret_sts_success) THEN
3447: fnd_message.set_name('CSI','CSI_FAILED_TO_VALIDATE_TXN');
3448: fnd_message.set_token('transaction_id',p_txn_rec.transaction_id );
3449: fnd_msg_pub.add;
3450:
3451: RAISE fnd_api.g_exc_error;
3452: RETURN;
3453: END IF;
3594: l_msg_index := 1;
3595: l_msg_count := x_msg_count;
3596: WHILE l_msg_count > 0
3597: LOOP
3598: x_msg_data := FND_MSG_PUB.GET
3599: ( l_msg_index,
3600: FND_API.G_FALSE );
3601: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3602: l_msg_index := l_msg_index + 1;
3642: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3643: l_msg_index := 1;
3644: l_msg_count := x_msg_count;
3645: WHILE l_msg_count > 0 LOOP
3646: x_msg_data := FND_MSG_PUB.GET
3647: ( l_msg_index,
3648: FND_API.G_FALSE );
3649: csi_gen_utility_pvt.put_line( 'Error from OKS_IBINT_PUB.IB_interface..');
3650: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3734: l_msg_index := 1;
3735: l_msg_count := x_msg_count;
3736: While l_msg_count > 0
3737: Loop
3738: x_msg_data := FND_MSG_PUB.GET
3739: ( l_msg_index,
3740: FND_API.G_FALSE );
3741: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3742: l_msg_index := l_msg_index + 1;
3814: l_msg_index := 1;
3815: l_msg_count := x_msg_count;
3816: WHILE l_msg_count > 0
3817: LOOP
3818: x_msg_data := FND_MSG_PUB.GET
3819: ( l_msg_index,
3820: FND_API.G_FALSE );
3821: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3822: l_msg_index := l_msg_index + 1;
3911: l_msg_index := 1;
3912: l_msg_count := x_msg_count;
3913: WHILE l_msg_count > 0
3914: LOOP
3915: x_msg_data := FND_MSG_PUB.GET
3916: ( l_msg_index,
3917: FND_API.G_FALSE );
3918: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3919: l_msg_index := l_msg_index + 1;
3936: COMMIT WORK;
3937: END IF;
3938:
3939: -- standard call to get message count and if count is 1, get message info.
3940: fnd_msg_pub.count_and_get
3941: ( p_count => x_msg_count,
3942: p_data => x_msg_data
3943: );
3944: END IF;
3945: EXCEPTION
3946: WHEN fnd_api.g_exc_error THEN
3947: ROLLBACK TO update_system_pvt;
3948: x_return_status := fnd_api.g_ret_sts_error ;
3949: fnd_msg_pub.count_and_get
3950: (p_count => x_msg_count ,
3951: p_data => x_msg_data
3952: );
3953:
3953:
3954: WHEN fnd_api.g_exc_unexpected_error THEN
3955: ROLLBACK TO update_system_pvt;
3956: x_return_status := fnd_api.g_ret_sts_unexp_error ;
3957: fnd_msg_pub.count_and_get
3958: (p_count => x_msg_count ,
3959: p_data => x_msg_data
3960: );
3961:
3961:
3962: WHEN OTHERS THEN
3963: ROLLBACK TO update_system_pvt;
3964: x_return_status := fnd_api.g_ret_sts_unexp_error ;
3965: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
3966: fnd_msg_pub.add_exc_msg(g_pkg_name ,l_api_name);
3967: END IF;
3968: fnd_msg_pub.count_and_get
3969: (p_count => x_msg_count ,
3962: WHEN OTHERS THEN
3963: ROLLBACK TO update_system_pvt;
3964: x_return_status := fnd_api.g_ret_sts_unexp_error ;
3965: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
3966: fnd_msg_pub.add_exc_msg(g_pkg_name ,l_api_name);
3967: END IF;
3968: fnd_msg_pub.count_and_get
3969: (p_count => x_msg_count ,
3970: p_data => x_msg_data
3964: x_return_status := fnd_api.g_ret_sts_unexp_error ;
3965: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
3966: fnd_msg_pub.add_exc_msg(g_pkg_name ,l_api_name);
3967: END IF;
3968: fnd_msg_pub.count_and_get
3969: (p_count => x_msg_count ,
3970: p_data => x_msg_data
3971: );
3972:
4076:
4077: -- initialize message list if p_init_msg_list is set to true.
4078: IF fnd_api.to_boolean( p_init_msg_list )
4079: THEN
4080: fnd_msg_pub.initialize;
4081: END IF;
4082:
4083: -- initialize api return status to success
4084: x_return_status := fnd_api.g_ret_sts_success;
4103: FETCH systems_csr INTO l_sys_csr;
4104: IF ( (l_sys_csr.object_version_number<>p_system_rec.object_version_number)
4105: AND (p_system_rec.object_version_number <> fnd_api.g_miss_num) ) THEN
4106: fnd_message.set_name('CSI', 'CSI_RECORD_CHANGED');
4107: fnd_msg_pub.add;
4108: RAISE fnd_api.g_exc_error;
4109: END IF;
4110: CLOSE systems_csr;
4111:
4159:
4160: IF NOT(x_return_status = fnd_api.g_ret_sts_success) THEN
4161: fnd_message.set_name('CSI','CSI_FAILED_TO_VALIDATE_TXN');
4162: fnd_message.set_token('transaction_id',p_txn_rec.transaction_id );
4163: fnd_msg_pub.add;
4164:
4165: RAISE fnd_api.g_exc_error;
4166: RETURN;
4167: END IF;
4229: );
4230: IF NOT(x_return_status = fnd_api.g_ret_sts_success) THEN
4231: fnd_message.set_name('CSI','CSI_FAILED_TO_VALIDATE_INS');
4232: fnd_message.set_token('instance_id',expire_csr.instance_id);
4233: fnd_msg_pub.add;
4234: RAISE fnd_api.g_exc_error;
4235: RETURN;
4236: END IF;
4237: Exception
4346: COMMIT WORK;
4347: END IF;
4348:
4349: -- standard call to get message count and if count is 1, get message info.
4350: fnd_msg_pub.count_and_get
4351: ( p_count => x_msg_count,
4352: p_data => x_msg_data
4353: );
4354:
4355: EXCEPTION
4356: WHEN fnd_api.g_exc_error THEN
4357: ROLLBACK TO expire_system_pvt;
4358: x_return_status := fnd_api.g_ret_sts_error ;
4359: fnd_msg_pub.count_and_get
4360: (p_count => x_msg_count ,
4361: p_data => x_msg_data
4362: );
4363:
4363:
4364: WHEN fnd_api.g_exc_unexpected_error THEN
4365: ROLLBACK TO expire_system_pvt;
4366: x_return_status := fnd_api.g_ret_sts_unexp_error ;
4367: fnd_msg_pub.count_and_get
4368: (p_count => x_msg_count ,
4369: p_data => x_msg_data
4370: );
4371:
4371:
4372: WHEN OTHERS THEN
4373: ROLLBACK TO expire_system_pvt;
4374: x_return_status := fnd_api.g_ret_sts_unexp_error ;
4375: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
4376: fnd_msg_pub.add_exc_msg(g_pkg_name ,l_api_name);
4377: END IF;
4378: fnd_msg_pub.count_and_get
4379: (p_count => x_msg_count ,
4372: WHEN OTHERS THEN
4373: ROLLBACK TO expire_system_pvt;
4374: x_return_status := fnd_api.g_ret_sts_unexp_error ;
4375: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
4376: fnd_msg_pub.add_exc_msg(g_pkg_name ,l_api_name);
4377: END IF;
4378: fnd_msg_pub.count_and_get
4379: (p_count => x_msg_count ,
4380: p_data => x_msg_data
4374: x_return_status := fnd_api.g_ret_sts_unexp_error ;
4375: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
4376: fnd_msg_pub.add_exc_msg(g_pkg_name ,l_api_name);
4377: END IF;
4378: fnd_msg_pub.count_and_get
4379: (p_count => x_msg_count ,
4380: p_data => x_msg_data
4381: );
4382:
4399: BEGIN
4400: -- initialize message list if p_init_msg_list is set to true.
4401: IF fnd_api.to_boolean( p_init_msg_list )
4402: THEN
4403: fnd_msg_pub.initialize;
4404: END IF;
4405:
4406:
4407: -- initialize api return status to success
4417: FROM csi_systems_b
4418: WHERE system_id=p_system_id;
4419: fnd_message.set_name('CSI', 'CSI_INVALID_SYSTEM_ID');
4420: fnd_message.set_token('system_id',p_system_id);
4421: fnd_msg_pub.add;
4422: x_return_status := fnd_api.g_ret_sts_error;
4423: EXCEPTION
4424: WHEN no_data_found THEN
4425: x_return_status := fnd_api.g_ret_sts_success;
4437: EXCEPTION
4438: WHEN no_data_found THEN
4439: fnd_message.set_name('CSI', 'CSI_INVALID_SYSTEM_ID');
4440: fnd_message.set_token('system_id',p_system_id);
4441: fnd_msg_pub.add;
4442: x_return_status := fnd_api.g_ret_sts_error;
4443: END;
4444: ELSE
4445: fnd_message.set_name('CSI', 'CSI_NO_SYSTEM_ID');
4443: END;
4444: ELSE
4445: fnd_message.set_name('CSI', 'CSI_NO_SYSTEM_ID');
4446: fnd_message.set_token('REQUIRED_PARAM','SYSTEM_ID');
4447: fnd_msg_pub.add;
4448: x_return_status := fnd_api.g_ret_sts_error;
4449: END IF;
4450:
4451: END IF;
4452:
4453:
4454:
4455: -- standard call to get message count and if count is 1, get message info.
4456: fnd_msg_pub.count_and_get
4457: ( p_count => x_msg_count,
4458: p_data => x_msg_data
4459: );
4460:
4474: BEGIN
4475: -- initialize message list if p_init_msg_list is set to true.
4476: IF fnd_api.to_boolean( p_init_msg_list )
4477: THEN
4478: fnd_msg_pub.initialize;
4479: END IF;
4480:
4481:
4482: -- initialize api return status to success
4502: EXCEPTION
4503: WHEN no_data_found THEN
4504: fnd_message.set_name('CSI', 'CSI_INVALID_CUSTOMER_ID');
4505: fnd_message.set_token('customer_id',p_customer_id);
4506: fnd_msg_pub.add;
4507: x_return_status := fnd_api.g_ret_sts_error;
4508: END;
4509: ELSE
4510: fnd_message.set_name('CSI', 'CSI_CUST_ID_NOT_PASSED');
4508: END;
4509: ELSE
4510: fnd_message.set_name('CSI', 'CSI_CUST_ID_NOT_PASSED');
4511: fnd_message.set_token('REQUIRED_PARAM','CUSTOMER_ID');
4512: fnd_msg_pub.add;
4513: x_return_status := fnd_api.g_ret_sts_error;
4514:
4515: END IF;
4516: ELSIF p_validation_mode='UPDATE' THEN
4531: EXCEPTION
4532: WHEN no_data_found THEN
4533: fnd_message.set_name('CSI', 'CSI_INVALID_CUSTOMER_ID');
4534: fnd_message.set_token('customer_id',p_customer_id);
4535: fnd_msg_pub.add;
4536: x_return_status := fnd_api.g_ret_sts_error;
4537: END;
4538: END IF;
4539: END IF;
4537: END;
4538: END IF;
4539: END IF;
4540: -- standard call to get message count and if count is 1, get message info.
4541: fnd_msg_pub.count_and_get
4542: ( p_count => x_msg_count,
4543: p_data => x_msg_data
4544: );
4545:
4560: BEGIN
4561: -- initialize message list if p_init_msg_list is set to true.
4562: IF fnd_api.to_boolean( p_init_msg_list )
4563: THEN
4564: fnd_msg_pub.initialize;
4565: END IF;
4566:
4567:
4568: -- initialize api return status to success
4582: EXCEPTION
4583: WHEN no_data_found THEN
4584: fnd_message.set_name('CSI', 'CSI_INVALID_SYS_TYPE_CODE');
4585: fnd_message.set_token('system_type_code',p_system_type_code);
4586: fnd_msg_pub.add;
4587: x_return_status := fnd_api.g_ret_sts_error;
4588: END;
4589: ELSE
4590: fnd_message.set_name('CSI', 'CSI_NO_SYS_TYPE_CODE');
4589: ELSE
4590: fnd_message.set_name('CSI', 'CSI_NO_SYS_TYPE_CODE');
4591: fnd_message.set_token('REQUIRED_PARAM','SYSTEM_TYPE_CODE');
4592:
4593: fnd_msg_pub.add;
4594: x_return_status := fnd_api.g_ret_sts_error;
4595:
4596: END IF;
4597: ELSIF p_validation_mode='UPDATE' THEN
4606: EXCEPTION
4607: WHEN no_data_found THEN
4608: fnd_message.set_name('CSI', 'CSI_INVALID_SYS_TYPE_CODE');
4609: fnd_message.set_token('system_type_code',p_system_type_code);
4610: fnd_msg_pub.add;
4611: x_return_status := fnd_api.g_ret_sts_error;
4612: END;
4613: END IF;
4614: END IF;
4614: END IF;
4615:
4616:
4617: -- standard call to get message count and if count is 1, get message info.
4618: fnd_msg_pub.count_and_get
4619: ( p_count => x_msg_count,
4620: p_data => x_msg_data
4621: );
4622:
4638: BEGIN
4639: -- initialize message list IF p_init_msg_list IS set to true.
4640: IF fnd_api.to_boolean( p_init_msg_list )
4641: THEN
4642: fnd_msg_pub.initialize;
4643: END IF;
4644:
4645:
4646: -- initialize api return status to success
4658: EXCEPTION
4659: WHEN no_data_found THEN
4660: fnd_message.set_name('CSI', 'CSI_INVALID_PARENT_SYS_ID');
4661: fnd_message.set_token('parent_system_id',p_parent_system_id);
4662: fnd_msg_pub.add;
4663: x_return_status := fnd_api.g_ret_sts_error;
4664: END;
4665: END IF;
4666:
4676: EXCEPTION
4677: WHEN no_data_found THEN
4678: fnd_message.set_name('CSI', 'CSI_INVALID_PARENT_SYS_ID');
4679: fnd_message.set_token('parent_system_id',p_parent_system_id);
4680: fnd_msg_pub.add;
4681: x_return_status := fnd_api.g_ret_sts_error;
4682: END;
4683: END IF;
4684: END IF;
4683: END IF;
4684: END IF;
4685:
4686: -- standard call to get message count and if count is 1, get message info.
4687: fnd_msg_pub.count_and_get
4688: ( p_count => x_msg_count,
4689: p_data => x_msg_data
4690: );
4691:
4705: BEGIN
4706: -- initialize message list if p_init_msg_list is set to true.
4707: IF fnd_api.to_boolean( p_init_msg_list )
4708: THEN
4709: fnd_msg_pub.initialize;
4710: END IF;
4711:
4712:
4713: -- initialize api return status to success
4725: EXCEPTION
4726: WHEN no_data_found THEN
4727: fnd_message.set_name('CSI', 'CSI_INVALID_SHIPTO_CT_ID');
4728: fnd_message.set_token('ship_to_contact_id',p_ship_to_contact_id);
4729: fnd_msg_pub.add;
4730: x_return_status := fnd_api.g_ret_sts_error;
4731: END;
4732:
4733: END IF;
4742: EXCEPTION
4743: WHEN no_data_found THEN
4744: fnd_message.set_name('CSI', 'CSI_INVALID_SHIPTO_CT_ID');
4745: fnd_message.set_token('ship_to_contact_id',p_ship_to_contact_id);
4746: fnd_msg_pub.add;
4747: x_return_status := fnd_api.g_ret_sts_error;
4748: END;
4749: END IF;
4750: END IF;
4749: END IF;
4750: END IF;
4751:
4752: -- standard call to get message count and if count is 1, get message info.
4753: fnd_msg_pub.count_and_get
4754: ( p_count => x_msg_count,
4755: p_data => x_msg_data
4756: );
4757:
4771: BEGIN
4772: -- initialize message list if p_init_msg_list is set to true.
4773: IF fnd_api.to_boolean( p_init_msg_list )
4774: THEN
4775: fnd_msg_pub.initialize;
4776: END IF;
4777:
4778:
4779: -- initialize api return status to success
4791: EXCEPTION
4792: WHEN no_data_found THEN
4793: fnd_message.set_name('CSI', 'CSI_INVALID_BILLTO_CT_ID');
4794: fnd_message.set_token('bill_to_contact_id',p_bill_to_contact_id);
4795: fnd_msg_pub.add;
4796: x_return_status := fnd_api.g_ret_sts_error;
4797: END;
4798: END IF;
4799: ELSIF p_validation_mode='UPDATE' THEN
4807: EXCEPTION
4808: WHEN no_data_found THEN
4809: fnd_message.set_name('CSI', 'CSI_INVALID_BILLTO_CT_ID');
4810: fnd_message.set_token('bill_to_contact_id',p_bill_to_contact_id);
4811: fnd_msg_pub.add;
4812: x_return_status := fnd_api.g_ret_sts_error;
4813: END;
4814: END IF;
4815: END IF;
4814: END IF;
4815: END IF;
4816:
4817: -- standard call to get message count and if count is 1, get message info.
4818: fnd_msg_pub.count_and_get
4819: ( p_count => x_msg_count,
4820: p_data => x_msg_data
4821: );
4822:
4836: BEGIN
4837: -- initialize message list if p_init_msg_list is set to true.
4838: IF fnd_api.to_boolean( p_init_msg_list )
4839: THEN
4840: fnd_msg_pub.initialize;
4841: END IF;
4842:
4843:
4844: -- initialize api return status to success
4856: EXCEPTION
4857: WHEN no_data_found THEN
4858: fnd_message.set_name('CSI', 'CSI_INVALID_TECH_CT_ID');
4859: fnd_message.set_token('technical_contact_id',p_technical_contact_id);
4860: fnd_msg_pub.add;
4861: x_return_status := fnd_api.g_ret_sts_error;
4862: END;
4863: END IF;
4864: ELSIF p_validation_mode='UPDATE' THEN
4872: EXCEPTION
4873: WHEN no_data_found THEN
4874: fnd_message.set_name('CSI', 'CSI_INVALID_TECH_CT_ID');
4875: fnd_message.set_token('technical_contact_id',p_technical_contact_id);
4876: fnd_msg_pub.add;
4877: x_return_status := fnd_api.g_ret_sts_error;
4878: END;
4879: END IF;
4880: END IF;
4878: END;
4879: END IF;
4880: END IF;
4881: -- standard call to get message count and if count is 1, get message info.
4882: fnd_msg_pub.count_and_get
4883: ( p_count => x_msg_count,
4884: p_data => x_msg_data
4885: );
4886:
4900: BEGIN
4901: -- initialize message list if p_init_msg_list is set to true.
4902: IF fnd_api.to_boolean( p_init_msg_list )
4903: THEN
4904: fnd_msg_pub.initialize;
4905: END IF;
4906:
4907:
4908: -- initialize api return status to success
4920: EXCEPTION
4921: WHEN no_data_found THEN
4922: fnd_message.set_name('CSI', 'CSI_INVALID_SRVADMIN_CT_ID');
4923: fnd_message.set_token('service_admin_contact_id',p_service_admin_contact_id);
4924: fnd_msg_pub.add;
4925: x_return_status := fnd_api.g_ret_sts_error;
4926: END;
4927: END IF;
4928: ELSIF p_validation_mode='UPDATE' THEN
4936: EXCEPTION
4937: WHEN no_data_found THEN
4938: fnd_message.set_name('CSI', 'CSI_INVALID_SRVADMIN_CT_ID');
4939: fnd_message.set_token('service_admin_contact_id',p_service_admin_contact_id);
4940: fnd_msg_pub.add;
4941: x_return_status := fnd_api.g_ret_sts_error;
4942: END;
4943: END IF;
4944: END IF;
4942: END;
4943: END IF;
4944: END IF;
4945: -- standard call to get message count and if count is 1, get message info.
4946: fnd_msg_pub.count_and_get
4947: ( p_count => x_msg_count,
4948: p_data => x_msg_data
4949: );
4950:
4964: BEGIN
4965: -- initialize message list if p_init_msg_list is set to true.
4966: IF fnd_api.to_boolean( p_init_msg_list )
4967: THEN
4968: fnd_msg_pub.initialize;
4969: END IF;
4970:
4971:
4972: -- initialize api return status to success
4985: EXCEPTION
4986: WHEN no_data_found THEN
4987: fnd_message.set_name('CSI', 'CSI_INVALID_SHIP_TO_ID');
4988: fnd_message.set_token('ship_to_site_use_id',p_ship_to_site_use_id);
4989: fnd_msg_pub.add;
4990: x_return_status := fnd_api.g_ret_sts_error;
4991: END;
4992: END IF;
4993: ELSIF p_validation_mode='UPDATE' THEN
5002: EXCEPTION
5003: WHEN no_data_found THEN
5004: fnd_message.set_name('CSI', 'CSI_INVALID_SHIP_TO_ID');
5005: fnd_message.set_token('ship_to_site_use_id',p_ship_to_site_use_id);
5006: fnd_msg_pub.add;
5007: x_return_status := fnd_api.g_ret_sts_error;
5008: END;
5009: END IF;
5010: END IF;
5009: END IF;
5010: END IF;
5011:
5012: -- standard call to get message count and if count is 1, get message info.
5013: fnd_msg_pub.count_and_get
5014: ( p_count => x_msg_count,
5015: p_data => x_msg_data
5016: );
5017:
5031: BEGIN
5032: -- initialize message list if p_init_msg_list is set to true.
5033: IF fnd_api.to_boolean( p_init_msg_list )
5034: THEN
5035: fnd_msg_pub.initialize;
5036: END IF;
5037:
5038:
5039: -- initialize api return status to success
5052: EXCEPTION
5053: WHEN no_data_found THEN
5054: fnd_message.set_name('CSI', 'CSI_INVALID_BILL_TO_ID');
5055: fnd_message.set_token('bill_to_site_use_id',p_bill_to_site_use_id);
5056: fnd_msg_pub.add;
5057: x_return_status := fnd_api.g_ret_sts_error;
5058: END;
5059: END IF;
5060: ELSIF p_validation_mode='UPDATE' THEN
5069: EXCEPTION
5070: WHEN no_data_found THEN
5071: fnd_message.set_name('CSI', 'CSI_INVALID_BILL_TO_ID');
5072: fnd_message.set_token('bill_to_site_use_id',p_bill_to_site_use_id);
5073: fnd_msg_pub.add;
5074: x_return_status := fnd_api.g_ret_sts_error;
5075: END;
5076: END IF;
5077:
5076: END IF;
5077:
5078: END IF;
5079: -- standard call to get message count and if count is 1, get message info.
5080: fnd_msg_pub.count_and_get
5081: ( p_count => x_msg_count,
5082: p_data => x_msg_data
5083: );
5084:
5099:
5100: -- initialize message list if p_init_msg_list is set to true.
5101: IF fnd_api.to_boolean( p_init_msg_list )
5102: THEN
5103: fnd_msg_pub.initialize;
5104: END IF;
5105:
5106:
5107: -- initialize api return status to success
5119: EXCEPTION
5120: WHEN no_data_found THEN
5121: fnd_message.set_name('CSI', 'CSI_INVALID_INSTALL_ID');
5122: fnd_message.set_token('install_site_use_id',p_install_site_use_id);
5123: fnd_msg_pub.add;
5124: x_return_status := fnd_api.g_ret_sts_error;
5125: END;
5126: END IF;
5127: ELSIF p_validation_mode='UPDATE' THEN
5135: EXCEPTION
5136: WHEN no_data_found THEN
5137: fnd_message.set_name('CSI', 'CSI_INVALID_INSTALL_ID');
5138: fnd_message.set_token('install_site_use_id',p_install_site_use_id);
5139: fnd_msg_pub.add;
5140: x_return_status := fnd_api.g_ret_sts_error;
5141: END;
5142: END IF;
5143: END IF;
5142: END IF;
5143: END IF;
5144:
5145: -- standard call to get message count and if count is 1, get message info.
5146: fnd_msg_pub.count_and_get
5147: ( p_count => x_msg_count,
5148: p_data => x_msg_data
5149: );
5150:
5163: BEGIN
5164:
5165: IF fnd_api.to_boolean( p_init_msg_list )
5166: THEN
5167: fnd_msg_pub.initialize;
5168: END IF;
5169:
5170:
5171: x_return_status := fnd_api.g_ret_sts_success;
5181: EXCEPTION
5182: WHEN no_data_found THEN
5183: fnd_message.set_name('CSI', 'CSI_INVALID_AUTOSYS_ID');
5184: fnd_message.set_token('autocreated_from_system_id',p_auto_sys_id);
5185: fnd_msg_pub.add;
5186: x_return_status := fnd_api.g_ret_sts_error;
5187: END;
5188: END IF;
5189: END IF;
5188: END IF;
5189: END IF;
5190:
5191: -- standard call to get message count and if count is 1, get message info.
5192: fnd_msg_pub.count_and_get
5193: ( p_count => x_msg_count,
5194: p_data => x_msg_data
5195: );
5196:
5211: BEGIN
5212:
5213: IF fnd_api.to_boolean( p_init_msg_list )
5214: THEN
5215: fnd_msg_pub.initialize;
5216: END IF;
5217:
5218:
5219: x_return_status := fnd_api.g_ret_sts_success;
5225: IF (p_start_date > p_end_date)
5226: THEN
5227: fnd_message.set_name('CSI', 'CSI_INVALID_START_DATE');
5228: fnd_message.set_token('START_DATE_ACTIVE',p_start_date);
5229: fnd_msg_pub.add;
5230: x_return_status := fnd_api.g_ret_sts_error;
5231: END IF;
5232: ELSIF ( (p_start_date IS NULL) OR (p_start_date = fnd_api.g_miss_date) )
5233: AND ( (p_end_date IS NOT NULL) AND (p_end_date<>fnd_api.g_miss_date) )
5233: AND ( (p_end_date IS NOT NULL) AND (p_end_date<>fnd_api.g_miss_date) )
5234: THEN
5235: fnd_message.set_name('CSI', 'CSI_INVALID_END_DATE');
5236: fnd_message.set_token('END_DATE_ACTIVE',p_end_date);
5237: fnd_msg_pub.add;
5238: x_return_status := fnd_api.g_ret_sts_error;
5239: END IF;
5240: END IF;
5241:
5247: THEN
5248: fnd_message.set_name('CSI', 'CSI_START_DATE_GREATER');
5249: fnd_message.set_token('START_DATE_ACTIVE',p_start_date);
5250: fnd_message.set_token('END_DATE_ACTIVE',p_end_date);
5251: fnd_msg_pub.add;
5252: x_return_status := fnd_api.g_ret_sts_error;
5253: END IF;
5254: ELSIF ( (p_start_date IS NULL) OR (p_start_date = fnd_api.g_miss_date) )
5255: AND ( (p_end_date IS NOT NULL) AND (p_end_date<>fnd_api.g_miss_date) )
5263: THEN
5264: fnd_message.set_name('CSI', 'CSI_START_DATE_GREATER');
5265: fnd_message.set_token('START_DATE_ACTIVE',l_start_date_active);
5266: fnd_message.set_token('END_DATE_ACTIVE',p_end_date);
5267: fnd_msg_pub.add;
5268: x_return_status := fnd_api.g_ret_sts_error;
5269: END IF;
5270: EXCEPTION
5271: WHEN NO_DATA_FOUND THEN
5270: EXCEPTION
5271: WHEN NO_DATA_FOUND THEN
5272: fnd_message.set_name('CSI', 'CSI_INVALID_END_DATE');
5273: fnd_message.set_token('END_DATE_ACTIVE',p_end_date);
5274: fnd_msg_pub.add;
5275: x_return_status := fnd_api.g_ret_sts_error;
5276: END;
5277: END IF;
5278: END IF;
5277: END IF;
5278: END IF;
5279:
5280: -- standard call to get message count and if count is 1, get message info.
5281: fnd_msg_pub.count_and_get
5282: ( p_count => x_msg_count,
5283: p_data => x_msg_data
5284: );
5285:
5300: BEGIN
5301: -- initialize message list if p_init_msg_list is set to true.
5302: IF fnd_api.to_boolean( p_init_msg_list )
5303: THEN
5304: fnd_msg_pub.initialize;
5305: END IF;
5306:
5307:
5308: -- initialize api return status to success
5316: NULL;
5317: ELSE
5318: fnd_message.set_name('CSI', 'CSI_SYS_NAME_NOT_PASSED');
5319: fnd_message.set_token('REQUIRED_PARAM','SYSTEM_NAME');
5320: fnd_msg_pub.add;
5321: x_return_status := fnd_api.g_ret_sts_error;
5322: END IF;
5323: END IF;
5324: END IF;
5326: IF p_validation_mode='UPDATE' THEN
5327: IF ( (p_name IS NULL) OR (p_name=fnd_api.g_miss_char) ) THEN
5328: fnd_message.set_name('CSI', 'CSI_SYS_NAME_NOT_PASSED');
5329: fnd_message.set_token('REQUIRED_PARAM','SYSTEM_NAME');
5330: fnd_msg_pub.add;
5331: x_return_status := fnd_api.g_ret_sts_error;
5332: END IF;
5333: END IF;
5334:
5333: END IF;
5334:
5335:
5336: -- standard call to get message count and if count is 1, get message info.
5337: fnd_msg_pub.count_and_get
5338: ( p_count => x_msg_count,
5339: p_data => x_msg_data
5340: );
5341:
5356:
5357: -- initialize message list if p_init_msg_list is set to true.
5358: IF fnd_api.to_boolean( p_init_msg_list )
5359: THEN
5360: fnd_msg_pub.initialize;
5361: END IF;
5362:
5363:
5364: -- initialize api return status to success
5369:
5370: IF ( (p_validation_mode = 'UPDATE') OR (p_validation_mode = 'EXPIRE') ) THEN
5371: IF ( (p_object_version_number IS NULL) OR (p_object_version_number = fnd_api.g_miss_num) ) THEN
5372: fnd_message.set_name('CSI', 'CSI_MISSING_OBJ_VER_NUM');
5373: fnd_msg_pub.add;
5374: x_return_status := fnd_api.g_ret_sts_error;
5375: END IF;
5376: END IF;
5377:
5375: END IF;
5376: END IF;
5377:
5378: -- standard call to get message count and if count is 1, get message info.
5379: fnd_msg_pub.count_and_get
5380: ( p_count => x_msg_count,
5381: p_data => x_msg_data
5382: );
5383:
5586:
5587: -- initialize message list if p_init_msg_list is set to true.
5588: IF fnd_api.to_boolean( p_init_msg_list )
5589: THEN
5590: fnd_msg_pub.initialize;
5591: END IF;
5592:
5593:
5594:
5619: AND ((p_system_query_rec.system_number IS NULL) OR (p_system_query_rec.system_number = fnd_api.g_miss_char))
5620: )
5621: THEN
5622: fnd_message.set_name('CSI', 'CSI_INVALID_PARAMETERS');
5623: fnd_msg_pub.add;
5624: x_return_status := fnd_api.g_ret_sts_error;
5625: RAISE fnd_api.g_exc_error;
5626: END IF;
5627:
5674: THEN
5675: csi_gen_utility_pvt.put_line('Warning! History for this entity has already been purged for the datetime stamp passed. ' ||
5676: 'Please provide a valid datetime stamp.');
5677: FND_MESSAGE.Set_Name('CSI', 'CSI_API_HIST_AFTER_PURGE_REQ');
5678: FND_MSG_PUB.ADD;
5679: ELSE
5680: get_history( p_sys_rec => l_sys_rec
5681: ,p_new_rec => l_new_rec
5682: ,p_flag => l_flag
5757: csi_systems_pvt.Resolve_ID_Columns(p_system_header_tbl => x_system_header_tbl);
5758: END IF;
5759:
5760: -- standard call to get message count and if count is 1, get message info.
5761: fnd_msg_pub.count_and_get
5762: ( p_count => x_msg_count,
5763: p_data => x_msg_data
5764: );
5765: EXCEPTION
5765: EXCEPTION
5766: WHEN fnd_api.g_exc_error THEN
5767: ROLLBACK TO get_system_details;
5768: x_return_status := fnd_api.g_ret_sts_error ;
5769: fnd_msg_pub.count_and_get
5770: (p_count => x_msg_count ,
5771: p_data => x_msg_data
5772: );
5773:
5773:
5774: WHEN fnd_api.g_exc_unexpected_error THEN
5775: ROLLBACK TO get_system_details;
5776: x_return_status := fnd_api.g_ret_sts_unexp_error ;
5777: fnd_msg_pub.count_and_get
5778: (p_count => x_msg_count ,
5779: p_data => x_msg_data
5780: );
5781:
5781:
5782: WHEN OTHERS THEN
5783: ROLLBACK TO get_system_details;
5784: x_return_status := fnd_api.g_ret_sts_unexp_error ;
5785: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
5786: fnd_msg_pub.add_exc_msg(g_pkg_name ,l_api_name);
5787: END IF;
5788: fnd_msg_pub.count_and_get
5789: (p_count => x_msg_count ,
5782: WHEN OTHERS THEN
5783: ROLLBACK TO get_system_details;
5784: x_return_status := fnd_api.g_ret_sts_unexp_error ;
5785: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
5786: fnd_msg_pub.add_exc_msg(g_pkg_name ,l_api_name);
5787: END IF;
5788: fnd_msg_pub.count_and_get
5789: (p_count => x_msg_count ,
5790: p_data => x_msg_data
5784: x_return_status := fnd_api.g_ret_sts_unexp_error ;
5785: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
5786: fnd_msg_pub.add_exc_msg(g_pkg_name ,l_api_name);
5787: END IF;
5788: fnd_msg_pub.count_and_get
5789: (p_count => x_msg_count ,
5790: p_data => x_msg_data
5791: );
5792:
6135: END IF;
6136:
6137: -- Initialize message list if p_init_msg_list is set to TRUE.
6138: IF FND_API.to_Boolean( p_init_msg_list ) THEN
6139: FND_MSG_PUB.initialize;
6140: END IF;
6141:
6142: -- Initialize API return status to success
6143: x_return_status := FND_API.G_RET_STS_SUCCESS;
6672: -- End disable trace
6673: ****/
6674:
6675: -- Standard call to get message count and if count is get message info.
6676: FND_MSG_PUB.Count_And_Get
6677: (p_count => x_msg_count ,
6678: p_data => x_msg_data );
6679: EXCEPTION
6680: WHEN OTHERS THEN
6681: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6682: IF fnd_api.to_boolean(p_commit) THEN
6683: ROLLBACK TO get_system_history;
6684: END IF;
6685: IF FND_MSG_PUB.Check_Msg_Level
6686: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6687: THEN
6688: FND_MSG_PUB.Add_Exc_Msg
6689: ( G_PKG_NAME, l_api_name );
6682: IF fnd_api.to_boolean(p_commit) THEN
6683: ROLLBACK TO get_system_history;
6684: END IF;
6685: IF FND_MSG_PUB.Check_Msg_Level
6686: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6687: THEN
6688: FND_MSG_PUB.Add_Exc_Msg
6689: ( G_PKG_NAME, l_api_name );
6690: END IF;
6684: END IF;
6685: IF FND_MSG_PUB.Check_Msg_Level
6686: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6687: THEN
6688: FND_MSG_PUB.Add_Exc_Msg
6689: ( G_PKG_NAME, l_api_name );
6690: END IF;
6691: FND_MSG_PUB.Count_And_Get
6692: ( p_count => x_msg_count,
6687: THEN
6688: FND_MSG_PUB.Add_Exc_Msg
6689: ( G_PKG_NAME, l_api_name );
6690: END IF;
6691: FND_MSG_PUB.Count_And_Get
6692: ( p_count => x_msg_count,
6693: p_data => x_msg_data);
6694:
6695: END Get_System_History;