1 PACKAGE Bom_Default_Bom_Component AUTHID CURRENT_USER AS
2 /* $Header: BOMDCMPS.pls 120.0.12010000.2 2009/12/16 21:44:37 umajumde ship $ */
3 /*#
4 * This package contains procedures that will try to copy over values from OLD record for all NULL columns found in
5 * business object Component and Revision record and to default in values,for all NULL columns found in business object
6 * Component an Revision record either by retrieving them from the database, or by having the program
7 * assign values.
8 * @rep:scope private
9 * @rep:product BOM
10 * @rep:lifecycle active
11 * @rep:compatibility S
12 * @rep:displayname Component and Revision Defaulting
13 */
14 /****************************************************************************
15 --
16 -- Copyright (c) 1996 Oracle Corporation, Redwood Shores, CA, USA
17 -- All rights reserved.
18 --
19 -- FILENAME
20 --
21 -- BOMDCMPS.pls
22 --
23 -- DESCRIPTION
24 --
25 -- Spec of package Bom_Default_Bom_Component
26 --
27 -- NOTES
28 --
29 -- HISTORY
30 -- 08-JUL-1999 Rahul Chitko Initial Creation
31 --
32 ****************************************************************************/
33 --added for bug 9076970
34 FUNCTION Check_Routing_Exists
35 RETURN BOOLEAN;
36 --
37 -- Attribute defualting for Bom Component Record
38 --
39 /*#
40 * This procedure will try to default in values,for all NULL columns found in business object Component
41 * record either by retrieving them from the database, or by having the program
42 * assign values.For CREATEs, there is no OLD record. So the program must default
43 * in individual attribute values,independently of each other. This
44 * feature enables the user to enter minimal information for the
45 * operation to go through
46 * @param p_bom_component_rec IN BOM Component Exposed Column Record
47 * @paraminfo {@rep:innertype Bom_Bo_Pub.Bom_Comps_Rec_Type }
48 * @param p_bom_Comp_unexp_rec IN BOM Component Unexposed Column Record
49 * @paraminfo {@rep:innertype Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type}
50 * @param x_bom_Component_rec IN OUT NOCOPY processed Component Exposed Column Record
51 * @paraminfo {@rep:innertype Bom_Bo_Pub.Bom_Comps_Rec_Type }
52 * @param x_bom_Comp_unexp_rec IN OUT NOCOPY processed BOM Components Unexposed Column Record
53 * @paraminfo {@rep:innertype Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type}
54 * @param x_mesg_token_tbl IN OUT NOCOPY Message Token Table
55 * @paraminfo {@rep:innertype Error_Handler.Mesg_Token_Tbl_Type}
56 * @param x_return_status IN OUT NOCOPY Return Status of the Business Object
57 * @rep:scope private
58 * @rep:displayname Component-Attribute Defaulting
59 * @rep:category BUSINESS_ENTITY BOM_BILL_OF_MATERIAL
60 * @rep:compatibility S
61 * @rep:lifecycle active
62 */
63 PROCEDURE Attribute_Defaulting
64 ( p_bom_component_rec IN Bom_Bo_Pub.Bom_Comps_Rec_Type
65 , p_bom_Comp_unexp_rec IN Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
66 , x_bom_Component_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Comps_Rec_Type
67 , x_bom_Comp_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
68 , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
69 , x_return_status IN OUT NOCOPY VARCHAR2
70 );
71
72
73 --
74 -- Attribute Defaulting for Revised Component Record
75 --
76 /*#
77 * This procedure will try to default in values,for all NULL columns found in business object Revision Component
78 * record either by retrieving them from the database, or by having the program
79 * assign values.For CREATEs, there is no OLD record. So the program must default
80 * in individual attribute values,independently of each other. This
81 * feature enables the user to enter minimal information for the
82 * operation to go through
83 * @param p_rev_component_rec IN Revision Component Exposed Column Record
84 * @paraminfo {@rep:innertype Bom_Bo_Pub.Rev_Component_Rec_Type }
85 * @param p_Rev_Comp_Unexp_rec IN Revision Component Unexposed Column Record
86 * @paraminfo {@rep:innertype Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type}
87 * @param p_control_Rec IN Control Record
88 * @paraminfo {@rep:innertype Bom_Bo_Pub.Control_Rec_Type}
89 * @param x_rev_component_rec IN OUT NOCOPY processed Revision Component Exposed Column Record
90 * @paraminfo {@rep:innertype Bom_Bo_Pub.Rev_Component_Rec_Type }
91 * @param x_Rev_Comp_Unexp_Rec IN OUT NOCOPY processed Revision Components Unexposed Column Record
92 * @paraminfo {@rep:innertype Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type}
93 * @param x_mesg_token_tbl IN OUT NOCOPY Message Token Table
94 * @paraminfo {@rep:innertype Error_Handler.Mesg_Token_Tbl_Type}
95 * @param x_return_status IN OUT NOCOPY Return Status of the Business Object
96 * @rep:scope private
97 * @rep:displayname Revision-Attribute Defaulting
98 * @rep:category BUSINESS_ENTITY BOM_BILL_OF_MATERIAL
99 * @rep:compatibility S
100 * @rep:lifecycle active
101 */
102 PROCEDURE Attribute_Defaulting
103 ( p_rev_component_rec IN Bom_Bo_Pub.Rev_Component_Rec_Type
104 , p_Rev_Comp_Unexp_Rec IN Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
105 , p_control_Rec IN BOM_BO_PUB.Control_Rec_Type
106 := BOM_BO_PUB.G_DEFAULT_CONTROL_REC
107 , x_rev_component_rec IN OUT NOCOPY Bom_Bo_Pub.Rev_Component_Rec_Type
108 , x_Rev_Comp_Unexp_Rec IN OUT NOCOPY Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
109 , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
110 , x_Return_Status IN OUT NOCOPY VARCHAR2
111 );
112
113 --
114 -- Populate NULL Columns for Bom Component Record
115 --
116 /*#
117 * This procedure will copy over values from OLD record for all NULL columns found in
118 * business object Component record.The user may send in a record with
119 * certain values set to NULL. Values for all such columns are copied over
120 * from the OLD record. This feature enables the user to enter minimal
121 * information for the operation.
122 * @param p_bom_Component_rec IN BOM Component Exposed Column Record
123 * @paraminfo {@rep:innertype Bom_Bo_Pub.Bom_Comps_Rec_Type }
124 * @param p_bom_Comp_unexp_rec IN BOM Component Unexposed Column Record
125 * @paraminfo {@rep:innertype Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type}
126 * @param p_old_bom_Component_rec BOM Old Component Exposed Column Record
127 * @paraminfo {@rep:innertype Bom_Bo_Pub.Bom_Comps_Rec_Type}
128 * @param p_old_bom_Comp_unexp_rec BOM Component Old Record Unexposed Column Record
129 * @paraminfo {@rep:innertype Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type}
130 * @param x_bom_Component_rec IN OUT NOCOPY processed Component Exposed Column Record
131 * @paraminfo {@rep:innertype Bom_Bo_Pub.Bom_Comps_Rec_Type }
132 * @param x_bom_Comp_unexp_rec IN OUT NOCOPY processed BOM Component Unexposed Column Record
133 * @paraminfo {@rep:innertype Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
134 * @rep:scope private
135 * @rep:displayname Component-Populate Null Column
136 * @rep:category BUSINESS_ENTITY BOM_BILL_OF_MATERIAL
137 * @rep:compatibility S
138 * @rep:lifecycle active
139 */
140 PROCEDURE Populate_Null_Columns
141 ( p_bom_Component_rec IN Bom_Bo_Pub.Bom_Comps_Rec_Type
142 , p_bom_Comp_unexp_rec IN Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
143 , p_old_bom_Component_rec IN Bom_Bo_Pub.Bom_Comps_Rec_Type
144 , p_old_bom_Comp_unexp_rec IN Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
145 , x_bom_Component_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Comps_Rec_Type
146 , x_bom_Comp_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
147 );
148
149 --
150 -- Populate NULL columns for Revised Component Record
151 --
152 /*#
153 * This procedure will copy over values from OLD record for all NULL columns found in
154 * business object Revision Component record.The user may send in a record with
155 * certain values set to NULL. Values for all such columns are copied over
156 * from the OLD record. This feature enables the user to enter minimal
157 * information for the operation.
158 * @param p_rev_component_rec IN Revision Component Exposed Column Record
159 * @paraminfo {@rep:innertype Bom_Bo_Pub.Rev_Component_Rec_Type}
160 * @param p_old_rev_component_rec IN Revision Component Old Record Exposed Column Record
161 * @paraminfo {@rep:innertype Bom_Bo_Pub.Rev_Component_Rec_Type }
162 * @param p_Rev_Comp_Unexp_Rec IN Revision Component Unexposed Column Record
163 * @paraminfo {@rep:innertype Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type}
164 * @param p_Old_Rev_Comp_Unexp_Rec Revision Component Old Record Unexposed Column Record
165 * @paraminfo {@rep:Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type}
166 * @param x_Rev_Component_Rec IN OUT NOCOPY processed Revision Component Exposed Column Record
167 * @paraminfo {@rep:innertype Bom_Bo_Pub.Rev_Component_Rec_Type}
168 * @param x_Rev_Comp_Unexp_Rec IN OUT NOCOPY Revision Component Unexposed Column Record
169 * @paraminfo {@rep:innertype Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type}
170 * @rep:scope private
171 * @rep:displayname Revision-Populate Null Column
172 * @rep:compatibility S
173 * @rep:lifecycle active
174 * @rep:category BUSINESS_ENTITY BOM_BILL_OF_MATERIAL
175 */
176 PROCEDURE Populate_Null_Columns
177 ( p_rev_component_rec IN Bom_Bo_Pub.Rev_Component_Rec_Type
178 , p_old_rev_component_rec IN Bom_Bo_Pub.Rev_Component_Rec_Type
179 , p_Rev_Comp_Unexp_Rec IN Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
180 , p_Old_Rev_Comp_Unexp_Rec IN Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
181 , x_Rev_Component_Rec IN OUT NOCOPY Bom_Bo_Pub.Rev_Component_Rec_Type
182 , x_Rev_Comp_Unexp_Rec IN OUT NOCOPY Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
183 );
184
185 --
186 -- Entity Level Defaulting for Revised Component
187 --
188
189 /*#
190 * This procedure will perform checks against Revision Component record in the order
191 * Non-updateable columns (UPDATEs): Certain columns must not be changed by the user when updating the record.
192 * Cross-attribute checking: The validity of attributes may be checked, based on factors external to it.
193 * Business logic: The record must comply with business logic rules.
194 * @param p_rev_component_rec IN Revision Component Exposed Column Record
195 * @paraminfo {@rep:innertype Bom_Bo_Pub.Rev_Component_Rec_Type}
196 * @param p_old_rev_component_rec IN Revision Component Old Record Exposed Column Record
197 * @paraminfo {@rep:innertype Bom_Bo_Pub.Rev_Component_Rec_Type}
198 * @param x_rev_component_rec IN OUT NOCOPY processed Revision Component Exposed Column Record
199 * @paraminfo {@rep:innertype Bom_Bo_Pub.Rev_Component_Rec_Type}
200 * @rep:scope private
201 * @rep:displayname Revision Entity Defaulting
202 * @rep:compatibility S
203 * @rep:lifecycle active
204 * @rep:category BUSINESS_ENTITY BOM_BILL_OF_MATERIAL
205 */
206 PROCEDURE Entity_Defaulting
207 ( p_rev_component_rec IN Bom_Bo_Pub.Rev_Component_Rec_Type
208 , p_old_rev_component_rec IN Bom_Bo_Pub.Rev_Component_Rec_Type :=
209 Bom_Bo_Pub.G_MISS_REV_COMPONENT_REC
210 , x_rev_component_rec IN OUT NOCOPY Bom_Bo_Pub.Rev_Component_Rec_Type
211 );
212
213
214 --
215 -- Entity Level Defaulting for Bom Inventory Component
216 --
217 /*#
218 * This procedure will perform checks against BOM Inventory Component record in the order
219 * Non-updateable columns (UPDATEs): Certain columns must not be changed by the user when updating the record.
220 * Cross-attribute checking: The validity of attributes may be checked, based on factors external to it.
221 * Business logic: The record must comply with business logic rules.
222 * @param p_bom_component_rec IN BOM Component Exposed Column Record
223 * @paraminfo {@rep:innertype Bom_Bo_Pub.Bom_Comps_Rec_Type}
224 * @param p_old_bom_component_rec IN BOM Component Old Record Exposed Column Record
225 * @paraminfo {@rep:innertype Bom_Bo_Pub.Bom_Comps_Rec_Type}
226 * @param x_bom_component_rec IN OUT NOCOPY processed BOM Component Exposed Column Record
227 * @paraminfo {@rep:innertype Bom_Bo_Pub.Bom_Comps_Rec_Type}
228 * @rep:scope private
229 * @rep:displayname Component Entity Defaulting
230 * @rep:compatibility S
231 * @rep:lifecycle active
232 * @rep:category BUSINESS_ENTITY BOM_BILL_OF_MATERIAL
233 */
234 PROCEDURE Entity_Defaulting
235 ( p_bom_component_rec IN Bom_Bo_Pub.Bom_Comps_Rec_Type
236 , p_old_bom_component_rec IN Bom_Bo_Pub.Bom_Comps_Rec_Type :=
237 Bom_Bo_Pub.G_MISS_BOM_COMPONENT_REC
238 , x_bom_component_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Comps_Rec_Type
239 );
240
241
242 END Bom_Default_Bom_Component;