TRIGGER: APPS.IGI_RPI_PERIOD_SCHEDULES_T1

Source

Description

"APPS"."IGI_RPI_PERIOD_SCHEDULES_T1" 
BEFORE  INSERT 
 ON  "IGI"."IGI_RPI_PERIOD_SCHEDULES#"  REFERENCING
 NEW AS NEW
 OLD AS OLD
FOR EACH ROW

Type

BEFORE EACH ROW

Event

INSERT

Column

When

Referencing

REFERENCING NEW AS NEW OLD AS OLD

Body

Begin
  declare
     cursor c_exists is
        select 'x'
        from   igi_rpi_period_schedules
        where  :new.period_name = period_name
        ;
     lv_mesg VARCHAR2(2000);
  begin
     for l_exists in c_exists loop
         fnd_message.set_name( 'IGI', 'IGI_AR_RPI_SCHEDULES_EXIST');
         lv_mesg := fnd_message.get;
         raise_application_error ( -20000, lv_mesg );
     end loop
     ;

     update igi_rpi_component_periods
     set    schedule_id = :new.schedule_id
     where    period_name = :new.period_name
     ;
  end;
End;