75:
76:
77: BEGIN
78: -- Initialize API return status to success
79: x_return_status := FND_API.G_RET_STS_SUCCESS;
80: x_loading_status := p_loading_status;
81: -- API body
82:
83: --
89: FND_MESSAGE.Set_Name('CN', 'CN_CANNOT_USE_OTHER_COL');
90: FND_MSG_PUB.Add;
91: END IF;
92: x_loading_status := 'CN_CANNOT_USE_OTHER_COL';
93: RAISE FND_API.G_EXC_ERROR ;
94: END IF;
95:
96: --
97: -- check table name is not null
101: FND_MESSAGE.Set_Name('CN', 'CN_TABLE_NAME_NOT_NULL');
102: FND_MSG_PUB.Add;
103: END IF;
104: x_loading_status := 'CN_TABLE_NAME_NOT_NULL';
105: RAISE FND_API.G_EXC_ERROR ;
106: END IF;
107:
108: --
109: -- check col name is not null
113: FND_MESSAGE.Set_Name('CN', 'CN_COL_NAME_NOT_NULL');
114: FND_MSG_PUB.Add;
115: END IF;
116: x_loading_status := 'CN_COLUMN_NAME_NOT_NULL';
117: RAISE FND_API.G_EXC_ERROR ;
118: END IF;
119:
120: --
121: -- check input exists and line number exists
126: FND_MESSAGE.Set_Name('CN', 'CN_PAY_ELEMENT_MAP_NOT_EXISTS');
127: FND_MSG_PUB.Add;
128: END IF;
129: x_loading_status := 'CN_PAY_ELEMENT_MAP_NOT_EXISTS';
130: RAISE FND_API.G_EXC_ERROR ;
131: END IF;
132:
133:
134: --
140: FND_MESSAGE.Set_Name('CN', 'CN_ELEMENT_INPUT_NOT_EXISTS');
141: FND_MSG_PUB.Add;
142: END IF;
143: x_loading_status := 'CN_ELEMENT_INPUT_NOT_EXISTS';
144: RAISE FND_API.G_EXC_ERROR ;
145: END IF;
146:
147: -- check table id exists
148: IF p_pay_element_input_rec.table_name IS NOT NULL and
151: FND_MESSAGE.Set_Name('CN', 'CN_TABLE_NAME_NOT_EXISTS');
152: FND_MSG_PUB.Add;
153: END IF;
154: x_loading_status := 'CN_TABLE_NAME_NOT_EXISTS';
155: RAISE FND_API.G_EXC_ERROR ;
156: END IF;
157:
158: -- check column id is exists
159: IF p_pay_element_input_rec.column_name IS NOT NULL and
162: FND_MESSAGE.Set_Name('CN', 'CN_COL_NAME_NOT_EXISTS');
163: FND_MSG_PUB.Add;
164: END IF;
165: x_loading_status := 'CN_COL_NAME_NOT_EXISTS';
166: RAISE FND_API.G_EXC_ERROR ;
167: END IF;
168:
169: --
170: -- duplication of payment Amount is not allowed
193: FND_MESSAGE.Set_Name('CN', 'CN_DUPLICATE_AMOUNT_INPUT');
194: FND_MSG_PUB.Add;
195: END IF;
196: x_loading_status := 'CN_DUPLICATE_AMOUNT_INPUT';
197: RAISE FND_API.G_EXC_ERROR ;
198: END;
199:
200: END IF;
201:
231: FND_MESSAGE.Set_Name('CN', 'CN_INPUT_VALUES_NOT_FOUND');
232: FND_MSG_PUB.Add;
233: END IF;
234: x_loading_status := 'CN_INPUT_VALUES_NOT_FOUND';
235: RAISE FND_API.G_EXC_ERROR ;
236:
237: END IF;
238:
239: -- End of validation
238:
239: -- End of validation
240:
241: EXCEPTION
242: WHEN FND_API.G_EXC_ERROR THEN
243: x_return_status := FND_API.G_RET_STS_ERROR ;
244: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
245: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
246: x_loading_status := 'UNEXPECTED_ERR';
239: -- End of validation
240:
241: EXCEPTION
242: WHEN FND_API.G_EXC_ERROR THEN
243: x_return_status := FND_API.G_RET_STS_ERROR ;
244: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
245: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
246: x_loading_status := 'UNEXPECTED_ERR';
247: WHEN OTHERS THEN
240:
241: EXCEPTION
242: WHEN FND_API.G_EXC_ERROR THEN
243: x_return_status := FND_API.G_RET_STS_ERROR ;
244: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
245: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
246: x_loading_status := 'UNEXPECTED_ERR';
247: WHEN OTHERS THEN
248: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
241: EXCEPTION
242: WHEN FND_API.G_EXC_ERROR THEN
243: x_return_status := FND_API.G_RET_STS_ERROR ;
244: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
245: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
246: x_loading_status := 'UNEXPECTED_ERR';
247: WHEN OTHERS THEN
248: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
249: x_loading_status := 'UNEXPECTED_ERR';
244: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
245: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
246: x_loading_status := 'UNEXPECTED_ERR';
247: WHEN OTHERS THEN
248: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
249: x_loading_status := 'UNEXPECTED_ERR';
250: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
251: THEN
252: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
288:
289: -- Standard Start of API savepoint
290: SAVEPOINT Create_pay_element_input;
291: -- Standard call to check for call compatibility.
292: IF NOT FND_API.compatible_api_call
293: ( l_api_version ,p_api_version ,l_api_name ,G_PKG_NAME )
294: THEN
295: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
296: END IF;
291: -- Standard call to check for call compatibility.
292: IF NOT FND_API.compatible_api_call
293: ( l_api_version ,p_api_version ,l_api_name ,G_PKG_NAME )
294: THEN
295: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
296: END IF;
297:
298: -- Initialize message list if p_init_msg_list is set to TRUE.
299: IF FND_API.to_Boolean( p_init_msg_list ) THEN
295: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
296: END IF;
297:
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:
303: -- Initialize API return status to success
300: FND_MSG_PUB.initialize;
301: END IF;
302:
303: -- Initialize API return status to success
304: x_return_status := FND_API.G_RET_STS_SUCCESS;
305: x_loading_status := 'CN_INSERTED';
306: -- Assign the parameter to a local variable
307:
308: l_pay_element_input_rec := p_pay_element_input_rec;
312: p_pay_element_input_rec.element_type_id,
313: p_pay_element_input_rec.line_number,
314: p_pay_element_input_rec.element_input_id,
315: Decode(p_pay_element_input_rec.table_name,
316: FND_API.G_MISS_CHAR, NULL ,
317: p_pay_element_input_rec.table_name),
318: Decode(p_pay_element_input_rec.column_name,
319: FND_API.G_MISS_CHAR, NULL ,
320: p_pay_element_input_rec.column_name)
315: Decode(p_pay_element_input_rec.table_name,
316: FND_API.G_MISS_CHAR, NULL ,
317: p_pay_element_input_rec.table_name),
318: Decode(p_pay_element_input_rec.column_name,
319: FND_API.G_MISS_CHAR, NULL ,
320: p_pay_element_input_rec.column_name)
321: INTO
322: l_pay_element_input_rec.quota_pay_element_id,
323: l_pay_element_input_rec.element_type_id,
357: p_action => l_action,
358: p_loading_status => x_loading_status,
359: x_loading_status => x_loading_status
360: );
361: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
362: RAISE FND_API.G_EXC_ERROR ;
363: ELSE
364: -- Create cn_pay_element_inputs
365:
358: p_loading_status => x_loading_status,
359: x_loading_status => x_loading_status
360: );
361: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
362: RAISE FND_API.G_EXC_ERROR ;
363: ELSE
364: -- Create cn_pay_element_inputs
365:
366: cn_pay_element_inputs_pkg.insert_row
384: -- End of API body.
385: --
386:
387: -- Standard check of p_commit.
388: IF FND_API.To_Boolean( p_commit ) THEN
389: COMMIT WORK;
390: END IF;
391: -- Standard call to get message count and if count is 1, get message info.
392: FND_MSG_PUB.Count_And_Get
392: FND_MSG_PUB.Count_And_Get
393: (
394: p_count => x_msg_count ,
395: p_data => x_msg_data ,
396: p_encoded => FND_API.G_FALSE
397: );
398:
399: EXCEPTION
400: WHEN FND_API.G_EXC_ERROR THEN
396: p_encoded => FND_API.G_FALSE
397: );
398:
399: EXCEPTION
400: WHEN FND_API.G_EXC_ERROR THEN
401: ROLLBACK TO Create_pay_element_input;
402: x_return_status := FND_API.G_RET_STS_ERROR ;
403: FND_MSG_PUB.Count_And_Get
404: (
398:
399: EXCEPTION
400: WHEN FND_API.G_EXC_ERROR THEN
401: ROLLBACK TO Create_pay_element_input;
402: x_return_status := FND_API.G_RET_STS_ERROR ;
403: FND_MSG_PUB.Count_And_Get
404: (
405: p_count => x_msg_count ,
406: p_data => x_msg_data ,
403: FND_MSG_PUB.Count_And_Get
404: (
405: p_count => x_msg_count ,
406: p_data => x_msg_data ,
407: p_encoded => FND_API.G_FALSE
408: );
409:
410: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
411: ROLLBACK TO Create_pay_element_input;
406: p_data => x_msg_data ,
407: p_encoded => FND_API.G_FALSE
408: );
409:
410: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
411: ROLLBACK TO Create_pay_element_input;
412: x_loading_status := 'UNEXPECTED_ERR';
413: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
414: FND_MSG_PUB.Count_And_Get
409:
410: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
411: ROLLBACK TO Create_pay_element_input;
412: x_loading_status := 'UNEXPECTED_ERR';
413: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
414: FND_MSG_PUB.Count_And_Get
415: (
416: p_count => x_msg_count ,
417: p_data => x_msg_data ,
414: FND_MSG_PUB.Count_And_Get
415: (
416: p_count => x_msg_count ,
417: p_data => x_msg_data ,
418: p_encoded => FND_API.G_FALSE
419: );
420: WHEN OTHERS THEN
421: ROLLBACK TO Create_pay_element_input;
422: x_loading_status := 'UNEXPECTED_ERR';
419: );
420: WHEN OTHERS THEN
421: ROLLBACK TO Create_pay_element_input;
422: x_loading_status := 'UNEXPECTED_ERR';
423: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
424: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
425: THEN
426: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
427: END IF;
428: FND_MSG_PUB.Count_And_Get
429: (
430: p_count => x_msg_count ,
431: p_data => x_msg_data ,
432: p_encoded => FND_API.G_FALSE
433: );
434:
435: END create_pay_element_input;
436:
468: -- Standard Start of API savepoint
469: SAVEPOINT Update_pay_element_input;
470:
471: -- Standard call to check for call compatibility.
472: IF NOT FND_API.compatible_api_call
473: ( l_api_version ,p_api_version ,l_api_name ,G_PKG_NAME )
474: THEN
475: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
476: END IF;
471: -- Standard call to check for call compatibility.
472: IF NOT FND_API.compatible_api_call
473: ( l_api_version ,p_api_version ,l_api_name ,G_PKG_NAME )
474: THEN
475: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
476: END IF;
477: -- Initialize message list if p_init_msg_list is set to TRUE.
478: IF FND_API.to_Boolean( p_init_msg_list ) THEN
479: FND_MSG_PUB.initialize;
474: THEN
475: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
476: END IF;
477: -- Initialize message list if p_init_msg_list is set to TRUE.
478: IF FND_API.to_Boolean( p_init_msg_list ) THEN
479: FND_MSG_PUB.initialize;
480: END IF;
481: -- Initialize API return status to success
482: x_return_status := FND_API.G_RET_STS_SUCCESS;
478: IF FND_API.to_Boolean( p_init_msg_list ) THEN
479: FND_MSG_PUB.initialize;
480: END IF;
481: -- Initialize API return status to success
482: x_return_status := FND_API.G_RET_STS_SUCCESS;
483: x_loading_status := 'CN_UPDATED';
484:
485: -- Assign the parameter to a local variable
486: l_pay_element_input_rec := p_pay_element_input_rec;
489: -- assign the old value into it
490:
491: SELECT
492: Decode(p_pay_element_input_rec.pay_element_name,
493: FND_API.G_MISS_CHAR, NULL ,
494: p_pay_element_input_rec.pay_element_name),
495: Decode(p_pay_element_input_rec.table_name,
496: FND_API.G_MISS_CHAR, NULL ,
497: p_pay_element_input_rec.table_name),
492: Decode(p_pay_element_input_rec.pay_element_name,
493: FND_API.G_MISS_CHAR, NULL ,
494: p_pay_element_input_rec.pay_element_name),
495: Decode(p_pay_element_input_rec.table_name,
496: FND_API.G_MISS_CHAR, NULL ,
497: p_pay_element_input_rec.table_name),
498: Decode(p_pay_element_input_rec.column_name,
499: FND_API.G_MISS_CHAR, NULL ,
500: p_pay_element_input_rec.column_name),
495: Decode(p_pay_element_input_rec.table_name,
496: FND_API.G_MISS_CHAR, NULL ,
497: p_pay_element_input_rec.table_name),
498: Decode(p_pay_element_input_rec.column_name,
499: FND_API.G_MISS_CHAR, NULL ,
500: p_pay_element_input_rec.column_name),
501: Decode(p_pay_element_input_rec.pay_input_name,
502: FND_API.G_MISS_CHAR, NULL ,
503: p_pay_element_input_rec.pay_input_name),
498: Decode(p_pay_element_input_rec.column_name,
499: FND_API.G_MISS_CHAR, NULL ,
500: p_pay_element_input_rec.column_name),
501: Decode(p_pay_element_input_rec.pay_input_name,
502: FND_API.G_MISS_CHAR, NULL ,
503: p_pay_element_input_rec.pay_input_name),
504: Decode(p_pay_element_input_rec.line_number,
505: FND_API.G_MISS_NUM, NULL ,
506: p_pay_element_input_rec.line_number),
501: Decode(p_pay_element_input_rec.pay_input_name,
502: FND_API.G_MISS_CHAR, NULL ,
503: p_pay_element_input_rec.pay_input_name),
504: Decode(p_pay_element_input_rec.line_number,
505: FND_API.G_MISS_NUM, NULL ,
506: p_pay_element_input_rec.line_number),
507: Decode(p_pay_element_input_rec.pay_element_input_id,
508: FND_API.G_MISS_NUM, NULL ,
509: p_pay_element_input_rec.pay_element_input_id),
504: Decode(p_pay_element_input_rec.line_number,
505: FND_API.G_MISS_NUM, NULL ,
506: p_pay_element_input_rec.line_number),
507: Decode(p_pay_element_input_rec.pay_element_input_id,
508: FND_API.G_MISS_NUM, NULL ,
509: p_pay_element_input_rec.pay_element_input_id),
510: Decode(p_pay_element_input_rec.element_input_id,
511: FND_API.G_MISS_NUM, NULL ,
512: p_pay_element_input_rec.element_input_id),
507: Decode(p_pay_element_input_rec.pay_element_input_id,
508: FND_API.G_MISS_NUM, NULL ,
509: p_pay_element_input_rec.pay_element_input_id),
510: Decode(p_pay_element_input_rec.element_input_id,
511: FND_API.G_MISS_NUM, NULL ,
512: p_pay_element_input_rec.element_input_id),
513: Decode(p_pay_element_input_rec.element_type_id,
514: FND_API.G_MISS_NUM, NULL ,
515: p_pay_element_input_rec.element_type_id),
510: Decode(p_pay_element_input_rec.element_input_id,
511: FND_API.G_MISS_NUM, NULL ,
512: p_pay_element_input_rec.element_input_id),
513: Decode(p_pay_element_input_rec.element_type_id,
514: FND_API.G_MISS_NUM, NULL ,
515: p_pay_element_input_rec.element_type_id),
516: Decode(p_pay_element_input_rec.tab_object_id,
517: FND_API.G_MISS_NUM, NULL ,
518: p_pay_element_input_rec.tab_object_id),
513: Decode(p_pay_element_input_rec.element_type_id,
514: FND_API.G_MISS_NUM, NULL ,
515: p_pay_element_input_rec.element_type_id),
516: Decode(p_pay_element_input_rec.tab_object_id,
517: FND_API.G_MISS_NUM, NULL ,
518: p_pay_element_input_rec.tab_object_id),
519: Decode(p_pay_element_input_rec.col_object_id,
520: FND_API.G_MISS_NUM, NULL ,
521: p_pay_element_input_rec.col_object_id),
516: Decode(p_pay_element_input_rec.tab_object_id,
517: FND_API.G_MISS_NUM, NULL ,
518: p_pay_element_input_rec.tab_object_id),
519: Decode(p_pay_element_input_rec.col_object_id,
520: FND_API.G_MISS_NUM, NULL ,
521: p_pay_element_input_rec.col_object_id),
522: Decode(p_pay_element_input_rec.start_date,
523: FND_API.G_MISS_DATE, NULL ,
524: p_pay_element_input_rec.start_date),
519: Decode(p_pay_element_input_rec.col_object_id,
520: FND_API.G_MISS_NUM, NULL ,
521: p_pay_element_input_rec.col_object_id),
522: Decode(p_pay_element_input_rec.start_date,
523: FND_API.G_MISS_DATE, NULL ,
524: p_pay_element_input_rec.start_date),
525: Decode(p_pay_element_input_rec.end_date,
526: FND_API.G_MISS_DATE, NULL ,
527: p_pay_element_input_rec.end_date),
522: Decode(p_pay_element_input_rec.start_date,
523: FND_API.G_MISS_DATE, NULL ,
524: p_pay_element_input_rec.start_date),
525: Decode(p_pay_element_input_rec.end_date,
526: FND_API.G_MISS_DATE, NULL ,
527: p_pay_element_input_rec.end_date),
528: Decode(p_pay_element_input_rec.quota_pay_element_id,
529: FND_API.G_MISS_NUM, NULL ,
530: p_pay_element_input_rec.quota_pay_element_id)
525: Decode(p_pay_element_input_rec.end_date,
526: FND_API.G_MISS_DATE, NULL ,
527: p_pay_element_input_rec.end_date),
528: Decode(p_pay_element_input_rec.quota_pay_element_id,
529: FND_API.G_MISS_NUM, NULL ,
530: p_pay_element_input_rec.quota_pay_element_id)
531: INTO
532: l_pay_element_input_rec.pay_element_name,
533: l_pay_element_input_rec.table_name,
573: p_loading_status => x_loading_status,
574: x_loading_status => x_loading_status
575: );
576:
577: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
578: RAISE FND_API.G_EXC_ERROR ;
579: ELSE
580: -- Update
581:
574: x_loading_status => x_loading_status
575: );
576:
577: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
578: RAISE FND_API.G_EXC_ERROR ;
579: ELSE
580: -- Update
581:
582: cn_pay_element_inputs_pkg.update_row
594:
595:
596: END IF;
597: -- Standard check of p_commit.
598: IF FND_API.To_Boolean( p_commit ) THEN
599: COMMIT WORK;
600: END IF;
601: -- Standard call to get message count and if count is 1, get message info.
602: FND_MSG_PUB.Count_And_Get
602: FND_MSG_PUB.Count_And_Get
603: (
604: p_count => x_msg_count ,
605: p_data => x_msg_data ,
606: p_encoded => FND_API.G_FALSE
607: );
608:
609: EXCEPTION
610: WHEN FND_API.G_EXC_ERROR THEN
606: p_encoded => FND_API.G_FALSE
607: );
608:
609: EXCEPTION
610: WHEN FND_API.G_EXC_ERROR THEN
611: ROLLBACK TO Update_pay_element_input;
612: x_return_status := FND_API.G_RET_STS_ERROR ;
613: FND_MSG_PUB.Count_And_Get
614: (
608:
609: EXCEPTION
610: WHEN FND_API.G_EXC_ERROR THEN
611: ROLLBACK TO Update_pay_element_input;
612: x_return_status := FND_API.G_RET_STS_ERROR ;
613: FND_MSG_PUB.Count_And_Get
614: (
615: p_count => x_msg_count ,
616: p_data => x_msg_data ,
613: FND_MSG_PUB.Count_And_Get
614: (
615: p_count => x_msg_count ,
616: p_data => x_msg_data ,
617: p_encoded => FND_API.G_FALSE
618: );
619: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
620: ROLLBACK TO Update_pay_element_input;
621: x_loading_status := 'UNEXPECTED_ERR';
615: p_count => x_msg_count ,
616: p_data => x_msg_data ,
617: p_encoded => FND_API.G_FALSE
618: );
619: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
620: ROLLBACK TO Update_pay_element_input;
621: x_loading_status := 'UNEXPECTED_ERR';
622: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
623: FND_MSG_PUB.Count_And_Get
618: );
619: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
620: ROLLBACK TO Update_pay_element_input;
621: x_loading_status := 'UNEXPECTED_ERR';
622: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
623: FND_MSG_PUB.Count_And_Get
624: (
625: p_count => x_msg_count ,
626: p_data => x_msg_data ,
623: FND_MSG_PUB.Count_And_Get
624: (
625: p_count => x_msg_count ,
626: p_data => x_msg_data ,
627: p_encoded => FND_API.G_FALSE
628: );
629: WHEN OTHERS THEN
630: ROLLBACK TO Update_pay_element_input;
631: x_loading_status := 'UNEXPECTED_ERR';
628: );
629: WHEN OTHERS THEN
630: ROLLBACK TO Update_pay_element_input;
631: x_loading_status := 'UNEXPECTED_ERR';
632: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
633: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
634: THEN
635: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
636: END IF;
637: FND_MSG_PUB.Count_And_Get
638: (
639: p_count => x_msg_count ,
640: p_data => x_msg_data ,
641: p_encoded => FND_API.G_FALSE
642: );
643:
644: END Update_pay_element_input;
645:
668:
669: -- Standard Start of API savepoint
670: SAVEPOINT Delete_Pay_Element_Input;
671: -- Standard call to check for call compatibility.
672: IF NOT FND_API.compatible_api_call
673: ( l_api_version ,p_api_version ,l_api_name ,G_PKG_NAME )
674: THEN
675: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
676: END IF;
671: -- Standard call to check for call compatibility.
672: IF NOT FND_API.compatible_api_call
673: ( l_api_version ,p_api_version ,l_api_name ,G_PKG_NAME )
674: THEN
675: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
676: END IF;
677:
678: -- Initialize message list if p_init_msg_list is set to TRUE.
679: IF FND_API.to_Boolean( p_init_msg_list ) THEN
675: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
676: END IF;
677:
678: -- Initialize message list if p_init_msg_list is set to TRUE.
679: IF FND_API.to_Boolean( p_init_msg_list ) THEN
680: FND_MSG_PUB.initialize;
681: END IF;
682:
683: -- Initialize API return status to success
680: FND_MSG_PUB.initialize;
681: END IF;
682:
683: -- Initialize API return status to success
684: x_return_status := FND_API.G_RET_STS_SUCCESS;
685: x_loading_status := 'CN_DELETED';
686:
687: -- Delete record
688: cn_pay_element_inputs_pkg.delete_row
690: --
691: -- End of API body.
692: --
693: -- Standard check of p_commit.
694: IF FND_API.To_Boolean( p_commit ) THEN
695: COMMIT WORK;
696: END IF;
697: -- Standard call to get message count and if count is 1, get message info.
698: FND_MSG_PUB.Count_And_Get
698: FND_MSG_PUB.Count_And_Get
699: (
700: p_count => x_msg_count ,
701: p_data => x_msg_data ,
702: p_encoded => FND_API.G_FALSE
703: );
704:
705: EXCEPTION
706: WHEN FND_API.G_EXC_ERROR THEN
702: p_encoded => FND_API.G_FALSE
703: );
704:
705: EXCEPTION
706: WHEN FND_API.G_EXC_ERROR THEN
707: ROLLBACK TO Delete_pay_element_input;
708: x_return_status := FND_API.G_RET_STS_ERROR ;
709: FND_MSG_PUB.Count_And_Get
710: (
704:
705: EXCEPTION
706: WHEN FND_API.G_EXC_ERROR THEN
707: ROLLBACK TO Delete_pay_element_input;
708: x_return_status := FND_API.G_RET_STS_ERROR ;
709: FND_MSG_PUB.Count_And_Get
710: (
711: p_count => x_msg_count ,
712: p_data => x_msg_data ,
709: FND_MSG_PUB.Count_And_Get
710: (
711: p_count => x_msg_count ,
712: p_data => x_msg_data ,
713: p_encoded => FND_API.G_FALSE
714: );
715: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
716: ROLLBACK TO Delete_Pay_Element_Input;
717: x_loading_status := 'UNEXPECTED_ERR';
711: p_count => x_msg_count ,
712: p_data => x_msg_data ,
713: p_encoded => FND_API.G_FALSE
714: );
715: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
716: ROLLBACK TO Delete_Pay_Element_Input;
717: x_loading_status := 'UNEXPECTED_ERR';
718: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
719: FND_MSG_PUB.Count_And_Get
714: );
715: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
716: ROLLBACK TO Delete_Pay_Element_Input;
717: x_loading_status := 'UNEXPECTED_ERR';
718: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
719: FND_MSG_PUB.Count_And_Get
720: (
721: p_count => x_msg_count ,
722: p_data => x_msg_data ,
719: FND_MSG_PUB.Count_And_Get
720: (
721: p_count => x_msg_count ,
722: p_data => x_msg_data ,
723: p_encoded => FND_API.G_FALSE
724: );
725: WHEN OTHERS THEN
726: ROLLBACK TO Delete_pay_element_input;
727: x_loading_status := 'UNEXPECTED_ERR';
724: );
725: WHEN OTHERS THEN
726: ROLLBACK TO Delete_pay_element_input;
727: x_loading_status := 'UNEXPECTED_ERR';
728: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
729: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
730: THEN
731: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
732: END IF;
733: FND_MSG_PUB.Count_And_Get
734: (
735: p_count => x_msg_count ,
736: p_data => x_msg_data ,
737: p_encoded => FND_API.G_FALSE
738: );
739:
740: END Delete_Pay_Element_Input;
741:
848:
849: --
850: -- Standard call to check for call compatibility.
851: --
852: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
853: p_api_version ,
854: l_api_name ,
855: G_PKG_NAME )
856: THEN
853: p_api_version ,
854: l_api_name ,
855: G_PKG_NAME )
856: THEN
857: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
858: END IF;
859: --
860: -- Initialize message list if p_init_msg_list is set to TRUE.
861: --
858: END IF;
859: --
860: -- Initialize message list if p_init_msg_list is set to TRUE.
861: --
862: IF FND_API.to_Boolean( p_init_msg_list ) THEN
863: FND_MSG_PUB.initialize;
864: END IF;
865: --
866: -- Initialize API return status to success
864: END IF;
865: --
866: -- Initialize API return status to success
867: --
868: x_return_status := FND_API.G_RET_STS_SUCCESS;
869: x_loading_status := 'SELECTED';
870: --
871: -- API body
872: --
936: FND_MSG_PUB.Count_And_Get
937: (
938: p_count => x_msg_count ,
939: p_data => x_msg_data ,
940: p_encoded => FND_API.G_FALSE
941: );
942:
943: EXCEPTION
944: WHEN FND_API.G_EXC_ERROR THEN
940: p_encoded => FND_API.G_FALSE
941: );
942:
943: EXCEPTION
944: WHEN FND_API.G_EXC_ERROR THEN
945:
946: x_return_status := FND_API.G_RET_STS_ERROR ;
947: FND_MSG_PUB.Count_And_Get
948: (
942:
943: EXCEPTION
944: WHEN FND_API.G_EXC_ERROR THEN
945:
946: x_return_status := FND_API.G_RET_STS_ERROR ;
947: FND_MSG_PUB.Count_And_Get
948: (
949: p_count => x_msg_count ,
950: p_data => x_msg_data ,
947: FND_MSG_PUB.Count_And_Get
948: (
949: p_count => x_msg_count ,
950: p_data => x_msg_data ,
951: p_encoded => FND_API.G_FALSE
952: );
953: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
954:
955: x_loading_status := 'UNEXPECTED_ERR';
949: p_count => x_msg_count ,
950: p_data => x_msg_data ,
951: p_encoded => FND_API.G_FALSE
952: );
953: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
954:
955: x_loading_status := 'UNEXPECTED_ERR';
956: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
957: FND_MSG_PUB.Count_And_Get
952: );
953: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
954:
955: x_loading_status := 'UNEXPECTED_ERR';
956: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
957: FND_MSG_PUB.Count_And_Get
958: (
959: p_count => x_msg_count ,
960: p_data => x_msg_data ,
957: FND_MSG_PUB.Count_And_Get
958: (
959: p_count => x_msg_count ,
960: p_data => x_msg_data ,
961: p_encoded => FND_API.G_FALSE
962: );
963: WHEN OTHERS THEN
964:
965: x_loading_status := 'UNEXPECTED_ERR';
962: );
963: WHEN OTHERS THEN
964:
965: x_loading_status := 'UNEXPECTED_ERR';
966: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
967: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
968: THEN
969: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
970: END IF;
970: END IF;
971: FND_MSG_PUB.Count_And_Get (
972: p_count => x_msg_count ,
973: p_data => x_msg_data ,
974: p_encoded => FND_API.G_FALSE
975: );
976: END Get_pay_element_input;
977:
978: END CN_PAY_ELEMENT_INPUTS_PVT ;