UPDATE PROCESS_ORDER_M T SET T.INV_NUM = TO_NUMBER(NVL(T.INV_NUM,0)) + TO_NUMBER(?), T.INV_WGT = TO_NUMBER(NVL(T.INV_WGT,0)) + TO_NUMBER(?), T.INV_LEN = TO_NUMBER(NVL(T.INV_LEN,0)) + TO_NUMBER(?) WHERE ORD_LN_DLY_PK = ? SELECT S.PROCESS_CODE,S.PROCESS_DESC FROM COM_BASE_PLINE S WHERE S.PLINE_CODE = ? SELECT T.SPEC_CODE BASECODE, T.SPEC_NAME BASENAME FROM COM_BASE_SPEC T WHERE T.VALIDFLAG = '1' ORDER BY T.SPEC_CODE ASC SELECT T.PRODUCCODE BASECODE, T.PRODUC_JX BASENAME FROM COM_BASE_PRODUCT T WHERE T.VALIDFLAG = '1' ORDER BY T.PRODUCCODE ASC SELECT T.MODEL_CODE BASECODE, T.MODEL_DESC BASENAME FROM COM_BASE_MODEL T WHERE T.VALIDFLAG = '1' ORDER BY T.MODEL_CODE ASC SELECT T.STD_CODE BASECODE, T.STD_NAME BASENAME FROM COM_BASE_STD T WHERE T.VALIDFLAG = '1' ORDER BY T.STD_CODE ASC SELECT T.STEELCODE BASECODE, T.STEELNAME BASENAME FROM COM_BASE_STEEL T WHERE T.VALIDFLAG = '1' ORDER BY T.STEELCODE ASC SELECT T.GRADECODE BASECODE, T.GRADENAME BASENAME FROM COM_BASE_GRADE T WHERE T.VALIDFLAG = '1' ORDER BY T.GRADECODE ASC SELECT NVL(SUM(T1.ACT_COUNT),0)ACOUNT FROM YDM_BC_STOCKTAKINGLIST T, YDM_BC_OUTLIST T1 WHERE T.MAT_NO = T1.MAT_NO AND T.STOCKTAKING_DOC = '#STOCKTAKING_DOC#' AND T1.OUTSTOCK_TYPE_CODE = '800801' SELECT NVL(SUM(T1.ACT_COUNT),0)ACOUNT FROM YDM_BC_STOCKTAKINGLIST T, MAT_BC_M T1 WHERE T.MAT_NO = T1.MAT_NO AND T.STOCKTAKING_DOC = '#STOCKTAKING_DOC#' AND T1.PRO_PLAN_ID_NEXT IS NOT NULL DECLARE BEGIN FOR MYROW IN (SELECT T.MAT_NO, T.PLINE_CODE, T.STOCKTAKING_SQE FROM YDM_BC_STOCKTAKINGLIST T WHERE T.STOCKTAKING_DOC = '#STOCKTAKING_DOC#' ORDER BY T.MAT_NO DESC) LOOP DELETE FROM MAT_BC_M T WHERE T.MAT_NO = MYROW.MAT_NO AND T.PLINE_CODE = MYROW.PLINE_CODE; DELETE FROM YDM_BC_BUTTRESS T WHERE T.MAT_NO = MYROW.MAT_NO; DELETE FROM YDM_BC_INLIST T WHERE T.MAT_NO = MYROW.MAT_NO AND T.INSTOCK_TYPE_CODE = '800702'; DELETE FROM YDM_BC_STOCKTAKINGLIST T WHERE T.STOCKTAKING_SQE = MYROW.STOCKTAKING_SQE; END LOOP; END;