DBA Data[Home] [Help]

PACKAGE BODY: APPS.AP_WEB_OA_DETAIL_PKG

Source


1 PACKAGE BODY AP_WEB_OA_DETAIL_PKG AS
2 /* $Header: apwodtlb.pls 120.6.12020000.2 2012/10/25 07:09:53 preshukl ship $ */
3 
4 PROCEDURE GetEuroCode (p_euro_code OUT NOCOPY FND_CURRENCIES_VL.currency_code%TYPE)
5 IS
6 BEGIN
7     AP_WEB_UTILITIES_PKG.logProcedure('AP_WEB_OA_DETAIL_PKG', 'start GetEuroCode');
8     p_euro_code := GL_CURRENCY_API.get_euro_code();
9     AP_WEB_UTILITIES_PKG.logProcedure('AP_WEB_OA_DETAIL_PKG', 'end GetEuroCode');
10 EXCEPTION
11   WHEN OTHERS THEN
12     p_euro_code := 'EUR';
13 END GetEuroCode;
14 
15 
16 PROCEDURE GetTaxPseudoSegmentDefaults(
17              P_ExpTypeID                IN  AP_EXPENSE_REPORT_PARAMS.parameter_id%TYPE,
18              P_ExpTypeTaxCodeUpdateable IN  OUT NOCOPY VARCHAR2,
19              P_ExpTypeDefaultTaxCode    IN  OUT NOCOPY  ZX_WEBEXP_CLASSIFICATIONS_V.LOOKUP_CODE%TYPE,--bug#14798565
20              p_orgId                    IN  NUMBER)
21 
22 IS
23 BEGIN
24 
25   AP_WEB_UTILITIES_PKG.logProcedure('AP_WEB_OA_DETAIL_PKG', 'start GetTaxPseudoSegmentDefaults');
26   AP_WEB_DFLEX_PKG.GetTaxPseudoSegmentDefaults(p_ExpTypeId,
27                               P_ExpTypeTaxCodeUpdateable,
28                               P_ExpTypeDefaultTaxCode,
29                               p_orgId);
30   AP_WEB_UTILITIES_PKG.logProcedure('AP_WEB_OA_DETAIL_PKG', 'end GetTaxPseudoSegmentDefaults');
31 
32 END GetTaxPseudoSegmentDefaults;
33 
34 
35 END AP_WEB_OA_DETAIL_PKG;