마지막 단계에서 죽은 일 마감 체인을 절차서대로 처음부터 다시 돌리자 정산 전표가 매장마다 세 장이 됐다

-- 한 번만 ① 단계 기록 (기준일 · 단계마다 한 행)
CREATE TABLE BAT_STEP_LOG (
  BAS_DT    VARCHAR2(8),
  STEP_NO   NUMBER(2),
  ROWS_DONE NUMBER,
  END_DTT   DATE,
  CONSTRAINT PK_BAT_STEP_LOG PRIMARY KEY (BAS_DT, STEP_NO)
);
-- 한 번만 ② 12/26 정리: 매장 · 기준일마다 첫 전표만 남기고, 같은 전표가 다시 못 생기게 한다
DELETE FROM SHOP_SETTLE s
 WHERE s.BAS_DT = '20131226'
   AND s.SETTLE_NO > (SELECT MIN(x.SETTLE_NO) FROM SHOP_SETTLE x
                       WHERE x.SHOP_NO = s.SHOP_NO AND x.BAS_DT = s.BAS_DT);
ALTER TABLE SHOP_SETTLE ADD CONSTRAINT UK_SHOP_SETTLE UNIQUE (SHOP_NO, BAS_DT);
DELETE FROM SHOP_DAY WHERE ORD_DT = '20131226';                                  -- 겹친 날은 비운다 (고친 S1 이 다시 채운다)
ALTER TABLE SHOP_DAY ADD CONSTRAINT PK_SHOP_DAY PRIMARY KEY (ORD_DT, SHOP_NO);

PROCEDURE P_DAY_CLOSE(p_d VARCHAR2) IS
  v_rows NUMBER;
  FUNCTION done(p_step NUMBER) RETURN BOOLEAN IS
    v NUMBER;
  BEGIN
    SELECT COUNT(*) INTO v FROM BAT_STEP_LOG WHERE BAS_DT = p_d AND STEP_NO = p_step;
    RETURN v > 0;
  END;
  PROCEDURE mark(p_step NUMBER, p_rows NUMBER) IS     -- 커밋하지 않는다: 단계의 데이터와 함께 커밋된다
  BEGIN
    INSERT INTO BAT_STEP_LOG (BAS_DT, STEP_NO, ROWS_DONE, END_DTT) VALUES (p_d, p_step, p_rows, SYSDATE);
  END;
BEGIN
  IF NOT done(1) THEN                                  -- S1 그날 집계를 지우고 다시 넣는다
    DELETE FROM SHOP_DAY WHERE ORD_DT = p_d;
    INSERT INTO SHOP_DAY (ORD_DT, SHOP_NO, ORD_CNT, SALE_QTY)
    SELECT o.ORD_DT, o.SHOP_NO, COUNT(DISTINCT o.ORD_NO), SUM(i.ORD_ITEM_QTY)
      FROM ORD o, ORD_ITEM i
     WHERE o.ORD_DT = p_d AND i.ORD_DT = p_d AND i.ORD_NO = o.ORD_NO
     GROUP BY o.ORD_DT, o.SHOP_NO;
    mark(1, SQL%ROWCOUNT);
    COMMIT;
  END IF;

  IF NOT done(2) THEN                                  -- S2 더하지 않고 그 달 일 집계로 다시 계산해 덮는다
    MERGE INTO SHOP_MON t
    USING (SELECT SHOP_NO, SUM(ORD_CNT) AS ORD_CNT, SUM(SALE_QTY) AS SALE_QTY
             FROM SHOP_DAY
            WHERE ORD_DT LIKE SUBSTR(p_d, 1, 6) || '%'
            GROUP BY SHOP_NO) s
       ON (t.ORD_YM = SUBSTR(p_d, 1, 6) AND t.SHOP_NO = s.SHOP_NO)
     WHEN MATCHED THEN UPDATE SET t.ORD_CNT = s.ORD_CNT, t.SALE_QTY = s.SALE_QTY
     WHEN NOT MATCHED THEN INSERT (ORD_YM, SHOP_NO, ORD_CNT, SALE_QTY)
          VALUES (SUBSTR(p_d, 1, 6), s.SHOP_NO, s.ORD_CNT, s.SALE_QTY);
    mark(2, SQL%ROWCOUNT);
    COMMIT;
  END IF;

  IF NOT done(3) THEN                                  -- S3 매장 · 기준일이 키 · 확정 전 전표만 금액을 고친다
    MERGE INTO SHOP_SETTLE t
    USING (SELECT SHOP_NO, ORD_DT, ORD_CNT * 120 AS FEE_AMT FROM SHOP_DAY WHERE ORD_DT = p_d) s
       ON (t.SHOP_NO = s.SHOP_NO AND t.BAS_DT = s.ORD_DT)
     WHEN MATCHED THEN UPDATE SET t.FEE_AMT = s.FEE_AMT WHERE t.CONF_YN = 'N'
     WHEN NOT MATCHED THEN INSERT (SETTLE_NO, SHOP_NO, BAS_DT, FEE_AMT, CONF_YN)
          VALUES (SQ_SETTLE.NEXTVAL, s.SHOP_NO, s.ORD_DT, s.FEE_AMT, 'N');
    mark(3, SQL%ROWCOUNT);
    COMMIT;
  END IF;

  IF NOT done(4) THEN                                  -- S4 원래 멱등 (비우고 다시 쓴다)
    EXECUTE IMMEDIATE 'TRUNCATE TABLE HQ_IF_DAY';
    INSERT /*+ APPEND */ INTO HQ_IF_DAY (BAS_DT, SHOP_NO, ORD_CNT, SALE_QTY)
    SELECT ORD_DT, SHOP_NO, ORD_CNT, SALE_QTY FROM SHOP_DAY WHERE ORD_DT = p_d;
    v_rows := SQL%ROWCOUNT;
    COMMIT;                                            -- 직접 경로로 넣은 테이블은 커밋한 뒤에 다음 문장
    mark(4, v_rows);
    COMMIT;
  END IF;

  IF NOT done(5) THEN                                  -- S5 외부 연동 · 다시 보내도 같다
    PKG_POS_IF.SYNC_MASTER(p_d);
    mark(5, NULL);
    COMMIT;
  END IF;
END;
-- 운영 절차서: "실패하면 원인을 고친 뒤 같은 기준일로 그대로 다시 돌린다 (끝난 단계는 건너뛴다)"
-- 12/26 바로잡기: 위 정리 뒤 P_DAY_CLOSE('20131226') 를 한 번 → S1 200행 · S2 다시 계산 · S3 남은 200장 금액 확인 · S4 다시