[Home] [Help]
758:
759: /* End of changes SGIDUGU - Seq Dep */
760:
761: /* ------------------------------- BOM declarations --------------------------- */
762: TYPE alternate_bom_designator IS TABLE OF msc_st_boms.alternate_bom_designator%TYPE
763: INDEX BY BINARY_INTEGER;
764: bom_alternate_bom_designator alternate_bom_designator ;
765: empty_alternate_bom_designator alternate_bom_designator ;
766:
763: INDEX BY BINARY_INTEGER;
764: bom_alternate_bom_designator alternate_bom_designator ;
765: empty_alternate_bom_designator alternate_bom_designator ;
766:
767: TYPE specific_assembly_comment IS TABLE OF msc_st_boms.specific_assembly_comment%TYPE
768: INDEX BY BINARY_INTEGER;
769: bom_specific_assembly_comment specific_assembly_comment ;
770: empty_bom_assembly_comment specific_assembly_comment ;
771:
771:
772: bom_scaling_type number_idx_tbl ;
773: bom_assembly_quantity number_idx_tbl ;
774:
775: TYPE uom IS TABLE OF msc_st_boms.uom%TYPE INDEX BY BINARY_INTEGER;
776: bom_uom uom ;
777: empty_bom_uom uom ;
778:
779: /* NAMIT_CR For Step Material Assoc */
4238: -- bom_created_by(bom_index) := 0;
4239:
4240: EXCEPTION
4241: WHEN OTHERS THEN
4242: log_message('Error writing to msc_st_boms: '||sqlerrm);
4243: /* B3837959 MMK Issue, set return status to false */
4244: return_status := FALSE;
4245: END;
4246: primary_bom_written := 1 ;
6452: stmt_no := 902 ;
6453: i := 1 ; /* B3837959 MMK Issue */
6454: IF bom_organization_id.FIRST > 0 THEN
6455: FORALL i IN bom_organization_id.FIRST..bom_organization_id.LAST
6456: INSERT INTO msc_st_boms (
6457: bill_sequence_id,
6458: sr_instance_id,
6459: organization_id,
6460: assembly_item_id,