CREATE OR REPLACE procedure CORE.WCC_UPDATE_REC_OMEGA1(
v_account_nbr IN NUMBER,
v_schema_name IN VARCHAR2)

IS

[b]s varchar2(20) :=v_schema_name;[/b]

BEGIN

UPDATE omega_contact NOLOGGING
       SET customername = 'DELETED CUSTOMER',
           contactno =
                    (CASE
                        WHEN contactno IS NOT NULL
                           THEN '0000000000'
                        ELSE contactno
                     END
                    ),
           feedbackdetail =
              (CASE
                  WHEN feedbackdetail IS NOT NULL
                     THEN 'DELETED NOTE'
                  ELSE feedbackdetail
               END
              )
     WHERE accountno IN (
              SELECT UNIQUE account_nbr
                       [b][/b]FROM s.cor_customers[b][/b]
                      WHERE code_external_credit_ref = '@'
                        AND COALESCE (v_account_nbr, cor_customers.account_nbr) =
                                                         cor_customers.account_nbr)
       AND countrycode = v_country_code;
COMMIT; 

 END WCC_UPDATE_REC_OMEGA1;
/