DBA Data[Home] [Help]

APPS.IGS_AD_PRCS_CAT_LTR_PKG SQL Statements

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

Line: 16

    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_PRCS_CAT_LTR
      WHERE    rowid = x_rowid;
Line: 34

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

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

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

    new_references.last_update_date := x_last_update_date;
Line: 56

    new_references.last_updated_by := x_last_updated_by;
Line: 57

    new_references.last_update_login := x_last_update_login;
Line: 61

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

	IF p_inserting
	OR (old_references.correspondence_type <> new_references.correspondence_type)
	OR (old_references.letter_reference_number <> new_references.letter_reference_number) THEN
		-- Validate that the s_letter is not closed.
		IF IGS_AD_VAL_APCL.corp_val_slet_closed(
					new_references.correspondence_type,
					new_references.letter_reference_number,
					v_message_name) = FALSE THEN
					Fnd_Message.Set_Name('IGS',v_message_name);
Line: 93

  END BeforeRowInsertUpdate1;
Line: 153

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

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

      SELECT   rowid
      FROM     IGS_AD_PRCS_CAT_LTR
      WHERE    admission_cat = x_admission_cat
      AND      s_admission_process_type = x_s_admission_process_type
      AND      correspondence_type = x_correspondence_type
      FOR UPDATE NOWAIT;
Line: 215

      SELECT   rowid
      FROM     IGS_AD_PRCS_CAT_LTR
      WHERE    admission_cat = x_admission_cat
      AND      s_admission_process_type = x_s_admission_process_type ;
Line: 243

      SELECT   rowid
      FROM     IGS_AD_PRCS_CAT_LTR
      WHERE    correspondence_type = x_correspondence_type
      AND      letter_reference_number = x_letter_reference_number ;
Line: 274

    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_admission_cat,
      x_s_admission_process_type,
      x_correspondence_type,
      x_letter_reference_number,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );
Line: 294

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

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

 ELSIF (p_action = 'VALIDATE_INSERT') THEN
      IF  Get_PK_For_Validation (
          new_references.admission_cat,
          new_references.s_admission_process_type,
          new_references.correspondence_type
		) THEN
         Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
Line: 324

 ELSIF (p_action = 'VALIDATE_UPDATE') THEN
       Check_Constraints;
Line: 339

procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_ADMISSION_CAT in VARCHAR2,
  X_S_ADMISSION_PROCESS_TYPE in VARCHAR2,
  X_CORRESPONDENCE_TYPE in VARCHAR2,
  X_LETTER_REFERENCE_NUMBER in NUMBER,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    cursor C is select ROWID from IGS_AD_PRCS_CAT_LTR
      where ADMISSION_CAT = X_ADMISSION_CAT
      and S_ADMISSION_PROCESS_TYPE = X_S_ADMISSION_PROCESS_TYPE
      and CORRESPONDENCE_TYPE = X_CORRESPONDENCE_TYPE;
Line: 351

    X_LAST_UPDATE_DATE DATE;
Line: 352

    X_LAST_UPDATED_BY NUMBER;
Line: 353

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 355

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 357

    X_LAST_UPDATED_BY := 1;
Line: 358

    X_LAST_UPDATE_LOGIN := 0;
Line: 360

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 361

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 365

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

  Before_DML(p_action =>'INSERT',
  x_rowid =>X_ROWID,
  x_admission_cat => X_ADMISSION_CAT,
  x_s_admission_process_type => X_S_ADMISSION_PROCESS_TYPE,
  x_correspondence_type => X_CORRESPONDENCE_TYPE,
  x_letter_reference_number=> X_LETTER_REFERENCE_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: 386

  insert into IGS_AD_PRCS_CAT_LTR (
    ADMISSION_CAT,
    S_ADMISSION_PROCESS_TYPE,
    CORRESPONDENCE_TYPE,
    LETTER_REFERENCE_NUMBER,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.ADMISSION_CAT,
    NEW_REFERENCES.S_ADMISSION_PROCESS_TYPE,
    NEW_REFERENCES.CORRESPONDENCE_TYPE,
    NEW_REFERENCES.LETTER_REFERENCE_NUMBER,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );
Line: 416

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

end INSERT_ROW;
Line: 428

  cursor c1 is select
      LETTER_REFERENCE_NUMBER
    from IGS_AD_PRCS_CAT_LTR
    where ROWID = X_ROWID for update nowait;
Line: 439

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

procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_ADMISSION_CAT in VARCHAR2,
  X_S_ADMISSION_PROCESS_TYPE in VARCHAR2,
  X_CORRESPONDENCE_TYPE in VARCHAR2,
  X_LETTER_REFERENCE_NUMBER in NUMBER,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    X_LAST_UPDATE_DATE DATE;
Line: 466

    X_LAST_UPDATED_BY NUMBER;
Line: 467

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 469

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 471

    X_LAST_UPDATED_BY := 1;
Line: 472

    X_LAST_UPDATE_LOGIN := 0;
Line: 474

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 475

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 479

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

  Before_DML(p_action =>'UPDATE',
  x_rowid =>X_ROWID,
  x_admission_cat => X_ADMISSION_CAT,
  x_s_admission_process_type => X_S_ADMISSION_PROCESS_TYPE,
  x_correspondence_type => X_CORRESPONDENCE_TYPE,
  x_letter_reference_number=> X_LETTER_REFERENCE_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: 499

  update IGS_AD_PRCS_CAT_LTR set
    LETTER_REFERENCE_NUMBER = NEW_REFERENCES.LETTER_REFERENCE_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: 510

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

end UPDATE_ROW;
Line: 523

  cursor c1 is select rowid from IGS_AD_PRCS_CAT_LTR
     where ADMISSION_CAT = X_ADMISSION_CAT
     and S_ADMISSION_PROCESS_TYPE = X_S_ADMISSION_PROCESS_TYPE
     and CORRESPONDENCE_TYPE = X_CORRESPONDENCE_TYPE
  ;
Line: 534

    INSERT_ROW (
     X_ROWID,
     X_ADMISSION_CAT,
     X_S_ADMISSION_PROCESS_TYPE,
     X_CORRESPONDENCE_TYPE,
     X_LETTER_REFERENCE_NUMBER,
     X_MODE);
Line: 544

  UPDATE_ROW (
   X_ROWID,
   X_ADMISSION_CAT,
   X_S_ADMISSION_PROCESS_TYPE,
   X_CORRESPONDENCE_TYPE,
   X_LETTER_REFERENCE_NUMBER,
   X_MODE);
Line: 553

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

  delete from IGS_AD_PRCS_CAT_LTR
  where ROWID = X_ROWID;
Line: 567

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

end DELETE_ROW;