43: , p_effectivity_date IN DATE
44: , p_routing_sequence_id IN NUMBER
45: , p_operation_type IN NUMBER
46: , p_mesg_token_tbl IN Error_Handler.Mesg_Token_Tbl_Type
47: , x_operation_rec IN OUT NOCOPY Bom_Rtg_Pub.Operation_Rec_Type
48: , x_op_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Unexposed_Rec_Type
49: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
50: , x_return_status IN OUT NOCOPY VARCHAR2
51: )
44: , p_routing_sequence_id IN NUMBER
45: , p_operation_type IN NUMBER
46: , p_mesg_token_tbl IN Error_Handler.Mesg_Token_Tbl_Type
47: , x_operation_rec IN OUT NOCOPY Bom_Rtg_Pub.Operation_Rec_Type
48: , x_op_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Unexposed_Rec_Type
49: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
50: , x_return_status IN OUT NOCOPY VARCHAR2
51: )
52:
53:
54: IS
55:
56: /* Define Variable */
57: l_com_operation_rec Bom_Rtg_Pub.Com_Operation_Rec_Type ;
58: l_com_op_unexp_rec Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type;
59: l_err_text VARCHAR2(2000);
60:
61: BEGIN
54: IS
55:
56: /* Define Variable */
57: l_com_operation_rec Bom_Rtg_Pub.Com_Operation_Rec_Type ;
58: l_com_op_unexp_rec Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type;
59: l_err_text VARCHAR2(2000);
60:
61: BEGIN
62:
74: , x_return_status => x_return_status
75: ) ;
76:
77: -- Convert the ECO record to Routing Record
78: Bom_Rtg_Pub.Convert_ComOp_To_RtgOp
79: ( p_com_operation_rec => l_com_operation_rec
80: , p_com_op_unexp_rec => l_com_op_unexp_rec
81: , x_rtg_operation_rec => x_operation_rec
82: , x_rtg_op_unexp_rec => x_op_unexp_rec
102: , p_effectivity_date IN DATE
103: , p_routing_sequence_id IN NUMBER
104: , p_operation_type IN NUMBER
105: , p_mesg_token_tbl IN Error_Handler.Mesg_Token_Tbl_Type
106: , x_rev_operation_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Operation_Rec_Type
107: , x_rev_op_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Unexposed_Rec_Type
108: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
109: , x_return_status IN OUT NOCOPY VARCHAR2
110: )
103: , p_routing_sequence_id IN NUMBER
104: , p_operation_type IN NUMBER
105: , p_mesg_token_tbl IN Error_Handler.Mesg_Token_Tbl_Type
106: , x_rev_operation_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Operation_Rec_Type
107: , x_rev_op_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Unexposed_Rec_Type
108: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
109: , x_return_status IN OUT NOCOPY VARCHAR2
110: )
111:
112:
113: IS
114:
115: /* Define Variable */
116: l_com_operation_rec Bom_Rtg_Pub.Com_Operation_Rec_Type ;
117: l_com_op_unexp_rec Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type;
118: l_err_text VARCHAR2(2000);
119:
120: BEGIN
113: IS
114:
115: /* Define Variable */
116: l_com_operation_rec Bom_Rtg_Pub.Com_Operation_Rec_Type ;
117: l_com_op_unexp_rec Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type;
118: l_err_text VARCHAR2(2000);
119:
120: BEGIN
121:
133: , x_return_status => x_return_status
134: );
135:
136: -- Convert the Common record to Revised Operation record
137: Bom_Rtg_Pub.Convert_ComOp_To_EcoOp
138: ( p_com_operation_rec => l_com_operation_rec
139: , p_com_op_unexp_rec => l_com_op_unexp_rec
140: , x_rev_operation_rec => x_rev_operation_rec
141: , x_rev_op_unexp_rec => x_rev_op_unexp_rec
165: , p_effectivity_date IN DATE
166: , p_routing_sequence_id IN NUMBER
167: , p_operation_type IN NUMBER
168: , p_mesg_token_tbl IN Error_Handler.Mesg_Token_Tbl_Type
169: , x_com_operation_rec IN OUT NOCOPY Bom_Rtg_Pub.Com_Operation_Rec_Type
170: , x_com_op_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type
171: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
172: , x_return_status IN OUT NOCOPY VARCHAR2
173: )
166: , p_routing_sequence_id IN NUMBER
167: , p_operation_type IN NUMBER
168: , p_mesg_token_tbl IN Error_Handler.Mesg_Token_Tbl_Type
169: , x_com_operation_rec IN OUT NOCOPY Bom_Rtg_Pub.Com_Operation_Rec_Type
170: , x_com_op_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type
171: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
172: , x_return_status IN OUT NOCOPY VARCHAR2
173: )
174: IS
173: )
174: IS
175:
176: /* Define Variable */
177: l_com_operation_rec Bom_Rtg_Pub.Com_Operation_Rec_Type ;
178: l_com_op_unexp_rec Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type;
179: l_bo_id VARCHAR2(3) ;
180: l_err_text VARCHAR2(2000);
181:
174: IS
175:
176: /* Define Variable */
177: l_com_operation_rec Bom_Rtg_Pub.Com_Operation_Rec_Type ;
178: l_com_op_unexp_rec Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type;
179: l_bo_id VARCHAR2(3) ;
180: l_err_text VARCHAR2(2000);
181:
182:
361: * user has to perform any insert/update/deletes to the
362: * Operation Sequences table.
363: *********************************************************************/
364: PROCEDURE Perform_Writes
365: ( p_operation_rec IN Bom_Rtg_Pub.Operation_Rec_Type
366: , p_op_unexp_rec IN Bom_Rtg_Pub.Op_Unexposed_Rec_Type
367: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
368: , x_return_status IN OUT NOCOPY VARCHAR2
369: )
362: * Operation Sequences table.
363: *********************************************************************/
364: PROCEDURE Perform_Writes
365: ( p_operation_rec IN Bom_Rtg_Pub.Operation_Rec_Type
366: , p_op_unexp_rec IN Bom_Rtg_Pub.Op_Unexposed_Rec_Type
367: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
368: , x_return_status IN OUT NOCOPY VARCHAR2
369: )
370: IS
367: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
368: , x_return_status IN OUT NOCOPY VARCHAR2
369: )
370: IS
371: l_com_operation_rec Bom_Rtg_Pub.Com_Operation_Rec_Type ;
372: l_com_op_unexp_rec Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type ;
373:
374: BEGIN
375: -- Convert Routing Operation to Common Operation
368: , x_return_status IN OUT NOCOPY VARCHAR2
369: )
370: IS
371: l_com_operation_rec Bom_Rtg_Pub.Com_Operation_Rec_Type ;
372: l_com_op_unexp_rec Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type ;
373:
374: BEGIN
375: -- Convert Routing Operation to Common Operation
376: Bom_Rtg_Pub.Convert_RtgOp_To_ComOp
372: l_com_op_unexp_rec Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type ;
373:
374: BEGIN
375: -- Convert Routing Operation to Common Operation
376: Bom_Rtg_Pub.Convert_RtgOp_To_ComOp
377: ( p_rtg_operation_rec => p_operation_rec
378: , p_rtg_op_unexp_rec => p_op_unexp_rec
379: , x_com_operation_rec => l_com_operation_rec
380: , x_com_op_unexp_rec => l_com_op_unexp_rec
384:
385: Bom_Op_Seq_UTIL.Perform_Writes
386: ( p_com_operation_rec => l_com_operation_rec
387: , p_com_op_unexp_rec => l_com_op_unexp_rec
388: , p_control_rec => Bom_Rtg_Pub.G_DEFAULT_CONTROL_REC
389: , x_return_status => x_return_status
390: , x_mesg_token_tbl => x_mesg_token_tbl
391: ) ;
392:
406: * user has to perform any insert/update/deletes to the
407: * Operation Sequences table.
408: *********************************************************************/
409: PROCEDURE Perform_Writes
410: ( p_rev_operation_rec IN Bom_Rtg_Pub.Rev_Operation_Rec_Type
411: , p_rev_op_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Unexposed_Rec_Type
412: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
413: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
414: , x_return_status IN OUT NOCOPY VARCHAR2
407: * Operation Sequences table.
408: *********************************************************************/
409: PROCEDURE Perform_Writes
410: ( p_rev_operation_rec IN Bom_Rtg_Pub.Rev_Operation_Rec_Type
411: , p_rev_op_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Unexposed_Rec_Type
412: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
413: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
414: , x_return_status IN OUT NOCOPY VARCHAR2
415: )
408: *********************************************************************/
409: PROCEDURE Perform_Writes
410: ( p_rev_operation_rec IN Bom_Rtg_Pub.Rev_Operation_Rec_Type
411: , p_rev_op_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Unexposed_Rec_Type
412: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
413: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
414: , x_return_status IN OUT NOCOPY VARCHAR2
415: )
416: IS
413: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
414: , x_return_status IN OUT NOCOPY VARCHAR2
415: )
416: IS
417: l_com_operation_rec Bom_Rtg_Pub.Com_Operation_Rec_Type ;
418: l_com_op_unexp_rec Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type ;
419:
420: BEGIN
421: -- Convert Revised Operation to Common Operation
414: , x_return_status IN OUT NOCOPY VARCHAR2
415: )
416: IS
417: l_com_operation_rec Bom_Rtg_Pub.Com_Operation_Rec_Type ;
418: l_com_op_unexp_rec Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type ;
419:
420: BEGIN
421: -- Convert Revised Operation to Common Operation
422: Bom_Rtg_Pub.Convert_EcoOp_To_ComOp
418: l_com_op_unexp_rec Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type ;
419:
420: BEGIN
421: -- Convert Revised Operation to Common Operation
422: Bom_Rtg_Pub.Convert_EcoOp_To_ComOp
423: ( p_rev_operation_rec => p_rev_operation_rec
424: , p_rev_op_unexp_rec => p_rev_op_unexp_rec
425: , x_com_operation_rec => l_com_operation_rec
426: , x_com_op_unexp_rec => l_com_op_unexp_rec
430: -- Call Perform Writes Procedure
431: Bom_Op_Seq_UTIL.Perform_Writes
432: ( p_com_operation_rec => l_com_operation_rec
433: , p_com_op_unexp_rec => l_com_op_unexp_rec
434: , p_control_rec => Bom_Rtg_Pub.G_DEFAULT_CONTROL_REC
435: , x_return_status => x_return_status
436: , x_mesg_token_tbl => x_mesg_token_tbl
437: ) ;
438:
449: * Operation Sequences table.
450: *********************************************************************/
451:
452: PROCEDURE Perform_Writes
453: ( p_com_operation_rec IN Bom_Rtg_Pub.Com_Operation_Rec_Type
454: , p_com_op_unexp_rec IN Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type
455: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
456: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
457: , x_return_status IN OUT NOCOPY VARCHAR2
450: *********************************************************************/
451:
452: PROCEDURE Perform_Writes
453: ( p_com_operation_rec IN Bom_Rtg_Pub.Com_Operation_Rec_Type
454: , p_com_op_unexp_rec IN Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type
455: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
456: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
457: , x_return_status IN OUT NOCOPY VARCHAR2
458: )
451:
452: PROCEDURE Perform_Writes
453: ( p_com_operation_rec IN Bom_Rtg_Pub.Com_Operation_Rec_Type
454: , p_com_op_unexp_rec IN Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type
455: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
456: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
457: , x_return_status IN OUT NOCOPY VARCHAR2
458: )
459:
458: )
459:
460: IS
461:
462: l_com_operation_rec Bom_Rtg_Pub.Com_Operation_Rec_Type ;
463: l_com_op_unexp_rec Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type ;
464: l_routing_sequence_id NUMBER ; -- Routing Sequence Id
465: l_routing_type NUMBER ; -- Routing Type
466:
459:
460: IS
461:
462: l_com_operation_rec Bom_Rtg_Pub.Com_Operation_Rec_Type ;
463: l_com_op_unexp_rec Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type ;
464: l_routing_sequence_id NUMBER ; -- Routing Sequence Id
465: l_routing_type NUMBER ; -- Routing Type
466:
467: -- Error Handlig Variables
1423: * table; BOM_OPERATION_SEQUENCES.
1424: *
1425: *****************************************************************************/
1426: PROCEDURE Insert_Row
1427: ( p_com_operation_rec IN Bom_Rtg_Pub.Com_Operation_Rec_Type
1428: , p_com_op_unexp_rec IN Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type
1429: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1430: , x_return_status IN OUT NOCOPY VARCHAR2
1431: )
1424: *
1425: *****************************************************************************/
1426: PROCEDURE Insert_Row
1427: ( p_com_operation_rec IN Bom_Rtg_Pub.Com_Operation_Rec_Type
1428: , p_com_op_unexp_rec IN Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type
1429: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1430: , x_return_status IN OUT NOCOPY VARCHAR2
1431: )
1432: IS
1719: * the user given values. Any errors will be returned by filling
1720: * the Mesg_Token_Tbl and setting the return_status.
1721: ****************************************************************************/
1722: PROCEDURE Update_Row
1723: ( p_com_operation_rec IN Bom_Rtg_Pub.Com_Operation_Rec_Type
1724: , p_com_op_unexp_rec IN Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type
1725: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1726: , x_return_status IN OUT NOCOPY VARCHAR2
1727: )
1720: * the Mesg_Token_Tbl and setting the return_status.
1721: ****************************************************************************/
1722: PROCEDURE Update_Row
1723: ( p_com_operation_rec IN Bom_Rtg_Pub.Com_Operation_Rec_Type
1724: , p_com_op_unexp_rec IN Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type
1725: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1726: , x_return_status IN OUT NOCOPY VARCHAR2
1727: )
1728: IS
1888: * For RTG BO, Procedure will perfrom an Delete from the
1889: * BOM_Operation_Sequences by creating a delete Group.
1890: *********************************************************************/
1891: PROCEDURE Delete_Row
1892: ( p_com_operation_rec IN Bom_Rtg_Pub.Com_Operation_Rec_Type
1893: , p_com_op_unexp_rec IN Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type
1894: , x_com_operation_rec IN OUT NOCOPY Bom_Rtg_Pub.Com_Operation_Rec_Type
1895: , x_com_op_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type
1896: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1889: * BOM_Operation_Sequences by creating a delete Group.
1890: *********************************************************************/
1891: PROCEDURE Delete_Row
1892: ( p_com_operation_rec IN Bom_Rtg_Pub.Com_Operation_Rec_Type
1893: , p_com_op_unexp_rec IN Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type
1894: , x_com_operation_rec IN OUT NOCOPY Bom_Rtg_Pub.Com_Operation_Rec_Type
1895: , x_com_op_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type
1896: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1897: , x_return_status IN OUT NOCOPY VARCHAR2
1890: *********************************************************************/
1891: PROCEDURE Delete_Row
1892: ( p_com_operation_rec IN Bom_Rtg_Pub.Com_Operation_Rec_Type
1893: , p_com_op_unexp_rec IN Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type
1894: , x_com_operation_rec IN OUT NOCOPY Bom_Rtg_Pub.Com_Operation_Rec_Type
1895: , x_com_op_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type
1896: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1897: , x_return_status IN OUT NOCOPY VARCHAR2
1898: )
1891: PROCEDURE Delete_Row
1892: ( p_com_operation_rec IN Bom_Rtg_Pub.Com_Operation_Rec_Type
1893: , p_com_op_unexp_rec IN Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type
1894: , x_com_operation_rec IN OUT NOCOPY Bom_Rtg_Pub.Com_Operation_Rec_Type
1895: , x_com_op_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type
1896: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1897: , x_return_status IN OUT NOCOPY VARCHAR2
1898: )
1899: IS
1897: , x_return_status IN OUT NOCOPY VARCHAR2
1898: )
1899: IS
1900:
1901: l_com_operation_rec Bom_Rtg_Pub.Com_Operation_Rec_Type ;
1902: l_com_op_unexp_rec Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type ;
1903: l_dg_sequence_id NUMBER;
1904:
1905:
1898: )
1899: IS
1900:
1901: l_com_operation_rec Bom_Rtg_Pub.Com_Operation_Rec_Type ;
1902: l_com_op_unexp_rec Bom_Rtg_Pub.Com_Op_Unexposed_Rec_Type ;
1903: l_dg_sequence_id NUMBER;
1904:
1905:
1906: -- Error Handlig Variables