68:
69: -- Initialize message list if p_init_msg_list is set to TRUE.
70: IF fnd_api.to_boolean (p_init_msg_list)
71: THEN
72: fnd_msg_pub.initialize;
73: END IF;
74:
75: -- Initialize API return status to success
76: x_return_status := fnd_api.g_ret_sts_success;
84: AND org_id = p_prd_quota.org_id;
85:
86: IF l_temp_count < 1
87: THEN
88: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
89: THEN
90: fnd_message.set_name ('CN', 'CN_INCONSISTENT_DATA');
91: fnd_message.set_token ('INPUT1', cn_api.get_lkup_meaning ('ORGANIZATION', 'PE_OBJECT_TYPE'));
92: fnd_message.set_token ('INPUT2', cn_api.get_lkup_meaning ('PE', 'INPUT_TOKEN'));
92: fnd_message.set_token ('INPUT2', cn_api.get_lkup_meaning ('PE', 'INPUT_TOKEN'));
93: fnd_message.set_token ('INPUT3', cn_api.get_lkup_meaning ('PERIOD', 'PERIOD_TYPE_CODE'));
94: fnd_message.set_token ('INPUT4', cn_api.get_lkup_meaning (' ', 'INPUT_TOKEN'));
95: fnd_message.set_token ('INPUT5', ' ');
96: fnd_msg_pub.ADD;
97: END IF;
98:
99: RAISE fnd_api.g_exc_error;
100: END IF;
108: CLOSE l_old_prd_quota_cr;
109:
110: IF p_prd_quota.object_version_number IS NULL
111: THEN
112: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
113: THEN
114: fnd_message.set_name ('CN', 'CN_INPUT_CANT_NULL');
115: fnd_message.set_token ('INPUT_NAME', cn_api.get_lkup_meaning ('ORGANIZATION', 'PE_OBJECT_TYPE'));
116: fnd_msg_pub.ADD;
112: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
113: THEN
114: fnd_message.set_name ('CN', 'CN_INPUT_CANT_NULL');
115: fnd_message.set_token ('INPUT_NAME', cn_api.get_lkup_meaning ('ORGANIZATION', 'PE_OBJECT_TYPE'));
116: fnd_msg_pub.ADD;
117: RAISE fnd_api.g_exc_error;
118: END IF;
119: END IF;
120:
121: -- 3. check object version number
122: IF l_old_prd_quota.object_version_number <> p_prd_quota.object_version_number
123: THEN
124: fnd_message.set_name ('CN', 'CN_RECORD_CHANGED');
125: fnd_msg_pub.ADD;
126: RAISE fnd_api.g_exc_error;
127: END IF;
128:
129: p_prd_quota.last_update_date := SYSDATE;
155: COMMIT WORK;
156: END IF;
157:
158: -- Standard call to get message count and if count is 1, get message info.
159: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
160: EXCEPTION
161: WHEN fnd_api.g_exc_error
162: THEN
163: ROLLBACK TO update_prd_quota;
161: WHEN fnd_api.g_exc_error
162: THEN
163: ROLLBACK TO update_prd_quota;
164: x_return_status := fnd_api.g_ret_sts_error;
165: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
166: WHEN fnd_api.g_exc_unexpected_error
167: THEN
168: ROLLBACK TO update_prd_quota;
169: x_return_status := fnd_api.g_ret_sts_unexp_error;
166: WHEN fnd_api.g_exc_unexpected_error
167: THEN
168: ROLLBACK TO update_prd_quota;
169: x_return_status := fnd_api.g_ret_sts_unexp_error;
170: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
171: WHEN OTHERS
172: THEN
173: ROLLBACK TO update_prd_quota;
174: x_return_status := fnd_api.g_ret_sts_unexp_error;
172: THEN
173: ROLLBACK TO update_prd_quota;
174: x_return_status := fnd_api.g_ret_sts_unexp_error;
175:
176: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
177: THEN
178: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
179: END IF;
180:
174: x_return_status := fnd_api.g_ret_sts_unexp_error;
175:
176: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
177: THEN
178: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
179: END IF;
180:
181: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
182: END update_period_quota;
177: THEN
178: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
179: END IF;
180:
181: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
182: END update_period_quota;
183:
184: END cn_prd_quota_pvt;