DBA Data[Home] [Help]

PACKAGE: APPS.BOM_DEFAULT_BOM_COMPONENT

Source


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;