[Home] [Help]
71: IF p_id IS NULL
72: THEN
73: fnd_message.set_name ('FND', 'MO_OU_REQUIRED');
74: fnd_msg_pub.ADD;
75: RAISE fnd_api.g_exc_error;
76: END IF;
77: END;
78:
79: -- Start of comments
83: -- Pre-reqs : None.
84: -- Parameters :
85: -- IN : p_api_version IN NUMBER Required
86: -- p_init_msg_list IN VARCHAR2 Optional
87: -- Default = FND_API.G_FALSE
88: -- p_commit IN VARCHAR2 Optional
89: -- Default = FND_API.G_FALSE
90: -- p_validation_level IN NUMBER Optional
91: -- Default = FND_API.G_VALID_LEVEL_FULL
85: -- IN : p_api_version IN NUMBER Required
86: -- p_init_msg_list IN VARCHAR2 Optional
87: -- Default = FND_API.G_FALSE
88: -- p_commit IN VARCHAR2 Optional
89: -- Default = FND_API.G_FALSE
90: -- p_validation_level IN NUMBER Optional
91: -- Default = FND_API.G_VALID_LEVEL_FULL
92: -- p_comp_plan IN comp_plan_rec_type
93: -- OUT : x_return_status OUT VARCHAR2(1)
87: -- Default = FND_API.G_FALSE
88: -- p_commit IN VARCHAR2 Optional
89: -- Default = FND_API.G_FALSE
90: -- p_validation_level IN NUMBER Optional
91: -- Default = FND_API.G_VALID_LEVEL_FULL
92: -- p_comp_plan IN comp_plan_rec_type
93: -- OUT : x_return_status OUT VARCHAR2(1)
94: -- x_msg_count OUT NUMBER
95: -- x_msg_data OUT VARCHAR2(2000)
99: --
100: -- End of comments
101: PROCEDURE create_comp_plan (
102: p_api_version IN NUMBER,
103: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
104: p_commit IN VARCHAR2 := fnd_api.g_false,
105: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
106: p_comp_plan IN OUT NOCOPY comp_plan_rec_type,
107: x_comp_plan_id OUT NOCOPY NUMBER,
100: -- End of comments
101: PROCEDURE create_comp_plan (
102: p_api_version IN NUMBER,
103: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
104: p_commit IN VARCHAR2 := fnd_api.g_false,
105: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
106: p_comp_plan IN OUT NOCOPY comp_plan_rec_type,
107: x_comp_plan_id OUT NOCOPY NUMBER,
108: x_return_status OUT NOCOPY VARCHAR2,
101: PROCEDURE create_comp_plan (
102: p_api_version IN NUMBER,
103: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
104: p_commit IN VARCHAR2 := fnd_api.g_false,
105: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
106: p_comp_plan IN OUT NOCOPY comp_plan_rec_type,
107: x_comp_plan_id OUT NOCOPY NUMBER,
108: x_return_status OUT NOCOPY VARCHAR2,
109: x_msg_count OUT NOCOPY NUMBER,
121: -- Standard Start of API savepoint
122: SAVEPOINT create_comp_plan;
123:
124: -- Standard call to check for call compatibility.
125: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name)
126: THEN
127: RAISE fnd_api.g_exc_unexpected_error;
128: END IF;
129:
123:
124: -- Standard call to check for call compatibility.
125: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name)
126: THEN
127: RAISE fnd_api.g_exc_unexpected_error;
128: END IF;
129:
130: -- Initialize message list if p_init_msg_list is set to TRUE.
131: IF fnd_api.to_boolean (p_init_msg_list)
127: RAISE fnd_api.g_exc_unexpected_error;
128: END IF;
129:
130: -- Initialize message list if p_init_msg_list is set to TRUE.
131: IF fnd_api.to_boolean (p_init_msg_list)
132: THEN
133: fnd_msg_pub.initialize;
134: END IF;
135:
133: fnd_msg_pub.initialize;
134: END IF;
135:
136: -- Initialize API return status to success
137: x_return_status := fnd_api.g_ret_sts_success;
138: -- API body
139: x_comp_plan_id := p_comp_plan.comp_plan_id;
140: -- *** Check the ORG_ID is null or not ***
141: check_org_id (p_comp_plan.org_id);
139: x_comp_plan_id := p_comp_plan.comp_plan_id;
140: -- *** Check the ORG_ID is null or not ***
141: check_org_id (p_comp_plan.org_id);
142:
143: -- Convert fnd_api.g_miss to NULL
144:
145: -- 1. name can not be null
146: IF (p_comp_plan.NAME IS NULL)
147: OR (p_comp_plan.NAME = fnd_api.g_miss_char)
143: -- Convert fnd_api.g_miss to NULL
144:
145: -- 1. name can not be null
146: IF (p_comp_plan.NAME IS NULL)
147: OR (p_comp_plan.NAME = fnd_api.g_miss_char)
148: OR (p_comp_plan.start_date IS NULL)
149: OR (p_comp_plan.start_date = fnd_api.g_miss_date)
150: THEN
151: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
145: -- 1. name can not be null
146: IF (p_comp_plan.NAME IS NULL)
147: OR (p_comp_plan.NAME = fnd_api.g_miss_char)
148: OR (p_comp_plan.start_date IS NULL)
149: OR (p_comp_plan.start_date = fnd_api.g_miss_date)
150: THEN
151: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
152: THEN
153: fnd_message.set_name ('CN', 'CN_REQ_PAR_MISSING');
153: fnd_message.set_name ('CN', 'CN_REQ_PAR_MISSING');
154: fnd_msg_pub.ADD;
155: END IF;
156:
157: RAISE fnd_api.g_exc_error;
158: END IF;
159:
160: -- 2. comp plan name must be unique
161: SELECT COUNT (1)
171: fnd_message.set_token ('INPUT_NAME', cn_api.get_lkup_meaning ('NAME', 'INPUT_TOKEN'));
172: fnd_msg_pub.ADD;
173: END IF;
174:
175: RAISE fnd_api.g_exc_error;
176: END IF;
177:
178: -- start date > end date
179: IF (p_comp_plan.end_date IS NOT NULL) AND (p_comp_plan.start_date > p_comp_plan.end_date)
183: fnd_message.set_name ('CN', 'CN_DATE_RANGE_ERROR');
184: fnd_msg_pub.ADD;
185: END IF;
186:
187: RAISE fnd_api.g_exc_error;
188: END IF;
189:
190: -- calling public api
191: SELECT DECODE (p_comp_plan.NAME, fnd_api.g_miss_char, NULL, p_comp_plan.NAME),
187: RAISE fnd_api.g_exc_error;
188: END IF;
189:
190: -- calling public api
191: SELECT DECODE (p_comp_plan.NAME, fnd_api.g_miss_char, NULL, p_comp_plan.NAME),
192: DECODE (p_comp_plan.description, fnd_api.g_miss_char, NULL, p_comp_plan.description),
193: 'INCOMPLETE',
194: DECODE (p_comp_plan.allow_rev_class_overlap, fnd_api.g_miss_char, NULL, p_comp_plan.allow_rev_class_overlap),
195: DECODE (p_comp_plan.sum_trx_flag, fnd_api.g_miss_char, NULL, p_comp_plan.sum_trx_flag),
188: END IF;
189:
190: -- calling public api
191: SELECT DECODE (p_comp_plan.NAME, fnd_api.g_miss_char, NULL, p_comp_plan.NAME),
192: DECODE (p_comp_plan.description, fnd_api.g_miss_char, NULL, p_comp_plan.description),
193: 'INCOMPLETE',
194: DECODE (p_comp_plan.allow_rev_class_overlap, fnd_api.g_miss_char, NULL, p_comp_plan.allow_rev_class_overlap),
195: DECODE (p_comp_plan.sum_trx_flag, fnd_api.g_miss_char, NULL, p_comp_plan.sum_trx_flag),
196: DECODE (p_comp_plan.start_date, fnd_api.g_miss_date, NULL, TRUNC (p_comp_plan.start_date)),
190: -- calling public api
191: SELECT DECODE (p_comp_plan.NAME, fnd_api.g_miss_char, NULL, p_comp_plan.NAME),
192: DECODE (p_comp_plan.description, fnd_api.g_miss_char, NULL, p_comp_plan.description),
193: 'INCOMPLETE',
194: DECODE (p_comp_plan.allow_rev_class_overlap, fnd_api.g_miss_char, NULL, p_comp_plan.allow_rev_class_overlap),
195: DECODE (p_comp_plan.sum_trx_flag, fnd_api.g_miss_char, NULL, p_comp_plan.sum_trx_flag),
196: DECODE (p_comp_plan.start_date, fnd_api.g_miss_date, NULL, TRUNC (p_comp_plan.start_date)),
197: DECODE (p_comp_plan.end_date, fnd_api.g_miss_date, NULL, TRUNC (p_comp_plan.end_date)),
198: NULL,
191: SELECT DECODE (p_comp_plan.NAME, fnd_api.g_miss_char, NULL, p_comp_plan.NAME),
192: DECODE (p_comp_plan.description, fnd_api.g_miss_char, NULL, p_comp_plan.description),
193: 'INCOMPLETE',
194: DECODE (p_comp_plan.allow_rev_class_overlap, fnd_api.g_miss_char, NULL, p_comp_plan.allow_rev_class_overlap),
195: DECODE (p_comp_plan.sum_trx_flag, fnd_api.g_miss_char, NULL, p_comp_plan.sum_trx_flag),
196: DECODE (p_comp_plan.start_date, fnd_api.g_miss_date, NULL, TRUNC (p_comp_plan.start_date)),
197: DECODE (p_comp_plan.end_date, fnd_api.g_miss_date, NULL, TRUNC (p_comp_plan.end_date)),
198: NULL,
199: DECODE (p_comp_plan.attribute_category, fnd_api.g_miss_char, NULL, p_comp_plan.attribute_category),
192: DECODE (p_comp_plan.description, fnd_api.g_miss_char, NULL, p_comp_plan.description),
193: 'INCOMPLETE',
194: DECODE (p_comp_plan.allow_rev_class_overlap, fnd_api.g_miss_char, NULL, p_comp_plan.allow_rev_class_overlap),
195: DECODE (p_comp_plan.sum_trx_flag, fnd_api.g_miss_char, NULL, p_comp_plan.sum_trx_flag),
196: DECODE (p_comp_plan.start_date, fnd_api.g_miss_date, NULL, TRUNC (p_comp_plan.start_date)),
197: DECODE (p_comp_plan.end_date, fnd_api.g_miss_date, NULL, TRUNC (p_comp_plan.end_date)),
198: NULL,
199: DECODE (p_comp_plan.attribute_category, fnd_api.g_miss_char, NULL, p_comp_plan.attribute_category),
200: DECODE (p_comp_plan.attribute1, fnd_api.g_miss_char, NULL, p_comp_plan.attribute1),
193: 'INCOMPLETE',
194: DECODE (p_comp_plan.allow_rev_class_overlap, fnd_api.g_miss_char, NULL, p_comp_plan.allow_rev_class_overlap),
195: DECODE (p_comp_plan.sum_trx_flag, fnd_api.g_miss_char, NULL, p_comp_plan.sum_trx_flag),
196: DECODE (p_comp_plan.start_date, fnd_api.g_miss_date, NULL, TRUNC (p_comp_plan.start_date)),
197: DECODE (p_comp_plan.end_date, fnd_api.g_miss_date, NULL, TRUNC (p_comp_plan.end_date)),
198: NULL,
199: DECODE (p_comp_plan.attribute_category, fnd_api.g_miss_char, NULL, p_comp_plan.attribute_category),
200: DECODE (p_comp_plan.attribute1, fnd_api.g_miss_char, NULL, p_comp_plan.attribute1),
201: DECODE (p_comp_plan.attribute2, fnd_api.g_miss_char, NULL, p_comp_plan.attribute2),
195: DECODE (p_comp_plan.sum_trx_flag, fnd_api.g_miss_char, NULL, p_comp_plan.sum_trx_flag),
196: DECODE (p_comp_plan.start_date, fnd_api.g_miss_date, NULL, TRUNC (p_comp_plan.start_date)),
197: DECODE (p_comp_plan.end_date, fnd_api.g_miss_date, NULL, TRUNC (p_comp_plan.end_date)),
198: NULL,
199: DECODE (p_comp_plan.attribute_category, fnd_api.g_miss_char, NULL, p_comp_plan.attribute_category),
200: DECODE (p_comp_plan.attribute1, fnd_api.g_miss_char, NULL, p_comp_plan.attribute1),
201: DECODE (p_comp_plan.attribute2, fnd_api.g_miss_char, NULL, p_comp_plan.attribute2),
202: DECODE (p_comp_plan.attribute3, fnd_api.g_miss_char, NULL, p_comp_plan.attribute3),
203: DECODE (p_comp_plan.attribute4, fnd_api.g_miss_char, NULL, p_comp_plan.attribute4),
196: DECODE (p_comp_plan.start_date, fnd_api.g_miss_date, NULL, TRUNC (p_comp_plan.start_date)),
197: DECODE (p_comp_plan.end_date, fnd_api.g_miss_date, NULL, TRUNC (p_comp_plan.end_date)),
198: NULL,
199: DECODE (p_comp_plan.attribute_category, fnd_api.g_miss_char, NULL, p_comp_plan.attribute_category),
200: DECODE (p_comp_plan.attribute1, fnd_api.g_miss_char, NULL, p_comp_plan.attribute1),
201: DECODE (p_comp_plan.attribute2, fnd_api.g_miss_char, NULL, p_comp_plan.attribute2),
202: DECODE (p_comp_plan.attribute3, fnd_api.g_miss_char, NULL, p_comp_plan.attribute3),
203: DECODE (p_comp_plan.attribute4, fnd_api.g_miss_char, NULL, p_comp_plan.attribute4),
204: DECODE (p_comp_plan.attribute5, fnd_api.g_miss_char, NULL, p_comp_plan.attribute5),
197: DECODE (p_comp_plan.end_date, fnd_api.g_miss_date, NULL, TRUNC (p_comp_plan.end_date)),
198: NULL,
199: DECODE (p_comp_plan.attribute_category, fnd_api.g_miss_char, NULL, p_comp_plan.attribute_category),
200: DECODE (p_comp_plan.attribute1, fnd_api.g_miss_char, NULL, p_comp_plan.attribute1),
201: DECODE (p_comp_plan.attribute2, fnd_api.g_miss_char, NULL, p_comp_plan.attribute2),
202: DECODE (p_comp_plan.attribute3, fnd_api.g_miss_char, NULL, p_comp_plan.attribute3),
203: DECODE (p_comp_plan.attribute4, fnd_api.g_miss_char, NULL, p_comp_plan.attribute4),
204: DECODE (p_comp_plan.attribute5, fnd_api.g_miss_char, NULL, p_comp_plan.attribute5),
205: DECODE (p_comp_plan.attribute6, fnd_api.g_miss_char, NULL, p_comp_plan.attribute6),
198: NULL,
199: DECODE (p_comp_plan.attribute_category, fnd_api.g_miss_char, NULL, p_comp_plan.attribute_category),
200: DECODE (p_comp_plan.attribute1, fnd_api.g_miss_char, NULL, p_comp_plan.attribute1),
201: DECODE (p_comp_plan.attribute2, fnd_api.g_miss_char, NULL, p_comp_plan.attribute2),
202: DECODE (p_comp_plan.attribute3, fnd_api.g_miss_char, NULL, p_comp_plan.attribute3),
203: DECODE (p_comp_plan.attribute4, fnd_api.g_miss_char, NULL, p_comp_plan.attribute4),
204: DECODE (p_comp_plan.attribute5, fnd_api.g_miss_char, NULL, p_comp_plan.attribute5),
205: DECODE (p_comp_plan.attribute6, fnd_api.g_miss_char, NULL, p_comp_plan.attribute6),
206: DECODE (p_comp_plan.attribute7, fnd_api.g_miss_char, NULL, p_comp_plan.attribute7),
199: DECODE (p_comp_plan.attribute_category, fnd_api.g_miss_char, NULL, p_comp_plan.attribute_category),
200: DECODE (p_comp_plan.attribute1, fnd_api.g_miss_char, NULL, p_comp_plan.attribute1),
201: DECODE (p_comp_plan.attribute2, fnd_api.g_miss_char, NULL, p_comp_plan.attribute2),
202: DECODE (p_comp_plan.attribute3, fnd_api.g_miss_char, NULL, p_comp_plan.attribute3),
203: DECODE (p_comp_plan.attribute4, fnd_api.g_miss_char, NULL, p_comp_plan.attribute4),
204: DECODE (p_comp_plan.attribute5, fnd_api.g_miss_char, NULL, p_comp_plan.attribute5),
205: DECODE (p_comp_plan.attribute6, fnd_api.g_miss_char, NULL, p_comp_plan.attribute6),
206: DECODE (p_comp_plan.attribute7, fnd_api.g_miss_char, NULL, p_comp_plan.attribute7),
207: DECODE (p_comp_plan.attribute8, fnd_api.g_miss_char, NULL, p_comp_plan.attribute8),
200: DECODE (p_comp_plan.attribute1, fnd_api.g_miss_char, NULL, p_comp_plan.attribute1),
201: DECODE (p_comp_plan.attribute2, fnd_api.g_miss_char, NULL, p_comp_plan.attribute2),
202: DECODE (p_comp_plan.attribute3, fnd_api.g_miss_char, NULL, p_comp_plan.attribute3),
203: DECODE (p_comp_plan.attribute4, fnd_api.g_miss_char, NULL, p_comp_plan.attribute4),
204: DECODE (p_comp_plan.attribute5, fnd_api.g_miss_char, NULL, p_comp_plan.attribute5),
205: DECODE (p_comp_plan.attribute6, fnd_api.g_miss_char, NULL, p_comp_plan.attribute6),
206: DECODE (p_comp_plan.attribute7, fnd_api.g_miss_char, NULL, p_comp_plan.attribute7),
207: DECODE (p_comp_plan.attribute8, fnd_api.g_miss_char, NULL, p_comp_plan.attribute8),
208: DECODE (p_comp_plan.attribute9, fnd_api.g_miss_char, NULL, p_comp_plan.attribute9),
201: DECODE (p_comp_plan.attribute2, fnd_api.g_miss_char, NULL, p_comp_plan.attribute2),
202: DECODE (p_comp_plan.attribute3, fnd_api.g_miss_char, NULL, p_comp_plan.attribute3),
203: DECODE (p_comp_plan.attribute4, fnd_api.g_miss_char, NULL, p_comp_plan.attribute4),
204: DECODE (p_comp_plan.attribute5, fnd_api.g_miss_char, NULL, p_comp_plan.attribute5),
205: DECODE (p_comp_plan.attribute6, fnd_api.g_miss_char, NULL, p_comp_plan.attribute6),
206: DECODE (p_comp_plan.attribute7, fnd_api.g_miss_char, NULL, p_comp_plan.attribute7),
207: DECODE (p_comp_plan.attribute8, fnd_api.g_miss_char, NULL, p_comp_plan.attribute8),
208: DECODE (p_comp_plan.attribute9, fnd_api.g_miss_char, NULL, p_comp_plan.attribute9),
209: DECODE (p_comp_plan.attribute10, fnd_api.g_miss_char, NULL, p_comp_plan.attribute10),
202: DECODE (p_comp_plan.attribute3, fnd_api.g_miss_char, NULL, p_comp_plan.attribute3),
203: DECODE (p_comp_plan.attribute4, fnd_api.g_miss_char, NULL, p_comp_plan.attribute4),
204: DECODE (p_comp_plan.attribute5, fnd_api.g_miss_char, NULL, p_comp_plan.attribute5),
205: DECODE (p_comp_plan.attribute6, fnd_api.g_miss_char, NULL, p_comp_plan.attribute6),
206: DECODE (p_comp_plan.attribute7, fnd_api.g_miss_char, NULL, p_comp_plan.attribute7),
207: DECODE (p_comp_plan.attribute8, fnd_api.g_miss_char, NULL, p_comp_plan.attribute8),
208: DECODE (p_comp_plan.attribute9, fnd_api.g_miss_char, NULL, p_comp_plan.attribute9),
209: DECODE (p_comp_plan.attribute10, fnd_api.g_miss_char, NULL, p_comp_plan.attribute10),
210: DECODE (p_comp_plan.attribute11, fnd_api.g_miss_char, NULL, p_comp_plan.attribute11),
203: DECODE (p_comp_plan.attribute4, fnd_api.g_miss_char, NULL, p_comp_plan.attribute4),
204: DECODE (p_comp_plan.attribute5, fnd_api.g_miss_char, NULL, p_comp_plan.attribute5),
205: DECODE (p_comp_plan.attribute6, fnd_api.g_miss_char, NULL, p_comp_plan.attribute6),
206: DECODE (p_comp_plan.attribute7, fnd_api.g_miss_char, NULL, p_comp_plan.attribute7),
207: DECODE (p_comp_plan.attribute8, fnd_api.g_miss_char, NULL, p_comp_plan.attribute8),
208: DECODE (p_comp_plan.attribute9, fnd_api.g_miss_char, NULL, p_comp_plan.attribute9),
209: DECODE (p_comp_plan.attribute10, fnd_api.g_miss_char, NULL, p_comp_plan.attribute10),
210: DECODE (p_comp_plan.attribute11, fnd_api.g_miss_char, NULL, p_comp_plan.attribute11),
211: DECODE (p_comp_plan.attribute12, fnd_api.g_miss_char, NULL, p_comp_plan.attribute12),
204: DECODE (p_comp_plan.attribute5, fnd_api.g_miss_char, NULL, p_comp_plan.attribute5),
205: DECODE (p_comp_plan.attribute6, fnd_api.g_miss_char, NULL, p_comp_plan.attribute6),
206: DECODE (p_comp_plan.attribute7, fnd_api.g_miss_char, NULL, p_comp_plan.attribute7),
207: DECODE (p_comp_plan.attribute8, fnd_api.g_miss_char, NULL, p_comp_plan.attribute8),
208: DECODE (p_comp_plan.attribute9, fnd_api.g_miss_char, NULL, p_comp_plan.attribute9),
209: DECODE (p_comp_plan.attribute10, fnd_api.g_miss_char, NULL, p_comp_plan.attribute10),
210: DECODE (p_comp_plan.attribute11, fnd_api.g_miss_char, NULL, p_comp_plan.attribute11),
211: DECODE (p_comp_plan.attribute12, fnd_api.g_miss_char, NULL, p_comp_plan.attribute12),
212: DECODE (p_comp_plan.attribute13, fnd_api.g_miss_char, NULL, p_comp_plan.attribute13),
205: DECODE (p_comp_plan.attribute6, fnd_api.g_miss_char, NULL, p_comp_plan.attribute6),
206: DECODE (p_comp_plan.attribute7, fnd_api.g_miss_char, NULL, p_comp_plan.attribute7),
207: DECODE (p_comp_plan.attribute8, fnd_api.g_miss_char, NULL, p_comp_plan.attribute8),
208: DECODE (p_comp_plan.attribute9, fnd_api.g_miss_char, NULL, p_comp_plan.attribute9),
209: DECODE (p_comp_plan.attribute10, fnd_api.g_miss_char, NULL, p_comp_plan.attribute10),
210: DECODE (p_comp_plan.attribute11, fnd_api.g_miss_char, NULL, p_comp_plan.attribute11),
211: DECODE (p_comp_plan.attribute12, fnd_api.g_miss_char, NULL, p_comp_plan.attribute12),
212: DECODE (p_comp_plan.attribute13, fnd_api.g_miss_char, NULL, p_comp_plan.attribute13),
213: DECODE (p_comp_plan.attribute14, fnd_api.g_miss_char, NULL, p_comp_plan.attribute14),
206: DECODE (p_comp_plan.attribute7, fnd_api.g_miss_char, NULL, p_comp_plan.attribute7),
207: DECODE (p_comp_plan.attribute8, fnd_api.g_miss_char, NULL, p_comp_plan.attribute8),
208: DECODE (p_comp_plan.attribute9, fnd_api.g_miss_char, NULL, p_comp_plan.attribute9),
209: DECODE (p_comp_plan.attribute10, fnd_api.g_miss_char, NULL, p_comp_plan.attribute10),
210: DECODE (p_comp_plan.attribute11, fnd_api.g_miss_char, NULL, p_comp_plan.attribute11),
211: DECODE (p_comp_plan.attribute12, fnd_api.g_miss_char, NULL, p_comp_plan.attribute12),
212: DECODE (p_comp_plan.attribute13, fnd_api.g_miss_char, NULL, p_comp_plan.attribute13),
213: DECODE (p_comp_plan.attribute14, fnd_api.g_miss_char, NULL, p_comp_plan.attribute14),
214: DECODE (p_comp_plan.attribute15, fnd_api.g_miss_char, NULL, p_comp_plan.attribute15),
207: DECODE (p_comp_plan.attribute8, fnd_api.g_miss_char, NULL, p_comp_plan.attribute8),
208: DECODE (p_comp_plan.attribute9, fnd_api.g_miss_char, NULL, p_comp_plan.attribute9),
209: DECODE (p_comp_plan.attribute10, fnd_api.g_miss_char, NULL, p_comp_plan.attribute10),
210: DECODE (p_comp_plan.attribute11, fnd_api.g_miss_char, NULL, p_comp_plan.attribute11),
211: DECODE (p_comp_plan.attribute12, fnd_api.g_miss_char, NULL, p_comp_plan.attribute12),
212: DECODE (p_comp_plan.attribute13, fnd_api.g_miss_char, NULL, p_comp_plan.attribute13),
213: DECODE (p_comp_plan.attribute14, fnd_api.g_miss_char, NULL, p_comp_plan.attribute14),
214: DECODE (p_comp_plan.attribute15, fnd_api.g_miss_char, NULL, p_comp_plan.attribute15),
215: DECODE (p_comp_plan.org_id, fnd_api.g_miss_char, NULL, p_comp_plan.org_id)
208: DECODE (p_comp_plan.attribute9, fnd_api.g_miss_char, NULL, p_comp_plan.attribute9),
209: DECODE (p_comp_plan.attribute10, fnd_api.g_miss_char, NULL, p_comp_plan.attribute10),
210: DECODE (p_comp_plan.attribute11, fnd_api.g_miss_char, NULL, p_comp_plan.attribute11),
211: DECODE (p_comp_plan.attribute12, fnd_api.g_miss_char, NULL, p_comp_plan.attribute12),
212: DECODE (p_comp_plan.attribute13, fnd_api.g_miss_char, NULL, p_comp_plan.attribute13),
213: DECODE (p_comp_plan.attribute14, fnd_api.g_miss_char, NULL, p_comp_plan.attribute14),
214: DECODE (p_comp_plan.attribute15, fnd_api.g_miss_char, NULL, p_comp_plan.attribute15),
215: DECODE (p_comp_plan.org_id, fnd_api.g_miss_char, NULL, p_comp_plan.org_id)
216: INTO l_comp_rec.NAME,
209: DECODE (p_comp_plan.attribute10, fnd_api.g_miss_char, NULL, p_comp_plan.attribute10),
210: DECODE (p_comp_plan.attribute11, fnd_api.g_miss_char, NULL, p_comp_plan.attribute11),
211: DECODE (p_comp_plan.attribute12, fnd_api.g_miss_char, NULL, p_comp_plan.attribute12),
212: DECODE (p_comp_plan.attribute13, fnd_api.g_miss_char, NULL, p_comp_plan.attribute13),
213: DECODE (p_comp_plan.attribute14, fnd_api.g_miss_char, NULL, p_comp_plan.attribute14),
214: DECODE (p_comp_plan.attribute15, fnd_api.g_miss_char, NULL, p_comp_plan.attribute15),
215: DECODE (p_comp_plan.org_id, fnd_api.g_miss_char, NULL, p_comp_plan.org_id)
216: INTO l_comp_rec.NAME,
217: l_comp_rec.description,
210: DECODE (p_comp_plan.attribute11, fnd_api.g_miss_char, NULL, p_comp_plan.attribute11),
211: DECODE (p_comp_plan.attribute12, fnd_api.g_miss_char, NULL, p_comp_plan.attribute12),
212: DECODE (p_comp_plan.attribute13, fnd_api.g_miss_char, NULL, p_comp_plan.attribute13),
213: DECODE (p_comp_plan.attribute14, fnd_api.g_miss_char, NULL, p_comp_plan.attribute14),
214: DECODE (p_comp_plan.attribute15, fnd_api.g_miss_char, NULL, p_comp_plan.attribute15),
215: DECODE (p_comp_plan.org_id, fnd_api.g_miss_char, NULL, p_comp_plan.org_id)
216: INTO l_comp_rec.NAME,
217: l_comp_rec.description,
218: l_comp_rec.status,
211: DECODE (p_comp_plan.attribute12, fnd_api.g_miss_char, NULL, p_comp_plan.attribute12),
212: DECODE (p_comp_plan.attribute13, fnd_api.g_miss_char, NULL, p_comp_plan.attribute13),
213: DECODE (p_comp_plan.attribute14, fnd_api.g_miss_char, NULL, p_comp_plan.attribute14),
214: DECODE (p_comp_plan.attribute15, fnd_api.g_miss_char, NULL, p_comp_plan.attribute15),
215: DECODE (p_comp_plan.org_id, fnd_api.g_miss_char, NULL, p_comp_plan.org_id)
216: INTO l_comp_rec.NAME,
217: l_comp_rec.description,
218: l_comp_rec.status,
219: l_comp_rec.rc_overlap,
261: x_comp_plan_id => x_comp_plan_id,
262: x_loading_status => l_loading_status
263: );
264:
265: IF (x_return_status <> fnd_api.g_ret_sts_success)
266: THEN
267: RAISE fnd_api.g_exc_error;
268: END IF;
269:
263: );
264:
265: IF (x_return_status <> fnd_api.g_ret_sts_success)
266: THEN
267: RAISE fnd_api.g_exc_error;
268: END IF;
269:
270: p_comp_plan.object_version_number := get_ovn (x_comp_plan_id);
271:
297: */
298:
299: -- End of API body.
300: -- Standard check of p_commit.
301: IF fnd_api.to_boolean (p_commit)
302: THEN
303: COMMIT WORK;
304: END IF;
305:
303: COMMIT WORK;
304: END IF;
305:
306: -- Standard call to get message count and if count is 1, get message info.
307: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
308: EXCEPTION
309: WHEN fnd_api.g_exc_error
310: THEN
311: ROLLBACK TO create_comp_plan;
305:
306: -- Standard call to get message count and if count is 1, get message info.
307: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
308: EXCEPTION
309: WHEN fnd_api.g_exc_error
310: THEN
311: ROLLBACK TO create_comp_plan;
312: x_return_status := fnd_api.g_ret_sts_error;
313: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
308: EXCEPTION
309: WHEN fnd_api.g_exc_error
310: THEN
311: ROLLBACK TO create_comp_plan;
312: x_return_status := fnd_api.g_ret_sts_error;
313: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
314: WHEN fnd_api.g_exc_unexpected_error
315: THEN
316: ROLLBACK TO create_comp_plan;
309: WHEN fnd_api.g_exc_error
310: THEN
311: ROLLBACK TO create_comp_plan;
312: x_return_status := fnd_api.g_ret_sts_error;
313: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
314: WHEN fnd_api.g_exc_unexpected_error
315: THEN
316: ROLLBACK TO create_comp_plan;
317: x_return_status := fnd_api.g_ret_sts_unexp_error;
310: THEN
311: ROLLBACK TO create_comp_plan;
312: x_return_status := fnd_api.g_ret_sts_error;
313: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
314: WHEN fnd_api.g_exc_unexpected_error
315: THEN
316: ROLLBACK TO create_comp_plan;
317: x_return_status := fnd_api.g_ret_sts_unexp_error;
318: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
313: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
314: WHEN fnd_api.g_exc_unexpected_error
315: THEN
316: ROLLBACK TO create_comp_plan;
317: x_return_status := fnd_api.g_ret_sts_unexp_error;
318: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
319: WHEN OTHERS
320: THEN
321: ROLLBACK TO create_comp_plan;
314: WHEN fnd_api.g_exc_unexpected_error
315: THEN
316: ROLLBACK TO create_comp_plan;
317: x_return_status := fnd_api.g_ret_sts_unexp_error;
318: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
319: WHEN OTHERS
320: THEN
321: ROLLBACK TO create_comp_plan;
322: x_return_status := fnd_api.g_ret_sts_unexp_error;
318: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
319: WHEN OTHERS
320: THEN
321: ROLLBACK TO create_comp_plan;
322: x_return_status := fnd_api.g_ret_sts_unexp_error;
323:
324: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
325: THEN
326: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
325: THEN
326: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
327: END IF;
328:
329: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
330: END create_comp_plan;
331:
332: -- Start of comments
333: -- API name : Update_Comp_Plan
336: -- Pre-reqs : None.
337: -- Parameters :
338: -- IN : p_api_version IN NUMBER Required
339: -- p_init_msg_list IN VARCHAR2 Optional
340: -- Default = FND_API.G_FALSE
341: -- p_commit IN VARCHAR2 Optional
342: -- Default = FND_API.G_FALSE
343: -- p_validation_level IN NUMBER Optional
344: -- Default = FND_API.G_VALID_LEVEL_FULL
338: -- IN : p_api_version IN NUMBER Required
339: -- p_init_msg_list IN VARCHAR2 Optional
340: -- Default = FND_API.G_FALSE
341: -- p_commit IN VARCHAR2 Optional
342: -- Default = FND_API.G_FALSE
343: -- p_validation_level IN NUMBER Optional
344: -- Default = FND_API.G_VALID_LEVEL_FULL
345: -- p_comp_plan IN comp_plan_rec_type
346: -- OUT : x_return_status OUT VARCHAR2(1)
340: -- Default = FND_API.G_FALSE
341: -- p_commit IN VARCHAR2 Optional
342: -- Default = FND_API.G_FALSE
343: -- p_validation_level IN NUMBER Optional
344: -- Default = FND_API.G_VALID_LEVEL_FULL
345: -- p_comp_plan IN comp_plan_rec_type
346: -- OUT : x_return_status OUT VARCHAR2(1)
347: -- x_msg_count OUT NUMBER
348: -- x_msg_data OUT VARCHAR2(2000)
351: --
352: -- End of comments
353: PROCEDURE update_comp_plan (
354: p_api_version IN NUMBER,
355: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
356: p_commit IN VARCHAR2 := fnd_api.g_false,
357: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
358: p_comp_plan IN OUT NOCOPY comp_plan_rec_type,
359: x_return_status OUT NOCOPY VARCHAR2,
352: -- End of comments
353: PROCEDURE update_comp_plan (
354: p_api_version IN NUMBER,
355: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
356: p_commit IN VARCHAR2 := fnd_api.g_false,
357: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
358: p_comp_plan IN OUT NOCOPY comp_plan_rec_type,
359: x_return_status OUT NOCOPY VARCHAR2,
360: x_msg_count OUT NOCOPY NUMBER,
353: PROCEDURE update_comp_plan (
354: p_api_version IN NUMBER,
355: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
356: p_commit IN VARCHAR2 := fnd_api.g_false,
357: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
358: p_comp_plan IN OUT NOCOPY comp_plan_rec_type,
359: x_return_status OUT NOCOPY VARCHAR2,
360: x_msg_count OUT NOCOPY NUMBER,
361: x_msg_data OUT NOCOPY VARCHAR2
412: -- Standard Start of API savepoint
413: SAVEPOINT update_comp_plan;
414:
415: -- Standard call to check for call compatibility.
416: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name)
417: THEN
418: RAISE fnd_api.g_exc_unexpected_error;
419: END IF;
420:
414:
415: -- Standard call to check for call compatibility.
416: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name)
417: THEN
418: RAISE fnd_api.g_exc_unexpected_error;
419: END IF;
420:
421: -- Initialize message list if p_init_msg_list is set to TRUE.
422: IF fnd_api.to_boolean (p_init_msg_list)
418: RAISE fnd_api.g_exc_unexpected_error;
419: END IF;
420:
421: -- Initialize message list if p_init_msg_list is set to TRUE.
422: IF fnd_api.to_boolean (p_init_msg_list)
423: THEN
424: fnd_msg_pub.initialize;
425: END IF;
426:
424: fnd_msg_pub.initialize;
425: END IF;
426:
427: -- Initialize API return status to success
428: x_return_status := fnd_api.g_ret_sts_success;
429: -- API body
430: -- *** Check the ORG_ID is null or not ***
431: check_org_id (p_comp_plan.org_id);
432:
438: fnd_message.set_name ('CN', 'CN_REQ_PAR_MISSING');
439: fnd_msg_pub.ADD;
440: END IF;
441:
442: RAISE fnd_api.g_exc_error;
443: END IF;
444:
445: -- 2. comp plan name must be unique
446: SELECT COUNT (1)
456: fnd_message.set_token ('INPUT_NAME', cn_api.get_lkup_meaning ('NAME', 'INPUT_TOKEN'));
457: fnd_msg_pub.ADD;
458: END IF;
459:
460: RAISE fnd_api.g_exc_error;
461: END IF;
462:
463: -- clku 7/10/2001, bug 1689518
464: -- 3. check whether the revenue classes of the plan elements assigned overlap,
482: INTO l_old_comp_plan;
483:
484: CLOSE l_old_comp_plan_cr;
485:
486: SELECT DECODE (p_comp_plan.start_date, fnd_api.g_miss_date, TRUNC (l_old_comp_plan.start_date), TRUNC (p_comp_plan.start_date)),
487: DECODE (p_comp_plan.end_date, fnd_api.g_miss_date, TRUNC (l_old_comp_plan.end_date), TRUNC (p_comp_plan.end_date))
488: INTO l_start_date,
489: l_end_date
490: FROM DUAL;
483:
484: CLOSE l_old_comp_plan_cr;
485:
486: SELECT DECODE (p_comp_plan.start_date, fnd_api.g_miss_date, TRUNC (l_old_comp_plan.start_date), TRUNC (p_comp_plan.start_date)),
487: DECODE (p_comp_plan.end_date, fnd_api.g_miss_date, TRUNC (l_old_comp_plan.end_date), TRUNC (p_comp_plan.end_date))
488: INTO l_start_date,
489: l_end_date
490: FROM DUAL;
491:
497: fnd_message.set_name ('CN', 'CN_DATE_RANGE_ERROR');
498: fnd_msg_pub.ADD;
499: END IF;
500:
501: RAISE fnd_api.g_exc_error;
502: END IF;
503:
504: -- call table handler
505: SELECT DECODE (p_comp_plan.NAME, fnd_api.g_miss_char, l_old_comp_plan.NAME, p_comp_plan.NAME),
501: RAISE fnd_api.g_exc_error;
502: END IF;
503:
504: -- call table handler
505: SELECT DECODE (p_comp_plan.NAME, fnd_api.g_miss_char, l_old_comp_plan.NAME, p_comp_plan.NAME),
506: DECODE (p_comp_plan.description, fnd_api.g_miss_char, l_old_comp_plan.description, p_comp_plan.description),
507: DECODE (p_comp_plan.allow_rev_class_overlap,
508: fnd_api.g_miss_char, l_old_comp_plan.allow_rev_class_overlap,
509: p_comp_plan.allow_rev_class_overlap
502: END IF;
503:
504: -- call table handler
505: SELECT DECODE (p_comp_plan.NAME, fnd_api.g_miss_char, l_old_comp_plan.NAME, p_comp_plan.NAME),
506: DECODE (p_comp_plan.description, fnd_api.g_miss_char, l_old_comp_plan.description, p_comp_plan.description),
507: DECODE (p_comp_plan.allow_rev_class_overlap,
508: fnd_api.g_miss_char, l_old_comp_plan.allow_rev_class_overlap,
509: p_comp_plan.allow_rev_class_overlap
510: ),
504: -- call table handler
505: SELECT DECODE (p_comp_plan.NAME, fnd_api.g_miss_char, l_old_comp_plan.NAME, p_comp_plan.NAME),
506: DECODE (p_comp_plan.description, fnd_api.g_miss_char, l_old_comp_plan.description, p_comp_plan.description),
507: DECODE (p_comp_plan.allow_rev_class_overlap,
508: fnd_api.g_miss_char, l_old_comp_plan.allow_rev_class_overlap,
509: p_comp_plan.allow_rev_class_overlap
510: ),
511: DECODE (p_comp_plan.sum_trx_flag,
512: fnd_api.g_miss_char, l_old_comp_plan.sum_trx_flag,
508: fnd_api.g_miss_char, l_old_comp_plan.allow_rev_class_overlap,
509: p_comp_plan.allow_rev_class_overlap
510: ),
511: DECODE (p_comp_plan.sum_trx_flag,
512: fnd_api.g_miss_char, l_old_comp_plan.sum_trx_flag,
513: p_comp_plan.sum_trx_flag
514: ),
515: DECODE (p_comp_plan.attribute_category, fnd_api.g_miss_char, l_old_comp_plan.attribute_category, p_comp_plan.attribute_category),
516: DECODE (p_comp_plan.attribute1, fnd_api.g_miss_char, l_old_comp_plan.attribute1, p_comp_plan.attribute1),
511: DECODE (p_comp_plan.sum_trx_flag,
512: fnd_api.g_miss_char, l_old_comp_plan.sum_trx_flag,
513: p_comp_plan.sum_trx_flag
514: ),
515: DECODE (p_comp_plan.attribute_category, fnd_api.g_miss_char, l_old_comp_plan.attribute_category, p_comp_plan.attribute_category),
516: DECODE (p_comp_plan.attribute1, fnd_api.g_miss_char, l_old_comp_plan.attribute1, p_comp_plan.attribute1),
517: DECODE (p_comp_plan.attribute2, fnd_api.g_miss_char, l_old_comp_plan.attribute2, p_comp_plan.attribute2),
518: DECODE (p_comp_plan.attribute3, fnd_api.g_miss_char, l_old_comp_plan.attribute3, p_comp_plan.attribute3),
519: DECODE (p_comp_plan.attribute4, fnd_api.g_miss_char, l_old_comp_plan.attribute4, p_comp_plan.attribute4),
512: fnd_api.g_miss_char, l_old_comp_plan.sum_trx_flag,
513: p_comp_plan.sum_trx_flag
514: ),
515: DECODE (p_comp_plan.attribute_category, fnd_api.g_miss_char, l_old_comp_plan.attribute_category, p_comp_plan.attribute_category),
516: DECODE (p_comp_plan.attribute1, fnd_api.g_miss_char, l_old_comp_plan.attribute1, p_comp_plan.attribute1),
517: DECODE (p_comp_plan.attribute2, fnd_api.g_miss_char, l_old_comp_plan.attribute2, p_comp_plan.attribute2),
518: DECODE (p_comp_plan.attribute3, fnd_api.g_miss_char, l_old_comp_plan.attribute3, p_comp_plan.attribute3),
519: DECODE (p_comp_plan.attribute4, fnd_api.g_miss_char, l_old_comp_plan.attribute4, p_comp_plan.attribute4),
520: DECODE (p_comp_plan.attribute5, fnd_api.g_miss_char, l_old_comp_plan.attribute5, p_comp_plan.attribute5),
513: p_comp_plan.sum_trx_flag
514: ),
515: DECODE (p_comp_plan.attribute_category, fnd_api.g_miss_char, l_old_comp_plan.attribute_category, p_comp_plan.attribute_category),
516: DECODE (p_comp_plan.attribute1, fnd_api.g_miss_char, l_old_comp_plan.attribute1, p_comp_plan.attribute1),
517: DECODE (p_comp_plan.attribute2, fnd_api.g_miss_char, l_old_comp_plan.attribute2, p_comp_plan.attribute2),
518: DECODE (p_comp_plan.attribute3, fnd_api.g_miss_char, l_old_comp_plan.attribute3, p_comp_plan.attribute3),
519: DECODE (p_comp_plan.attribute4, fnd_api.g_miss_char, l_old_comp_plan.attribute4, p_comp_plan.attribute4),
520: DECODE (p_comp_plan.attribute5, fnd_api.g_miss_char, l_old_comp_plan.attribute5, p_comp_plan.attribute5),
521: DECODE (p_comp_plan.attribute6, fnd_api.g_miss_char, l_old_comp_plan.attribute6, p_comp_plan.attribute6),
514: ),
515: DECODE (p_comp_plan.attribute_category, fnd_api.g_miss_char, l_old_comp_plan.attribute_category, p_comp_plan.attribute_category),
516: DECODE (p_comp_plan.attribute1, fnd_api.g_miss_char, l_old_comp_plan.attribute1, p_comp_plan.attribute1),
517: DECODE (p_comp_plan.attribute2, fnd_api.g_miss_char, l_old_comp_plan.attribute2, p_comp_plan.attribute2),
518: DECODE (p_comp_plan.attribute3, fnd_api.g_miss_char, l_old_comp_plan.attribute3, p_comp_plan.attribute3),
519: DECODE (p_comp_plan.attribute4, fnd_api.g_miss_char, l_old_comp_plan.attribute4, p_comp_plan.attribute4),
520: DECODE (p_comp_plan.attribute5, fnd_api.g_miss_char, l_old_comp_plan.attribute5, p_comp_plan.attribute5),
521: DECODE (p_comp_plan.attribute6, fnd_api.g_miss_char, l_old_comp_plan.attribute6, p_comp_plan.attribute6),
522: DECODE (p_comp_plan.attribute7, fnd_api.g_miss_char, l_old_comp_plan.attribute7, p_comp_plan.attribute7),
515: DECODE (p_comp_plan.attribute_category, fnd_api.g_miss_char, l_old_comp_plan.attribute_category, p_comp_plan.attribute_category),
516: DECODE (p_comp_plan.attribute1, fnd_api.g_miss_char, l_old_comp_plan.attribute1, p_comp_plan.attribute1),
517: DECODE (p_comp_plan.attribute2, fnd_api.g_miss_char, l_old_comp_plan.attribute2, p_comp_plan.attribute2),
518: DECODE (p_comp_plan.attribute3, fnd_api.g_miss_char, l_old_comp_plan.attribute3, p_comp_plan.attribute3),
519: DECODE (p_comp_plan.attribute4, fnd_api.g_miss_char, l_old_comp_plan.attribute4, p_comp_plan.attribute4),
520: DECODE (p_comp_plan.attribute5, fnd_api.g_miss_char, l_old_comp_plan.attribute5, p_comp_plan.attribute5),
521: DECODE (p_comp_plan.attribute6, fnd_api.g_miss_char, l_old_comp_plan.attribute6, p_comp_plan.attribute6),
522: DECODE (p_comp_plan.attribute7, fnd_api.g_miss_char, l_old_comp_plan.attribute7, p_comp_plan.attribute7),
523: DECODE (p_comp_plan.attribute8, fnd_api.g_miss_char, l_old_comp_plan.attribute8, p_comp_plan.attribute8),
516: DECODE (p_comp_plan.attribute1, fnd_api.g_miss_char, l_old_comp_plan.attribute1, p_comp_plan.attribute1),
517: DECODE (p_comp_plan.attribute2, fnd_api.g_miss_char, l_old_comp_plan.attribute2, p_comp_plan.attribute2),
518: DECODE (p_comp_plan.attribute3, fnd_api.g_miss_char, l_old_comp_plan.attribute3, p_comp_plan.attribute3),
519: DECODE (p_comp_plan.attribute4, fnd_api.g_miss_char, l_old_comp_plan.attribute4, p_comp_plan.attribute4),
520: DECODE (p_comp_plan.attribute5, fnd_api.g_miss_char, l_old_comp_plan.attribute5, p_comp_plan.attribute5),
521: DECODE (p_comp_plan.attribute6, fnd_api.g_miss_char, l_old_comp_plan.attribute6, p_comp_plan.attribute6),
522: DECODE (p_comp_plan.attribute7, fnd_api.g_miss_char, l_old_comp_plan.attribute7, p_comp_plan.attribute7),
523: DECODE (p_comp_plan.attribute8, fnd_api.g_miss_char, l_old_comp_plan.attribute8, p_comp_plan.attribute8),
524: DECODE (p_comp_plan.attribute9, fnd_api.g_miss_char, l_old_comp_plan.attribute9, p_comp_plan.attribute9),
517: DECODE (p_comp_plan.attribute2, fnd_api.g_miss_char, l_old_comp_plan.attribute2, p_comp_plan.attribute2),
518: DECODE (p_comp_plan.attribute3, fnd_api.g_miss_char, l_old_comp_plan.attribute3, p_comp_plan.attribute3),
519: DECODE (p_comp_plan.attribute4, fnd_api.g_miss_char, l_old_comp_plan.attribute4, p_comp_plan.attribute4),
520: DECODE (p_comp_plan.attribute5, fnd_api.g_miss_char, l_old_comp_plan.attribute5, p_comp_plan.attribute5),
521: DECODE (p_comp_plan.attribute6, fnd_api.g_miss_char, l_old_comp_plan.attribute6, p_comp_plan.attribute6),
522: DECODE (p_comp_plan.attribute7, fnd_api.g_miss_char, l_old_comp_plan.attribute7, p_comp_plan.attribute7),
523: DECODE (p_comp_plan.attribute8, fnd_api.g_miss_char, l_old_comp_plan.attribute8, p_comp_plan.attribute8),
524: DECODE (p_comp_plan.attribute9, fnd_api.g_miss_char, l_old_comp_plan.attribute9, p_comp_plan.attribute9),
525: DECODE (p_comp_plan.attribute10, fnd_api.g_miss_char, l_old_comp_plan.attribute10, p_comp_plan.attribute10),
518: DECODE (p_comp_plan.attribute3, fnd_api.g_miss_char, l_old_comp_plan.attribute3, p_comp_plan.attribute3),
519: DECODE (p_comp_plan.attribute4, fnd_api.g_miss_char, l_old_comp_plan.attribute4, p_comp_plan.attribute4),
520: DECODE (p_comp_plan.attribute5, fnd_api.g_miss_char, l_old_comp_plan.attribute5, p_comp_plan.attribute5),
521: DECODE (p_comp_plan.attribute6, fnd_api.g_miss_char, l_old_comp_plan.attribute6, p_comp_plan.attribute6),
522: DECODE (p_comp_plan.attribute7, fnd_api.g_miss_char, l_old_comp_plan.attribute7, p_comp_plan.attribute7),
523: DECODE (p_comp_plan.attribute8, fnd_api.g_miss_char, l_old_comp_plan.attribute8, p_comp_plan.attribute8),
524: DECODE (p_comp_plan.attribute9, fnd_api.g_miss_char, l_old_comp_plan.attribute9, p_comp_plan.attribute9),
525: DECODE (p_comp_plan.attribute10, fnd_api.g_miss_char, l_old_comp_plan.attribute10, p_comp_plan.attribute10),
526: DECODE (p_comp_plan.attribute11, fnd_api.g_miss_char, l_old_comp_plan.attribute11, p_comp_plan.attribute11),
519: DECODE (p_comp_plan.attribute4, fnd_api.g_miss_char, l_old_comp_plan.attribute4, p_comp_plan.attribute4),
520: DECODE (p_comp_plan.attribute5, fnd_api.g_miss_char, l_old_comp_plan.attribute5, p_comp_plan.attribute5),
521: DECODE (p_comp_plan.attribute6, fnd_api.g_miss_char, l_old_comp_plan.attribute6, p_comp_plan.attribute6),
522: DECODE (p_comp_plan.attribute7, fnd_api.g_miss_char, l_old_comp_plan.attribute7, p_comp_plan.attribute7),
523: DECODE (p_comp_plan.attribute8, fnd_api.g_miss_char, l_old_comp_plan.attribute8, p_comp_plan.attribute8),
524: DECODE (p_comp_plan.attribute9, fnd_api.g_miss_char, l_old_comp_plan.attribute9, p_comp_plan.attribute9),
525: DECODE (p_comp_plan.attribute10, fnd_api.g_miss_char, l_old_comp_plan.attribute10, p_comp_plan.attribute10),
526: DECODE (p_comp_plan.attribute11, fnd_api.g_miss_char, l_old_comp_plan.attribute11, p_comp_plan.attribute11),
527: DECODE (p_comp_plan.attribute12, fnd_api.g_miss_char, l_old_comp_plan.attribute12, p_comp_plan.attribute12),
520: DECODE (p_comp_plan.attribute5, fnd_api.g_miss_char, l_old_comp_plan.attribute5, p_comp_plan.attribute5),
521: DECODE (p_comp_plan.attribute6, fnd_api.g_miss_char, l_old_comp_plan.attribute6, p_comp_plan.attribute6),
522: DECODE (p_comp_plan.attribute7, fnd_api.g_miss_char, l_old_comp_plan.attribute7, p_comp_plan.attribute7),
523: DECODE (p_comp_plan.attribute8, fnd_api.g_miss_char, l_old_comp_plan.attribute8, p_comp_plan.attribute8),
524: DECODE (p_comp_plan.attribute9, fnd_api.g_miss_char, l_old_comp_plan.attribute9, p_comp_plan.attribute9),
525: DECODE (p_comp_plan.attribute10, fnd_api.g_miss_char, l_old_comp_plan.attribute10, p_comp_plan.attribute10),
526: DECODE (p_comp_plan.attribute11, fnd_api.g_miss_char, l_old_comp_plan.attribute11, p_comp_plan.attribute11),
527: DECODE (p_comp_plan.attribute12, fnd_api.g_miss_char, l_old_comp_plan.attribute12, p_comp_plan.attribute12),
528: DECODE (p_comp_plan.attribute13, fnd_api.g_miss_char, l_old_comp_plan.attribute13, p_comp_plan.attribute13),
521: DECODE (p_comp_plan.attribute6, fnd_api.g_miss_char, l_old_comp_plan.attribute6, p_comp_plan.attribute6),
522: DECODE (p_comp_plan.attribute7, fnd_api.g_miss_char, l_old_comp_plan.attribute7, p_comp_plan.attribute7),
523: DECODE (p_comp_plan.attribute8, fnd_api.g_miss_char, l_old_comp_plan.attribute8, p_comp_plan.attribute8),
524: DECODE (p_comp_plan.attribute9, fnd_api.g_miss_char, l_old_comp_plan.attribute9, p_comp_plan.attribute9),
525: DECODE (p_comp_plan.attribute10, fnd_api.g_miss_char, l_old_comp_plan.attribute10, p_comp_plan.attribute10),
526: DECODE (p_comp_plan.attribute11, fnd_api.g_miss_char, l_old_comp_plan.attribute11, p_comp_plan.attribute11),
527: DECODE (p_comp_plan.attribute12, fnd_api.g_miss_char, l_old_comp_plan.attribute12, p_comp_plan.attribute12),
528: DECODE (p_comp_plan.attribute13, fnd_api.g_miss_char, l_old_comp_plan.attribute13, p_comp_plan.attribute13),
529: DECODE (p_comp_plan.attribute14, fnd_api.g_miss_char, l_old_comp_plan.attribute14, p_comp_plan.attribute14),
522: DECODE (p_comp_plan.attribute7, fnd_api.g_miss_char, l_old_comp_plan.attribute7, p_comp_plan.attribute7),
523: DECODE (p_comp_plan.attribute8, fnd_api.g_miss_char, l_old_comp_plan.attribute8, p_comp_plan.attribute8),
524: DECODE (p_comp_plan.attribute9, fnd_api.g_miss_char, l_old_comp_plan.attribute9, p_comp_plan.attribute9),
525: DECODE (p_comp_plan.attribute10, fnd_api.g_miss_char, l_old_comp_plan.attribute10, p_comp_plan.attribute10),
526: DECODE (p_comp_plan.attribute11, fnd_api.g_miss_char, l_old_comp_plan.attribute11, p_comp_plan.attribute11),
527: DECODE (p_comp_plan.attribute12, fnd_api.g_miss_char, l_old_comp_plan.attribute12, p_comp_plan.attribute12),
528: DECODE (p_comp_plan.attribute13, fnd_api.g_miss_char, l_old_comp_plan.attribute13, p_comp_plan.attribute13),
529: DECODE (p_comp_plan.attribute14, fnd_api.g_miss_char, l_old_comp_plan.attribute14, p_comp_plan.attribute14),
530: DECODE (p_comp_plan.attribute15, fnd_api.g_miss_char, l_old_comp_plan.attribute15, p_comp_plan.attribute15),
523: DECODE (p_comp_plan.attribute8, fnd_api.g_miss_char, l_old_comp_plan.attribute8, p_comp_plan.attribute8),
524: DECODE (p_comp_plan.attribute9, fnd_api.g_miss_char, l_old_comp_plan.attribute9, p_comp_plan.attribute9),
525: DECODE (p_comp_plan.attribute10, fnd_api.g_miss_char, l_old_comp_plan.attribute10, p_comp_plan.attribute10),
526: DECODE (p_comp_plan.attribute11, fnd_api.g_miss_char, l_old_comp_plan.attribute11, p_comp_plan.attribute11),
527: DECODE (p_comp_plan.attribute12, fnd_api.g_miss_char, l_old_comp_plan.attribute12, p_comp_plan.attribute12),
528: DECODE (p_comp_plan.attribute13, fnd_api.g_miss_char, l_old_comp_plan.attribute13, p_comp_plan.attribute13),
529: DECODE (p_comp_plan.attribute14, fnd_api.g_miss_char, l_old_comp_plan.attribute14, p_comp_plan.attribute14),
530: DECODE (p_comp_plan.attribute15, fnd_api.g_miss_char, l_old_comp_plan.attribute15, p_comp_plan.attribute15),
531: DECODE (p_comp_plan.org_id, fnd_api.g_miss_char, l_old_comp_plan.org_id, p_comp_plan.org_id)
524: DECODE (p_comp_plan.attribute9, fnd_api.g_miss_char, l_old_comp_plan.attribute9, p_comp_plan.attribute9),
525: DECODE (p_comp_plan.attribute10, fnd_api.g_miss_char, l_old_comp_plan.attribute10, p_comp_plan.attribute10),
526: DECODE (p_comp_plan.attribute11, fnd_api.g_miss_char, l_old_comp_plan.attribute11, p_comp_plan.attribute11),
527: DECODE (p_comp_plan.attribute12, fnd_api.g_miss_char, l_old_comp_plan.attribute12, p_comp_plan.attribute12),
528: DECODE (p_comp_plan.attribute13, fnd_api.g_miss_char, l_old_comp_plan.attribute13, p_comp_plan.attribute13),
529: DECODE (p_comp_plan.attribute14, fnd_api.g_miss_char, l_old_comp_plan.attribute14, p_comp_plan.attribute14),
530: DECODE (p_comp_plan.attribute15, fnd_api.g_miss_char, l_old_comp_plan.attribute15, p_comp_plan.attribute15),
531: DECODE (p_comp_plan.org_id, fnd_api.g_miss_char, l_old_comp_plan.org_id, p_comp_plan.org_id)
532: INTO l_name,
525: DECODE (p_comp_plan.attribute10, fnd_api.g_miss_char, l_old_comp_plan.attribute10, p_comp_plan.attribute10),
526: DECODE (p_comp_plan.attribute11, fnd_api.g_miss_char, l_old_comp_plan.attribute11, p_comp_plan.attribute11),
527: DECODE (p_comp_plan.attribute12, fnd_api.g_miss_char, l_old_comp_plan.attribute12, p_comp_plan.attribute12),
528: DECODE (p_comp_plan.attribute13, fnd_api.g_miss_char, l_old_comp_plan.attribute13, p_comp_plan.attribute13),
529: DECODE (p_comp_plan.attribute14, fnd_api.g_miss_char, l_old_comp_plan.attribute14, p_comp_plan.attribute14),
530: DECODE (p_comp_plan.attribute15, fnd_api.g_miss_char, l_old_comp_plan.attribute15, p_comp_plan.attribute15),
531: DECODE (p_comp_plan.org_id, fnd_api.g_miss_char, l_old_comp_plan.org_id, p_comp_plan.org_id)
532: INTO l_name,
533: l_description,
526: DECODE (p_comp_plan.attribute11, fnd_api.g_miss_char, l_old_comp_plan.attribute11, p_comp_plan.attribute11),
527: DECODE (p_comp_plan.attribute12, fnd_api.g_miss_char, l_old_comp_plan.attribute12, p_comp_plan.attribute12),
528: DECODE (p_comp_plan.attribute13, fnd_api.g_miss_char, l_old_comp_plan.attribute13, p_comp_plan.attribute13),
529: DECODE (p_comp_plan.attribute14, fnd_api.g_miss_char, l_old_comp_plan.attribute14, p_comp_plan.attribute14),
530: DECODE (p_comp_plan.attribute15, fnd_api.g_miss_char, l_old_comp_plan.attribute15, p_comp_plan.attribute15),
531: DECODE (p_comp_plan.org_id, fnd_api.g_miss_char, l_old_comp_plan.org_id, p_comp_plan.org_id)
532: INTO l_name,
533: l_description,
534: l_overlap,
527: DECODE (p_comp_plan.attribute12, fnd_api.g_miss_char, l_old_comp_plan.attribute12, p_comp_plan.attribute12),
528: DECODE (p_comp_plan.attribute13, fnd_api.g_miss_char, l_old_comp_plan.attribute13, p_comp_plan.attribute13),
529: DECODE (p_comp_plan.attribute14, fnd_api.g_miss_char, l_old_comp_plan.attribute14, p_comp_plan.attribute14),
530: DECODE (p_comp_plan.attribute15, fnd_api.g_miss_char, l_old_comp_plan.attribute15, p_comp_plan.attribute15),
531: DECODE (p_comp_plan.org_id, fnd_api.g_miss_char, l_old_comp_plan.org_id, p_comp_plan.org_id)
532: INTO l_name,
533: l_description,
534: l_overlap,
535: l_sum_trx,
556: IF l_old_comp_plan.object_version_number <> p_comp_plan.object_version_number
557: THEN
558: fnd_message.set_name ('CN', 'CN_RECORD_CHANGED');
559: fnd_msg_pub.ADD;
560: RAISE fnd_api.g_exc_error;
561: END IF;
562:
563: -- 4. check for consistency in date range assignment
564: -- check plan element assignments - they just have to intersect
575: IF l_temp_count > 0
576: THEN
577: fnd_message.set_name ('CN', 'CN_PLAN_ELT_DISJOINT');
578: fnd_msg_pub.ADD;
579: RAISE fnd_api.g_exc_error;
580: END IF;
581:
582: SELECT COUNT (1)
583: INTO l_temp_count
587: IF l_temp_count > 0
588: THEN
589: fnd_message.set_name ('CN', 'CN_ROLE_NOT_WITHIN_PLAN');
590: fnd_msg_pub.ADD;
591: RAISE fnd_api.g_exc_error;
592: END IF;
593:
594: -- since srp assignments always within role assignments, then we
595: -- don't need to check those
655: /* Adding Notes Information */
656:
657: /* 1. Check if the name has been changed */
658: l_consolidated_note := '';
659: IF (p_comp_plan.NAME <> fnd_api.g_miss_char AND p_comp_plan.NAME IS NOT NULL AND p_comp_plan.NAME <> l_old_comp_plan.NAME)
660: THEN
661: -- Need to add note CNR12_NOTE_COMPPLAN_UPDATE
662: fnd_message.set_name ('CN', 'CNR12_NOTE_COMPPLAN_UPDATE');
663: fnd_message.set_token ('OLD_CP_NAME', l_old_comp_plan.NAME);
680: */
681: END IF;
682:
683: /* 2. Check if the start date has been changed */
684: IF (p_comp_plan.start_date <> fnd_api.g_miss_date AND p_comp_plan.start_date IS NOT NULL
685: AND p_comp_plan.start_date <> l_old_comp_plan.start_date
686: )
687: THEN
688: -- Need to add note CNR12_NOTE_COMPPLAN_SDATE_CRE
707: */
708: END IF;
709:
710: /* 3. Check if the end date has been changed */
711: IF (p_comp_plan.end_date <> fnd_api.g_miss_date AND p_comp_plan.end_date IS NOT NULL AND p_comp_plan.end_date <> l_old_comp_plan.end_date)
712: THEN
713: -- Need to add note CNR12_NOTE_COMPPLAN_EDATE_UPD
714: fnd_message.set_name ('CN', 'CNR12_NOTE_COMPPLAN_EDATE_UPD');
715: fnd_message.set_token ('OLD_END_DATE', TO_CHAR (l_old_comp_plan.end_date));
731: */
732: END IF;
733:
734: /* 4. Allow Revenue Class Overlap flag --> Changed to N */
735: IF ( p_comp_plan.allow_rev_class_overlap <> fnd_api.g_miss_char
736: AND p_comp_plan.allow_rev_class_overlap IS NOT NULL
737: AND p_comp_plan.allow_rev_class_overlap <> l_old_comp_plan.allow_rev_class_overlap
738: AND p_comp_plan.allow_rev_class_overlap = 'N'
739: )
757: */
758: END IF;
759:
760: /* 5. Allow Revenue Class Overlap flag --> Changed to Y */
761: IF ( p_comp_plan.allow_rev_class_overlap <> fnd_api.g_miss_char
762: AND p_comp_plan.allow_rev_class_overlap IS NOT NULL
763: AND p_comp_plan.allow_rev_class_overlap <> l_old_comp_plan.allow_rev_class_overlap
764: AND p_comp_plan.allow_rev_class_overlap = 'Y'
765: )
800: END IF;
801:
802: -- End of API body.
803: -- Standard check of p_commit.
804: IF fnd_api.to_boolean (p_commit)
805: THEN
806: COMMIT WORK;
807: END IF;
808:
806: COMMIT WORK;
807: END IF;
808:
809: -- Standard call to get message count and if count is 1, get message info.
810: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
811: EXCEPTION
812: WHEN fnd_api.g_exc_error
813: THEN
814: ROLLBACK TO update_comp_plan;
808:
809: -- Standard call to get message count and if count is 1, get message info.
810: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
811: EXCEPTION
812: WHEN fnd_api.g_exc_error
813: THEN
814: ROLLBACK TO update_comp_plan;
815: x_return_status := fnd_api.g_ret_sts_error;
816: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
811: EXCEPTION
812: WHEN fnd_api.g_exc_error
813: THEN
814: ROLLBACK TO update_comp_plan;
815: x_return_status := fnd_api.g_ret_sts_error;
816: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
817: WHEN fnd_api.g_exc_unexpected_error
818: THEN
819: ROLLBACK TO update_comp_plan;
812: WHEN fnd_api.g_exc_error
813: THEN
814: ROLLBACK TO update_comp_plan;
815: x_return_status := fnd_api.g_ret_sts_error;
816: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
817: WHEN fnd_api.g_exc_unexpected_error
818: THEN
819: ROLLBACK TO update_comp_plan;
820: x_return_status := fnd_api.g_ret_sts_unexp_error;
813: THEN
814: ROLLBACK TO update_comp_plan;
815: x_return_status := fnd_api.g_ret_sts_error;
816: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
817: WHEN fnd_api.g_exc_unexpected_error
818: THEN
819: ROLLBACK TO update_comp_plan;
820: x_return_status := fnd_api.g_ret_sts_unexp_error;
821: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
816: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
817: WHEN fnd_api.g_exc_unexpected_error
818: THEN
819: ROLLBACK TO update_comp_plan;
820: x_return_status := fnd_api.g_ret_sts_unexp_error;
821: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
822: WHEN OTHERS
823: THEN
824: ROLLBACK TO update_comp_plan;
817: WHEN fnd_api.g_exc_unexpected_error
818: THEN
819: ROLLBACK TO update_comp_plan;
820: x_return_status := fnd_api.g_ret_sts_unexp_error;
821: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
822: WHEN OTHERS
823: THEN
824: ROLLBACK TO update_comp_plan;
825: x_return_status := fnd_api.g_ret_sts_unexp_error;
821: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
822: WHEN OTHERS
823: THEN
824: ROLLBACK TO update_comp_plan;
825: x_return_status := fnd_api.g_ret_sts_unexp_error;
826:
827: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
828: THEN
829: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
828: THEN
829: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
830: END IF;
831:
832: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
833: END update_comp_plan;
834:
835: -- Start of comments
836: -- API name : Delete_Comp_Plan
839: -- Pre-reqs : None.
840: -- Parameters :
841: -- IN : p_api_version IN NUMBER Required
842: -- p_init_msg_list IN VARCHAR2 Optional
843: -- Default = FND_API.G_FALSE
844: -- p_commit IN VARCHAR2 Optional
845: -- Default = FND_API.G_FALSE
846: -- p_validation_level IN NUMBER Optional
847: -- Default = FND_API.G_VALID_LEVEL_FULL
841: -- IN : p_api_version IN NUMBER Required
842: -- p_init_msg_list IN VARCHAR2 Optional
843: -- Default = FND_API.G_FALSE
844: -- p_commit IN VARCHAR2 Optional
845: -- Default = FND_API.G_FALSE
846: -- p_validation_level IN NUMBER Optional
847: -- Default = FND_API.G_VALID_LEVEL_FULL
848: -- p_comp_plan IN comp_plan_rec_type
849: -- OUT : x_return_status OUT VARCHAR2(1)
843: -- Default = FND_API.G_FALSE
844: -- p_commit IN VARCHAR2 Optional
845: -- Default = FND_API.G_FALSE
846: -- p_validation_level IN NUMBER Optional
847: -- Default = FND_API.G_VALID_LEVEL_FULL
848: -- p_comp_plan IN comp_plan_rec_type
849: -- OUT : x_return_status OUT VARCHAR2(1)
850: -- x_msg_count OUT NUMBER
851: -- x_msg_data OUT VARCHAR2(2000)
854: --
855: -- End of comments
856: PROCEDURE delete_comp_plan (
857: p_api_version IN NUMBER,
858: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
859: p_commit IN VARCHAR2 := fnd_api.g_false,
860: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
861: p_comp_plan IN OUT NOCOPY comp_plan_rec_type,
862: x_return_status OUT NOCOPY VARCHAR2,
855: -- End of comments
856: PROCEDURE delete_comp_plan (
857: p_api_version IN NUMBER,
858: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
859: p_commit IN VARCHAR2 := fnd_api.g_false,
860: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
861: p_comp_plan IN OUT NOCOPY comp_plan_rec_type,
862: x_return_status OUT NOCOPY VARCHAR2,
863: x_msg_count OUT NOCOPY NUMBER,
856: PROCEDURE delete_comp_plan (
857: p_api_version IN NUMBER,
858: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
859: p_commit IN VARCHAR2 := fnd_api.g_false,
860: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
861: p_comp_plan IN OUT NOCOPY comp_plan_rec_type,
862: x_return_status OUT NOCOPY VARCHAR2,
863: x_msg_count OUT NOCOPY NUMBER,
864: x_msg_data OUT NOCOPY VARCHAR2
877: -- Standard Start of API savepoint
878: SAVEPOINT delete_comp_plan;
879:
880: -- Standard call to check for call compatibility.
881: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name)
882: THEN
883: RAISE fnd_api.g_exc_unexpected_error;
884: END IF;
885:
879:
880: -- Standard call to check for call compatibility.
881: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name)
882: THEN
883: RAISE fnd_api.g_exc_unexpected_error;
884: END IF;
885:
886: -- Initialize message list if p_init_msg_list is set to TRUE.
887: IF fnd_api.to_boolean (p_init_msg_list)
883: RAISE fnd_api.g_exc_unexpected_error;
884: END IF;
885:
886: -- Initialize message list if p_init_msg_list is set to TRUE.
887: IF fnd_api.to_boolean (p_init_msg_list)
888: THEN
889: fnd_msg_pub.initialize;
890: END IF;
891:
889: fnd_msg_pub.initialize;
890: END IF;
891:
892: -- Initialize API return status to success
893: x_return_status := fnd_api.g_ret_sts_success;
894: -- API body
895: -- *** Check the ORG_ID is null or not ***
896: check_org_id (p_comp_plan.org_id);
897: l_org_id := p_comp_plan.org_id;
975: END IF;
976:
977: -- End of API body.
978: -- Standard check of p_commit.
979: IF fnd_api.to_boolean (p_commit)
980: THEN
981: COMMIT WORK;
982: END IF;
983:
981: COMMIT WORK;
982: END IF;
983:
984: -- Standard call to get message count and if count is 1, get message info.
985: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
986: EXCEPTION
987: WHEN fnd_api.g_exc_error
988: THEN
989: ROLLBACK TO delete_comp_plan;
983:
984: -- Standard call to get message count and if count is 1, get message info.
985: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
986: EXCEPTION
987: WHEN fnd_api.g_exc_error
988: THEN
989: ROLLBACK TO delete_comp_plan;
990: x_return_status := fnd_api.g_ret_sts_error;
991: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
986: EXCEPTION
987: WHEN fnd_api.g_exc_error
988: THEN
989: ROLLBACK TO delete_comp_plan;
990: x_return_status := fnd_api.g_ret_sts_error;
991: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
992: WHEN fnd_api.g_exc_unexpected_error
993: THEN
994: ROLLBACK TO delete_comp_plan;
987: WHEN fnd_api.g_exc_error
988: THEN
989: ROLLBACK TO delete_comp_plan;
990: x_return_status := fnd_api.g_ret_sts_error;
991: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
992: WHEN fnd_api.g_exc_unexpected_error
993: THEN
994: ROLLBACK TO delete_comp_plan;
995: x_return_status := fnd_api.g_ret_sts_unexp_error;
988: THEN
989: ROLLBACK TO delete_comp_plan;
990: x_return_status := fnd_api.g_ret_sts_error;
991: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
992: WHEN fnd_api.g_exc_unexpected_error
993: THEN
994: ROLLBACK TO delete_comp_plan;
995: x_return_status := fnd_api.g_ret_sts_unexp_error;
996: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
991: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
992: WHEN fnd_api.g_exc_unexpected_error
993: THEN
994: ROLLBACK TO delete_comp_plan;
995: x_return_status := fnd_api.g_ret_sts_unexp_error;
996: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
997: WHEN OTHERS
998: THEN
999: ROLLBACK TO delete_comp_plan;
992: WHEN fnd_api.g_exc_unexpected_error
993: THEN
994: ROLLBACK TO delete_comp_plan;
995: x_return_status := fnd_api.g_ret_sts_unexp_error;
996: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
997: WHEN OTHERS
998: THEN
999: ROLLBACK TO delete_comp_plan;
1000: x_return_status := fnd_api.g_ret_sts_unexp_error;
996: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
997: WHEN OTHERS
998: THEN
999: ROLLBACK TO delete_comp_plan;
1000: x_return_status := fnd_api.g_ret_sts_unexp_error;
1001:
1002: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
1003: THEN
1004: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
1003: THEN
1004: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
1005: END IF;
1006:
1007: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1008: END delete_comp_plan;
1009:
1010: -- Start of comments
1011: -- API name : Get_Comp_Plan_Sum
1014: -- Pre-reqs : None.
1015: -- Parameters :
1016: -- IN : p_api_version IN NUMBER Required
1017: -- p_init_msg_list IN VARCHAR2 Optional
1018: -- Default = FND_API.G_FALSE
1019: -- p_commit IN VARCHAR2 Optional
1020: -- Default = FND_API.G_FALSE
1021: -- p_validation_level IN NUMBER Optional
1022: -- Default = FND_API.G_VALID_LEVEL_FULL
1016: -- IN : p_api_version IN NUMBER Required
1017: -- p_init_msg_list IN VARCHAR2 Optional
1018: -- Default = FND_API.G_FALSE
1019: -- p_commit IN VARCHAR2 Optional
1020: -- Default = FND_API.G_FALSE
1021: -- p_validation_level IN NUMBER Optional
1022: -- Default = FND_API.G_VALID_LEVEL_FULL
1023: -- p_start_record IN NUMBER
1024: -- Default = -1
1018: -- Default = FND_API.G_FALSE
1019: -- p_commit IN VARCHAR2 Optional
1020: -- Default = FND_API.G_FALSE
1021: -- p_validation_level IN NUMBER Optional
1022: -- Default = FND_API.G_VALID_LEVEL_FULL
1023: -- p_start_record IN NUMBER
1024: -- Default = -1
1025: -- p_fetch_size IN NUMBER
1026: -- Default = -1
1026: -- Default = -1
1027: -- p_search_name IN VARCHAR2
1028: -- Default = '%'
1029: -- p_search_date IN DATE
1030: -- Default = FND_API.G_MISS_DATE
1031: -- p_search_status IN VARCHAR2
1032: -- Default = FND_API.G_MISS_CHAR
1033: -- OUT : x_return_status OUT VARCHAR2(1)
1034: -- x_msg_count OUT NUMBER
1028: -- Default = '%'
1029: -- p_search_date IN DATE
1030: -- Default = FND_API.G_MISS_DATE
1031: -- p_search_status IN VARCHAR2
1032: -- Default = FND_API.G_MISS_CHAR
1033: -- OUT : x_return_status OUT VARCHAR2(1)
1034: -- x_msg_count OUT NUMBER
1035: -- x_msg_data OUT VARCHAR2(2000)
1036: -- x_comp_plan OUT comp_plan_tbl_type
1040: --
1041: -- End of comments
1042: PROCEDURE get_comp_plan_sum (
1043: p_api_version IN NUMBER,
1044: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
1045: p_commit IN VARCHAR2 := fnd_api.g_false,
1046: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
1047: p_start_record IN NUMBER := -1,
1048: p_fetch_size IN NUMBER := -1,
1041: -- End of comments
1042: PROCEDURE get_comp_plan_sum (
1043: p_api_version IN NUMBER,
1044: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
1045: p_commit IN VARCHAR2 := fnd_api.g_false,
1046: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
1047: p_start_record IN NUMBER := -1,
1048: p_fetch_size IN NUMBER := -1,
1049: p_search_name IN VARCHAR2 := '%',
1042: PROCEDURE get_comp_plan_sum (
1043: p_api_version IN NUMBER,
1044: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
1045: p_commit IN VARCHAR2 := fnd_api.g_false,
1046: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
1047: p_start_record IN NUMBER := -1,
1048: p_fetch_size IN NUMBER := -1,
1049: p_search_name IN VARCHAR2 := '%',
1050: p_search_date IN DATE := fnd_api.g_miss_date,
1046: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
1047: p_start_record IN NUMBER := -1,
1048: p_fetch_size IN NUMBER := -1,
1049: p_search_name IN VARCHAR2 := '%',
1050: p_search_date IN DATE := fnd_api.g_miss_date,
1051: p_search_status IN VARCHAR2 := fnd_api.g_miss_char,
1052: x_comp_plan OUT NOCOPY comp_plan_tbl_type,
1053: x_total_record OUT NOCOPY NUMBER,
1054: x_return_status OUT NOCOPY VARCHAR2,
1047: p_start_record IN NUMBER := -1,
1048: p_fetch_size IN NUMBER := -1,
1049: p_search_name IN VARCHAR2 := '%',
1050: p_search_date IN DATE := fnd_api.g_miss_date,
1051: p_search_status IN VARCHAR2 := fnd_api.g_miss_char,
1052: x_comp_plan OUT NOCOPY comp_plan_tbl_type,
1053: x_total_record OUT NOCOPY NUMBER,
1054: x_return_status OUT NOCOPY VARCHAR2,
1055: x_msg_count OUT NOCOPY NUMBER,
1072: -- Standard Start of API savepoint
1073: SAVEPOINT get_comp_plan_sum;
1074:
1075: -- Standard call to check for call compatibility.
1076: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name)
1077: THEN
1078: RAISE fnd_api.g_exc_unexpected_error;
1079: END IF;
1080:
1074:
1075: -- Standard call to check for call compatibility.
1076: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name)
1077: THEN
1078: RAISE fnd_api.g_exc_unexpected_error;
1079: END IF;
1080:
1081: -- Initialize message list if p_init_msg_list is set to TRUE.
1082: IF fnd_api.to_boolean (p_init_msg_list)
1078: RAISE fnd_api.g_exc_unexpected_error;
1079: END IF;
1080:
1081: -- Initialize message list if p_init_msg_list is set to TRUE.
1082: IF fnd_api.to_boolean (p_init_msg_list)
1083: THEN
1084: fnd_msg_pub.initialize;
1085: END IF;
1086:
1084: fnd_msg_pub.initialize;
1085: END IF;
1086:
1087: -- Initialize API return status to success
1088: x_return_status := fnd_api.g_ret_sts_success;
1089: -- API body
1090: x_comp_plan := g_miss_comp_plan_rec_tb;
1091: l_counter := 0;
1092: x_total_record := 0;
1112: END LOOP;
1113:
1114: -- End of API body.
1115: -- Standard check of p_commit.
1116: IF fnd_api.to_boolean (p_commit)
1117: THEN
1118: COMMIT WORK;
1119: END IF;
1120:
1118: COMMIT WORK;
1119: END IF;
1120:
1121: -- Standard call to get message count and if count is 1, get message info.
1122: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1123: EXCEPTION
1124: WHEN fnd_api.g_exc_error
1125: THEN
1126: ROLLBACK TO get_comp_plan_sum;
1120:
1121: -- Standard call to get message count and if count is 1, get message info.
1122: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1123: EXCEPTION
1124: WHEN fnd_api.g_exc_error
1125: THEN
1126: ROLLBACK TO get_comp_plan_sum;
1127: x_return_status := fnd_api.g_ret_sts_error;
1128: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1123: EXCEPTION
1124: WHEN fnd_api.g_exc_error
1125: THEN
1126: ROLLBACK TO get_comp_plan_sum;
1127: x_return_status := fnd_api.g_ret_sts_error;
1128: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1129: WHEN fnd_api.g_exc_unexpected_error
1130: THEN
1131: ROLLBACK TO get_comp_plan_sum;
1124: WHEN fnd_api.g_exc_error
1125: THEN
1126: ROLLBACK TO get_comp_plan_sum;
1127: x_return_status := fnd_api.g_ret_sts_error;
1128: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1129: WHEN fnd_api.g_exc_unexpected_error
1130: THEN
1131: ROLLBACK TO get_comp_plan_sum;
1132: x_return_status := fnd_api.g_ret_sts_unexp_error;
1125: THEN
1126: ROLLBACK TO get_comp_plan_sum;
1127: x_return_status := fnd_api.g_ret_sts_error;
1128: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1129: WHEN fnd_api.g_exc_unexpected_error
1130: THEN
1131: ROLLBACK TO get_comp_plan_sum;
1132: x_return_status := fnd_api.g_ret_sts_unexp_error;
1133: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1128: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1129: WHEN fnd_api.g_exc_unexpected_error
1130: THEN
1131: ROLLBACK TO get_comp_plan_sum;
1132: x_return_status := fnd_api.g_ret_sts_unexp_error;
1133: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1134: WHEN OTHERS
1135: THEN
1136: ROLLBACK TO get_comp_plan_sum;
1129: WHEN fnd_api.g_exc_unexpected_error
1130: THEN
1131: ROLLBACK TO get_comp_plan_sum;
1132: x_return_status := fnd_api.g_ret_sts_unexp_error;
1133: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1134: WHEN OTHERS
1135: THEN
1136: ROLLBACK TO get_comp_plan_sum;
1137: x_return_status := fnd_api.g_ret_sts_unexp_error;
1133: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1134: WHEN OTHERS
1135: THEN
1136: ROLLBACK TO get_comp_plan_sum;
1137: x_return_status := fnd_api.g_ret_sts_unexp_error;
1138:
1139: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
1140: THEN
1141: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
1140: THEN
1141: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
1142: END IF;
1143:
1144: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1145: END get_comp_plan_sum;
1146:
1147: -- Start of comments
1148: -- API name : Get_Comp_Plan_Dtl
1151: -- Pre-reqs : None.
1152: -- Parameters :
1153: -- IN : p_api_version IN NUMBER Required
1154: -- p_init_msg_list IN VARCHAR2 Optional
1155: -- Default = FND_API.G_FALSE
1156: -- p_commit IN VARCHAR2 Optional
1157: -- Default = FND_API.G_FALSE
1158: -- p_validation_level IN NUMBER Optional
1159: -- Default = FND_API.G_VALID_LEVEL_FULL
1153: -- IN : p_api_version IN NUMBER Required
1154: -- p_init_msg_list IN VARCHAR2 Optional
1155: -- Default = FND_API.G_FALSE
1156: -- p_commit IN VARCHAR2 Optional
1157: -- Default = FND_API.G_FALSE
1158: -- p_validation_level IN NUMBER Optional
1159: -- Default = FND_API.G_VALID_LEVEL_FULL
1160: -- p_comp_plan_id IN NUMBER
1161: -- OUT : x_return_status OUT VARCHAR2(1)
1155: -- Default = FND_API.G_FALSE
1156: -- p_commit IN VARCHAR2 Optional
1157: -- Default = FND_API.G_FALSE
1158: -- p_validation_level IN NUMBER Optional
1159: -- Default = FND_API.G_VALID_LEVEL_FULL
1160: -- p_comp_plan_id IN NUMBER
1161: -- OUT : x_return_status OUT VARCHAR2(1)
1162: -- x_msg_count OUT NUMBER
1163: -- x_msg_data OUT VARCHAR2(2000)
1167: --
1168: -- End of comments
1169: PROCEDURE get_comp_plan_dtl (
1170: p_api_version IN NUMBER,
1171: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
1172: p_commit IN VARCHAR2 := fnd_api.g_false,
1173: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
1174: p_comp_plan_id IN NUMBER,
1175: x_comp_plan OUT NOCOPY comp_plan_tbl_type,
1168: -- End of comments
1169: PROCEDURE get_comp_plan_dtl (
1170: p_api_version IN NUMBER,
1171: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
1172: p_commit IN VARCHAR2 := fnd_api.g_false,
1173: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
1174: p_comp_plan_id IN NUMBER,
1175: x_comp_plan OUT NOCOPY comp_plan_tbl_type,
1176: x_return_status OUT NOCOPY VARCHAR2,
1169: PROCEDURE get_comp_plan_dtl (
1170: p_api_version IN NUMBER,
1171: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
1172: p_commit IN VARCHAR2 := fnd_api.g_false,
1173: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
1174: p_comp_plan_id IN NUMBER,
1175: x_comp_plan OUT NOCOPY comp_plan_tbl_type,
1176: x_return_status OUT NOCOPY VARCHAR2,
1177: x_msg_count OUT NOCOPY NUMBER,
1192: -- Standard Start of API savepoint
1193: SAVEPOINT get_comp_plan_dtl;
1194:
1195: -- Standard call to check for call compatibility.
1196: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name)
1197: THEN
1198: RAISE fnd_api.g_exc_unexpected_error;
1199: END IF;
1200:
1194:
1195: -- Standard call to check for call compatibility.
1196: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name)
1197: THEN
1198: RAISE fnd_api.g_exc_unexpected_error;
1199: END IF;
1200:
1201: -- Initialize message list if p_init_msg_list is set to TRUE.
1202: IF fnd_api.to_boolean (p_init_msg_list)
1198: RAISE fnd_api.g_exc_unexpected_error;
1199: END IF;
1200:
1201: -- Initialize message list if p_init_msg_list is set to TRUE.
1202: IF fnd_api.to_boolean (p_init_msg_list)
1203: THEN
1204: fnd_msg_pub.initialize;
1205: END IF;
1206:
1204: fnd_msg_pub.initialize;
1205: END IF;
1206:
1207: -- Initialize API return status to success
1208: x_return_status := fnd_api.g_ret_sts_success;
1209:
1210: -- API body
1211: OPEN l_comp_plan_cr;
1212:
1252: CLOSE l_comp_plan_cr;
1253:
1254: -- End of API body.
1255: -- Standard check of p_commit.
1256: IF fnd_api.to_boolean (p_commit)
1257: THEN
1258: COMMIT WORK;
1259: END IF;
1260:
1258: COMMIT WORK;
1259: END IF;
1260:
1261: -- Standard call to get message count and if count is 1, get message info.
1262: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1263: EXCEPTION
1264: WHEN fnd_api.g_exc_error
1265: THEN
1266: ROLLBACK TO get_comp_plan_dtl;
1260:
1261: -- Standard call to get message count and if count is 1, get message info.
1262: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1263: EXCEPTION
1264: WHEN fnd_api.g_exc_error
1265: THEN
1266: ROLLBACK TO get_comp_plan_dtl;
1267: x_return_status := fnd_api.g_ret_sts_error;
1268: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1263: EXCEPTION
1264: WHEN fnd_api.g_exc_error
1265: THEN
1266: ROLLBACK TO get_comp_plan_dtl;
1267: x_return_status := fnd_api.g_ret_sts_error;
1268: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1269: WHEN fnd_api.g_exc_unexpected_error
1270: THEN
1271: ROLLBACK TO get_comp_plan_dtl;
1264: WHEN fnd_api.g_exc_error
1265: THEN
1266: ROLLBACK TO get_comp_plan_dtl;
1267: x_return_status := fnd_api.g_ret_sts_error;
1268: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1269: WHEN fnd_api.g_exc_unexpected_error
1270: THEN
1271: ROLLBACK TO get_comp_plan_dtl;
1272: x_return_status := fnd_api.g_ret_sts_unexp_error;
1265: THEN
1266: ROLLBACK TO get_comp_plan_dtl;
1267: x_return_status := fnd_api.g_ret_sts_error;
1268: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1269: WHEN fnd_api.g_exc_unexpected_error
1270: THEN
1271: ROLLBACK TO get_comp_plan_dtl;
1272: x_return_status := fnd_api.g_ret_sts_unexp_error;
1273: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1268: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1269: WHEN fnd_api.g_exc_unexpected_error
1270: THEN
1271: ROLLBACK TO get_comp_plan_dtl;
1272: x_return_status := fnd_api.g_ret_sts_unexp_error;
1273: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1274: WHEN OTHERS
1275: THEN
1276: ROLLBACK TO get_comp_plan_dtl;
1269: WHEN fnd_api.g_exc_unexpected_error
1270: THEN
1271: ROLLBACK TO get_comp_plan_dtl;
1272: x_return_status := fnd_api.g_ret_sts_unexp_error;
1273: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1274: WHEN OTHERS
1275: THEN
1276: ROLLBACK TO get_comp_plan_dtl;
1277: x_return_status := fnd_api.g_ret_sts_unexp_error;
1273: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1274: WHEN OTHERS
1275: THEN
1276: ROLLBACK TO get_comp_plan_dtl;
1277: x_return_status := fnd_api.g_ret_sts_unexp_error;
1278:
1279: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
1280: THEN
1281: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
1280: THEN
1281: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
1282: END IF;
1283:
1284: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1285: END get_comp_plan_dtl;
1286:
1287: -- Start of comments
1288: -- API name : Get_Sales_Role
1291: -- Pre-reqs : None.
1292: -- Parameters :
1293: -- IN : p_api_version IN NUMBER Required
1294: -- p_init_msg_list IN VARCHAR2 Optional
1295: -- Default = FND_API.G_FALSE
1296: -- p_commit IN VARCHAR2 Optional
1297: -- Default = FND_API.G_FALSE
1298: -- p_validation_level IN NUMBER Optional
1299: -- Default = FND_API.G_VALID_LEVEL_FULL
1293: -- IN : p_api_version IN NUMBER Required
1294: -- p_init_msg_list IN VARCHAR2 Optional
1295: -- Default = FND_API.G_FALSE
1296: -- p_commit IN VARCHAR2 Optional
1297: -- Default = FND_API.G_FALSE
1298: -- p_validation_level IN NUMBER Optional
1299: -- Default = FND_API.G_VALID_LEVEL_FULL
1300: -- p_comp_plan_id IN NUMBER
1301: -- OUT : x_return_status OUT VARCHAR2(1)
1295: -- Default = FND_API.G_FALSE
1296: -- p_commit IN VARCHAR2 Optional
1297: -- Default = FND_API.G_FALSE
1298: -- p_validation_level IN NUMBER Optional
1299: -- Default = FND_API.G_VALID_LEVEL_FULL
1300: -- p_comp_plan_id IN NUMBER
1301: -- OUT : x_return_status OUT VARCHAR2(1)
1302: -- x_msg_count OUT NUMBER
1303: -- x_msg_data OUT VARCHAR2(2000)
1307: --
1308: -- End of comments
1309: PROCEDURE get_sales_role (
1310: p_api_version IN NUMBER,
1311: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
1312: p_commit IN VARCHAR2 := fnd_api.g_false,
1313: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
1314: p_comp_plan_id IN NUMBER,
1315: x_sales_role OUT NOCOPY sales_role_tbl_type,
1308: -- End of comments
1309: PROCEDURE get_sales_role (
1310: p_api_version IN NUMBER,
1311: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
1312: p_commit IN VARCHAR2 := fnd_api.g_false,
1313: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
1314: p_comp_plan_id IN NUMBER,
1315: x_sales_role OUT NOCOPY sales_role_tbl_type,
1316: x_return_status OUT NOCOPY VARCHAR2,
1309: PROCEDURE get_sales_role (
1310: p_api_version IN NUMBER,
1311: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
1312: p_commit IN VARCHAR2 := fnd_api.g_false,
1313: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
1314: p_comp_plan_id IN NUMBER,
1315: x_sales_role OUT NOCOPY sales_role_tbl_type,
1316: x_return_status OUT NOCOPY VARCHAR2,
1317: x_msg_count OUT NOCOPY NUMBER,
1339: -- Standard Start of API savepoint
1340: SAVEPOINT get_sales_role;
1341:
1342: -- Standard call to check for call compatibility.
1343: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name)
1344: THEN
1345: RAISE fnd_api.g_exc_unexpected_error;
1346: END IF;
1347:
1341:
1342: -- Standard call to check for call compatibility.
1343: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name)
1344: THEN
1345: RAISE fnd_api.g_exc_unexpected_error;
1346: END IF;
1347:
1348: -- Initialize message list if p_init_msg_list is set to TRUE.
1349: IF fnd_api.to_boolean (p_init_msg_list)
1345: RAISE fnd_api.g_exc_unexpected_error;
1346: END IF;
1347:
1348: -- Initialize message list if p_init_msg_list is set to TRUE.
1349: IF fnd_api.to_boolean (p_init_msg_list)
1350: THEN
1351: fnd_msg_pub.initialize;
1352: END IF;
1353:
1351: fnd_msg_pub.initialize;
1352: END IF;
1353:
1354: -- Initialize API return status to success
1355: x_return_status := fnd_api.g_ret_sts_success;
1356: -- API body
1357: x_sales_role := g_miss_sales_role_rec_tb;
1358: l_counter := 0;
1359:
1369: END LOOP;
1370:
1371: -- End of API body.
1372: -- Standard check of p_commit.
1373: IF fnd_api.to_boolean (p_commit)
1374: THEN
1375: COMMIT WORK;
1376: END IF;
1377:
1375: COMMIT WORK;
1376: END IF;
1377:
1378: -- Standard call to get message count and if count is 1, get message info.
1379: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1380: EXCEPTION
1381: WHEN fnd_api.g_exc_error
1382: THEN
1383: ROLLBACK TO get_sales_role;
1377:
1378: -- Standard call to get message count and if count is 1, get message info.
1379: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1380: EXCEPTION
1381: WHEN fnd_api.g_exc_error
1382: THEN
1383: ROLLBACK TO get_sales_role;
1384: x_return_status := fnd_api.g_ret_sts_error;
1385: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1380: EXCEPTION
1381: WHEN fnd_api.g_exc_error
1382: THEN
1383: ROLLBACK TO get_sales_role;
1384: x_return_status := fnd_api.g_ret_sts_error;
1385: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1386: WHEN fnd_api.g_exc_unexpected_error
1387: THEN
1388: ROLLBACK TO get_sales_role;
1381: WHEN fnd_api.g_exc_error
1382: THEN
1383: ROLLBACK TO get_sales_role;
1384: x_return_status := fnd_api.g_ret_sts_error;
1385: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1386: WHEN fnd_api.g_exc_unexpected_error
1387: THEN
1388: ROLLBACK TO get_sales_role;
1389: x_return_status := fnd_api.g_ret_sts_unexp_error;
1382: THEN
1383: ROLLBACK TO get_sales_role;
1384: x_return_status := fnd_api.g_ret_sts_error;
1385: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1386: WHEN fnd_api.g_exc_unexpected_error
1387: THEN
1388: ROLLBACK TO get_sales_role;
1389: x_return_status := fnd_api.g_ret_sts_unexp_error;
1390: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1385: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1386: WHEN fnd_api.g_exc_unexpected_error
1387: THEN
1388: ROLLBACK TO get_sales_role;
1389: x_return_status := fnd_api.g_ret_sts_unexp_error;
1390: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1391: WHEN OTHERS
1392: THEN
1393: ROLLBACK TO get_sales_role;
1386: WHEN fnd_api.g_exc_unexpected_error
1387: THEN
1388: ROLLBACK TO get_sales_role;
1389: x_return_status := fnd_api.g_ret_sts_unexp_error;
1390: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1391: WHEN OTHERS
1392: THEN
1393: ROLLBACK TO get_sales_role;
1394: x_return_status := fnd_api.g_ret_sts_unexp_error;
1390: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1391: WHEN OTHERS
1392: THEN
1393: ROLLBACK TO get_sales_role;
1394: x_return_status := fnd_api.g_ret_sts_unexp_error;
1395:
1396: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
1397: THEN
1398: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
1397: THEN
1398: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
1399: END IF;
1400:
1401: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1402: END get_sales_role;
1403:
1404: -- Start of comments
1405: -- API name : Validate_Comp_Plan
1408: -- Pre-reqs : None.
1409: -- Parameters :
1410: -- IN : p_api_version IN NUMBER Required
1411: -- p_init_msg_list IN VARCHAR2 Optional
1412: -- Default = FND_API.G_FALSE
1413: -- p_commit IN VARCHAR2 Optional
1414: -- Default = FND_API.G_FALSE
1415: -- p_validation_level IN NUMBER Optional
1416: -- Default = FND_API.G_VALID_LEVEL_FULL
1410: -- IN : p_api_version IN NUMBER Required
1411: -- p_init_msg_list IN VARCHAR2 Optional
1412: -- Default = FND_API.G_FALSE
1413: -- p_commit IN VARCHAR2 Optional
1414: -- Default = FND_API.G_FALSE
1415: -- p_validation_level IN NUMBER Optional
1416: -- Default = FND_API.G_VALID_LEVEL_FULL
1417: -- p_comp_plan IN comp_plan_rec_type
1418: -- OUT : x_return_status OUT VARCHAR2(1)
1412: -- Default = FND_API.G_FALSE
1413: -- p_commit IN VARCHAR2 Optional
1414: -- Default = FND_API.G_FALSE
1415: -- p_validation_level IN NUMBER Optional
1416: -- Default = FND_API.G_VALID_LEVEL_FULL
1417: -- p_comp_plan IN comp_plan_rec_type
1418: -- OUT : x_return_status OUT VARCHAR2(1)
1419: -- x_msg_count OUT NUMBER
1420: -- x_msg_data OUT VARCHAR2(2000)
1423: --
1424: -- End of comments
1425: PROCEDURE validate_comp_plan (
1426: p_api_version IN NUMBER,
1427: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
1428: p_commit IN VARCHAR2 := fnd_api.g_false,
1429: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
1430: p_comp_plan IN comp_plan_rec_type,
1431: x_return_status OUT NOCOPY VARCHAR2,
1424: -- End of comments
1425: PROCEDURE validate_comp_plan (
1426: p_api_version IN NUMBER,
1427: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
1428: p_commit IN VARCHAR2 := fnd_api.g_false,
1429: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
1430: p_comp_plan IN comp_plan_rec_type,
1431: x_return_status OUT NOCOPY VARCHAR2,
1432: x_msg_count OUT NOCOPY NUMBER,
1425: PROCEDURE validate_comp_plan (
1426: p_api_version IN NUMBER,
1427: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
1428: p_commit IN VARCHAR2 := fnd_api.g_false,
1429: p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
1430: p_comp_plan IN comp_plan_rec_type,
1431: x_return_status OUT NOCOPY VARCHAR2,
1432: x_msg_count OUT NOCOPY NUMBER,
1433: x_msg_data OUT NOCOPY VARCHAR2
1465: -- Standard Start of API savepoint
1466: SAVEPOINT validate_comp_plan;
1467:
1468: -- Standard call to check for call compatibility.
1469: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name)
1470: THEN
1471: RAISE fnd_api.g_exc_unexpected_error;
1472: END IF;
1473:
1467:
1468: -- Standard call to check for call compatibility.
1469: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name)
1470: THEN
1471: RAISE fnd_api.g_exc_unexpected_error;
1472: END IF;
1473:
1474: -- Initialize message list if p_init_msg_list is set to TRUE.
1475: IF fnd_api.to_boolean (p_init_msg_list)
1471: RAISE fnd_api.g_exc_unexpected_error;
1472: END IF;
1473:
1474: -- Initialize message list if p_init_msg_list is set to TRUE.
1475: IF fnd_api.to_boolean (p_init_msg_list)
1476: THEN
1477: fnd_msg_pub.initialize;
1478: END IF;
1479:
1477: fnd_msg_pub.initialize;
1478: END IF;
1479:
1480: -- Initialize API return status to success
1481: x_return_status := fnd_api.g_ret_sts_success;
1482:
1483: -- API body
1484: -- *** Check the ORG_ID is null or not ***
1485: --check_org_id(p_comp_plan.org_id);
1497: fnd_message.set_name ('CN', 'CN_NO_PE_ASSIGNED');
1498: fnd_msg_pub.ADD;
1499: END IF;
1500:
1501: RAISE fnd_api.g_exc_error;
1502: END IF;
1503:
1504: -- 2. cannot have incomplete formula assigned
1505: FOR f IN incomp_formulas
1520: fnd_message.set_token ('FORMULA_NAME', l_incomp_forms);
1521: fnd_msg_pub.ADD;
1522: END IF;
1523:
1524: RAISE fnd_api.g_exc_error;
1525: END IF;
1526:
1527: OPEN l_old_comp_plan_cr;
1528:
1562: WHERE comp_plan_id = p_comp_plan.comp_plan_id;
1563:
1564: IF l_status_code <> 'COMPLETE'
1565: THEN
1566: x_return_status := fnd_api.g_ret_sts_error;
1567: --RAISE fnd_api.g_exc_error;
1568: END IF;
1569:
1570: -- End of API body.
1563:
1564: IF l_status_code <> 'COMPLETE'
1565: THEN
1566: x_return_status := fnd_api.g_ret_sts_error;
1567: --RAISE fnd_api.g_exc_error;
1568: END IF;
1569:
1570: -- End of API body.
1571: -- Standard check of p_commit.
1568: END IF;
1569:
1570: -- End of API body.
1571: -- Standard check of p_commit.
1572: IF fnd_api.to_boolean (p_commit)
1573: THEN
1574: COMMIT WORK;
1575: END IF;
1576:
1574: COMMIT WORK;
1575: END IF;
1576:
1577: -- Standard call to get message count and if count is 1, get message info.
1578: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1579: EXCEPTION
1580: WHEN fnd_api.g_exc_error
1581: THEN
1582: ROLLBACK TO validate_comp_plan;
1576:
1577: -- Standard call to get message count and if count is 1, get message info.
1578: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1579: EXCEPTION
1580: WHEN fnd_api.g_exc_error
1581: THEN
1582: ROLLBACK TO validate_comp_plan;
1583: x_return_status := fnd_api.g_ret_sts_error;
1584: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1579: EXCEPTION
1580: WHEN fnd_api.g_exc_error
1581: THEN
1582: ROLLBACK TO validate_comp_plan;
1583: x_return_status := fnd_api.g_ret_sts_error;
1584: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1585: WHEN fnd_api.g_exc_unexpected_error
1586: THEN
1587: ROLLBACK TO validate_comp_plan;
1580: WHEN fnd_api.g_exc_error
1581: THEN
1582: ROLLBACK TO validate_comp_plan;
1583: x_return_status := fnd_api.g_ret_sts_error;
1584: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1585: WHEN fnd_api.g_exc_unexpected_error
1586: THEN
1587: ROLLBACK TO validate_comp_plan;
1588: x_return_status := fnd_api.g_ret_sts_unexp_error;
1581: THEN
1582: ROLLBACK TO validate_comp_plan;
1583: x_return_status := fnd_api.g_ret_sts_error;
1584: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1585: WHEN fnd_api.g_exc_unexpected_error
1586: THEN
1587: ROLLBACK TO validate_comp_plan;
1588: x_return_status := fnd_api.g_ret_sts_unexp_error;
1589: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1584: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1585: WHEN fnd_api.g_exc_unexpected_error
1586: THEN
1587: ROLLBACK TO validate_comp_plan;
1588: x_return_status := fnd_api.g_ret_sts_unexp_error;
1589: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1590: WHEN OTHERS
1591: THEN
1592: ROLLBACK TO validate_comp_plan;
1585: WHEN fnd_api.g_exc_unexpected_error
1586: THEN
1587: ROLLBACK TO validate_comp_plan;
1588: x_return_status := fnd_api.g_ret_sts_unexp_error;
1589: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1590: WHEN OTHERS
1591: THEN
1592: ROLLBACK TO validate_comp_plan;
1593: x_return_status := fnd_api.g_ret_sts_unexp_error;
1589: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1590: WHEN OTHERS
1591: THEN
1592: ROLLBACK TO validate_comp_plan;
1593: x_return_status := fnd_api.g_ret_sts_unexp_error;
1594:
1595: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
1596: THEN
1597: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
1596: THEN
1597: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
1598: END IF;
1599:
1600: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);
1601: END validate_comp_plan;
1602:
1603: --| -----------------------------------------------------------------------=
1604: --| Procedure Name : check_revenue_class_overlap
1683:
1684: result boolean;
1685:
1686: BEGIN
1687: x_return_status := fnd_api.g_ret_sts_success;
1688: x_loading_status := p_loading_status;
1689:
1690: BEGIN
1691: SELECT NAME,
1705: fnd_msg_pub.ADD;
1706: END IF;
1707:
1708: x_loading_status := 'CN_CP_NOT_EXIST';
1709: x_return_status := fnd_api.g_ret_sts_error;
1710: END;
1711:
1712: IF l_rc_overlap = 'N'
1713: THEN
1733: fnd_msg_pub.ADD;
1734: END IF; */
1735:
1736: x_loading_status := 'PLN_PLAN_DUP_REV_CLASS';
1737: x_return_status := fnd_api.g_ret_sts_error;
1738: END IF;
1739: END IF;
1740: END check_revenue_class_overlap;
1741:
1797: -- || Compplan.
1798: -- =====================================================
1799: PROCEDURE duplicate_comp_plan (
1800: p_api_version IN NUMBER,
1801: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1802: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1803: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1804: p_comp_plan_id IN CN_COMP_PLANS.COMP_PLAN_ID%TYPE,
1805: p_org_id IN NUMBER,
1798: -- =====================================================
1799: PROCEDURE duplicate_comp_plan (
1800: p_api_version IN NUMBER,
1801: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1802: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1803: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1804: p_comp_plan_id IN CN_COMP_PLANS.COMP_PLAN_ID%TYPE,
1805: p_org_id IN NUMBER,
1806: x_return_status OUT NOCOPY VARCHAR2,
1799: PROCEDURE duplicate_comp_plan (
1800: p_api_version IN NUMBER,
1801: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1802: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1803: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1804: p_comp_plan_id IN CN_COMP_PLANS.COMP_PLAN_ID%TYPE,
1805: p_org_id IN NUMBER,
1806: x_return_status OUT NOCOPY VARCHAR2,
1807: x_msg_count OUT NOCOPY NUMBER,
1836: SAVEPOINT duplicate_comp_plan;
1837:
1838: -- Standard call to check for call compatibility.
1839:
1840: IF NOT FND_API.Compatible_API_Call (l_api_version ,
1841: p_api_version ,
1842: l_api_name,
1843: G_PKG_NAME )
1844: THEN
1842: l_api_name,
1843: G_PKG_NAME )
1844: THEN
1845:
1846: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1847:
1848: END IF;
1849:
1850: -- Initialize message list if p_init_msg_list is set to TRUE.
1848: END IF;
1849:
1850: -- Initialize message list if p_init_msg_list is set to TRUE.
1851:
1852: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1853:
1854: FND_MSG_PUB.initialize;
1855:
1856: END IF;
1856: END IF;
1857:
1858: -- Initialize API return status to success
1859:
1860: x_return_status := FND_API.G_RET_STS_SUCCESS;
1861:
1862:
1863: Open get_comp_plan_data;
1864: fetch get_comp_plan_data into l_comp_plan;
1863: Open get_comp_plan_data;
1864: fetch get_comp_plan_data into l_comp_plan;
1865:
1866: IF get_comp_plan_data%notfound THEN
1867: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1868: END IF;
1869:
1870: -- calling public api
1871: SELECT
1868: END IF;
1869:
1870: -- calling public api
1871: SELECT
1872: DECODE (l_comp_plan.description, fnd_api.g_miss_char, NULL, l_comp_plan.description),
1873: 'INCOMPLETE',
1874: DECODE (l_comp_plan.allow_rev_class_overlap, fnd_api.g_miss_char, NULL, l_comp_plan.allow_rev_class_overlap),
1875: -- 7330382:R12.CN.B scannane
1876: DECODE (l_comp_plan.sum_trx_flag, fnd_api.g_miss_char, NULL, l_comp_plan.sum_trx_flag),
1870: -- calling public api
1871: SELECT
1872: DECODE (l_comp_plan.description, fnd_api.g_miss_char, NULL, l_comp_plan.description),
1873: 'INCOMPLETE',
1874: DECODE (l_comp_plan.allow_rev_class_overlap, fnd_api.g_miss_char, NULL, l_comp_plan.allow_rev_class_overlap),
1875: -- 7330382:R12.CN.B scannane
1876: DECODE (l_comp_plan.sum_trx_flag, fnd_api.g_miss_char, NULL, l_comp_plan.sum_trx_flag),
1877: DECODE (l_comp_plan.start_date, fnd_api.g_miss_date, NULL, TRUNC (l_comp_plan.start_date)),
1878: DECODE (l_comp_plan.end_date, fnd_api.g_miss_date, NULL, TRUNC (l_comp_plan.end_date)),
1872: DECODE (l_comp_plan.description, fnd_api.g_miss_char, NULL, l_comp_plan.description),
1873: 'INCOMPLETE',
1874: DECODE (l_comp_plan.allow_rev_class_overlap, fnd_api.g_miss_char, NULL, l_comp_plan.allow_rev_class_overlap),
1875: -- 7330382:R12.CN.B scannane
1876: DECODE (l_comp_plan.sum_trx_flag, fnd_api.g_miss_char, NULL, l_comp_plan.sum_trx_flag),
1877: DECODE (l_comp_plan.start_date, fnd_api.g_miss_date, NULL, TRUNC (l_comp_plan.start_date)),
1878: DECODE (l_comp_plan.end_date, fnd_api.g_miss_date, NULL, TRUNC (l_comp_plan.end_date)),
1879: DECODE (l_comp_plan.attribute_category, fnd_api.g_miss_char, NULL, l_comp_plan.attribute_category),
1880: DECODE (l_comp_plan.attribute1, fnd_api.g_miss_char, NULL, l_comp_plan.attribute1),
1873: 'INCOMPLETE',
1874: DECODE (l_comp_plan.allow_rev_class_overlap, fnd_api.g_miss_char, NULL, l_comp_plan.allow_rev_class_overlap),
1875: -- 7330382:R12.CN.B scannane
1876: DECODE (l_comp_plan.sum_trx_flag, fnd_api.g_miss_char, NULL, l_comp_plan.sum_trx_flag),
1877: DECODE (l_comp_plan.start_date, fnd_api.g_miss_date, NULL, TRUNC (l_comp_plan.start_date)),
1878: DECODE (l_comp_plan.end_date, fnd_api.g_miss_date, NULL, TRUNC (l_comp_plan.end_date)),
1879: DECODE (l_comp_plan.attribute_category, fnd_api.g_miss_char, NULL, l_comp_plan.attribute_category),
1880: DECODE (l_comp_plan.attribute1, fnd_api.g_miss_char, NULL, l_comp_plan.attribute1),
1881: DECODE (l_comp_plan.attribute2, fnd_api.g_miss_char, NULL, l_comp_plan.attribute2),
1874: DECODE (l_comp_plan.allow_rev_class_overlap, fnd_api.g_miss_char, NULL, l_comp_plan.allow_rev_class_overlap),
1875: -- 7330382:R12.CN.B scannane
1876: DECODE (l_comp_plan.sum_trx_flag, fnd_api.g_miss_char, NULL, l_comp_plan.sum_trx_flag),
1877: DECODE (l_comp_plan.start_date, fnd_api.g_miss_date, NULL, TRUNC (l_comp_plan.start_date)),
1878: DECODE (l_comp_plan.end_date, fnd_api.g_miss_date, NULL, TRUNC (l_comp_plan.end_date)),
1879: DECODE (l_comp_plan.attribute_category, fnd_api.g_miss_char, NULL, l_comp_plan.attribute_category),
1880: DECODE (l_comp_plan.attribute1, fnd_api.g_miss_char, NULL, l_comp_plan.attribute1),
1881: DECODE (l_comp_plan.attribute2, fnd_api.g_miss_char, NULL, l_comp_plan.attribute2),
1882: DECODE (l_comp_plan.attribute3, fnd_api.g_miss_char, NULL, l_comp_plan.attribute3),
1875: -- 7330382:R12.CN.B scannane
1876: DECODE (l_comp_plan.sum_trx_flag, fnd_api.g_miss_char, NULL, l_comp_plan.sum_trx_flag),
1877: DECODE (l_comp_plan.start_date, fnd_api.g_miss_date, NULL, TRUNC (l_comp_plan.start_date)),
1878: DECODE (l_comp_plan.end_date, fnd_api.g_miss_date, NULL, TRUNC (l_comp_plan.end_date)),
1879: DECODE (l_comp_plan.attribute_category, fnd_api.g_miss_char, NULL, l_comp_plan.attribute_category),
1880: DECODE (l_comp_plan.attribute1, fnd_api.g_miss_char, NULL, l_comp_plan.attribute1),
1881: DECODE (l_comp_plan.attribute2, fnd_api.g_miss_char, NULL, l_comp_plan.attribute2),
1882: DECODE (l_comp_plan.attribute3, fnd_api.g_miss_char, NULL, l_comp_plan.attribute3),
1883: DECODE (l_comp_plan.attribute4, fnd_api.g_miss_char, NULL, l_comp_plan.attribute4),
1876: DECODE (l_comp_plan.sum_trx_flag, fnd_api.g_miss_char, NULL, l_comp_plan.sum_trx_flag),
1877: DECODE (l_comp_plan.start_date, fnd_api.g_miss_date, NULL, TRUNC (l_comp_plan.start_date)),
1878: DECODE (l_comp_plan.end_date, fnd_api.g_miss_date, NULL, TRUNC (l_comp_plan.end_date)),
1879: DECODE (l_comp_plan.attribute_category, fnd_api.g_miss_char, NULL, l_comp_plan.attribute_category),
1880: DECODE (l_comp_plan.attribute1, fnd_api.g_miss_char, NULL, l_comp_plan.attribute1),
1881: DECODE (l_comp_plan.attribute2, fnd_api.g_miss_char, NULL, l_comp_plan.attribute2),
1882: DECODE (l_comp_plan.attribute3, fnd_api.g_miss_char, NULL, l_comp_plan.attribute3),
1883: DECODE (l_comp_plan.attribute4, fnd_api.g_miss_char, NULL, l_comp_plan.attribute4),
1884: DECODE (l_comp_plan.attribute5, fnd_api.g_miss_char, NULL, l_comp_plan.attribute5),
1877: DECODE (l_comp_plan.start_date, fnd_api.g_miss_date, NULL, TRUNC (l_comp_plan.start_date)),
1878: DECODE (l_comp_plan.end_date, fnd_api.g_miss_date, NULL, TRUNC (l_comp_plan.end_date)),
1879: DECODE (l_comp_plan.attribute_category, fnd_api.g_miss_char, NULL, l_comp_plan.attribute_category),
1880: DECODE (l_comp_plan.attribute1, fnd_api.g_miss_char, NULL, l_comp_plan.attribute1),
1881: DECODE (l_comp_plan.attribute2, fnd_api.g_miss_char, NULL, l_comp_plan.attribute2),
1882: DECODE (l_comp_plan.attribute3, fnd_api.g_miss_char, NULL, l_comp_plan.attribute3),
1883: DECODE (l_comp_plan.attribute4, fnd_api.g_miss_char, NULL, l_comp_plan.attribute4),
1884: DECODE (l_comp_plan.attribute5, fnd_api.g_miss_char, NULL, l_comp_plan.attribute5),
1885: DECODE (l_comp_plan.attribute6, fnd_api.g_miss_char, NULL, l_comp_plan.attribute6),
1878: DECODE (l_comp_plan.end_date, fnd_api.g_miss_date, NULL, TRUNC (l_comp_plan.end_date)),
1879: DECODE (l_comp_plan.attribute_category, fnd_api.g_miss_char, NULL, l_comp_plan.attribute_category),
1880: DECODE (l_comp_plan.attribute1, fnd_api.g_miss_char, NULL, l_comp_plan.attribute1),
1881: DECODE (l_comp_plan.attribute2, fnd_api.g_miss_char, NULL, l_comp_plan.attribute2),
1882: DECODE (l_comp_plan.attribute3, fnd_api.g_miss_char, NULL, l_comp_plan.attribute3),
1883: DECODE (l_comp_plan.attribute4, fnd_api.g_miss_char, NULL, l_comp_plan.attribute4),
1884: DECODE (l_comp_plan.attribute5, fnd_api.g_miss_char, NULL, l_comp_plan.attribute5),
1885: DECODE (l_comp_plan.attribute6, fnd_api.g_miss_char, NULL, l_comp_plan.attribute6),
1886: DECODE (l_comp_plan.attribute7, fnd_api.g_miss_char, NULL, l_comp_plan.attribute7),
1879: DECODE (l_comp_plan.attribute_category, fnd_api.g_miss_char, NULL, l_comp_plan.attribute_category),
1880: DECODE (l_comp_plan.attribute1, fnd_api.g_miss_char, NULL, l_comp_plan.attribute1),
1881: DECODE (l_comp_plan.attribute2, fnd_api.g_miss_char, NULL, l_comp_plan.attribute2),
1882: DECODE (l_comp_plan.attribute3, fnd_api.g_miss_char, NULL, l_comp_plan.attribute3),
1883: DECODE (l_comp_plan.attribute4, fnd_api.g_miss_char, NULL, l_comp_plan.attribute4),
1884: DECODE (l_comp_plan.attribute5, fnd_api.g_miss_char, NULL, l_comp_plan.attribute5),
1885: DECODE (l_comp_plan.attribute6, fnd_api.g_miss_char, NULL, l_comp_plan.attribute6),
1886: DECODE (l_comp_plan.attribute7, fnd_api.g_miss_char, NULL, l_comp_plan.attribute7),
1887: DECODE (l_comp_plan.attribute8, fnd_api.g_miss_char, NULL, l_comp_plan.attribute8),
1880: DECODE (l_comp_plan.attribute1, fnd_api.g_miss_char, NULL, l_comp_plan.attribute1),
1881: DECODE (l_comp_plan.attribute2, fnd_api.g_miss_char, NULL, l_comp_plan.attribute2),
1882: DECODE (l_comp_plan.attribute3, fnd_api.g_miss_char, NULL, l_comp_plan.attribute3),
1883: DECODE (l_comp_plan.attribute4, fnd_api.g_miss_char, NULL, l_comp_plan.attribute4),
1884: DECODE (l_comp_plan.attribute5, fnd_api.g_miss_char, NULL, l_comp_plan.attribute5),
1885: DECODE (l_comp_plan.attribute6, fnd_api.g_miss_char, NULL, l_comp_plan.attribute6),
1886: DECODE (l_comp_plan.attribute7, fnd_api.g_miss_char, NULL, l_comp_plan.attribute7),
1887: DECODE (l_comp_plan.attribute8, fnd_api.g_miss_char, NULL, l_comp_plan.attribute8),
1888: DECODE (l_comp_plan.attribute9, fnd_api.g_miss_char, NULL, l_comp_plan.attribute9),
1881: DECODE (l_comp_plan.attribute2, fnd_api.g_miss_char, NULL, l_comp_plan.attribute2),
1882: DECODE (l_comp_plan.attribute3, fnd_api.g_miss_char, NULL, l_comp_plan.attribute3),
1883: DECODE (l_comp_plan.attribute4, fnd_api.g_miss_char, NULL, l_comp_plan.attribute4),
1884: DECODE (l_comp_plan.attribute5, fnd_api.g_miss_char, NULL, l_comp_plan.attribute5),
1885: DECODE (l_comp_plan.attribute6, fnd_api.g_miss_char, NULL, l_comp_plan.attribute6),
1886: DECODE (l_comp_plan.attribute7, fnd_api.g_miss_char, NULL, l_comp_plan.attribute7),
1887: DECODE (l_comp_plan.attribute8, fnd_api.g_miss_char, NULL, l_comp_plan.attribute8),
1888: DECODE (l_comp_plan.attribute9, fnd_api.g_miss_char, NULL, l_comp_plan.attribute9),
1889: DECODE (l_comp_plan.attribute10, fnd_api.g_miss_char, NULL, l_comp_plan.attribute10),
1882: DECODE (l_comp_plan.attribute3, fnd_api.g_miss_char, NULL, l_comp_plan.attribute3),
1883: DECODE (l_comp_plan.attribute4, fnd_api.g_miss_char, NULL, l_comp_plan.attribute4),
1884: DECODE (l_comp_plan.attribute5, fnd_api.g_miss_char, NULL, l_comp_plan.attribute5),
1885: DECODE (l_comp_plan.attribute6, fnd_api.g_miss_char, NULL, l_comp_plan.attribute6),
1886: DECODE (l_comp_plan.attribute7, fnd_api.g_miss_char, NULL, l_comp_plan.attribute7),
1887: DECODE (l_comp_plan.attribute8, fnd_api.g_miss_char, NULL, l_comp_plan.attribute8),
1888: DECODE (l_comp_plan.attribute9, fnd_api.g_miss_char, NULL, l_comp_plan.attribute9),
1889: DECODE (l_comp_plan.attribute10, fnd_api.g_miss_char, NULL, l_comp_plan.attribute10),
1890: DECODE (l_comp_plan.attribute11, fnd_api.g_miss_char, NULL, l_comp_plan.attribute11),
1883: DECODE (l_comp_plan.attribute4, fnd_api.g_miss_char, NULL, l_comp_plan.attribute4),
1884: DECODE (l_comp_plan.attribute5, fnd_api.g_miss_char, NULL, l_comp_plan.attribute5),
1885: DECODE (l_comp_plan.attribute6, fnd_api.g_miss_char, NULL, l_comp_plan.attribute6),
1886: DECODE (l_comp_plan.attribute7, fnd_api.g_miss_char, NULL, l_comp_plan.attribute7),
1887: DECODE (l_comp_plan.attribute8, fnd_api.g_miss_char, NULL, l_comp_plan.attribute8),
1888: DECODE (l_comp_plan.attribute9, fnd_api.g_miss_char, NULL, l_comp_plan.attribute9),
1889: DECODE (l_comp_plan.attribute10, fnd_api.g_miss_char, NULL, l_comp_plan.attribute10),
1890: DECODE (l_comp_plan.attribute11, fnd_api.g_miss_char, NULL, l_comp_plan.attribute11),
1891: DECODE (l_comp_plan.attribute12, fnd_api.g_miss_char, NULL, l_comp_plan.attribute12),
1884: DECODE (l_comp_plan.attribute5, fnd_api.g_miss_char, NULL, l_comp_plan.attribute5),
1885: DECODE (l_comp_plan.attribute6, fnd_api.g_miss_char, NULL, l_comp_plan.attribute6),
1886: DECODE (l_comp_plan.attribute7, fnd_api.g_miss_char, NULL, l_comp_plan.attribute7),
1887: DECODE (l_comp_plan.attribute8, fnd_api.g_miss_char, NULL, l_comp_plan.attribute8),
1888: DECODE (l_comp_plan.attribute9, fnd_api.g_miss_char, NULL, l_comp_plan.attribute9),
1889: DECODE (l_comp_plan.attribute10, fnd_api.g_miss_char, NULL, l_comp_plan.attribute10),
1890: DECODE (l_comp_plan.attribute11, fnd_api.g_miss_char, NULL, l_comp_plan.attribute11),
1891: DECODE (l_comp_plan.attribute12, fnd_api.g_miss_char, NULL, l_comp_plan.attribute12),
1892: DECODE (l_comp_plan.attribute13, fnd_api.g_miss_char, NULL, l_comp_plan.attribute13),
1885: DECODE (l_comp_plan.attribute6, fnd_api.g_miss_char, NULL, l_comp_plan.attribute6),
1886: DECODE (l_comp_plan.attribute7, fnd_api.g_miss_char, NULL, l_comp_plan.attribute7),
1887: DECODE (l_comp_plan.attribute8, fnd_api.g_miss_char, NULL, l_comp_plan.attribute8),
1888: DECODE (l_comp_plan.attribute9, fnd_api.g_miss_char, NULL, l_comp_plan.attribute9),
1889: DECODE (l_comp_plan.attribute10, fnd_api.g_miss_char, NULL, l_comp_plan.attribute10),
1890: DECODE (l_comp_plan.attribute11, fnd_api.g_miss_char, NULL, l_comp_plan.attribute11),
1891: DECODE (l_comp_plan.attribute12, fnd_api.g_miss_char, NULL, l_comp_plan.attribute12),
1892: DECODE (l_comp_plan.attribute13, fnd_api.g_miss_char, NULL, l_comp_plan.attribute13),
1893: DECODE (l_comp_plan.attribute14, fnd_api.g_miss_char, NULL, l_comp_plan.attribute14),
1886: DECODE (l_comp_plan.attribute7, fnd_api.g_miss_char, NULL, l_comp_plan.attribute7),
1887: DECODE (l_comp_plan.attribute8, fnd_api.g_miss_char, NULL, l_comp_plan.attribute8),
1888: DECODE (l_comp_plan.attribute9, fnd_api.g_miss_char, NULL, l_comp_plan.attribute9),
1889: DECODE (l_comp_plan.attribute10, fnd_api.g_miss_char, NULL, l_comp_plan.attribute10),
1890: DECODE (l_comp_plan.attribute11, fnd_api.g_miss_char, NULL, l_comp_plan.attribute11),
1891: DECODE (l_comp_plan.attribute12, fnd_api.g_miss_char, NULL, l_comp_plan.attribute12),
1892: DECODE (l_comp_plan.attribute13, fnd_api.g_miss_char, NULL, l_comp_plan.attribute13),
1893: DECODE (l_comp_plan.attribute14, fnd_api.g_miss_char, NULL, l_comp_plan.attribute14),
1894: DECODE (l_comp_plan.attribute15, fnd_api.g_miss_char, NULL, l_comp_plan.attribute15),
1887: DECODE (l_comp_plan.attribute8, fnd_api.g_miss_char, NULL, l_comp_plan.attribute8),
1888: DECODE (l_comp_plan.attribute9, fnd_api.g_miss_char, NULL, l_comp_plan.attribute9),
1889: DECODE (l_comp_plan.attribute10, fnd_api.g_miss_char, NULL, l_comp_plan.attribute10),
1890: DECODE (l_comp_plan.attribute11, fnd_api.g_miss_char, NULL, l_comp_plan.attribute11),
1891: DECODE (l_comp_plan.attribute12, fnd_api.g_miss_char, NULL, l_comp_plan.attribute12),
1892: DECODE (l_comp_plan.attribute13, fnd_api.g_miss_char, NULL, l_comp_plan.attribute13),
1893: DECODE (l_comp_plan.attribute14, fnd_api.g_miss_char, NULL, l_comp_plan.attribute14),
1894: DECODE (l_comp_plan.attribute15, fnd_api.g_miss_char, NULL, l_comp_plan.attribute15),
1895: DECODE (l_comp_plan.org_id, fnd_api.g_miss_char, NULL, l_comp_plan.org_id)
1888: DECODE (l_comp_plan.attribute9, fnd_api.g_miss_char, NULL, l_comp_plan.attribute9),
1889: DECODE (l_comp_plan.attribute10, fnd_api.g_miss_char, NULL, l_comp_plan.attribute10),
1890: DECODE (l_comp_plan.attribute11, fnd_api.g_miss_char, NULL, l_comp_plan.attribute11),
1891: DECODE (l_comp_plan.attribute12, fnd_api.g_miss_char, NULL, l_comp_plan.attribute12),
1892: DECODE (l_comp_plan.attribute13, fnd_api.g_miss_char, NULL, l_comp_plan.attribute13),
1893: DECODE (l_comp_plan.attribute14, fnd_api.g_miss_char, NULL, l_comp_plan.attribute14),
1894: DECODE (l_comp_plan.attribute15, fnd_api.g_miss_char, NULL, l_comp_plan.attribute15),
1895: DECODE (l_comp_plan.org_id, fnd_api.g_miss_char, NULL, l_comp_plan.org_id)
1896: INTO
1889: DECODE (l_comp_plan.attribute10, fnd_api.g_miss_char, NULL, l_comp_plan.attribute10),
1890: DECODE (l_comp_plan.attribute11, fnd_api.g_miss_char, NULL, l_comp_plan.attribute11),
1891: DECODE (l_comp_plan.attribute12, fnd_api.g_miss_char, NULL, l_comp_plan.attribute12),
1892: DECODE (l_comp_plan.attribute13, fnd_api.g_miss_char, NULL, l_comp_plan.attribute13),
1893: DECODE (l_comp_plan.attribute14, fnd_api.g_miss_char, NULL, l_comp_plan.attribute14),
1894: DECODE (l_comp_plan.attribute15, fnd_api.g_miss_char, NULL, l_comp_plan.attribute15),
1895: DECODE (l_comp_plan.org_id, fnd_api.g_miss_char, NULL, l_comp_plan.org_id)
1896: INTO
1897: l_comp_plan_rec.description,
1890: DECODE (l_comp_plan.attribute11, fnd_api.g_miss_char, NULL, l_comp_plan.attribute11),
1891: DECODE (l_comp_plan.attribute12, fnd_api.g_miss_char, NULL, l_comp_plan.attribute12),
1892: DECODE (l_comp_plan.attribute13, fnd_api.g_miss_char, NULL, l_comp_plan.attribute13),
1893: DECODE (l_comp_plan.attribute14, fnd_api.g_miss_char, NULL, l_comp_plan.attribute14),
1894: DECODE (l_comp_plan.attribute15, fnd_api.g_miss_char, NULL, l_comp_plan.attribute15),
1895: DECODE (l_comp_plan.org_id, fnd_api.g_miss_char, NULL, l_comp_plan.org_id)
1896: INTO
1897: l_comp_plan_rec.description,
1898: l_comp_plan_rec.status_code,
1891: DECODE (l_comp_plan.attribute12, fnd_api.g_miss_char, NULL, l_comp_plan.attribute12),
1892: DECODE (l_comp_plan.attribute13, fnd_api.g_miss_char, NULL, l_comp_plan.attribute13),
1893: DECODE (l_comp_plan.attribute14, fnd_api.g_miss_char, NULL, l_comp_plan.attribute14),
1894: DECODE (l_comp_plan.attribute15, fnd_api.g_miss_char, NULL, l_comp_plan.attribute15),
1895: DECODE (l_comp_plan.org_id, fnd_api.g_miss_char, NULL, l_comp_plan.org_id)
1896: INTO
1897: l_comp_plan_rec.description,
1898: l_comp_plan_rec.status_code,
1899: l_comp_plan_rec.allow_rev_class_overlap,
1926: p_org_id,'PLAN',null,null,l_unique_name,
1927: x_return_status,x_msg_count,
1928: x_msg_data);
1929:
1930: IF (x_return_status <> fnd_api.g_ret_sts_success)
1931: THEN
1932: RAISE fnd_api.g_exc_error;
1933: END IF;
1934:
1928: x_msg_data);
1929:
1930: IF (x_return_status <> fnd_api.g_ret_sts_success)
1931: THEN
1932: RAISE fnd_api.g_exc_error;
1933: END IF;
1934:
1935: l_comp_plan_rec.name := l_unique_name;
1936:
1933: END IF;
1934:
1935: l_comp_plan_rec.name := l_unique_name;
1936:
1937: create_comp_plan(p_api_version,FND_API.G_FALSE,
1938: FND_API.G_FALSE,p_validation_level,
1939: l_comp_plan_rec,x_comp_plan_id,x_return_status,
1940: x_msg_count,x_msg_data);
1941:
1934:
1935: l_comp_plan_rec.name := l_unique_name;
1936:
1937: create_comp_plan(p_api_version,FND_API.G_FALSE,
1938: FND_API.G_FALSE,p_validation_level,
1939: l_comp_plan_rec,x_comp_plan_id,x_return_status,
1940: x_msg_count,x_msg_data);
1941:
1942: IF (x_return_status <> fnd_api.g_ret_sts_success)
1938: FND_API.G_FALSE,p_validation_level,
1939: l_comp_plan_rec,x_comp_plan_id,x_return_status,
1940: x_msg_count,x_msg_data);
1941:
1942: IF (x_return_status <> fnd_api.g_ret_sts_success)
1943: THEN
1944: RAISE fnd_api.g_exc_error;
1945: END IF;
1946:
1940: x_msg_count,x_msg_data);
1941:
1942: IF (x_return_status <> fnd_api.g_ret_sts_success)
1943: THEN
1944: RAISE fnd_api.g_exc_error;
1945: END IF;
1946:
1947: FOR j in get_quota_assign_data
1948: LOOP
1952: l_quota_assign_rec.org_id := j.org_id;
1953: l_quota_assign_rec.object_version_number := 1;
1954: l_quota_assign_rec.quota_sequence := j.quota_sequence;
1955:
1956: CN_QUOTA_ASSIGN_PVT.create_quota_assign(p_api_version,FND_API.G_FALSE,
1957: FND_API.G_FALSE,p_validation_level,
1958: l_quota_assign_rec,x_return_status,
1959: x_msg_count,x_msg_data);
1960:
1953: l_quota_assign_rec.object_version_number := 1;
1954: l_quota_assign_rec.quota_sequence := j.quota_sequence;
1955:
1956: CN_QUOTA_ASSIGN_PVT.create_quota_assign(p_api_version,FND_API.G_FALSE,
1957: FND_API.G_FALSE,p_validation_level,
1958: l_quota_assign_rec,x_return_status,
1959: x_msg_count,x_msg_data);
1960:
1961: IF (x_return_status <> fnd_api.g_ret_sts_success)
1957: FND_API.G_FALSE,p_validation_level,
1958: l_quota_assign_rec,x_return_status,
1959: x_msg_count,x_msg_data);
1960:
1961: IF (x_return_status <> fnd_api.g_ret_sts_success)
1962: THEN
1963: RAISE fnd_api.g_exc_error;
1964: END IF;
1965: END LOOP;
1959: x_msg_count,x_msg_data);
1960:
1961: IF (x_return_status <> fnd_api.g_ret_sts_success)
1962: THEN
1963: RAISE fnd_api.g_exc_error;
1964: END IF;
1965: END LOOP;
1966:
1967:
1967:
1968:
1969: -- Standard check of p_commit.
1970:
1971: IF FND_API.To_Boolean( p_commit ) THEN
1972: COMMIT WORK;
1973: END IF;
1974:
1975: -- Standard call to get message count and if count is 1, get message info.
1976:
1977: FND_MSG_PUB.Count_And_Get
1978: (p_count => x_msg_count ,
1979: p_data => x_msg_data ,
1980: p_encoded => FND_API.G_FALSE );
1981:
1982: EXCEPTION
1983:
1984: WHEN FND_API.G_EXC_ERROR THEN
1980: p_encoded => FND_API.G_FALSE );
1981:
1982: EXCEPTION
1983:
1984: WHEN FND_API.G_EXC_ERROR THEN
1985: ROLLBACK TO duplicate_comp_plan;
1986: x_return_status := FND_API.G_RET_STS_ERROR ;
1987: FND_MSG_PUB.count_and_get
1988: (p_count => x_msg_count ,
1982: EXCEPTION
1983:
1984: WHEN FND_API.G_EXC_ERROR THEN
1985: ROLLBACK TO duplicate_comp_plan;
1986: x_return_status := FND_API.G_RET_STS_ERROR ;
1987: FND_MSG_PUB.count_and_get
1988: (p_count => x_msg_count ,
1989: p_data => x_msg_data ,
1990: p_encoded => FND_API.G_FALSE );
1986: x_return_status := FND_API.G_RET_STS_ERROR ;
1987: FND_MSG_PUB.count_and_get
1988: (p_count => x_msg_count ,
1989: p_data => x_msg_data ,
1990: p_encoded => FND_API.G_FALSE );
1991:
1992: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1993: ROLLBACK TO duplicate_comp_plan;
1994: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1988: (p_count => x_msg_count ,
1989: p_data => x_msg_data ,
1990: p_encoded => FND_API.G_FALSE );
1991:
1992: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1993: ROLLBACK TO duplicate_comp_plan;
1994: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1995: FND_MSG_PUB.count_and_get
1996: (p_count => x_msg_count ,
1990: p_encoded => FND_API.G_FALSE );
1991:
1992: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1993: ROLLBACK TO duplicate_comp_plan;
1994: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1995: FND_MSG_PUB.count_and_get
1996: (p_count => x_msg_count ,
1997: p_data => x_msg_data ,
1998: p_encoded => FND_API.G_FALSE );
1994: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1995: FND_MSG_PUB.count_and_get
1996: (p_count => x_msg_count ,
1997: p_data => x_msg_data ,
1998: p_encoded => FND_API.G_FALSE );
1999:
2000: WHEN OTHERS THEN
2001: ROLLBACK TO duplicate_comp_plan;
2002: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1998: p_encoded => FND_API.G_FALSE );
1999:
2000: WHEN OTHERS THEN
2001: ROLLBACK TO duplicate_comp_plan;
2002: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2003: IF FND_MSG_PUB.check_msg_level
2004: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2005: THEN
2006: FND_MSG_PUB.add_exc_msg
2010:
2011: FND_MSG_PUB.count_and_get
2012: (p_count => x_msg_count ,
2013: p_data => x_msg_data ,
2014: p_encoded => FND_API.G_FALSE );
2015:
2016: END duplicate_comp_plan;
2017:
2018: