PACKAGE: APPS.PA_STATUS

Source

1 PACKAGE pa_status AUTHID CURRENT_USER as
2 /* $Header: PAXVPS1S.pls 115.0 99/07/16 15:38:02 porting ship $   */
3 --==============================================================
4 
5 --
6 -- Define Global Variables, Functions and Procedure
7 --
8 
9 -- Define Global Variables
10 -- Global Record
11 	TYPE GlobalVars IS RECORD
12 	(	ProjectId			NUMBER(15)
13 		, TaskId				NUMBER(15)
14 		, RsrcListId			NUMBER(15)
15 		, RsrcMemberId			NUMBER(15)
16 		, CostBgtCode			VARCHAR2(30)
17 		, RevBgtCode			VARCHAR2(30)
18 		, StartDate			DATE
19 		, EndDate			DATE
20                 , Get_Factor                    NUMBER
21 
22 	);
23 
24 GlobVars	GlobalVars;
25 
26 --
27 ------------------------------------------------------------------------------------------
28 -- Define Functions to help pass Global Variables from to Views
29 ------------------------------------------------------------------------------------------
30 --
31 
32 --  Derive Project Id
33 	FUNCTION GetProjId RETURN NUMBER;
34 	pragma RESTRICT_REFERENCES  ( GetProjId, WNDS, WNPS );
35 
36 --  Derive Task Id
37 	FUNCTION GetTaskId RETURN NUMBER;
38 	pragma RESTRICT_REFERENCES  ( GetTaskId, WNDS, WNPS );
39 
40 --  Derive Resource List Id
41 	FUNCTION GetRsrcListId RETURN NUMBER;
42 	pragma RESTRICT_REFERENCES  ( GetRsrcListId, WNDS, WNPS );
43 
44 --  Derive Resource List Member Id
45 	FUNCTION GetRsrcMemberId RETURN NUMBER;
46 	pragma RESTRICT_REFERENCES  (GetRsrcMemberId , WNDS, WNPS );
47 
48 --  Derive Cost Budget Code
49 	FUNCTION GetCostBgtCode RETURN VARCHAR2;
50 	pragma RESTRICT_REFERENCES  ( GetCostBgtCode, WNDS, WNPS );
51 
52 --  Derive Revenue Budget Code
53 	FUNCTION GetRevBgtCode RETURN VARCHAR2;
54 	pragma RESTRICT_REFERENCES  ( GetRevBgtCode, WNDS, WNPS );
55 
56 --  Derive Start Date
57 	FUNCTION GetStartDate RETURN DATE;
58 	pragma RESTRICT_REFERENCES  ( GetStartDate, WNDS, WNPS );
59 
60 --  Derive End Date
61 	FUNCTION GetEndDate RETURN DATE;
62 	pragma RESTRICT_REFERENCES  ( GetEndDate, WNDS, WNPS );
63 
64 --  Derive Get_Factor
65         FUNCTION Get_Factor RETURN NUMBER;
66 	pragma RESTRICT_REFERENCES  ( Get_Factor, WNDS, WNPS );
67 
68 --
69 --  Define Procedure to Set Global Variables for Aforementioned Functions
70 --
71 
72 	PROCEDURE  pa_status_driver (
73 				x_project_id			IN 	NUMBER
74 				, x_task_id			IN	NUMBER
75 				, x_resource_list_id 		IN	NUMBER
76 				, x_resource_list_member_id	IN	NUMBER
77 				, x_cost_budget_code  		IN	VARCHAR2
78 				, x_rev_budget_code		IN	VARCHAR2
79 				, x_start_date			IN	DATE
80 				, x_end_date			IN	DATE
81                                 , x_factor                      IN      NUMBER);
82 
83 
84 END pa_status;