1 PACKAGE BODY PA_MC_FUNDINGS_PKG as
2 /* $Header: PAMRCFPB.pls 120.3 2005/08/23 16:37:06 hsiu noship $ */
3 -- This function returns the sum of RDL and ERDL for project, agreement, task
4 -- and set of books id in reporting.
5 -- parameters
6 -- Input parameters
7 -- Parameters Type Required Description
8 -- p_project_id NUMBER YES Project Id
9 -- p_draft_revenue_num NUMBER YES Draft revenue number
10 -- p_draft_revenue_item_line_num NUMBER YES Draft revenue line number
11 -- p_set_of_books_id NUMBER YES Reporting set of books id
12 -- Out parameters
13 --
14
15 g1_debug_mode varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
16
17 FUNCTION sum_mc_sob_cust_rdl_erdl(
18 p_project_id IN NUMBER,
19 p_draft_revenue_num IN NUMBER,
20 p_draft_revenue_item_line_num IN NUMBER,
21 p_set_of_books_id IN NUMBER
22 ) RETURN NUMBER
23
24 IS
25 BEGIN
26 RETURN 0;
27
28 EXCEPTION
29 WHEN OTHERS THEN
30 PA_DEBUG.Reset_Curr_Function;
31 RAISE;
32
33 END sum_mc_sob_cust_rdl_erdl;
34
35
36
37 -- This function will check that MRC is installed or not if installed it will return true otherwise false.
38 -- Input parameters
39 -- Parameters Type Required Description
40 -- Out parameters
41 -- x_error_code VARCHAR2 YES It stores error message code if current
42 -- operating unit does not have MRC enabled
43 -- for Oracle Projects
44 --
45
46 FUNCTION check_mrc_install(x_error_code OUT NOCOPY VARCHAR2/*file.sql.39*/)
47 RETURN BOOLEAN
48 IS
49 BEGIN
50 RETURN TRUE;
51 EXCEPTION
52 WHEN OTHERS THEN
53 PA_DEBUG.Reset_Curr_Function;
54 RAISE;
55 END check_mrc_install;
56
57
58
59 -- This procedure will populate the mrc funding lines table and mrc summary table
60 -- after converting all the records from primary. This procedure is being called
61 -- from concurrent process.
62 -- Input parameters
63 -- Parameters Type Required Description
64 -- p_upgrade_from_date DATE YES The date from which user wants to upgrade its data.
65 -- Out parameters
66 -- x_return_status VARCHAR2 YES Return status
67 -- x_msg_data VARCHAR2 YES stores error's text
68 -- x_msg_count NUMBER YES Stores number of errors
69 --
70
71 PROCEDURE upgrade_fundings_mrc(
72 p_upgrade_from_date IN DATE,
73 x_return_status OUT NOCOPY VARCHAR2,/*File.sql.39*/
74 x_msg_data OUT NOCOPY VARCHAR2,/*File.sql.39*/
75 x_msg_count OUT NOCOPY NUMBER /*File.sql.39*/
76 )
77
78 IS
79 BEGIN
80
81 NULL;
82
83 END upgrade_fundings_mrc;
84
85
86 END PA_MC_FUNDINGS_PKG;
87