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

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

Line: 24


    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_AD_SBM_PS_FNTRGT
      WHERE    rowid = x_rowid;

Line: 42


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

Line: 44


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

Line: 63


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

Line: 70


    new_references.last_update_date := x_last_update_date;

Line: 71


    new_references.last_updated_by := x_last_updated_by;

Line: 72


    new_references.last_update_login := x_last_update_login;

Line: 76


  PROCEDURE BeforeRowInsertUpdate1(
    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: 84


	IF p_inserting OR (old_references.funding_source <> new_references.funding_source) THEN
		IF IGS_AD_VAL_SAFT.crsp_val_fs_closed(
					new_references.funding_source,
					v_message_name) = FALSE THEN
		    Fnd_Message.Set_Name('IGS', v_message_name);

Line: 94


	IF p_inserting OR
	    (old_references.course_cd <> new_references.course_cd) OR
	    (old_references.crv_version_number <> new_references.crv_version_number) THEN
		IF IGS_PS_VAL_CRS.crsp_val_iud_crv_dtl(
					new_references.course_cd,
					new_references.crv_version_number,
					v_message_name) = FALSE THEN
		    Fnd_Message.Set_Name('IGS', v_message_name);

Line: 117


	IF p_inserting OR
	    (old_references.location_cd <> new_references.location_cd) OR
	    (old_references.attendance_mode <> new_references.attendance_mode) OR
	    (old_references.attendance_type <> new_references.attendance_type) THEN
		IF IGS_AD_VAL_SCFT.admp_val_scft_dtl(
					new_references.submission_yr,
					new_references.submission_number,
					new_references.course_cd,
					new_references.crv_version_number,
					new_references.location_cd,
					new_references.attendance_mode,
					new_references.attendance_type,
					v_message_name) = FALSE THEN
		    Fnd_Message.Set_Name('IGS', v_message_name);

Line: 136


	IF p_inserting OR
	    (old_references.unit_set_cd <> new_references.unit_set_cd) OR
	    (old_references.us_version_number <> new_references.us_version_number) OR
	    (old_references.location_cd <> new_references.location_cd) OR
	    (old_references.attendance_mode <> new_references.attendance_mode) OR
	    (old_references.attendance_type <> new_references.attendance_type) THEN
		IF IGS_AD_VAL_SCFT.admp_val_scft_cous(
					new_references.course_cd,
					new_references.crv_version_number,
					new_references.unit_set_cd,
					new_references.us_version_number,
					new_references.location_cd,
					new_references.attendance_mode,
					new_references.attendance_type,
					v_message_name) = FALSE THEN
		    Fnd_Message.Set_Name('IGS', v_message_name);

Line: 157


	IF p_inserting OR
	    (old_references.course_cd <> new_references.course_cd) OR
	    (old_references.crv_version_number <> new_references.crv_version_number) OR
	    (old_references.funding_source <> new_references.funding_source) THEN
		IF IGS_AD_VAL_SCFT.admp_val_scft_fs(
					new_references.course_cd,
					new_references.crv_version_number,
					new_references.funding_source,
					v_message_name) = FALSE THEN
		    Fnd_Message.Set_Name('IGS', v_message_name);

Line: 173


  END BeforeRowInsertUpdate1;

Line: 175


  PROCEDURE AfterRowInsertUpdate2(
    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: 182


		IF  p_inserting OR p_updating THEN
  		 IF  IGS_AD_VAL_SCFT.admp_val_scft_uniq (
			new_references.submission_yr,
			new_references.submission_number,
			new_references.course_cd,
			new_references.crv_version_number,
			new_references.funding_source,
			new_references.location_cd,
			new_references.attendance_mode,
			new_references.attendance_type,
			new_references.unit_set_cd,
  			new_references.us_version_number,
			v_message_name) = FALSE THEN
		    Fnd_Message.Set_Name('IGS', v_message_name);

Line: 200


	END AfterRowInsertUpdate2;

Line: 288


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

Line: 301


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

Line: 317


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

Line: 330


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

Line: 346


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

Line: 360


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

Line: 376


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

Line: 408


      SELECT   rowid
      FROM     IGS_AD_SBM_PS_FNTRGT
      WHERE    submission_yr = x_submission_yr
      AND      submission_number = x_submission_number
      AND      course_cd = x_course_cd
      AND      crv_version_number = x_crv_version_number
      AND      funding_source = x_funding_source
      AND      sequence_number = x_sequence_number
      FOR UPDATE NOWAIT;

Line: 439


      SELECT   rowid
      FROM     IGS_AD_SBM_PS_FNTRGT
      WHERE    attendance_mode = x_attendance_mode ;

Line: 465


      SELECT   rowid
      FROM     IGS_AD_SBM_PS_FNTRGT
      WHERE    attendance_type = x_attendance_type ;

Line: 492


      SELECT   rowid
      FROM     IGS_AD_SBM_PS_FNTRGT
      WHERE    course_cd = x_course_cd
      AND      crv_version_number = x_version_number ;

Line: 519


      SELECT   rowid
      FROM     IGS_AD_SBM_PS_FNTRGT
      WHERE    funding_source = x_funding_source ;

Line: 547


      SELECT   rowid
      FROM     IGS_AD_SBM_PS_FNTRGT
      WHERE    submission_yr = x_submission_yr
      AND      submission_number = x_submission_number ;

Line: 574


      SELECT   rowid
      FROM     IGS_AD_SBM_PS_FNTRGT
      WHERE    location_cd = x_location_cd ;

Line: 601


      SELECT   rowid
      FROM     IGS_AD_SBM_PS_FNTRGT
      WHERE    unit_set_cd = x_unit_set_cd
      AND      us_version_number = x_version_number ;

Line: 639


    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_submission_yr,
      x_submission_number,
      x_course_cd,
      x_crv_version_number,
      x_funding_source,
      x_sequence_number,
      x_location_cd,
      x_attendance_mode,
      x_attendance_type,
      x_unit_set_cd,
      x_us_version_number,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );

Line: 666


    IF (p_action = 'INSERT') THEN
      BeforeRowInsertUpdate1 ( p_inserting => TRUE );

Line: 682


    ELSIF (p_action = 'UPDATE') THEN
      BeforeRowInsertUpdate1 ( p_updating => TRUE );

Line: 686


    ELSIF (p_action = 'DELETE') THEN
      Null;

Line: 689


    ELSIF (p_action = 'VALIDATE_INSERT') THEN
	IF Get_PK_For_Validation (
		new_references.submission_yr,
		new_references.submission_number,
		new_references.course_cd,
		new_references.crv_version_number,
		new_references.funding_source,
		new_references.sequence_number
	) THEN
		Fnd_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');

Line: 703


    ELSIF (p_action = 'VALIDATE_UPDATE') THEN
	Check_Constraints;

Line: 705


    ELSIF (p_action = 'VALIDATE_DELETE') THEN
      Check_Child_Existance;

Line: 719


procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_SUBMISSION_YR in NUMBER,
  X_SUBMISSION_NUMBER in NUMBER,
  X_COURSE_CD in VARCHAR2,
  X_CRV_VERSION_NUMBER in NUMBER,
  X_FUNDING_SOURCE in VARCHAR2,
  X_SEQUENCE_NUMBER in NUMBER,
  X_LOCATION_CD in VARCHAR2,
  X_ATTENDANCE_MODE in VARCHAR2,
  X_ATTENDANCE_TYPE in VARCHAR2,
  X_UNIT_SET_CD in VARCHAR2,
  X_US_VERSION_NUMBER in NUMBER,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    cursor C is select ROWID from IGS_AD_SBM_PS_FNTRGT
      where SUBMISSION_YR = X_SUBMISSION_YR
      and SUBMISSION_NUMBER = X_SUBMISSION_NUMBER
      and COURSE_CD = X_COURSE_CD
      and CRV_VERSION_NUMBER = X_CRV_VERSION_NUMBER
      and FUNDING_SOURCE = X_FUNDING_SOURCE
      and SEQUENCE_NUMBER = X_SEQUENCE_NUMBER;

Line: 741


    X_LAST_UPDATE_DATE DATE;

Line: 742


    X_LAST_UPDATED_BY NUMBER;

Line: 743


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 745


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 747


    X_LAST_UPDATED_BY := 1;

Line: 748


    X_LAST_UPDATE_LOGIN := 0;

Line: 750


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 751


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 754


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 755


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 764


     p_action => 'INSERT',
     x_rowid => X_ROWID,
     x_submission_yr => X_SUBMISSION_YR,
     x_submission_number => X_SUBMISSION_NUMBER,
     x_course_cd => X_COURSE_CD,
     x_crv_version_number => X_CRV_VERSION_NUMBER,
     x_funding_source => X_FUNDING_SOURCE,
     x_sequence_number => X_SEQUENCE_NUMBER,
     x_location_cd => X_LOCATION_CD,
     x_attendance_mode => X_ATTENDANCE_MODE,
     x_attendance_type => X_ATTENDANCE_TYPE,
     x_unit_set_cd => X_UNIT_SET_CD,
     x_us_version_number => X_US_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: 785


  insert into IGS_AD_SBM_PS_FNTRGT (
    SUBMISSION_YR,
    SUBMISSION_NUMBER,
    COURSE_CD,
    CRV_VERSION_NUMBER,
    FUNDING_SOURCE,
    SEQUENCE_NUMBER,
    LOCATION_CD,
    ATTENDANCE_MODE,
    ATTENDANCE_TYPE,
    UNIT_SET_CD,
    US_VERSION_NUMBER,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.SUBMISSION_YR,
    NEW_REFERENCES.SUBMISSION_NUMBER,
    NEW_REFERENCES.COURSE_CD,
    NEW_REFERENCES.CRV_VERSION_NUMBER,
    NEW_REFERENCES.FUNDING_SOURCE,
    NEW_REFERENCES.SEQUENCE_NUMBER,
    NEW_REFERENCES.LOCATION_CD,
    NEW_REFERENCES.ATTENDANCE_MODE,
    NEW_REFERENCES.ATTENDANCE_TYPE,
    NEW_REFERENCES.UNIT_SET_CD,
    NEW_REFERENCES.US_VERSION_NUMBER,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );

Line: 829


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

Line: 833


end INSERT_ROW;

Line: 849


  cursor c1 is select
      LOCATION_CD,
      ATTENDANCE_MODE,
      ATTENDANCE_TYPE,
      UNIT_SET_CD,
      US_VERSION_NUMBER
    from IGS_AD_SBM_PS_FNTRGT
    where ROWID = X_ROWID for update nowait;

Line: 864


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

Line: 896


procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_SUBMISSION_YR in NUMBER,
  X_SUBMISSION_NUMBER in NUMBER,
  X_COURSE_CD in VARCHAR2,
  X_CRV_VERSION_NUMBER in NUMBER,
  X_FUNDING_SOURCE in VARCHAR2,
  X_SEQUENCE_NUMBER in NUMBER,
  X_LOCATION_CD in VARCHAR2,
  X_ATTENDANCE_MODE in VARCHAR2,
  X_ATTENDANCE_TYPE in VARCHAR2,
  X_UNIT_SET_CD in VARCHAR2,
  X_US_VERSION_NUMBER in NUMBER,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    X_LAST_UPDATE_DATE DATE;

Line: 912


    X_LAST_UPDATED_BY NUMBER;

Line: 913


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 915


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 917


    X_LAST_UPDATED_BY := 1;

Line: 918


    X_LAST_UPDATE_LOGIN := 0;

Line: 920


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 921


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 924


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 925


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 934


     p_action => 'UPDATE',
     x_rowid => X_ROWID,
     x_submission_yr => X_SUBMISSION_YR,
     x_submission_number => X_SUBMISSION_NUMBER,
     x_course_cd => X_COURSE_CD,
     x_crv_version_number => X_CRV_VERSION_NUMBER,
     x_funding_source => X_FUNDING_SOURCE,
     x_sequence_number => X_SEQUENCE_NUMBER,
     x_location_cd => X_LOCATION_CD,
     x_attendance_mode => X_ATTENDANCE_MODE,
     x_attendance_type => X_ATTENDANCE_TYPE,
     x_unit_set_cd => X_UNIT_SET_CD,
     x_us_version_number => X_US_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: 954


  update IGS_AD_SBM_PS_FNTRGT set
    LOCATION_CD = NEW_REFERENCES.LOCATION_CD,
    ATTENDANCE_MODE = NEW_REFERENCES.ATTENDANCE_MODE,
    ATTENDANCE_TYPE = NEW_REFERENCES.ATTENDANCE_TYPE,
    UNIT_SET_CD = NEW_REFERENCES.UNIT_SET_CD,
    US_VERSION_NUMBER = NEW_REFERENCES.US_VERSION_NUMBER,
    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: 969


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

Line: 972


end UPDATE_ROW;

Line: 989


  cursor c1 is select rowid from IGS_AD_SBM_PS_FNTRGT
     where SUBMISSION_YR = X_SUBMISSION_YR
     and SUBMISSION_NUMBER = X_SUBMISSION_NUMBER
     and COURSE_CD = X_COURSE_CD
     and CRV_VERSION_NUMBER = X_CRV_VERSION_NUMBER
     and FUNDING_SOURCE = X_FUNDING_SOURCE
     and SEQUENCE_NUMBER = X_SEQUENCE_NUMBER
  ;

Line: 1002


    INSERT_ROW (
     X_ROWID,
     X_SUBMISSION_YR,
     X_SUBMISSION_NUMBER,
     X_COURSE_CD,
     X_CRV_VERSION_NUMBER,
     X_FUNDING_SOURCE,
     X_SEQUENCE_NUMBER,
     X_LOCATION_CD,
     X_ATTENDANCE_MODE,
     X_ATTENDANCE_TYPE,
     X_UNIT_SET_CD,
     X_US_VERSION_NUMBER,
     X_MODE);

Line: 1019


  UPDATE_ROW (
   X_ROWID,
   X_SUBMISSION_YR,
   X_SUBMISSION_NUMBER,
   X_COURSE_CD,
   X_CRV_VERSION_NUMBER,
   X_FUNDING_SOURCE,
   X_SEQUENCE_NUMBER,
   X_LOCATION_CD,
   X_ATTENDANCE_MODE,
   X_ATTENDANCE_TYPE,
   X_UNIT_SET_CD,
   X_US_VERSION_NUMBER,
   X_MODE);

Line: 1035


procedure DELETE_ROW (
X_ROWID in VARCHAR2
) AS
begin
  Before_DML (
     p_action => 'DELETE',
     x_rowid => X_ROWID
  );

Line: 1043


  delete from IGS_AD_SBM_PS_FNTRGT
  where ROWID = X_ROWID;

Line: 1049


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

Line: 1052


end DELETE_ROW;