[Home] [Help]
559: /* bug: 6918852 Vpedarla created new global variabelt control precision in inventory uom conversion */
560: conv_precision INTEGER := 9 ;
561:
562: /* --------------------------- Global declarations ------------------------ */
563: TYPE sr_instance_id IS TABLE OF msc_st_boms.sr_instance_id%TYPE INDEX BY BINARY_INTEGER;
564: bom_sr_instance_id sr_instance_id;
565: bomc_sr_instance_id sr_instance_id;
566: pef_sr_instance_id sr_instance_id;
567: rtg_sr_instance_id sr_instance_id;
573: itm_mtq_sr_instance_id sr_instance_id;
574: /* NAMIT_CR */
575: opr_stpdep_sr_instance_id sr_instance_id;
576:
577: TYPE organization_id IS TABLE OF msc_st_boms.organization_id%TYPE INDEX BY BINARY_INTEGER;
578: bom_organization_id organization_id;
579: bomc_organization_id organization_id;
580: pef_organization_id organization_id;
581: rtg_organization_id organization_id;
587: opr_organization_id organization_id ;
588: or_organization_id organization_id ;
589: rs_organization_id organization_id ;
590:
591: TYPE bill_sequence_id IS TABLE OF msc_st_boms.bill_sequence_id%TYPE INDEX BY BINARY_INTEGER;
592: bom_bill_sequence_id bill_sequence_id;
593: bomc_bill_sequence_id bill_sequence_id;
594: pef_bill_sequence_id bill_sequence_id;
595: oc_bill_sequence_id bill_sequence_id;
593: bomc_bill_sequence_id bill_sequence_id;
594: pef_bill_sequence_id bill_sequence_id;
595: oc_bill_sequence_id bill_sequence_id;
596:
597: TYPE last_update_date IS TABLE OF msc_st_boms.last_update_date%TYPE INDEX BY BINARY_INTEGER;
598: bom_last_update_date last_update_date ;
599: bomc_last_update_date last_update_date ;
600: pef_last_update_date last_update_date ;
601: rtg_last_update_date last_update_date ;
605: itm_mtq_last_update_date last_update_date ; /* 7363807 */
606: rs_last_update_date last_update_date ;
607: oc_last_update_date last_update_date ;
608:
609: TYPE creation_date IS TABLE OF msc_st_boms.creation_date%TYPE INDEX BY BINARY_INTEGER;
610: bom_creation_date creation_date ;
611: bomc_creation_date creation_date ;
612: pef_creation_date creation_date ;
613: rtg_creation_date creation_date ;
642: rtg_uom_code uom_code ;
643: or_uom_code uom_code ;
644: opr_uom_code uom_code ;
645:
646: TYPE assembly_item_id IS TABLE OF msc_st_boms.assembly_item_id%TYPE
647: INDEX BY BINARY_INTEGER;
648: bom_assembly_item_id assembly_item_id ;
649: rtg_assembly_item_id assembly_item_id ;
650:
684:
685: /* End of changes SGIDUGU - Seq Dep */
686:
687: /* ------------------------------- BOM declarations --------------------------- */
688: TYPE alternate_bom_designator IS TABLE OF msc_st_boms.alternate_bom_designator%TYPE
689: INDEX BY BINARY_INTEGER;
690: bom_alternate_bom_designator alternate_bom_designator ;
691:
692: TYPE specific_assembly_comment IS TABLE OF msc_st_boms.specific_assembly_comment%TYPE
688: TYPE alternate_bom_designator IS TABLE OF msc_st_boms.alternate_bom_designator%TYPE
689: INDEX BY BINARY_INTEGER;
690: bom_alternate_bom_designator alternate_bom_designator ;
691:
692: TYPE specific_assembly_comment IS TABLE OF msc_st_boms.specific_assembly_comment%TYPE
693: INDEX BY BINARY_INTEGER;
694: bom_specific_assembly_comment specific_assembly_comment ;
695:
696: TYPE scaling_type IS TABLE OF msc_st_boms.scaling_type%TYPE
692: TYPE specific_assembly_comment IS TABLE OF msc_st_boms.specific_assembly_comment%TYPE
693: INDEX BY BINARY_INTEGER;
694: bom_specific_assembly_comment specific_assembly_comment ;
695:
696: TYPE scaling_type IS TABLE OF msc_st_boms.scaling_type%TYPE
697: INDEX BY BINARY_INTEGER;
698: bom_scaling_type scaling_type ;
699:
700: TYPE assembly_quantity IS TABLE OF msc_st_boms.assembly_quantity%TYPE
696: TYPE scaling_type IS TABLE OF msc_st_boms.scaling_type%TYPE
697: INDEX BY BINARY_INTEGER;
698: bom_scaling_type scaling_type ;
699:
700: TYPE assembly_quantity IS TABLE OF msc_st_boms.assembly_quantity%TYPE
701: INDEX BY BINARY_INTEGER;
702: bom_assembly_quantity assembly_quantity ;
703:
704: TYPE uom IS TABLE OF msc_st_boms.uom%TYPE INDEX BY BINARY_INTEGER;
700: TYPE assembly_quantity IS TABLE OF msc_st_boms.assembly_quantity%TYPE
701: INDEX BY BINARY_INTEGER;
702: bom_assembly_quantity assembly_quantity ;
703:
704: TYPE uom IS TABLE OF msc_st_boms.uom%TYPE INDEX BY BINARY_INTEGER;
705: bom_uom uom ;
706:
707: /* NAMIT_CR For Step Material Assoc */
708: TYPE seq_num IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
4505: -- bom_created_by(bom_index) := 0;
4506:
4507: EXCEPTION
4508: WHEN OTHERS THEN
4509: log_message('Error writing to msc_st_boms: '||sqlerrm);
4510: /* B3837959 MMK Issue, set return status to false */
4511: return_status := FALSE;
4512: END;
4513: primary_bom_written := 1 ;
6642: i := 1 ; /* B3837959 MMK Issue */
6643:
6644: IF bom_organization_id.FIRST > 0 THEN
6645: FORALL i IN bom_organization_id.FIRST..bom_organization_id.LAST
6646: INSERT INTO msc_st_boms (
6647: bill_sequence_id,
6648: sr_instance_id,
6649: organization_id,
6650: assembly_item_id,