DECLARE
    v_saturday NUMBER := 0;
    v_sunday NUMBER := 0;
    v_weekday NUMBER := 0;
    v_total NUMBER := 0;

    CURSOR csr_salesRecord IS
        SELECT TO_CHAR(orddate, 'DAY') DAY, prodprice price, qty FROM ordertbl o, ordline ol, product p
        WHERE o.ordno = ol.ordno
        AND p.prodno = ol.prodno;
BEGIN
    FOR r_salesRecord IN csr_salesRecord
    LOOP
        IF UPPER(r_salesRecord.DAY) LIKE '%SATURDAY%' THEN
            v_saturday := v_saturday + (r_salesRecord.price * r_salesRecord.qty);
        ELSIF UPPER(r_salesRecord.DAY) LIKE '%SUNDAY%' THEN
            v_sunday := v_sunday + (r_salesRecord.price * r_salesRecord.qty);
        ELSE
            v_weekday := v_weekday + (r_salesRecord.price * r_salesRecord.qty);
        END IF;

    END LOOP;
    v_total := v_saturday + v_sunday + v_weekday;

DBMS_OUTPUT.PUT_LINE(RPAD('Saturday', 15) || '$' || LPAD(TO_CHAR(v_saturday, 'fm999999.00'), 10));