DBA Data[Home] [Help]

APPS.BOM_VALIDATE_BOM_REVISION dependencies on ERROR_HANDLER

Line 28: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

24: **************************************************************************/
25:
26: PROCEDURE Check_Entity
27: ( x_return_status IN OUT NOCOPY VARCHAR2
28: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
29: , p_bom_revision_rec IN Bom_Bo_Pub.Bom_Revision_Rec_Type
30: , p_bom_rev_Unexp_Rec IN Bom_Bo_Pub.Bom_Rev_Unexposed_Rec_Type
31: , p_old_bom_revision_Rec IN Bom_Bo_Pub.Bom_Revision_Rec_Type
32: , p_old_bom_Rev_Unexp_Rec IN Bom_Bo_Pub.Bom_Rev_Unexposed_Rec_Type

Line 44: l_token_tbl Error_Handler.Token_Tbl_Type;

40: ORDER BY effectivity_date desc, revision desc;
41:
42: l_current_rev VARCHAR2(3);
43: l_current_rev_date date;
44: l_token_tbl Error_Handler.Token_Tbl_Type;
45: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
46: l_dummy NUMBER;
47: BEGIN
48: --

Line 45: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

41:
42: l_current_rev VARCHAR2(3);
43: l_current_rev_date date;
44: l_token_tbl Error_Handler.Token_Tbl_Type;
45: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
46: l_dummy NUMBER;
47: BEGIN
48: --
49: -- Check if the user has entered a revision that is greater than

Line 69: Error_Handler.Add_Error_Token

65: l_token_tbl(2).token_value := p_bom_revision_rec.revision;
66: l_token_tbl(3).token_name := 'CURRENT_REVISION';
67: l_token_tbl(3).token_value := l_current_rev;
68:
69: Error_Handler.Add_Error_Token
70: ( p_message_name => 'BOM_NEXT_REVISION'
71: , x_mesg_token_tbl => l_mesg_token_tbl
72: , p_token_tbl => l_token_tbl
73: );

Line 84: Error_Handler.Add_Error_Token

80: NVL(p_bom_revision_rec.start_effective_date, SYSDATE) < SYSDATE )
81:
82: THEN
83:
84: Error_Handler.Add_Error_Token
85: ( p_message_name => 'INV_ITM_REV_OUT_EFF_DATE'
86: , x_mesg_token_tbl => l_mesg_token_tbl
87: , p_token_tbl => l_token_tbl
88: );

Line 131: Error_Handler.Add_Error_Token

127: l_token_tbl(1).token_name :=
128: 'ASSEMBLY_ITEM_NAME';
129: l_token_tbl(1).token_value :=
130: p_bom_revision_rec.assembly_item_name;
131: Error_Handler.Add_Error_Token
132: ( p_mesg_token_tbl => l_mesg_token_tbl
133: ,x_mesg_token_tbl => l_mesg_token_tbl
134: ,p_message_name => 'BOM_REV_BILL_MISS'
135: ,p_token_tbl => l_token_tbl

Line 144: --Error_Handler.Write_Debug( 'Current '||to_char(p_bom_revision_rec.start_effective_date));

140:
141: -- If the user is attempting to create or update effective date of the
142: -- revision and the date is less than the current date then it should get
143: -- an error.
144: --Error_Handler.Write_Debug( 'Current '||to_char(p_bom_revision_rec.start_effective_date));
145: --Error_Handler.Write_Debug(' Old '||to_char(p_old_bom_revision_rec.start_effective_date));
146: --Error_Handler.Write_Debug(p_bom_revision_rec.transaction_type );
147: IF ( p_bom_revision_rec.transaction_type = Bom_Globals.G_OPR_CREATE AND
148: Bom_Globals.get_caller_type()<> 'MIGRATION' AND -- bug 2869453

Line 145: --Error_Handler.Write_Debug(' Old '||to_char(p_old_bom_revision_rec.start_effective_date));

141: -- If the user is attempting to create or update effective date of the
142: -- revision and the date is less than the current date then it should get
143: -- an error.
144: --Error_Handler.Write_Debug( 'Current '||to_char(p_bom_revision_rec.start_effective_date));
145: --Error_Handler.Write_Debug(' Old '||to_char(p_old_bom_revision_rec.start_effective_date));
146: --Error_Handler.Write_Debug(p_bom_revision_rec.transaction_type );
147: IF ( p_bom_revision_rec.transaction_type = Bom_Globals.G_OPR_CREATE AND
148: Bom_Globals.get_caller_type()<> 'MIGRATION' AND -- bug 2869453
149: NVL(p_bom_revision_rec.start_effective_date, SYSDATE) < SYSDATE

Line 146: --Error_Handler.Write_Debug(p_bom_revision_rec.transaction_type );

142: -- revision and the date is less than the current date then it should get
143: -- an error.
144: --Error_Handler.Write_Debug( 'Current '||to_char(p_bom_revision_rec.start_effective_date));
145: --Error_Handler.Write_Debug(' Old '||to_char(p_old_bom_revision_rec.start_effective_date));
146: --Error_Handler.Write_Debug(p_bom_revision_rec.transaction_type );
147: IF ( p_bom_revision_rec.transaction_type = Bom_Globals.G_OPR_CREATE AND
148: Bom_Globals.get_caller_type()<> 'MIGRATION' AND -- bug 2869453
149: NVL(p_bom_revision_rec.start_effective_date, SYSDATE) < SYSDATE
150: ) OR

Line 170: Error_Handler.Add_Error_Token

166: l_token_tbl(3).token_value :=
167: to_char(p_bom_revision_rec.start_effective_date);
168: l_token_tbl(4).token_name := 'ASSEMBLY_ITEM_NAME';
169: l_token_tbl(4).token_value := p_bom_revision_rec.assembly_item_name;
170: Error_Handler.Add_Error_Token
171: ( p_message_name => 'BOM_REV_START_DATE_LESS_CURR'
172: , p_mesg_token_tbl => l_mesg_token_tbl
173: , x_mesg_token_tbl => l_mesg_token_tbl
174: , p_token_tbl => l_token_tbl

Line 184: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

180: END Check_Entity;
181:
182: PROCEDURE Check_Required
183: ( x_return_status IN OUT NOCOPY VARCHAR2
184: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
185: , p_bom_revision_rec IN Bom_Bo_Pub.Bom_Revision_Rec_Type
186: )
187: IS
188: BEGIN

Line 192: Error_Handler.Add_Error_Token

188: BEGIN
189: IF p_bom_revision_rec.revision IS NULL OR
190: p_bom_revision_rec.revision = FND_API.G_MISS_CHAR
191: THEN
192: Error_Handler.Add_Error_Token
193: ( p_message_name => 'BOM_REVISION_REQUIRED'
194: , p_message_text => NULL
195: , x_mesg_token_tbl => x_mesg_token_tbl
196: );

Line 209: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

205: ( p_bom_revision_rec IN Bom_Bo_Pub.Bom_revision_Rec_Type
206: , p_bom_rev_unexp_rec IN Bom_Bo_Pub.Bom_Rev_Unexposed_Rec_Type
207: , x_old_bom_revision_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Revision_Rec_Type
208: , x_old_bom_rev_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Rev_Unexposed_Rec_Type
209: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
210: , x_return_status IN OUT NOCOPY VARCHAR2
211: )
212: IS
213: l_return_status VARCHAR2(1);

Line 214: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;

210: , x_return_status IN OUT NOCOPY VARCHAR2
211: )
212: IS
213: l_return_status VARCHAR2(1);
214: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;
215: l_token_tbl Error_Handler.Token_Tbl_Type;
216: BEGIN
217: Bom_Bom_Revision_Util.Query_Row
218: ( p_revision => p_bom_revision_rec.revision

Line 215: l_token_tbl Error_Handler.Token_Tbl_Type;

211: )
212: IS
213: l_return_status VARCHAR2(1);
214: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;
215: l_token_tbl Error_Handler.Token_Tbl_Type;
216: BEGIN
217: Bom_Bom_Revision_Util.Query_Row
218: ( p_revision => p_bom_revision_rec.revision
219: , p_assembly_item_id => p_bom_rev_unexp_rec.assembly_item_id

Line 235: Error_Handler.Add_Error_Token

231:
232: IF l_return_status = Bom_Globals.G_RECORD_FOUND AND
233: p_bom_revision_rec.transaction_type = Bom_Globals.G_OPR_CREATE
234: THEN
235: Error_Handler.Add_Error_Token
236: ( p_message_name => 'BOM_REVISION_ALREADY_EXISTS'
237: , p_message_text => NULL
238: , p_token_tbl => l_token_tbl
239: , p_mesg_token_tbl => l_mesg_token_tbl

Line 246: Error_Handler.Add_Error_Token

242: x_return_status := FND_API.G_RET_STS_ERROR;
243: ELSIF l_return_status = BOM_Globals.G_RECORD_NOT_FOUND AND
244: p_bom_revision_rec.transaction_type = Bom_Globals.G_OPR_UPDATE
245: THEN
246: Error_Handler.Add_Error_Token
247: ( p_message_name => 'BOM_REVISION_DOESNOT_EXIST'
248: , p_message_text => NULL
249: , p_mesg_token_tbl => l_mesg_token_tbl
250: , p_token_tbl => l_token_tbl

Line 256: Error_Handler.Add_Error_Token

252: );
253: x_return_status := FND_API.G_RET_STS_ERROR;
254: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
255: THEN
256: Error_Handler.Add_Error_Token
257: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
258: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
259: , p_message_name => NULL
260: , p_message_text =>