444: l_debug_info := 'Update Withdraw Message';
445: -------------------------------------------------
446: --ER 1552747 - withdraw expense report
447: if p_workflow_flag = AP_WEB_DB_EXPRPT_PKG.C_WORKFLOW_APPROVED_WITHDRAW then
448: FND_MESSAGE.SET_NAME('SQLAP','OIE_WITHDRAW_WARNING');
449: l_mess := FND_MESSAGE.GET;
450: WF_ENGINE.SetItemAttrText(l_item_type,
451: l_item_key,
452: 'WITHDRAW_WARNING',
445: -------------------------------------------------
446: --ER 1552747 - withdraw expense report
447: if p_workflow_flag = AP_WEB_DB_EXPRPT_PKG.C_WORKFLOW_APPROVED_WITHDRAW then
448: FND_MESSAGE.SET_NAME('SQLAP','OIE_WITHDRAW_WARNING');
449: l_mess := FND_MESSAGE.GET;
450: WF_ENGINE.SetItemAttrText(l_item_type,
451: l_item_key,
452: 'WITHDRAW_WARNING',
453: l_mess);
765: l_debug_info := 'Do NOT set EMP_VIOLATION_NOTE when policy profile is Approver Only';
766: ------------------------------------------------------------
767: IF (l_violation_count > 0) THEN
768: IF (l_policy_violation_value <> C_ALLOW_NO_WARNINGS) THEN
769: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_VIOLATION_NOTE');
770: l_mess := FND_MESSAGE.GET;
771: iText := iText + 1;
772: l_textNameArr(iText) := 'EMP_VIOLATION_NOTE';
773: l_textValArr(iText) := l_mess;
766: ------------------------------------------------------------
767: IF (l_violation_count > 0) THEN
768: IF (l_policy_violation_value <> C_ALLOW_NO_WARNINGS) THEN
769: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_VIOLATION_NOTE');
770: l_mess := FND_MESSAGE.GET;
771: iText := iText + 1;
772: l_textNameArr(iText) := 'EMP_VIOLATION_NOTE';
773: l_textValArr(iText) := l_mess;
774: END IF;
772: l_textNameArr(iText) := 'EMP_VIOLATION_NOTE';
773: l_textValArr(iText) := l_mess;
774: END IF;
775:
776: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_VIOLATION_NOTE');
777: l_mess := FND_MESSAGE.GET;
778: iText := iText + 1;
779: l_textNameArr(iText) := 'VIOLATION_NOTE';
780: l_textValArr(iText) := l_mess;
773: l_textValArr(iText) := l_mess;
774: END IF;
775:
776: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_VIOLATION_NOTE');
777: l_mess := FND_MESSAGE.GET;
778: iText := iText + 1;
779: l_textNameArr(iText) := 'VIOLATION_NOTE';
780: l_textValArr(iText) := l_mess;
781:
886: COMMIT;
887:
888:
889: IF (SQLCODE <> -20001) THEN
890: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
891: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
892: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'StartExpenseReportProcess');
893: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
894: END IF;
887:
888:
889: IF (SQLCODE <> -20001) THEN
890: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
891: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
892: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'StartExpenseReportProcess');
893: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
894: END IF;
895:
888:
889: IF (SQLCODE <> -20001) THEN
890: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
891: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
892: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'StartExpenseReportProcess');
893: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
894: END IF;
895:
896: -- always raise exceptions regardless it from StartExpenseReportProcess
889: IF (SQLCODE <> -20001) THEN
890: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
891: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
892: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'StartExpenseReportProcess');
893: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
894: END IF;
895:
896: -- always raise exceptions regardless it from StartExpenseReportProcess
897: -- or other callees
973:
974: EXCEPTION
975: WHEN OTHERS THEN
976: IF (SQLCODE <> -20001) THEN
977: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
978: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
979: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'GenTableHeader');
980: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
981: END IF;
974: EXCEPTION
975: WHEN OTHERS THEN
976: IF (SQLCODE <> -20001) THEN
977: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
978: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
979: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'GenTableHeader');
980: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
981: END IF;
982: APP_EXCEPTION.RAISE_EXCEPTION;
975: WHEN OTHERS THEN
976: IF (SQLCODE <> -20001) THEN
977: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
978: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
979: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'GenTableHeader');
980: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
981: END IF;
982: APP_EXCEPTION.RAISE_EXCEPTION;
983:
976: IF (SQLCODE <> -20001) THEN
977: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
978: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
979: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'GenTableHeader');
980: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
981: END IF;
982: APP_EXCEPTION.RAISE_EXCEPTION;
983:
984: END GenTableHeader;
1128:
1129: EXCEPTION
1130: WHEN OTHERS THEN
1131: IF (SQLCODE <> -20001) THEN
1132: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1133: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1134: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'GenTableRows');
1135: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1136: END IF;
1129: EXCEPTION
1130: WHEN OTHERS THEN
1131: IF (SQLCODE <> -20001) THEN
1132: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1133: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1134: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'GenTableRows');
1135: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1136: END IF;
1137: APP_EXCEPTION.RAISE_EXCEPTION;
1130: WHEN OTHERS THEN
1131: IF (SQLCODE <> -20001) THEN
1132: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1133: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1134: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'GenTableRows');
1135: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1136: END IF;
1137: APP_EXCEPTION.RAISE_EXCEPTION;
1138:
1131: IF (SQLCODE <> -20001) THEN
1132: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1133: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1134: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'GenTableRows');
1135: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1136: END IF;
1137: APP_EXCEPTION.RAISE_EXCEPTION;
1138:
1139: END GenTableRows;
1687:
1688: EXCEPTION
1689: WHEN OTHERS THEN
1690: Wf_Core.Context('AP_WEB_EXPENSE_WF', 'APValidateExpenseReport',
1691: p_item_type, p_item_key, to_char(0), l_debug_info || FND_MESSAGE.GET);
1692: raise;
1693: END APValidateExpenseReport;
1694:
1695: ------------------------------------------------------------------------
1708: end if;
1709: EXCEPTION
1710: WHEN OTHERS THEN
1711: IF (SQLCODE <> -20001) THEN
1712: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1713: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1714: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'AddToWFSSError');
1715: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_exceed_error_msg);
1716: END IF;
1709: EXCEPTION
1710: WHEN OTHERS THEN
1711: IF (SQLCODE <> -20001) THEN
1712: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1713: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1714: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'AddToWFSSError');
1715: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_exceed_error_msg);
1716: END IF;
1717: APP_EXCEPTION.RAISE_EXCEPTION;
1710: WHEN OTHERS THEN
1711: IF (SQLCODE <> -20001) THEN
1712: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1713: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1714: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'AddToWFSSError');
1715: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_exceed_error_msg);
1716: END IF;
1717: APP_EXCEPTION.RAISE_EXCEPTION;
1718:
1711: IF (SQLCODE <> -20001) THEN
1712: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1713: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1714: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'AddToWFSSError');
1715: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_exceed_error_msg);
1716: END IF;
1717: APP_EXCEPTION.RAISE_EXCEPTION;
1718:
1719: END AddToWFSSError;
1766:
1767: EXCEPTION
1768: WHEN OTHERS THEN
1769: IF (SQLCODE <> -20001) THEN
1770: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1771: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1772: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'AddToHeaderErrors');
1773: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1774: END IF;
1767: EXCEPTION
1768: WHEN OTHERS THEN
1769: IF (SQLCODE <> -20001) THEN
1770: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1771: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1772: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'AddToHeaderErrors');
1773: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1774: END IF;
1775: APP_EXCEPTION.RAISE_EXCEPTION;
1768: WHEN OTHERS THEN
1769: IF (SQLCODE <> -20001) THEN
1770: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1771: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1772: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'AddToHeaderErrors');
1773: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1774: END IF;
1775: APP_EXCEPTION.RAISE_EXCEPTION;
1776:
1769: IF (SQLCODE <> -20001) THEN
1770: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1771: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1772: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'AddToHeaderErrors');
1773: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1774: END IF;
1775: APP_EXCEPTION.RAISE_EXCEPTION;
1776:
1777: END AddToHeaderErrors;
1835:
1836: EXCEPTION
1837: WHEN OTHERS THEN
1838: IF (SQLCODE <> -20001) THEN
1839: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1840: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1841: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'HandleInvalidDistCCID');
1842: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1843: END IF;
1836: EXCEPTION
1837: WHEN OTHERS THEN
1838: IF (SQLCODE <> -20001) THEN
1839: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1840: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1841: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'HandleInvalidDistCCID');
1842: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1843: END IF;
1844: APP_EXCEPTION.RAISE_EXCEPTION;
1837: WHEN OTHERS THEN
1838: IF (SQLCODE <> -20001) THEN
1839: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1840: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1841: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'HandleInvalidDistCCID');
1842: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1843: END IF;
1844: APP_EXCEPTION.RAISE_EXCEPTION;
1845: END HandleInvalidDistCCID;
1838: IF (SQLCODE <> -20001) THEN
1839: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1840: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1841: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'HandleInvalidDistCCID');
1842: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1843: END IF;
1844: APP_EXCEPTION.RAISE_EXCEPTION;
1845: END HandleInvalidDistCCID;
1846:
2052: p_concatenated_segments => l_concatenated_segments);
2053:
2054: exception
2055: when AP_WEB_OA_MAINFLOW_PKG.G_EXC_ERROR then
2056: l_header_error_message := FND_MESSAGE.Get;
2057: end;
2058:
2059: if (l_header_error_message is not null) then
2060:
2113: ------------------------------------------------------------------------
2114: l_debug_info := 'calling AP_WEB_DB_EXPTEMPLATE_PKG.GetPersonalParamID';
2115: ------------------------------------------------------------------------
2116: IF (NOT AP_WEB_DB_EXPTEMPLATE_PKG.GetPersonalParamID(l_personalParameterId)) THEN
2117: FND_MESSAGE.SET_NAME('SQLAP','OIE_NO_PERSONAL_EXP_TYPE');
2118: AddToHeaderErrors(p_item_type,
2119: p_item_key,
2120: FND_MESSAGE.GET);
2121: l_header_error_occurred := true;
2116: IF (NOT AP_WEB_DB_EXPTEMPLATE_PKG.GetPersonalParamID(l_personalParameterId)) THEN
2117: FND_MESSAGE.SET_NAME('SQLAP','OIE_NO_PERSONAL_EXP_TYPE');
2118: AddToHeaderErrors(p_item_type,
2119: p_item_key,
2120: FND_MESSAGE.GET);
2121: l_header_error_occurred := true;
2122: END IF; /* GetPersonalParamID */
2123:
2124: END IF; /* C_CompanyPay */
2249: IF (l_rounding_error_ccid IS NULL) THEN
2250: --------------------------------------------
2251: l_debug_info := 'Rounding Error CCID is NULL';
2252: --------------------------------------------
2253: FND_MESSAGE.SET_NAME('SQLAP','OIE_NO_ROUNDING_CCID');
2254: l_other_error_message := FND_MESSAGE.GET;
2255: AddToOtherErrors(p_item_type,
2256: p_item_key,
2257: l_concatenated_segments||': '||l_other_error_message);
2250: --------------------------------------------
2251: l_debug_info := 'Rounding Error CCID is NULL';
2252: --------------------------------------------
2253: FND_MESSAGE.SET_NAME('SQLAP','OIE_NO_ROUNDING_CCID');
2254: l_other_error_message := FND_MESSAGE.GET;
2255: AddToOtherErrors(p_item_type,
2256: p_item_key,
2257: l_concatenated_segments||': '||l_other_error_message);
2258: l_other_error_occurred := true;
2336: --------------------------------------------
2337: l_debug_info := 'Rounding Error CCID is NULL';
2338: --------------------------------------------
2339: IF ( l_rounding_error_ccid IS NULL) THEN
2340: FND_MESSAGE.SET_NAME('SQLAP','OIE_NO_ROUNDING_CCID');
2341: l_other_error_message := FND_MESSAGE.GET;
2342: AddToOtherErrors(p_item_type,
2343: p_item_key,
2344: l_concatenated_segments||': '||l_other_error_message);
2337: l_debug_info := 'Rounding Error CCID is NULL';
2338: --------------------------------------------
2339: IF ( l_rounding_error_ccid IS NULL) THEN
2340: FND_MESSAGE.SET_NAME('SQLAP','OIE_NO_ROUNDING_CCID');
2341: l_other_error_message := FND_MESSAGE.GET;
2342: AddToOtherErrors(p_item_type,
2343: p_item_key,
2344: l_concatenated_segments||': '||l_other_error_message);
2345: l_other_error_occurred := true;
2556: IF (NOT AP_WEB_DB_EXPRPT_PKG.SetDefaultExchRateType(p_report_header_id, l_sys_default_xrate_type)) THEN
2557: NULL;
2558: END IF; /* SetDefaultExchRateType */
2559:
2560: FND_MESSAGE.SET_NAME('SQLAP','AP_WEB_USER_EXCH_RATE_REQD');
2561: l_return_error_message := FND_MESSAGE.GET;
2562: AddToHeaderErrors(p_item_type,
2563: p_item_key,
2564: l_return_error_message);
2557: NULL;
2558: END IF; /* SetDefaultExchRateType */
2559:
2560: FND_MESSAGE.SET_NAME('SQLAP','AP_WEB_USER_EXCH_RATE_REQD');
2561: l_return_error_message := FND_MESSAGE.GET;
2562: AddToHeaderErrors(p_item_type,
2563: p_item_key,
2564: l_return_error_message);
2565: l_header_error_occurred := true;
2632:
2633: EXCEPTION
2634: WHEN OTHERS THEN
2635: IF (SQLCODE <> -20001) THEN
2636: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2637: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2638: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'DoAPValidation');
2639: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2640: END IF;
2633: EXCEPTION
2634: WHEN OTHERS THEN
2635: IF (SQLCODE <> -20001) THEN
2636: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2637: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2638: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'DoAPValidation');
2639: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2640: END IF;
2641: APP_EXCEPTION.RAISE_EXCEPTION;
2634: WHEN OTHERS THEN
2635: IF (SQLCODE <> -20001) THEN
2636: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2637: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2638: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'DoAPValidation');
2639: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2640: END IF;
2641: APP_EXCEPTION.RAISE_EXCEPTION;
2642: END DoAPValidation;
2635: IF (SQLCODE <> -20001) THEN
2636: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2637: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2638: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'DoAPValidation');
2639: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2640: END IF;
2641: APP_EXCEPTION.RAISE_EXCEPTION;
2642: END DoAPValidation;
2643:
2691: select HOME_URL
2692: into l_url
2693: from ICX_PARAMETERS;
2694:
2695: FND_MESSAGE.SET_NAME('SQLAP', 'AP_WEB_NOTIF_LOGON_ERROR');
2696: FND_MESSAGE.SET_TOKEN('URL', l_url);
2697:
2698: htp.p('
2692: into l_url
2693: from ICX_PARAMETERS;
2694:
2695: FND_MESSAGE.SET_NAME('SQLAP', 'AP_WEB_NOTIF_LOGON_ERROR');
2696: FND_MESSAGE.SET_TOKEN('URL', l_url);
2697:
2698: htp.p('
2694:
2695: FND_MESSAGE.SET_NAME('SQLAP', 'AP_WEB_NOTIF_LOGON_ERROR');
2696: FND_MESSAGE.SET_TOKEN('URL', l_url);
2697:
2698: htp.p('' || FND_MESSAGE.GET || '');
2699:
2700: END IF;
2701:
2702: AP_WEB_UTILITIES_PKG.logProcedure('AP_WEB_EXPENSE_WF', 'end OpenExp');
2756: */
2757:
2758: IF AP_WEB_DB_EXPLINE_PKG.GetShortpaidFlag(l_report_header_id, l_shortpaid_flag) THEN
2759: IF (l_shortpaid_flag = 'Y' ) THEN
2760: fnd_message.set_name('SQLAP', 'OIE_WF_APPROVAL_POLICY_NOTE');
2761: l_warning_msg := FND_MESSAGE.Get;
2762:
2763: WF_ENGINE.SetItemAttrText(
2764: p_item_type,
2757:
2758: IF AP_WEB_DB_EXPLINE_PKG.GetShortpaidFlag(l_report_header_id, l_shortpaid_flag) THEN
2759: IF (l_shortpaid_flag = 'Y' ) THEN
2760: fnd_message.set_name('SQLAP', 'OIE_WF_APPROVAL_POLICY_NOTE');
2761: l_warning_msg := FND_MESSAGE.Get;
2762:
2763: WF_ENGINE.SetItemAttrText(
2764: p_item_type,
2765: p_item_key,
2770: END IF;
2771: END IF;
2772: /* jrautiai ADJ Fix end */
2773:
2774: fnd_message.set_name('SQLAP', 'AP_WEB_EXP_APRVL_RECPTS_MISSIN');
2775: l_warning_msg := FND_MESSAGE.Get;
2776:
2777: WF_ENGINE.SetItemAttrText(
2778: p_item_type,
2771: END IF;
2772: /* jrautiai ADJ Fix end */
2773:
2774: fnd_message.set_name('SQLAP', 'AP_WEB_EXP_APRVL_RECPTS_MISSIN');
2775: l_warning_msg := FND_MESSAGE.Get;
2776:
2777: WF_ENGINE.SetItemAttrText(
2778: p_item_type,
2779: p_item_key,
2785: END IF;
2786: END IF;
2787:
2788: IF (AP_WEB_DB_EXPLINE_PKG.AnyPolicyViolation(l_report_header_id)) THEN
2789: fnd_message.set_name('SQLAP', 'AP_WEB_EXP_APRVL_RULES_VIOLATE');
2790: l_warning_msg := FND_MESSAGE.Get;
2791:
2792: WF_ENGINE.SetItemAttrText(
2793: p_item_type,
2786: END IF;
2787:
2788: IF (AP_WEB_DB_EXPLINE_PKG.AnyPolicyViolation(l_report_header_id)) THEN
2789: fnd_message.set_name('SQLAP', 'AP_WEB_EXP_APRVL_RULES_VIOLATE');
2790: l_warning_msg := FND_MESSAGE.Get;
2791:
2792: WF_ENGINE.SetItemAttrText(
2793: p_item_type,
2794: p_item_key,
2947: p_item_key,
2948: 'MISSING_RECEIPT_TOTAL',
2949: l_sum_missing_display_total);
2950:
2951: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_VERIFY_MISSING_NOTE');
2952: FND_MESSAGE.SET_TOKEN('MISSING_TOTAL',l_sum_missing_display_total);
2953:
2954: WF_ENGINE.SetItemAttrText(p_item_type,
2955: p_item_key,
2948: 'MISSING_RECEIPT_TOTAL',
2949: l_sum_missing_display_total);
2950:
2951: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_VERIFY_MISSING_NOTE');
2952: FND_MESSAGE.SET_TOKEN('MISSING_TOTAL',l_sum_missing_display_total);
2953:
2954: WF_ENGINE.SetItemAttrText(p_item_type,
2955: p_item_key,
2956: 'VERIFY_NOTE',
2953:
2954: WF_ENGINE.SetItemAttrText(p_item_type,
2955: p_item_key,
2956: 'VERIFY_NOTE',
2957: FND_MESSAGE.GET);
2958:
2959:
2960:
2961: p_result := 'COMPLETE:Y';
3068: ------------------------------------------------------------
3069: l_debug_info := 'Construction the Note';
3070: ------------------------------------------------------------
3071: IF (l_num_req_receipt > 0 ) THEN
3072: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_JUST_REQUIRED_MSG');
3073: END IF;
3074:
3075: IF (AP_WEB_DB_EXPLINE_PKG.AnyPolicyViolation(l_report_header_id)) THEN
3076: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_VIOLATION_MSG');
3072: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_JUST_REQUIRED_MSG');
3073: END IF;
3074:
3075: IF (AP_WEB_DB_EXPLINE_PKG.AnyPolicyViolation(l_report_header_id)) THEN
3076: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_VIOLATION_MSG');
3077: END IF;
3078:
3079: IF (l_num_req_receipt > 0 ) AND (l_violation = 'Y' ) THEN
3080: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_JUST_AND_VIOLATION_MSG');
3076: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_VIOLATION_MSG');
3077: END IF;
3078:
3079: IF (l_num_req_receipt > 0 ) AND (l_violation = 'Y' ) THEN
3080: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_JUST_AND_VIOLATION_MSG');
3081: END IF;
3082:
3083:
3084: l_mess := FND_MESSAGE.GET;
3080: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_JUST_AND_VIOLATION_MSG');
3081: END IF;
3082:
3083:
3084: l_mess := FND_MESSAGE.GET;
3085: WF_ENGINE.SetItemAttrText(p_item_type,
3086: p_item_key,
3087: 'REVIEW_NOTE',
3088: l_mess);
3091: l_debug_info := 'Construction the Instruction';
3092: ------------------------------------------------------------
3093: IF (l_num_req_receipt > 0 OR l_violation = 'Y' ) THEN
3094:
3095: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_REVIEW_INSTRUCTION');
3096: l_mess := FND_MESSAGE.GET;
3097:
3098: WF_ENGINE.SetItemAttrText(p_item_type,
3099: p_item_key,
3092: ------------------------------------------------------------
3093: IF (l_num_req_receipt > 0 OR l_violation = 'Y' ) THEN
3094:
3095: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_REVIEW_INSTRUCTION');
3096: l_mess := FND_MESSAGE.GET;
3097:
3098: WF_ENGINE.SetItemAttrText(p_item_type,
3099: p_item_key,
3100: 'INSTRUCTION',
3502: l_crd_card_count := 0;
3503: END IF;
3504:
3505: IF l_payment_due = C_BothPay AND nvl(l_crd_card_count,0) > 0 THEN
3506: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_ADJ_REIMBURSEMENT_INST2');
3507: l_mess := FND_MESSAGE.GET;
3508: ELSE
3509: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_ADJ_REIMBURSEMENT_INST1');
3510: l_mess := FND_MESSAGE.GET;
3503: END IF;
3504:
3505: IF l_payment_due = C_BothPay AND nvl(l_crd_card_count,0) > 0 THEN
3506: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_ADJ_REIMBURSEMENT_INST2');
3507: l_mess := FND_MESSAGE.GET;
3508: ELSE
3509: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_ADJ_REIMBURSEMENT_INST1');
3510: l_mess := FND_MESSAGE.GET;
3511: END IF;
3505: IF l_payment_due = C_BothPay AND nvl(l_crd_card_count,0) > 0 THEN
3506: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_ADJ_REIMBURSEMENT_INST2');
3507: l_mess := FND_MESSAGE.GET;
3508: ELSE
3509: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_ADJ_REIMBURSEMENT_INST1');
3510: l_mess := FND_MESSAGE.GET;
3511: END IF;
3512:
3513: WF_ENGINE.SetItemAttrText(p_item_type,
3506: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_ADJ_REIMBURSEMENT_INST2');
3507: l_mess := FND_MESSAGE.GET;
3508: ELSE
3509: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_ADJ_REIMBURSEMENT_INST1');
3510: l_mess := FND_MESSAGE.GET;
3511: END IF;
3512:
3513: WF_ENGINE.SetItemAttrText(p_item_type,
3514: p_item_key,
3514: p_item_key,
3515: 'INSTRUCTION',
3516: l_mess);
3517:
3518: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_ADJUSTMENT_NOTE');
3519: l_mess := FND_MESSAGE.GET;
3520:
3521: WF_ENGINE.SetItemAttrText(p_item_type,
3522: p_item_key,
3515: 'INSTRUCTION',
3516: l_mess);
3517:
3518: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_ADJUSTMENT_NOTE');
3519: l_mess := FND_MESSAGE.GET;
3520:
3521: WF_ENGINE.SetItemAttrText(p_item_type,
3522: p_item_key,
3523: 'WF_NOTE',
4142:
4143: EXCEPTION
4144: WHEN OTHERS THEN
4145: IF (SQLCODE <> -20001) THEN
4146: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
4147: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
4148: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'MissingReceiptShortPay');
4149: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
4150: END IF;
4143: EXCEPTION
4144: WHEN OTHERS THEN
4145: IF (SQLCODE <> -20001) THEN
4146: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
4147: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
4148: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'MissingReceiptShortPay');
4149: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
4150: END IF;
4151: APP_EXCEPTION.RAISE_EXCEPTION;
4144: WHEN OTHERS THEN
4145: IF (SQLCODE <> -20001) THEN
4146: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
4147: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
4148: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'MissingReceiptShortPay');
4149: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
4150: END IF;
4151: APP_EXCEPTION.RAISE_EXCEPTION;
4152: END MissingReceiptShortPay;
4145: IF (SQLCODE <> -20001) THEN
4146: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
4147: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
4148: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'MissingReceiptShortPay');
4149: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
4150: END IF;
4151: APP_EXCEPTION.RAISE_EXCEPTION;
4152: END MissingReceiptShortPay;
4153:
4191:
4192: EXCEPTION
4193: WHEN OTHERS THEN
4194: IF (SQLCODE <> -20001) THEN
4195: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
4196: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
4197: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'PolicyViolationShortPay');
4198: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
4199: END IF;
4192: EXCEPTION
4193: WHEN OTHERS THEN
4194: IF (SQLCODE <> -20001) THEN
4195: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
4196: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
4197: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'PolicyViolationShortPay');
4198: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
4199: END IF;
4200: APP_EXCEPTION.RAISE_EXCEPTION;
4193: WHEN OTHERS THEN
4194: IF (SQLCODE <> -20001) THEN
4195: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
4196: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
4197: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'PolicyViolationShortPay');
4198: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
4199: END IF;
4200: APP_EXCEPTION.RAISE_EXCEPTION;
4201: END PolicyViolationShortPay;
4194: IF (SQLCODE <> -20001) THEN
4195: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
4196: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
4197: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'PolicyViolationShortPay');
4198: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
4199: END IF;
4200: APP_EXCEPTION.RAISE_EXCEPTION;
4201: END PolicyViolationShortPay;
4202:
4726:
4727: EXCEPTION
4728: WHEN OTHERS THEN
4729: IF (SQLCODE <> -20001) THEN
4730: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
4731: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
4732: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'DeleteExpReportFromAPTables');
4733: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
4734: END IF;
4727: EXCEPTION
4728: WHEN OTHERS THEN
4729: IF (SQLCODE <> -20001) THEN
4730: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
4731: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
4732: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'DeleteExpReportFromAPTables');
4733: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
4734: END IF;
4735: APP_EXCEPTION.RAISE_EXCEPTION;
4728: WHEN OTHERS THEN
4729: IF (SQLCODE <> -20001) THEN
4730: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
4731: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
4732: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'DeleteExpReportFromAPTables');
4733: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
4734: END IF;
4735: APP_EXCEPTION.RAISE_EXCEPTION;
4736: END DeleteExpReportFromAPTables;
4729: IF (SQLCODE <> -20001) THEN
4730: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
4731: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
4732: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'DeleteExpReportFromAPTables');
4733: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
4734: END IF;
4735: APP_EXCEPTION.RAISE_EXCEPTION;
4736: END DeleteExpReportFromAPTables;
4737:
6049:
6050: IF ( (l_vendor_id IS NULL OR l_vendor_site_id IS NULL)
6051: AND nvl(l_crd_card_count,0) >0 ) THEN
6052: ----------------------------------------------------------------
6053: l_debug_info := 'Get the FND message for this missing vendor';
6054: ----------------------------------------------------------------
6055: FND_MESSAGE.Set_Name('SQLAP','AP_WEB_CCARD_NO_VENDOR_INFO');
6056:
6057: ----------------------------------------------------------------
6051: AND nvl(l_crd_card_count,0) >0 ) THEN
6052: ----------------------------------------------------------------
6053: l_debug_info := 'Get the FND message for this missing vendor';
6054: ----------------------------------------------------------------
6055: FND_MESSAGE.Set_Name('SQLAP','AP_WEB_CCARD_NO_VENDOR_INFO');
6056:
6057: ----------------------------------------------------------------
6058: l_debug_info := 'Set the Error Message Attribute';
6059: ----------------------------------------------------------------
6059: ----------------------------------------------------------------
6060: WF_ENGINE.SetItemAttrText(p_item_type,
6061: p_item_key,
6062: 'ERROR_MESSAGE',
6063: FND_MESSAGE.Get);
6064: p_result := 'COMPLETE:N';
6065: ELSE
6066: p_result := 'COMPLETE:Y';
6067: END IF;
6656: l_debug_info := 'Set #FROM_ROLE to AP';
6657: ----------------------------------------------------------------
6658: SetFromRoleAP(p_item_type, l_item_key, p_actid, p_funmode, p_result);
6659:
6660: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_POLICY_NC_NOTE');
6661:
6662: FND_MESSAGE.Set_Token('ORIG_REPORT_NUMBER', l_orig_expense_report_num);
6663: l_mess := FND_MESSAGE.GET;
6664:
6658: SetFromRoleAP(p_item_type, l_item_key, p_actid, p_funmode, p_result);
6659:
6660: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_POLICY_NC_NOTE');
6661:
6662: FND_MESSAGE.Set_Token('ORIG_REPORT_NUMBER', l_orig_expense_report_num);
6663: l_mess := FND_MESSAGE.GET;
6664:
6665: ----------------------------------------------------------------
6666: l_debug_info := 'Set Policy Non-Compliance note';
6659:
6660: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_POLICY_NC_NOTE');
6661:
6662: FND_MESSAGE.Set_Token('ORIG_REPORT_NUMBER', l_orig_expense_report_num);
6663: l_mess := FND_MESSAGE.GET;
6664:
6665: ----------------------------------------------------------------
6666: l_debug_info := 'Set Policy Non-Compliance note';
6667: ----------------------------------------------------------------
7277: l_debug_info := 'Set #FROM_ROLE to AP';
7278: ----------------------------------------------------------------
7279: SetFromRoleAP(p_item_type, l_item_key, p_actid, p_funmode, p_result);
7280:
7281: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_POLICY_MR_NOTE');
7282:
7283: FND_MESSAGE.Set_Token('ORIG_REPORT_NUMBER', l_orig_expense_report_num);
7284: l_mess := FND_MESSAGE.GET;
7285:
7279: SetFromRoleAP(p_item_type, l_item_key, p_actid, p_funmode, p_result);
7280:
7281: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_POLICY_MR_NOTE');
7282:
7283: FND_MESSAGE.Set_Token('ORIG_REPORT_NUMBER', l_orig_expense_report_num);
7284: l_mess := FND_MESSAGE.GET;
7285:
7286: ----------------------------------------------------------------
7287: l_debug_info := 'Set Missing receipts note';
7280:
7281: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_POLICY_MR_NOTE');
7282:
7283: FND_MESSAGE.Set_Token('ORIG_REPORT_NUMBER', l_orig_expense_report_num);
7284: l_mess := FND_MESSAGE.GET;
7285:
7286: ----------------------------------------------------------------
7287: l_debug_info := 'Set Missing receipts note';
7288: ----------------------------------------------------------------
7817: ---------------------------------------------
7818: l_debug_info := 'Loop in Approval Hierarchy';
7819: ---------------------------------------------
7820: -- 3257576
7821: FND_MESSAGE.Set_Name('SQLAP', 'AP_WEB_APRVL_HIERARCHY_LOOP');
7822: p_error_message := FND_MESSAGE.Get;
7823: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_INSTR6');
7824: p_instructions := FND_MESSAGE.Get;
7825: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_SPL_INSTR');
7818: l_debug_info := 'Loop in Approval Hierarchy';
7819: ---------------------------------------------
7820: -- 3257576
7821: FND_MESSAGE.Set_Name('SQLAP', 'AP_WEB_APRVL_HIERARCHY_LOOP');
7822: p_error_message := FND_MESSAGE.Get;
7823: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_INSTR6');
7824: p_instructions := FND_MESSAGE.Get;
7825: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_SPL_INSTR');
7826: p_special_instr := FND_MESSAGE.Get;
7819: ---------------------------------------------
7820: -- 3257576
7821: FND_MESSAGE.Set_Name('SQLAP', 'AP_WEB_APRVL_HIERARCHY_LOOP');
7822: p_error_message := FND_MESSAGE.Get;
7823: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_INSTR6');
7824: p_instructions := FND_MESSAGE.Get;
7825: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_SPL_INSTR');
7826: p_special_instr := FND_MESSAGE.Get;
7827: return;
7820: -- 3257576
7821: FND_MESSAGE.Set_Name('SQLAP', 'AP_WEB_APRVL_HIERARCHY_LOOP');
7822: p_error_message := FND_MESSAGE.Get;
7823: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_INSTR6');
7824: p_instructions := FND_MESSAGE.Get;
7825: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_SPL_INSTR');
7826: p_special_instr := FND_MESSAGE.Get;
7827: return;
7828: END IF;
7821: FND_MESSAGE.Set_Name('SQLAP', 'AP_WEB_APRVL_HIERARCHY_LOOP');
7822: p_error_message := FND_MESSAGE.Get;
7823: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_INSTR6');
7824: p_instructions := FND_MESSAGE.Get;
7825: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_SPL_INSTR');
7826: p_special_instr := FND_MESSAGE.Get;
7827: return;
7828: END IF;
7829:
7822: p_error_message := FND_MESSAGE.Get;
7823: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_INSTR6');
7824: p_instructions := FND_MESSAGE.Get;
7825: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_SPL_INSTR');
7826: p_special_instr := FND_MESSAGE.Get;
7827: return;
7828: END IF;
7829:
7830: /*Bug 2492342 : Adding the manager to the table and checking whether
7839: ---------------------------------------------
7840: l_debug_info := 'Loop in Approval Hierarchy';
7841: ---------------------------------------------
7842: -- 3257576
7843: FND_MESSAGE.Set_Name('SQLAP', 'AP_WEB_APRVL_HIERARCHY_LOOP');
7844: p_error_message := FND_MESSAGE.Get;
7845: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_INSTR6');
7846: p_instructions := FND_MESSAGE.Get;
7847: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_SPL_INSTR');
7840: l_debug_info := 'Loop in Approval Hierarchy';
7841: ---------------------------------------------
7842: -- 3257576
7843: FND_MESSAGE.Set_Name('SQLAP', 'AP_WEB_APRVL_HIERARCHY_LOOP');
7844: p_error_message := FND_MESSAGE.Get;
7845: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_INSTR6');
7846: p_instructions := FND_MESSAGE.Get;
7847: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_SPL_INSTR');
7848: p_special_instr := FND_MESSAGE.Get;
7841: ---------------------------------------------
7842: -- 3257576
7843: FND_MESSAGE.Set_Name('SQLAP', 'AP_WEB_APRVL_HIERARCHY_LOOP');
7844: p_error_message := FND_MESSAGE.Get;
7845: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_INSTR6');
7846: p_instructions := FND_MESSAGE.Get;
7847: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_SPL_INSTR');
7848: p_special_instr := FND_MESSAGE.Get;
7849: return;
7842: -- 3257576
7843: FND_MESSAGE.Set_Name('SQLAP', 'AP_WEB_APRVL_HIERARCHY_LOOP');
7844: p_error_message := FND_MESSAGE.Get;
7845: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_INSTR6');
7846: p_instructions := FND_MESSAGE.Get;
7847: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_SPL_INSTR');
7848: p_special_instr := FND_MESSAGE.Get;
7849: return;
7850: END IF;
7843: FND_MESSAGE.Set_Name('SQLAP', 'AP_WEB_APRVL_HIERARCHY_LOOP');
7844: p_error_message := FND_MESSAGE.Get;
7845: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_INSTR6');
7846: p_instructions := FND_MESSAGE.Get;
7847: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_SPL_INSTR');
7848: p_special_instr := FND_MESSAGE.Get;
7849: return;
7850: END IF;
7851:
7844: p_error_message := FND_MESSAGE.Get;
7845: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_INSTR6');
7846: p_instructions := FND_MESSAGE.Get;
7847: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_APPROVER_SPL_INSTR');
7848: p_special_instr := FND_MESSAGE.Get;
7849: return;
7850: END IF;
7851:
7852: END LOOP;
8618: 'WF_NOTE');
8619:
8620: IF (l_rejection_reason IS NULL OR
8621: replace(l_rejection_reason, ' ', '') = '') THEN
8622: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_REASON_PROVIDED');
8623: WF_ENGINE.SetItemAttrText(p_item_type,
8624: p_item_key,
8625: 'WF_NOTE',
8626: FND_MESSAGE.Get);
8622: FND_MESSAGE.Set_Name('SQLAP', 'OIE_NO_REASON_PROVIDED');
8623: WF_ENGINE.SetItemAttrText(p_item_type,
8624: p_item_key,
8625: 'WF_NOTE',
8626: FND_MESSAGE.Get);
8627:
8628: END IF;
8629:
8630:
9015: l_colon := instr(document, tr_end,-1);
9016: document := substr(document,1,l_colon+4);
9017: document := document || table_end || indent_end;
9018:
9019: FND_MESSAGE.SET_NAME('SQLAP','AP_WEB_EXP_UNABLE_TO_SHOWLINES');
9020: l_message := FND_MESSAGE.GET;
9021: document := document || table_start;
9022: document := document || tr_start || '&' || 'nbsp;' || tr_end;
9023: document := document || tr_start || '&' || 'nbsp;' || tr_end;
9016: document := substr(document,1,l_colon+4);
9017: document := document || table_end || indent_end;
9018:
9019: FND_MESSAGE.SET_NAME('SQLAP','AP_WEB_EXP_UNABLE_TO_SHOWLINES');
9020: l_message := FND_MESSAGE.GET;
9021: document := document || table_start;
9022: document := document || tr_start || '&' || 'nbsp;' || tr_end;
9023: document := document || tr_start || '&' || 'nbsp;' || tr_end;
9024: document := document || tr_start || td_start || l_message || td_end || tr_end;
9278: l_colon := instr(document, '',-1);
9279: document := substr(document,1,l_colon+4);
9280: document := document || '
';
9281:
9282: FND_MESSAGE.SET_NAME('SQLAP','AP_WEB_EXP_UNABLE_TO_SHOWLINES');
9283: l_message := FND_MESSAGE.GET;
9284: document := document || '
' || l_message || ' |