DBA Data[Home] [Help]

APPS.IGS_GR_AWD_CEREMONY_PKG SQL Statements

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

Line: 21

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

    CURSOR cur_old_ref_values IS
      SELECT   *
      FROM     IGS_GR_AWD_CEREMONY_ALL
      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 AND new_references.award_cd <> old_references.award_cd) THEN
		IF IGS_GR_VAL_AWC.crsp_val_aw_closed(
				new_references.award_cd,
				v_message_name) = FALSE THEN
			Fnd_Message.Set_Name('IGS', v_message_name);
Line: 109

	IF p_inserting OR p_updating THEN
		IF new_references.award_course_cd IS NOT NULL THEN
			IF IGS_GR_VAL_AWC.grdp_val_award_type(
					new_references.award_cd,
					'COURSE',
					v_message_name) = FALSE THEN
				Fnd_Message.Set_Name('IGS', v_message_name);
Line: 132

  END BeforeRowInsertUpdate1;
Line: 140

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

      SELECT  'X'
      FROM  IGS_GR_AWD_CEREMONY awc
      WHERE awc.grd_cal_type       = NEW_REFERENCES.grd_cal_type           AND
        awc.grd_ci_sequence_number = NEW_REFERENCES.grd_ci_sequence_number AND
        awc.ceremony_number        = NEW_REFERENCES.ceremony_number        AND
        awc.order_in_ceremony      = NEW_REFERENCES.order_in_ceremony      AND
        awc.award_cd              <> NEW_REFERENCES.award_cd               AND
				awc.awc_id                <> NVL(NEW_REFERENCES.awc_id,-1);
Line: 160

	IF p_inserting OR (p_updating AND
	   (new_references.order_in_ceremony <> old_references.order_in_ceremony OR
	   (new_references.closed_ind <> old_references.closed_ind AND new_references.closed_ind = 'N'))) THEN

        -- validate award ceremony order in ceremony
        IF IGS_GR_VAL_AWC.grdp_val_awc_order(
            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.order_in_ceremony,
            v_message_name) = FALSE THEN
					IF NVL(v_message_name, 'NULL') = 'IGS_GR_MUST_BE_SAME_AWRD_CD' THEN
					  OPEN c_awc;
Line: 190

  END AfterRowInsertUpdate2;
Line: 192

 PROCEDURE before_insert_update(p_inserting IN BOOLEAN DEFAULT FALSE,
                                p_updating  IN BOOLEAN DEFAULT FALSE ) AS
   CURSOR c_closed_ind (cp_c_award_cd IN IGS_PS_AWARD.AWARD_CD%TYPE,
                        cp_c_course_cd IN IGS_PS_AWARD.COURSE_CD%TYPE,
                        cp_n_version_num IN IGS_PS_AWARD.VERSION_NUMBER%TYPE) IS
     SELECT CLOSED_IND
     FROM IGS_PS_AWARD
     WHERE AWARD_CD = cp_c_award_cd
     AND   COURSE_CD = cp_c_course_cd
     AND   VERSION_NUMBER = cp_n_version_num;
Line: 204

     IF p_inserting OR ( p_updating AND new_references.award_cd <> old_references.award_cd ) THEN
        OPEN c_closed_ind(new_references.award_cd,new_references.award_course_cd, new_references.award_crs_version_number);
Line: 214

  END before_insert_update;
Line: 241

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

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

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

      SELECT   rowid
      FROM     IGS_GR_AWD_CEREMONY_ALL
      WHERE    AWC_ID = x_AWC_ID
      FOR UPDATE NOWAIT;
Line: 381

      SELECT   rowid
      FROM     IGS_GR_AWD_CEREMONY_ALL
      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 (l_rowid is null or rowid <> l_rowid )
      FOR UPDATE NOWAIT;
Line: 413

      SELECT   rowid
      FROM     IGS_GR_AWD_CEREMONY_ALL
      WHERE    grd_cal_type = x_grd_cal_type
      AND      grd_ci_sequence_number = x_grd_ci_sequence_number
      AND      ceremony_number = x_ceremony_number ;
Line: 450

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

    Set_Column_Values (
      p_action,
      x_rowid,
      x_AWC_ID,
      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_order_in_ceremony,
      x_closed_ind,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login,
      x_org_id
    );
Line: 477

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

      before_insert_update( p_inserting => TRUE , p_updating => FALSE);
Line: 489

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

      before_insert_update( p_updating => TRUE );
Line: 497

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

    ELSIF (p_action = 'VALIDATE_INSERT') THEN
	IF GET_PK_FOR_VALIDATION(NEW_REFERENCES.AWC_ID) THEN
		Fnd_Message.Set_Name('IGS','IGS_GE_MULTI_ORG_DUP_REC');
Line: 508

    ELSIF (p_action = 'VALIDATE_UPDATE') THEN
	check_uniqueness;
Line: 512

    ELSIF (p_action = 'VALIDATE_DELETE') THEN
	check_child_existance;
Line: 525

    IF (p_action = 'INSERT') THEN
      -- Call all the procedures related to After Insert.
      AfterRowInsertUpdate2 ( p_inserting => TRUE );
Line: 528

    ELSIF (p_action = 'UPDATE') THEN
      -- Call all the procedures related to After Update.
      AfterRowInsertUpdate2 ( p_updating => TRUE );
Line: 537

procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_AWC_ID in out NOCOPY NUMBER,
  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_ORDER_IN_CEREMONY in NUMBER,
  X_CLOSED_IND in VARCHAR2,
  X_MODE in VARCHAR2 default 'R',
  X_ORG_ID in NUMBER
  ) AS
    cursor C is select ROWID from IGS_GR_AWD_CEREMONY_ALL
      where AWC_ID = X_AWC_ID;
Line: 553

    X_LAST_UPDATE_DATE DATE;
Line: 554

    X_LAST_UPDATED_BY NUMBER;
Line: 555

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 558

  SELECT IGS_GR_AWD_CEREMONY_AWC_ID_S.NEXTVAL INTO X_AWC_ID FROM DUAL;
Line: 560

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 562

    X_LAST_UPDATED_BY := 1;
Line: 563

    X_LAST_UPDATE_LOGIN := 0;
Line: 565

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 566

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 570

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

    p_action => 'INSERT',
    x_rowid => X_ROWID,
    x_AWC_ID => X_AWC_ID,
    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_order_in_ceremony => X_ORDER_IN_CEREMONY,
    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,
    x_org_id => igs_ge_gen_003.get_org_id
  );
Line: 599

  insert into IGS_GR_AWD_CEREMONY_ALL (
    AWC_ID,
    GRD_CAL_TYPE,
    GRD_CI_SEQUENCE_NUMBER,
    CEREMONY_NUMBER,
    AWARD_COURSE_CD,
    AWARD_CRS_VERSION_NUMBER,
    AWARD_CD,
    ORDER_IN_CEREMONY,
    CLOSED_IND,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN,
    ORG_ID
  ) values (
    NEW_REFERENCES.AWC_ID,
    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.ORDER_IN_CEREMONY,
    NEW_REFERENCES.CLOSED_IND,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN,
    NEW_REFERENCES.ORG_ID
  );
Line: 642

     p_action => 'INSERT',
     x_rowid => X_ROWID
    );
Line: 646

end INSERT_ROW;
Line: 660

  cursor c1 is select
      GRD_CAL_TYPE,
      GRD_CI_SEQUENCE_NUMBER,
      CEREMONY_NUMBER,
      AWARD_COURSE_CD,
      AWARD_CRS_VERSION_NUMBER,
      AWARD_CD,
      ORDER_IN_CEREMONY,
      CLOSED_IND
    from IGS_GR_AWD_CEREMONY_ALL
    where ROWID = X_ROWID for update nowait;
Line: 678

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

procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_AWC_ID in NUMBER,
  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_ORDER_IN_CEREMONY in NUMBER,
  X_CLOSED_IND in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    X_LAST_UPDATE_DATE DATE;
Line: 720

    X_LAST_UPDATED_BY NUMBER;
Line: 721

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 723

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 725

    X_LAST_UPDATED_BY := 1;
Line: 726

    X_LAST_UPDATE_LOGIN := 0;
Line: 728

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 729

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 733

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

    p_action => 'UPDATE',
    x_rowid => X_ROWID,
    x_AWC_ID => X_AWC_ID,
    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_order_in_ceremony => X_ORDER_IN_CEREMONY,
    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: 761

  update IGS_GR_AWD_CEREMONY_ALL set
    GRD_CAL_TYPE = NEW_REFERENCES.GRD_CAL_TYPE,
    GRD_CI_SEQUENCE_NUMBER = NEW_REFERENCES.GRD_CI_SEQUENCE_NUMBER,
    CEREMONY_NUMBER = NEW_REFERENCES.CEREMONY_NUMBER,
    AWARD_COURSE_CD = NEW_REFERENCES.AWARD_COURSE_CD,
    AWARD_CRS_VERSION_NUMBER = NEW_REFERENCES.AWARD_CRS_VERSION_NUMBER,
    AWARD_CD = NEW_REFERENCES.AWARD_CD,
    ORDER_IN_CEREMONY = NEW_REFERENCES.ORDER_IN_CEREMONY,
    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: 780

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

end UPDATE_ROW;
Line: 800

  cursor c1 is select rowid from IGS_GR_AWD_CEREMONY_ALL
     where AWC_ID = X_AWC_ID
  ;
Line: 809

    INSERT_ROW (
     X_ROWID,
     X_AWC_ID,
     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_ORDER_IN_CEREMONY,
     X_CLOSED_IND,
     X_MODE,
     x_org_id);
Line: 825

  UPDATE_ROW (
   X_ROWID,
   X_AWC_ID,
   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_ORDER_IN_CEREMONY,
   X_CLOSED_IND,
   X_MODE
);
Line: 840

procedure DELETE_ROW (
  X_ROWID in VARCHAR2
) AS
begin

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

  delete from IGS_GR_AWD_CEREMONY_ALL
  where ROWID = X_ROWID;
Line: 856

end DELETE_ROW;