1: PACKAGE BODY pa_expenditure_inquiry AS
2: -- $Header: PAXEXINB.pls 120.2.12020000.2 2012/07/19 10:03:55 admarath ship $
3: --================================================================
4:
5:
5:
6: -- This function will be used in the view to determine the mode
7: FUNCTION Get_Mode RETURN VARCHAR2 IS
8: BEGIN
9: RETURN(pa_expenditure_inquiry.X_Calling_Mode);
10: END Get_Mode ;
11:
12: FUNCTION Get_expenditure_item_id RETURN NUMBER IS
13: BEGIN
10: END Get_Mode ;
11:
12: FUNCTION Get_expenditure_item_id RETURN NUMBER IS
13: BEGIN
14: RETURN(pa_expenditure_inquiry.X_expenditure_item_id);
15: END Get_expenditure_item_id ;
16:
17: /* Added for bug#9929147 Starts */
18: FUNCTION Get_application_id RETURN NUMBER IS
16:
17: /* Added for bug#9929147 Starts */
18: FUNCTION Get_application_id RETURN NUMBER IS
19: BEGIN
20: RETURN(pa_expenditure_inquiry.X_application_id);
21: END Get_application_id ;
22:
23: FUNCTION Get_source_dist_type RETURN VARCHAR2 IS
24: BEGIN
21: END Get_application_id ;
22:
23: FUNCTION Get_source_dist_type RETURN VARCHAR2 IS
24: BEGIN
25: RETURN(pa_expenditure_inquiry.X_source_dist_type);
26: END Get_source_dist_type ;
27: /*Added for bug#9929147 Ends*/
28: -- This function will be used in the view to determine the criteria(Bug#680401)
29: FUNCTION Get_Criteria RETURN VARCHAR2 IS
27: /*Added for bug#9929147 Ends*/
28: -- This function will be used in the view to determine the criteria(Bug#680401)
29: FUNCTION Get_Criteria RETURN VARCHAR2 IS
30: BEGIN
31: RETURN(pa_expenditure_inquiry.X_Query_criteria);
32: END Get_Criteria ;
33:
34:
35: PROCEDURE pa_expenditure_inquiry_driver (
31: RETURN(pa_expenditure_inquiry.X_Query_criteria);
32: END Get_Criteria ;
33:
34:
35: PROCEDURE pa_expenditure_inquiry_driver (
36: x_Mode IN VARCHAR2) IS
37: BEGIN
38: X_Calling_Mode := x_Mode ;
39: END pa_expenditure_inquiry_driver;
35: PROCEDURE pa_expenditure_inquiry_driver (
36: x_Mode IN VARCHAR2) IS
37: BEGIN
38: X_Calling_Mode := x_Mode ;
39: END pa_expenditure_inquiry_driver;
40:
41: PROCEDURE pa_expenditure_item_driver (
42: x_eiid IN NUMBER) IS
43: BEGIN
160: RAISE ;
161:
162: END pa_get_cdl_details;
163:
164: END pa_expenditure_inquiry ;