SELECT
DECODE(T.PRODUCT_FLAG,'801401','在制品','801402','成品','801403','商品')PRODUCT_FLAG,
DECODE(T.MAT_STATUS,'80150101','材料产出待判','80150102','材料产出(已判定)','80150103','材料已编计划','80150104','材料待处理','80150105','材料加工','80150201','材料产出待判（未综合判定）','80150202','材料产出（已综合判定）')MAT_STATUS,
T.STOVE_NO,
T.LOT_NO,
T.FLAG_STOVE_NO_ZG,
T.JUDGE_STOVE_NO,
T.PRO_PLAN_ID_NEXT,
T.GX_PLAN_NO_NEXT,
T.MATERIAL_NO,
T.MATERIAL_NAME,
DECODE(T1.ORDER_TYP, '120108', '双经销', '自用') IS_DEALER,
MAX(T.PRODUCCODE)PRODUCCODE,
MAX(T.PRODUCNAME)PRODUCNAME,
MAX(T.STEELCODE)STEELCODE,
MAX(T.STEELNAME)STEELNAME,
MAX(T.GRADECODE)GRADECODE,
MAX(T.GRADENAME)GRADENAME,
MAX(T.SPEC_CODE)SPEC_CODE,
MAX(T.SPEC_NAME)SPEC_NAME,
MAX(T.MODEL_CODE)MODEL_CODE,
MAX(T.MODEL_DESC)MODEL_DESC,
MAX(T.STD_CODE)STD_CODE,
MAX(T.STD_NAME)STD_NAME,
MAX(T.STD_STYLE)STD_STYLE,
MAX(T.STD_STYLE_DESC)STD_STYLE_DESC,
T.PRO_ORDER_ID,
T.PROCESS_CDOE,
T.PROCESS_DESC,
MAX(TO_CHAR(T.INSTOCK_TIME,'YYYY-MM-DD'))INSTOCK_TIME,
MAX(TO_CHAR(T.JUDGE_RESULT_TIME,'YYYY-MM-DD'))JUDGE_RESULT_TIME,
MAX(T.PLINE_CODE)PLINE_CODE,
MAX(T.PLINE_NAME)PLINE_NAME,
MAX(T.ACT_DIMATER)ACT_DIMATER,
MAX(T.ACT_HEIGHT)ACT_HEIGHT,
SUM(T.ACT_LEN)ACT_LEN,
MAX(T.ACT_LEN_MIN)ACT_LEN_MIN,
MAX(T.ACT_LEN_MAX)ACT_LEN_MAX,
SUM(T.ACT_COUNT)ACT_COUNT,
SUM(T.ACT_WEIGHT)ACT_WEIGHT,
T.BELONG_CODE,
T.BELONG_NAME,
MAX(T.BAL_YEAR_MONTH)BAL_YEAR_MONTH,
MAX(T.TARGET)TARGET,
DECODE(T.QCM_STAUS,'00','合格','11','待处理','22','判废','33','判废待审核')QCM_STAUS,
T.GX_PLAN_NO,
MAX(T.PRO_ORDER_NO)PRO_ORDER_NO,
MAX(T.JUDGE_RESULT_CODE)SPEC_RESULT_CODE,
MAX((SELECT S.BASENAME FROM COM_BASE_INFO S WHERE S.BASECODE = T.JUDGE_RESULT_CODE))JUDGE_RESULT_CODE,
(SELECT S1.STORAGE_NAME FROM YDM_BS_STORAGE S1 WHERE S1.STORAGE_NO = S.STORAGE_NO)STORAGE_NAME,
S.STORAGE_NO,
MAX(T.NEXT_PROCESS_CDOE)NEXT_PROCESS_CDOE,
MAX(T.NEXT_PROCESS_DESC)NEXT_PROCESS_DESC,
MAX(T.CRAF_NO)CRAF_NO,
MAX(T.JUDGE_STD_DES)JUDGE_STD_DES,
DECODE(T.SCRAP_FRIM_FLAG,'0','未申请','1','已申请','2','已审核')SCRAP_FRIM_FLAG,
T.JUDGE_RESULT,
T.MEMO,
T.SCRAP_REASON,
T.SOURE_CODE,
T.SOURE_NAME,
T.BAL_YEAR_MONTH_FAIL
FROM MAT_BC_M T,YDM_BC_BUTTRESS S, SLM_ORDER_HEAD T1
WHERE T.MAT_NO = S.MAT_NO
AND T.QCM_STAUS = '22'
AND T.ORD_PK = T1.ORD_PK(+)
SELECT
T.FAIL_APPROVAL_CODE,
T.LOT_NO,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
T.MATERIAL_NO,
T.MATERIAL_NAME,
T.PRODUCCODE,
T.PRODUCNAME,
T.STEELCODE,
T.STEELNAME,
T.GRADECODE,
T.GRADENAME,
T.SPEC_CODE,
T.SPEC_NAME,
T.MODEL_CODE,
T.MODEL_DESC,
T.STD_CODE,
T.STD_NAME,
T.STD_STYLE,
T.STD_STYLE_DESC,
T.PRO_ORDER_NO,
T.PROCESS_CDOE,
T.PROCESS_DESC,
T.PLINE_CODE,
T.PLINE_NAME,
T.ACT_DIMATER,
T.ACT_HEIGHT,
T.ACT_LEN,
T.ACT_LEN_MIN,
T.ACT_LEN_MAX,
T.ACT_COUNT,
T.ACT_WEIGHT,
T.BELONG_CODE,
T.BELONG_NAME,
T.TARGET,
T.SCRAP_REASON,
T.BELONG_CODE_RESPONSE,
T.BELONG_NAME_RESPONSE,
T.CREATE_NAME,
TO_CHAR(T.CREATE_TIME, 'YYYY-MM-DD HH24:MI:SS') CREATE_TIME,
T.FRIM_NAME,
TO_CHAR(T.FRIM_TIME, 'YYYY-MM-DD HH24:MI:SS') FRIM_TIME,
DECODE(T.FRIM_FLAG,'0','未审核','1','审核通过','2','审核不通过')FRIM_FLAG,
T.BAL_YEAR_MONTH,
T.CRAFT_NO,
T.CRAFT_PATH,
DECODE(T.IS_FAST,'0','否','1','是') IS_FAST,
T.SCRAP_DESC
FROM YDM_BC_SCRAPFRIM T
WHERE 1 = 1
SELECT T.DEPARTMENT_CODE AS DEPARTMENT_CODE_P, T.DEPARTMENT_DESC AS DEPARTMENT_DESC_P
FROM COM_BASE_PLINE T
WHERE T.PLINE_CODE = '#PLINE_CODE#'
SELECT SUM(T.ACT_COUNT) ACOUNT
FROM MAT_BC_M T
WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
AND NVL(T.SCRAP_REASON,'/') = NVL('#SCRAP_REASON#','/')
AND T.QCM_STAUS = '22'
AND T.SCRAP_FRIM_FLAG = '0'
AND T.PLINE_CODE = '#PLINE_CODE#'
SELECT ? || TO_CHAR(SYSDATE, 'YYMMDD') ||
LPAD(NVL(MAX(SUBSTR(T.FAIL_APPROVAL_CODE, 11)), 0) + 1, 5, 0) FAIL_APPROVAL_CODE
FROM YDM_BC_SCRAPFRIM T
WHERE T.FAIL_APPROVAL_CODE LIKE ? || TO_CHAR(SYSDATE, 'YYMMDD') || '_____'
SELECT '#PLINE_CODE#' || TO_CHAR(SYSDATE, 'YYMMDD') ||
LPAD(NVL(MAX(SUBSTR(T.FAIL_APPROVAL_CODE, 11)), 0) + 1, 5, 0) FAIL_APPROVAL_CODE
FROM YDM_BC_SCRAPFRIM T
WHERE T.FAIL_APPROVAL_CODE LIKE '#PLINE_CODE#' || TO_CHAR(SYSDATE, 'YYMMDD') || '_____'
SELECT T.FRIM_FLAG FROM YDM_BC_SCRAPFRIM T WHERE T.FAIL_APPROVAL_CODE = '#FAIL_APPROVAL_CODE#'
DECLARE
BEGIN
UPDATE MAT_BC_M T
SET T.SCRAP_FRIM_FLAG = '0', T.FAIL_APPROVAL_CODE = ''
WHERE T.FAIL_APPROVAL_CODE = '#FAIL_APPROVAL_CODE#'
AND T.PLINE_CODE = '#PLINE_CODE#';
DELETE FROM YDM_BC_SCRAPFRIM T
WHERE T.FAIL_APPROVAL_CODE = '#FAIL_APPROVAL_CODE#';
END;
SELECT SUM(T.ACT_COUNT) ACOUNT
FROM MAT_BC_M T
WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
AND T.QCM_STAUS = '22'
AND NVL(T.SCRAP_REASON,'/') = NVL('#SCRAP_REASON#','/')
AND T.SCRAP_FRIM_FLAG = '#SCRAP_FRIM_FLAG#'
SELECT T.CRAFT_PATH FROM CRAFT_ORD_DESIGN T WHERE T.CRAFT_NO = '#CRAF_NO#'