eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.IGS_RE_SPRVSR_PKG SQL Statements

The following lines contain the word 'select', 'insert', 'update' or 'delete':

Line: 33


    x_last_update_date IN DATE ,
    x_last_updated_by IN NUMBER ,
    x_last_update_login IN NUMBER
  ) AS

    CURSOR cur_old_ref_values IS
      SELECT   *
      FROM     IGS_RE_SPRVSR
      WHERE    rowid = x_rowid;

Line: 51


    IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
      Close cur_old_ref_values;

Line: 53


      Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');

Line: 76


    IF (p_action = 'UPDATE') THEN
      new_references.creation_date := old_references.creation_date;

Line: 83


    new_references.last_update_date := x_last_update_date;

Line: 84


    new_references.last_updated_by := x_last_updated_by;

Line: 85


    new_references.last_update_login := x_last_update_login;

Line: 89


  PROCEDURE BeforeRowInsertUpdateDelete1(
    p_inserting IN BOOLEAN ,
    p_updating IN BOOLEAN ,
    p_deleting IN BOOLEAN
    ) AS
	v_message_name		VARCHAR2(30);

Line: 99


	-- Turn off trigger validation when performing insert of IGS_RE_CANDIDATURE details
	-- as a result of IGS_PS_COURSE transfer
	IF igs_as_val_suaap.genp_val_sdtt_sess('ENRP_INS_CA_TRNSFR') THEN
		IF p_inserting OR
			(p_updating AND
			(new_references.start_dt <> old_references.start_dt) OR
			(NVL(new_references.end_dt,igs_ge_date.igsdate('9999/01/01')) <>
			NVL(old_references.end_dt,igs_ge_date.igsdate('9999/01/01'))) OR
			(NVL(new_references.supervision_percentage,-1) <>
			NVL(old_references.supervision_percentage,-1)) OR
			(new_references.research_supervisor_type <>
			old_references.research_supervisor_type) OR
			(NVL(new_references.funding_percentage,-1) <>
			NVL(old_references.funding_percentage,-1)) OR
			(NVL(new_references.org_unit_cd,'NULL') <>
			NVL(old_references.org_unit_cd,'NULL')) OR
			(NVL(new_references.replaced_person_id,-1) <>
			NVL(old_references.replaced_person_id,-1))) THEN
			-- Validate changes are allowed to be made
/*
||  Bug ID 1956374 - Removal of Duplicate Program Units from OSS.
||  Changed the reference of "IGS_RE_VAL_RSUP.RESP_VAL_CA_CHILDUPD" to program unit "IGS_RE_VAL_CAH.RESP_VAL_CA_CHILDUPD". -- kdande
*/
			IF IGS_RE_VAL_CAH.resp_val_ca_childupd(
				new_references.ca_person_id,
				new_references.ca_sequence_number,
				v_message_name) = FALSE THEN
					Fnd_Message.Set_Name ('IGS', v_message_name);

Line: 131


		IF p_inserting THEN
			-- Validate IGS_PE_PERSON
			IF IGS_RE_VAL_RSUP.resp_val_rsup_person(
				new_references.ca_person_id,
				new_references.person_id,
				p_legacy,
				v_message_name) = FALSE THEN
					Fnd_Message.Set_Name ('IGS', v_message_name);

Line: 143


		IF p_inserting OR
			p_updating THEN
			-- Validate that research supervisor type
			IF p_inserting OR
				(p_updating AND
				new_references.research_supervisor_type <> old_references.research_supervisor_type) THEN
				IF IGS_RE_VAL_RSUP.resp_val_rst_closed (
					new_references.research_supervisor_type,
					v_message_name) = FALSE THEN
					Fnd_Message.Set_Name ('IGS', v_message_name);

Line: 158


			IF p_inserting OR
				(p_updating AND
				((NVL(new_references.funding_percentage,-1) <> NVL(old_references.funding_percentage,-1)) OR
				new_references.org_unit_cd IS NULL)) THEN
/*
				IF IGS_RE_VAL_RSUP.resp_val_rsup_fund(
					new_references.person_id,
					new_references.org_unit_cd,
					new_references.ou_start_dt,
					new_references.funding_percentage,
					NULL, -- staff member indicator
					v_message_name) = FALSE THEN
						Fnd_Message.Set_Name ('IGS', v_message_name);

Line: 183


				IF p_inserting OR
					(p_updating AND
					NVL(new_references.funding_percentage,-1) = NVL(old_references.funding_percentage,-1) AND
					((NVL(new_references.org_unit_cd,'NULL') <> NVL(old_references.org_unit_cd,'NULL')) OR
					(NVL(new_references.ou_start_dt,igs_ge_date.igsdate('9999/01/01')) <>
					NVL(old_references.ou_start_dt,igs_ge_date.igsdate('9999/01/01'))))) THEN

					IF IGS_RE_VAL_RSUP.resp_val_rsup_ou(
						new_references.person_id,
						new_references.org_unit_cd,
						new_references.ou_start_dt,
						NULL, -- staff member indicator
						p_legacy,
						v_message_name) = FALSE THEN
							Fnd_Message.Set_Name ('IGS', v_message_name);

Line: 206


		-- Validate deletes are allowed
/*
||  Bug ID 1956374 - Removal of Duplicate Program Units from OSS.
||  Changed the reference of "IGS_RE_VAL_RSUP.RESP_VAL_CA_CHILDUPD" to program unit "IGS_RE_VAL_CAH.RESP_VAL_CA_CHILDUPD". -- kdande
*/
		IF IGS_RE_VAL_CAH.resp_val_ca_childupd(
			old_references.ca_person_id,
			old_references.ca_sequence_number,
			v_message_name) = FALSE THEN
				Fnd_Message.Set_Name ('IGS', v_message_name);

Line: 222


  END BeforeRowInsertUpdateDelete1;

Line: 224


  PROCEDURE AfterRowInsertUpdate2(
    p_inserting IN BOOLEAN ,
    p_updating IN BOOLEAN ,
    p_deleting IN BOOLEAN
    ) AS
	v_message_name				VARCHAR2(30);

Line: 235


	-- Turn off trigger validation when performing insert of IGS_RE_CANDIDATURE details
	-- as a result of IGS_PS_COURSE transfer
	IF igs_as_val_suaap.genp_val_sdtt_sess('ENRP_INS_CA_TRNSFR') THEN
		IF p_inserting OR
			p_updating THEN
			-- Set rowid


			--Validate research supervisor end date
  			IF (NVL( NEW_REFERENCES.end_dt,igs_ge_date.igsdate('9999/01/01')) <>
  			NVL(OLD_REFERENCES.end_dt,igs_ge_date.igsdate('9999/01/01')))
  			THEN
  				IF IGS_RE_VAL_RSUP.resp_val_rsup_end_dt(
	  				NEW_REFERENCES.ca_person_id,
  					NEW_REFERENCES.ca_sequence_number,
  					NEW_REFERENCES.person_id,
  					NEW_REFERENCES.sequence_number,
  					NEW_REFERENCES.start_dt,
	  				NEW_REFERENCES.end_dt,
					p_legacy,
  					v_message_name) = FALSE THEN
						Fnd_Message.Set_Name ('IGS', v_message_name);

Line: 263


  			IF p_inserting OR
  				(p_updating AND
  				(NEW_REFERENCES.start_dt  <> OLD_REFERENCES.start_dt) OR
  				(NVL(NEW_REFERENCES.end_dt,igs_ge_date.igsdate('9999/01/01')) <>
  		NVL(OLD_REFERENCES.end_dt,igs_ge_date.igsdate('9999/01/01'))))
  			THEN
  				IF IGS_RE_VAL_RSUP.resp_val_rsup_ovrlp(
  				NEW_REFERENCES.ca_person_id,
  					NEW_REFERENCES.ca_sequence_number,
  					NEW_REFERENCES.person_id,
  					NEW_REFERENCES.sequence_number,
  					NEW_REFERENCES.start_dt,
  					NEW_REFERENCES.end_dt,
					p_legacy,
  					v_message_name) = FALSE THEN
						Fnd_Message.Set_Name ('IGS', v_message_name);

Line: 286


  				IF p_inserting OR
  					(p_updating AND
  					(NEW_REFERENCES.replaced_person_id <>
  					NVL(OLD_REFERENCES.replaced_person_id,0)) OR
  					(NEW_REFERENCES.replaced_sequence_number <>
  					NVL(OLD_REFERENCES.replaced_sequence_number,0)) OR
  					(NEW_REFERENCES.start_dt <> OLD_REFERENCES.start_dt)) THEN
  					IF IGS_RE_VAL_RSUP.resp_val_rsup_repl(
  						NEW_REFERENCES.ca_person_id,
  						NEW_REFERENCES.ca_sequence_number,
  						NEW_REFERENCES.person_id,
  						NEW_REFERENCES.start_dt,
  						NEW_REFERENCES.replaced_person_id,
  						NEW_REFERENCES.replaced_sequence_number,
						p_legacy,
  						v_message_name) = FALSE THEN
							Fnd_Message.Set_Name ('IGS', v_message_name);

Line: 309


  			-- Do not validate at database level  if being updated via form RESF3250
  			IF igs_as_val_suaap.genp_val_sdtt_sess('RESP_VAL_RSUP_PERC') THEN
  			     -- Validate supervision and funding percentage
  			     IF p_inserting OR
  				(p_updating AND
  				(NEW_REFERENCES.start_dt <> OLD_REFERENCES.start_dt) OR
  				(NVL(NEW_REFERENCES.end_dt,igs_ge_date.igsdate('9999/01/01')) <>
  				NVL(OLD_REFERENCES.end_dt,
  					igs_ge_date.igsdate('9999/01/01'))) OR
  				(NVL(NEW_REFERENCES.supervision_percentage,-1) <>
  				NVL(OLD_REFERENCES.supervision_percentage,-1)) OR
  				(NVL(NEW_REFERENCES.funding_percentage,-1) <>
  				NVL(OLD_REFERENCES.funding_percentage,-1))) THEN
/*
  				IF IGS_RE_VAL_RSUP.resp_val_rsup_perc(
  					NEW_REFERENCES.ca_person_id,
  					NEW_REFERENCES.ca_sequence_number,
  					NULL, -- sca_course_cd
  					NULL, -- acai_admission_appl_number
  					NULL, -- acai_nominated_course_cd
  					NULL, -- acai_sequence_number,
  					'Y', -- Validate supervision percentage
  					'Y', -- Validate funding percentage
  					'RSUP',
  					V_supervision_start_dt,
  					v_message_name) = FALSE THEN
						Fnd_Message.Set_Name ('IGS', v_message_name);

Line: 350


  			-- Do not validate at database level  if being updated via form RESF3250
  			IF igs_as_val_suaap.genp_val_sdtt_sess('RESP_VAL_RSUP_PERC') THEN
  				-- Validate supervision and funding percentage
/*
  				IF IGS_RE_VAL_RSUP.resp_val_rsup_perc(
  					OLD_REFERENCES.ca_person_id,
  					OLD_REFERENCES.ca_sequence_number,
  					NULL, -- sca_course_cd
  					NULL, -- acai_admission_appl_number
  					NULL, -- acai_nominated_course_cd
  					NULL, -- acai_sequence_number,
  					'Y', -- Validate supervision percentage
  					'Y', -- Validate funding percentage
  					'RSUP',
  					v_supervision_start_dt,
  					v_message_name) = FALSE THEN
						Fnd_Message.Set_Name ('IGS', v_message_name);

Line: 379


    IF (p_inserting
         OR(p_updating AND ((new_references.start_dt  <> old_references.start_dt )OR
                            ((new_references.end_dt  <> old_references.end_dt ) OR (old_references.end_dt IS NULL AND new_references.end_dt IS NOT NULL) OR (new_references.end_dt IS NULL AND old_references.end_dt IS NOT NULL)) OR
                            (new_references.research_supervisor_type  <> old_references.research_supervisor_type)   OR
                            ((new_references.supervision_percentage   <> old_references.supervision_percentage) OR (old_references.supervision_percentage IS NULL AND new_references.supervision_percentage IS NOT NULL)
			    OR (old_references.supervision_percentage IS NOT NULL AND new_references.supervision_percentage IS NULL)) OR
                            ((new_references.org_unit_cd  <> old_references.org_unit_cd) OR (old_references.org_unit_cd IS NULL AND new_references.org_unit_cd IS NOT NULL)
			    OR (old_references.org_unit_cd IS NOT NULL AND new_references.org_unit_cd IS NULL) ) OR
                            ((new_references.replaced_person_id  <> old_references.replaced_person_id )OR (old_references.replaced_person_id IS NULL AND new_references.replaced_person_id IS NOT NULL)
			    OR (old_references.replaced_person_id IS NOT NULL AND new_references.replaced_person_id IS NULL))))) THEN

                   igs_re_workflow.supervision_event (
					p_personid	=> new_references.ca_person_id,
					p_ca_seq_num	=> new_references.ca_sequence_number,
					p_supervisorid	=> new_references.person_id,
					p_startdt	=> new_references.start_dt,
					p_enddt	        => new_references.end_dt,
					p_spr_percent	=> new_references.supervision_percentage,
					p_spr_type	=> new_references.research_supervisor_type,
					p_fund_percent	=> new_references.funding_percentage,
					p_org_unit_cd	=> new_references.org_unit_cd,
					p_rep_person_id	=> new_references.replaced_person_id,
					p_rep_seq_num	=> new_references.replaced_sequence_number
					) ;

Line: 406


  END AfterRowInsertUpdate2;

Line: 519


     	     Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');

Line: 535


     	     Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');

Line: 548


     	     Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');

Line: 561


     	     Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');

Line: 583


     	     Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');

Line: 613


      SELECT   rowid
      FROM     IGS_RE_SPRVSR
      WHERE    ca_person_id = x_ca_person_id
      AND      ca_sequence_number = x_ca_sequence_number
      AND      person_id = x_person_id
      AND      sequence_number = x_sequence_number
      FOR UPDATE NOWAIT;

Line: 646


      SELECT   rowid
      FROM     IGS_RE_SPRVSR
      WHERE    ca_person_id = x_ca_person_id
      AND      ca_sequence_number = x_ca_sequence_number
      AND      person_id = x_person_id
      AND      start_dt = x_start_dt
      AND ((l_rowid is null) or (rowid <> l_rowid))
      FOR UPDATE NOWAIT;

Line: 676


      SELECT   rowid
      FROM     IGS_RE_SPRVSR
      WHERE    ca_person_id = x_person_id
      AND      ca_sequence_number = x_sequence_number ;

Line: 704


      SELECT   rowid
      FROM     IGS_RE_SPRVSR
      WHERE    org_unit_cd = x_org_unit_cd
      AND      ou_start_dt = x_start_dt ;

Line: 731


      SELECT   rowid
      FROM     IGS_RE_SPRVSR
      WHERE    person_id = x_person_id ;

Line: 757


      SELECT   rowid
      FROM     IGS_RE_SPRVSR
      WHERE    research_supervisor_type = x_research_supervisor_type ;

Line: 786


      SELECT   rowid
      FROM     IGS_RE_SPRVSR
      WHERE    ca_person_id = x_ca_person_id
      AND      ca_sequence_number = x_ca_sequence_number
      AND      replaced_person_id = x_person_id
      AND      replaced_sequence_number = x_sequence_number ;

Line: 830


    x_last_update_date IN DATE ,
    x_last_updated_by IN NUMBER ,
    x_last_update_login IN NUMBER
  ) AS
  BEGIN

    Set_Column_Values (
      p_action,
      x_rowid,
      x_ca_person_id,
      x_ca_sequence_number,
      x_person_id,
      x_sequence_number,
      x_start_dt,
      x_end_dt,
      x_research_supervisor_type,
      x_supervisor_profession,
      x_supervision_percentage,
      x_funding_percentage,
      x_org_unit_cd,
      x_ou_start_dt,
      x_replaced_person_id,
      x_replaced_sequence_number,
      x_comments,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );

Line: 861


    IF (p_action = 'INSERT') THEN
      -- Call all the procedures related to Before Insert.
      BeforeRowInsertUpdateDelete1 ( p_inserting => TRUE,
                                     p_updating => FALSE,
                                     p_deleting => FALSE
                                   );

Line: 880


    ELSIF (p_action = 'UPDATE') THEN
      -- Call all the procedures related to Before Update.
      BeforeRowInsertUpdateDelete1 (  p_inserting => FALSE,
                                      p_updating => TRUE,
                                      p_deleting => FALSE
                                   );

Line: 889


    ELSIF (p_action = 'DELETE') THEN
      -- Call all the procedures related to Before Delete.
      BeforeRowInsertUpdateDelete1 (  p_inserting => FALSE,
				      p_updating => FALSE,
				      p_deleting => TRUE
				    );

Line: 896


    ELSIF (p_action = 'VALIDATE_INSERT') THEN
      IF Get_PK_For_Validation (
	    new_references.ca_person_id,
    	    new_references.ca_sequence_number,
    	    new_references.person_id,
    	    new_references.sequence_number
      ) THEN
	 Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');

Line: 909


    ELSIF (p_action = 'VALIDATE_UPDATE') THEN
      Check_Uniqueness;

Line: 912


    ELSIF (p_action = 'VALIDATE_DELETE') THEN
      Check_Child_Existance;

Line: 925


    IF (p_action = 'INSERT') THEN
      -- Call all the procedures related to After Insert.
      AfterRowInsertUpdate2 ( p_inserting => TRUE,
			      p_updating => FALSE,
			      p_deleting => FALSE
			    );

Line: 931


    ELSIF (p_action = 'UPDATE') THEN
      -- Call all the procedures related to After Update.
      AfterRowInsertUpdate2 ( p_inserting => FALSE,
			      p_updating => TRUE,
			      p_deleting => FALSE
			    );

Line: 940


procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_CA_PERSON_ID in NUMBER,
  X_CA_SEQUENCE_NUMBER in NUMBER,
  X_PERSON_ID in NUMBER,
  X_SEQUENCE_NUMBER in NUMBER,
  X_START_DT in DATE,
  X_END_DT in DATE,
  X_RESEARCH_SUPERVISOR_TYPE in VARCHAR2,
  X_SUPERVISOR_PROFESSION in VARCHAR2,
  X_SUPERVISION_PERCENTAGE in NUMBER,
  X_FUNDING_PERCENTAGE in NUMBER,
  X_ORG_UNIT_CD in VARCHAR2,
  X_OU_START_DT in DATE,
  X_REPLACED_PERSON_ID in NUMBER,
  X_REPLACED_SEQUENCE_NUMBER in NUMBER,
  X_COMMENTS in VARCHAR2,
  X_MODE in VARCHAR2
  ) as
    cursor C is select ROWID from IGS_RE_SPRVSR
      where CA_PERSON_ID = X_CA_PERSON_ID
      and CA_SEQUENCE_NUMBER = X_CA_SEQUENCE_NUMBER
      and PERSON_ID = X_PERSON_ID
      and SEQUENCE_NUMBER = X_SEQUENCE_NUMBER;

Line: 964


    X_LAST_UPDATE_DATE DATE;

Line: 965


    X_LAST_UPDATED_BY NUMBER;

Line: 966


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 968


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 970


    X_LAST_UPDATED_BY := 1;

Line: 971


    X_LAST_UPDATE_LOGIN := 0;

Line: 973


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 974


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 977


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 978


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 988


    p_action => 'INSERT',
    x_rowid => X_ROWID,
    x_ca_person_id => X_CA_PERSON_ID,
    x_ca_sequence_number => X_CA_SEQUENCE_NUMBER,
    x_person_id => X_PERSON_ID,
    x_sequence_number => X_SEQUENCE_NUMBER,
    x_start_dt => X_START_DT,
    x_end_dt => X_END_DT,
    x_research_supervisor_type => X_RESEARCH_SUPERVISOR_TYPE,
    x_supervisor_profession => X_SUPERVISOR_PROFESSION,
    x_supervision_percentage => X_SUPERVISION_PERCENTAGE,
    x_funding_percentage => X_FUNDING_PERCENTAGE,
    x_org_unit_cd => X_ORG_UNIT_CD,
    x_ou_start_dt => X_OU_START_DT,
    x_replaced_person_id => X_REPLACED_PERSON_ID,
    x_replaced_sequence_number => X_REPLACED_SEQUENCE_NUMBER,
    x_comments => X_COMMENTS,
    x_created_by => X_LAST_UPDATED_BY ,
    x_creation_date => X_LAST_UPDATE_DATE,
    x_last_updated_by => X_LAST_UPDATED_BY,
    x_last_update_date => X_LAST_UPDATE_DATE,
    x_last_update_login => X_LAST_UPDATE_LOGIN
 );

Line: 1015


  insert into IGS_RE_SPRVSR (
    CA_PERSON_ID,
    CA_SEQUENCE_NUMBER,
    PERSON_ID,
    SEQUENCE_NUMBER,
    START_DT,
    END_DT,
    RESEARCH_SUPERVISOR_TYPE,
    SUPERVISOR_PROFESSION,
    SUPERVISION_PERCENTAGE,
    FUNDING_PERCENTAGE,
    ORG_UNIT_CD,
    OU_START_DT,
    REPLACED_PERSON_ID,
    REPLACED_SEQUENCE_NUMBER,
    COMMENTS,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.CA_PERSON_ID,
    NEW_REFERENCES.CA_SEQUENCE_NUMBER,
    NEW_REFERENCES.PERSON_ID,
    NEW_REFERENCES.SEQUENCE_NUMBER,
    NEW_REFERENCES.START_DT,
    NEW_REFERENCES.END_DT,
    NEW_REFERENCES.RESEARCH_SUPERVISOR_TYPE,
    NEW_REFERENCES.SUPERVISOR_PROFESSION,
    NEW_REFERENCES.SUPERVISION_PERCENTAGE,
    NEW_REFERENCES.FUNDING_PERCENTAGE,
    NEW_REFERENCES.ORG_UNIT_CD,
    NEW_REFERENCES.OU_START_DT,
    NEW_REFERENCES.REPLACED_PERSON_ID,
    NEW_REFERENCES.REPLACED_SEQUENCE_NUMBER,
    NEW_REFERENCES.COMMENTS,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );

Line: 1072


    p_action => 'INSERT',
    x_rowid => X_ROWID
  );

Line: 1089


end INSERT_ROW;

Line: 1109


  cursor c1 is select
      START_DT,
      END_DT,
      RESEARCH_SUPERVISOR_TYPE,
      SUPERVISOR_PROFESSION,
      SUPERVISION_PERCENTAGE,
      FUNDING_PERCENTAGE,
      ORG_UNIT_CD,
      OU_START_DT,
      REPLACED_PERSON_ID,
      REPLACED_SEQUENCE_NUMBER,
      COMMENTS
    from IGS_RE_SPRVSR
    where ROWID = X_ROWID
    for update nowait;

Line: 1130


    fnd_message.set_name('FND', 'FORM_RECORD_DELETED');

Line: 1175


procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_CA_PERSON_ID in NUMBER,
  X_CA_SEQUENCE_NUMBER in NUMBER,
  X_PERSON_ID in NUMBER,
  X_SEQUENCE_NUMBER in NUMBER,
  X_START_DT in DATE,
  X_END_DT in DATE,
  X_RESEARCH_SUPERVISOR_TYPE in VARCHAR2,
  X_SUPERVISOR_PROFESSION in VARCHAR2,
  X_SUPERVISION_PERCENTAGE in NUMBER,
  X_FUNDING_PERCENTAGE in NUMBER,
  X_ORG_UNIT_CD in VARCHAR2,
  X_OU_START_DT in DATE,
  X_REPLACED_PERSON_ID in NUMBER,
  X_REPLACED_SEQUENCE_NUMBER in NUMBER,
  X_COMMENTS in VARCHAR2,
  X_MODE in VARCHAR2
  ) as
    X_LAST_UPDATE_DATE DATE;

Line: 1195


    X_LAST_UPDATED_BY NUMBER;

Line: 1196


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 1198


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 1200


    X_LAST_UPDATED_BY := 1;

Line: 1201


    X_LAST_UPDATE_LOGIN := 0;

Line: 1203


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 1204


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 1207


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 1208


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 1218


    p_action => 'UPDATE',
    x_rowid => X_ROWID,
    x_ca_person_id => X_CA_PERSON_ID,
    x_ca_sequence_number => X_CA_SEQUENCE_NUMBER,
    x_person_id => X_PERSON_ID,
    x_sequence_number => X_SEQUENCE_NUMBER,
    x_start_dt => X_START_DT,
    x_end_dt => X_END_DT,
    x_research_supervisor_type => X_RESEARCH_SUPERVISOR_TYPE,
    x_supervisor_profession => X_SUPERVISOR_PROFESSION,
    x_supervision_percentage => X_SUPERVISION_PERCENTAGE,
    x_funding_percentage => X_FUNDING_PERCENTAGE,
    x_org_unit_cd => X_ORG_UNIT_CD,
    x_ou_start_dt => X_OU_START_DT,
    x_replaced_person_id => X_REPLACED_PERSON_ID,
    x_replaced_sequence_number => X_REPLACED_SEQUENCE_NUMBER,
    x_comments => X_COMMENTS,
    x_created_by => X_LAST_UPDATED_BY ,
    x_creation_date => X_LAST_UPDATE_DATE,
    x_last_updated_by => X_LAST_UPDATED_BY,
    x_last_update_date => X_LAST_UPDATE_DATE,
    x_last_update_login => X_LAST_UPDATE_LOGIN
 );

Line: 1245


  update IGS_RE_SPRVSR set
    START_DT = NEW_REFERENCES.START_DT,
    END_DT = NEW_REFERENCES.END_DT,
    RESEARCH_SUPERVISOR_TYPE = NEW_REFERENCES.RESEARCH_SUPERVISOR_TYPE,
    SUPERVISOR_PROFESSION = NEW_REFERENCES.SUPERVISOR_PROFESSION,
    SUPERVISION_PERCENTAGE = NEW_REFERENCES.SUPERVISION_PERCENTAGE,
    FUNDING_PERCENTAGE = NEW_REFERENCES.FUNDING_PERCENTAGE,
    ORG_UNIT_CD = NEW_REFERENCES.ORG_UNIT_CD,
    OU_START_DT = NEW_REFERENCES.OU_START_DT,
    REPLACED_PERSON_ID = NEW_REFERENCES.REPLACED_PERSON_ID,
    REPLACED_SEQUENCE_NUMBER = NEW_REFERENCES.REPLACED_SEQUENCE_NUMBER,
    COMMENTS = NEW_REFERENCES.COMMENTS,
    LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
    LAST_UPDATED_BY = X_LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
  where ROWID = X_ROWID
  ;

Line: 1274


    p_action => 'UPDATE',
    x_rowid => X_ROWID
  );

Line: 1291


end UPDATE_ROW;

Line: 1313


 select rowid from IGS_RE_SPRVSR
     where CA_PERSON_ID = X_CA_PERSON_ID
     and CA_SEQUENCE_NUMBER = X_CA_SEQUENCE_NUMBER
     and PERSON_ID = X_PERSON_ID
     and SEQUENCE_NUMBER = X_SEQUENCE_NUMBER
  ;

Line: 1324


    INSERT_ROW (
     X_ROWID,
     X_CA_PERSON_ID,
     X_CA_SEQUENCE_NUMBER,
     X_PERSON_ID,
     X_SEQUENCE_NUMBER,
     X_START_DT,
     X_END_DT,
     X_RESEARCH_SUPERVISOR_TYPE,
     X_SUPERVISOR_PROFESSION,
     X_SUPERVISION_PERCENTAGE,
     X_FUNDING_PERCENTAGE,
     X_ORG_UNIT_CD,
     X_OU_START_DT,
     X_REPLACED_PERSON_ID,
     X_REPLACED_SEQUENCE_NUMBER,
     X_COMMENTS,
     X_MODE);

Line: 1345


  UPDATE_ROW (
   X_ROWID,
   X_CA_PERSON_ID,
   X_CA_SEQUENCE_NUMBER,
   X_PERSON_ID,
   X_SEQUENCE_NUMBER,
   X_START_DT,
   X_END_DT,
   X_RESEARCH_SUPERVISOR_TYPE,
   X_SUPERVISOR_PROFESSION,
   X_SUPERVISION_PERCENTAGE,
   X_FUNDING_PERCENTAGE,
   X_ORG_UNIT_CD,
   X_OU_START_DT,
   X_REPLACED_PERSON_ID,
   X_REPLACED_SEQUENCE_NUMBER,
   X_COMMENTS,
   X_MODE);

Line: 1365


procedure DELETE_ROW (
  X_ROWID in VARCHAR2,
  x_mode IN VARCHAR2
  ) as
begin

  Before_DML (
    p_action => 'DELETE',
    x_rowid => X_ROWID
   );

Line: 1379


  delete from IGS_RE_SPRVSR
  where ROWID = X_ROWID;

Line: 1391


end DELETE_ROW;