declare
    v_date CHAR(8);
CURSOR CUR_TB IS
 SELECT A.SALE_DATE, A.CHAIN_NO, C.CLASS_CD, SUM(A.SALE_QTY) SUM_QTY, SUM(A.SALE_TOT) SUM_TOT FROM STRNDTTB A , STRNHDTB B , SGOODSTB C
 WHERE  A.CHAIN_NO  = 'R139'
 --AND A.MS_NO='R13901'
 --AND C.CLASS_CD ='01'
 AND A.SALE_DATE = B.SALE_DATE
 AND A.SALE_DATE = C.SALE_DATE
 AND A.BILL_NO   = B.BILL_NO
 AND A.MS_NO = B.MS_NO
 AND A.MS_NO = C.MS_NO
 AND A.GOODS_CD = C.GOODS_CD
 AND A.POS_NO =B.POS_NO
 AND    A.SALE_DATE BETWEEN '20100301' and '20100312'
 AND substr(B.DATETIME , 9, 2) ='00'
 GROUP BY A.SALE_DATE,CLASS_CD   
 
   
BEGIN

FOR C1 IN CUR_TB LOOP
   
    v_date := '200912'||LPAD(KEY1,2,'0') ;

    --SELECT '200912'||LPAD(KEY1,2,'0')  FROM DUAL ;
    /*
    BEGIN
   UPDATE CCTIMETB
      SET    SALE_QTY_00  = C1.SUM_QTY      
      WHERE  CHAIN_NO   = C1.CHAIN_NO
        AND  CLASS_CD     = C1.CLASS_CD
        AND  SALE_DATE    = C1.SALE_DATE ;
      
    END ;   
    */
   
DBMS_OUTPUT.PUT_LINE('  ---- '|| C1.CHAIN_NO || C1.SALE_DATE || C1.CLASS_CD || C1.SUM_QTY );

END LOOP;

END ;