DBA Data[Home] [Help]

PACKAGE: APPS.ENG_GLOBALS

Source


1 PACKAGE ENG_Globals AUTHID CURRENT_USER AS
2 /* $Header: ENGSGLBS.pls 115.26 2004/05/14 09:01:14 lkasturi ship $ */
3 
4 --  Product entity constants.
5 
6 --  START GEN entities
7 G_ENTITY_ALL                   CONSTANT VARCHAR2(30) := 'ALL';
8 G_ENTITY_ECO                   CONSTANT VARCHAR2(30) := 'ECO';
9 G_ENTITY_ECO_REVISION          CONSTANT VARCHAR2(30) := 'ECO_REVISION';
10 G_ENTITY_REVISED_ITEM          CONSTANT VARCHAR2(30) := 'REVISED_ITEM';
11 G_ENTITY_REV_COMPONENT         CONSTANT VARCHAR2(30) := 'REV_COMPONENT';
12 G_ENTITY_REF_DESIGNATOR        CONSTANT VARCHAR2(30) := 'REF_DESIGNATOR';
13 G_ENTITY_SUB_COMPONENT         CONSTANT VARCHAR2(30) := 'SUB_COMPONENT';
14 -- Followings are added by MK on 09/15/2000
15 G_ENTITY_REV_OPERATION         CONSTANT VARCHAR2(30) := 'REV_OPERATION';
16 G_ENTITY_REV_OP_RESOURCE       CONSTANT VARCHAR2(30) := 'REV_OP_RESOURCE';
17 G_ENTITY_REV_SUB_RESOURCE      CONSTANT VARCHAR2(30) := 'REV_SUB_RESOURCE';
18 
19 
20 --  END GEN entities
21 
22 -- Seeded Change Mgmt Type Code
23 G_CHANGE_REQUEST    CONSTANT VARCHAR2(30) := 'CHANGE_REQUEST' ; -- Change Request
24 G_CHANGE_ORDER      CONSTANT VARCHAR2(30) := 'CHANGE_ORDER' ;   -- Change Order
25 
26 --  Operations.
27 
28 G_OPR_CREATE	    CONSTANT	VARCHAR2(10) := 'CREATE';
29 G_OPR_UPDATE	    CONSTANT	VARCHAR2(10) := 'UPDATE';
30 G_OPR_DELETE	    CONSTANT	VARCHAR2(10) := 'DELETE';
31 G_OPR_LOCK	    CONSTANT	VARCHAR2(30) := 'LOCK';
32 G_OPR_NONE	    CONSTANT	VARCHAR2(30) := NULL;
33 G_OPR_CANCEL	    CONSTANT    VARCHAR2(30) := 'CANCEL';
34 G_RECORD_FOUND	    CONSTANT	VARCHAR2(1)  := 'F';
35 G_RECORD_NOT_FOUND  CONSTANT	VARCHAR2(1)  := 'N';
36 G_MODEL		    CONSTANT	NUMBER	     := 1;
37 G_OPTION_CLASS	    CONSTANT    NUMBER	     := 2;
38 G_PLANNING	    CONSTANT	NUMBER	     := 3;
39 G_STANDARD	    CONSTANT	NUMBER	     := 4;
40 G_PRODUCT_FAMILY    CONSTANT	NUMBER	     := 5;
41 
42 --  Max number of defaulting itterations.
43 
44 G_MAX_DEF_ITTERATIONS         CONSTANT NUMBER:= 5;
45 
46 --Bug no 2818039
47 G_ENG_LAUNCH_IMPORT    NUMBER :=0;
48 
49 --  API Operation control flags.
50 
51 TYPE Control_Rec_Type IS RECORD
52 (   controlled_operation          BOOLEAN := FALSE
53 ,   default_attributes            BOOLEAN := TRUE
54 ,   change_attributes             BOOLEAN := TRUE
55 ,   validate_entity               BOOLEAN := TRUE
56 ,   write_to_db                   BOOLEAN := TRUE
57 ,   process                       BOOLEAN := TRUE
58 ,   process_entity                VARCHAR2(30) := G_ENTITY_ALL
59 ,   clear_api_cache               BOOLEAN := TRUE
60 ,   clear_api_requests            BOOLEAN := TRUE
61 ,   request_category              VARCHAR2(30):= NULL
62 ,   request_name                  VARCHAR2(30):= NULL
63 );
64 
65 --  Variable representing missing control record.
66 
67 G_MISS_CONTROL_REC            Control_Rec_Type;
68 
69 --  API request record type.
70 
71 TYPE Request_Rec_Type IS RECORD
72 (   entity                        VARCHAR2(30) := NULL
73 ,   step                          VARCHAR2(30) := NULL
74 ,   name                          VARCHAR2(30) := NULL
75 ,   category                      VARCHAR2(30) := NULL
76 ,   processed                     BOOLEAN := FALSE
77 ,   attribute1                    VARCHAR2(240) := NULL
78 ,   attribute2                    VARCHAR2(240) := NULL
79 ,   attribute3                    VARCHAR2(240) := NULL
80 ,   attribute4                    VARCHAR2(240) := NULL
81 ,   attribute5                    VARCHAR2(240) := NULL
82 );
83 
84 --  API Request table type.
85 
86 TYPE Request_Tbl_Type IS TABLE OF Request_Rec_Type
87     INDEX BY BINARY_INTEGER;
88 
89 -- API Request table.
90 
91 G_REQUEST_TBL		Request_Tbl_Type;
92 
93 --  API request record key type.
94 
95 TYPE Request_Key_Rec_Type IS RECORD
96 (   attribute1                    VARCHAR2(240) := NULL
97 ,   attribute2                    VARCHAR2(240) := NULL
98 ,   attribute3                    VARCHAR2(240) := NULL
99 ,   attribute4                    VARCHAR2(240) := NULL
100 ,   attribute5                    VARCHAR2(240) := NULL
101 );
102 
103 --  API Request Key table type.
104 
105 TYPE Request_Key_Tbl_Type IS TABLE OF Request_Key_Rec_Type
106     INDEX BY BINARY_INTEGER;
107 
108 --  Error text
109 
110 G_ERR_TEXT	VARCHAR2(100) := NULL;
111 
112 --  API record type containing WHO and other parameters used during defaulting and error reporting.
113 
114 TYPE WHO_Rec_Type IS RECORD
115 (   entity                        VARCHAR2(30) := NULL
116 ,   org_id                        NUMBER := NULL
117 ,   user_id                       NUMBER := NULL
118 ,   login_id                      NUMBER := NULL
119 ,   prog_appid                    NUMBER := NULL
120 ,   prog_id	                  NUMBER := NULL
121 ,   req_id	                  NUMBER := NULL
122 ,   TRANSACTION_ID	          NUMBER := NULL
123 );
124 
125 TYPE SYSTEM_INFORMATION_REC_TYPE IS RECORD
126 (  Entity		VARCHAR2(30) 	:= NULL
127  , org_id		NUMBER	     	:= NULL
128  , Eco_Name		VARCHAR2(10) 	:= NULL
129  , User_Id		NUMBER		:= NULL
130  , Login_Id		NUMBER		:= NULL
131  , Prog_AppId		NUMBER		:= NULL
132  , Prog_Id		NUMBER		:= NULL
133  , Request_Id		NUMBER		:= NULL
134  , ECO_Impl		BOOLEAN		:= NULL
135  , ECO_Cancl		BOOLEAN		:= NULL
136  , WKFL_Process		BOOLEAN		:= NULL
137  , ECO_Access		BOOLEAN		:= NULL
138  , RITEM_Impl		BOOLEAN		:= NULL
139  , RITEM_Cancl		BOOLEAN		:= NULL
140  , RCOMP_Cancl		BOOLEAN		:= NULL
141  , ROP_Cancl            BOOLEAN         := NULL -- Added by MK
142  , STD_Item_Access	NUMBER		:= NULL
143  , MDL_Item_Access	NUMBER 		:= NULL
144  , PLN_Item_Access	NUMBER 		:= NULL
145  , OC_Item_Access	NUMBER 		:= NULL
146  , Bill_Sequence_Id	NUMBER		:= NULL
147  , Current_Revision	VARCHAR2(3)	:= NULL
148  , BO_Identifier	VARCHAR2(3)	:= 'ECO'
149  , Unit_Effectivity	BOOLEAN		:= FALSE
150  , Unit_Controlled_Item	BOOLEAN		:= FALSE
151  , Unit_Controlled_Component BOOLEAN	:= FALSE
152 );
153 
154 -- API WHO record
155 
156 
157 -- System information is now defined in the body and accessed
158 -- using Get/Set functions and procedures. Changed 06/23/99 by RC.
159 --
160 -- System_Information	System_Information_Rec_Type;
161 --
162 G_WHO_REC 		WHO_Rec_Type;
163 
164 -- Initialize system information record
165 
166 PROCEDURE Init_System_Info_Rec
167 (   x_mesg_token_tbl    OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
168 ,   x_return_status     OUT NOCOPY VARCHAR2
169 );
170 
171 -- Check transaction_type validity
172 
173 PROCEDURE Transaction_Type_Validity
174 (   p_transaction_type              IN  VARCHAR2
175 ,   p_entity			    IN  VARCHAR2
176 ,   p_entity_id			    IN  VARCHAR2
177 ,   x_valid			    OUT NOCOPY BOOLEAN
178 ,   x_Mesg_Token_Tbl                OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
179 );
180 
181 --  Initialize control record.
182 
183 FUNCTION Init_Control_Rec
184 (   p_operation                     IN  VARCHAR2
185 ,   p_control_rec                   IN  Control_Rec_Type
186 ,   x_err_text			    OUT NOCOPY VARCHAR2
187 )RETURN Control_Rec_Type;
188 
189 
190 --  Initialize WHO record.
191 
192 PROCEDURE Init_WHO_Rec
193 ( p_org_id IN NUMBER
194 , p_user_id IN NUMBER
195 , p_login_id IN NUMBER
196 , p_prog_appid IN NUMBER
197 , p_prog_id IN NUMBER
198 , p_req_id IN NUMBER
199 );
200 
201 -- Load entity and record-specific details into WHO record
202 
203 PROCEDURE Init_WHO_Rec_Entity_Details
204 ( p_entity IN VARCHAR2
205 , p_transaction_id IN NUMBER
206 );
207 
208 -- Initialize Workflow Process Name for ECO approval
209 
210 PROCEDURE Init_Process_Name
211 (   p_change_order_type_id          IN  NUMBER
212 ,   p_priority_code		    IN  VARCHAR2
213 ,   p_organization_id		    IN  NUMBER
214 );
215 
216 -- Get Workflow Process Name for ECO approval
217 
218 FUNCTION Get_Process_Name
219 RETURN VARCHAR2;
220 
221 -- Log a request in the Request Table
222 
223 PROCEDURE Add_Request
224 (   p_entity 			    IN  VARCHAR2
225 ,   p_step			    IN 	VARCHAR2 := NULL
226 ,   p_name			    IN 	VARCHAR2
227 ,   p_category			    IN 	VARCHAR2 := NULL
228 ,   p_processed		  	    IN 	BOOLEAN := FALSE
229 ,   p_attribute1		    IN 	VARCHAR2 := NULL
230 ,   p_attribute2		    IN 	VARCHAR2 := NULL
231 ,   p_attribute3		    IN 	VARCHAR2 := NULL
232 ,   p_attribute4		    IN 	VARCHAR2 := NULL
233 ,   p_attribute5		    IN 	VARCHAR2 := NULL
234 );
235 
236 -- Check if request has been logged. If yes, has it been processed ?
237 -- Returns TRUE if already processed, or if request not found.
238 -- Returns FALSE if not processed.
239 
240 FUNCTION Get_Request_Status
241 (   p_entity 			    IN  VARCHAR2
242 ,   p_step			    IN 	VARCHAR2 := NULL
243 ,   p_name			    IN 	VARCHAR2
244 ,   p_category			    IN 	VARCHAR2 := NULL
245 ,   p_attribute1		    IN 	VARCHAR2 := NULL
246 ,   p_attribute2		    IN 	VARCHAR2 := NULL
247 ,   p_attribute3		    IN 	VARCHAR2 := NULL
248 ,   p_attribute4		    IN 	VARCHAR2 := NULL
249 ,   p_attribute5		    IN 	VARCHAR2 := NULL
250 )RETURN BOOLEAN;
251 
252 -- Checks if there is an unprocessed request that matches the parameters
253 
254 FUNCTION Get_Unprocessed_Request
255 (   p_entity 			    IN  VARCHAR2
256 ,   p_step			    IN 	VARCHAR2 := NULL
257 ,   p_name			    IN 	VARCHAR2
258 ,   p_category			    IN 	VARCHAR2 := NULL
259 ,   p_attribute1		    IN 	VARCHAR2 := NULL
260 ,   p_attribute2		    IN 	VARCHAR2 := NULL
261 ,   p_attribute3		    IN 	VARCHAR2 := NULL
262 ,   p_attribute4		    IN 	VARCHAR2 := NULL
263 ,   p_attribute5		    IN 	VARCHAR2 := NULL
264 )RETURN BOOLEAN;
265 
266 -- Deletes all rows from Request Table
267 
268 PROCEDURE Clear_Request_Table;
269 
270 -- If an approved ECO has a process and any part of the ECO is being modified,
271 -- set ECO Approval Status to 'Not Submitted for Approval' and
272 -- set Status Type of any scheduled revised items to 'Open'.
273 -- Also issue warning.
274 
275 PROCEDURE Check_Approved_For_Process
276 (   p_change_notice                 IN  VARCHAR2
277 ,   p_organization_id		    IN  NUMBER
278 ,   x_processed			    OUT NOCOPY BOOLEAN
279 ,   x_err_text			    OUT NOCOPY VARCHAR2
280 );
281 
282 -- Sets ECO to 'Not Submitted For Approval' and any
283 -- "Scheduled" revised items to "Open"
284 
285 PROCEDURE Set_Request_For_Approval
286 (   p_change_notice                 IN  VARCHAR2
287 ,   p_organization_id		    IN  NUMBER
288 ,   x_err_text			    OUT NOCOPY VARCHAR2
289 );
290 
291 -- Function Get_ECO_Assembly_Type
292 -- Returns ECO assembly type
293 
294 FUNCTION Get_ECO_Assembly_Type
295 ( p_change_notice IN VARCHAR2
296 , p_organization_id IN NUMBER
297 ) RETURN NUMBER;
298 
299 -- Function ECO_Cannot_Update
300 -- Checks if the ECO should not be updated
301 
302 FUNCTION ECO_Cannot_Update
303 ( p_change_notice IN VARCHAR2
304 , p_organization_id IN NUMBER
305 )RETURN BOOLEAN;
306 
307 -- Function Get_PLM_Or_ERP_Change
308 -- Checks if the ECO is 'PLM' or 'ERP'
309 -- Added for 3618676
310 
311 FUNCTION Get_PLM_Or_ERP_Change
312 ( p_change_notice IN VARCHAR2
313 , p_organization_id IN NUMBER
314 ) RETURN VARCHAR2;
315 
316 /*** Get and Set procedure and function defintion for the system information
317 * record.
318 *
319 ***/
320 
321 FUNCTION Get_System_Information RETURN Eng_Globals.System_Information_Rec_Type;
322 PROCEDURE Set_System_Information
323           ( p_system_information_rec    IN
324                         Eng_Globals.System_Information_Rec_Type);
325 PROCEDURE Set_Bill_Sequence_id
326           ( p_bill_sequence_id  IN  NUMBER);
327 FUNCTION Get_Bill_Sequence_id RETURN NUMBER;
328 PROCEDURE Set_Entity
329           ( p_entity    IN  VARCHAR2);
330 FUNCTION Get_Entity RETURN VARCHAR2;
331 PROCEDURE Set_Org_id
332           ( p_org_id    IN  NUMBER);
333 FUNCTION Get_Org_id RETURN NUMBER;
334 PROCEDURE Set_Eco_Name
335           ( p_eco_name  IN VARCHAR2);
336 FUNCTION Get_Eco_Name RETURN VARCHAR2;
337 PROCEDURE Set_User_Id
338           ( p_user_id   IN  NUMBER);
339 FUNCTION Get_User_ID RETURN NUMBER;
340 
341 PROCEDURE Set_Login_Id
342           ( p_login_id  IN NUMBER );
343 FUNCTION Get_Login_Id RETURN NUMBER;
344 
345 PROCEDURE Set_Prog_AppId
346           ( p_prog_Appid        IN  NUMBER );
347 FUNCTION Get_Prog_AppId RETURN NUMBER;
348 
349 PROCEDURE Set_Prog_Id
350           ( p_prog_id   IN  NUMBER );
351 FUNCTION Get_Prog_Id RETURN NUMBER;
352 
353 PROCEDURE Set_Request_Id
354           ( p_request_id        IN  NUMBER );
355 FUNCTION Get_Request_id RETURN NUMBER;
356 
357 PROCEDURE Set_Eco_Impl
358           ( p_eco_impl  IN  BOOLEAN );
359 FUNCTION Is_Eco_Impl RETURN BOOLEAN;
360 PROCEDURE Set_Eco_Cancl
361           ( p_eco_cancl IN  BOOLEAN );
362 FUNCTION Is_Eco_Cancl RETURN BOOLEAN;
363 PROCEDURE Set_Wkfl_Process
364           ( p_wkfl_process      IN  BOOLEAN );
365 FUNCTION Is_Wkfl_Process RETURN BOOLEAN;
366 PROCEDURE Set_Eco_Access
367           ( p_eco_access        IN  BOOLEAN );
368 FUNCTION Is_Eco_Access RETURN BOOLEAN;
369 PROCEDURE Set_RItem_Impl
370           ( p_ritem_impl        IN  BOOLEAN );
371 FUNCTION Is_RItem_Impl RETURN BOOLEAN;
372 PROCEDURE Set_RItem_Cancl
373           ( p_ritem_cancl        IN  BOOLEAN );
374 FUNCTION Is_RItem_Cancl RETURN BOOLEAN;
375 PROCEDURE Set_RComp_Cancl
376           ( p_rcomp_cancl        IN  BOOLEAN );
377 FUNCTION Is_RComp_Cancl RETURN BOOLEAN;
378 
379 -- ECO for Routing
380 PROCEDURE Set_ROp_Cancl
381           ( p_rcomp_cancl        IN  BOOLEAN );
382 FUNCTION Is_ROp_Cancl RETURN BOOLEAN;
383 -- Added by MK on 09/01/2000
384 
385 PROCEDURE Set_Std_Item_Access
386           ( p_std_item_access   IN  NUMBER );
387 FUNCTION Get_Std_Item_Access RETURN NUMBER;
388 PROCEDURE Set_Mdl_Item_Access
389           ( p_mdl_item_access   IN  NUMBER );
390 FUNCTION Get_Mdl_Item_Access RETURN NUMBER;
391 PROCEDURE Set_Pln_Item_Access
392           ( p_Pln_item_access   IN  NUMBER );
393 FUNCTION Get_Pln_Item_Access RETURN NUMBER;
394 PROCEDURE Set_OC_Item_Access
395           ( p_oc_item_access   IN  NUMBER );
396 FUNCTION Get_OC_Item_Access RETURN NUMBER;
397 PROCEDURE Set_Current_Revision
398           ( p_current_revision  IN  VARCHAR2 );
399 FUNCTION Get_Current_Revision RETURN VARCHAR2;
400 PROCEDURE Set_BO_Identifier
401           ( p_bo_identifier     IN  VARCHAR2 );
402 FUNCTION Get_BO_Identifier RETURN VARCHAR2;
403 PROCEDURE Set_Unit_Effectivity
404           ( p_Unit_Effectivity IN  BOOLEAN );
405 FUNCTION Get_Unit_Effectivity RETURN BOOLEAN;
406 PROCEDURE Set_Unit_Controlled_Item
407           ( p_Unit_Controlled_Item IN BOOLEAN);
408 FUNCTION Get_Unit_Controlled_Item RETURN BOOLEAN;
409 PROCEDURE Set_Unit_Controlled_Component
410           ( p_Unit_Controlled_Component IN BOOLEAN);
411 FUNCTION Get_Unit_Controlled_Component RETURN BOOLEAN;
412 
413 /* following functions and procedure have been moved here from BOM packages to make
414    the RTG object independant of the ENG object */
415 
416 PROCEDURE Create_New_Routing
417             ( p_assembly_item_id            IN NUMBER
418             , p_organization_id             IN NUMBER
419             , p_alternate_routing_code      IN VARCHAR2 := NULL
420             , p_pending_from_ecn            IN VARCHAR2
421             , p_routing_sequence_id         IN NUMBER
422             , p_common_routing_sequence_id  IN NUMBER
423             , p_routing_type                IN NUMBER
424             , p_last_update_date            IN DATE
425             , p_last_updated_by             IN NUMBER
426             , p_creation_date               IN DATE
427             , p_created_by                  IN NUMBER
428             , p_login_id                    IN NUMBER
429             , p_revised_item_sequence_id    IN NUMBER
430             , p_original_system_reference   IN VARCHAR2
431             , x_mesg_token_tbl              OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
432             , x_return_status               OUT NOCOPY VARCHAR2
433             ) ;
434 
435 PROCEDURE Perform_Writes_For_Primary_RTG
436         (  p_rev_operation_rec         IN  Bom_Rtg_Pub.Rev_Operation_Rec_Type
437          , p_rev_op_unexp_rec          IN  Bom_Rtg_Pub.Rev_Op_Unexposed_Rec_Type
438          , p_control_rec               IN  Bom_Rtg_Pub.Control_Rec_Type
439                                          := Bom_Rtg_Pub.G_DEFAULT_CONTROL_REC
440          , x_Mesg_Token_Tbl            OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
441          , x_return_status             OUT NOCOPY VARCHAR2
442         ) ;
443 
444 
445 PROCEDURE Cancel_Operation
446 ( p_operation_sequence_id  IN  NUMBER
447 , p_cancel_comments        IN  VARCHAR2
448 , p_op_seq_num             IN  NUMBER
449 , p_user_id                IN  NUMBER
450 , p_login_id               IN  NUMBER
451 , p_prog_id                IN  NUMBER
452 , p_prog_appid             IN  NUMBER
453 , x_mesg_token_tbl         OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
454 , x_return_status          OUT NOCOPY VARCHAR2
455 ) ;
456 
457 
458 END ENG_Globals;