APPS.IGS_PE_PERS_RELN_TYP_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_PE_PERS_RELN_TYP
      WHERE    rowid = x_rowid;

Line: 34

    IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
      Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');

Line: 46

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

Line: 53

    new_references.last_update_date := x_last_update_date;

Line: 54

    new_references.last_updated_by := x_last_updated_by;

Line: 55

    new_references.last_update_login := x_last_update_login;

Line: 97

      SELECT   rowid
      FROM     IGS_PE_PERS_RELN_TYP
      WHERE    person_relation_type = x_person_relation_type
      FOR UPDATE NOWAIT;

Line: 125

    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_person_relation_type,
      x_description,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );

Line: 143

    IF (p_action = 'INSERT') THEN
       -- Call all the procedures related to Before Insert.

      IF  Get_PK_For_Validation (
          new_references.person_relation_type ) THEN
         Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');

Line: 155

 ELSIF (p_action = 'UPDATE') THEN
       -- Call all the procedures related to Before Update.


       Check_Constraints; -- if procedure present

Line: 161

 ELSIF (p_action = 'DELETE') THEN
       -- Call all the procedures related to Before Delete.
       Check_Child_Existance; -- if procedure present

Line: 164

 ELSIF (p_action = 'VALIDATE_INSERT') THEN
      IF  Get_PK_For_Validation (
          new_references.person_relation_type  ) THEN
         Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');

Line: 173

 ELSIF (p_action = 'VALIDATE_UPDATE') THEN

       Check_Constraints; -- if procedure present

Line: 177

ELSIF (p_action = 'VALIDATE_DELETE') THEN
      Check_Child_Existance; -- if procedure present

Line: 191

    IF (p_action = 'INSERT') THEN
      -- Call all the procedures related to After Insert.
      Null;

Line: 194

    ELSIF (p_action = 'UPDATE') THEN
      -- Call all the procedures related to After Update.
      Null;

Line: 197

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

Line: 204

procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_PERSON_RELATION_TYPE in VARCHAR2,
  X_DESCRIPTION in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    cursor C is select ROWID from IGS_PE_PERS_RELN_TYP
      where PERSON_RELATION_TYPE = X_PERSON_RELATION_TYPE;

Line: 212

    X_LAST_UPDATE_DATE DATE;

Line: 213

    X_LAST_UPDATED_BY NUMBER;

Line: 214

    X_LAST_UPDATE_LOGIN NUMBER;

Line: 216

  X_LAST_UPDATE_DATE := SYSDATE;

Line: 218

    X_LAST_UPDATED_BY := 1;

Line: 219

    X_LAST_UPDATE_LOGIN := 0;

Line: 221

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 222

    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 225

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 226

    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 235

   p_action=>'INSERT',
   x_rowid=>X_ROWID,
   x_description=>X_DESCRIPTION,
   x_person_relation_type=>X_PERSON_RELATION_TYPE,
   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: 246

  insert into IGS_PE_PERS_RELN_TYP (
    PERSON_RELATION_TYPE,
    DESCRIPTION,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.PERSON_RELATION_TYPE,
    NEW_REFERENCES.DESCRIPTION,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );

Line: 272

  p_action => 'INSERT',
  x_rowid => X_ROWID
  );

Line: 275

end INSERT_ROW;

Line: 282

  cursor c1 is select
      DESCRIPTION
    from IGS_PE_PERS_RELN_TYP
    where ROWID = X_ROWID
    for update nowait;

Line: 293

    fnd_message.set_name('FND', 'FORM_RECORD_DELETED');

Line: 311

procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_PERSON_RELATION_TYPE in VARCHAR2,
  X_DESCRIPTION in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    X_LAST_UPDATE_DATE DATE;

Line: 318

    X_LAST_UPDATED_BY NUMBER;

Line: 319

    X_LAST_UPDATE_LOGIN NUMBER;

Line: 321

  X_LAST_UPDATE_DATE := SYSDATE;

Line: 323

    X_LAST_UPDATED_BY := 1;

Line: 324

    X_LAST_UPDATE_LOGIN := 0;

Line: 326

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 327

    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 330

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 331

    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 341

   p_action=>'UPDATE',
   x_rowid=>X_ROWID,
   x_description=>X_DESCRIPTION,
   x_person_relation_type=>X_PERSON_RELATION_TYPE,
   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: 352

  update IGS_PE_PERS_RELN_TYP set
    DESCRIPTION = NEW_REFERENCES.DESCRIPTION,
    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: 364

  p_action => 'UPDATE',
  x_rowid => X_ROWID
  );

Line: 367

end UPDATE_ROW;

Line: 375

  cursor c1 is select rowid from IGS_PE_PERS_RELN_TYP
     where PERSON_RELATION_TYPE = X_PERSON_RELATION_TYPE
  ;

Line: 384

    INSERT_ROW (
     X_ROWID,
     X_PERSON_RELATION_TYPE,
     X_DESCRIPTION,
     X_MODE);

Line: 392

  UPDATE_ROW (
   X_ROWID,
   X_PERSON_RELATION_TYPE,
   X_DESCRIPTION,
   X_MODE);

Line: 399

procedure DELETE_ROW (
 X_ROWID in VARCHAR2
) AS
begin

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

Line: 408

  delete from IGS_PE_PERS_RELN_TYP
  where ROWID = X_ROWID;

Line: 414

  p_action => 'DELETE',
  x_rowid => X_ROWID
  );

Line: 417

end DELETE_ROW;