DBA Data[Home] [Help]

APPS.IGS_CA_DA_INST_PAIR_PKG SQL Statements

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

Line: 20

    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_CA_DA_INST_PAIR
      WHERE    rowid = x_rowid;
Line: 38

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

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

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

    new_references.last_update_date := x_last_update_date;
Line: 64

    new_references.last_updated_by := x_last_updated_by;
Line: 65

    new_references.last_update_login := x_last_update_login;
Line: 75

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

	IF p_inserting OR p_updating
	THEN
		-- Validate related date alias instance is different to parent.
		IF IGS_CA_VAL_DAIP.calp_val_daip_dai (new_references.dt_alias,
			new_references.dai_sequence_number,
			new_references.cal_type,
			new_references.ci_sequence_number,
			new_references.related_dt_alias,
			new_references.related_dai_sequence_number,
			new_references.related_cal_type,
			new_references.related_ci_sequence_number,
			v_message_name) = FALSE
		THEN
				Fnd_Message.Set_Name('IGS',v_message_name);
Line: 124

  END BeforeRowInsertUpdateDelete1;
Line: 131

  PROCEDURE AfterStmtInsertUpdate3(
    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: 139

  	IF p_inserting THEN
  		IF IGS_CA_VAL_DAIP.calp_val_daip_unique (new_references.dt_alias,
  			              new_references.dai_sequence_number,
  			              new_references.cal_type,
  			              new_references.ci_sequence_number,
  		    	              new_references.related_dt_alias,
  			              new_references.related_dai_sequence_number,
  			              new_references.related_cal_type,
  			              new_references.related_ci_sequence_number,
  			              v_message_name) = FALSE THEN
				Fnd_Message.Set_Name('IGS',v_message_name);
Line: 154

  END AfterStmtInsertUpdate3;
Line: 251

      SELECT   rowid
      FROM     IGS_CA_DA_INST_PAIR
      WHERE    dt_alias = x_dt_alias
      AND      dai_sequence_number = x_dai_sequence_number
      AND      cal_type = x_cal_type
      AND      ci_sequence_number = x_ci_sequence_number
      AND      ((l_rowid IS NULL) OR (rowid <> l_rowid))
      FOR UPDATE NOWAIT;
Line: 311

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

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

      SELECT   rowid
      FROM     IGS_CA_DA_INST_PAIR
      WHERE    dt_alias = x_dt_alias
      AND      dai_sequence_number = x_dai_sequence_number
      AND      cal_type = x_cal_type
      AND      ci_sequence_number = x_ci_sequence_number
      AND      related_dt_alias = x_related_dt_alias
      AND      related_dai_sequence_number = x_related_dai_sequence_number
      AND      related_cal_type = x_related_cal_type
      AND      related_ci_sequence_number = x_related_ci_sequence_number
      FOR UPDATE NOWAIT;
Line: 390

      SELECT   rowid
      FROM     IGS_CA_DA_INST_PAIR
      WHERE    (dt_alias = x_dt_alias
      AND      dai_sequence_number = x_sequence_number
      AND      cal_type = x_cal_type
      AND      ci_sequence_number = x_ci_sequence_number)
	OR	   (related_dt_alias = x_dt_alias
      AND      related_dai_sequence_number = x_sequence_number
      AND      related_cal_type = x_cal_type
      AND      related_ci_sequence_number = x_ci_sequence_number);
Line: 431

    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_dt_alias,
      x_dai_sequence_number,
      x_cal_type,
      x_ci_sequence_number,
      x_related_dt_alias,
      x_related_dai_sequence_number,
      x_related_cal_type,
      x_related_ci_sequence_number,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );
Line: 455

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

    ELSIF (p_action = 'VALIDATE_INSERT') THEN
      IF Get_PK_For_Validation (
      	new_references.dt_alias ,
    		new_references.dai_sequence_number ,
    		new_references.cal_type ,
      	new_references.ci_sequence_number ,
    		new_references.related_dt_alias ,
   		new_references.related_dai_sequence_number ,
    		new_references.related_cal_type ,
    		new_references.related_ci_sequence_number )THEN
      	Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
Line: 490

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

    ELSIF (p_action = 'VALIDATE_UPDATE') THEN
      Check_Uniqueness;
Line: 499

    ELSIF (p_action = 'DELETE') THEN
      -- Call all the procedures related to Before Delete.
      BeforeRowInsertUpdateDelete1 ( p_deleting => TRUE );
Line: 502

    ELSIF (p_action = 'VALIDATE_DELETE') THEN
      NULL;
Line: 517

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

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

    ELSIF (p_action = 'DELETE') THEN
      -- Call all the procedures related to After Delete.
      Null;
Line: 530

procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_DT_ALIAS in VARCHAR2,
  X_DAI_SEQUENCE_NUMBER in NUMBER,
  X_CAL_TYPE in VARCHAR2,
  X_CI_SEQUENCE_NUMBER in NUMBER,
  X_RELATED_DT_ALIAS in VARCHAR2,
  X_RELATED_DAI_SEQUENCE_NUMBER in NUMBER,
  X_RELATED_CAL_TYPE in VARCHAR2,
  X_RELATED_CI_SEQUENCE_NUMBER in NUMBER,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    cursor C is select ROWID from IGS_CA_DA_INST_PAIR
      where DT_ALIAS = X_DT_ALIAS
      and DAI_SEQUENCE_NUMBER = X_DAI_SEQUENCE_NUMBER
      and CAL_TYPE = X_CAL_TYPE
      and CI_SEQUENCE_NUMBER = X_CI_SEQUENCE_NUMBER
      and RELATED_DT_ALIAS = X_RELATED_DT_ALIAS
      and RELATED_DAI_SEQUENCE_NUMBER = X_RELATED_DAI_SEQUENCE_NUMBER
      and RELATED_CAL_TYPE = X_RELATED_CAL_TYPE
      and RELATED_CI_SEQUENCE_NUMBER = X_RELATED_CI_SEQUENCE_NUMBER;
Line: 551

    X_LAST_UPDATE_DATE DATE;
Line: 552

    X_LAST_UPDATED_BY NUMBER;
Line: 553

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 555

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 557

    X_LAST_UPDATED_BY := 1;
Line: 558

    X_LAST_UPDATE_LOGIN := 0;
Line: 560

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 561

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 565

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

    p_action =>'INSERT',
    x_rowid =>X_ROWID,
    x_dt_alias =>X_DT_ALIAS,
    x_dai_sequence_number =>X_DAI_SEQUENCE_NUMBER,
    x_cal_type =>X_CAL_TYPE,
    x_ci_sequence_number =>X_CI_SEQUENCE_NUMBER,
    x_related_dt_alias =>X_RELATED_DT_ALIAS,
    x_related_dai_sequence_number =>X_RELATED_DAI_SEQUENCE_NUMBER,
    x_related_cal_type =>X_RELATED_CAL_TYPE,
    x_related_ci_sequence_number =>X_RELATED_CI_SEQUENCE_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: 590

  insert into IGS_CA_DA_INST_PAIR (
    DT_ALIAS,
    DAI_SEQUENCE_NUMBER,
    CAL_TYPE,
    CI_SEQUENCE_NUMBER,
    RELATED_DT_ALIAS,
    RELATED_DAI_SEQUENCE_NUMBER,
    RELATED_CAL_TYPE,
    RELATED_CI_SEQUENCE_NUMBER,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.DT_ALIAS,
    NEW_REFERENCES.DAI_SEQUENCE_NUMBER,
    NEW_REFERENCES.CAL_TYPE,
    NEW_REFERENCES.CI_SEQUENCE_NUMBER,
    NEW_REFERENCES.RELATED_DT_ALIAS,
    NEW_REFERENCES.RELATED_DAI_SEQUENCE_NUMBER,
    NEW_REFERENCES.RELATED_CAL_TYPE,
    NEW_REFERENCES.RELATED_CI_SEQUENCE_NUMBER,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );
Line: 628

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

end INSERT_ROW;
Line: 645

  cursor c1 is select *
    from IGS_CA_DA_INST_PAIR
    where ROWID = X_ROWID
    for update nowait;
Line: 656

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

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

  delete from IGS_CA_DA_INST_PAIR
  where ROWID=X_ROWID;
Line: 680

    p_action =>'DELETE',
    x_rowid =>X_ROWID
  );
Line: 684

end DELETE_ROW;