TRIGGER: APPS.FND_PROD_LIC_TGR

Source

Description

FND_PROD_LIC_TGR
    AFTER UPDATE or INSERT on "APPLSYS"."FND_PRODUCT_INSTALLATIONS#"
    FOR EACH ROW

Type

AFTER EACH ROW

Event

INSERT OR UPDATE

Column

When

Referencing

REFERENCING NEW AS NEW OLD AS OLD

Body

begin
  declare
    l_app_short_code varchar2(50);
  begin
    if(ad_zd.get_edition('PATCH') is not null and
      (ad_zd.get_edition('PATCH') = ad_zd.get_edition)) then
      -- Bug 16705405: Submit the FNDWFLIC concurrent request from autonomous block
      -- in case the trigger is invoked from PATCH edition
      wf_event.submit_cp_request;
    else
      -- RUN Edition
      select application_short_name
      into l_app_short_code
      from fnd_application
      where application_id = :new.application_id;
      wf_event_functions_pkg.UpdateLicenseStatus(l_app_short_code,  :new.status);
    end if;
  exception
    when no_data_found then
      null;
  end;
end;