DBA Data[Home] [Help]

APPS.ENG_VALIDATE_CHANGE_LINE dependencies on ERROR_HANDLER

Line 55: , x_mesg_token_tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

51: ( p_change_line_rec IN Eng_Eco_Pub.Change_Line_Rec_Type
52: , p_change_line_unexp_rec IN Eng_Eco_Pub.Change_Line_Unexposed_Rec_Type
53: , x_old_change_line_rec IN OUT NOCOPY Eng_Eco_Pub.Change_Line_Rec_Type
54: , x_old_change_line_unexp_rec IN OUT NOCOPY Eng_Eco_Pub.Change_Line_Unexposed_Rec_Type
55: , x_mesg_token_tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
56: , x_return_status OUT NOCOPY VARCHAR2
57: )
58: IS
59: l_token_tbl Error_Handler.Token_Tbl_Type;

Line 59: l_token_tbl Error_Handler.Token_Tbl_Type;

55: , x_mesg_token_tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
56: , x_return_status OUT NOCOPY VARCHAR2
57: )
58: IS
59: l_token_tbl Error_Handler.Token_Tbl_Type;
60: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;
61: l_return_status VARCHAR2(1);
62:
63: BEGIN

Line 60: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;

56: , x_return_status OUT NOCOPY VARCHAR2
57: )
58: IS
59: l_token_tbl Error_Handler.Token_Tbl_Type;
60: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;
61: l_return_status VARCHAR2(1);
62:
63: BEGIN
64:

Line 84: Error_Handler.Add_Error_Token

80:
81: IF l_return_status = Eng_Globals.G_RECORD_FOUND AND
82: p_change_line_rec.transaction_type = BOM_Globals.G_OPR_CREATE
83: THEN
84: Error_Handler.Add_Error_Token
85: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
86: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
87: , p_message_name => 'ENG_CL_ALREADY_EXISTS'
88: , p_token_tbl => l_token_tbl

Line 96: Error_Handler.Add_Error_Token

92: ELSIF l_return_status = Eng_Globals.G_RECORD_NOT_FOUND AND
93: p_change_line_rec.transaction_type IN
94: (ENG_Globals.G_OPR_UPDATE, ENG_Globals.G_OPR_DELETE )
95: THEN
96: Error_Handler.Add_Error_Token
97: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
98: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
99: , p_message_name => 'ENG_CL_DOESNOT_EXIST'
100: , p_token_tbl => l_token_tbl

Line 106: Error_Handler.Add_Error_Token

102: l_return_status := FND_API.G_RET_STS_ERROR ;
103:
104: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
105: THEN
106: Error_Handler.Add_Error_Token
107: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
108: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
109: , p_message_name => NULL
110: , p_message_text => 'Unexpected error while existence verification of '

Line 138: , x_mesg_token_tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

134: ********************************************************************/
135: PROCEDURE Check_Required
136: ( p_change_line_rec IN Eng_Eco_Pub.Change_Line_Rec_Type
137: , x_return_status OUT NOCOPY VARCHAR2
138: , x_mesg_token_tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
139: )
140: IS
141:
142: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;

Line 142: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;

138: , x_mesg_token_tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
139: )
140: IS
141:
142: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;
143: l_err_text VARCHAR(2000) ;
144: l_Token_Tbl Error_Handler.Token_Tbl_Type;
145:
146: BEGIN

Line 144: l_Token_Tbl Error_Handler.Token_Tbl_Type;

140: IS
141:
142: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;
143: l_err_text VARCHAR(2000) ;
144: l_Token_Tbl Error_Handler.Token_Tbl_Type;
145:
146: BEGIN
147: x_return_status := FND_API.G_RET_STS_SUCCESS;
148: l_Token_Tbl(1).token_name := 'LINE_NAME';

Line 159: Error_Handler.Add_Error_Token

155: p_change_line_rec.sequence_number = FND_API.G_MISS_NUM )
156: )
157: THEN
158:
159: Error_Handler.Add_Error_Token
160: ( p_message_name => 'ENG_CL_SEQ_NUM_REQUIRED'
161: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
162: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
163: , p_Token_Tbl => l_Token_Tbl

Line 180: Error_Handler.Add_Error_Token

176: AND p_change_line_rec.sequence_number > 0
177: )
178: THEN
179:
180: Error_Handler.Add_Error_Token
181: ( p_message_name => 'ENG_CL_CHANGE_TYPE_REQUIRED'
182: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
183: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
184: , p_Token_Tbl => l_Token_Tbl

Line 204: Error_Handler.Add_Error_Token

200: l_err_text := G_PKG_NAME || ' Validation (Check Required) '
201: || substrb(SQLERRM,1,200);
202: -- dbms_output.put_line('Unexpected Error: '||l_err_text);
203:
204: Error_Handler.Add_Error_Token
205: ( p_message_name => NULL
206: , p_message_text => l_err_text
207: , p_mesg_token_tbl => l_mesg_token_tbl
208: , x_mesg_token_tbl => l_mesg_token_tbl

Line 238: , x_mesg_token_tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

234: ( p_change_line_rec IN Eng_Eco_Pub.Change_Line_Rec_Type
235: , p_change_line_unexp_rec IN Eng_Eco_Pub.Change_Line_Unexposed_Rec_Type
236: , p_old_change_line_rec IN Eng_Eco_Pub.Change_Line_Rec_Type
237: , p_old_change_line_unexp_rec IN Eng_Eco_Pub.Change_Line_Unexposed_Rec_Type
238: , x_mesg_token_tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
239: , x_return_status OUT NOCOPY VARCHAR2
240: )
241: IS
242:

Line 245: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

241: IS
242:
243: l_return_status VARCHAR2(1);
244: l_err_text VARCHAR2(2000) ;
245: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
246: l_Token_Tbl Error_Handler.Token_Tbl_Type;
247:
248: BEGIN
249:

Line 246: l_Token_Tbl Error_Handler.Token_Tbl_Type;

242:
243: l_return_status VARCHAR2(1);
244: l_err_text VARCHAR2(2000) ;
245: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
246: l_Token_Tbl Error_Handler.Token_Tbl_Type;
247:
248: BEGIN
249:
250: l_return_status := FND_API.G_RET_STS_SUCCESS;

Line 265: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

261: IF p_change_line_rec.transaction_type = ENG_Globals.G_OPR_UPDATE
262: THEN
263:
264:
265: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
266: ('Change Line Attr Validation: Missing Value. . . ' || l_return_status) ;
267: END IF;
268:
269: -- Sequence Number

Line 272: Error_Handler.Add_Error_Token

268:
269: -- Sequence Number
270: IF p_change_line_rec.sequence_number = FND_API.G_MISS_NUM
271: THEN
272: Error_Handler.Add_Error_Token
273: ( p_Message_Name => 'ENG_CL_SEQ_NUM_MISSING'
274: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
275: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
276: , p_Token_Tbl => l_Token_Tbl

Line 285: Error_Handler.Add_Error_Token

281:
282: -- Change Type Code
283: IF p_change_line_rec.change_type_code = FND_API.G_MISS_CHAR
284: THEN
285: Error_Handler.Add_Error_Token
286: ( p_Message_Name => 'ENG_CL_CHANGE_TYPE_MISSING'
287: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
288: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
289: , p_Token_Tbl => l_Token_Tbl

Line 300: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

296: --
297: -- Check if the user is trying to create/update a record with
298: -- invalid value.
299: --
300: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
301: ('Change Line Attr Validation: Invalid Value. . . ' || l_return_status) ;
302: END IF;
303:
304: -- Sequence Number

Line 311: Error_Handler.Add_Error_Token

307: OR p_change_line_rec.sequence_number > 9999
308: )
309: THEN
310:
311: Error_Handler.Add_Error_Token
312: ( p_Message_Name => 'ENG_CL_SEQNUM_LESSTHAN_ZERO'
313: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
314: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
315: , p_Token_Tbl => l_Token_Tbl

Line 336: Error_Handler.Add_Error_Token

332: l_token_tbl(2).token_value := p_change_line_rec.Name;
333:
334: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
335: THEN
336: Error_Handler.Add_Error_Token
337: ( p_Message_Name => 'ENG_CL_CREATE_STAT_INVALID'
338: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
339: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
340: , p_Token_Tbl => l_Token_Tbl

Line 360: Error_Handler.Add_Error_Token

356: l_token_tbl(2).token_value := p_change_line_rec.Name;
357:
358: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
359: THEN
360: Error_Handler.Add_Error_Token
361: ( p_Message_Name => 'ENG_CL_CREATE_STAT_INVALID'
362: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
363: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
364: , p_Token_Tbl => l_Token_Tbl

Line 374: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

370:
371: --End of changes for Bug 2908248
372:
373: -- Done validating attributes
374: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
375: ('Change Line Attr Validation completed with return_status: ' || l_return_status) ;
376: END IF;
377:
378: x_return_status := l_return_status;

Line 384: IF BOM_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

380:
381: EXCEPTION
382: WHEN OTHERS THEN
383:
384: IF BOM_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
385: ('Some unknown error in Attribute Validation . . .' || SQLERRM );
386: END IF ;
387:
388:

Line 393: Error_Handler.Add_Error_Token

389: l_err_text := G_PKG_NAME || ' Validation (Attr. Validation) '
390: || substrb(SQLERRM,1,200);
391: -- dbms_output.put_line('Unexpected Error: '||l_err_text);
392:
393: Error_Handler.Add_Error_Token
394: ( p_message_name => NULL
395: , p_message_text => l_err_text
396: , p_mesg_token_tbl => l_mesg_token_tbl
397: , x_mesg_token_tbl => l_mesg_token_tbl

Line 421: , x_mesg_token_tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

417: PROCEDURE Check_Conditionally_Required
418: ( p_change_line_rec IN Eng_Eco_Pub.Change_Line_Rec_Type
419: , p_change_line_unexp_rec IN Eng_Eco_Pub.Change_Line_Unexposed_Rec_Type
420: , x_return_status OUT NOCOPY VARCHAR2
421: , x_mesg_token_tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
422: )
423: IS
424:
425: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;

Line 425: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;

421: , x_mesg_token_tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
422: )
423: IS
424:
425: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;
426: l_err_text VARCHAR(2000) ;
427: l_token_tbl Error_Handler.Token_Tbl_Type;
428:
429: BEGIN

Line 427: l_token_tbl Error_Handler.Token_Tbl_Type;

423: IS
424:
425: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;
426: l_err_text VARCHAR(2000) ;
427: l_token_tbl Error_Handler.Token_Tbl_Type;
428:
429: BEGIN
430:
431: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 445: Error_Handler.Add_Error_Token

441:
442: l_err_text := G_PKG_NAME || ' Validation (Check Conditionally Required) '
443: || substrb(SQLERRM,1,200);
444:
445: Error_Handler.Add_Error_Token
446: ( p_message_name => NULL
447: , p_message_text => l_err_text
448: , p_mesg_token_tbl => l_mesg_token_tbl
449: , x_mesg_token_tbl => l_mesg_token_tbl

Line 472: , x_mesg_token_tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

468: **********************************************************************/
469: PROCEDURE Check_Entity_Delete
470: ( p_change_line_rec IN Eng_Eco_Pub.Change_Line_Rec_Type
471: , p_change_line_unexp_rec IN Eng_Eco_Pub.Change_Line_Unexposed_Rec_Type
472: , x_mesg_token_tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
473: , x_return_status OUT NOCOPY VARCHAR2
474: )
475: IS
476:

Line 479: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

475: IS
476:
477: l_return_status VARCHAR2(1);
478: l_err_text VARCHAR2(2000) ;
479: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
480: l_Token_Tbl Error_Handler.Token_Tbl_Type;
481:
482:
483: BEGIN

Line 480: l_Token_Tbl Error_Handler.Token_Tbl_Type;

476:
477: l_return_status VARCHAR2(1);
478: l_err_text VARCHAR2(2000) ;
479: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
480: l_Token_Tbl Error_Handler.Token_Tbl_Type;
481:
482:
483: BEGIN
484:

Line 500: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

496: IF p_change_line_rec.transaction_type = ENG_Globals.G_OPR_DELETE
497: THEN
498:
499:
500: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
501: ('Change Line Entity Validation on Delete . . . ' || l_return_status) ;
502: END IF;
503:
504: END IF ;

Line 508: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

504: END IF ;
505:
506:
507: -- Done validating attributes
508: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
509: ('Change Line Entity Validation on Delete completed with return_status: ' || l_return_status) ;
510: END IF;
511:
512: x_return_status := l_return_status;

Line 518: IF BOM_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

514:
515: EXCEPTION
516: WHEN OTHERS THEN
517:
518: IF BOM_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
519: ('Some unknown error in Entity Validation on Delete. . .' || SQLERRM );
520: END IF ;
521:
522:

Line 527: Error_Handler.Add_Error_Token

523: l_err_text := G_PKG_NAME || ' Validation (Entiy Validation) '
524: || substrb(SQLERRM,1,200);
525: -- dbms_output.put_line('Unexpected Error: '||l_err_text);
526:
527: Error_Handler.Add_Error_Token
528: ( p_message_name => NULL
529: , p_message_text => l_err_text
530: , p_mesg_token_tbl => l_mesg_token_tbl
531: , x_mesg_token_tbl => l_mesg_token_tbl

Line 562: , x_mesg_token_tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

558: ( p_change_line_rec IN Eng_Eco_Pub.Change_Line_Rec_Type
559: , p_change_line_unexp_rec IN Eng_Eco_Pub.Change_Line_Unexposed_Rec_Type
560: , p_old_change_line_rec IN Eng_Eco_Pub.Change_Line_Rec_Type
561: , p_old_change_line_unexp_rec IN Eng_Eco_Pub.Change_Line_Unexposed_Rec_Type
562: , x_mesg_token_tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
563: , x_return_status OUT NOCOPY VARCHAR2
564: )
565: IS
566:

Line 576: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;

572:
573: -- Error Handlig Variables
574: l_return_status VARCHAR2(1);
575: l_err_text VARCHAR2(2000) ;
576: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;
577: l_token_tbl Error_Handler.Token_Tbl_Type;
578:
579: -- Get CL Item Attr. Value
580: CURSOR l_item_cur (p_org_id NUMBER, p_item_id NUMBER) IS

Line 577: l_token_tbl Error_Handler.Token_Tbl_Type;

573: -- Error Handlig Variables
574: l_return_status VARCHAR2(1);
575: l_err_text VARCHAR2(2000) ;
576: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;
577: l_token_tbl Error_Handler.Token_Tbl_Type;
578:
579: -- Get CL Item Attr. Value
580: CURSOR l_item_cur (p_org_id NUMBER, p_item_id NUMBER) IS
581: SELECT bom_item_type

Line 619: IF BOM_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

615: --
616:
617: l_return_status := FND_API.G_RET_STS_SUCCESS ;
618:
619: IF BOM_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
620: ('Performing Change Line Check Entitity Validation . . .') ;
621: END IF ;
622:
623:

Line 660: Error_Handler.Add_Error_Token

656: THEN
657: l_token_tbl(2).token_name := 'ITEM_NAME';
658: l_token_tbl(2).token_value := p_change_line_rec.item_name;
659:
660: Error_Handler.Add_Error_Token
661: ( p_message_name => 'BOM_CL_ITEM_BOM_NOT_ALLOWED'
662: , p_mesg_token_tbl => l_Mesg_Token_Tbl
663: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
664: , p_token_tbl => l_token_tbl

Line 679: Error_Handler.Add_Error_Token

675: THEN
676: l_token_tbl(2).token_name := 'ITEM_NAME';
677: l_token_tbl(2).token_value := p_change_line_rec.item_name;
678:
679: Error_Handler.Add_Error_Token
680: ( p_message_name => 'BOM_CL_ITEM_PTO_ITEM'
681: , p_mesg_token_tbl => l_Mesg_Token_Tbl
682: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
683: , p_token_tbl => l_token_tbl

Line 698: Error_Handler.Add_Error_Token

694: THEN
695: l_token_tbl(2).token_name := 'ITEM_NAME';
696: l_token_tbl(2).token_value := p_change_line_rec.item_name;
697:
698: Error_Handler.Add_Error_Token
699: ( p_message_name => 'BOM_CL_ITEM_PLANNING_ITEM'
700: , p_mesg_token_tbl => l_Mesg_Token_Tbl
701: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
702: , p_token_tbl => l_token_tbl

Line 733: Error_Handler.Add_Error_Token

729:
730: l_token_tbl(2).token_name := 'SEQ_NUM';
731: l_token_tbl(2).token_value := p_change_line_rec.sequence_number;
732:
733: Error_Handler.Add_Error_Token
734: ( p_message_name => 'BOM_OP_NOT_UNIQUE'
735: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
736: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
737: , p_Token_Tbl => l_Token_Tbl

Line 743: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

739: l_return_status := FND_API.G_RET_STS_ERROR ;
740:
741: END LOOP ;
742:
743: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
744: ('Check uniqueness of the sequence number . . . ' || l_return_status) ;
745: END IF ;
746:
747: END IF ;

Line 760: IF BOM_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

756:
757: EXCEPTION
758: WHEN OTHERS THEN
759:
760: IF BOM_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
761: ('Some unknown error in Entity Validation . . .' || SQLERRM );
762: END IF ;
763:
764:

Line 768: Error_Handler.Add_Error_Token

764:
765: l_err_text := G_PKG_NAME || ' Validation (Entity Validation) '
766: || substrb(SQLERRM,1,200);
767:
768: Error_Handler.Add_Error_Token
769: ( p_message_name => NULL
770: , p_message_text => l_err_text
771: , p_mesg_token_tbl => l_mesg_token_tbl
772: , x_mesg_token_tbl => l_mesg_token_tbl

Line 795: , p_Mesg_Token_Tbl IN Error_Handler.Mesg_Token_Tbl_Type :=

791: ********************************************************************/
792: PROCEDURE Check_Access
793: ( p_change_line_rec IN Eng_Eco_Pub.Change_Line_Rec_Type
794: , p_change_line_unexp_rec IN Eng_Eco_Pub.Change_Line_Unexposed_Rec_Type
795: , p_Mesg_Token_Tbl IN Error_Handler.Mesg_Token_Tbl_Type :=
796: Error_Handler.G_MISS_MESG_TOKEN_TBL
797: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
798: , x_Return_Status OUT NOCOPY VARCHAR2
799: )

Line 796: Error_Handler.G_MISS_MESG_TOKEN_TBL

792: PROCEDURE Check_Access
793: ( p_change_line_rec IN Eng_Eco_Pub.Change_Line_Rec_Type
794: , p_change_line_unexp_rec IN Eng_Eco_Pub.Change_Line_Unexposed_Rec_Type
795: , p_Mesg_Token_Tbl IN Error_Handler.Mesg_Token_Tbl_Type :=
796: Error_Handler.G_MISS_MESG_TOKEN_TBL
797: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
798: , x_Return_Status OUT NOCOPY VARCHAR2
799: )
800: IS

Line 797: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

793: ( p_change_line_rec IN Eng_Eco_Pub.Change_Line_Rec_Type
794: , p_change_line_unexp_rec IN Eng_Eco_Pub.Change_Line_Unexposed_Rec_Type
795: , p_Mesg_Token_Tbl IN Error_Handler.Mesg_Token_Tbl_Type :=
796: Error_Handler.G_MISS_MESG_TOKEN_TBL
797: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
798: , x_Return_Status OUT NOCOPY VARCHAR2
799: )
800: IS
801: BEGIN

Line 813: , p_Mesg_Token_Tbl IN Error_Handler.Mesg_Token_Tbl_Type :=

809: , p_item_revision IN VARCHAR2
810: , p_item_name IN VARCHAR2
811: , p_item_id IN NUMBER
812: , p_item_revision_id IN NUMBER
813: , p_Mesg_Token_Tbl IN Error_Handler.Mesg_Token_Tbl_Type :=
814: Error_Handler.G_MISS_MESG_TOKEN_TBL
815: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
816: , x_Return_Status OUT NOCOPY VARCHAR2
817: )

Line 814: Error_Handler.G_MISS_MESG_TOKEN_TBL

810: , p_item_name IN VARCHAR2
811: , p_item_id IN NUMBER
812: , p_item_revision_id IN NUMBER
813: , p_Mesg_Token_Tbl IN Error_Handler.Mesg_Token_Tbl_Type :=
814: Error_Handler.G_MISS_MESG_TOKEN_TBL
815: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
816: , x_Return_Status OUT NOCOPY VARCHAR2
817: )
818: IS

Line 815: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

811: , p_item_id IN NUMBER
812: , p_item_revision_id IN NUMBER
813: , p_Mesg_Token_Tbl IN Error_Handler.Mesg_Token_Tbl_Type :=
814: Error_Handler.G_MISS_MESG_TOKEN_TBL
815: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
816: , x_Return_Status OUT NOCOPY VARCHAR2
817: )
818: IS
819: l_Token_Tbl Error_Handler.Token_Tbl_Type;

Line 819: l_Token_Tbl Error_Handler.Token_Tbl_Type;

815: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
816: , x_Return_Status OUT NOCOPY VARCHAR2
817: )
818: IS
819: l_Token_Tbl Error_Handler.Token_Tbl_Type;
820: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type :=
821: p_Mesg_Token_Tbl;
822: l_return_status VARCHAR2(1);
823:

Line 820: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type :=

816: , x_Return_Status OUT NOCOPY VARCHAR2
817: )
818: IS
819: l_Token_Tbl Error_Handler.Token_Tbl_Type;
820: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type :=
821: p_Mesg_Token_Tbl;
822: l_return_status VARCHAR2(1);
823:
824: CURSOR c_ItemType IS

Line 853: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('no access to standard items'); END IF;

849: THEN
850: BOM_Globals.Set_STD_Item_Access
851: ( p_std_item_access => 4);
852: ELSE
853: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('no access to standard items'); END IF;
854: BOM_Globals.Set_STD_Item_Access
855: (p_std_item_access => NULL);
856: END IF;
857:

Line 886: Error_Handler.Add_Error_Token

882: FOR item_rec IN c_ItemType
883: LOOP
884: IF item_rec.Bom_Item_Type = 5
885: THEN
886: Error_Handler.Add_Error_Token
887: ( p_Message_Name => 'ENG_CL_ITEM_PROD_FAMILY'
888: , p_Mesg_Token_Tbl => l_mesg_token_tbl
889: , x_Mesg_Token_Tbl => l_mesg_token_tbl
890: , p_Token_Tbl => l_token_tbl

Line 917: Error_Handler.Add_Error_Token

913: THEN
914: l_Token_Tbl(2).Token_Value := 'ENG_STANDARD';
915: END IF;
916:
917: Error_Handler.Add_Error_Token
918: ( p_Message_Name => 'ENG_CL_ITEM_ACCESS_DENIED'
919: , p_Mesg_Token_Tbl => l_mesg_token_tbl
920: , x_Mesg_Token_Tbl => l_mesg_token_tbl
921: , p_Token_Tbl => l_token_tbl

Line 932: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item Check Access returning . . . ' || l_return_status);

928:
929: -- If all the access checks are satisfied then return a status of
930: -- success, else return error.
931: --
932: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item Check Access returning . . . ' || l_return_status);
933: END IF;
934:
935: x_Return_Status := l_return_status;
936: x_Mesg_Token_Tbl := l_mesg_token_tbl;