DBA Data[Home] [Help]

APPS.IGS_PR_RU_CA_TYPE_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 ,
    x_org_id IN NUMBER DEFAULT NULL
  ) AS

    CURSOR cur_old_ref_values IS
      SELECT   *
      FROM     IGS_PR_RU_CA_TYPE_ALL
      WHERE    rowid = x_rowid;
Line: 39

    IF (cur_old_ref_values%NOTFOUND) AND (p_action not in ('INSERT','VALIDATE_INSERT')) THEN
      Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
Line: 59

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

    new_references.last_update_date := x_last_update_date;
Line: 67

    new_references.last_updated_by := x_last_updated_by;
Line: 68

    new_references.last_update_login := x_last_update_login;
Line: 78

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

	IF p_inserting THEN
		IF igs_pr_val_scpca.prgp_val_cfg_cat (
					new_references.prg_cal_type,
					v_message_name) = FALSE THEN
			Fnd_Message.Set_Name('IGS',v_message_name);
Line: 96

	IF p_inserting OR (p_updating AND
	   (NVL(new_references.start_sequence_number, 0) <> NVL(old_references.start_sequence_number, 0) OR
	   NVL(new_references.end_sequence_number, 0) <> NVL(old_references.end_sequence_number, 0))) THEN
		IF IGS_PR_VAL_PRCT.prgp_val_prct_ci (
					new_references.prg_cal_type,
					new_references.start_sequence_number,
					new_references.end_sequence_number,
					v_message_name) = FALSE THEN
			Fnd_Message.Set_Name('IGS',v_message_name);
Line: 111

  END BeforeRowInsertUpdate1;
Line: 123

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

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

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

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

      SELECT   rowid
      FROM     IGS_PR_RU_CA_TYPE_ALL
      WHERE    progression_rule_cat = x_progression_rule_cat
      AND      pra_sequence_number = x_pra_sequence_number
      AND      prg_cal_type = x_prg_cal_type
      FOR UPDATE NOWAIT;
Line: 224

      SELECT   rowid
      FROM     IGS_PR_RU_CA_TYPE_ALL
      WHERE    prg_cal_type = x_cal_type ;
Line: 252

      SELECT   rowid
      FROM     IGS_PR_RU_CA_TYPE_ALL
      WHERE   ( prg_cal_type = x_cal_type
      AND      end_sequence_number = x_sequence_number )
      OR       (prg_cal_type = x_cal_type
      AND      start_sequence_number = x_sequence_number) ;
Line: 283

      SELECT   rowid
      FROM     IGS_PR_RU_CA_TYPE_ALL
      WHERE    progression_rule_cat = x_progression_rule_cat
      AND      pra_sequence_number = x_sequence_number ;
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,
    x_org_id IN NUMBER DEFAULT NULL
  ) AS
  BEGIN

    Set_Column_Values (
      p_action,
      x_rowid,
      x_progression_rule_cat,
      x_pra_sequence_number,
      x_prg_cal_type,
      x_start_sequence_number,
      x_end_sequence_number,
      x_start_effective_period,
      x_num_of_applications,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login ,
      x_org_id
    );
Line: 343

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

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

    ELSIF (p_action = 'VALIDATE_INSERT') THEN
	IF GET_PK_FOR_VALIDATION(
		    new_references.progression_rule_cat,
		    new_references.pra_sequence_number,
		    new_references.prg_cal_type ) THEN
		Fnd_Message.Set_Name('IGS','IGS_GE_MULTI_ORG_DUP_REC');
Line: 375

	ELSIF (p_action = 'VALIDATE_UPDATE') THEN
	CHECK_CONSTRAINTS;
Line: 381

procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_PROGRESSION_RULE_CAT in VARCHAR2,
  X_PRA_SEQUENCE_NUMBER in NUMBER,
  X_PRG_CAL_TYPE in VARCHAR2,
  X_START_SEQUENCE_NUMBER in NUMBER,
  X_END_SEQUENCE_NUMBER in NUMBER,
  X_START_EFFECTIVE_PERIOD in NUMBER,
  X_NUM_OF_APPLICATIONS in NUMBER,
  X_MODE in VARCHAR2 default 'R',
  x_ORG_ID IN NUMBER
  ) AS
    cursor C is select ROWID from IGS_PR_RU_CA_TYPE_ALL
      where PROGRESSION_RULE_CAT = X_PROGRESSION_RULE_CAT
      and PRA_SEQUENCE_NUMBER = X_PRA_SEQUENCE_NUMBER
      and PRG_CAL_TYPE = X_PRG_CAL_TYPE;
Line: 397

    X_LAST_UPDATE_DATE DATE;
Line: 398

    X_LAST_UPDATED_BY NUMBER;
Line: 399

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 401

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 403

    X_LAST_UPDATED_BY := 1;
Line: 404

    X_LAST_UPDATE_LOGIN := 0;
Line: 406

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 407

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 411

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

    p_action => 'INSERT',
    x_rowid => x_rowid ,
    x_progression_rule_cat => x_progression_rule_cat ,
    x_pra_sequence_number => x_pra_sequence_number ,
    x_prg_cal_type => x_prg_cal_type ,
    x_start_sequence_number => x_start_sequence_number ,
    x_end_sequence_number => x_end_sequence_number ,
    x_start_effective_period => x_start_effective_period ,
    x_num_of_applications => x_num_of_applications ,
    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: 436

  insert into IGS_PR_RU_CA_TYPE_ALL (
    PROGRESSION_RULE_CAT,
    PRA_SEQUENCE_NUMBER,
    PRG_CAL_TYPE,
    START_SEQUENCE_NUMBER,
    END_SEQUENCE_NUMBER,
    START_EFFECTIVE_PERIOD,
    NUM_OF_APPLICATIONS,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN,
    ORG_ID
  ) values (
    NEW_REFERENCES.PROGRESSION_RULE_CAT,
    NEW_REFERENCES.PRA_SEQUENCE_NUMBER,
    NEW_REFERENCES.PRG_CAL_TYPE,
    NEW_REFERENCES.START_SEQUENCE_NUMBER,
    NEW_REFERENCES.END_SEQUENCE_NUMBER,
    NEW_REFERENCES.START_EFFECTIVE_PERIOD,
    NEW_REFERENCES.NUM_OF_APPLICATIONS,
    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: 473

end INSERT_ROW;
Line: 485

  cursor c1 is select
      START_SEQUENCE_NUMBER,
      END_SEQUENCE_NUMBER,
      START_EFFECTIVE_PERIOD,
      NUM_OF_APPLICATIONS
    from IGS_PR_RU_CA_TYPE_ALL
    where ROWID = X_ROWID for update nowait;
Line: 498

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

procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_PROGRESSION_RULE_CAT in VARCHAR2,
  X_PRA_SEQUENCE_NUMBER in NUMBER,
  X_PRG_CAL_TYPE in VARCHAR2,
  X_START_SEQUENCE_NUMBER in NUMBER,
  X_END_SEQUENCE_NUMBER in NUMBER,
  X_START_EFFECTIVE_PERIOD in NUMBER,
  X_NUM_OF_APPLICATIONS in NUMBER,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    X_LAST_UPDATE_DATE DATE;
Line: 541

    X_LAST_UPDATED_BY NUMBER;
Line: 542

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 544

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 546

    X_LAST_UPDATED_BY := 1;
Line: 547

    X_LAST_UPDATE_LOGIN := 0;
Line: 549

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 550

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 554

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

    p_action => 'UPDATE',
    x_rowid => x_rowid ,
    x_progression_rule_cat => x_progression_rule_cat ,
    x_pra_sequence_number => x_pra_sequence_number ,
    x_prg_cal_type => x_prg_cal_type ,
    x_start_sequence_number => x_start_sequence_number ,
    x_end_sequence_number => x_end_sequence_number ,
    x_start_effective_period => x_start_effective_period ,
    x_num_of_applications => x_num_of_applications ,
    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: 579

  update IGS_PR_RU_CA_TYPE_ALL set
    START_SEQUENCE_NUMBER = NEW_REFERENCES.START_SEQUENCE_NUMBER,
    END_SEQUENCE_NUMBER = NEW_REFERENCES.END_SEQUENCE_NUMBER,
    START_EFFECTIVE_PERIOD = NEW_REFERENCES.START_EFFECTIVE_PERIOD,
    NUM_OF_APPLICATIONS = NEW_REFERENCES.NUM_OF_APPLICATIONS,
    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: 592

end UPDATE_ROW;
Line: 606

  cursor c1 is select rowid from IGS_PR_RU_CA_TYPE_ALL
     where PROGRESSION_RULE_CAT = X_PROGRESSION_RULE_CAT
     and PRA_SEQUENCE_NUMBER = X_PRA_SEQUENCE_NUMBER
     and PRG_CAL_TYPE = X_PRG_CAL_TYPE
  ;
Line: 616

    INSERT_ROW (
     X_ROWID,
     X_PROGRESSION_RULE_CAT,
     X_PRA_SEQUENCE_NUMBER,
     X_PRG_CAL_TYPE,
     X_START_SEQUENCE_NUMBER,
     X_END_SEQUENCE_NUMBER,
     X_START_EFFECTIVE_PERIOD,
     X_NUM_OF_APPLICATIONS,
     X_MODE,
     X_ORG_ID);
Line: 630

  UPDATE_ROW (
   X_ROWID,
   X_PROGRESSION_RULE_CAT,
   X_PRA_SEQUENCE_NUMBER,
   X_PRG_CAL_TYPE,
   X_START_SEQUENCE_NUMBER,
   X_END_SEQUENCE_NUMBER,
   X_START_EFFECTIVE_PERIOD,
   X_NUM_OF_APPLICATIONS,
   X_MODE );
Line: 643

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

  delete from IGS_PR_RU_CA_TYPE_ALL
  where ROWID = X_ROWID;
Line: 657

end DELETE_ROW;