1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31
|
create or replace procedure saveItemAddition(itemCompt out integer,rFQ_Number in RFQ_PARTS.RFQ_RFQ_ID%TYPE, part_replaced in RFQ_PARTS.PART_REPLACED_ID%TYPE, nb_of_parts_by_unit in RFQ_PARTS.RFQPARTS_NBPARTSBYUNIT%TYPE, target_price in RFQ_PARTS.RFQPARTS_TARGETPRICE%TYPE, comments in RFQ_PARTS.RFQPARTS_COMMENTS%TYPE, catalog_part RFQ_PARTS.PART_CATALOG%TYPE, ramp_up_qty in RFQ_PARTS.RFQPARTS_RAMPUPQTY%TYPE,ramp_up_date in RFQ_PARTS.RFQPARTS_RAMPUPDATE%TYPE, full_prod_qty in RFQ_PARTS.RFQPARTS_FULLQTY%TYPE, full_Prod_date in RFQ_PARTS.RFQPARTS_FULLDATE%TYPE,proto_qty in RFQ_PARTS.RFQPARTS_PROTOQTY%TYPE, proto_date in RFQ_PARTS.RFQPARTS_PROTODATE%TYPE , pre_serie_qty in RFQ_PARTS.RFQPARTS_PRESERIEQTY%TYPE, pre_serie_date in RFQ_PARTS.RFQPARTS_PRESERIEDATE%TYPE)
is
begin
--Test si le nombre d'item>1
if (itemCompt>1)
then
update RFQ_PARTS
set
RFQ_PARTS.RFQ_RFQ_ID=rFQ_Number,
RFQ_PARTS.PART_REPLACED_ID=part_replaced,
RFQ_PARTS.RFQPARTS_NBPARTSBYUNIT=nb_of_parts_by_unit ,
RFQ_PARTS.RFQPARTS_TARGETPRICE =target_price ,
RFQ_PARTS.RFQPARTS_COMMENTS=comments ,
RFQ_PARTS.PART_CATALOG=catalog_part ,
RFQ_PARTS.RFQPARTS_RAMPUPQTY =ramp_up_qty ,
RFQ_PARTS.RFQPARTS_RAMPUPDATE=ramp_up_date ,
RFQ_PARTS.RFQPARTS_FULLQTY=full_prod_qty ,
RFQ_PARTS.RFQPARTS_FULLDATE=full_Prod_date ,
RFQ_PARTS.RFQPARTS_PROTOQTY=proto_qty ,
RFQ_PARTS.RFQPARTS_PROTODATE=proto_date ,
RFQ_PARTS.RFQPARTS_PRESERIEQTY=pre_serie_qty ,
RFQ_PARTS.RFQPARTS_PRESERIEDATE=pre_serie_date
where
RFQ_PARTS.RFQPARTS_ID=( select max(RFQPARTS_ID) from RFQ_PARTS)-1;
end if;
end; |
Partager