TRIGGER: APPS.PAY_BALANCE_FEEDS_F_OVN

Source

Description

"APPS"."PAY_BALANCE_FEEDS_F_OVN" 
before insert or update
 ON  "HR"."PAY_BALANCE_FEEDS_F#"  for each row

Type

BEFORE EACH ROW

Event

INSERT OR UPDATE

Column

When

Referencing

REFERENCING NEW AS NEW OLD AS OLD

Body

begin
  if not
   pay_pbf_shd.return_api_dml_status then
    if inserting then
      begin
        :NEW.object_version_number :=
          dt_api.Get_Object_Version_Number
            (p_base_table_name => 'PAY_BALANCE_FEEDS_F',
             P_BASE_KEY_COLUMN => 'BALANCE_FEED_ID',
             P_BASE_KEY_VALUE  => :NEW.BALANCE_FEED_ID);
      exception
        when others then
          if (sqlcode = -4091) then
            :NEW.object_version_number := 1;
          else
            raise;
          end if;
      end;
    else
      :NEW.object_version_number := :OLD.object_version_number + 1;
    end if;
  end if;
end PAY_BALANCE_FEEDS_F_ovn;