1 package bompiinq as
2 /* $Header: BOMIINQS.pls 120.1 2005/06/21 05:08:14 appldev ship $ */
3
4 /*==========================================================================+
5 | Copyright (c) 1993 Oracle Corporation Belmont, California, USA |
6 | All rights reserved. |
7 +===========================================================================+
8 | |
9 | File Name : BOMIINQS.sql |
10 | DESCRIPTION : This file is a packaged procedure for the imploders.
11 | This package contains 2 different imploders for the
12 | single level and multi level implosion. The package
13 | imploders calls the correct imploder based on the
14 | # of levels to implode.
15 | Parameters: org_id organization_id
16 | sequence_id unique value to identify current implosion
17 | use value from sequence bom_small_impl_temp_s
18 | levels_to_implode
19 | eng_mfg_flag 1 - BOM
20 | 2 - ENG
21 | impl_flag 1 - implemented only
22 | 2 - both impl and unimpl
23 | display_option 1 - All
24 | 2 - Current
25 | 3 - Current and future
26 | item_id item id of asembly to explode
27 | impl_date explosion date dd-mon-yy hh24:mi
28 | err_msg error message out buffer
29 | error_code error code out. returns sql error code
30 | if sql error, 9999 if loop detected.
31 | organization_option
32 | 1 - Current Organization
33 | 2 - Organization Hierarchy
34 | 3 - All Organizations to which access is allowed
35 | organization_hierarchy
36 | Organization Hierarchy Name
37 +==========================================================================*/
38
39 PROCEDURE imploder_userexit(
40 sequence_id IN NUMBER,
41 eng_mfg_flag IN NUMBER,
42 org_id IN NUMBER,
43 impl_flag IN NUMBER,
44 display_option IN NUMBER,
45 levels_to_implode IN NUMBER,
46 item_id IN NUMBER,
47 impl_date IN VARCHAR2,
48 unit_number_from IN VARCHAR2,
49 unit_number_to IN VARCHAR2,
50 err_msg IN OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
51 err_code IN OUT NOCOPY /* file.sql.39 change */ NUMBER,
52 organization_option IN NUMBER default 1,
53 organization_hierarchy IN VARCHAR2 default NULL,
54 serial_number_from IN VARCHAR2 default NULL,
55 serial_number_to IN VARCHAR2 default NULL);
56
57 PROCEDURE implosion (
58 sequence_id IN NUMBER,
59 eng_mfg_flag IN NUMBER,
60 org_id IN NUMBER,
61 impl_flag IN NUMBER,
62 display_option IN NUMBER,
63 levels_to_implode IN NUMBER,
64 impl_date IN VARCHAR2,
65 unit_number_from IN VARCHAR2,
66 unit_number_to IN VARCHAR2,
67 err_msg IN OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
68 err_code IN OUT NOCOPY /* file.sql.39 change */ NUMBER,
69 serial_number_from IN VARCHAR2 default NULL,
70 serial_number_to IN VARCHAR2 default NULL);
71
72 PROCEDURE sl_imploder (
73 sequence_id IN NUMBER,
74 eng_mfg_flag IN NUMBER,
75 org_id IN NUMBER,
76 impl_flag IN NUMBER,
77 display_option IN NUMBER,
78 impl_date IN VARCHAR2,
79 unit_number_from IN VARCHAR2,
80 unit_number_to IN VARCHAR2,
81 err_msg IN OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
82 error_code IN OUT NOCOPY /* file.sql.39 change */ NUMBER,
83 serial_number_from IN VARCHAR2 default NULL,
84 serial_number_to IN VARCHAR2 default NULL);
85
86 PROCEDURE ml_imploder(
87 sequence_id IN NUMBER,
88 eng_mfg_flag IN NUMBER,
89 org_id IN NUMBER,
90 impl_flag IN NUMBER,
91 a_levels_to_implode IN NUMBER,
92 impl_date IN VARCHAR2,
93 unit_number_from IN VARCHAR2,
94 unit_number_to IN VARCHAR2,
95 err_msg IN OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
96 error_code IN OUT NOCOPY /* file.sql.39 change */ NUMBER,
97 serial_number_from IN VARCHAR2 default NULL,
98 serial_number_to IN VARCHAR2 default NULL);
99 --TYPE t_OrgIDtable IS TABLE OF hr_organization_units.organization_id%TYPE
100 -- INDEX BY BINARY_INTEGER;
101
102 END bompiinq;