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_FI_FND_SRC_RSTN_PKG SQL Statements

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

Line: 34


    x_last_update_date IN DATE DEFAULT NULL,

    x_last_updated_by IN NUMBER DEFAULT NULL,

    x_last_update_login IN NUMBER DEFAULT NULL

  ) AS



    CURSOR cur_old_ref_values IS

      SELECT   *

      FROM     IGS_FI_FND_SRC_RSTN

      WHERE    rowid = x_rowid;

Line: 70


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

      Close cur_old_ref_values;

Line: 73


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

Line: 98


    IF (p_action = 'UPDATE') THEN

      new_references.creation_date := old_references.creation_date;

Line: 112


    new_references.last_update_date := x_last_update_date;

Line: 114


    new_references.last_updated_by := x_last_updated_by;

Line: 116


    new_references.last_update_login := x_last_update_login;

Line: 136


  PROCEDURE BeforeRowInsertUpdateDelete1(

    p_inserting IN BOOLEAN DEFAULT FALSE,

    p_updating IN BOOLEAN DEFAULT FALSE,

    p_deleting IN BOOLEAN DEFAULT FALSE

    ) AS

	v_message_name varchar2(30);

Line: 166


	ELSE -- p_inserting or p_updating

		v_course_cd := new_references.course_cd;

Line: 174


	-- Validate the insert/update/delete.

	IF  IGS_PS_VAL_CRS.crsp_val_iud_crv_dtl (

			v_course_cd,

			v_version_number,

			v_message_name) = FALSE THEN

		Fnd_Message.Set_Name('IGS',v_message_name);

Line: 190


	-- Validate funding source.  Funding source is not updateable.

	IF p_inserting THEN

		IF IGS_PS_VAL_FSr.crsp_val_fsr_fnd_src (

				new_references.funding_source,

				v_message_name) = FALSE THEN

			Fnd_Message.Set_Name('IGS',v_message_name);

Line: 210


	IF p_inserting OR p_updating THEN

		IF IGS_PS_VAL_FSr.crsp_val_fsr_inds (

				new_references.dflt_ind,

				new_references.restricted_ind,

				v_message_name) = FALSE THEN

			Fnd_Message.Set_Name('IGS',v_message_name);

Line: 228


	-- Create history record for update.

	IF p_updating THEN

		IF old_references.dflt_ind <> new_references.dflt_ind OR

			old_references.restricted_ind <> new_references.restricted_ind THEN

			SELECT	DECODE(old_references.dflt_ind,new_references.dflt_ind,NULL,old_references.dflt_ind),

				DECODE(old_references.restricted_ind,new_references.restricted_ind,NULL,old_references.restricted_ind)

			INTO	v_dflt_ind,

				v_restricted_ind

			FROM	dual;

Line: 254


				old_references.last_update_date,

				new_references.last_update_date,

				old_references.last_updated_by,

				v_dflt_ind,

				v_restricted_ind);

Line: 280


			old_references.last_update_date,

			SYSDATE,

			old_references.last_updated_by,

			old_references.dflt_ind,

			old_references.restricted_ind);

Line: 296


  END BeforeRowInsertUpdateDelete1;

Line: 361


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

Line: 374


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

Line: 386


     SELECT   rowid
      FROM     IGS_FI_FND_SRC_RSTN
      WHERE    course_cd = x_course_cd
      AND      version_number = x_version_number
      AND      funding_source = x_funding_source
      FOR UPDATE NOWAIT;

Line: 410


      SELECT   rowid
      FROM     IGS_FI_FND_SRC_RSTN
      WHERE    funding_source = x_funding_source ;

Line: 443


      SELECT   rowid

      FROM     IGS_FI_FND_SRC_RSTN

      WHERE    course_cd = x_course_cd

      AND      version_number = x_version_number ;

Line: 495


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

  BEGIN



    Set_Column_Values (

      p_action,

      x_rowid,

      x_course_cd,

      x_version_number,

      x_funding_source,

      x_dflt_ind,

      x_restricted_ind,

      x_creation_date,

      x_created_by,

      x_last_update_date,

      x_last_updated_by,

      x_last_update_login

    );

Line: 534


    IF (p_action = 'INSERT') THEN

      -- Call all the procedures related to Before Insert.

      BeforeRowInsertUpdateDelete1 ( p_inserting => TRUE );

Line: 551


    ELSIF (p_action = 'UPDATE') THEN

      -- Call all the procedures related to Before Update.

      BeforeRowInsertUpdateDelete1 ( p_updating => TRUE );

Line: 561


    ELSIF (p_action = 'DELETE') THEN

      -- Call all the procedures related to Before Delete.

      BeforeRowInsertUpdateDelete1 ( p_deleting => TRUE );

Line: 567


   ELSIF (p_action = 'VALIDATE_INSERT') THEN
      -- Call all the procedures related to Before Insert.
	  IF Get_PK_For_Validation (  new_references.course_cd,
    							  new_references.version_number,
    							  new_references.funding_source ) THEN
         Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');

Line: 577


    ELSIF (p_action = 'VALIDATE_UPDATE') THEN
	 	Check_Constraints;

Line: 582


procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_COURSE_CD in VARCHAR2,
  X_FUNDING_SOURCE in VARCHAR2,
  X_VERSION_NUMBER in NUMBER,
  X_DFLT_IND in VARCHAR2,
  X_RESTRICTED_IND in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    cursor C is select ROWID from IGS_FI_FND_SRC_RSTN
      where COURSE_CD = X_COURSE_CD
      and FUNDING_SOURCE = X_FUNDING_SOURCE
      and VERSION_NUMBER = X_VERSION_NUMBER;

Line: 595


    X_LAST_UPDATE_DATE DATE;

Line: 596


    X_LAST_UPDATED_BY NUMBER;

Line: 597


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 599


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 601


    X_LAST_UPDATED_BY := 1;

Line: 602


    X_LAST_UPDATE_LOGIN := 0;

Line: 604


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 605


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 608


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 609


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 621


 p_action=>'INSERT',
 x_rowid=>X_ROWID,
 x_course_cd=>X_COURSE_CD,
 x_dflt_ind=>NVL(X_DFLT_IND,'N'),
 x_funding_source=>X_FUNDING_SOURCE,
 x_restricted_ind=>NVL(X_RESTRICTED_IND,'Y'),
 x_version_number=>X_VERSION_NUMBER,
 x_creation_date=>X_LAST_UPDATE_DATE,
 x_created_by=>X_LAST_UPDATED_BY,
 x_last_update_date=>X_LAST_UPDATE_DATE,
 x_last_updated_by=>X_LAST_UPDATED_BY,
 x_last_update_login=>X_LAST_UPDATE_LOGIN
);

Line: 635


  insert into IGS_FI_FND_SRC_RSTN (
    COURSE_CD,
    VERSION_NUMBER,
    FUNDING_SOURCE,
    DFLT_IND,
    RESTRICTED_IND,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.COURSE_CD,
    NEW_REFERENCES.VERSION_NUMBER,
    NEW_REFERENCES.FUNDING_SOURCE,
    NEW_REFERENCES.DFLT_IND,
    NEW_REFERENCES.RESTRICTED_IND,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );

Line: 667


end INSERT_ROW;

Line: 677


  cursor c1 is select
      DFLT_IND,
      RESTRICTED_IND
    from IGS_FI_FND_SRC_RSTN
    where ROWID=X_ROWID
    for update nowait;

Line: 690


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

Line: 709


procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_COURSE_CD in VARCHAR2,
  X_FUNDING_SOURCE in VARCHAR2,
  X_VERSION_NUMBER in NUMBER,
  X_DFLT_IND in VARCHAR2,
  X_RESTRICTED_IND in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    X_LAST_UPDATE_DATE DATE;

Line: 719


    X_LAST_UPDATED_BY NUMBER;

Line: 720


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 722


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 724


    X_LAST_UPDATED_BY := 1;

Line: 725


    X_LAST_UPDATE_LOGIN := 0;

Line: 727


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 728


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 731


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 732


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 743


		 p_action=>'UPDATE',

		 x_rowid=>X_ROWID,

		 x_course_cd=>X_COURSE_CD,

		 x_dflt_ind=>X_DFLT_IND,

		 x_funding_source=>X_FUNDING_SOURCE,

		 x_restricted_ind=>X_RESTRICTED_IND,

		 x_version_number=>X_VERSION_NUMBER,

		 x_creation_date=>X_LAST_UPDATE_DATE,

		 x_created_by=>X_LAST_UPDATED_BY,

		 x_last_update_date=>X_LAST_UPDATE_DATE,

		 x_last_updated_by=>X_LAST_UPDATED_BY,

		 x_last_update_login=>X_LAST_UPDATE_LOGIN

	);

Line: 770


  update IGS_FI_FND_SRC_RSTN set
    DFLT_IND = NEW_REFERENCES.DFLT_IND,
    RESTRICTED_IND = NEW_REFERENCES.RESTRICTED_IND,
    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: 782


end UPDATE_ROW;

Line: 793


  cursor c1 is select rowid from IGS_FI_FND_SRC_RSTN
     where COURSE_CD = X_COURSE_CD
     and FUNDING_SOURCE = X_FUNDING_SOURCE
     and VERSION_NUMBER = X_VERSION_NUMBER
  ;

Line: 803


    INSERT_ROW (
     X_ROWID,
     X_COURSE_CD,
     X_FUNDING_SOURCE,
     X_VERSION_NUMBER,
     X_DFLT_IND,
     X_RESTRICTED_IND,
     X_MODE);

Line: 814


  UPDATE_ROW (
   X_ROWID,
   X_COURSE_CD,
   X_FUNDING_SOURCE,
   X_VERSION_NUMBER,
   X_DFLT_IND,
   X_RESTRICTED_IND,
   X_MODE);

Line: 824


procedure DELETE_ROW (
  X_ROWID in VARCHAR2
) AS
begin

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

Line: 833


  delete from IGS_FI_FND_SRC_RSTN
  where ROWID=X_ROWID;

Line: 838


end DELETE_ROW;