Write an UPdate statement using the logic used in PL/SQL block (oracle 10g)

Question

Hi All,
I have written the following PL/SQL block. I want to write an UPDATE statement using the logic used in the following PL/SQL block. can any one please help me out in this regards.
DECLARE
   v_hoov_fag   gor_gold_post.hoov_flg%TYPE;
   v_b49n          gor_gold_post.b49n%TYPE;
   CURSOR c
   IS
      SELECT bs_id, loyalty_date, loyalty_period, contract_date
        FROM gor_gold_post
       WHERE tariff_code IN (169, 135, 136);
BEGIN
   FOR rec IN c
   LOOP
      IF    (TRUNC (ADD_MONTHS (rec.loyalty_date, rec.loyalty_period)
                    - SYSDATE) < 304
         OR (    TRUNC (  ADD_MONTHS (rec.loyalty_date, rec.loyalty_period)
                        - SYSDATE
                       ) IS NULL
             AND (SYSDATE - TO_DATE (rec.contract_date, 'YYYYMMDD')) > 91.2
      THEN
         v_hoov_flg := 1;
      ELSE
         v_hoover_flag := 99;
      END IF;
      IF    (TRUNC (ADD_MONTHS (rec.loyalty_date, rec.loyalty_period)
                    - SYSDATE) < 121.6
         OR (    TRUNC (  ADD_MONTHS (rec.loyalty_date, rec.loyalty_period)
                        - SYSDATE
                       ) IS NULL
             AND (SYSDATE - TO_DATE (rec.contract_date, 'YYYYMMDD')) > 91.2
      THEN
         v_b49n := 1;
      ELSE
         v_b49n := 99;
      END IF;
      UPDATE gor_gold_post
         SET hoov_flg = v_hoov_flg,
             b49n = v_b49n
       WHERE bs_id = rec.bs_id AND tariff_code IN (169, 135, 136);
      COMMIT;
   END LOOP;
END;Thank you,

Answer 1

Using case statement.
UPDATE gor_gold_post
   SET hoov_flag = CASE WHEN TRUNC (ADD_MONTHS (rec.loyalty_date, rec.loyalty_period) - SYSDATE) < 304
                               OR
                               (TRUNC (ADD_MONTHS (rec.loyalty_date, rec.loyalty_period) - SYSDATE) IS NULL
                            AND (SYSDATE - TO_DATE (rec.contract_date, 'YYYYMMDD')) > 91.2)
                       THEN 1
                       ELSE 99
                     END,
       b49n      = CASE WHEN TRUNC (ADD_MONTHS (rec.loyalty_date, rec.loyalty_period) - SYSDATE) < 121.6
                         OR
                         (TRUNC (ADD_MONTHS (rec.loyalty_date, rec.loyalty_period) - SYSDATE) IS NULL
                            AND (SYSDATE - TO_DATE (rec.contract_date, 'YYYYMMDD')) > 91.2)
                       THEN 1
                       ELSE 99
                     END
WHERE tariff_code IN (169, 135, 136);Note: Code not tested.