APPS.IGS_PE_PRSID_GRP_SEC_PKG SQL Statements

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

Line: 15

    x_insert_ind IN VARCHAR2 DEFAULT NULL,
    x_update_ind IN VARCHAR2 DEFAULT NULL,
    x_delete_ind IN VARCHAR2 DEFAULT NULL,
    x_creation_date IN DATE DEFAULT NULL,
    x_created_by IN NUMBER DEFAULT NULL,
    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_PRSID_GRP_SEC
      WHERE    rowid = x_rowid;

Line: 38

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

Line: 50

    new_references.insert_ind := x_insert_ind;

Line: 51

    new_references.update_ind := x_update_ind;

Line: 52

    new_references.delete_ind := x_delete_ind;

Line: 53

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

Line: 60

    new_references.last_update_date := x_last_update_date;

Line: 61

    new_references.last_updated_by := x_last_updated_by;

Line: 62

    new_references.last_update_login := x_last_update_login;

Line: 66

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

	-- Validate the insert or update
	IF p_inserting OR p_updating THEN
		IF IGS_PE_VAL_PIGS.idgp_val_pigs_iud (
				new_references.group_id,
				new_references.person_id,
				v_message_name ) = FALSE THEN
			Fnd_Message.Set_Name('IGS', v_message_name);

Line: 84

	-- Validate the delete
	IF p_deleting THEN
		IF IGS_PE_VAL_PIGS.idgp_val_pigs_iud (
				old_references.group_id,
				old_references.person_id,
				v_message_name ) = FALSE THEN
                                  Fnd_Message.Set_Name('IGS', v_message_name);

Line: 97

  END BeforeRowInsertUpdateDelete1;

Line: 99

  PROCEDURE BeforeInsertUpdate(p_inserting BOOLEAN , p_updating BOOLEAN) AS
  p_message_name VARCHAR2(30);

Line: 102

   IF ( p_inserting = TRUE OR (p_updating = TRUE AND new_references.group_id <> old_references.group_id ) ) THEN
    IF  NOT IGS_PE_PERSID_GROUP_PKG.val_persid_group(new_references.group_id,p_message_name) THEN
        Fnd_Message.Set_Name('IGS', p_message_name);

Line: 109

  END BeforeInsertUpdate;

Line: 119

 ELSIF upper(Column_name) =  'INSERT_IND' then
     new_references.insert_ind:= column_value;

Line: 121

 ELSIF upper(Column_name) = 'UPDATE_IND' then
     new_references.update_ind:= column_value;

Line: 123

 ELSIF upper(Column_name) = 'DELETE_IND' then
     new_references.delete_ind:= column_value;

Line: 131

IF upper(column_name) = 'INSERT_IND' OR
     column_name is null Then
     IF   new_references.insert_ind NOT IN ( 'Y' , 'N' ) Then
       Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');

Line: 140

IF upper(column_name) = 'UPDATE_IND' OR
     column_name is null Then
     IF new_references.update_ind NOT IN ( 'Y' , 'N' ) Then
       Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');

Line: 148

 IF upper(column_name) = 'DELETE_IND' OR
     column_name is null Then
     IF  new_references.delete_ind  NOT IN ( 'Y' , 'N' )   Then
       Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');

Line: 176

     Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');

Line: 189

     Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');

Line: 203

      SELECT   rowid
      FROM     IGS_PE_PRSID_GRP_SEC
      WHERE    group_id = x_group_id
      AND      person_id = x_person_id
      FOR UPDATE NOWAIT;

Line: 229

      SELECT   rowid
      FROM     IGS_PE_PRSID_GRP_SEC
      WHERE    person_id = x_person_id ;

Line: 255

    x_insert_ind IN VARCHAR2 DEFAULT NULL,
    x_update_ind IN VARCHAR2 DEFAULT NULL,
    x_delete_ind IN VARCHAR2 DEFAULT NULL,
    x_creation_date IN DATE DEFAULT NULL,
    x_created_by IN NUMBER DEFAULT NULL,
    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_group_id,
      x_person_id,
      x_insert_ind,
      x_update_ind,
      x_delete_ind,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );

Line: 281

    IF (p_action = 'INSERT') THEN
       -- Call all the procedures related to Before Insert.
     BeforeInsertUpdate(TRUE,FALSE);

Line: 284

     BeforeRowInsertUpdateDelete1 ( p_inserting => TRUE );

Line: 295

 ELSIF (p_action = 'UPDATE') THEN
       -- Call all the procedures related to Before Update.
       BeforeInsertUpdate(FALSE,TRUE);

Line: 298

       BeforeRowInsertUpdateDelete1 ( p_updating => TRUE );

Line: 303

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

Line: 307

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

Line: 317

 ELSIF (p_action = 'VALIDATE_UPDATE') THEN

       Check_Constraints; -- if procedure present

Line: 321

ELSIF (p_action = 'VALIDATE_DELETE') THEN
      NULL;

Line: 335

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

Line: 338

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

Line: 341

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

Line: 348

procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_GROUP_ID in NUMBER,
  X_PERSON_ID in NUMBER,
  X_INSERT_IND in VARCHAR2,
  X_UPDATE_IND in VARCHAR2,
  X_DELETE_IND in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    cursor C is select ROWID from IGS_PE_PRSID_GRP_SEC
      where GROUP_ID = X_GROUP_ID
      and PERSON_ID = X_PERSON_ID;

Line: 360

    X_LAST_UPDATE_DATE DATE;

Line: 361

    X_LAST_UPDATED_BY NUMBER;

Line: 362

    X_LAST_UPDATE_LOGIN NUMBER;

Line: 366

    X_PROGRAM_UPDATE_DATE DATE;

Line: 368

  X_LAST_UPDATE_DATE := SYSDATE;

Line: 370

    X_LAST_UPDATED_BY := 1;

Line: 371

    X_LAST_UPDATE_LOGIN := 0;

Line: 373

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 374

    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 377

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 378

    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 389

     X_PROGRAM_UPDATE_DATE := NULL;

Line: 391

     X_PROGRAM_UPDATE_DATE := SYSDATE;

Line: 399

   p_action=>'INSERT',
   x_rowid=>X_ROWID,
   x_delete_ind=>  NVL(X_DELETE_IND,'N'),
   x_group_id=>X_GROUP_ID,
   x_insert_ind=> NVL(X_INSERT_IND,'N'),
   x_person_id=>X_PERSON_ID,
   x_update_ind=> NVL(X_UPDATE_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
   );

Line: 412

  insert into IGS_PE_PRSID_GRP_SEC (
    GROUP_ID,
    PERSON_ID,
    INSERT_IND,
    UPDATE_IND,
    DELETE_IND,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN,
    REQUEST_ID,
    PROGRAM_ID,
    PROGRAM_APPLICATION_ID,
    PROGRAM_UPDATE_DATE
  ) values (
    NEW_REFERENCES.GROUP_ID,
    NEW_REFERENCES.PERSON_ID,
    NEW_REFERENCES.INSERT_IND,
    NEW_REFERENCES.UPDATE_IND,
    NEW_REFERENCES.DELETE_IND,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN,
    X_REQUEST_ID,
    X_PROGRAM_ID,
    X_PROGRAM_APPLICATION_ID,
    X_PROGRAM_UPDATE_DATE
  );

Line: 453

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

Line: 456

end INSERT_ROW;

Line: 462

  X_INSERT_IND in VARCHAR2,
  X_UPDATE_IND in VARCHAR2,
  X_DELETE_IND in VARCHAR2
) AS
  cursor c1 is select
      INSERT_IND,
      UPDATE_IND,
      DELETE_IND
    from IGS_PE_PRSID_GRP_SEC
    where ROWID = X_ROWID
    for update nowait;

Line: 479

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

Line: 487

  if ( (tlinfo.INSERT_IND = X_INSERT_IND)
      AND (tlinfo.UPDATE_IND = X_UPDATE_IND)
      AND (tlinfo.DELETE_IND = X_DELETE_IND)
  ) then
    null;

Line: 499

procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_GROUP_ID in NUMBER,
  X_PERSON_ID in NUMBER,
  X_INSERT_IND in VARCHAR2,
  X_UPDATE_IND in VARCHAR2,
  X_DELETE_IND in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    X_LAST_UPDATE_DATE DATE;

Line: 509

    X_LAST_UPDATED_BY NUMBER;

Line: 510

    X_LAST_UPDATE_LOGIN NUMBER;

Line: 514

    X_PROGRAM_UPDATE_DATE DATE;

Line: 516

  X_LAST_UPDATE_DATE := SYSDATE;

Line: 518

    X_LAST_UPDATED_BY := 1;

Line: 519

    X_LAST_UPDATE_LOGIN := 0;

Line: 521

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 522

    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 525

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 526

    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 536

   p_action=>'UPDATE',
   x_rowid=>X_ROWID,
   x_delete_ind=>X_DELETE_IND,
   x_group_id=>X_GROUP_ID,
   x_insert_ind=>X_INSERT_IND,
   x_person_id=>X_PERSON_ID,
   x_update_ind=>X_UPDATE_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: 559

     X_PROGRAM_UPDATE_DATE :=
                  OLD_REFERENCES.PROGRAM_UPDATE_DATE;

Line: 562

     X_PROGRAM_UPDATE_DATE := SYSDATE;

Line: 565

  update IGS_PE_PRSID_GRP_SEC set
    INSERT_IND = NEW_REFERENCES.INSERT_IND,
    UPDATE_IND = NEW_REFERENCES.UPDATE_IND,
    DELETE_IND = NEW_REFERENCES.DELETE_IND,
    LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
    LAST_UPDATED_BY = X_LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
    REQUEST_ID = X_REQUEST_ID,
    PROGRAM_ID = X_PROGRAM_ID,
    PROGRAM_APPLICATION_ID = X_PROGRAM_APPLICATION_ID,
    PROGRAM_UPDATE_DATE = X_PROGRAM_UPDATE_DATE
  where ROWID = X_ROWID
  ;

Line: 582

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

Line: 585

end UPDATE_ROW;

Line: 591

  X_INSERT_IND in VARCHAR2,
  X_UPDATE_IND in VARCHAR2,
  X_DELETE_IND in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) AS
  cursor c1 is select rowid from IGS_PE_PRSID_GRP_SEC
     where GROUP_ID = X_GROUP_ID
     and PERSON_ID = X_PERSON_ID
  ;

Line: 606

    INSERT_ROW (
     X_ROWID,
     X_GROUP_ID,
     X_PERSON_ID,
     X_INSERT_IND,
     X_UPDATE_IND,
     X_DELETE_IND,
     X_MODE);

Line: 617

  UPDATE_ROW (
   X_ROWID,
   X_GROUP_ID,
   X_PERSON_ID,
   X_INSERT_IND,
   X_UPDATE_IND,
   X_DELETE_IND,
   X_MODE);

Line: 627

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

Line: 635

  delete from IGS_PE_PRSID_GRP_SEC
  where ROWID = X_ROWID;

Line: 641

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

Line: 644

end DELETE_ROW;