1 package PA_BURDEN_COSTING as
2 -- /* $Header: PAXCBCAS.pls 120.1.12000000.3 2007/05/07 07:43:13 byeturi ship $ */
3
4
5 TYPE typ_tbl_eiid IS TABLE OF pa_expenditure_items_all.expenditure_item_id%TYPE INDEX BY BINARY_INTEGER;--Bug #5743708
6 TYPE typ_tbl_cdlln IS TABLE OF pa_cost_distribution_lines_all.line_num%TYPE INDEX BY BINARY_INTEGER;--Bug #5743708
7
8 -- Package holds all the burden cost accounting functions and procedures
9 -- Procedure to update the current pronect_id in package variable
10 PROCEDURE set_current_project_id(x_project_id in number);
11 --PRAGMA RESTRICT_REFERENCES(set_current_project_id, WNDS);
12
13 -- function to retrive the current project id
14 FUNCTION get_current_project_id RETURN NUMBER;
15 --PRAGMA RESTRICT_REFERENCES(get_current_project_id, WNDS, WNPS);
16 PROCEDURE set_current_run_id(x_run_id in number); /*Bug# 2255068*/
17
18 FUNCTION get_current_run_id RETURN pa_cost_distribution_lines_all.burden_sum_source_run_id%TYPE; /*2255068*/
19 --PRAGMA RESTRICT_REFERENCES(get_current_run_id, WNDS, WNPS);
20
21 -- bug : 3699045
22 -- function to retrive the set sponsored flag for a project id
23 PROCEDURE set_current_sponsored_flag(x_project_id in number);
24 -- bug : 3699045
25 -- function to retrive the current sponsored flag
26 FUNCTION get_current_sponsored_flag RETURN varchar2;
27
28 -- Procedure to summarize and create burden expenditure items
29 -- Bug# 1171986 Passing end date parameterto create burden
30 -- expenditure item
31
32 PROCEDURE create_burden_expenditure_item( p_start_project_number in pa_projects_all.segment1%TYPE,/*2255068*/
33 p_end_project_number in pa_projects_all.segment1%TYPE, /*2255068*/
34 x_request_id in number, /*2255068*/
35 x_end_date in varchar2,
36 status in out NOCOPY number,
37 stage in out NOCOPY number,
38 x_run_id in out NOCOPY number);
39
40 procedure create_burden_cmt_transaction( status in out NOCOPY number,
41 stage in out NOCOPY number,
42 x_run_id in out NOCOPY number,
43 x_project_id in number default null); /* bug#2791563 added x_project_id */
44
45 resource_busy exception;
46 --pragma exception_init(resource_busy, -00054);
47
48 /*2933915*/
49 PROCEDURE InsBurdenAudit( p_project_id IN pa_cost_distribution_lines_all.project_id%TYPE,
50 p_request_id IN NUMBER ,
51 p_user_id IN NUMBER,
52 x_status IN OUT NOCOPY NUMBER);
53 /*2933915*/
54
55
56 PROCEDURE populate_gtemp(p_current_run_id NUMBER, p_project_id NUMBER, x_end_date varchar2);--Bug #5743708
57
58 PROCEDURE update_gtemp(l_request_id number); /*added for the bug#5949107*/--Bug #5743708
59
60 end PA_BURDEN_COSTING;