DBA Data[Home] [Help]

APPS.IGS_GR_AWD_CRM_US_GP_PKG SQL Statements

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

Line: 22

    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_GR_AWD_CRM_US_GP
      WHERE    rowid = x_rowid;
Line: 40

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

      Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
Line: 60

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

    new_references.last_update_date := x_last_update_date;
Line: 68

    new_references.last_updated_by := x_last_updated_by;
Line: 69

    new_references.last_update_login := x_last_update_login;
Line: 79

  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: 87

	IF p_inserting OR p_updating THEN
		IF IGS_GR_VAL_GC.grdp_val_gc_iud(
				new_references.grd_cal_type,
				new_references.grd_ci_sequence_number,
				new_references.ceremony_number,
				v_message_name) = FALSE THEN
			Fnd_Message.Set_Name('IGS', v_message_name);
Line: 99

	IF p_inserting OR p_updating THEN
		IF igs_gr_val_acus.grdp_val_awc_closed(
				new_references.grd_cal_type,
				new_references.grd_ci_sequence_number,
				new_references.ceremony_number,
				new_references.award_course_cd,
				new_references.award_crs_version_number,
				new_references.award_cd,
				v_message_name) = FALSE THEN
			Fnd_Message.Set_Name('IGS', v_message_name);
Line: 115

  END BeforeRowInsertUpdate1;
Line: 123

  PROCEDURE AfterRowUpdate2(
    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: 152

  END AfterRowUpdate2;
Line: 196

		Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
Line: 240

      SELECT   rowid
      FROM     IGS_GR_AWD_CRM_US_GP
      WHERE    grd_cal_type = x_grd_cal_type
      AND      grd_ci_sequence_number = x_grd_ci_sequence_number
      AND      ceremony_number = x_ceremony_number
      AND      award_course_cd = x_award_course_cd
      AND      award_crs_version_number = x_award_crs_version_number
      AND      award_cd = x_award_cd
      AND      us_group_number = x_us_group_number
      FOR UPDATE NOWAIT;
Line: 277

      SELECT   rowid
      FROM     IGS_GR_AWD_CRM_US_GP
      WHERE    grd_cal_type = x_grd_cal_type
      AND      grd_ci_sequence_number = x_grd_ci_sequence_number
      AND      ceremony_number = x_ceremony_number
      AND      award_course_cd = x_award_course_cd
      AND      award_crs_version_number = x_award_crs_version_number
      AND      award_cd = x_award_cd ;
Line: 318

    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_grd_cal_type,
      x_grd_ci_sequence_number,
      x_ceremony_number,
      x_award_course_cd,
      x_award_crs_version_number,
      x_award_cd,
      x_us_group_number,
      x_order_in_award,
      x_override_title,
      x_closed_ind,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );
Line: 344

    IF (p_action = 'INSERT') THEN
      -- Call all the procedures related to Before Insert.
      BeforeRowInsertUpdate1 ( p_inserting => TRUE );
Line: 365

    ELSIF (p_action = 'UPDATE') THEN
      -- Call all the procedures related to Before Update.
      BeforeRowInsertUpdate1 ( p_updating => TRUE );
Line: 371

    ELSIF (p_action = 'DELETE') THEN
      -- Call all the procedures related to Before Delete.
      Check_Child_Existance;
Line: 375

	ELSIF (p_action = 'VALIDATE_INSERT') THEN
		IF Get_PK_For_Validation (
		    NEW_REFERENCES.grd_cal_type,
		    NEW_REFERENCES.grd_ci_sequence_number,
		    NEW_REFERENCES.ceremony_number,
		    NEW_REFERENCES.award_course_cd,
		    NEW_REFERENCES.award_crs_version_number,
		    NEW_REFERENCES.award_cd,
		    NEW_REFERENCES.us_group_number
		    ) THEN
		Fnd_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
Line: 393

	ELSIF (p_action = 'VALIDATE_UPDATE') THEN

			Check_Constraints;
Line: 398

	ELSIF (p_action = 'VALIDATE_DELETE') THEN
		Check_Child_Existance;
Line: 411

    IF (p_action = 'UPDATE') THEN
      -- Call all the procedures related to After Update.
      AfterRowUpdate2 ( p_updating => TRUE );
Line: 418

procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_GRD_CAL_TYPE in VARCHAR2,
  X_GRD_CI_SEQUENCE_NUMBER in NUMBER,
  X_CEREMONY_NUMBER in NUMBER,
  X_AWARD_COURSE_CD in VARCHAR2,
  X_AWARD_CRS_VERSION_NUMBER in NUMBER,
  X_AWARD_CD in VARCHAR2,
  X_US_GROUP_NUMBER in NUMBER,
  X_ORDER_IN_AWARD in NUMBER,
  X_OVERRIDE_TITLE in VARCHAR2,
  X_CLOSED_IND in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    cursor C is select ROWID from IGS_GR_AWD_CRM_US_GP
      where GRD_CAL_TYPE = X_GRD_CAL_TYPE
      and GRD_CI_SEQUENCE_NUMBER = X_GRD_CI_SEQUENCE_NUMBER
      and CEREMONY_NUMBER = X_CEREMONY_NUMBER
      and AWARD_COURSE_CD = X_AWARD_COURSE_CD
      and AWARD_CRS_VERSION_NUMBER = X_AWARD_CRS_VERSION_NUMBER
      and AWARD_CD = X_AWARD_CD
      and US_GROUP_NUMBER = X_US_GROUP_NUMBER;
Line: 440

    X_LAST_UPDATE_DATE DATE;
Line: 441

    X_LAST_UPDATED_BY NUMBER;
Line: 442

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 444

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 446

    X_LAST_UPDATED_BY := 1;
Line: 447

    X_LAST_UPDATE_LOGIN := 0;
Line: 449

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 450

    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;
Line: 453

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 454

    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;
Line: 464

     p_action => 'INSERT',
     x_rowid => X_ROWID,
    x_grd_cal_type => X_GRD_CAL_TYPE,
    x_grd_ci_sequence_number => X_GRD_CI_SEQUENCE_NUMBER,
    x_ceremony_number => X_CEREMONY_NUMBER,
    x_award_course_cd => X_AWARD_COURSE_CD,
    x_award_crs_version_number => X_AWARD_CRS_VERSION_NUMBER,
    x_award_cd => X_AWARD_CD,
    x_us_group_number => X_US_GROUP_NUMBER,
    x_order_in_award => X_ORDER_IN_AWARD,
    x_override_title => X_OVERRIDE_TITLE,
    x_closed_ind => NVL(X_CLOSED_IND, 'N'),
    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: 483

  insert into IGS_GR_AWD_CRM_US_GP (
    GRD_CAL_TYPE,
    GRD_CI_SEQUENCE_NUMBER,
    CEREMONY_NUMBER,
    AWARD_COURSE_CD,
    AWARD_CRS_VERSION_NUMBER,
    AWARD_CD,
    US_GROUP_NUMBER,
    ORDER_IN_AWARD,
    OVERRIDE_TITLE,
    CLOSED_IND,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.GRD_CAL_TYPE,
    NEW_REFERENCES.GRD_CI_SEQUENCE_NUMBER,
    NEW_REFERENCES.CEREMONY_NUMBER,
    NEW_REFERENCES.AWARD_COURSE_CD,
    NEW_REFERENCES.AWARD_CRS_VERSION_NUMBER,
    NEW_REFERENCES.AWARD_CD,
    NEW_REFERENCES.US_GROUP_NUMBER,
    NEW_REFERENCES.ORDER_IN_AWARD,
    NEW_REFERENCES.OVERRIDE_TITLE,
    NEW_REFERENCES.CLOSED_IND,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );
Line: 525

end INSERT_ROW;
Line: 540

  cursor c1 is select
      ORDER_IN_AWARD,
      OVERRIDE_TITLE,
      CLOSED_IND
    from IGS_GR_AWD_CRM_US_GP
    where ROWID = X_ROWID for update nowait;
Line: 553

    fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
Line: 573

procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_GRD_CAL_TYPE in VARCHAR2,
  X_GRD_CI_SEQUENCE_NUMBER in NUMBER,
  X_CEREMONY_NUMBER in NUMBER,
  X_AWARD_COURSE_CD in VARCHAR2,
  X_AWARD_CRS_VERSION_NUMBER in NUMBER,
  X_AWARD_CD in VARCHAR2,
  X_US_GROUP_NUMBER in NUMBER,
  X_ORDER_IN_AWARD in NUMBER,
  X_OVERRIDE_TITLE in VARCHAR2,
  X_CLOSED_IND in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    X_LAST_UPDATE_DATE DATE;
Line: 588

    X_LAST_UPDATED_BY NUMBER;
Line: 589

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 591

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 593

    X_LAST_UPDATED_BY := 1;
Line: 594

    X_LAST_UPDATE_LOGIN := 0;
Line: 596

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 597

    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;
Line: 600

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 601

    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;
Line: 611

     p_action => 'UPDATE',
     x_rowid => X_ROWID,
    x_grd_cal_type => X_GRD_CAL_TYPE,
    x_grd_ci_sequence_number => X_GRD_CI_SEQUENCE_NUMBER,
    x_ceremony_number => X_CEREMONY_NUMBER,
    x_award_course_cd => X_AWARD_COURSE_CD,
    x_award_crs_version_number => X_AWARD_CRS_VERSION_NUMBER,
    x_award_cd => X_AWARD_CD,
    x_us_group_number => X_US_GROUP_NUMBER,
    x_order_in_award => X_ORDER_IN_AWARD,
    x_override_title => X_OVERRIDE_TITLE,
    x_closed_ind => X_CLOSED_IND,
    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: 630

  update IGS_GR_AWD_CRM_US_GP set
    ORDER_IN_AWARD = NEW_REFERENCES.ORDER_IN_AWARD,
    OVERRIDE_TITLE = NEW_REFERENCES.OVERRIDE_TITLE,
    CLOSED_IND = NEW_REFERENCES.CLOSED_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: 644

     p_action => 'UPDATE',
     x_rowid => X_ROWID
    );
Line: 648

end UPDATE_ROW;
Line: 664

  cursor c1 is select rowid from IGS_GR_AWD_CRM_US_GP
     where GRD_CAL_TYPE = X_GRD_CAL_TYPE
     and GRD_CI_SEQUENCE_NUMBER = X_GRD_CI_SEQUENCE_NUMBER
     and CEREMONY_NUMBER = X_CEREMONY_NUMBER
     and AWARD_COURSE_CD = X_AWARD_COURSE_CD
     and AWARD_CRS_VERSION_NUMBER = X_AWARD_CRS_VERSION_NUMBER
     and AWARD_CD = X_AWARD_CD
     and US_GROUP_NUMBER = X_US_GROUP_NUMBER
  ;
Line: 679

    INSERT_ROW (
     X_ROWID,
     X_GRD_CAL_TYPE,
     X_GRD_CI_SEQUENCE_NUMBER,
     X_CEREMONY_NUMBER,
     X_AWARD_COURSE_CD,
     X_AWARD_CRS_VERSION_NUMBER,
     X_AWARD_CD,
     X_US_GROUP_NUMBER,
     X_ORDER_IN_AWARD,
     X_OVERRIDE_TITLE,
     X_CLOSED_IND,
     X_MODE);
Line: 695

  UPDATE_ROW (
   X_ROWID,
   X_GRD_CAL_TYPE,
   X_GRD_CI_SEQUENCE_NUMBER,
   X_CEREMONY_NUMBER,
   X_AWARD_COURSE_CD,
   X_AWARD_CRS_VERSION_NUMBER,
   X_AWARD_CD,
   X_US_GROUP_NUMBER,
   X_ORDER_IN_AWARD,
   X_OVERRIDE_TITLE,
   X_CLOSED_IND,
   X_MODE);
Line: 710

procedure DELETE_ROW (
   X_ROWID in VARCHAR2
) AS
begin

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

  delete from IGS_GR_AWD_CRM_US_GP
  where ROWID = X_ROWID;
Line: 726

end DELETE_ROW;
Line: 738

      SELECT   rowid
      FROM     IGS_GR_AWD_CRM_US_GP
      WHERE    grd_cal_type = x_grd_cal_type
      AND      grd_ci_sequence_number = x_grd_ci_sequence_number
      AND      ceremony_number = x_ceremony_number
      AND      award_course_cd = x_award_course_cd
      AND      award_crs_version_number = x_award_crs_version_number
      AND      award_cd = x_award_cd
      AND      order_in_award = x_order_in_award
	  AND      (l_rowid is null or rowid <> l_rowid )
 FOR UPDATE NOWAIT;