DBA Data[Home] [Help]

PACKAGE: APPS.BOM_RTG_GLOBALS

Source


1 PACKAGE BOM_RTG_Globals AS
2 /* $Header: BOMRGLBS.pls 120.1 2006/06/14 06:09:28 abbhardw noship $*/
3 /**************************************************************************
4 --
5 --  FILENAME
6 --
7 --      BOMRGLBS.pls
8 --
9 --  DESCRIPTION
10 --
11 --      Spec of package BOM_RTG_Globals
12 --
13 --  NOTES
14 --
15 --  HISTORY
16 --  02-AUG-2000 Biao Zhang      Initial Creation
17 --
18 --
19 ****************************************************************************/
20 	G_OPR_CREATE        CONSTANT    VARCHAR2(30) := 'CREATE';
21 	G_OPR_UPDATE        CONSTANT    VARCHAR2(30) := 'UPDATE';
22 	G_OPR_DELETE        CONSTANT    VARCHAR2(30) := 'DELETE';
23 	G_OPR_LOCK          CONSTANT    VARCHAR2(30) := 'LOCK';
24 	G_OPR_NONE          CONSTANT    VARCHAR2(30) := NULL;
25 	G_OPR_CANCEL        CONSTANT    VARCHAR2(30) := 'CANCEL';
26 	G_RECORD_FOUND      CONSTANT    VARCHAR2(1)  := 'F';
27 	G_RECORD_NOT_FOUND  CONSTANT    VARCHAR2(1)  := 'N';
28 	G_MODEL             CONSTANT    NUMBER       := 1;
29 	G_OPTION_CLASS      CONSTANT    NUMBER       := 2;
30 	G_PLANNING          CONSTANT    NUMBER       := 3;
31 	G_STANDARD          CONSTANT    NUMBER       := 4;
32 	G_PRODUCT_FAMILY    CONSTANT    NUMBER       := 5;
33 	G_FLOW_RTG          CONSTANT    NUMBER       := 1;
34 	G_STD_RTG           CONSTANT    NUMBER       := 2;
35 	G_LOT_RTG           CONSTANT    NUMBER       := 3;
36 	G_ECO_BO	    CONSTANT	VARCHAR2(3)  := 'ECO';
37 	G_BOM_BO	    CONSTANT	VARCHAR2(3)  := 'BOM';
38 	G_RTG_BO	    CONSTANT	VARCHAR2(3)  := 'RTG';
39 	G_ASSET_GROUP       CONSTANT    NUMBER       := 1;
40 	G_ASSET_ACTIVITY    CONSTANT    NUMBER       := 2;
41 	G_REBUILDABLE       CONSTANT    NUMBER       := 3;
42 	G_EVENT_OP          CONSTANT    NUMBER       := 1; -- Added for bug 2689249
43 	G_PROCESS_OP	    CONSTANT    NUMBER       := 2;
44 	G_LINE_OP	    CONSTANT    NUMBER	     := 3;
45 	G_Init_Eff_Date_Op_Num_Flag	BOOLEAN	     := FALSE; -- Added for bug 2767019
46 
47 
48 	TYPE Temp_Op_Rec_Type IS RECORD
49 	( old_op_seq_num	NUMBER
50 	, new_op_seq_num	NUMBER
51 	, old_start_eff_date	DATE
52 	, new_start_eff_date	DATE
53 	);
54 
55 	TYPE Temp_Op_Rec_Tbl_Type IS TABLE OF Temp_Op_Rec_Type
56 	INDEX BY BINARY_INTEGER;
57 
58 	TYPE SYSTEM_INFORMATION_REC_TYPE IS RECORD
59 	(  Entity               VARCHAR2(30)    := NULL
60 	 , Org_Id               NUMBER          := NULL
61 	 , Eco_Name             VARCHAR2(10)    := NULL
62 	 , User_Id              NUMBER          := NULL
63 	 , Login_Id             NUMBER          := NULL
64 	 , Prog_AppId           NUMBER          := NULL
65 	 , Prog_Id              NUMBER          := NULL
66 	 , Request_Id           NUMBER          := NULL
67 	 , ECO_Impl             BOOLEAN         := NULL
68 	 , ECO_Cancl            BOOLEAN         := NULL
69 	 , WKFL_Process         BOOLEAN         := NULL
70 	 , ECO_Access           BOOLEAN         := NULL
71 	 , RITEM_Impl           BOOLEAN         := NULL
72 	 , RITEM_Cancl          BOOLEAN         := NULL
73 	 , RCOMP_Cancl          BOOLEAN         := NULL
74          , ROP_Cancl            BOOLEAN         := NULL -- Added by MK
75 	 , STD_Item_Access      NUMBER          := NULL
76 	 , MDL_Item_Access      NUMBER          := NULL
77 	 , PLN_Item_Access      NUMBER          := NULL
78 	 , OC_Item_Access       NUMBER          := NULL
79 	 , Routing_Sequence_Id  NUMBER          := NULL
80 	 , Common_Rtg_Seq_Id    NUMBER          := NULL
81 	 , CFM_Rtg_Flag         NUMBER          := NULL
82 	 , Current_Revision     VARCHAR2(3)     := NULL
83 	 , BO_Identifier        VARCHAR2(3)     := 'ECO'
84 	 , Unit_Effectivity     BOOLEAN         := FALSE
85 	 , Unit_Controlled_Item BOOLEAN         := FALSE
86 	 , Unit_Controlled_Component BOOLEAN    := FALSE
87 	 , Require_Item_Rev	NUMBER		:= NULL  -- based on profile
88 	 , Debug_Flag		VARCHAR2(1)	:= 'N'
89          , Lot_Number           VARCHAR2(30)    := NULL
90          , From_Wip_Entity_Id   NUMBER          := NULL
91          , To_Wip_Entity_Id     NUMBER          := NULL
92          , From_Cum_Qty         NUMBER          := NULL
93          , Eco_For_Production   NUMBER          := 2
94          , New_Routing_Revision VARCHAR2(30)    := NULL
95          , Eam_Item_Type        NUMBER          := NULL  -- Added for eAM enhancement
96          , Osfm_NW_Calc_Flag   BOOLEAN          := FALSE -- added for OSFM to check if whole routing calc has been done at the start of the change in routing
97          , Osfm_NW_Count       NUMBER           := NULL  -- added for OSFM to check that we have processed all the records so that we can then do post network calcs.
98 	);
99 
100 	PROCEDURE Init_System_Info_Rec
101 	(   x_mesg_token_tbl    IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
102 	,   x_return_status     IN OUT NOCOPY VARCHAR2
103 	);
104 
105 	FUNCTION Get_System_Information
106 		RETURN BOM_Rtg_Globals.System_Information_Rec_Type;
107 	PROCEDURE Set_System_Information
108           ( p_system_information_rec    IN
109                         BOM_Rtg_Globals.System_Information_Rec_Type);
110 	PROCEDURE Set_Routing_Sequence_id
111           ( p_Routing_sequence_id  IN  NUMBER);
112 	FUNCTION Get_Routing_Sequence_id RETURN NUMBER;
113 	PROCEDURE Set_Common_Rtg_Seq_id
114           ( p_common_Rtg_seq_id  IN  NUMBER);
115 	FUNCTION Get_Common_Rtg_Seq_id RETURN NUMBER;
116 	PROCEDURE Set_Entity
117           ( p_entity    IN  VARCHAR2);
118 	FUNCTION Get_Entity RETURN VARCHAR2;
119 	PROCEDURE Set_Org_id
120           ( p_org_id    IN  NUMBER);
121 	FUNCTION Get_Org_id RETURN NUMBER;
122 	PRAGMA RESTRICT_REFERENCES(Get_Org_id, WNDS);
123 	PROCEDURE Set_Eco_Name
124           ( p_eco_name  IN VARCHAR2);
125 	FUNCTION Get_Eco_Name RETURN VARCHAR2;
126 	PROCEDURE Set_User_Id
127           ( p_user_id   IN  NUMBER);
128 	FUNCTION Get_User_ID RETURN NUMBER;
129 	PRAGMA RESTRICT_REFERENCES(Get_User_Id, WNDS);
130 	PROCEDURE Set_Login_Id
131           ( p_login_id  IN NUMBER );
132 	FUNCTION Get_Login_Id RETURN NUMBER;
133 	PRAGMA RESTRICT_REFERENCES(Get_Login_Id, WNDS);
134 	PROCEDURE Set_Prog_AppId
135           ( p_prog_Appid        IN  NUMBER );
136 	FUNCTION Get_Prog_AppId RETURN NUMBER;
137 	PRAGMA RESTRICT_REFERENCES(Get_Prog_AppId, WNDS);
138 	PROCEDURE Set_Prog_Id
139           ( p_prog_id   IN  NUMBER );
140 	FUNCTION Get_Prog_Id RETURN NUMBER;
141 	PRAGMA RESTRICT_REFERENCES(Get_Prog_Id, WNDS);
142 	PROCEDURE Set_Request_Id
143           ( p_request_id        IN  NUMBER );
144 	FUNCTION Get_Request_id RETURN NUMBER;
145 	PRAGMA RESTRICT_REFERENCES(Get_Request_Id, WNDS);
146 	PROCEDURE Set_Eco_Impl
147           ( p_eco_impl  IN  BOOLEAN );
148 	FUNCTION Is_Eco_Impl RETURN BOOLEAN;
149 
150 	PROCEDURE Set_Eco_Cancl
151           ( p_eco_cancl IN  BOOLEAN );
152 	FUNCTION Is_Eco_Cancl RETURN BOOLEAN;
153 	PROCEDURE Set_Wkfl_Process
154           ( p_wkfl_process      IN  BOOLEAN );
155 	FUNCTION Is_Wkfl_Process RETURN BOOLEAN;
156 	PROCEDURE Set_Eco_Access
157           ( p_eco_access        IN  BOOLEAN );
158 	FUNCTION Is_Eco_Access RETURN BOOLEAN;
159 	PROCEDURE Set_RItem_Impl
160           ( p_ritem_impl        IN  BOOLEAN );
161 	FUNCTION Is_RItem_Impl RETURN BOOLEAN;
162 	PROCEDURE Set_RItem_Cancl
163           ( p_ritem_cancl        IN  BOOLEAN );
164 	FUNCTION Is_RItem_Cancl RETURN BOOLEAN;
165 	PROCEDURE Set_RComp_Cancl
166           ( p_rcomp_cancl        IN  BOOLEAN );
167 	FUNCTION Is_RComp_Cancl RETURN BOOLEAN;
168 	PROCEDURE Set_Std_Item_Access
169           ( p_std_item_access   IN  NUMBER );
170         -- ECO for Routing
171         PROCEDURE Set_ROp_Cancl
172           ( p_rcomp_cancl        IN  BOOLEAN );
173         FUNCTION Is_ROp_Cancl RETURN BOOLEAN;
174         -- Added by MK on 09/01/2000
175 	FUNCTION Get_Std_Item_Access RETURN NUMBER;
176 	PROCEDURE Set_Mdl_Item_Access
177           ( p_mdl_item_access   IN  NUMBER );
178 	FUNCTION Get_Mdl_Item_Access RETURN NUMBER;
179 	PROCEDURE Set_Pln_Item_Access
180           ( p_Pln_item_access   IN  NUMBER );
181 	FUNCTION Get_Pln_Item_Access RETURN NUMBER;
182 	PROCEDURE Set_OC_Item_Access
183           ( p_oc_item_access   IN  NUMBER );
184 	FUNCTION Get_OC_Item_Access RETURN NUMBER;
185 	PROCEDURE Set_Current_Revision
186           ( p_current_revision  IN  VARCHAR2 );
187 	FUNCTION Get_Current_Revision RETURN VARCHAR2;
188 	PROCEDURE Set_BO_Identifier
189           ( p_bo_identifier     IN  VARCHAR2 );
190 	FUNCTION Get_BO_Identifier RETURN VARCHAR2;
191 	PROCEDURE Set_Unit_Controlled_Item
192           ( p_Unit_Controlled_Item IN BOOLEAN);
193 	PROCEDURE Set_Unit_Controlled_Item
194 	  ( p_inventory_item_id  IN NUMBER
195 	  , p_organization_id    IN NUMBER);
196 	FUNCTION Get_Unit_Controlled_Item RETURN BOOLEAN;
197 	PROCEDURE Set_Unit_Controlled_Component
198           ( p_Unit_Controlled_Component IN BOOLEAN);
199         PROCEDURE Set_Unit_Controlled_Component
200           ( p_inventory_item_id  IN NUMBER
201           , p_organization_id    IN NUMBER);
202 	FUNCTION Get_Unit_Controlled_Component RETURN BOOLEAN;
203 
204 	PROCEDURE Set_Unit_Effectivity
205           ( p_Unit_Effectivity IN  BOOLEAN );
206 	FUNCTION Get_Unit_Effectivity RETURN BOOLEAN;
207 
208 	PROCEDURE Set_Require_Item_Rev
209 	  ( p_Require_Rev      IN NUMBER );
210 	FUNCTION Is_Item_Rev_Required RETURN NUMBER;
211 
212 	PROCEDURE Set_Request_For_Approval
213 	(   p_change_notice                 IN  VARCHAR2
214 	,   p_organization_id               IN  NUMBER
215 	,   x_err_text                      IN OUT NOCOPY VARCHAR2
216 	);
217 
218 	PROCEDURE Check_Approved_For_Process
219 	(   p_change_notice                 IN  VARCHAR2
220 	,   p_organization_id               IN  NUMBER
221 	,   x_processed                     IN OUT NOCOPY BOOLEAN
222 	,   x_err_text                      IN OUT NOCOPY VARCHAR2
223 	);
224 
225         PROCEDURE Set_CFM_Rtg_Flag
226         (  p_cfm_rtg_type    IN NUMBER
227         );
228 
229         FUNCTION Get_CFM_Rtg_Flag
230         RETURN NUMBER ;
231 
232 	FUNCTION Get_Process_Name RETURN VARCHAR2;
233 
234 	PROCEDURE Init_Process_Name
235 	(   p_change_order_type_id          IN  NUMBER
236 	,   p_priority_code                 IN  VARCHAR2
237 	,   p_organization_id               IN  NUMBER
238 	);
239 
240 
241 	PROCEDURE Transaction_Type_Validity
242 	(   p_transaction_type          IN  VARCHAR2
243 	,   p_entity                    IN  VARCHAR2
244 	,   p_entity_id                 IN  VARCHAR2
245 	,   x_valid                     IN OUT NOCOPY BOOLEAN
246 	,   x_Mesg_Token_Tbl            IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
247 	);
248 
249 	PROCEDURE Set_Debug
250 	(  p_debug_flag			IN  VARCHAR2
251 	 );
252 
253 	FUNCTION Get_Debug RETURN VARCHAR2;
254 
255         PROCEDURE Set_Lot_Number
256           ( p_lot_number IN  VARCHAR2 );
257         FUNCTION Get_Lot_Number RETURN VARCHAR2;
258 
259         PROCEDURE Set_From_Wip_Entity_Id
260           ( p_from_wip_entity_id IN  NUMBER);
261         FUNCTION Get_From_Wip_Entity_Id RETURN NUMBER;
262 
263         PROCEDURE Set_To_Wip_Entity_Id
264           ( p_to_wip_entity_id IN  NUMBER);
265         FUNCTION Get_To_Wip_Entity_Id RETURN NUMBER;
266 
267         PROCEDURE Set_From_Cum_Qty
268           ( p_from_cum_qty IN  NUMBER);
269         FUNCTION Get_From_Cum_Qty RETURN NUMBER;
270 
271         PROCEDURE Set_Eco_For_Production
272           ( p_eco_for_production IN  NUMBER);
273         FUNCTION Get_Eco_For_Production RETURN NUMBER;
274 
275         PROCEDURE Set_New_Routing_Revision
276           ( p_new_routing_revision IN  VARCHAR2 );
277         FUNCTION Get_New_Routing_Revision RETURN VARCHAR2;
278 
279         -- Added for eAM enhancement
280         PROCEDURE Set_Eam_Item_Type( p_eam_item_type IN NUMBER );
281 
282         FUNCTION Get_Eam_Item_Type RETURN NUMBER ;
283 
284 	PROCEDURE Set_Osfm_NW_Calc_Flag
285           ( p_nw_calc_flag IN  BOOLEAN );
286 	FUNCTION Is_Osfm_NW_Calc_Flag RETURN BOOLEAN;
287 
288 	PROCEDURE Add_Osfm_NW_Count
289           ( p_nw_number IN  NUMBER );
290 	PROCEDURE Set_Osfm_NW_Count
291           ( p_nw_count IN  NUMBER );
292 	FUNCTION Get_Osfm_NW_Count RETURN NUMBER;
293 
294 	FUNCTION Get_Temp_Op_Rec
295           ( p_op_seq_num  IN NUMBER
296 	  , p_temp_op_rec IN OUT NOCOPY Temp_Op_Rec_Type
297 	  ) RETURN BOOLEAN;
298 	PROCEDURE Set_Temp_Op_Tbl
299           ( p_temp_op_rec_tbl IN  Temp_Op_Rec_Tbl_Type);
300 
301 	FUNCTION Get_Temp_Op_Rec1
302           ( p_op_seq_num  IN NUMBER
303 	  , p_eff_date	  IN DATE
304 	  , p_temp_op_rec IN OUT NOCOPY Temp_Op_Rec_Type
305 	  ) RETURN BOOLEAN;
306 
307 	-- BUG 5330942
308 	FUNCTION Get_Routing_Header_ECN
309 	  ( p_routing_seq_id IN NUMBER ) RETURN VARCHAR2;
310 
311 END BOM_RTG_Globals;