17: p_quota_assign_rec.quota_name = fnd_api.g_miss_char) OR
18: p_quota_assign_rec.ORG_ID IS NULL OR
19: p_quota_assign_rec.org_id = fnd_api.g_miss_num
20: then
21: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
22: FND_MESSAGE.SET_NAME ('CN' , 'CN_REQ_PAR_MISSING');
23: FND_MSG_PUB.Add;
24: END IF;
25: RAISE FND_API.G_EXC_ERROR ;
19: p_quota_assign_rec.org_id = fnd_api.g_miss_num
20: then
21: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
22: FND_MESSAGE.SET_NAME ('CN' , 'CN_REQ_PAR_MISSING');
23: FND_MSG_PUB.Add;
24: END IF;
25: RAISE FND_API.G_EXC_ERROR ;
26: end if;
27: END;
38: OPEN l_cp_id_csr(p_cp_name);
39: FETCH l_cp_id_csr INTO l_cp_id;
40: CLOSE l_cp_id_csr;
41: if (l_cp_id IS NULL OR l_cp_id = 0) then
42: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
43: FND_MESSAGE.SET_NAME ('CN' , 'CN_CP_NOT_EXIST');
44: FND_MESSAGE.SET_token('CP_NAME', p_cp_name);
45: FND_MSG_PUB.Add;
46: END IF;
41: if (l_cp_id IS NULL OR l_cp_id = 0) then
42: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
43: FND_MESSAGE.SET_NAME ('CN' , 'CN_CP_NOT_EXIST');
44: FND_MESSAGE.SET_token('CP_NAME', p_cp_name);
45: FND_MSG_PUB.Add;
46: END IF;
47: RAISE FND_API.G_EXC_ERROR ;
48: end if;
49: RETURN l_cp_id;
60: OPEN l_pe_id_csr(p_pe_name);
61: FETCH l_pe_id_csr INTO l_pe_id;
62: CLOSE l_pe_id_csr;
63: if (l_pe_id IS NULL OR l_pe_id = 0) then
64: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
65: FND_MESSAGE.SET_NAME ('CN' , 'CN_INVALID_QUOTA');
66: FND_MSG_PUB.Add;
67: END IF;
68: RAISE FND_API.G_EXC_ERROR ;
62: CLOSE l_pe_id_csr;
63: if (l_pe_id IS NULL OR l_pe_id = 0) then
64: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
65: FND_MESSAGE.SET_NAME ('CN' , 'CN_INVALID_QUOTA');
66: FND_MSG_PUB.Add;
67: END IF;
68: RAISE FND_API.G_EXC_ERROR ;
69: end if;
70: RETURN l_pe_id;
130: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
131: END IF;
132: -- Initialize message list if p_init_msg_list is set to TRUE.
133: IF FND_API.to_Boolean( p_init_msg_list ) THEN
134: FND_MSG_PUB.initialize;
135: END IF;
136: -- Initialize API return status to success
137: x_return_status := FND_API.G_RET_STS_SUCCESS;
138: -- API body
190: IF FND_API.To_Boolean( p_commit ) THEN
191: COMMIT WORK;
192: END IF;
193: -- Standard call to get message count and if count is 1, get message info.
194: FND_MSG_PUB.Count_And_Get
195: (p_count => x_msg_count ,
196: p_data => x_msg_data ,
197: p_encoded => FND_API.G_FALSE );
198: EXCEPTION
198: EXCEPTION
199: WHEN FND_API.G_EXC_ERROR THEN
200: ROLLBACK TO Create_Quota_Assign_Pub;
201: x_return_status := FND_API.G_RET_STS_ERROR ;
202: FND_MSG_PUB.Count_And_Get
203: (p_count => x_msg_count ,
204: p_data => x_msg_data ,
205: p_encoded => FND_API.G_FALSE );
206: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
205: p_encoded => FND_API.G_FALSE );
206: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
207: ROLLBACK TO Create_Quota_Assign_Pub;
208: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
209: FND_MSG_PUB.Count_And_Get
210: (p_count => x_msg_count ,
211: p_data => x_msg_data ,
212: p_encoded => FND_API.G_FALSE );
213: WHEN OTHERS THEN
212: p_encoded => FND_API.G_FALSE );
213: WHEN OTHERS THEN
214: ROLLBACK TO Create_Quota_Assign_Pub;
215: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
216: IF FND_MSG_PUB.Check_Msg_Level
217: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
218: THEN
219: FND_MSG_PUB.Add_Exc_Msg
220: (G_PKG_NAME ,
213: WHEN OTHERS THEN
214: ROLLBACK TO Create_Quota_Assign_Pub;
215: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
216: IF FND_MSG_PUB.Check_Msg_Level
217: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
218: THEN
219: FND_MSG_PUB.Add_Exc_Msg
220: (G_PKG_NAME ,
221: l_api_name );
215: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
216: IF FND_MSG_PUB.Check_Msg_Level
217: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
218: THEN
219: FND_MSG_PUB.Add_Exc_Msg
220: (G_PKG_NAME ,
221: l_api_name );
222: END IF;
223: FND_MSG_PUB.Count_And_Get
219: FND_MSG_PUB.Add_Exc_Msg
220: (G_PKG_NAME ,
221: l_api_name );
222: END IF;
223: FND_MSG_PUB.Count_And_Get
224: (p_count => x_msg_count ,
225: p_data => x_msg_data ,
226: p_encoded => FND_API.G_FALSE );
227: END Create_Quota_Assign;
296: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
297: END IF;
298: -- Initialize message list if p_init_msg_list is set to TRUE.
299: IF FND_API.to_Boolean( p_init_msg_list ) THEN
300: FND_MSG_PUB.initialize;
301: END IF;
302: -- Initialize API return status to success
303: x_return_status := FND_API.G_RET_STS_SUCCESS;
304: -- API body
320:
321: if (l_quota_assign_rec.old_quota_name is NULL OR
322: l_quota_assign_rec.old_quota_name = fnd_api.g_miss_char) then
323:
324: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
325: FND_MESSAGE.SET_NAME ('CN' , 'CN_REQ_PAR_MISSING');
326: FND_MSG_PUB.Add;
327: END IF;
328: RAISE FND_API.G_EXC_ERROR ;
322: l_quota_assign_rec.old_quota_name = fnd_api.g_miss_char) then
323:
324: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
325: FND_MESSAGE.SET_NAME ('CN' , 'CN_REQ_PAR_MISSING');
326: FND_MSG_PUB.Add;
327: END IF;
328: RAISE FND_API.G_EXC_ERROR ;
329: end if;
330:
349: 'cn.plsql.CN_QUOTA_ASSIGN_PUB.Update_Quota_Assign.error',
350: true);
351: end if;
352:
353: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
354: FND_MESSAGE.SET_NAME ('FND' , 'FND_MO_OU_CANNOT_UPDATE');
355: FND_MSG_PUB.Add;
356: END IF;
357:
351: end if;
352:
353: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
354: FND_MESSAGE.SET_NAME ('FND' , 'FND_MO_OU_CANNOT_UPDATE');
355: FND_MSG_PUB.Add;
356: END IF;
357:
358: RAISE FND_API.G_EXC_ERROR ;
359: end if;
364: l_quota_id := validate_pe_name(l_quota_assign_rec.quota_name);
365: end if;*/
366:
367: if (l_quota_assign_id is null or l_quota_assign_id = 0) then
368: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
369: FND_MESSAGE.SET_NAME ('CN' , 'CN_INVALID_PLAN_ASSIGNS');
370: FND_MSG_PUB.Add;
371: END IF;
372: RAISE FND_API.G_EXC_ERROR ;
366:
367: if (l_quota_assign_id is null or l_quota_assign_id = 0) then
368: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
369: FND_MESSAGE.SET_NAME ('CN' , 'CN_INVALID_PLAN_ASSIGNS');
370: FND_MSG_PUB.Add;
371: END IF;
372: RAISE FND_API.G_EXC_ERROR ;
373: end if;
374:
411: IF FND_API.To_Boolean( p_commit ) THEN
412: COMMIT WORK;
413: END IF;
414: -- Standard call to get message count and if count is 1, get message info.
415: FND_MSG_PUB.Count_And_Get
416: (p_count => x_msg_count ,
417: p_data => x_msg_data ,
418: p_encoded => FND_API.G_FALSE );
419: EXCEPTION
419: EXCEPTION
420: WHEN FND_API.G_EXC_ERROR THEN
421: ROLLBACK TO Update_Quota_Assign_Pub;
422: x_return_status := FND_API.G_RET_STS_ERROR ;
423: FND_MSG_PUB.Count_And_Get
424: (p_count => x_msg_count ,
425: p_data => x_msg_data ,
426: p_encoded => FND_API.G_FALSE );
427: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
426: p_encoded => FND_API.G_FALSE );
427: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
428: ROLLBACK TO Update_Quota_Assign_Pub;
429: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
430: FND_MSG_PUB.Count_And_Get
431: (p_count => x_msg_count ,
432: p_data => x_msg_data ,
433: p_encoded => FND_API.G_FALSE );
434: WHEN OTHERS THEN
433: p_encoded => FND_API.G_FALSE );
434: WHEN OTHERS THEN
435: ROLLBACK TO Update_Quota_Assign_Pub;
436: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
437: IF FND_MSG_PUB.Check_Msg_Level
438: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
439: THEN
440: FND_MSG_PUB.Add_Exc_Msg
441: (G_PKG_NAME ,
434: WHEN OTHERS THEN
435: ROLLBACK TO Update_Quota_Assign_Pub;
436: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
437: IF FND_MSG_PUB.Check_Msg_Level
438: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
439: THEN
440: FND_MSG_PUB.Add_Exc_Msg
441: (G_PKG_NAME ,
442: l_api_name );
436: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
437: IF FND_MSG_PUB.Check_Msg_Level
438: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
439: THEN
440: FND_MSG_PUB.Add_Exc_Msg
441: (G_PKG_NAME ,
442: l_api_name );
443: END IF;
444: FND_MSG_PUB.Count_And_Get
440: FND_MSG_PUB.Add_Exc_Msg
441: (G_PKG_NAME ,
442: l_api_name );
443: END IF;
444: FND_MSG_PUB.Count_And_Get
445: (p_count => x_msg_count ,
446: p_data => x_msg_data ,
447: p_encoded => FND_API.G_FALSE );
448: END Update_Quota_Assign;
515: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
516: END IF;
517: -- Initialize message list if p_init_msg_list is set to TRUE.
518: IF FND_API.to_Boolean( p_init_msg_list ) THEN
519: FND_MSG_PUB.initialize;
520: END IF;
521: -- Initialize API return status to success
522: x_return_status := FND_API.G_RET_STS_SUCCESS;
523: -- API body
554: 'cn.plsql.CN_QUOTA_ASSIGN_PUB.Delete_Quota_Assign.error',
555: true);
556: end if;
557:
558: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
559: FND_MESSAGE.SET_NAME ('FND' , 'FND_MO_OU_CANNOT_UPDATE');
560: FND_MSG_PUB.Add;
561: END IF;
562:
556: end if;
557:
558: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
559: FND_MESSAGE.SET_NAME ('FND' , 'FND_MO_OU_CANNOT_UPDATE');
560: FND_MSG_PUB.Add;
561: END IF;
562:
563: RAISE FND_API.G_EXC_ERROR ;
564: end if;
563: RAISE FND_API.G_EXC_ERROR ;
564: end if;
565:
566: if (l_quota_assign_id is null or l_quota_assign_id = 0) then
567: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
568: FND_MESSAGE.SET_NAME ('CN' , 'CN_INVALID_PLAN_ASSIGNS');
569: FND_MSG_PUB.Add;
570: END IF;
571: RAISE FND_API.G_EXC_ERROR ;
565:
566: if (l_quota_assign_id is null or l_quota_assign_id = 0) then
567: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
568: FND_MESSAGE.SET_NAME ('CN' , 'CN_INVALID_PLAN_ASSIGNS');
569: FND_MSG_PUB.Add;
570: END IF;
571: RAISE FND_API.G_EXC_ERROR ;
572: end if;
573:
606: IF FND_API.To_Boolean( p_commit ) THEN
607: COMMIT WORK;
608: END IF;
609: -- Standard call to get message count and if count is 1, get message info.
610: FND_MSG_PUB.Count_And_Get
611: (p_count => x_msg_count ,
612: p_data => x_msg_data ,
613: p_encoded => FND_API.G_FALSE );
614: EXCEPTION
614: EXCEPTION
615: WHEN FND_API.G_EXC_ERROR THEN
616: ROLLBACK TO Delete_Quota_Assign_Pub;
617: x_return_status := FND_API.G_RET_STS_ERROR ;
618: FND_MSG_PUB.Count_And_Get
619: (p_count => x_msg_count ,
620: p_data => x_msg_data ,
621: p_encoded => FND_API.G_FALSE );
622: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
621: p_encoded => FND_API.G_FALSE );
622: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
623: ROLLBACK TO Delete_Quota_Assign_Pub;
624: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
625: FND_MSG_PUB.Count_And_Get
626: (p_count => x_msg_count ,
627: p_data => x_msg_data ,
628: p_encoded => FND_API.G_FALSE );
629: WHEN OTHERS THEN
628: p_encoded => FND_API.G_FALSE );
629: WHEN OTHERS THEN
630: ROLLBACK TO Delete_Quota_Assign_Pub;
631: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
632: IF FND_MSG_PUB.Check_Msg_Level
633: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
634: THEN
635: FND_MSG_PUB.Add_Exc_Msg
636: (G_PKG_NAME ,
629: WHEN OTHERS THEN
630: ROLLBACK TO Delete_Quota_Assign_Pub;
631: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
632: IF FND_MSG_PUB.Check_Msg_Level
633: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
634: THEN
635: FND_MSG_PUB.Add_Exc_Msg
636: (G_PKG_NAME ,
637: l_api_name );
631: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
632: IF FND_MSG_PUB.Check_Msg_Level
633: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
634: THEN
635: FND_MSG_PUB.Add_Exc_Msg
636: (G_PKG_NAME ,
637: l_api_name );
638: END IF;
639: FND_MSG_PUB.Count_And_Get
635: FND_MSG_PUB.Add_Exc_Msg
636: (G_PKG_NAME ,
637: l_api_name );
638: END IF;
639: FND_MSG_PUB.Count_And_Get
640: (p_count => x_msg_count ,
641: p_data => x_msg_data ,
642: p_encoded => FND_API.G_FALSE );
643: END Delete_Quota_Assign;