DBA Data[Home] [Help]

APPS.CCT_QDE_PUB dependencies on FND_API

Line 39: IF FND_API.To_Boolean( p_commit ) THEN

35: if sql%notfound
36: then raise ENTRY_NOT_FOUND;
37: else
38: begin
39: IF FND_API.To_Boolean( p_commit ) THEN
40: COMMIT WORK;
41: END IF;
42: return 0;
43: end;

Line 58: IF FND_API.To_Boolean( p_commit ) THEN

54: (
55: cct_qde_agent_queues_s1.nextval, p_agent_id, l_item_type, p_classification, p_count,
56: 1, sysdate, 1, sysdate, 1
57: );
58: IF FND_API.To_Boolean( p_commit ) THEN
59: COMMIT WORK;
60: END IF;
61: return 0;
62: WHEN OTHERS THEN

Line 124: IF NOT FND_API.Compatible_API_Call (l_api_version ,

120: x_err_num NUMBER;
121: x_err_msg VARCHAR2(256);
122:
123: BEGIN
124: IF NOT FND_API.Compatible_API_Call (l_api_version ,
125: p_api_version ,
126: l_api_name ,
127: G_PKG_NAME )
128: THEN

Line 129: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

125: p_api_version ,
126: l_api_name ,
127: G_PKG_NAME )
128: THEN
129: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
130: END IF;
131: -- Initialize message list if p_init_msg_list is set to TRUE.
132: IF FND_API.to_Boolean( p_init_msg_list ) THEN
133: FND_MSG_PUB.initialize;

Line 132: IF FND_API.to_Boolean( p_init_msg_list ) THEN

128: THEN
129: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
130: END IF;
131: -- Initialize message list if p_init_msg_list is set to TRUE.
132: IF FND_API.to_Boolean( p_init_msg_list ) THEN
133: FND_MSG_PUB.initialize;
134: END IF;
135: -- Initialize API return status to failure
136:

Line 137: x_return_status := FND_API.G_RET_STS_SUCCESS ;

133: FND_MSG_PUB.initialize;
134: END IF;
135: -- Initialize API return status to failure
136:
137: x_return_status := FND_API.G_RET_STS_SUCCESS ;
138: x_msg_count := 0;
139: x_msg_data := null;
140:
141: -- API body

Line 162: IF FND_API.To_Boolean( p_commit ) THEN

158: p_item_type, p_classification, null,
159: 'N', 'N', 'N', sysdate,
160: 1, sysdate, 1, sysdate, 1);
161: --dbms_output.put_line('RECEIVE_ITEM: post insert rr');
162: IF FND_API.To_Boolean( p_commit ) THEN
163: COMMIT WORK;
164: END IF;
165:
166: -- with release 9i, if delay is present then enqueue item to AQ with delay.

Line 171: WHEN FND_API.G_EXC_ERROR THEN

167:
168: -- Routing.enqueue.item.
169:
170: EXCEPTION
171: WHEN FND_API.G_EXC_ERROR THEN
172: rollback;
173: x_return_status := FND_API.G_RET_STS_ERROR ;
174: x_msg_count := 1;
175: x_err_num := SQLCODE;

Line 173: x_return_status := FND_API.G_RET_STS_ERROR ;

169:
170: EXCEPTION
171: WHEN FND_API.G_EXC_ERROR THEN
172: rollback;
173: x_return_status := FND_API.G_RET_STS_ERROR ;
174: x_msg_count := 1;
175: x_err_num := SQLCODE;
176: x_err_msg := SUBSTR(SQLERRM, 1, 100);
177: x_msg_data := 'RECEIVE_ITEM: CCT_ERROR'

Line 182: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

178: || ' ErrorCode = ' || x_err_num
179: || ' ErrorMsg = ' || x_err_msg;
180: --dbms_output.put_line(x_msg_data);
181:
182: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
183: --dbms_output.put_line('Unexpected error');
184: ROLLBACK;
185: x_return_status := FND_API.G_RET_STS_ERROR ;
186: x_msg_count := 1;

Line 185: x_return_status := FND_API.G_RET_STS_ERROR ;

181:
182: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
183: --dbms_output.put_line('Unexpected error');
184: ROLLBACK;
185: x_return_status := FND_API.G_RET_STS_ERROR ;
186: x_msg_count := 1;
187: x_err_num := SQLCODE;
188: x_err_msg := SUBSTR(SQLERRM, 1, 100);
189: x_msg_data := 'RECEIVE_ITEM: CCT_ERROR'

Line 195: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

191: || ' ErrorMsg = ' || x_err_msg;
192: --dbms_output.put_line(x_msg_data);
193: WHEN OTHERS THEN
194: rollback;
195: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
196: x_msg_count := 1;
197: x_err_num := SQLCODE;
198: x_err_msg := SUBSTR(SQLERRM, 1, 100);
199: x_msg_data := 'RECEIVE_ITEM: CCT_ERROR'

Line 244: IF NOT FND_API.Compatible_API_Call (l_api_version ,

240:
241: PRAGMA EXCEPTION_INIT(RESOURCE_NOT_LOCKED, -54);
242:
243: BEGIN
244: IF NOT FND_API.Compatible_API_Call (l_api_version ,
245: p_api_version ,
246: l_api_name ,
247: G_PKG_NAME )
248: THEN

Line 249: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

245: p_api_version ,
246: l_api_name ,
247: G_PKG_NAME )
248: THEN
249: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
250: END IF;
251: -- Initialize message list if p_init_msg_list is set to TRUE.
252: IF FND_API.to_Boolean( p_init_msg_list ) THEN
253: FND_MSG_PUB.initialize;

Line 252: IF FND_API.to_Boolean( p_init_msg_list ) THEN

248: THEN
249: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
250: END IF;
251: -- Initialize message list if p_init_msg_list is set to TRUE.
252: IF FND_API.to_Boolean( p_init_msg_list ) THEN
253: FND_MSG_PUB.initialize;
254: END IF;
255: -- Initialize API return status to success
256: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 256: x_return_status := FND_API.G_RET_STS_SUCCESS;

252: IF FND_API.to_Boolean( p_init_msg_list ) THEN
253: FND_MSG_PUB.initialize;
254: END IF;
255: -- Initialize API return status to success
256: x_return_status := FND_API.G_RET_STS_SUCCESS;
257: x_msg_count := 0;
258: x_msg_data := null;
259:
260: -- API body

Line 368: IF FND_API.To_Boolean( p_commit ) THEN

364: payload => message,
365: msgid => message_handle);
366:
367: --dbms_output.put_line('UPDATE_ROUTE_RESULT: post dequeue result');
368: IF FND_API.To_Boolean( p_commit ) THEN
369: COMMIT WORK;
370: END IF;
371: exit;
372: exception

Line 375: IF FND_API.To_Boolean( p_commit ) THEN

371: exit;
372: exception
373: WHEN BIT_NOT_SET then
374: -- try to find match with other route result.
375: IF FND_API.To_Boolean( p_commit ) THEN
376: COMMIT WORK;
377: END IF;
378: WHEN AGENT_NOT_FOUND then
379: IF FND_API.To_Boolean( p_commit ) THEN

Line 379: IF FND_API.To_Boolean( p_commit ) THEN

375: IF FND_API.To_Boolean( p_commit ) THEN
376: COMMIT WORK;
377: END IF;
378: WHEN AGENT_NOT_FOUND then
379: IF FND_API.To_Boolean( p_commit ) THEN
380: COMMIT WORK;
381: END IF;
382: WHEN RESULT_NOT_FOUND then
383: IF FND_API.To_Boolean( p_commit ) THEN

Line 383: IF FND_API.To_Boolean( p_commit ) THEN

379: IF FND_API.To_Boolean( p_commit ) THEN
380: COMMIT WORK;
381: END IF;
382: WHEN RESULT_NOT_FOUND then
383: IF FND_API.To_Boolean( p_commit ) THEN
384: COMMIT WORK;
385: END IF;
386: exit;
387: WHEN NO_DATA_FOUND then

Line 389: IF FND_API.To_Boolean( p_commit ) THEN

385: END IF;
386: exit;
387: WHEN NO_DATA_FOUND then
388: -- possible that agent request is already processed.
389: IF FND_API.To_Boolean( p_commit ) THEN
390: COMMIT WORK;
391: END IF;
392: WHEN OTHERS then
393: rollback to GET_NEXT_AGENT_SAVEPOINT_2;

Line 403: IF FND_API.To_Boolean( p_commit ) THEN

399: --dbms_output.put_line(x_msg_data);
400: end;
401: end loop;
402:
403: IF FND_API.To_Boolean( p_commit ) THEN
404: COMMIT WORK;
405: END IF;
406: end;
407: EXCEPTION

Line 408: WHEN FND_API.G_EXC_ERROR THEN

404: COMMIT WORK;
405: END IF;
406: end;
407: EXCEPTION
408: WHEN FND_API.G_EXC_ERROR THEN
409: rollback;
410: x_return_status := FND_API.G_RET_STS_ERROR ;
411: x_msg_count := 1;
412: x_err_num := SQLCODE;

Line 410: x_return_status := FND_API.G_RET_STS_ERROR ;

406: end;
407: EXCEPTION
408: WHEN FND_API.G_EXC_ERROR THEN
409: rollback;
410: x_return_status := FND_API.G_RET_STS_ERROR ;
411: x_msg_count := 1;
412: x_err_num := SQLCODE;
413: x_err_msg := SUBSTR(SQLERRM, 1, 100);
414: x_msg_data :='UPDATE_ROUTE_RESULT: CCT_ERROR'

Line 418: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

414: x_msg_data :='UPDATE_ROUTE_RESULT: CCT_ERROR'
415: || ' ErrorCode = ' || x_err_num
416: || ' ErrorMsg = ' || x_err_msg;
417: --dbms_output.put_line(x_msg_data);
418: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
419: ROLLBACK;
420: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
421: x_msg_count := 1;
422: x_err_num := SQLCODE;

Line 420: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

416: || ' ErrorMsg = ' || x_err_msg;
417: --dbms_output.put_line(x_msg_data);
418: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
419: ROLLBACK;
420: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
421: x_msg_count := 1;
422: x_err_num := SQLCODE;
423: x_err_msg := SUBSTR(SQLERRM, 1, 100);
424: x_msg_data :='UPDATE_ROUTE_RESULT: CCT_ERROR'

Line 430: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

426: || ' ErrorMsg = ' || x_err_msg;
427: --dbms_output.put_line(x_msg_data);
428: WHEN OTHERS THEN
429: rollback;
430: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
431: x_msg_count := 1;
432: x_err_num := SQLCODE;
433: x_err_msg := SUBSTR(SQLERRM, 1, 100);
434: x_msg_data :='UPDATE_ROUTE_RESULT: CCT_ERROR'

Line 477: IF NOT FND_API.Compatible_API_Call (l_api_version ,

473: PRAGMA EXCEPTION_INIT(RESOURCE_NOT_LOCKED, -54);
474:
475:
476: BEGIN
477: IF NOT FND_API.Compatible_API_Call (l_api_version ,
478: p_api_version ,
479: l_api_name ,
480: G_PKG_NAME )
481: THEN

Line 482: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

478: p_api_version ,
479: l_api_name ,
480: G_PKG_NAME )
481: THEN
482: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
483: END IF;
484: -- Initialize message list if p_init_msg_list is set to TRUE.
485: IF FND_API.to_Boolean( p_init_msg_list ) THEN
486: FND_MSG_PUB.initialize;

Line 485: IF FND_API.to_Boolean( p_init_msg_list ) THEN

481: THEN
482: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
483: END IF;
484: -- Initialize message list if p_init_msg_list is set to TRUE.
485: IF FND_API.to_Boolean( p_init_msg_list ) THEN
486: FND_MSG_PUB.initialize;
487: END IF;
488: -- Initialize API return status to failure
489: SAVEPOINT GET_NEXT_ITEM_SAVEPOINT_1;

Line 491: x_return_status := FND_API.G_RET_STS_SUCCESS ;

487: END IF;
488: -- Initialize API return status to failure
489: SAVEPOINT GET_NEXT_ITEM_SAVEPOINT_1;
490:
491: x_return_status := FND_API.G_RET_STS_SUCCESS ;
492: x_msg_count := 0;
493: x_msg_data := null;
494: x_item_id := -1;
495: x_item_type := -1;

Line 589: IF FND_API.To_Boolean( p_commit ) THEN

585:
586: -- TODO Handle what happens if dequeue returns failure.
587: -- routing.stop reroute.
588: --dbms_output.put_line('GET_NEXT_ITEM: post dequeue result');
589: IF FND_API.To_Boolean( p_commit ) THEN
590: COMMIT WORK;
591: END IF;
592: exit;
593: exception

Line 596: IF FND_API.To_Boolean( p_commit ) THEN

592: exit;
593: exception
594: WHEN BIT_NOT_SET then
595: -- try to find match with other route result.
596: IF FND_API.To_Boolean( p_commit ) THEN
597: COMMIT WORK;
598: END IF;
599: WHEN AGENT_NOT_FOUND then
600: --possible that agent is assigned to some other media item as are result of a new route. exit.

Line 617: IF FND_API.To_Boolean( p_commit ) THEN

613: --dbms_output.put_line(x_msg_data);
614: end;
615: end loop;
616: --dbms_output.put_line('GET_NEXT_ITEM: loop ended');
617: IF FND_API.To_Boolean( p_commit ) THEN
618: COMMIT WORK;
619: END IF;
620: end;
621: EXCEPTION

Line 625: x_return_status := FND_API.G_RET_STS_ERROR ;

621: EXCEPTION
622: WHEN NO_DATA_FOUND THEN
623: -- return failure - agent not logged on.
624: rollback to GET_NEXT_ITEM_SAVEPOINT_1;
625: x_return_status := FND_API.G_RET_STS_ERROR ;
626: x_msg_count := 1;
627: x_err_num := SQLCODE;
628: x_err_msg := SUBSTR(SQLERRM, 1, 100);
629: x_msg_data :='GET_NEXT_ITEM: CCT_NO_AGENT_FOUND'

Line 634: WHEN FND_API.G_EXC_ERROR THEN

630: || ' ErrorCode = ' || x_err_num
631: || ' ErrorMsg = ' || x_err_msg;
632: --dbms_output.put_line(x_msg_data);
633:
634: WHEN FND_API.G_EXC_ERROR THEN
635: rollback to GET_NEXT_ITEM_SAVEPOINT_1;
636: x_return_status := FND_API.G_RET_STS_ERROR ;
637: x_msg_count := 1;
638: x_err_num := SQLCODE;

Line 636: x_return_status := FND_API.G_RET_STS_ERROR ;

632: --dbms_output.put_line(x_msg_data);
633:
634: WHEN FND_API.G_EXC_ERROR THEN
635: rollback to GET_NEXT_ITEM_SAVEPOINT_1;
636: x_return_status := FND_API.G_RET_STS_ERROR ;
637: x_msg_count := 1;
638: x_err_num := SQLCODE;
639: x_err_msg := SUBSTR(SQLERRM, 1, 100);
640: x_msg_data :='GET_NEXT_ITEM: CCT_ERROR'

Line 644: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

640: x_msg_data :='GET_NEXT_ITEM: CCT_ERROR'
641: || ' ErrorCode = ' || x_err_num
642: || ' ErrorMsg = ' || x_err_msg;
643: --dbms_output.put_line(x_msg_data);
644: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
645: rollback to GET_NEXT_ITEM_SAVEPOINT_1;
646: x_return_status := FND_API.G_RET_STS_ERROR ;
647: x_msg_count := 1;
648: x_err_num := SQLCODE;

Line 646: x_return_status := FND_API.G_RET_STS_ERROR ;

642: || ' ErrorMsg = ' || x_err_msg;
643: --dbms_output.put_line(x_msg_data);
644: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
645: rollback to GET_NEXT_ITEM_SAVEPOINT_1;
646: x_return_status := FND_API.G_RET_STS_ERROR ;
647: x_msg_count := 1;
648: x_err_num := SQLCODE;
649: x_err_msg := SUBSTR(SQLERRM, 1, 100);
650: x_msg_data :='GET_NEXT_ITEM: CCT_ERROR'

Line 656: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

652: || ' ErrorMsg = ' || x_err_msg;
653: --dbms_output.put_line(x_msg_data);
654: WHEN OTHERS THEN
655: rollback to GET_NEXT_ITEM_SAVEPOINT_1;
656: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
657: x_msg_count := 1;
658: x_err_num := SQLCODE;
659: x_err_msg := SUBSTR(SQLERRM, 1, 100);
660: x_msg_data :='GET_NEXT_ITEM: CCT_ERROR'

Line 701: IF NOT FND_API.Compatible_API_Call (l_api_version ,

697: l_found varchar2(256);
698: i number;
699:
700: BEGIN
701: IF NOT FND_API.Compatible_API_Call (l_api_version ,
702: p_api_version ,
703: l_api_name ,
704: G_PKG_NAME )
705: THEN

Line 706: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

702: p_api_version ,
703: l_api_name ,
704: G_PKG_NAME )
705: THEN
706: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
707: END IF;
708: -- Initialize message list if p_init_msg_list is set to TRUE.
709: IF FND_API.to_Boolean( p_init_msg_list ) THEN
710: FND_MSG_PUB.initialize;

Line 709: IF FND_API.to_Boolean( p_init_msg_list ) THEN

705: THEN
706: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
707: END IF;
708: -- Initialize message list if p_init_msg_list is set to TRUE.
709: IF FND_API.to_Boolean( p_init_msg_list ) THEN
710: FND_MSG_PUB.initialize;
711: END IF;
712: -- Initialize API return status to failure
713:

Line 716: x_return_status := FND_API.G_RET_STS_SUCCESS ;

712: -- Initialize API return status to failure
713:
714: SAVEPOINT UPDATE_QUEUE_COUNTS_SAVEPOINT;
715:
716: x_return_status := FND_API.G_RET_STS_SUCCESS ;
717: x_msg_count := 0;
718: x_msg_data := null;
719:
720: -- API body

Line 772: l_return_val := UPDATE_CLASSIFICATION_COUNT(FND_API.G_TRUE,

768: else
769: -- new classification
770: begin
771: -- update prev classification and count to db.
772: l_return_val := UPDATE_CLASSIFICATION_COUNT(FND_API.G_TRUE,
773: p_agent_id, p_item_type, l_prev_classification, l_prev_classification_count);
774: --dbms_output.put_line('update done');
775: --dbms_output.put_line('update done');
776: l_clArr.EXTEND;

Line 803: l_return_val := UPDATE_CLASSIFICATION_COUNT(FND_API.G_TRUE, p_agent_id,

799: --dbms_output.put_line(' l_prev_classification_count ' || l_prev_classification_count);
800: --dbms_output.put_line(' l_any_classification_count ' || l_any_classification_count);
801: if ((l_prev_classification is not null) and (l_prev_classification_count <> 0))
802: then
803: l_return_val := UPDATE_CLASSIFICATION_COUNT(FND_API.G_TRUE, p_agent_id,
804: p_item_type,l_prev_classification, l_prev_classification_count);
805: l_clArr.EXTEND;
806: l_clArr(l_clArr.LAST) := l_prev_classification;
807: --dbms_output.put_line('Added to classificationArray' || l_prev_classification);

Line 810: l_return_val := UPDATE_CLASSIFICATION_COUNT(FND_API.G_TRUE, p_agent_id,

806: l_clArr(l_clArr.LAST) := l_prev_classification;
807: --dbms_output.put_line('Added to classificationArray' || l_prev_classification);
808: end if;
809: --dbms_output.put_line('l_clArr.LAST = ' || l_clArr.LAST);
810: l_return_val := UPDATE_CLASSIFICATION_COUNT(FND_API.G_TRUE, p_agent_id,
811: p_item_type,null, l_any_classification_count);
812:
813: -- remove old classifications that are no longer valid.
814:

Line 845: IF FND_API.To_Boolean( p_commit ) THEN

841: begin
842: --dbms_output.put_line('Deleting classification' || r2_rec.classification);
843: delete from cct_qde_agent_queues
844: where agent_queue_id = r2_rec.agent_queue_id;
845: IF FND_API.To_Boolean( p_commit ) THEN
846: COMMIT WORK;
847: END IF;
848: end;
849: end if;

Line 854: IF FND_API.To_Boolean( p_commit ) THEN

850: end;
851: end loop;
852: end;
853:
854: IF FND_API.To_Boolean( p_commit ) THEN
855: COMMIT WORK;
856: END IF;
857: end;
858: EXCEPTION

Line 863: x_return_status := FND_API.G_RET_STS_ERROR ;

859: -- WHEN AGENT_NOT_FOUND THEN
860: WHEN NO_DATA_FOUND THEN
861: -- return failure - agent not logged on.
862:
863: x_return_status := FND_API.G_RET_STS_ERROR ;
864: x_msg_count := 1;
865: x_err_num := SQLCODE;
866: x_err_msg := SUBSTR(SQLERRM, 1, 100);
867: x_msg_data :='UPDATE_AGENT_QUEUES: CCT_NO_AGENT_FOUND'

Line 872: WHEN FND_API.G_EXC_ERROR THEN

868: || ' ErrorCode = ' || x_err_num
869: || ' ErrorMsg = ' || x_err_msg;
870: --dbms_output.put_line(x_msg_data);
871: rollback to UPDATE_QUEUE_COUNTS_SAVEPOINT;
872: WHEN FND_API.G_EXC_ERROR THEN
873:
874: x_return_status := FND_API.G_RET_STS_ERROR ;
875: x_msg_count := 1;
876: x_err_num := SQLCODE;

Line 874: x_return_status := FND_API.G_RET_STS_ERROR ;

870: --dbms_output.put_line(x_msg_data);
871: rollback to UPDATE_QUEUE_COUNTS_SAVEPOINT;
872: WHEN FND_API.G_EXC_ERROR THEN
873:
874: x_return_status := FND_API.G_RET_STS_ERROR ;
875: x_msg_count := 1;
876: x_err_num := SQLCODE;
877: x_err_msg := SUBSTR(SQLERRM, 1, 100);
878: x_msg_data :='UPDATE_AGENT_QUEUES: CCT_ERROR'

Line 883: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

879: || ' ErrorCode = ' || x_err_num
880: || ' ErrorMsg = ' || x_err_msg;
881: --dbms_output.put_line(x_msg_data);
882: rollback to UPDATE_QUEUE_COUNTS_SAVEPOINT;
883: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
884:
885: x_return_status := FND_API.G_RET_STS_ERROR ;
886: x_msg_count := 1;
887: x_err_num := SQLCODE;

Line 885: x_return_status := FND_API.G_RET_STS_ERROR ;

881: --dbms_output.put_line(x_msg_data);
882: rollback to UPDATE_QUEUE_COUNTS_SAVEPOINT;
883: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
884:
885: x_return_status := FND_API.G_RET_STS_ERROR ;
886: x_msg_count := 1;
887: x_err_num := SQLCODE;
888: x_err_msg := SUBSTR(SQLERRM, 1, 100);
889: x_msg_data :='UPDATE_AGENT_QUEUES: CCT_ERROR'

Line 896: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

892: --dbms_output.put_line(x_msg_data);
893: rollback to UPDATE_QUEUE_COUNTS_SAVEPOINT;
894: WHEN OTHERS THEN
895:
896: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
897: x_msg_count := 1;
898: x_err_num := SQLCODE;
899: x_err_msg := SUBSTR(SQLERRM, 1, 100);
900: x_msg_data :='UPDATE_AGENT_QUEUES: CCT_ERROR'

Line 945: IF FND_API.To_Boolean( p_commit ) THEN

941: (
942: p_agent_id, x_agent_index, x_raw_agent_index,
943: 1, sysdate, 1, sysdate, 1
944: );
945: IF FND_API.To_Boolean( p_commit ) THEN
946: COMMIT WORK;
947: END IF;
948: EXCEPTION
949: WHEN OTHERS THEN

Line 979: IF NOT FND_API.Compatible_API_Call (l_api_version ,

975: BEGIN
976: --dbms_output.put_line('GET_AGENT_INDEX:'
977: --|| ' agent_id = ' || p_agent_id);
978:
979: IF NOT FND_API.Compatible_API_Call (l_api_version ,
980: p_api_version ,
981: l_api_name ,
982: G_PKG_NAME )
983: THEN

Line 984: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

980: p_api_version ,
981: l_api_name ,
982: G_PKG_NAME )
983: THEN
984: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
985: END IF;
986: -- Initialize message list if p_init_msg_list is set to TRUE.
987: IF FND_API.to_Boolean( p_init_msg_list ) THEN
988: FND_MSG_PUB.initialize;

Line 987: IF FND_API.to_Boolean( p_init_msg_list ) THEN

983: THEN
984: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
985: END IF;
986: -- Initialize message list if p_init_msg_list is set to TRUE.
987: IF FND_API.to_Boolean( p_init_msg_list ) THEN
988: FND_MSG_PUB.initialize;
989: END IF;
990: -- Initialize API return status to failure
991: SAVEPOINT GET_AGENT_INDEX_SP;

Line 993: x_return_status := FND_API.G_RET_STS_SUCCESS ;

989: END IF;
990: -- Initialize API return status to failure
991: SAVEPOINT GET_AGENT_INDEX_SP;
992:
993: x_return_status := FND_API.G_RET_STS_SUCCESS ;
994: x_msg_count := 0;
995: x_msg_data := null;
996:
997: select agent_index, raw_agent_index

Line 1000: IF FND_API.To_Boolean( p_commit ) THEN

996:
997: select agent_index, raw_agent_index
998: into x_agent_index, x_raw_agent_index from cct_qde_agent
999: where agent_id = p_agent_id;
1000: IF FND_API.To_Boolean( p_commit ) THEN
1001: COMMIT WORK;
1002: END IF;
1003: EXCEPTION
1004: WHEN NO_DATA_FOUND then