eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PO_CLM_COLS_SUB_CHECK dependencies on FND_API

Line 45: x_return_status := FND_API.G_RET_STS_SUCCESS;

41: PO_UDA_DEFAULTING_PKG.DEBUG('Starting PO_CLM_COLS_SUB_CHECK.CLM_ORDER_AMT_WITHIN_MAX_MIN with parameters' , d_progress);
42: PO_UDA_DEFAULTING_PKG.DEBUG('p_document_id :' || p_document_id , d_progress);
43: PO_UDA_DEFAULTING_PKG.DEBUG('p_draft_id :' || p_draft_id , d_progress);
44:
45: x_return_status := FND_API.G_RET_STS_SUCCESS;
46: BEGIN
47: d_progress := 20;
48: SELECT TYPE_LOOKUP_CODE
49: INTO l_document_type_code

Line 106: x_return_status := FND_API.G_RET_STS_SUCCESS;

102: d_progress := 100;
103: IF l_total_amt_ordered BETWEEN l_idv_min_ord_amt AND l_idv_max_ord_amt THEN
104: d_progress := 110;
105: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Passed : CLM_ORDER_AMT_WITHIN_MAX_MIN' , d_progress);
106: x_return_status := FND_API.G_RET_STS_SUCCESS;
107: ELSE
108: d_progress := 120;
109: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : CLM_ORDER_AMT_WITHIN_MAX_MIN' , d_progress);
110:

Line 111: x_return_status := FND_API.G_RET_STS_ERROR;

107: ELSE
108: d_progress := 120;
109: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : CLM_ORDER_AMT_WITHIN_MAX_MIN' , d_progress);
110:
111: x_return_status := FND_API.G_RET_STS_ERROR;
112:
113: LOG_ERR_CLM_NMD_COLS_SUB_CHK
114: (
115: p_online_report_id => p_online_report_id

Line 129: x_return_status := FND_API.G_RET_STS_SUCCESS;

125: END LOOP;
126: ELSE
127: d_progress := 130;
128: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Not Applicable : Not a valid document' , d_progress);
129: x_return_status := FND_API.G_RET_STS_SUCCESS;
130: x_msg_data := 'Not a Standard PO';
131: END IF;
132: EXCEPTION
133: WHEN OTHERS THEN

Line 135: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

131: END IF;
132: EXCEPTION
133: WHEN OTHERS THEN
134: PO_UDA_DEFAULTING_PKG.DEBUG('Exception in CLM_ORDER_AMT_WITHIN_MAX_MIN' , d_progress);
135: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
136: END CLM_ORDER_AMT_WITHIN_MAX_MIN;
137:
138: /* The below procedure checks
139: * Maximum Order amount should be less than or equal to Sum of all lines amount & amount limit

Line 179: x_return_status := FND_API.G_RET_STS_SUCCESS;

175: PO_UDA_DEFAULTING_PKG.DEBUG('Starting PO_CLM_COLS_SUB_CHECK.CLM_MAX_ORD_AMT_WITIN_SUM_AMT with parameters' , d_progress);
176: PO_UDA_DEFAULTING_PKG.DEBUG('p_document_id :' || p_document_id , d_progress);
177: PO_UDA_DEFAULTING_PKG.DEBUG('p_draft_id :' || p_draft_id , d_progress);
178:
179: x_return_status := FND_API.G_RET_STS_SUCCESS;
180: BEGIN
181: d_progress := 20;
182: SELECT TYPE_LOOKUP_CODE
183: INTO l_document_type_code

Line 248: x_return_status := FND_API.G_RET_STS_SUCCESS;

244: OR l_total_amt_ordered IS NULL)
245: THEN
246: d_progress := 130;
247: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Passed : CLM_MAX_ORD_AMT_WITIN_SUM_AMT' , d_progress);
248: x_return_status := FND_API.G_RET_STS_SUCCESS;
249: ELSE
250: d_progress := 140;
251: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : CLM_MAX_ORD_AMT_WITIN_SUM_AMT' , d_progress);
252: x_return_status := FND_API.G_RET_STS_ERROR;

Line 252: x_return_status := FND_API.G_RET_STS_ERROR;

248: x_return_status := FND_API.G_RET_STS_SUCCESS;
249: ELSE
250: d_progress := 140;
251: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : CLM_MAX_ORD_AMT_WITIN_SUM_AMT' , d_progress);
252: x_return_status := FND_API.G_RET_STS_ERROR;
253:
254: LOG_ERR_CLM_NMD_COLS_SUB_CHK
255: (
256: p_online_report_id => p_online_report_id

Line 268: x_return_status := FND_API.G_RET_STS_SUCCESS;

264: d_progress := 150;
265: ELSE
266: d_progress := 160;
267: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Not Applicable : Not a valid document' , d_progress);
268: x_return_status := FND_API.G_RET_STS_SUCCESS;
269: x_msg_data := 'Not a Agreement';
270: END IF;
271: d_progress := 170;
272: EXCEPTION

Line 275: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

271: d_progress := 170;
272: EXCEPTION
273: WHEN OTHERS THEN
274: PO_UDA_DEFAULTING_PKG.DEBUG('Exception in CLM_MAX_ORD_AMT_WITIN_SUM_AMT' , d_progress);
275: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
276: END CLM_MAX_ORD_AMT_WITIN_SUM_AMT;
277:
278: /* The below procedure checks
279: * Orders should not be created for the given IDV line within the specified Order Start & End Date

Line 318: x_return_status := FND_API.G_RET_STS_SUCCESS;

314: PO_UDA_DEFAULTING_PKG.DEBUG('Starting PO_CLM_COLS_SUB_CHECK.CLM_ORD_DT_WITIN_ST_END_DT with parameters' , d_progress);
315: PO_UDA_DEFAULTING_PKG.DEBUG('p_document_id :' || p_document_id , d_progress);
316: PO_UDA_DEFAULTING_PKG.DEBUG('p_draft_id :' || p_draft_id , d_progress);
317:
318: x_return_status := FND_API.G_RET_STS_SUCCESS;
319: BEGIN
320: d_progress := 20;
321: SELECT TYPE_LOOKUP_CODE
322: INTO l_document_type_code

Line 370: x_return_status := FND_API.G_RET_STS_SUCCESS;

366: d_progress := 90;
367: IF l_ord_st_dt IS NULL OR l_ord_end_dt IS NULL THEN
368: d_progress := 95;
369: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Passed : CLM_ORD_DT_WITIN_ST_END_DT' , d_progress);
370: x_return_status := FND_API.G_RET_STS_SUCCESS;
371: ELSIF l_effective_date IS NULL THEN
372: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : CLM_ORD_DT_WITIN_ST_END_DT' , d_progress);
373: x_return_status := FND_API.G_RET_STS_ERROR;
374:

Line 373: x_return_status := FND_API.G_RET_STS_ERROR;

369: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Passed : CLM_ORD_DT_WITIN_ST_END_DT' , d_progress);
370: x_return_status := FND_API.G_RET_STS_SUCCESS;
371: ELSIF l_effective_date IS NULL THEN
372: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : CLM_ORD_DT_WITIN_ST_END_DT' , d_progress);
373: x_return_status := FND_API.G_RET_STS_ERROR;
374:
375: LOG_ERR_CLM_NMD_COLS_SUB_CHK
376: (
377: p_online_report_id => p_online_report_id

Line 388: x_return_status := FND_API.G_RET_STS_SUCCESS;

384:
385: ELSIF l_effective_date BETWEEN l_ord_st_dt AND l_ord_end_dt THEN
386: d_progress := 100;
387: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Passed : CLM_ORD_DT_WITIN_ST_END_DT' , d_progress);
388: x_return_status := FND_API.G_RET_STS_SUCCESS;
389: ELSE
390: d_progress := 110;
391: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : CLM_ORD_DT_WITIN_ST_END_DT' , d_progress);
392: x_return_status := FND_API.G_RET_STS_ERROR;

Line 392: x_return_status := FND_API.G_RET_STS_ERROR;

388: x_return_status := FND_API.G_RET_STS_SUCCESS;
389: ELSE
390: d_progress := 110;
391: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : CLM_ORD_DT_WITIN_ST_END_DT' , d_progress);
392: x_return_status := FND_API.G_RET_STS_ERROR;
393:
394: LOG_ERR_CLM_NMD_COLS_SUB_CHK
395: (
396: p_online_report_id => p_online_report_id

Line 411: x_return_status := FND_API.G_RET_STS_SUCCESS;

407: d_progress := 130;
408: ELSE
409: d_progress := 140;
410: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Not Applicable : Not a valid document' , d_progress);
411: x_return_status := FND_API.G_RET_STS_SUCCESS;
412: x_msg_data := 'Not a Standard PO';
413: END IF;
414: d_progress := 150;
415: EXCEPTION

Line 418: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

414: d_progress := 150;
415: EXCEPTION
416: WHEN OTHERS THEN
417: PO_UDA_DEFAULTING_PKG.DEBUG('Exception in CLM_ORD_DT_WITIN_ST_END_DT' , d_progress);
418: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
419: END CLM_ORD_DT_WITIN_ST_END_DT;
420:
421: /* The below procedure checks
422: * The Order Start and End Date at the line level must be within the order period defined at the header level.

Line 459: x_return_status := FND_API.G_RET_STS_SUCCESS;

455: PO_UDA_DEFAULTING_PKG.DEBUG('Starting PO_CLM_COLS_SUB_CHECK.CLM_ORD_DT_LINE_WITIN_DT_HEAD with parameters' , d_progress);
456: PO_UDA_DEFAULTING_PKG.DEBUG('p_document_id :' || p_document_id , d_progress);
457: PO_UDA_DEFAULTING_PKG.DEBUG('p_draft_id :' || p_draft_id , d_progress);
458:
459: x_return_status := FND_API.G_RET_STS_SUCCESS;
460: BEGIN
461: d_progress := 20;
462: SELECT TYPE_LOOKUP_CODE
463: INTO l_document_type_code

Line 497: x_return_status := FND_API.G_RET_STS_SUCCESS;

493: OR l_head_st_dt IS NULL
494: OR l_head_end_dt IS NULL THEN
495: d_progress := 160;
496: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Passed : CLM_ORD_DT_LINE_WITIN_DT_HEAD' , d_progress);
497: x_return_status := FND_API.G_RET_STS_SUCCESS;
498: ELSIF l_line_min_start_dt < l_head_st_dt OR l_line_max_end_dt > l_head_end_dt THEN
499: d_progress := 150;
500: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : CLM_ORD_DT_LINE_WITIN_DT_HEAD' , d_progress);
501: x_return_status := FND_API.G_RET_STS_ERROR;

Line 501: x_return_status := FND_API.G_RET_STS_ERROR;

497: x_return_status := FND_API.G_RET_STS_SUCCESS;
498: ELSIF l_line_min_start_dt < l_head_st_dt OR l_line_max_end_dt > l_head_end_dt THEN
499: d_progress := 150;
500: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : CLM_ORD_DT_LINE_WITIN_DT_HEAD' , d_progress);
501: x_return_status := FND_API.G_RET_STS_ERROR;
502:
503: LOG_ERR_CLM_NMD_COLS_SUB_CHK
504: (
505: p_online_report_id => p_online_report_id

Line 515: x_return_status := FND_API.G_RET_STS_SUCCESS;

511: );
512: ELSE
513: d_progress := 160;
514: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Passed : CLM_ORD_DT_LINE_WITIN_DT_HEAD' , d_progress);
515: x_return_status := FND_API.G_RET_STS_SUCCESS;
516: END IF;
517: d_progress := 170;
518:
519: END LOOP;

Line 531: x_return_status := FND_API.G_RET_STS_SUCCESS;

527: d_progress := 140;
528: ELSE
529: d_progress := 180;
530: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Not Applicable : Not a valid document' , d_progress);
531: x_return_status := FND_API.G_RET_STS_SUCCESS;
532: x_msg_data := 'Not a Blanket';
533: END IF;
534: d_progress := 190;
535: EXCEPTION

Line 538: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

534: d_progress := 190;
535: EXCEPTION
536: WHEN OTHERS THEN
537: PO_UDA_DEFAULTING_PKG.DEBUG('Exception in CLM_ORD_DT_LINE_WITIN_DT_HEAD' , d_progress);
538: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
539: END CLM_ORD_DT_LINE_WITIN_DT_HEAD;
540:
541: /* The below procedure checks
542: * Effective Date is a past date or null

Line 628: x_return_status := FND_API.G_RET_STS_ERROR;

624: WHERE POH.PO_HEADER_ID = p_document_id
625: AND POH.CLM_EFFECTIVE_DATE IS NULL ;
626:
627: IF SQL%ROWCOUNT > 0 THEN
628: x_return_status := FND_API.G_RET_STS_ERROR;
629: ELSE
630: x_return_status := FND_API.G_RET_STS_SUCCESS;
631: END IF ;
632:

Line 630: x_return_status := FND_API.G_RET_STS_SUCCESS;

626:
627: IF SQL%ROWCOUNT > 0 THEN
628: x_return_status := FND_API.G_RET_STS_ERROR;
629: ELSE
630: x_return_status := FND_API.G_RET_STS_SUCCESS;
631: END IF ;
632:
633: -- Effective date should be less than the need by date
634: -- of all the shipments

Line 674: x_return_status := FND_API.G_RET_STS_ERROR;

670: AND POH.CLM_EFFECTIVE_DATE > Nvl(PLL.CLM_PERIOD_PERF_START_DATE,Nvl(PLL.NEED_BY_DATE, POH.CLM_EFFECTIVE_DATE + 1 ))
671: ORDER BY POL.LINE_NUM;
672:
673: IF SQL%ROWCOUNT > 0 THEN
674: x_return_status := FND_API.G_RET_STS_ERROR;
675: ELSE
676: x_return_status := FND_API.G_RET_STS_SUCCESS;
677: END IF ;
678:

Line 676: x_return_status := FND_API.G_RET_STS_SUCCESS;

672:
673: IF SQL%ROWCOUNT > 0 THEN
674: x_return_status := FND_API.G_RET_STS_ERROR;
675: ELSE
676: x_return_status := FND_API.G_RET_STS_SUCCESS;
677: END IF ;
678:
679:
680: EXCEPTION

Line 687: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

683: null;
684: WHEN OTHERS THEN
685: d_progress := 40;
686: PO_UDA_DEFAULTING_PKG.DEBUG('Exception in CLM_EFF_DT_HEAD_CHECK' , d_progress);
687: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
688: END CLM_EFF_DT_HEAD_CHECK;
689:
690:
691: /* The below procedure checks

Line 732: x_return_status := FND_API.G_RET_STS_SUCCESS;

728: PO_UDA_DEFAULTING_PKG.DEBUG('Starting PO_CLM_COLS_SUB_CHECK.CLM_QTY_ORD_QTY_CHECK with parameters' , d_progress);
729: PO_UDA_DEFAULTING_PKG.DEBUG('p_document_id :' || p_document_id , d_progress);
730: PO_UDA_DEFAULTING_PKG.DEBUG('p_draft_id :' || p_draft_id , d_progress);
731:
732: x_return_status := FND_API.G_RET_STS_SUCCESS;
733: BEGIN
734: d_progress := 20;
735: SELECT TYPE_LOOKUP_CODE
736: INTO l_document_type_code

Line 769: x_return_status := FND_API.G_RET_STS_ERROR;

765: d_progress := 80;
766: IF c_get_po_lines_rec.QUANTITY IS NULL THEN
767: d_progress := 90;
768: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : CLM_QTY_ORD_QTY_CHECK' , d_progress);
769: x_return_status := FND_API.G_RET_STS_ERROR;
770:
771: LOG_ERR_CLM_NMD_COLS_SUB_CHK
772: (
773: p_online_report_id => p_online_report_id

Line 784: x_return_status := FND_API.G_RET_STS_SUCCESS;

780:
781: ELSE
782: d_progress := 100;
783: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Passed : CLM_QTY_ORD_QTY_CHECK' , d_progress);
784: x_return_status := FND_API.G_RET_STS_SUCCESS;
785: END IF;
786: d_progress := 110;
787: END IF;
788: END LOOP;

Line 792: x_return_status := FND_API.G_RET_STS_SUCCESS;

788: END LOOP;
789: ELSE
790: d_progress := 120;
791: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Not Applicable : Not a valid document' , d_progress);
792: x_return_status := FND_API.G_RET_STS_SUCCESS;
793: x_msg_data := 'Not a Blanket';
794: END IF;
795: d_progress := 130;
796: EXCEPTION

Line 799: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

795: d_progress := 130;
796: EXCEPTION
797: WHEN OTHERS THEN
798: PO_UDA_DEFAULTING_PKG.DEBUG('Exception in CLM_QTY_ORD_QTY_CHECK' , d_progress);
799: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
800: END CLM_QTY_ORD_QTY_CHECK;
801:
802: /* The below procedure checks
803: * The Amount field should be entered when Min Order Amt, Max Order Amt, Min Total Amt or Max Total Amt is entered

Line 846: x_return_status := FND_API.G_RET_STS_SUCCESS;

842: PO_UDA_DEFAULTING_PKG.DEBUG('Starting PO_CLM_COLS_SUB_CHECK.CLM_AMT_ORD_AMT_CHECK with parameters' , d_progress);
843: PO_UDA_DEFAULTING_PKG.DEBUG('p_document_id :' || p_document_id , d_progress);
844: PO_UDA_DEFAULTING_PKG.DEBUG('p_draft_id :' || p_draft_id , d_progress);
845:
846: x_return_status := FND_API.G_RET_STS_SUCCESS;
847: BEGIN
848: d_progress := 20;
849: SELECT TYPE_LOOKUP_CODE
850: INTO l_document_type_code

Line 883: x_return_status := FND_API.G_RET_STS_ERROR;

879: d_progress := 80;
880: IF c_get_po_lines_rec.AMOUNT IS NULL THEN
881: d_progress := 90;
882: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : CLM_AMT_ORD_AMT_CHECK' , d_progress);
883: x_return_status := FND_API.G_RET_STS_ERROR;
884:
885: LOG_ERR_CLM_NMD_COLS_SUB_CHK
886: (
887: p_online_report_id => p_online_report_id

Line 897: x_return_status := FND_API.G_RET_STS_SUCCESS;

893: );
894: ELSE
895: d_progress := 100;
896: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Passed : CLM_AMT_ORD_AMT_CHECK' , d_progress);
897: x_return_status := FND_API.G_RET_STS_SUCCESS;
898: END IF;
899: ELSIF c_get_po_lines_rec.MATCHING_BASIS = 'QUANTITY' THEN
900: d_progress := 110;
901: IF c_get_po_lines_rec.QUANTITY IS NULL THEN

Line 904: x_return_status := FND_API.G_RET_STS_ERROR;

900: d_progress := 110;
901: IF c_get_po_lines_rec.QUANTITY IS NULL THEN
902: d_progress := 120;
903: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : CLM_AMT_ORD_AMT_CHECK' , d_progress);
904: x_return_status := FND_API.G_RET_STS_ERROR;
905:
906: LOG_ERR_CLM_NMD_COLS_SUB_CHK
907: (
908: p_online_report_id => p_online_report_id

Line 918: x_return_status := FND_API.G_RET_STS_SUCCESS;

914: );
915: ELSE
916: d_progress := 130;
917: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Passed : CLM_AMT_ORD_AMT_CHECK' , d_progress);
918: x_return_status := FND_API.G_RET_STS_SUCCESS;
919: END IF;
920: ELSE
921: d_progress := 140;
922: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Passed : CLM_AMT_ORD_AMT_CHECK' , d_progress);

Line 923: x_return_status := FND_API.G_RET_STS_SUCCESS;

919: END IF;
920: ELSE
921: d_progress := 140;
922: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Passed : CLM_AMT_ORD_AMT_CHECK' , d_progress);
923: x_return_status := FND_API.G_RET_STS_SUCCESS;
924: END IF;
925: d_progress := 150;
926: END IF;
927: END LOOP;

Line 931: x_return_status := FND_API.G_RET_STS_SUCCESS;

927: END LOOP;
928: ELSE
929: d_progress := 160;
930: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Not Applicable : Not a valid document' , d_progress);
931: x_return_status := FND_API.G_RET_STS_SUCCESS;
932: x_msg_data := 'Not a Blanket';
933: END IF;
934: d_progress := 170;
935:

Line 939: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

935:
936: EXCEPTION
937: WHEN OTHERS THEN
938: PO_UDA_DEFAULTING_PKG.DEBUG('Exception in CLM_AMT_ORD_AMT_CHECK' , d_progress);
939: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
940: END CLM_AMT_ORD_AMT_CHECK;
941:
942: /* The below procedure checks
943: * Order line's quantity should be between the defined Minimum & Maximum Per-Order Quantity

Line 986: x_return_status := FND_API.G_RET_STS_SUCCESS;

982: d_progress := 10;
983: PO_UDA_DEFAULTING_PKG.DEBUG('Starting PO_CLM_COLS_SUB_CHECK.CLM_TOT_QTY_WIT_MAX_MIN_CHECK with parameters' , d_progress);
984: PO_UDA_DEFAULTING_PKG.DEBUG('p_document_id :' || p_document_id , d_progress);
985: PO_UDA_DEFAULTING_PKG.DEBUG('p_draft_id :' || p_draft_id , d_progress);
986: x_return_status := FND_API.G_RET_STS_SUCCESS;
987:
988: d_progress := 20;
989: BEGIN
990: SELECT TYPE_LOOKUP_CODE

Line 1032: x_return_status := FND_API.G_RET_STS_SUCCESS;

1028:
1029: IF c_get_po_lines_rec.TOTAL_QTY BETWEEN l_idv_min_ord_qty AND l_idv_max_ord_qty THEN
1030: d_progress := 100;
1031: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Passed : CLM_TOT_QTY_WIT_MAX_MIN_CHECK' , d_progress);
1032: x_return_status := FND_API.G_RET_STS_SUCCESS;
1033: ELSE
1034: d_progress := 110;
1035: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : CLM_TOT_QTY_WIT_MAX_MIN_CHECK' , d_progress);
1036: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1036: x_return_status := FND_API.G_RET_STS_ERROR;

1032: x_return_status := FND_API.G_RET_STS_SUCCESS;
1033: ELSE
1034: d_progress := 110;
1035: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : CLM_TOT_QTY_WIT_MAX_MIN_CHECK' , d_progress);
1036: x_return_status := FND_API.G_RET_STS_ERROR;
1037:
1038: SELECT MIN(LINE_NUM)
1039: INTO l_line_num
1040: FROM po_lines_gt

Line 1063: x_return_status := FND_API.G_RET_STS_SUCCESS;

1059: END LOOP;
1060: ELSE
1061: d_progress := 130;
1062: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Not Applicable : Not a valid document' , d_progress);
1063: x_return_status := FND_API.G_RET_STS_SUCCESS;
1064: x_msg_data := 'Not a Blanket';
1065: END IF;
1066: d_progress := 140;
1067: EXCEPTION

Line 1070: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1066: d_progress := 140;
1067: EXCEPTION
1068: WHEN OTHERS THEN
1069: PO_UDA_DEFAULTING_PKG.DEBUG('Exception in CLM_TOT_QTY_WIT_MAX_MIN_CHECK' , d_progress);
1070: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1071: END CLM_TOT_QTY_WIT_MAX_MIN_CHECK;
1072:
1073:
1074:

Line 1122: x_return_status := FND_API.G_RET_STS_SUCCESS;

1118: d_progress := 10;
1119: PO_UDA_DEFAULTING_PKG.DEBUG('Starting PO_CLM_COLS_SUB_CHECK.CLM_ORD_TOT_QTY_LE_MAX_QTY_CHK with parameters' , d_progress);
1120: PO_UDA_DEFAULTING_PKG.DEBUG('p_document_id :' || p_document_id , d_progress);
1121: PO_UDA_DEFAULTING_PKG.DEBUG('p_draft_id :' || p_draft_id , d_progress);
1122: x_return_status := FND_API.G_RET_STS_SUCCESS;
1123:
1124: d_progress := 20;
1125: BEGIN
1126: SELECT TYPE_LOOKUP_CODE

Line 1209: x_return_status := FND_API.G_RET_STS_SUCCESS;

1205: d_progress := 90;
1206: IF l_diff_qty + nvl(l_tot_qty_ordered, 0) <= NVL(l_idv_max_qty, l_diff_qty + nvl(l_tot_qty_ordered, 0)) THEN
1207: d_progress := 100;
1208: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Passed : CLM_ORD_TOT_QTY_LE_MAX_QTY_CHK' , d_progress);
1209: x_return_status := FND_API.G_RET_STS_SUCCESS;
1210: ELSE
1211: d_progress := 110;
1212: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : CLM_ORD_TOT_QTY_LE_MAX_QTY_CHK' , d_progress);
1213: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1213: x_return_status := FND_API.G_RET_STS_ERROR;

1209: x_return_status := FND_API.G_RET_STS_SUCCESS;
1210: ELSE
1211: d_progress := 110;
1212: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : CLM_ORD_TOT_QTY_LE_MAX_QTY_CHK' , d_progress);
1213: x_return_status := FND_API.G_RET_STS_ERROR;
1214:
1215: SELECT MIN(LINE_NUM)
1216: INTO l_line_num
1217: FROM po_lines_gt

Line 1239: x_return_status := FND_API.G_RET_STS_SUCCESS;

1235: END LOOP;
1236: ELSE
1237: d_progress := 120;
1238: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Not Applicable : Not a valid document' , d_progress);
1239: x_return_status := FND_API.G_RET_STS_SUCCESS;
1240: x_msg_data := 'Not a Blanket';
1241: END IF;
1242: d_progress := 130;
1243: EXCEPTION

Line 1246: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1242: d_progress := 130;
1243: EXCEPTION
1244: WHEN OTHERS THEN
1245: PO_UDA_DEFAULTING_PKG.DEBUG('Exception in CLM_ORD_TOT_QTY_LE_MAX_QTY_CHK' , d_progress);
1246: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1247: END CLM_ORD_TOT_QTY_LE_MAX_QTY_CHK;
1248:
1249: /* The below procedure checks
1250: * Total amount of all order lines released against the IDV should not exceed the Maximum Total Amount

Line 1297: x_return_status := FND_API.G_RET_STS_SUCCESS;

1293: d_progress := 10;
1294: PO_UDA_DEFAULTING_PKG.DEBUG('Starting PO_CLM_COLS_SUB_CHECK.CLM_ORD_TOT_AMT_LE_MAX_AMT_CHK with parameters' , d_progress);
1295: PO_UDA_DEFAULTING_PKG.DEBUG('p_document_id :' || p_document_id , d_progress);
1296: PO_UDA_DEFAULTING_PKG.DEBUG('p_draft_id :' || p_draft_id , d_progress);
1297: x_return_status := FND_API.G_RET_STS_SUCCESS;
1298:
1299: d_progress := 20;
1300: BEGIN
1301: SELECT TYPE_LOOKUP_CODE

Line 1370: x_return_status := FND_API.G_RET_STS_SUCCESS;

1366:
1367: IF l_diff_amt + l_tot_amt_ordered <= NVL(l_idv_max_amt, l_diff_amt + l_tot_amt_ordered) THEN
1368: d_progress := 140;
1369: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Passed : CLM_ORD_TOT_AMT_LE_MAX_AMT_CHK' , d_progress);
1370: x_return_status := FND_API.G_RET_STS_SUCCESS;
1371: ELSE
1372: d_progress := 150;
1373: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : CLM_ORD_TOT_AMT_LE_MAX_AMT_CHK' , d_progress);
1374: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1374: x_return_status := FND_API.G_RET_STS_ERROR;

1370: x_return_status := FND_API.G_RET_STS_SUCCESS;
1371: ELSE
1372: d_progress := 150;
1373: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : CLM_ORD_TOT_AMT_LE_MAX_AMT_CHK' , d_progress);
1374: x_return_status := FND_API.G_RET_STS_ERROR;
1375:
1376: LOG_ERR_CLM_NMD_COLS_SUB_CHK
1377: (
1378: p_online_report_id => p_online_report_id

Line 1392: x_return_status := FND_API.G_RET_STS_SUCCESS;

1388: END LOOP;
1389: ELSE
1390: d_progress := 160;
1391: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Not Applicable : Not a valid document' , d_progress);
1392: x_return_status := FND_API.G_RET_STS_SUCCESS;
1393: x_msg_data := 'Not a Blanket';
1394: END IF;
1395: EXCEPTION
1396: WHEN OTHERS THEN

Line 1398: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1394: END IF;
1395: EXCEPTION
1396: WHEN OTHERS THEN
1397: PO_UDA_DEFAULTING_PKG.DEBUG('Exception in CLM_ORD_TOT_AMT_LE_MAX_AMT_CHK' , d_progress);
1398: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1399: END CLM_ORD_TOT_AMT_LE_MAX_AMT_CHK;
1400:
1401: /* The below procedure checks
1402: * The IDV Amount limit >= Total of all order line amount

Line 1434: x_return_status := FND_API.G_RET_STS_SUCCESS;

1430: d_progress := 10;
1431: PO_UDA_DEFAULTING_PKG.DEBUG('Starting PO_CLM_COLS_SUB_CHECK.CLM_AMT_GE_LINE_AMT with parameters' , d_progress);
1432: PO_UDA_DEFAULTING_PKG.DEBUG('p_document_id :' || p_document_id , d_progress);
1433: PO_UDA_DEFAULTING_PKG.DEBUG('p_draft_id :' || p_draft_id , d_progress);
1434: x_return_status := FND_API.G_RET_STS_SUCCESS;
1435:
1436: d_progress := 20;
1437: BEGIN
1438: SELECT TYPE_LOOKUP_CODE, CLM_SOURCE_DOCUMENT_ID

Line 1490: x_return_status := FND_API.G_RET_STS_SUCCESS;

1486:
1487: IF l_amount_limit IS NOT NULL THEN
1488: IF l_amount_limit >= l_diff_amt + l_clm_amt_released THEN
1489: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Passed : CLM_AMT_GE_LINE_AMT' , d_progress);
1490: x_return_status := FND_API.G_RET_STS_SUCCESS;
1491: ELSE
1492: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : CLM_AMT_GE_LINE_AMT' , d_progress);
1493: x_return_status := FND_API.G_RET_STS_ERROR;
1494: LOG_ERR_CLM_NMD_COLS_SUB_CHK

Line 1493: x_return_status := FND_API.G_RET_STS_ERROR;

1489: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Passed : CLM_AMT_GE_LINE_AMT' , d_progress);
1490: x_return_status := FND_API.G_RET_STS_SUCCESS;
1491: ELSE
1492: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : CLM_AMT_GE_LINE_AMT' , d_progress);
1493: x_return_status := FND_API.G_RET_STS_ERROR;
1494: LOG_ERR_CLM_NMD_COLS_SUB_CHK
1495: (
1496: p_online_report_id => p_online_report_id
1497: ,p_login_id => p_login_id

Line 1508: x_return_status := FND_API.G_RET_STS_SUCCESS;

1504: END IF;
1505: ELSE
1506: d_progress := 160;
1507: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Not Applicable : Not a valid document' , d_progress);
1508: x_return_status := FND_API.G_RET_STS_SUCCESS;
1509: x_msg_data := 'Not a PO';
1510: END IF;
1511: EXCEPTION
1512: WHEN OTHERS THEN

Line 1514: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1510: END IF;
1511: EXCEPTION
1512: WHEN OTHERS THEN
1513: PO_UDA_DEFAULTING_PKG.DEBUG('Exception in CLM_AMT_GE_LINE_AMT' , d_progress);
1514: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1515: END CLM_AMT_GE_LINE_AMT;
1516:
1517:
1518: /* The below procedure checks

Line 1548: x_return_status := FND_API.G_RET_STS_SUCCESS;

1544: d_progress := 10;
1545: PO_UDA_DEFAULTING_PKG.DEBUG('Starting PO_CLM_COLS_SUB_CHECK.CLM_AMT_WITHIN_MAX_MIN_ORD_AMT with parameters' , d_progress);
1546: PO_UDA_DEFAULTING_PKG.DEBUG('p_document_id :' || p_document_id , d_progress);
1547: PO_UDA_DEFAULTING_PKG.DEBUG('p_draft_id :' || p_draft_id , d_progress);
1548: x_return_status := FND_API.G_RET_STS_SUCCESS;
1549:
1550: d_progress := 20;
1551: BEGIN
1552: SELECT TYPE_LOOKUP_CODE, CLM_SOURCE_DOCUMENT_ID

Line 1591: x_return_status := FND_API.G_RET_STS_SUCCESS;

1587: */
1588: IF l_max_ord_amt IS NOT NULL AND l_min_ord_amt IS NOT NULL THEN
1589: IF l_total_amt BETWEEN l_min_ord_amt AND l_max_ord_amt THEN
1590: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Passed : PO_CLM_AMT_IN_MAX_MIN_ORD_AMT' , d_progress);
1591: x_return_status := FND_API.G_RET_STS_SUCCESS;
1592: ELSE
1593: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : PO_CLM_AMT_IN_MAX_MIN_ORD_AMT' , d_progress);
1594: x_return_status := FND_API.G_RET_STS_ERROR;
1595: LOG_ERR_CLM_NMD_COLS_SUB_CHK

Line 1594: x_return_status := FND_API.G_RET_STS_ERROR;

1590: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Passed : PO_CLM_AMT_IN_MAX_MIN_ORD_AMT' , d_progress);
1591: x_return_status := FND_API.G_RET_STS_SUCCESS;
1592: ELSE
1593: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : PO_CLM_AMT_IN_MAX_MIN_ORD_AMT' , d_progress);
1594: x_return_status := FND_API.G_RET_STS_ERROR;
1595: LOG_ERR_CLM_NMD_COLS_SUB_CHK
1596: (
1597: p_online_report_id => p_online_report_id
1598: ,p_login_id => p_login_id

Line 1608: x_return_status := FND_API.G_RET_STS_SUCCESS;

1604: END IF;
1605: ELSIF l_max_ord_amt IS NOT NULL THEN
1606: IF l_total_amt <= l_max_ord_amt THEN
1607: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Passed : PO_CLM_AMT_IN_MAX_MIN_ORD_AMT' , d_progress);
1608: x_return_status := FND_API.G_RET_STS_SUCCESS;
1609: ELSE
1610: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : PO_CLM_AMT_IN_MAX_MIN_ORD_AMT' , d_progress);
1611: x_return_status := FND_API.G_RET_STS_ERROR;
1612: LOG_ERR_CLM_NMD_COLS_SUB_CHK

Line 1611: x_return_status := FND_API.G_RET_STS_ERROR;

1607: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Passed : PO_CLM_AMT_IN_MAX_MIN_ORD_AMT' , d_progress);
1608: x_return_status := FND_API.G_RET_STS_SUCCESS;
1609: ELSE
1610: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : PO_CLM_AMT_IN_MAX_MIN_ORD_AMT' , d_progress);
1611: x_return_status := FND_API.G_RET_STS_ERROR;
1612: LOG_ERR_CLM_NMD_COLS_SUB_CHK
1613: (
1614: p_online_report_id => p_online_report_id
1615: ,p_login_id => p_login_id

Line 1625: x_return_status := FND_API.G_RET_STS_SUCCESS;

1621: END IF;
1622: ELSIF l_min_ord_amt IS NOT NULL THEN
1623: IF l_total_amt >= l_min_ord_amt THEN
1624: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Passed : PO_CLM_AMT_IN_MAX_MIN_ORD_AMT' , d_progress);
1625: x_return_status := FND_API.G_RET_STS_SUCCESS;
1626: ELSE
1627: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : PO_CLM_AMT_IN_MAX_MIN_ORD_AMT' , d_progress);
1628: x_return_status := FND_API.G_RET_STS_ERROR;
1629: LOG_ERR_CLM_NMD_COLS_SUB_CHK

Line 1628: x_return_status := FND_API.G_RET_STS_ERROR;

1624: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Passed : PO_CLM_AMT_IN_MAX_MIN_ORD_AMT' , d_progress);
1625: x_return_status := FND_API.G_RET_STS_SUCCESS;
1626: ELSE
1627: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Failed : PO_CLM_AMT_IN_MAX_MIN_ORD_AMT' , d_progress);
1628: x_return_status := FND_API.G_RET_STS_ERROR;
1629: LOG_ERR_CLM_NMD_COLS_SUB_CHK
1630: (
1631: p_online_report_id => p_online_report_id
1632: ,p_login_id => p_login_id

Line 1643: x_return_status := FND_API.G_RET_STS_SUCCESS;

1639: END IF;
1640: ELSE
1641: d_progress := 160;
1642: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Not Applicable : Not a valid document' , d_progress);
1643: x_return_status := FND_API.G_RET_STS_SUCCESS;
1644: x_msg_data := 'Not a PO';
1645: END IF;
1646: EXCEPTION
1647: WHEN OTHERS THEN

Line 1649: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1645: END IF;
1646: EXCEPTION
1647: WHEN OTHERS THEN
1648: PO_UDA_DEFAULTING_PKG.DEBUG('Exception in CLM_AMT_WITHIN_MAX_MIN_ORD_AMT' , d_progress);
1649: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1650: END CLM_AMT_WITHIN_MAX_MIN_ORD_AMT;
1651:
1652: /* The below procedure checks
1653: * The Source document should be same for the Header and all the Lines

Line 1683: x_return_status := FND_API.G_RET_STS_SUCCESS;

1679: d_progress := 10;
1680: PO_UDA_DEFAULTING_PKG.DEBUG('Starting PO_CLM_COLS_SUB_CHECK.CLM_SRC_DOC_CHK with parameters' , d_progress);
1681: PO_UDA_DEFAULTING_PKG.DEBUG('p_document_id :' || p_document_id , d_progress);
1682: PO_UDA_DEFAULTING_PKG.DEBUG('p_draft_id :' || p_draft_id , d_progress);
1683: x_return_status := FND_API.G_RET_STS_SUCCESS;
1684: d_progress := 20;
1685:
1686: BEGIN
1687: SELECT TYPE_LOOKUP_CODE, CLM_SOURCE_DOCUMENT_ID

Line 1742: x_return_status := FND_API.G_RET_STS_ERROR;

1738: AND ROWNUM = 1;
1739:
1740: END IF;
1741:
1742: x_return_status := FND_API.G_RET_STS_ERROR;
1743:
1744: LOG_ERR_CLM_NMD_COLS_SUB_CHK
1745: (
1746: p_online_report_id => p_online_report_id

Line 1760: x_return_status := FND_API.G_RET_STS_SUCCESS;

1756:
1757: EXCEPTION
1758: WHEN No_Data_Found THEN
1759: d_progress := 90;
1760: x_return_status := FND_API.G_RET_STS_SUCCESS;
1761: x_msg_data := 'Valid Document';
1762: WHEN OTHERS THEN
1763: d_progress := 100;
1764: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1764: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1760: x_return_status := FND_API.G_RET_STS_SUCCESS;
1761: x_msg_data := 'Valid Document';
1762: WHEN OTHERS THEN
1763: d_progress := 100;
1764: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1765: RAISE;
1766: END;
1767: d_progress := 110;
1768: ELSE

Line 1771: x_return_status := FND_API.G_RET_STS_SUCCESS;

1767: d_progress := 110;
1768: ELSE
1769: d_progress := 120;
1770: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Not Applicable : Not a valid document' , d_progress);
1771: x_return_status := FND_API.G_RET_STS_SUCCESS;
1772: x_msg_data := 'Not a Blanket';
1773: END IF;
1774:
1775: EXCEPTION

Line 1778: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1774:
1775: EXCEPTION
1776: WHEN OTHERS THEN
1777: PO_UDA_DEFAULTING_PKG.DEBUG('Exception in CLM_SRC_DOC_CHK' , d_progress);
1778: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1779: END CLM_SRC_DOC_CHK;
1780:
1781: /* The below procedure checks
1782: * If the line is referring a BPA type IDV,

Line 1824: x_return_status := FND_API.G_RET_STS_SUCCESS;

1820: d_progress := 10;
1821: PO_UDA_DEFAULTING_PKG.DEBUG('Starting PO_CLM_COLS_SUB_CHECK.CLM_SRC_DOC_LINE_CHK with parameters' , d_progress);
1822: PO_UDA_DEFAULTING_PKG.DEBUG('p_document_id :' || p_document_id , d_progress);
1823: PO_UDA_DEFAULTING_PKG.DEBUG('p_draft_id :' || p_draft_id , d_progress);
1824: x_return_status := FND_API.G_RET_STS_SUCCESS;
1825: d_progress := 20;
1826:
1827: BEGIN
1828: SELECT TYPE_LOOKUP_CODE, CLM_SOURCE_DOCUMENT_ID

Line 1857: x_return_status := FND_API.G_RET_STS_ERROR;

1853: WHERE PO_HEADER_ID = l_source_id;
1854:
1855: IF l_doc_type = 'BLANKET' THEN
1856: FOR c_get_po_lines_rec IN c_get_po_lines(p_document_id) LOOP
1857: x_return_status := FND_API.G_RET_STS_ERROR;
1858: LOG_ERR_CLM_NMD_COLS_SUB_CHK
1859: (
1860: p_online_report_id => p_online_report_id
1861: ,p_login_id => p_login_id

Line 1876: x_return_status := FND_API.G_RET_STS_SUCCESS;

1872:
1873: EXCEPTION
1874: WHEN No_Data_Found THEN
1875: d_progress := 90;
1876: x_return_status := FND_API.G_RET_STS_SUCCESS;
1877: x_msg_data := 'Valid Document';
1878: WHEN OTHERS THEN
1879: d_progress := 100;
1880: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1880: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1876: x_return_status := FND_API.G_RET_STS_SUCCESS;
1877: x_msg_data := 'Valid Document';
1878: WHEN OTHERS THEN
1879: d_progress := 100;
1880: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1881: RAISE;
1882: END;
1883: d_progress := 110;
1884: ELSE

Line 1887: x_return_status := FND_API.G_RET_STS_SUCCESS;

1883: d_progress := 110;
1884: ELSE
1885: d_progress := 120;
1886: PO_UDA_DEFAULTING_PKG.DEBUG('Constraint Not Applicable : Not a valid document' , d_progress);
1887: x_return_status := FND_API.G_RET_STS_SUCCESS;
1888: x_msg_data := 'Not a Blanket';
1889: END IF;
1890:
1891: EXCEPTION

Line 1894: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1890:
1891: EXCEPTION
1892: WHEN OTHERS THEN
1893: PO_UDA_DEFAULTING_PKG.DEBUG('Exception in CLM_SRC_DOC_LINE_CHK' , d_progress);
1894: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1895: END CLM_SRC_DOC_LINE_CHK;
1896:
1897: /* The below procedure checks
1898: * Main Procedure to check the IDV constraints

Line 1929: x_return_status := FND_API.G_RET_STS_SUCCESS;

1925: PO_UDA_DEFAULTING_PKG.DEBUG('p_online_report_id :' || p_online_report_id , d_progress);
1926: PO_UDA_DEFAULTING_PKG.DEBUG('p_user_id :' || p_user_id , d_progress);
1927: PO_UDA_DEFAULTING_PKG.DEBUG('p_sequence :' || p_sequence , d_progress);
1928:
1929: x_return_status := FND_API.G_RET_STS_SUCCESS;
1930: g_ret_status := FND_API.G_RET_STS_SUCCESS;
1931:
1932: PO_UDA_DEFAULTING_PKG.DEBUG('Before call to PO_CLM_COLS_SUB_CHECK.CLM_ORDER_AMT_WITHIN_MAX_MIN : ' || x_return_status, d_progress);
1933: PO_CLM_COLS_SUB_CHECK.CLM_ORDER_AMT_WITHIN_MAX_MIN

Line 1930: g_ret_status := FND_API.G_RET_STS_SUCCESS;

1926: PO_UDA_DEFAULTING_PKG.DEBUG('p_user_id :' || p_user_id , d_progress);
1927: PO_UDA_DEFAULTING_PKG.DEBUG('p_sequence :' || p_sequence , d_progress);
1928:
1929: x_return_status := FND_API.G_RET_STS_SUCCESS;
1930: g_ret_status := FND_API.G_RET_STS_SUCCESS;
1931:
1932: PO_UDA_DEFAULTING_PKG.DEBUG('Before call to PO_CLM_COLS_SUB_CHECK.CLM_ORDER_AMT_WITHIN_MAX_MIN : ' || x_return_status, d_progress);
1933: PO_CLM_COLS_SUB_CHECK.CLM_ORDER_AMT_WITHIN_MAX_MIN
1934: (

Line 1948: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN

1944: ,x_msg_data => x_msg_data
1945: );
1946:
1947: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_ORDER_AMT_WITHIN_MAX_MIN : ' || x_return_status, d_progress);
1948: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
1949: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1950: g_ret_status := x_return_status;
1951: END IF;
1952: END IF;

Line 1949: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1945: );
1946:
1947: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_ORDER_AMT_WITHIN_MAX_MIN : ' || x_return_status, d_progress);
1948: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
1949: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1950: g_ret_status := x_return_status;
1951: END IF;
1952: END IF;
1953:

Line 1970: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN

1966: ,x_msg_data => x_msg_data
1967: );
1968:
1969: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_MAX_ORD_AMT_WITIN_SUM_AMT : ' || x_return_status, d_progress);
1970: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
1971: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1972: g_ret_status := x_return_status;
1973: END IF;
1974: END IF;

Line 1971: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1967: );
1968:
1969: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_MAX_ORD_AMT_WITIN_SUM_AMT : ' || x_return_status, d_progress);
1970: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
1971: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1972: g_ret_status := x_return_status;
1973: END IF;
1974: END IF;
1975:

Line 1992: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN

1988: ,x_msg_data => x_msg_data
1989: );
1990:
1991: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_ORD_DT_WITIN_ST_END_DT : ' || x_return_status, d_progress);
1992: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
1993: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1994: g_ret_status := x_return_status;
1995: END IF;
1996: END IF;

Line 1993: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1989: );
1990:
1991: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_ORD_DT_WITIN_ST_END_DT : ' || x_return_status, d_progress);
1992: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
1993: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1994: g_ret_status := x_return_status;
1995: END IF;
1996: END IF;
1997:

Line 2014: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN

2010: ,x_msg_data => x_msg_data
2011: );
2012:
2013: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_ORD_DT_LINE_WITIN_DT_HEAD : ' || x_return_status, d_progress);
2014: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
2015: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2016: g_ret_status := x_return_status;
2017: END IF;
2018: END IF;

Line 2015: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2011: );
2012:
2013: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_ORD_DT_LINE_WITIN_DT_HEAD : ' || x_return_status, d_progress);
2014: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
2015: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2016: g_ret_status := x_return_status;
2017: END IF;
2018: END IF;
2019:

Line 2040: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN

2036:
2037: END IF;
2038:
2039: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_EFF_DT_HEAD_CHECK : ' || x_return_status, d_progress);
2040: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
2041: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2042: g_ret_status := x_return_status;
2043: END IF;
2044: END IF;

Line 2041: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2037: END IF;
2038:
2039: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_EFF_DT_HEAD_CHECK : ' || x_return_status, d_progress);
2040: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
2041: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2042: g_ret_status := x_return_status;
2043: END IF;
2044: END IF;
2045:

Line 2062: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN

2058: ,x_msg_data => x_msg_data
2059: );
2060:
2061: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_QTY_ORD_QTY_CHECK : ' || x_return_status, d_progress);
2062: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
2063: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2064: g_ret_status := x_return_status;
2065: END IF;
2066: END IF;

Line 2063: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2059: );
2060:
2061: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_QTY_ORD_QTY_CHECK : ' || x_return_status, d_progress);
2062: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
2063: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2064: g_ret_status := x_return_status;
2065: END IF;
2066: END IF;
2067:

Line 2084: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN

2080: ,x_msg_data => x_msg_data
2081: );
2082:
2083: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_AMT_ORD_AMT_CHECK : ' || x_return_status, d_progress);
2084: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
2085: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2086: g_ret_status := x_return_status;
2087: END IF;
2088: END IF;

Line 2085: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2081: );
2082:
2083: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_AMT_ORD_AMT_CHECK : ' || x_return_status, d_progress);
2084: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
2085: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2086: g_ret_status := x_return_status;
2087: END IF;
2088: END IF;
2089:

Line 2106: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN

2102: ,x_msg_data => x_msg_data
2103: );
2104:
2105: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_TOT_QTY_WIT_MAX_MIN_CHECK : ' || x_return_status, d_progress);
2106: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
2107: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2108: g_ret_status := x_return_status;
2109: END IF;
2110: END IF;

Line 2107: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2103: );
2104:
2105: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_TOT_QTY_WIT_MAX_MIN_CHECK : ' || x_return_status, d_progress);
2106: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
2107: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2108: g_ret_status := x_return_status;
2109: END IF;
2110: END IF;
2111:

Line 2129: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN

2125: ,x_msg_data => x_msg_data
2126: );
2127:
2128: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_ORD_TOT_QTY_LE_MAX_QTY_CHK : ' || x_return_status, d_progress);
2129: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
2130: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2131: g_ret_status := x_return_status;
2132: END IF;
2133: END IF;

Line 2130: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2126: );
2127:
2128: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_ORD_TOT_QTY_LE_MAX_QTY_CHK : ' || x_return_status, d_progress);
2129: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
2130: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2131: g_ret_status := x_return_status;
2132: END IF;
2133: END IF;
2134:

Line 2151: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN

2147: ,x_msg_data => x_msg_data
2148: );
2149:
2150: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_ORD_TOT_AMT_LE_MAX_AMT_CHK : ' || x_return_status, d_progress);
2151: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
2152: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2153: g_ret_status := x_return_status;
2154: END IF;
2155:

Line 2152: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2148: );
2149:
2150: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_ORD_TOT_AMT_LE_MAX_AMT_CHK : ' || x_return_status, d_progress);
2151: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
2152: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2153: g_ret_status := x_return_status;
2154: END IF;
2155:
2156: END IF;

Line 2174: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN

2170: ,x_msg_data => x_msg_data
2171: );
2172:
2173: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_SRC_DOC_CHK : ' || x_return_status, d_progress);
2174: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
2175: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2176: g_ret_status := x_return_status;
2177: END IF;
2178: END IF;

Line 2175: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2171: );
2172:
2173: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_SRC_DOC_CHK : ' || x_return_status, d_progress);
2174: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
2175: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2176: g_ret_status := x_return_status;
2177: END IF;
2178: END IF;
2179:

Line 2196: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN

2192: ,x_msg_data => x_msg_data
2193: );
2194:
2195: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_SRC_DOC_LINE_CHK : ' || x_return_status, d_progress);
2196: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
2197: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2198: g_ret_status := x_return_status;
2199: END IF;
2200: END IF;

Line 2197: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2193: );
2194:
2195: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_SRC_DOC_LINE_CHK : ' || x_return_status, d_progress);
2196: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
2197: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2198: g_ret_status := x_return_status;
2199: END IF;
2200: END IF;
2201:

Line 2218: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN

2214: ,x_msg_data => x_msg_data
2215: );
2216:
2217: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_AMT_GE_LINE_AMT : ' || x_return_status, d_progress);
2218: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
2219: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2220: g_ret_status := x_return_status;
2221: END IF;
2222: END IF;

Line 2219: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2215: );
2216:
2217: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_AMT_GE_LINE_AMT : ' || x_return_status, d_progress);
2218: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
2219: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2220: g_ret_status := x_return_status;
2221: END IF;
2222: END IF;
2223:

Line 2240: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN

2236: ,x_msg_data => x_msg_data
2237: );
2238:
2239: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_AMT_WITHIN_MAX_MIN_ORD_AMT : ' || x_return_status, d_progress);
2240: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
2241: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2242: g_ret_status := x_return_status;
2243: END IF;
2244: END IF;

Line 2241: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2237: );
2238:
2239: PO_UDA_DEFAULTING_PKG.DEBUG('After call to PO_CLM_COLS_SUB_CHECK.CLM_AMT_WITHIN_MAX_MIN_ORD_AMT : ' || x_return_status, d_progress);
2240: IF g_ret_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
2241: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2242: g_ret_status := x_return_status;
2243: END IF;
2244: END IF;
2245:

Line 2248: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2244: END IF;
2245:
2246: x_return_status := g_ret_status;
2247:
2248: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2249: x_return_status := FND_API.G_RET_STS_ERROR;
2250: END IF;
2251:
2252: PO_UDA_DEFAULTING_PKG.DEBUG('CLM_NAMED_COLS_SUB_CHK is completed with : ' || x_return_status, d_progress);

Line 2249: x_return_status := FND_API.G_RET_STS_ERROR;

2245:
2246: x_return_status := g_ret_status;
2247:
2248: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2249: x_return_status := FND_API.G_RET_STS_ERROR;
2250: END IF;
2251:
2252: PO_UDA_DEFAULTING_PKG.DEBUG('CLM_NAMED_COLS_SUB_CHK is completed with : ' || x_return_status, d_progress);
2253:

Line 2256: x_return_status := FND_API.G_RET_STS_ERROR;

2252: PO_UDA_DEFAULTING_PKG.DEBUG('CLM_NAMED_COLS_SUB_CHK is completed with : ' || x_return_status, d_progress);
2253:
2254: EXCEPTION
2255: WHEN OTHERS THEN
2256: x_return_status := FND_API.G_RET_STS_ERROR;
2257: END CLM_NAMED_COLS_SUB_CHK;
2258:
2259: /* The below procedure checks
2260: * Procedure to log the submission check errors