PACKAGE: APPS.PA_WBS_PKG

Source

1 PACKAGE pa_wbs_pkg AUTHID CURRENT_USER as
2  -- $Header: PAXWBSS.pls 115.0 99/07/16 15:38:26 porting ship $
3 --==============================================================
4 
5 --
6 -- Define Global Variables, Functions and Procedure
7 --
8 
9 -- Define Global Variables
10 
11 	TYPE GlobalVars IS RECORD
12 	(	  project_id                    NUMBER(15)
13 		, task_number                   VARCHAR2(25)
14 		, task_name                     VARCHAR2(20)
15 		, carrying_out_organization_id  NUMBER(15)
16 		, service_type_code             VARCHAR2(30)
17 		, task_manager_person_id        NUMBER(9)
18 		, wbs_level                     NUMBER(3)
19 		, chargeable_flag               VARCHAR2(1)
20 		, billable_flag                 VARCHAR2(1)
21                 , pm_product_code               VARCHAR2(30)
22                 , pm_task_reference             VARCHAR2(25)
23 	);
24 
25 GlobVars	GlobalVars;
26 
27 --
28 ------------------------------------------------------------------------------------------
29 -- Define Functions and Procedures
30 ------------------------------------------------------------------------------------------
31 --
32 
33 --  Derive Project_id
34 	FUNCTION Get_Project_id RETURN NUMBER;
35 	pragma RESTRICT_REFERENCES  ( Get_Project_id, WNDS, WNPS );
36 
37         PROCEDURE Set_Project_id ( x_project_id IN NUMBER);
38 
39 --  Derive Task Number
40 	FUNCTION Get_Task_Number RETURN VARCHAR2;
41 	pragma RESTRICT_REFERENCES  ( Get_Task_Number, WNDS, WNPS );
42 
43         PROCEDURE Set_Task_Number ( x_task_number IN VARCHAR2);
44 
45 --  Derive Task Name
46 	FUNCTION Get_Task_Name RETURN VARCHAR2;
47 	pragma RESTRICT_REFERENCES  ( Get_Task_Name, WNDS, WNPS );
48 
49         PROCEDURE Set_Task_Name ( x_task_name IN VARCHAR2);
50 
51 --  Derive Organization_id
52 	FUNCTION Get_Organization_id RETURN NUMBER;
53 	pragma RESTRICT_REFERENCES  ( Get_Organization_id, WNDS, WNPS );
54 
55         PROCEDURE Set_Organization_id ( x_carrying_out_organization_id IN NUMBER);
56 
57 --  Derive Service Code
58 	FUNCTION Get_Service_Code RETURN VARCHAR2;
59 	pragma RESTRICT_REFERENCES  ( Get_Service_Code, WNDS, WNPS );
60 
61         PROCEDURE Set_Service_Code ( x_service_type_code IN VARCHAR2);
62 
63 --  Derive Manager_id
64 	FUNCTION Get_Manager_id RETURN NUMBER;
65 	pragma RESTRICT_REFERENCES  ( Get_Manager_id, WNDS, WNPS );
66 
67         PROCEDURE Set_Manager_id ( x_task_manager_person_id IN NUMBER);
68 
69 --  Derive WBS Level
70 	FUNCTION Get_wbs_level RETURN NUMBER;
71 	pragma RESTRICT_REFERENCES  ( Get_wbs_level, WNDS, WNPS );
72 
73         PROCEDURE Set_wbs_level ( x_wbs_level IN NUMBER);
74 
75 --  Derive Chargeable flag
76 	FUNCTION Get_Chargeable_flag RETURN VARCHAR2;
77 	pragma RESTRICT_REFERENCES  ( Get_Chargeable_flag, WNDS, WNPS );
78 
79         PROCEDURE Set_Chargeable_flag ( x_chargeable_flag IN VARCHAR2);
80 
81 --  Derive Billable flag
82 	FUNCTION Get_Billable_flag RETURN VARCHAR2;
83 	pragma RESTRICT_REFERENCES  ( Get_Billable_flag, WNDS, WNPS );
84 
85         PROCEDURE Set_Billable_flag ( x_billable_flag IN VARCHAR2);
86 
87 --  Derive PM Product Code
88 	FUNCTION Get_Product_Code RETURN VARCHAR2;
89 	pragma RESTRICT_REFERENCES  ( Get_Product_Code, WNDS, WNPS );
90 
91         PROCEDURE Set_Product_Code ( x_product_code IN VARCHAR2);
92 
93 --  Derive PM Task Reference
94 	FUNCTION Get_Task_Reference RETURN VARCHAR2;
95 	pragma RESTRICT_REFERENCES  ( Get_Task_Reference, WNDS, WNPS );
96 
97         PROCEDURE Set_Task_Reference ( x_task_reference IN VARCHAR2);
98 
99 
100 END pa_wbs_pkg;