DBA Data[Home] [Help]

PACKAGE BODY: APPS.AP_APXINPSR_XMLP_PKG

Source


1 PACKAGE BODY AP_APXINPSR_XMLP_PKG AS
2 /* $Header: APXINPSRB.pls 120.1 2011/03/03 11:27:04 asansari ship $ */
3   FUNCTION GET_BASE_CURR_DATA RETURN BOOLEAN IS
4     BASE_CURR AP_SYSTEM_PARAMETERS.BASE_CURRENCY_CODE%TYPE;
5     PREC FND_CURRENCIES.PRECISION%TYPE;
6     MIN_AU FND_CURRENCIES.MINIMUM_ACCOUNTABLE_UNIT%TYPE;
7     DESCR FND_CURRENCIES.DESCRIPTION%TYPE;
8   BEGIN
9     BASE_CURR := '';
10     PREC := 0;
11     MIN_AU := 0;
12     DESCR := '';
13     SELECT
14       P.BASE_CURRENCY_CODE,
15       C.PRECISION,
16       C.MINIMUM_ACCOUNTABLE_UNIT,
17       C.DESCRIPTION
18     INTO BASE_CURR,PREC,MIN_AU,DESCR
19     FROM
20       AP_SYSTEM_PARAMETERS P,
21       FND_CURRENCIES C
22     WHERE P.BASE_CURRENCY_CODE = C.CURRENCY_CODE;
23     C_BASE_CURRENCY_CODE := BASE_CURR;
24     C_BASE_PRECISION := PREC;
25     C_BASE_MIN_ACCT_UNIT := MIN_AU;
26     C_BASE_DESCRIPTION := DESCR;
27     RETURN (TRUE);
28     RETURN NULL;
29   EXCEPTION
30     WHEN OTHERS THEN
31       RETURN (FALSE);
32   END GET_BASE_CURR_DATA;
33 
34   FUNCTION CUSTOM_INIT RETURN BOOLEAN IS
35   BEGIN
36     --C_VENDOR_DYNAMIC_SQL := '';
37     C_VENDOR_DYNAMIC_SQL := ' ';
38     --C_INVOICE_DYNAMIC_SQL := '';
39     C_INVOICE_DYNAMIC_SQL := ' ';
40     IF P_VENDOR_ID IS NOT NULL THEN
41       C_VENDOR_DYNAMIC_SQL := C_VENDOR_DYNAMIC_SQL || ' AND  v.vendor_id = ' || P_VENDOR_ID || ' ';
42     END IF;
43     IF P_VENDOR_TYPE_LOOKUP_CODE IS NOT NULL THEN
44       C_VENDOR_DYNAMIC_SQL := C_VENDOR_DYNAMIC_SQL || ' AND  v.vendor_type_lookup_code = ''' ||
45       P_VENDOR_TYPE_LOOKUP_CODE || '''';
46     END IF;
47     IF P_PREPAYMENT_TYPE = 'TEMPORARY' THEN
48       C_VENDOR_DYNAMIC_SQL := C_VENDOR_DYNAMIC_SQL || ' AND  i.earliest_settlement_date is not null ';
49     ELSE
50       C_VENDOR_DYNAMIC_SQL := C_VENDOR_DYNAMIC_SQL || ' AND  i.earliest_settlement_date is null ';
51     END IF;
52     IF P_FROM_DATE IS NOT NULL THEN
53       C_INVOICE_DYNAMIC_SQL := C_INVOICE_DYNAMIC_SQL || ' AND i.invoice_date >= ''' || TO_CHAR(P_FROM_DATE) || '''';
54       C_VENDOR_DYNAMIC_SQL := C_VENDOR_DYNAMIC_SQL || ' AND i.invoice_date >= ''' || TO_CHAR(P_FROM_DATE) || '''';
55     END IF;
56     IF P_TO_DATE IS NOT NULL THEN
57       C_INVOICE_DYNAMIC_SQL := C_INVOICE_DYNAMIC_SQL || ' AND i.invoice_date <= ''' || TO_CHAR(P_TO_DATE) || '''';
58       C_VENDOR_DYNAMIC_SQL := C_VENDOR_DYNAMIC_SQL || ' AND i.invoice_date <= ''' || TO_CHAR(P_TO_DATE) || '''';
59     END IF;
60     IF P_PREPAYMENT_TYPE = 'TEMPORARY' THEN
61       C_INVOICE_DYNAMIC_SQL := C_INVOICE_DYNAMIC_SQL || ' AND ( ( i.invoice_type_lookup_code =  ''PREPAYMENT'' '
62       || '         AND  i.earliest_settlement_date is not null ' || '         AND
63       AP_PREPAY_UTILS_PKG.get_prepay_amount_remaining( i.invoice_id) > 0 ) ';
64     ELSE
65       C_INVOICE_DYNAMIC_SQL := C_INVOICE_DYNAMIC_SQL || ' AND ( ( i.invoice_type_lookup_code =  ''PREPAYMENT'' '
66       || '         AND  i.earliest_settlement_date is null ' || '         AND
67       AP_PREPAY_UTILS_PKG.get_prepay_amount_remaining( i.invoice_id) > 0 ) ';
68     END IF;
69     IF P_INCLUDE_CREDIT = 'Y' THEN
70       IF P_INCLUDE_INVOICE = 'Y' THEN
71         C_INVOICE_DYNAMIC_SQL := C_INVOICE_DYNAMIC_SQL || ' OR ( i.payment_status_flag IN (''P'', ''N'') AND '
72         || ' i.invoice_type_lookup_code <> ''PREPAYMENT'' ) ) ';
73       ELSE
74         C_INVOICE_DYNAMIC_SQL := C_INVOICE_DYNAMIC_SQL || ' OR ( i.payment_status_flag IN (''P'', ''N'') AND '
75         || ' i.invoice_type_lookup_code IN (''CREDIT'',''DEBIT'')) )';
76       END IF;
77     ELSE
78       IF P_INCLUDE_INVOICE = 'Y' THEN
79         C_INVOICE_DYNAMIC_SQL := C_INVOICE_DYNAMIC_SQL || ' OR ( i.payment_status_flag IN (''P'', ''N'') AND '
80         || ' i.invoice_type_lookup_code not IN (''CREDIT'',''DEBIT'', ''PREPAYMENT'')) ) ';
81       ELSE
82         C_INVOICE_DYNAMIC_SQL := C_INVOICE_DYNAMIC_SQL || ' ) ';
83       END IF;
84     END IF;
85     RETURN (TRUE);
86     RETURN NULL;
87   EXCEPTION
88     WHEN OTHERS THEN
89       RETURN (FALSE);
90   END CUSTOM_INIT;
91 
92   FUNCTION GET_COVER_PAGE_VALUES RETURN BOOLEAN IS
93   BEGIN
94     RETURN (TRUE);
95     RETURN NULL;
96   EXCEPTION
97     WHEN OTHERS THEN
98       RETURN (FALSE);
99   END GET_COVER_PAGE_VALUES;
100 
101   FUNCTION GET_NLS_STRINGS RETURN BOOLEAN IS
102     NLS_ALL AP_LOOKUP_CODES.DISPLAYED_FIELD%TYPE;
103     NLS_YES FND_LOOKUPS.MEANING%TYPE;
104     NLS_NO FND_LOOKUPS.MEANING%TYPE;
105     NLS_UNPAID AP_LOOKUP_CODES.DISPLAYED_FIELD%TYPE;
106     HEADER_VENDOR_TYPE AP_LOOKUP_CODES.DISPLAYED_FIELD%TYPE;
107     HEADER_VENDOR_NAME AP_LOOKUP_CODES.DISPLAYED_FIELD%TYPE;
108     HEADER_SHOW_PREPAY_DIST FND_LOOKUPS.MEANING%TYPE;
109     HEADER_INCLUDE_INVOICE FND_LOOKUPS.MEANING%TYPE;
110     HEADER_INCLUDE_CREDIT FND_LOOKUPS.MEANING%TYPE;
111     HEADER_PREPAYMENT_TYPE FND_LOOKUPS.MEANING%TYPE;
112     CALENDAR_AWARE_ALT     NUMBER := 2;  --Bug11774150
113   BEGIN
114     NLS_ALL := '';
115     NLS_YES := '';
116     NLS_NO := '';
117     SELECT
118       LY.MEANING,
119       LN.MEANING,
120       LA.DISPLAYED_FIELD,
121       L4.DISPLAYED_FIELD,
122       L6.MEANING,
123       L7.MEANING,
124       L8.MEANING
125     INTO NLS_YES,NLS_NO,NLS_ALL,NLS_UNPAID,HEADER_SHOW_PREPAY_DIST,HEADER_INCLUDE_INVOICE,HEADER_INCLUDE_CREDIT
126     FROM
127       FND_LOOKUPS LY,
128       FND_LOOKUPS LN,
129       AP_LOOKUP_CODES LA,
130       AP_LOOKUP_CODES L4,
131       FND_LOOKUPS L6,
132       FND_LOOKUPS L7,
133       FND_LOOKUPS L8
134     WHERE LY.LOOKUP_TYPE = 'YES_NO'
135       AND LY.LOOKUP_CODE = 'Y'
136       AND LN.LOOKUP_TYPE = 'YES_NO'
137       AND LN.LOOKUP_CODE = 'N'
138       AND LA.LOOKUP_TYPE = 'NLS REPORT PARAMETER'
139       AND LA.LOOKUP_CODE = 'ALL'
140       AND L4.LOOKUP_TYPE = 'PREPAY STATUS'
141       AND L4.LOOKUP_CODE = 'UNPAID'
142       AND L6.LOOKUP_TYPE = 'YES_NO'
143       AND L6.LOOKUP_CODE = NVL(P_PREPAYMENT_LINE_FLAG
144        ,'Y')
145       AND L7.LOOKUP_TYPE = 'YES_NO'
146       AND L7.LOOKUP_CODE = NVL(P_INCLUDE_INVOICE
147        ,'Y')
148       AND L8.LOOKUP_TYPE = 'YES_NO'
149       AND L8.LOOKUP_CODE = NVL(P_INCLUDE_CREDIT
150        ,'Y');
151     IF P_VENDOR_TYPE_LOOKUP_CODE IS NULL THEN
152       HEADER_VENDOR_TYPE := NLS_ALL;
153     ELSE
154       SELECT
155         DISPLAYED_FIELD
156       INTO HEADER_VENDOR_TYPE
157       FROM
158         PO_LOOKUP_CODES
159       WHERE LOOKUP_TYPE = 'VENDOR TYPE'
160         AND LOOKUP_CODE = P_VENDOR_TYPE_LOOKUP_CODE;
161     END IF;
162     IF P_VENDOR_ID IS NULL THEN
163       HEADER_VENDOR_NAME := NLS_ALL;
164     ELSE
165       SELECT
166         VENDOR_NAME
167       INTO HEADER_VENDOR_NAME
168       FROM
169         PO_VENDORS
170       WHERE VENDOR_ID = P_VENDOR_ID;
171     END IF;
172     SELECT
173       DISPLAYED_FIELD
174     INTO HEADER_PREPAYMENT_TYPE
175     FROM
176       AP_LOOKUP_CODES
177     WHERE LOOKUP_CODE = NVL(P_PREPAYMENT_TYPE
178        ,'TEMPORARY')
179       AND LOOKUP_TYPE = 'PREPAY TYPES';
180     C_NLS_YES := NLS_YES;
181     C_NLS_NO := NLS_NO;
182     C_NLS_ALL := NLS_ALL;
183     C_NLS_UNPAID := NLS_UNPAID;
184     C_HEADER_VENDOR_TYPE := HEADER_VENDOR_TYPE;
185     C_HEADER_VENDOR_NAME := HEADER_VENDOR_NAME;
186     C_HEADER_SHOW_PREPAY_DIST := HEADER_SHOW_PREPAY_DIST;
187     C_HEADER_INCLUDE_INVOICE := HEADER_INCLUDE_INVOICE;
188     C_HEADER_INCLUDE_CREDIT := HEADER_INCLUDE_CREDIT;
189     C_HEADER_PREPAYMENT_TYPE := HEADER_PREPAYMENT_TYPE;
190     C_CALENDAR_AWARE_ALT     := CALENDAR_AWARE_ALT;  --Bug11774150
191     FND_MESSAGE.SET_NAME('SQLAP'
192                         ,'AP_APPRVL_NO_DATA');
193     C_NLS_NO_DATA_EXISTS := FND_MESSAGE.GET;
194     FND_MESSAGE.SET_NAME('SQLAP'
195                         ,'AP_ALL_END_OF_REPORT');
196     C_NLS_END_OF_REPORT := FND_MESSAGE.GET;
197     --C_NLS_NO_DATA_EXISTS := '*** ' || C_NLS_NO_DATA_EXISTS || ' ***';
198     --C_NLS_END_OF_REPORT := '*** ' || C_NLS_END_OF_REPORT || ' ***';
199     RETURN (TRUE);
200     RETURN NULL;
201   EXCEPTION
202     WHEN OTHERS THEN
203       RETURN (FALSE);
204   END GET_NLS_STRINGS;
205 
206   FUNCTION BEFOREREPORT RETURN BOOLEAN IS
207   BEGIN
208     DECLARE
209       INIT_FAILURE EXCEPTION;
210     BEGIN
211       C_REPORT_START_DATE := SYSDATE;
212       P_CONC_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
213       /*SRW.USER_EXIT('FND SRWINIT')*/NULL;
214       IF (P_DEBUG_SWITCH in ('y','Y')) THEN
215         /*SRW.MESSAGE('1'
216                    ,'After SRWINIT')*/NULL;
217       END IF;
218       SELECT
219         AP.SET_OF_BOOKS_ID,
220         GL.CHART_OF_ACCOUNTS_ID
221       INTO P_SET_OF_BOOKS_ID,P_CHART_OF_ACCOUNTS_ID
222       FROM
223         AP_SYSTEM_PARAMETERS AP,
224         GL_SETS_OF_BOOKS GL
225       WHERE AP.SET_OF_BOOKS_ID = GL.SET_OF_BOOKS_ID;
226       IF (P_DEBUG_SWITCH in ('y','Y')) THEN
227         /*SRW.MESSAGE('2'
228                    ,'After initialize parameter p_set_of_books_id and p_charge_of_accounts_id')*/NULL;
229       END IF;
230       IF (GET_COMPANY_NAME <> TRUE) THEN
231         RAISE INIT_FAILURE;
232       END IF;
233       IF (P_DEBUG_SWITCH in ('y','Y')) THEN
234         /*SRW.MESSAGE('3'
235                    ,'After Get_Company_Name')*/NULL;
236       END IF;
237       IF (GET_NLS_STRINGS <> TRUE) THEN
238         RAISE INIT_FAILURE;
239       END IF;
240       IF (P_DEBUG_SWITCH in ('y','Y')) THEN
241         /*SRW.MESSAGE('4'
242                    ,'After Get_NLS_Strings')*/NULL;
243       END IF;
244       IF (GET_BASE_CURR_DATA <> TRUE) THEN
245         RAISE INIT_FAILURE;
246       END IF;
247       IF (P_DEBUG_SWITCH in ('y','Y')) THEN
248         /*SRW.MESSAGE('5'
249                    ,'After Get_Base_Curr_Data')*/NULL;
250       END IF;
251       IF (CUSTOM_INIT <> TRUE) THEN
252         RAISE INIT_FAILURE;
253       END IF;
254       IF (P_DEBUG_SWITCH in ('y','Y')) THEN
255         /*SRW.MESSAGE('7'
256                    ,'After Custom_Init')*/NULL;
257       END IF;
258       IF (P_DEBUG_SWITCH in ('y','Y')) THEN
259         /*SRW.BREAK*/NULL;
260       END IF;
261       RETURN (TRUE);
262     EXCEPTION
263       WHEN OTHERS THEN
264         /*RAISE SRW.PROGRAM_ABORT*/RAISE_APPLICATION_ERROR(-20101,null);
265     END;
266     RETURN (TRUE);
267   END BEFOREREPORT;
268 
269   FUNCTION AFTERREPORT RETURN BOOLEAN IS
270   BEGIN
271     BEGIN
272       /*SRW.USER_EXIT('FND SRWEXIT')*/NULL;
273       IF (P_DEBUG_SWITCH = 'Y') THEN
274         /*SRW.MESSAGE('20'
275                    ,'After SRWEXIT')*/NULL;
276       END IF;
277     EXCEPTION
278       WHEN OTHERS THEN
279         /*RAISE SRW.PROGRAM_ABORT*/RAISE_APPLICATION_ERROR(-20101,null);
280     END;
281     RETURN (TRUE);
282   END AFTERREPORT;
283 
284   FUNCTION GET_COMPANY_NAME RETURN BOOLEAN IS
285     L_CHART_OF_ACCOUNTS_ID GL_SETS_OF_BOOKS.CHART_OF_ACCOUNTS_ID%TYPE;
286     L_NAME GL_SETS_OF_BOOKS.NAME%TYPE;
287     L_SOB_ID NUMBER;
288   BEGIN
289     IF P_SET_OF_BOOKS_ID IS NOT NULL THEN
290       L_SOB_ID := P_SET_OF_BOOKS_ID;
291       SELECT
292         NAME,
293         CHART_OF_ACCOUNTS_ID
294       INTO L_NAME,L_CHART_OF_ACCOUNTS_ID
295       FROM
296         GL_SETS_OF_BOOKS
297       WHERE SET_OF_BOOKS_ID = L_SOB_ID;
298       C_COMPANY_NAME_HEADER := L_NAME;
299       C_CHART_OF_ACCOUNTS_ID := L_CHART_OF_ACCOUNTS_ID;
300     END IF;
301     RETURN (TRUE);
302     RETURN NULL;
303   EXCEPTION
304     WHEN OTHERS THEN
305       RETURN (FALSE);
306   END GET_COMPANY_NAME;
307 
308   FUNCTION C_AMOUNT_FOR_SUMFORMULA(C_INVOICE_TYPE_LOOKUP_CODE IN VARCHAR2
309                                   ,C_AMOUNT_REMAINING IN NUMBER
310                                   ,C_PAYMENT_STATUS_FLAG IN VARCHAR2
311                                   ,C_EARLIEST_SETTLEMENT_DATE IN VARCHAR2
312                                   ,C_PAYMENT_CROSS_RATE IN NUMBER
313                                   ,C_INVOICE_CURRENCY_CODE IN VARCHAR2) RETURN NUMBER IS
314   BEGIN
315     BEGIN
316       /*SRW.REFERENCE(C_INVOICE_TYPE_LOOKUP_CODE)*/NULL;
317       /*SRW.REFERENCE(C_AMOUNT_REMAINING)*/NULL;
318       /*SRW.REFERENCE(C_PAYMENT_STATUS_FLAG)*/NULL;
319       /*SRW.REFERENCE(C_EARLIEST_SETTLEMENT_DATE)*/NULL;
320       /*SRW.REFERENCE(C_PAYMENT_CROSS_RATE)*/NULL;
321       /*SRW.REFERENCE(C_INVOICE_CURRENCY_CODE)*/NULL;
322       IF C_INVOICE_TYPE_LOOKUP_CODE = 'PREPAYMENT' THEN
323         IF C_EARLIEST_SETTLEMENT_DATE = 'PERMANENT' THEN
324           IF C_PAYMENT_STATUS_FLAG = 'Y' THEN
325             RETURN (C_AMOUNT_REMAINING);
326           ELSE
327             RETURN (0);
328           END IF;
329         ELSE
330           IF C_PAYMENT_STATUS_FLAG = 'Y' THEN
331             RETURN (C_AMOUNT_REMAINING * -1);
332           ELSE
333             RETURN (0);
334           END IF;
335         END IF;
336       ELSE
337         RETURN (AP_UTILITIES_PKG.AP_ROUND_CURRENCY(C_AMOUNT_REMAINING / C_PAYMENT_CROSS_RATE
338                                                  ,C_INVOICE_CURRENCY_CODE));
339       END IF;
340     END;
341     RETURN NULL;
342   END C_AMOUNT_FOR_SUMFORMULA;
343 
344   FUNCTION C_AMOUNT_REMAINING_CONVERTFORM(C_PAYMENT_CROSS_RATE IN NUMBER
345                                          ,C_AMOUNT_REMAINING IN NUMBER
346                                          ,C_INVOICE_CURRENCY_CODE IN VARCHAR2
347                                          ,C_INVOICE_TYPE_LOOKUP_CODE IN VARCHAR2) RETURN NUMBER IS
348   BEGIN
349     /*SRW.REFERENCE(C_PAYMENT_CROSS_RATE)*/NULL;
350     /*SRW.REFERENCE(C_AMOUNT_REMAINING)*/NULL;
351     /*SRW.REFERENCE(C_INVOICE_CURRENCY_CODE)*/NULL;
352     /*SRW.REFERENCE(C_INVOICE_TYPE_LOOKUP_CODE)*/NULL;
353     IF C_INVOICE_TYPE_LOOKUP_CODE = 'PREPAYMENT' THEN
354       RETURN (C_AMOUNT_REMAINING);
355     ELSE
356       RETURN (AP_UTILITIES_PKG.AP_ROUND_CURRENCY(C_AMOUNT_REMAINING / C_PAYMENT_CROSS_RATE
357                                                ,C_INVOICE_CURRENCY_CODE));
358     END IF;
359   END C_AMOUNT_REMAINING_CONVERTFORM;
360 
361   FUNCTION C_AMOUNT_REMAINING_DSPFORMULA(C_INVOICE_TYPE_LOOKUP_CODE IN VARCHAR2
362                                         ,C_PAYMENT_STATUS_FLAG IN VARCHAR2
363                                         ,C_AMOUNT_REMAINING_TRANS IN VARCHAR2) RETURN CHAR IS
364   BEGIN
365     /*SRW.REFERENCE(C_INVOICE_TYPE_LOOKUP_CODE)*/NULL;
366     /*SRW.REFERENCE(C_PAYMENT_STATUS_FLAG)*/NULL;
367     /*SRW.REFERENCE(C_AMOUNT_REMAINING_TRANS)*/NULL;
368     /*SRW.REFERENCE(C_NLS_UNPAID)*/NULL;
369     IF C_INVOICE_TYPE_LOOKUP_CODE = 'PREPAYMENT' THEN
370       IF C_PAYMENT_STATUS_FLAG = 'Y' THEN
371         RETURN (C_AMOUNT_REMAINING_TRANS);
372       ELSE
373         RETURN (SUBSTR(C_NLS_UNPAID
374                      ,1
375                      ,17));
376       END IF;
377     ELSE
378       RETURN (C_AMOUNT_REMAINING_TRANS);
379     END IF;
380   END C_AMOUNT_REMAINING_DSPFORMULA;
381 
382   FUNCTION C_NLS_YES_P RETURN VARCHAR2 IS
383   BEGIN
384     RETURN C_NLS_YES;
385   END C_NLS_YES_P;
386 
387   FUNCTION C_NLS_NO_P RETURN VARCHAR2 IS
388   BEGIN
389     RETURN C_NLS_NO;
390   END C_NLS_NO_P;
391 
392   FUNCTION C_NLS_ALL_P RETURN VARCHAR2 IS
393   BEGIN
394     RETURN C_NLS_ALL;
395   END C_NLS_ALL_P;
396 
397   FUNCTION C_NLS_NO_DATA_EXISTS_P RETURN VARCHAR2 IS
398   BEGIN
399     RETURN C_NLS_NO_DATA_EXISTS;
400   END C_NLS_NO_DATA_EXISTS_P;
401 
402   FUNCTION C_NLS_VOID_P RETURN VARCHAR2 IS
403   BEGIN
404     RETURN C_NLS_VOID;
405   END C_NLS_VOID_P;
406 
407   FUNCTION C_NLS_NA_P RETURN VARCHAR2 IS
408   BEGIN
409     RETURN C_NLS_NA;
410   END C_NLS_NA_P;
411 
412   FUNCTION C_NLS_END_OF_REPORT_P RETURN VARCHAR2 IS
413   BEGIN
414     RETURN C_NLS_END_OF_REPORT;
415   END C_NLS_END_OF_REPORT_P;
416 
417   FUNCTION C_REPORT_START_DATE_P RETURN DATE IS
418   BEGIN
419     RETURN C_REPORT_START_DATE;
420   END C_REPORT_START_DATE_P;
421 
422   FUNCTION C_COMPANY_NAME_HEADER_P RETURN VARCHAR2 IS
423   BEGIN
424     RETURN C_COMPANY_NAME_HEADER;
425   END C_COMPANY_NAME_HEADER_P;
426 
427   FUNCTION C_BASE_CURRENCY_CODE_P RETURN VARCHAR2 IS
428   BEGIN
429     RETURN C_BASE_CURRENCY_CODE;
430   END C_BASE_CURRENCY_CODE_P;
431 
432   FUNCTION C_BASE_PRECISION_P RETURN NUMBER IS
433   BEGIN
434     RETURN C_BASE_PRECISION;
435   END C_BASE_PRECISION_P;
436 
437   FUNCTION C_BASE_MIN_ACCT_UNIT_P RETURN NUMBER IS
438   BEGIN
439     RETURN C_BASE_MIN_ACCT_UNIT;
440   END C_BASE_MIN_ACCT_UNIT_P;
441 
442   FUNCTION C_BASE_DESCRIPTION_P RETURN VARCHAR2 IS
443   BEGIN
444     RETURN C_BASE_DESCRIPTION;
445   END C_BASE_DESCRIPTION_P;
446 
447   FUNCTION C_CHART_OF_ACCOUNTS_ID_P RETURN NUMBER IS
448   BEGIN
449     RETURN C_CHART_OF_ACCOUNTS_ID;
450   END C_CHART_OF_ACCOUNTS_ID_P;
451 
452   --Added for Bug11774150
453   FUNCTION C_CALENDAR_AWARE_ALT_P RETURN NUMBER IS
454   BEGIN
455     RETURN C_CALENDAR_AWARE_ALT;
456   END C_CALENDAR_AWARE_ALT_P;
457 
458   FUNCTION APPLICATIONS_TEMPLATE_REPORT_P RETURN VARCHAR2 IS
459   BEGIN
460     RETURN APPLICATIONS_TEMPLATE_REPORT;
461   END APPLICATIONS_TEMPLATE_REPORT_P;
462 
463   FUNCTION C_VENDOR_DYNAMIC_SQL_P RETURN VARCHAR2 IS
464   BEGIN
465     RETURN C_VENDOR_DYNAMIC_SQL;
466   END C_VENDOR_DYNAMIC_SQL_P;
467 
468   FUNCTION C_INVOICE_DYNAMIC_SQL_P RETURN VARCHAR2 IS
469   BEGIN
470     RETURN C_INVOICE_DYNAMIC_SQL;
471   END C_INVOICE_DYNAMIC_SQL_P;
472 
473   FUNCTION C_HEADER_VENDOR_TYPE_P RETURN VARCHAR2 IS
474   BEGIN
475     RETURN C_HEADER_VENDOR_TYPE;
476   END C_HEADER_VENDOR_TYPE_P;
477 
478   FUNCTION C_HEADER_VENDOR_NAME_P RETURN VARCHAR2 IS
479   BEGIN
480     RETURN C_HEADER_VENDOR_NAME;
481   END C_HEADER_VENDOR_NAME_P;
482 
483   FUNCTION C_HEADER_INCLUDE_INVOICE_P RETURN VARCHAR2 IS
484   BEGIN
485     RETURN C_HEADER_INCLUDE_INVOICE;
486   END C_HEADER_INCLUDE_INVOICE_P;
487 
488   FUNCTION C_HEADER_INCLUDE_CREDIT_P RETURN VARCHAR2 IS
489   BEGIN
490     RETURN C_HEADER_INCLUDE_CREDIT;
491   END C_HEADER_INCLUDE_CREDIT_P;
492 
493   FUNCTION C_NLS_UNPAID_P RETURN VARCHAR2 IS
494   BEGIN
495     RETURN C_NLS_UNPAID;
496   END C_NLS_UNPAID_P;
497 
498   FUNCTION C_HEADER_SHOW_PREPAY_DIST_P RETURN VARCHAR2 IS
499   BEGIN
500     RETURN C_HEADER_SHOW_PREPAY_DIST;
501   END C_HEADER_SHOW_PREPAY_DIST_P;
502 
503   FUNCTION C_HEADER_PREPAYMENT_TYPE_P RETURN VARCHAR2 IS
504   BEGIN
505     RETURN C_HEADER_PREPAYMENT_TYPE;
506   END C_HEADER_PREPAYMENT_TYPE_P;
507 
508 END AP_APXINPSR_XMLP_PKG;
509 
510