DBA Data[Home] [Help]

APPS.BOM_VALIDATE_RTG_REVISION dependencies on ERROR_HANDLER

Line 25: g_token_tbl Error_Handler.Token_Tbl_Type;

21: -- 22-DEC-00 Lochan Narvekar Modification
22: --
23: ****************************************************************************/
24: G_Pkg_Name VARCHAR2(30) := 'BOM_Validate_Rtg_Revision';
25: g_token_tbl Error_Handler.Token_Tbl_Type;
26:
27:
28: /*******************************************************************
29: * Procedure : Check_Existence

Line 52: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

48: ( p_rtg_revision_rec IN Bom_Rtg_Pub.Rtg_Revision_Rec_Type
49: , p_rtg_rev_unexp_rec IN Bom_Rtg_Pub.Rtg_Rev_Unexposed_Rec_Type
50: , x_old_rtg_revision_rec IN OUT NOCOPY Bom_Rtg_Pub.Rtg_Revision_Rec_Type
51: , x_old_rtg_rev_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rtg_Rev_Unexposed_Rec_Type
52: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
53: , x_return_status IN OUT NOCOPY VARCHAR2
54: )
55: IS
56: l_token_tbl Error_Handler.Token_Tbl_Type;

Line 56: l_token_tbl Error_Handler.Token_Tbl_Type;

52: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
53: , x_return_status IN OUT NOCOPY VARCHAR2
54: )
55: IS
56: l_token_tbl Error_Handler.Token_Tbl_Type;
57: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
58: l_return_status VARCHAR2(1);
59: BEGIN
60:

Line 57: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

53: , x_return_status IN OUT NOCOPY VARCHAR2
54: )
55: IS
56: l_token_tbl Error_Handler.Token_Tbl_Type;
57: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
58: l_return_status VARCHAR2(1);
59: BEGIN
60:
61: IF BOM_Rtg_Globals.Get_Debug = 'Y'

Line 62: THEN Error_Handler.Write_Debug('Quering Assembly item '

58: l_return_status VARCHAR2(1);
59: BEGIN
60:
61: IF BOM_Rtg_Globals.Get_Debug = 'Y'
62: THEN Error_Handler.Write_Debug('Quering Assembly item '
63: || to_char(p_rtg_rev_unexp_rec.assembly_item_id));
64: END IF;
65:
66: IF BOM_Rtg_Globals.Get_Debug = 'Y'

Line 67: THEN Error_Handler.Write_Debug(' Org: '

63: || to_char(p_rtg_rev_unexp_rec.assembly_item_id));
64: END IF;
65:
66: IF BOM_Rtg_Globals.Get_Debug = 'Y'
67: THEN Error_Handler.Write_Debug(' Org: '
68: || to_char(p_rtg_rev_unexp_rec.organization_id)) ;
69: END IF;
70:
71: IF BOM_Rtg_Globals.Get_Debug = 'Y'

Line 72: THEN Error_Handler.Write_Debug('Revision'

68: || to_char(p_rtg_rev_unexp_rec.organization_id)) ;
69: END IF;
70:
71: IF BOM_Rtg_Globals.Get_Debug = 'Y'
72: THEN Error_Handler.Write_Debug('Revision'
73: || p_rtg_revision_rec.revision );
74: END IF;
75:
76: Bom_Rtg_Revision_Util.Query_Row

Line 87: THEN Error_Handler.Write_Debug('Query Row Returned with : '

83: , x_rtg_rev_unexp_rec => x_old_rtg_rev_unexp_rec
84: , x_return_status => l_return_status
85: );
86: IF BOM_Rtg_Globals.Get_Debug = 'Y'
87: THEN Error_Handler.Write_Debug('Query Row Returned with : '
88: || l_return_status); END IF;
89:
90: IF l_return_status = BOM_Rtg_Globals.G_RECORD_FOUND AND
91: p_rtg_revision_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

Line 99: Error_Handler.Add_Error_Token

95: p_rtg_revision_rec.assembly_item_name;
96: l_token_tbl(2).token_name := 'REVISION';
97: l_token_tbl(2).token_value :=
98: p_rtg_revision_rec.revision;
99: Error_Handler.Add_Error_Token
100: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
101: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
102: , p_message_name => 'BOM_RTG_REV_ALREADY_EXISTS'
103: , p_token_tbl => l_token_tbl

Line 114: Error_Handler.Add_Error_Token

110: l_token_tbl(1).token_name := 'ASSEMBLY_ITEM_NAME';
111: l_token_tbl(1).token_value := p_rtg_revision_rec.assembly_item_name;
112: l_token_tbl(2).token_name := 'REVISION';
113: l_token_tbl(2).token_value := p_rtg_revision_rec.revision;
114: Error_Handler.Add_Error_Token
115: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
116: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
117: , p_message_name => 'BOM_RTG_REV_DOESNOT_EXISTS'
118: , p_token_tbl => l_token_tbl

Line 129: Error_Handler.Add_Error_Token

125: p_rtg_revision_rec.assembly_item_name;
126: l_token_tbl(2).token_name := 'REVISION';
127: l_token_tbl(2).token_value :=
128: p_rtg_revision_rec.revision;
129: Error_Handler.Add_Error_Token
130: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
131: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
132: , p_message_name => NULL
133: , p_message_text =>

Line 163: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

159: * revised item attrbiute in its entirety.
160: **********************************************************************/
161: PROCEDURE Check_Attributes
162: ( x_return_status IN OUT NOCOPY VARCHAR2
163: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
164: , p_rtg_revision_Rec IN Bom_Rtg_Pub.Rtg_Revision_Rec_Type
165: , p_rtg_rev_unexp_rec IN Bom_Rtg_Pub.Rtg_Rev_Unexposed_Rec_Type
166: , p_old_rtg_revision_rec IN Bom_Rtg_Pub.Rtg_Revision_Rec_Type
167: , p_old_rtg_rev_unexp_rec IN Bom_Rtg_Pub.Rtg_Rev_Unexposed_Rec_Type

Line 171: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

167: , p_old_rtg_rev_unexp_rec IN Bom_Rtg_Pub.Rtg_Rev_Unexposed_Rec_Type
168: )
169: IS
170: l_err_text VARCHAR2(2000) := NULL;
171: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
172: l_Token_Tbl Error_Handler.Token_Tbl_Type;
173: l_eco VARCHAR2(10):= NULL;
174: CURSOR c_created_by_eco IS
175: SELECT change_notice

Line 172: l_Token_Tbl Error_Handler.Token_Tbl_Type;

168: )
169: IS
170: l_err_text VARCHAR2(2000) := NULL;
171: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
172: l_Token_Tbl Error_Handler.Token_Tbl_Type;
173: l_eco VARCHAR2(10):= NULL;
174: CURSOR c_created_by_eco IS
175: SELECT change_notice
176: FROM mtl_rtg_item_revisions

Line 186: Error_Handler.Write_Debug(

182:
183: x_return_status := FND_API.G_RET_STS_SUCCESS;
184:
185: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
186: Error_Handler.Write_Debug(
187: 'Within Rtg Revision Check Attributes . . . ');
188: Error_Handler.Write_Debug(
189: 'transaction_type:'||p_rtg_revision_rec.transaction_type);
190: Error_Handler.Write_Debug(

Line 188: Error_Handler.Write_Debug(

184:
185: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
186: Error_Handler.Write_Debug(
187: 'Within Rtg Revision Check Attributes . . . ');
188: Error_Handler.Write_Debug(
189: 'transaction_type:'||p_rtg_revision_rec.transaction_type);
190: Error_Handler.Write_Debug(
191: 'change_notice:'||p_rtg_rev_unexp_rec.change_notice);
192: END IF;

Line 190: Error_Handler.Write_Debug(

186: Error_Handler.Write_Debug(
187: 'Within Rtg Revision Check Attributes . . . ');
188: Error_Handler.Write_Debug(
189: 'transaction_type:'||p_rtg_revision_rec.transaction_type);
190: Error_Handler.Write_Debug(
191: 'change_notice:'||p_rtg_rev_unexp_rec.change_notice);
192: END IF;
193:
194: IF p_rtg_revision_rec.transaction_type= BOM_Rtg_Globals.G_OPR_UPDATE

Line 201: Error_Handler.Write_Debug(

197: fetch c_created_by_eco into l_eco;
198: close c_created_by_eco;
199: IF l_eco IS NOT NULL AND l_eco <> FND_API.G_MISS_CHAR THEN
200: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
201: Error_Handler.Write_Debug(
202: 'Within Rtg Revision Check Attributes 1. . . ');
203: END IF;
204:
205: IF p_rtg_revision_rec.start_effective_date IS NOT NULL

Line 209: Error_Handler.Write_Debug

205: IF p_rtg_revision_rec.start_effective_date IS NOT NULL
206: AND p_rtg_revision_rec.start_effective_date <>
207: FND_API.G_MISS_DATE THEN
208: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
209: Error_Handler.Write_Debug
210: ('Within Rtg Revision Check Attributes 2. . . ');
211: END IF;
212:
213: l_token_tbl(1).token_name := 'ASSEMBLY_ITEM_NAME';

Line 222: Error_Handler.Add_Error_Token

218: p_rtg_revision_rec.revision;
219: l_token_tbl(2).token_name := 'START_EFFECITVE_DATE';
220: l_token_tbl(2).token_value :=
221: p_rtg_revision_rec.start_effective_date;
222: Error_Handler.Add_Error_Token
223: ( p_message_name =>
224: 'BOM_RTG_REV_EFFDT_NT_UPDATABLE'
225: , p_token_tbl => l_token_tbl
226: , p_mesg_token_tbl => l_mesg_token_tbl

Line 257: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

253: ( p_rtg_revision_rec IN Bom_Rtg_Pub.Rtg_Revision_Rec_Type
254: , p_rtg_rev_unexp_rec IN Bom_Rtg_Pub.Rtg_Rev_Unexposed_Rec_Type
255: , p_old_rtg_revision_rec IN Bom_Rtg_Pub.Rtg_Revision_Rec_Type
256: , p_old_rtg_rev_unexp_rec IN Bom_Rtg_Pub.Rtg_Rev_Unexposed_Rec_Type
257: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
258: , x_return_status IN OUT NOCOPY VARCHAR2
259: )
260: IS
261: CURSOR c_Get_Revision IS

Line 272: l_token_tbl Error_Handler.Token_Tbl_Type;

268: ORDER BY effectivity_date desc, process_revision desc;
269:
270: l_current_rev VARCHAR2(3);
271: l_effectivity_date DATE;
272: l_token_tbl Error_Handler.Token_Tbl_Type;
273: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
274: l_dummy NUMBER;
275: BEGIN
276:

Line 273: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

269:
270: l_current_rev VARCHAR2(3);
271: l_effectivity_date DATE;
272: l_token_tbl Error_Handler.Token_Tbl_Type;
273: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
274: l_dummy NUMBER;
275: BEGIN
276:
277: --

Line 297: Error_Handler.Add_Error_Token

293:
294: IF INSTR(p_rtg_revision_Rec.revision, '''') <> 0 THEN
295: x_return_status := FND_API.G_RET_STS_ERROR;
296:
297: Error_Handler.Add_Error_Token
298: ( p_mesg_token_tbl => l_mesg_token_tbl
299: ,x_mesg_token_tbl => l_mesg_token_tbl
300: ,p_message_name => 'BOM_RTG_REV_QUOTE_NOT_ALLOWED'
301: ,p_token_tbl => l_token_tbl

Line 319: Error_Handler.Add_Error_Token

315: p_rtg_revision_rec.revision <= l_current_rev)
316: THEN
317: l_token_tbl(3).token_name := 'CURRENT_REVISION';
318: l_token_tbl(3).token_value := l_current_rev;
319: Error_Handler.Add_Error_Token
320: ( p_message_name => 'BOM_NEXT_REVISION'
321: , p_mesg_token_tbl => l_mesg_token_tbl
322: , x_mesg_token_tbl => l_mesg_token_tbl
323: , p_token_tbl => l_token_tbl

Line 348: Error_Handler.Add_Error_Token

344: WHEN NO_DATA_FOUND THEN
345: x_return_status := FND_API.G_RET_STS_ERROR;
346: l_token_tbl.delete(2) ;
347:
348: Error_Handler.Add_Error_Token
349: ( p_mesg_token_tbl => l_mesg_token_tbl
350: ,x_mesg_token_tbl => l_mesg_token_tbl
351: ,p_message_name => 'BOM_RTG_REV_RTG_MISS'
352: ,p_token_tbl => l_token_tbl

Line 379: Error_Handler.Add_Error_Token

375: EXCEPTION
376: WHEN NO_DATA_FOUND then
377: x_return_status := FND_API.G_RET_STS_ERROR;
378:
379: Error_Handler.Add_Error_Token
380: ( p_mesg_token_tbl => l_mesg_token_tbl
381: ,x_mesg_token_tbl => l_mesg_token_tbl
382: ,p_message_name => 'BOM_RTG_REV_NOT_UNIQUE'
383: ,p_token_tbl => l_token_tbl

Line 409: Error_Handler.Add_Error_Token

405: x_return_status := FND_API.G_RET_STS_ERROR;
406: l_token_tbl(3).token_name := 'START_EFFECTIVE_DATE';
407: l_token_tbl(3).token_value :=
408: to_char(p_rtg_revision_rec.start_effective_date);
409: Error_Handler.Add_Error_Token
410: ( p_message_name => 'BOM_RTG_REV_START_DT_LESS_CURR'
411: , p_mesg_token_tbl => l_mesg_token_tbl
412: , x_mesg_token_tbl => l_mesg_token_tbl
413: , p_token_tbl => l_token_tbl

Line 451: Error_Handler.Add_Error_Token

447: l_token_tbl(3).token_name := 'START_EFFECTIVE_DATE';
448: l_token_tbl(3).token_value :=
449: to_char(p_rtg_revision_rec.start_effective_date);
450:
451: Error_Handler.Add_Error_Token
452: ( p_message_name => 'BOM_RTG_REV_START_DATE_INVALID'
453: , p_mesg_token_tbl => l_mesg_token_tbl
454: , x_mesg_token_tbl => l_mesg_token_tbl
455: , p_token_tbl => l_token_tbl

Line 471: Error_Handler.Add_Error_Token

467: AND process_revision = p_rtg_revision_rec.Revision;
468: IF trunc( l_effectivity_date) <= trunc(SYSDATE)
469: THEN
470: x_return_status := FND_API.G_RET_STS_ERROR;
471: Error_Handler.Add_Error_Token
472: ( p_message_name => 'BOM_RTG_REV_CANNOT_DELETE'
473: , p_mesg_token_tbl => l_mesg_token_tbl
474: , x_mesg_token_tbl => l_mesg_token_tbl
475: , p_token_tbl => l_token_tbl