[Home] [Help]
202: g_assy_item_type NUMBER ;
203:
204: BEGIN
205: -- If Assembly Item Type = Model or Option, Return 1:Yes
206: -- Else If Assembly Item Type = Standard, Return 2:No
207: SELECT bom_item_type
208: INTO g_assy_item_type
209: FROM MTL_SYSTEM_ITEMS
210: WHERE organization_id = p_organization_id
383: * Common Old Operation unexposed column record
384: * Parameters out: Return Status
385: * Message Token Table
386: * Purpose : Check_Ref_Operation validate Reference flag and
387: * Standard Operation. If Std Op is not null
388: * Set Standard Operation infor to exposed and unexposed
389: * coulumns regarding reference flag
390: **********************************************************************/
391: PROCEDURE Default_Std_Op_Attributes
384: * Parameters out: Return Status
385: * Message Token Table
386: * Purpose : Check_Ref_Operation validate Reference flag and
387: * Standard Operation. If Std Op is not null
388: * Set Standard Operation infor to exposed and unexposed
389: * coulumns regarding reference flag
390: **********************************************************************/
391: PROCEDURE Default_Std_Op_Attributes
392: ( p_com_operation_rec IN Bom_Rtg_Pub.Com_Operation_Rec_Type
422: FROM BOM_OPERATION_RESOURCES
423: WHERE operation_sequence_id = p_op_seq_id
424: ) ;
425:
426: -- Get Standard Operation Info.
427: CURSOR l_stdop_csr( p_std_op_id NUMBER
428: , p_op_type NUMBER
429: , p_rtg_seq_id NUMBER
430: , p_org_id NUMBER
465: , bso.show_next_op_by_default
466: , bso.show_scrap_code
467: , bso.show_lot_attrib
468: , bso.track_multiple_res_usage_dates -- End of MES Changes
469: FROM BOM_STANDARD_OPERATIONS bso
470: , bom_operational_routings bor
471: WHERE NVL(bso.operation_type,1 )
472: = DECODE(p_op_type, FND_API.G_MISS_NUM, 1
473: , NVL(p_op_type, 1))
474: AND NVL(bso.line_id, FND_API.G_MISS_NUM)
475: = NVL(bor.line_id, FND_API.G_MISS_NUM)
476: AND bor.routing_sequence_id = p_rtg_seq_id
477: AND bso.organization_id = p_org_id
478: AND bso.standard_operation_id = p_std_op_id
479: UNION
480: SELECT bso.department_id
481: , bso.minimum_transfer_quantity
482: , bso.count_point_type
510: , bso.show_next_op_by_default
511: , bso.show_scrap_code
512: , bso.show_lot_attrib
513: , bso.track_multiple_res_usage_dates -- End of MES Changes
514: FROM BOM_STANDARD_OPERATIONS bso
515: -- , ENG_REVISED_ITEMS eri --Bug : 3640944 By AMALVIYA
516: WHERE NVL(bso.operation_type, 1)
517: = DECODE( p_op_type, FND_API.G_MISS_NUM, 1
518: , NVL(p_op_type, 1 ) )
520: -- = NVL(eri.line_id, FND_API.G_MISS_NUM)
521: -- AND eri.revised_item_sequence_id = p_rev_item_sequence_id
522: AND BOM_Rtg_Globals.Get_Routing_Sequence_Id IS NULL
523: AND bso.organization_id = p_org_id
524: AND bso.standard_operation_id = p_std_op_id
525: ;
526:
527:
528: BEGIN
537:
538: l_return_status := FND_API.G_RET_STS_SUCCESS;
539:
540: --
541: -- Standard Operation has changed to not null value
542: --
543: IF NVL(l_com_operation_rec.acd_type,l_ACD_ADD) = l_ACD_ADD
544: -- OR l_com_operation_rec.acd_type = l_ACD_CHANGE
545: THEN
594: IF l_copy_std_op AND l_com_operation_rec.reference_flag <> 1 -- Yes
595: THEN
596: l_std_op_found := FALSE ;
597: --
598: -- Get Standard Operatin Information
599: --
600:
601: /*
602: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
599: --
600:
601: /*
602: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
603: Error_Handler.Write_Debug('std op id '||to_char(l_com_op_unexp_rec.standard_operation_id) ) ;
604: Error_Handler.Write_Debug('op type '||to_char(l_com_operation_rec.operation_type) ) ;
605: Error_Handler.Write_Debug('rtg seq id '||to_char(l_com_op_unexp_rec.routing_sequence_id) ) ;
606: Error_Handler.Write_Debug('org id '||to_char(l_com_op_unexp_rec.organization_id) ) ;
607: Error_Handler.Write_Debug('dept id '||to_char(l_com_op_unexp_rec.department_id) ) ;
610: */
611:
612:
613: FOR l_stdop_rec IN l_stdop_csr
614: ( p_std_op_id => l_com_op_unexp_rec.standard_operation_id
615: , p_op_type => l_com_operation_rec.operation_type
616: , p_rtg_seq_id => l_com_op_unexp_rec.routing_sequence_id
617: , p_org_id => l_com_op_unexp_rec.organization_id
618: , p_dept_id => l_com_op_unexp_rec.department_id
621: LOOP
622: l_std_op_found := TRUE ;
623:
624: --
625: -- Set Standard Operation Value to Operation Exp and Unexp Rec.
626: --
627: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
628: ('Set Standard Operation Value to Null Operation columns.. . . ' ) ;
629: END IF ;
624: --
625: -- Set Standard Operation Value to Operation Exp and Unexp Rec.
626: --
627: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
628: ('Set Standard Operation Value to Null Operation columns.. . . ' ) ;
629: END IF ;
630:
631:
632: IF l_com_op_unexp_rec.department_id IS NULL OR
709: l_com_op_unexp_rec.Show_scrap_code := NVL(l_com_op_unexp_rec.Show_scrap_code,l_stdop_rec.Show_scrap_code) ;
710: l_com_op_unexp_rec.Show_lot_attrib := NVL(l_com_op_unexp_rec.Show_lot_attrib,l_stdop_rec.Show_lot_attrib) ;
711: l_com_op_unexp_rec.Track_multiple_res_usage_dates := NVL(l_com_op_unexp_rec.Track_multiple_res_usage_dates,l_stdop_rec.Track_multiple_res_usage_dates) ; -- End of MES Changes
712:
713: END LOOP ; -- copy standard operation
714:
715: --
716: -- If reference flag is Yes( operation columns corresponding to
717: -- columns in Standard Operations), the values should not be changed
713: END LOOP ; -- copy standard operation
714:
715: --
716: -- If reference flag is Yes( operation columns corresponding to
717: -- columns in Standard Operations), the values should not be changed
718: -- when referenced.
719: --
720: ELSIF l_copy_std_op AND l_com_operation_rec.reference_flag = 1 -- Yes
721: THEN
720: ELSIF l_copy_std_op AND l_com_operation_rec.reference_flag = 1 -- Yes
721: THEN
722:
723: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
724: ('Reference flag is Yes, then the operation columns corresponding to in Standard Operations . . . ' ) ;
725: END IF ;
726: --
727: -- Get Standard Operatin Information
728: --
723: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
724: ('Reference flag is Yes, then the operation columns corresponding to in Standard Operations . . . ' ) ;
725: END IF ;
726: --
727: -- Get Standard Operatin Information
728: --
729: FOR l_stdop_rec IN l_stdop_csr
730: ( p_std_op_id => l_com_op_unexp_rec.standard_operation_id
731: , p_op_type => l_com_operation_rec.operation_type
726: --
727: -- Get Standard Operatin Information
728: --
729: FOR l_stdop_rec IN l_stdop_csr
730: ( p_std_op_id => l_com_op_unexp_rec.standard_operation_id
731: , p_op_type => l_com_operation_rec.operation_type
732: , p_rtg_seq_id => l_com_op_unexp_rec.routing_sequence_id
733: , p_org_id => l_com_op_unexp_rec.organization_id
734: , p_dept_id => l_com_op_unexp_rec.department_id
739: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
740: ('Std operation info should be copied over to the columns. . . ' ) ;
741: END IF ;
742:
743: -- Set Standard Operation Info.
744: IF l_com_op_unexp_rec.department_id IS NULL OR
745: l_com_op_unexp_rec.department_id = FND_API.G_MISS_NUM
746: THEN
747: l_com_op_unexp_rec.department_id := l_stdop_rec.department_id ;
796: l_com_operation_rec.op_yield_enabled_flag := l_stdop_rec.operation_yield_enabled;
797: l_com_operation_rec.yield := l_stdop_rec.yield; --bug 3572770
798: END IF ;
799:
800: END LOOP ; -- copy standard operation
801:
802: END IF ; -- Ref Flag is Yes
803:
804: END IF ; -- Acd Type : Add
803:
804: END IF ; -- Acd Type : Add
805:
806: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
807: ('Default Standard Operation Attributes was processed. . . ' || l_return_status);
808: END IF ;
809:
810: --
811: -- Return Common Operation Record
1110: l_com_operation_rec.reference_flag = FND_API.G_MISS_NUM
1111: THEN
1112: l_com_operation_rec.reference_flag :=
1113: Get_Reference_Flag
1114: (p_std_op_code => l_com_operation_rec.standard_operation_code ) ;
1115: END IF ;
1116:
1117: /************************************************************
1118: --
1131: END IF;
1132:
1133:
1134:
1135: IF ( l_com_operation_rec.standard_operation_code IS NULL
1136: OR l_com_operation_rec.standard_operation_code = FND_API.G_MISS_CHAR
1137: )
1138: THEN
1139:
1132:
1133:
1134:
1135: IF ( l_com_operation_rec.standard_operation_code IS NULL
1136: OR l_com_operation_rec.standard_operation_code = FND_API.G_MISS_CHAR
1137: )
1138: THEN
1139:
1140: /*********************************************************
1918: END IF ;
1919: END IF;
1920:
1921:
1922: IF l_com_op_unexp_rec.Standard_Operation_Id IS NULL OR
1923: l_com_op_unexp_rec.Standard_Operation_Id = FND_API.G_MISS_NUM
1924:
1925: THEN
1926: l_com_op_unexp_rec.Standard_Operation_Id
1919: END IF;
1920:
1921:
1922: IF l_com_op_unexp_rec.Standard_Operation_Id IS NULL OR
1923: l_com_op_unexp_rec.Standard_Operation_Id = FND_API.G_MISS_NUM
1924:
1925: THEN
1926: l_com_op_unexp_rec.Standard_Operation_Id
1927: := p_old_com_op_unexp_rec.Standard_Operation_Id ;
1922: IF l_com_op_unexp_rec.Standard_Operation_Id IS NULL OR
1923: l_com_op_unexp_rec.Standard_Operation_Id = FND_API.G_MISS_NUM
1924:
1925: THEN
1926: l_com_op_unexp_rec.Standard_Operation_Id
1927: := p_old_com_op_unexp_rec.Standard_Operation_Id ;
1928: END IF ;
1929:
1930: IF l_com_op_unexp_rec.Department_Id IS NULL OR
1923: l_com_op_unexp_rec.Standard_Operation_Id = FND_API.G_MISS_NUM
1924:
1925: THEN
1926: l_com_op_unexp_rec.Standard_Operation_Id
1927: := p_old_com_op_unexp_rec.Standard_Operation_Id ;
1928: END IF ;
1929:
1930: IF l_com_op_unexp_rec.Department_Id IS NULL OR
1931: l_com_op_unexp_rec.Department_Id = FND_API.G_MISS_NUM
2268: THEN
2269: l_com_op_unexp_rec.department_id := NULL ;
2270: END IF;
2271:
2272: IF l_com_op_unexp_rec.standard_operation_id = FND_API.G_MISS_NUM
2273: THEN
2274: l_com_op_unexp_rec.standard_operation_id := NULL ;
2275: END IF;
2276:
2270: END IF;
2271:
2272: IF l_com_op_unexp_rec.standard_operation_id = FND_API.G_MISS_NUM
2273: THEN
2274: l_com_op_unexp_rec.standard_operation_id := NULL ;
2275: END IF;
2276:
2277: IF (l_com_operation_rec.Process_Seq_Number = FND_API.G_MISS_NUM
2278: AND l_com_operation_rec.Process_Code = FND_API.G_MISS_CHAR )