461: l_debug_info := 'Update Withdraw Message';
462: -------------------------------------------------
463: --ER 1552747 - withdraw expense report
464: if p_workflow_flag = AP_WEB_DB_EXPRPT_PKG.C_WORKFLOW_APPROVED_WITHDRAW then
465: FND_MESSAGE.SET_NAME('SQLAP','OIE_WITHDRAW_WARNING');
466: l_mess := FND_MESSAGE.GET;
467: WF_ENGINE.SetItemAttrText(l_item_type,
468: l_item_key,
469: 'WITHDRAW_WARNING',
462: -------------------------------------------------
463: --ER 1552747 - withdraw expense report
464: if p_workflow_flag = AP_WEB_DB_EXPRPT_PKG.C_WORKFLOW_APPROVED_WITHDRAW then
465: FND_MESSAGE.SET_NAME('SQLAP','OIE_WITHDRAW_WARNING');
466: l_mess := FND_MESSAGE.GET;
467: WF_ENGINE.SetItemAttrText(l_item_type,
468: l_item_key,
469: 'WITHDRAW_WARNING',
470: l_mess);
782: l_debug_info := 'Do NOT set EMP_VIOLATION_NOTE when policy profile is Approver Only';
783: ------------------------------------------------------------
784: IF (l_violation_count > 0) THEN
785: IF (l_policy_violation_value <> C_ALLOW_NO_WARNINGS) THEN
786: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_VIOLATION_NOTE');
787: l_mess := FND_MESSAGE.GET;
788: iText := iText + 1;
789: l_textNameArr(iText) := 'EMP_VIOLATION_NOTE';
790: l_textValArr(iText) := l_mess;
783: ------------------------------------------------------------
784: IF (l_violation_count > 0) THEN
785: IF (l_policy_violation_value <> C_ALLOW_NO_WARNINGS) THEN
786: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_VIOLATION_NOTE');
787: l_mess := FND_MESSAGE.GET;
788: iText := iText + 1;
789: l_textNameArr(iText) := 'EMP_VIOLATION_NOTE';
790: l_textValArr(iText) := l_mess;
791: END IF;
789: l_textNameArr(iText) := 'EMP_VIOLATION_NOTE';
790: l_textValArr(iText) := l_mess;
791: END IF;
792:
793: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_VIOLATION_NOTE');
794: l_mess := FND_MESSAGE.GET;
795: iText := iText + 1;
796: l_textNameArr(iText) := 'VIOLATION_NOTE';
797: l_textValArr(iText) := l_mess;
790: l_textValArr(iText) := l_mess;
791: END IF;
792:
793: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_VIOLATION_NOTE');
794: l_mess := FND_MESSAGE.GET;
795: iText := iText + 1;
796: l_textNameArr(iText) := 'VIOLATION_NOTE';
797: l_textValArr(iText) := l_mess;
798:
903: COMMIT;
904:
905:
906: IF (SQLCODE <> -20001) THEN
907: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
908: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
909: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'StartExpenseReportProcess');
910: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
911: END IF;
904:
905:
906: IF (SQLCODE <> -20001) THEN
907: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
908: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
909: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'StartExpenseReportProcess');
910: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
911: END IF;
912:
905:
906: IF (SQLCODE <> -20001) THEN
907: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
908: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
909: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'StartExpenseReportProcess');
910: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
911: END IF;
912:
913: -- always raise exceptions regardless it from StartExpenseReportProcess
906: IF (SQLCODE <> -20001) THEN
907: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
908: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
909: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'StartExpenseReportProcess');
910: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
911: END IF;
912:
913: -- always raise exceptions regardless it from StartExpenseReportProcess
914: -- or other callees
990:
991: EXCEPTION
992: WHEN OTHERS THEN
993: IF (SQLCODE <> -20001) THEN
994: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
995: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
996: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'GenTableHeader');
997: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
998: END IF;
991: EXCEPTION
992: WHEN OTHERS THEN
993: IF (SQLCODE <> -20001) THEN
994: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
995: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
996: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'GenTableHeader');
997: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
998: END IF;
999: APP_EXCEPTION.RAISE_EXCEPTION;
992: WHEN OTHERS THEN
993: IF (SQLCODE <> -20001) THEN
994: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
995: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
996: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'GenTableHeader');
997: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
998: END IF;
999: APP_EXCEPTION.RAISE_EXCEPTION;
1000:
993: IF (SQLCODE <> -20001) THEN
994: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
995: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
996: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'GenTableHeader');
997: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
998: END IF;
999: APP_EXCEPTION.RAISE_EXCEPTION;
1000:
1001: END GenTableHeader;
1145:
1146: EXCEPTION
1147: WHEN OTHERS THEN
1148: IF (SQLCODE <> -20001) THEN
1149: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1150: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1151: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'GenTableRows');
1152: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1153: END IF;
1146: EXCEPTION
1147: WHEN OTHERS THEN
1148: IF (SQLCODE <> -20001) THEN
1149: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1150: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1151: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'GenTableRows');
1152: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1153: END IF;
1154: APP_EXCEPTION.RAISE_EXCEPTION;
1147: WHEN OTHERS THEN
1148: IF (SQLCODE <> -20001) THEN
1149: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1150: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1151: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'GenTableRows');
1152: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1153: END IF;
1154: APP_EXCEPTION.RAISE_EXCEPTION;
1155:
1148: IF (SQLCODE <> -20001) THEN
1149: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1150: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1151: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'GenTableRows');
1152: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1153: END IF;
1154: APP_EXCEPTION.RAISE_EXCEPTION;
1155:
1156: END GenTableRows;
1704:
1705: EXCEPTION
1706: WHEN OTHERS THEN
1707: Wf_Core.Context('AP_WEB_EXPENSE_WF', 'APValidateExpenseReport',
1708: p_item_type, p_item_key, to_char(0), l_debug_info || FND_MESSAGE.GET);
1709: raise;
1710: END APValidateExpenseReport;
1711:
1712: ------------------------------------------------------------------------
1725: end if;
1726: EXCEPTION
1727: WHEN OTHERS THEN
1728: IF (SQLCODE <> -20001) THEN
1729: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1730: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1731: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'AddToWFSSError');
1732: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_exceed_error_msg);
1733: END IF;
1726: EXCEPTION
1727: WHEN OTHERS THEN
1728: IF (SQLCODE <> -20001) THEN
1729: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1730: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1731: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'AddToWFSSError');
1732: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_exceed_error_msg);
1733: END IF;
1734: APP_EXCEPTION.RAISE_EXCEPTION;
1727: WHEN OTHERS THEN
1728: IF (SQLCODE <> -20001) THEN
1729: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1730: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1731: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'AddToWFSSError');
1732: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_exceed_error_msg);
1733: END IF;
1734: APP_EXCEPTION.RAISE_EXCEPTION;
1735:
1728: IF (SQLCODE <> -20001) THEN
1729: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1730: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1731: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'AddToWFSSError');
1732: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_exceed_error_msg);
1733: END IF;
1734: APP_EXCEPTION.RAISE_EXCEPTION;
1735:
1736: END AddToWFSSError;
1783:
1784: EXCEPTION
1785: WHEN OTHERS THEN
1786: IF (SQLCODE <> -20001) THEN
1787: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1788: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1789: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'AddToHeaderErrors');
1790: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1791: END IF;
1784: EXCEPTION
1785: WHEN OTHERS THEN
1786: IF (SQLCODE <> -20001) THEN
1787: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1788: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1789: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'AddToHeaderErrors');
1790: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1791: END IF;
1792: APP_EXCEPTION.RAISE_EXCEPTION;
1785: WHEN OTHERS THEN
1786: IF (SQLCODE <> -20001) THEN
1787: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1788: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1789: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'AddToHeaderErrors');
1790: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1791: END IF;
1792: APP_EXCEPTION.RAISE_EXCEPTION;
1793:
1786: IF (SQLCODE <> -20001) THEN
1787: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1788: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1789: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'AddToHeaderErrors');
1790: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1791: END IF;
1792: APP_EXCEPTION.RAISE_EXCEPTION;
1793:
1794: END AddToHeaderErrors;
1852:
1853: EXCEPTION
1854: WHEN OTHERS THEN
1855: IF (SQLCODE <> -20001) THEN
1856: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1857: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1858: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'HandleInvalidDistCCID');
1859: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1860: END IF;
1853: EXCEPTION
1854: WHEN OTHERS THEN
1855: IF (SQLCODE <> -20001) THEN
1856: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1857: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1858: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'HandleInvalidDistCCID');
1859: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1860: END IF;
1861: APP_EXCEPTION.RAISE_EXCEPTION;
1854: WHEN OTHERS THEN
1855: IF (SQLCODE <> -20001) THEN
1856: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1857: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1858: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'HandleInvalidDistCCID');
1859: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1860: END IF;
1861: APP_EXCEPTION.RAISE_EXCEPTION;
1862: END HandleInvalidDistCCID;
1855: IF (SQLCODE <> -20001) THEN
1856: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1857: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1858: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'HandleInvalidDistCCID');
1859: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1860: END IF;
1861: APP_EXCEPTION.RAISE_EXCEPTION;
1862: END HandleInvalidDistCCID;
1863:
2069: p_concatenated_segments => l_concatenated_segments);
2070:
2071: exception
2072: when AP_WEB_OA_MAINFLOW_PKG.G_EXC_ERROR then
2073: l_header_error_message := FND_MESSAGE.Get;
2074: end;
2075:
2076: if (l_header_error_message is not null) then
2077:
2130: ------------------------------------------------------------------------
2131: l_debug_info := 'calling AP_WEB_DB_EXPTEMPLATE_PKG.GetPersonalParamID';
2132: ------------------------------------------------------------------------
2133: IF (NOT AP_WEB_DB_EXPTEMPLATE_PKG.GetPersonalParamID(l_personalParameterId)) THEN
2134: FND_MESSAGE.SET_NAME('SQLAP','OIE_NO_PERSONAL_EXP_TYPE');
2135: AddToHeaderErrors(p_item_type,
2136: p_item_key,
2137: FND_MESSAGE.GET);
2138: l_header_error_occurred := true;
2133: IF (NOT AP_WEB_DB_EXPTEMPLATE_PKG.GetPersonalParamID(l_personalParameterId)) THEN
2134: FND_MESSAGE.SET_NAME('SQLAP','OIE_NO_PERSONAL_EXP_TYPE');
2135: AddToHeaderErrors(p_item_type,
2136: p_item_key,
2137: FND_MESSAGE.GET);
2138: l_header_error_occurred := true;
2139: END IF; /* GetPersonalParamID */
2140:
2141: END IF; /* C_CompanyPay */
2266: IF (l_rounding_error_ccid IS NULL) THEN
2267: --------------------------------------------
2268: l_debug_info := 'Rounding Error CCID is NULL';
2269: --------------------------------------------
2270: FND_MESSAGE.SET_NAME('SQLAP','OIE_NO_ROUNDING_CCID');
2271: l_other_error_message := FND_MESSAGE.GET;
2272: AddToOtherErrors(p_item_type,
2273: p_item_key,
2274: l_concatenated_segments||': '||l_other_error_message);
2267: --------------------------------------------
2268: l_debug_info := 'Rounding Error CCID is NULL';
2269: --------------------------------------------
2270: FND_MESSAGE.SET_NAME('SQLAP','OIE_NO_ROUNDING_CCID');
2271: l_other_error_message := FND_MESSAGE.GET;
2272: AddToOtherErrors(p_item_type,
2273: p_item_key,
2274: l_concatenated_segments||': '||l_other_error_message);
2275: l_other_error_occurred := true;
2353: --------------------------------------------
2354: l_debug_info := 'Rounding Error CCID is NULL';
2355: --------------------------------------------
2356: IF ( l_rounding_error_ccid IS NULL) THEN
2357: FND_MESSAGE.SET_NAME('SQLAP','OIE_NO_ROUNDING_CCID');
2358: l_other_error_message := FND_MESSAGE.GET;
2359: AddToOtherErrors(p_item_type,
2360: p_item_key,
2361: l_concatenated_segments||': '||l_other_error_message);
2354: l_debug_info := 'Rounding Error CCID is NULL';
2355: --------------------------------------------
2356: IF ( l_rounding_error_ccid IS NULL) THEN
2357: FND_MESSAGE.SET_NAME('SQLAP','OIE_NO_ROUNDING_CCID');
2358: l_other_error_message := FND_MESSAGE.GET;
2359: AddToOtherErrors(p_item_type,
2360: p_item_key,
2361: l_concatenated_segments||': '||l_other_error_message);
2362: l_other_error_occurred := true;
2573: IF (NOT AP_WEB_DB_EXPRPT_PKG.SetDefaultExchRateType(p_report_header_id, l_sys_default_xrate_type)) THEN
2574: NULL;
2575: END IF; /* SetDefaultExchRateType */
2576:
2577: FND_MESSAGE.SET_NAME('SQLAP','AP_WEB_USER_EXCH_RATE_REQD');
2578: l_return_error_message := FND_MESSAGE.GET;
2579: AddToHeaderErrors(p_item_type,
2580: p_item_key,
2581: l_return_error_message);
2574: NULL;
2575: END IF; /* SetDefaultExchRateType */
2576:
2577: FND_MESSAGE.SET_NAME('SQLAP','AP_WEB_USER_EXCH_RATE_REQD');
2578: l_return_error_message := FND_MESSAGE.GET;
2579: AddToHeaderErrors(p_item_type,
2580: p_item_key,
2581: l_return_error_message);
2582: l_header_error_occurred := true;
2649:
2650: EXCEPTION
2651: WHEN OTHERS THEN
2652: IF (SQLCODE <> -20001) THEN
2653: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2654: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2655: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'DoAPValidation');
2656: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2657: END IF;
2650: EXCEPTION
2651: WHEN OTHERS THEN
2652: IF (SQLCODE <> -20001) THEN
2653: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2654: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2655: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'DoAPValidation');
2656: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2657: END IF;
2658: APP_EXCEPTION.RAISE_EXCEPTION;
2651: WHEN OTHERS THEN
2652: IF (SQLCODE <> -20001) THEN
2653: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2654: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2655: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'DoAPValidation');
2656: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2657: END IF;
2658: APP_EXCEPTION.RAISE_EXCEPTION;
2659: END DoAPValidation;
2652: IF (SQLCODE <> -20001) THEN
2653: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2654: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2655: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'DoAPValidation');
2656: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2657: END IF;
2658: APP_EXCEPTION.RAISE_EXCEPTION;
2659: END DoAPValidation;
2660:
2708: select HOME_URL
2709: into l_url
2710: from ICX_PARAMETERS;
2711:
2712: FND_MESSAGE.SET_NAME('SQLAP', 'AP_WEB_NOTIF_LOGON_ERROR');
2713: FND_MESSAGE.SET_TOKEN('URL', l_url);
2714:
2715: htp.p('
2709: into l_url
2710: from ICX_PARAMETERS;
2711:
2712: FND_MESSAGE.SET_NAME('SQLAP', 'AP_WEB_NOTIF_LOGON_ERROR');
2713: FND_MESSAGE.SET_TOKEN('URL', l_url);
2714:
2715: htp.p('
2711:
2712: FND_MESSAGE.SET_NAME('SQLAP', 'AP_WEB_NOTIF_LOGON_ERROR');
2713: FND_MESSAGE.SET_TOKEN('URL', l_url);
2714:
2715: htp.p('' || FND_MESSAGE.GET || '');
2716:
2717: END IF;
2718:
2719: AP_WEB_UTILITIES_PKG.logProcedure('AP_WEB_EXPENSE_WF', 'end OpenExp');
2773: */
2774:
2775: IF AP_WEB_DB_EXPLINE_PKG.GetShortpaidFlag(l_report_header_id, l_shortpaid_flag) THEN
2776: IF (l_shortpaid_flag = 'Y' ) THEN
2777: fnd_message.set_name('SQLAP', 'OIE_WF_APPROVAL_POLICY_NOTE');
2778: l_warning_msg := FND_MESSAGE.Get;
2779:
2780: WF_ENGINE.SetItemAttrText(
2781: p_item_type,
2774:
2775: IF AP_WEB_DB_EXPLINE_PKG.GetShortpaidFlag(l_report_header_id, l_shortpaid_flag) THEN
2776: IF (l_shortpaid_flag = 'Y' ) THEN
2777: fnd_message.set_name('SQLAP', 'OIE_WF_APPROVAL_POLICY_NOTE');
2778: l_warning_msg := FND_MESSAGE.Get;
2779:
2780: WF_ENGINE.SetItemAttrText(
2781: p_item_type,
2782: p_item_key,
2787: END IF;
2788: END IF;
2789: /* jrautiai ADJ Fix end */
2790:
2791: fnd_message.set_name('SQLAP', 'AP_WEB_EXP_APRVL_RECPTS_MISSIN');
2792: l_warning_msg := FND_MESSAGE.Get;
2793:
2794: WF_ENGINE.SetItemAttrText(
2795: p_item_type,
2788: END IF;
2789: /* jrautiai ADJ Fix end */
2790:
2791: fnd_message.set_name('SQLAP', 'AP_WEB_EXP_APRVL_RECPTS_MISSIN');
2792: l_warning_msg := FND_MESSAGE.Get;
2793:
2794: WF_ENGINE.SetItemAttrText(
2795: p_item_type,
2796: p_item_key,
2802: END IF;
2803: END IF;
2804:
2805: IF (AP_WEB_DB_EXPLINE_PKG.AnyPolicyViolation(l_report_header_id)) THEN
2806: fnd_message.set_name('SQLAP', 'AP_WEB_EXP_APRVL_RULES_VIOLATE');
2807: l_warning_msg := FND_MESSAGE.Get;
2808:
2809: WF_ENGINE.SetItemAttrText(
2810: p_item_type,
2803: END IF;
2804:
2805: IF (AP_WEB_DB_EXPLINE_PKG.AnyPolicyViolation(l_report_header_id)) THEN
2806: fnd_message.set_name('SQLAP', 'AP_WEB_EXP_APRVL_RULES_VIOLATE');
2807: l_warning_msg := FND_MESSAGE.Get;
2808:
2809: WF_ENGINE.SetItemAttrText(
2810: p_item_type,
2811: p_item_key,
2994: p_item_key,
2995: 'MISSING_RECEIPT_TOTAL',
2996: l_sum_missing_display_total);
2997:
2998: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_VERIFY_MISSING_NOTE');
2999: FND_MESSAGE.SET_TOKEN('MISSING_TOTAL',l_sum_missing_display_total);
3000:
3001: WF_ENGINE.SetItemAttrText(p_item_type,
3002: p_item_key,
2995: 'MISSING_RECEIPT_TOTAL',
2996: l_sum_missing_display_total);
2997:
2998: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_VERIFY_MISSING_NOTE');
2999: FND_MESSAGE.SET_TOKEN('MISSING_TOTAL',l_sum_missing_display_total);
3000:
3001: WF_ENGINE.SetItemAttrText(p_item_type,
3002: p_item_key,
3003: 'VERIFY_NOTE',
3000:
3001: WF_ENGINE.SetItemAttrText(p_item_type,
3002: p_item_key,
3003: 'VERIFY_NOTE',
3004: FND_MESSAGE.GET);
3005:
3006:
3007:
3008: p_result := 'COMPLETE:Y';
3115: ------------------------------------------------------------
3116: l_debug_info := 'Construction the Note';
3117: ------------------------------------------------------------
3118: IF (l_num_req_receipt > 0 ) THEN
3119: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_JUST_REQUIRED_MSG');
3120: END IF;
3121:
3122: IF (AP_WEB_DB_EXPLINE_PKG.AnyPolicyViolation(l_report_header_id)) THEN
3123: -- Bug# 13082536
3121:
3122: IF (AP_WEB_DB_EXPLINE_PKG.AnyPolicyViolation(l_report_header_id)) THEN
3123: -- Bug# 13082536
3124: l_violation := 'Y';
3125: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_VIOLATION_MSG');
3126: END IF;
3127:
3128: IF (l_num_req_receipt > 0 ) AND (l_violation = 'Y' ) THEN
3129: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_JUST_AND_VIOLATION_MSG');
3125: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_VIOLATION_MSG');
3126: END IF;
3127:
3128: IF (l_num_req_receipt > 0 ) AND (l_violation = 'Y' ) THEN
3129: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_JUST_AND_VIOLATION_MSG');
3130: END IF;
3131:
3132:
3133: l_mess := FND_MESSAGE.GET;
3129: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_JUST_AND_VIOLATION_MSG');
3130: END IF;
3131:
3132:
3133: l_mess := FND_MESSAGE.GET;
3134: WF_ENGINE.SetItemAttrText(p_item_type,
3135: p_item_key,
3136: 'REVIEW_NOTE',
3137: l_mess);
3140: l_debug_info := 'Construction the Instruction';
3141: ------------------------------------------------------------
3142: IF (l_num_req_receipt > 0 OR l_violation = 'Y' ) THEN
3143:
3144: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_REVIEW_INSTRUCTION');
3145: l_mess := FND_MESSAGE.GET;
3146:
3147: WF_ENGINE.SetItemAttrText(p_item_type,
3148: p_item_key,
3141: ------------------------------------------------------------
3142: IF (l_num_req_receipt > 0 OR l_violation = 'Y' ) THEN
3143:
3144: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_REVIEW_INSTRUCTION');
3145: l_mess := FND_MESSAGE.GET;
3146:
3147: WF_ENGINE.SetItemAttrText(p_item_type,
3148: p_item_key,
3149: 'INSTRUCTION',
3551: l_crd_card_count := 0;
3552: END IF;
3553:
3554: IF l_payment_due = C_BothPay AND nvl(l_crd_card_count,0) > 0 THEN
3555: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_ADJ_REIMBURSEMENT_INST2');
3556: l_mess := FND_MESSAGE.GET;
3557: ELSE
3558: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_ADJ_REIMBURSEMENT_INST1');
3559: l_mess := FND_MESSAGE.GET;
3552: END IF;
3553:
3554: IF l_payment_due = C_BothPay AND nvl(l_crd_card_count,0) > 0 THEN
3555: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_ADJ_REIMBURSEMENT_INST2');
3556: l_mess := FND_MESSAGE.GET;
3557: ELSE
3558: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_ADJ_REIMBURSEMENT_INST1');
3559: l_mess := FND_MESSAGE.GET;
3560: END IF;
3554: IF l_payment_due = C_BothPay AND nvl(l_crd_card_count,0) > 0 THEN
3555: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_ADJ_REIMBURSEMENT_INST2');
3556: l_mess := FND_MESSAGE.GET;
3557: ELSE
3558: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_ADJ_REIMBURSEMENT_INST1');
3559: l_mess := FND_MESSAGE.GET;
3560: END IF;
3561:
3562: WF_ENGINE.SetItemAttrText(p_item_type,
3555: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_ADJ_REIMBURSEMENT_INST2');
3556: l_mess := FND_MESSAGE.GET;
3557: ELSE
3558: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_ADJ_REIMBURSEMENT_INST1');
3559: l_mess := FND_MESSAGE.GET;
3560: END IF;
3561:
3562: WF_ENGINE.SetItemAttrText(p_item_type,
3563: p_item_key,
3563: p_item_key,
3564: 'INSTRUCTION',
3565: l_mess);
3566:
3567: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_ADJUSTMENT_NOTE');
3568: l_mess := FND_MESSAGE.GET;
3569:
3570: WF_ENGINE.SetItemAttrText(p_item_type,
3571: p_item_key,
3564: 'INSTRUCTION',
3565: l_mess);
3566:
3567: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_ADJUSTMENT_NOTE');
3568: l_mess := FND_MESSAGE.GET;
3569:
3570: WF_ENGINE.SetItemAttrText(p_item_type,
3571: p_item_key,
3572: 'WF_NOTE',
4230:
4231: EXCEPTION
4232: WHEN OTHERS THEN
4233: IF (SQLCODE <> -20001) THEN
4234: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
4235: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
4236: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'MissingReceiptShortPay');
4237: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
4238: END IF;
4231: EXCEPTION
4232: WHEN OTHERS THEN
4233: IF (SQLCODE <> -20001) THEN
4234: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
4235: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
4236: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'MissingReceiptShortPay');
4237: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
4238: END IF;
4239: APP_EXCEPTION.RAISE_EXCEPTION;
4232: WHEN OTHERS THEN
4233: IF (SQLCODE <> -20001) THEN
4234: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
4235: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
4236: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'MissingReceiptShortPay');
4237: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
4238: END IF;
4239: APP_EXCEPTION.RAISE_EXCEPTION;
4240: END MissingReceiptShortPay;
4233: IF (SQLCODE <> -20001) THEN
4234: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
4235: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
4236: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'MissingReceiptShortPay');
4237: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
4238: END IF;
4239: APP_EXCEPTION.RAISE_EXCEPTION;
4240: END MissingReceiptShortPay;
4241:
4279:
4280: EXCEPTION
4281: WHEN OTHERS THEN
4282: IF (SQLCODE <> -20001) THEN
4283: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
4284: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
4285: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'PolicyViolationShortPay');
4286: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
4287: END IF;
4280: EXCEPTION
4281: WHEN OTHERS THEN
4282: IF (SQLCODE <> -20001) THEN
4283: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
4284: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
4285: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'PolicyViolationShortPay');
4286: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
4287: END IF;
4288: APP_EXCEPTION.RAISE_EXCEPTION;
4281: WHEN OTHERS THEN
4282: IF (SQLCODE <> -20001) THEN
4283: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
4284: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
4285: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'PolicyViolationShortPay');
4286: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
4287: END IF;
4288: APP_EXCEPTION.RAISE_EXCEPTION;
4289: END PolicyViolationShortPay;
4282: IF (SQLCODE <> -20001) THEN
4283: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
4284: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
4285: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'PolicyViolationShortPay');
4286: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
4287: END IF;
4288: APP_EXCEPTION.RAISE_EXCEPTION;
4289: END PolicyViolationShortPay;
4290:
5032:
5033: EXCEPTION
5034: WHEN OTHERS THEN
5035: IF (SQLCODE <> -20001) THEN
5036: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
5037: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
5038: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'DeleteExpReportFromAPTables');
5039: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
5040: END IF;
5033: EXCEPTION
5034: WHEN OTHERS THEN
5035: IF (SQLCODE <> -20001) THEN
5036: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
5037: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
5038: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'DeleteExpReportFromAPTables');
5039: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
5040: END IF;
5041: APP_EXCEPTION.RAISE_EXCEPTION;
5034: WHEN OTHERS THEN
5035: IF (SQLCODE <> -20001) THEN
5036: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
5037: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
5038: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'DeleteExpReportFromAPTables');
5039: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
5040: END IF;
5041: APP_EXCEPTION.RAISE_EXCEPTION;
5042: END DeleteExpReportFromAPTables;
5035: IF (SQLCODE <> -20001) THEN
5036: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
5037: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
5038: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'DeleteExpReportFromAPTables');
5039: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
5040: END IF;
5041: APP_EXCEPTION.RAISE_EXCEPTION;
5042: END DeleteExpReportFromAPTables;
5043:
6430:
6431: IF ( (l_vendor_id IS NULL OR l_vendor_site_id IS NULL)
6432: AND nvl(l_crd_card_count,0) >0 ) THEN
6433: ----------------------------------------------------------------
6434: l_debug_info := 'Get the FND message for this missing vendor';
6435: ----------------------------------------------------------------
6436: FND_MESSAGE.Set_Name('SQLAP','AP_WEB_CCARD_NO_VENDOR_INFO');
6437:
6438: ----------------------------------------------------------------
6432: AND nvl(l_crd_card_count,0) >0 ) THEN
6433: ----------------------------------------------------------------
6434: l_debug_info := 'Get the FND message for this missing vendor';
6435: ----------------------------------------------------------------
6436: FND_MESSAGE.Set_Name('SQLAP','AP_WEB_CCARD_NO_VENDOR_INFO');
6437:
6438: ----------------------------------------------------------------
6439: l_debug_info := 'Set the Error Message Attribute';
6440: ----------------------------------------------------------------
6440: ----------------------------------------------------------------
6441: WF_ENGINE.SetItemAttrText(p_item_type,
6442: p_item_key,
6443: 'ERROR_MESSAGE',
6444: FND_MESSAGE.Get);
6445: p_result := 'COMPLETE:N';
6446: ELSE
6447: p_result := 'COMPLETE:Y';
6448: END IF;
7037: l_debug_info := 'Set #FROM_ROLE to AP';
7038: ----------------------------------------------------------------
7039: SetFromRoleAP(p_item_type, l_item_key, p_actid, p_funmode, p_result);
7040:
7041: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_POLICY_NC_NOTE');
7042:
7043: FND_MESSAGE.Set_Token('ORIG_REPORT_NUMBER', l_orig_expense_report_num);
7044: l_mess := FND_MESSAGE.GET;
7045:
7039: SetFromRoleAP(p_item_type, l_item_key, p_actid, p_funmode, p_result);
7040:
7041: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_POLICY_NC_NOTE');
7042:
7043: FND_MESSAGE.Set_Token('ORIG_REPORT_NUMBER', l_orig_expense_report_num);
7044: l_mess := FND_MESSAGE.GET;
7045:
7046: ----------------------------------------------------------------
7047: l_debug_info := 'Set Policy Non-Compliance note';
7040:
7041: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_POLICY_NC_NOTE');
7042:
7043: FND_MESSAGE.Set_Token('ORIG_REPORT_NUMBER', l_orig_expense_report_num);
7044: l_mess := FND_MESSAGE.GET;
7045:
7046: ----------------------------------------------------------------
7047: l_debug_info := 'Set Policy Non-Compliance note';
7048: ----------------------------------------------------------------
7170: l_total := WF_ENGINE.GetItemAttrNumber(p_item_type,
7171: p_item_key,
7172: 'NO_RECEIPTS_SHORTPAY_TOTAL');
7173:
7174: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_POLICY_MR_NOTE');
7175:
7176: FND_MESSAGE.Set_Token('ORIG_REPORT_NUMBER', l_orig_expense_report_num);
7177: l_mess := FND_MESSAGE.GET;
7178:
7172: 'NO_RECEIPTS_SHORTPAY_TOTAL');
7173:
7174: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_POLICY_MR_NOTE');
7175:
7176: FND_MESSAGE.Set_Token('ORIG_REPORT_NUMBER', l_orig_expense_report_num);
7177: l_mess := FND_MESSAGE.GET;
7178:
7179: ELSIF (l_missing_receipt_type = 'IMAGE') THEN
7180:
7173:
7174: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_POLICY_MR_NOTE');
7175:
7176: FND_MESSAGE.Set_Token('ORIG_REPORT_NUMBER', l_orig_expense_report_num);
7177: l_mess := FND_MESSAGE.GET;
7178:
7179: ELSIF (l_missing_receipt_type = 'IMAGE') THEN
7180:
7181: l_report_header_id := WF_ENGINE.GetItemAttrNumber(p_item_type,
7192: l_total := WF_ENGINE.GetItemAttrNumber(p_item_type,
7193: p_item_key,
7194: 'NO_IMG_RECPT_SHORTPAY_TOTAL');
7195:
7196: FND_MESSAGE.SET_NAME('SQLAP','OIE_MISSING_RECPT_NOTIF_INSTR');
7197:
7198: FND_MESSAGE.Set_Token('RPT_ID', l_orig_expense_report_num);
7199: l_mess := FND_MESSAGE.GET;
7200:
7194: 'NO_IMG_RECPT_SHORTPAY_TOTAL');
7195:
7196: FND_MESSAGE.SET_NAME('SQLAP','OIE_MISSING_RECPT_NOTIF_INSTR');
7197:
7198: FND_MESSAGE.Set_Token('RPT_ID', l_orig_expense_report_num);
7199: l_mess := FND_MESSAGE.GET;
7200:
7201: ELSE
7202: l_report_header_id := WF_ENGINE.GetItemAttrNumber(p_item_type,
7195:
7196: FND_MESSAGE.SET_NAME('SQLAP','OIE_MISSING_RECPT_NOTIF_INSTR');
7197:
7198: FND_MESSAGE.Set_Token('RPT_ID', l_orig_expense_report_num);
7199: l_mess := FND_MESSAGE.GET;
7200:
7201: ELSE
7202: l_report_header_id := WF_ENGINE.GetItemAttrNumber(p_item_type,
7203: p_item_key,
7213: l_total := WF_ENGINE.GetItemAttrNumber(p_item_type,
7214: p_item_key,
7215: 'NO_BOTH_RECPT_SHORTPAY_TOTAL');
7216:
7217: FND_MESSAGE.SET_NAME('SQLAP','OIE_MISSING_RECPT_NOTIF_INSTR');
7218:
7219: FND_MESSAGE.Set_Token('RPT_ID', l_orig_expense_report_num);
7220: l_mess := FND_MESSAGE.GET;
7221: END IF;
7215: 'NO_BOTH_RECPT_SHORTPAY_TOTAL');
7216:
7217: FND_MESSAGE.SET_NAME('SQLAP','OIE_MISSING_RECPT_NOTIF_INSTR');
7218:
7219: FND_MESSAGE.Set_Token('RPT_ID', l_orig_expense_report_num);
7220: l_mess := FND_MESSAGE.GET;
7221: END IF;
7222:
7223:
7216:
7217: FND_MESSAGE.SET_NAME('SQLAP','OIE_MISSING_RECPT_NOTIF_INSTR');
7218:
7219: FND_MESSAGE.Set_Token('RPT_ID', l_orig_expense_report_num);
7220: l_mess := FND_MESSAGE.GET;
7221: END IF;
7222:
7223:
7224:
8263: ---------------------------------------------
8264: l_debug_info := 'Loop in Approval Hierarchy';
8265: ---------------------------------------------
8266: -- 3257576
8267: FND_MESSAGE.Set_Name('SQLAP', 'AP_WEB_APRVL_HIERARCHY_LOOP');
8268: p_error_message := FND_MESSAGE.Get;
8269: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_INSTR6');
8270: p_instructions := FND_MESSAGE.Get;
8271: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_SPL_INSTR');
8264: l_debug_info := 'Loop in Approval Hierarchy';
8265: ---------------------------------------------
8266: -- 3257576
8267: FND_MESSAGE.Set_Name('SQLAP', 'AP_WEB_APRVL_HIERARCHY_LOOP');
8268: p_error_message := FND_MESSAGE.Get;
8269: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_INSTR6');
8270: p_instructions := FND_MESSAGE.Get;
8271: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_SPL_INSTR');
8272: p_special_instr := FND_MESSAGE.Get;
8265: ---------------------------------------------
8266: -- 3257576
8267: FND_MESSAGE.Set_Name('SQLAP', 'AP_WEB_APRVL_HIERARCHY_LOOP');
8268: p_error_message := FND_MESSAGE.Get;
8269: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_INSTR6');
8270: p_instructions := FND_MESSAGE.Get;
8271: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_SPL_INSTR');
8272: p_special_instr := FND_MESSAGE.Get;
8273: return;
8266: -- 3257576
8267: FND_MESSAGE.Set_Name('SQLAP', 'AP_WEB_APRVL_HIERARCHY_LOOP');
8268: p_error_message := FND_MESSAGE.Get;
8269: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_INSTR6');
8270: p_instructions := FND_MESSAGE.Get;
8271: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_SPL_INSTR');
8272: p_special_instr := FND_MESSAGE.Get;
8273: return;
8274: END IF;
8267: FND_MESSAGE.Set_Name('SQLAP', 'AP_WEB_APRVL_HIERARCHY_LOOP');
8268: p_error_message := FND_MESSAGE.Get;
8269: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_INSTR6');
8270: p_instructions := FND_MESSAGE.Get;
8271: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_SPL_INSTR');
8272: p_special_instr := FND_MESSAGE.Get;
8273: return;
8274: END IF;
8275:
8268: p_error_message := FND_MESSAGE.Get;
8269: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_INSTR6');
8270: p_instructions := FND_MESSAGE.Get;
8271: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_SPL_INSTR');
8272: p_special_instr := FND_MESSAGE.Get;
8273: return;
8274: END IF;
8275:
8276: /*Bug 2492342 : Adding the manager to the table and checking whether
8285: ---------------------------------------------
8286: l_debug_info := 'Loop in Approval Hierarchy';
8287: ---------------------------------------------
8288: -- 3257576
8289: FND_MESSAGE.Set_Name('SQLAP', 'OIE_CIRCULAR_REF_APRVL_CHAIN');
8290: p_error_message := FND_MESSAGE.Get;
8291: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_INSTR6');
8292: p_instructions := FND_MESSAGE.Get;
8293: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_SPL_INSTR');
8286: l_debug_info := 'Loop in Approval Hierarchy';
8287: ---------------------------------------------
8288: -- 3257576
8289: FND_MESSAGE.Set_Name('SQLAP', 'OIE_CIRCULAR_REF_APRVL_CHAIN');
8290: p_error_message := FND_MESSAGE.Get;
8291: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_INSTR6');
8292: p_instructions := FND_MESSAGE.Get;
8293: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_SPL_INSTR');
8294: p_special_instr := FND_MESSAGE.Get;
8287: ---------------------------------------------
8288: -- 3257576
8289: FND_MESSAGE.Set_Name('SQLAP', 'OIE_CIRCULAR_REF_APRVL_CHAIN');
8290: p_error_message := FND_MESSAGE.Get;
8291: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_INSTR6');
8292: p_instructions := FND_MESSAGE.Get;
8293: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_SPL_INSTR');
8294: p_special_instr := FND_MESSAGE.Get;
8295: return;
8288: -- 3257576
8289: FND_MESSAGE.Set_Name('SQLAP', 'OIE_CIRCULAR_REF_APRVL_CHAIN');
8290: p_error_message := FND_MESSAGE.Get;
8291: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_INSTR6');
8292: p_instructions := FND_MESSAGE.Get;
8293: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_SPL_INSTR');
8294: p_special_instr := FND_MESSAGE.Get;
8295: return;
8296: END IF;
8289: FND_MESSAGE.Set_Name('SQLAP', 'OIE_CIRCULAR_REF_APRVL_CHAIN');
8290: p_error_message := FND_MESSAGE.Get;
8291: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_INSTR6');
8292: p_instructions := FND_MESSAGE.Get;
8293: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_SPL_INSTR');
8294: p_special_instr := FND_MESSAGE.Get;
8295: return;
8296: END IF;
8297:
8290: p_error_message := FND_MESSAGE.Get;
8291: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_INSTR6');
8292: p_instructions := FND_MESSAGE.Get;
8293: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_SPL_INSTR');
8294: p_special_instr := FND_MESSAGE.Get;
8295: return;
8296: END IF;
8297:
8298: END LOOP;
9064: 'WF_NOTE');
9065:
9066: IF (l_rejection_reason IS NULL OR
9067: replace(l_rejection_reason, ' ', '') = '') THEN
9068: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_REASON_PROVIDED');
9069: WF_ENGINE.SetItemAttrText(p_item_type,
9070: p_item_key,
9071: 'WF_NOTE',
9072: FND_MESSAGE.Get);
9068: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_REASON_PROVIDED');
9069: WF_ENGINE.SetItemAttrText(p_item_type,
9070: p_item_key,
9071: 'WF_NOTE',
9072: FND_MESSAGE.Get);
9073:
9074: END IF;
9075:
9076:
9461: l_colon := instr(document, tr_end,-1);
9462: document := substr(document,1,l_colon+4);
9463: document := document || table_end || indent_end;
9464:
9465: FND_MESSAGE.SET_NAME('SQLAP','AP_WEB_EXP_UNABLE_TO_SHOWLINES');
9466: l_message := FND_MESSAGE.GET;
9467: document := document || table_start;
9468: document := document || tr_start || '&' || 'nbsp;' || tr_end;
9469: document := document || tr_start || '&' || 'nbsp;' || tr_end;
9462: document := substr(document,1,l_colon+4);
9463: document := document || table_end || indent_end;
9464:
9465: FND_MESSAGE.SET_NAME('SQLAP','AP_WEB_EXP_UNABLE_TO_SHOWLINES');
9466: l_message := FND_MESSAGE.GET;
9467: document := document || table_start;
9468: document := document || tr_start || '&' || 'nbsp;' || tr_end;
9469: document := document || tr_start || '&' || 'nbsp;' || tr_end;
9470: document := document || tr_start || td_start || l_message || td_end || tr_end;
9724: l_colon := instr(document, '',-1);
9725: document := substr(document,1,l_colon+4);
9726: document := document || '
';
9727:
9728: FND_MESSAGE.SET_NAME('SQLAP','AP_WEB_EXP_UNABLE_TO_SHOWLINES');
9729: l_message := FND_MESSAGE.GET;
9730: document := document || '
' || l_message || ' |