DBA Data[Home] [Help]

APPS.IGS_OR_UNIT_REL_PKG SQL Statements

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

Line: 15

    x_logical_delete_dt IN DATE 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_OR_UNIT_REL
      WHERE    rowid = x_rowid;
Line: 32

    IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN

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

    new_references.logical_delete_dt := x_logical_delete_dt;
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: 65

  PROCEDURE BeforeRowInsert1(
    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: 72

       SELECT 'Y'
       FROM   IGS_OR_UNIT_REL
       WHERE  parent_org_unit_cd = new_references.parent_org_unit_cd
       AND    child_org_unit_cd = new_references.child_org_unit_cd
       AND    logical_delete_dt IS NULL;
Line: 79

   IF p_inserting THEN
    OPEN c_exists;
Line: 89

  END BeforeRowInsert1;
Line: 91

  PROCEDURE AfterRowInsert1(
    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: 114

  END AfterRowInsert1;
Line: 132

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

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

      SELECT   rowid
      FROM     IGS_OR_UNIT_REL
      WHERE    parent_org_unit_cd = x_parent_org_unit_cd
      AND      parent_start_dt = x_parent_start_dt
      AND      child_org_unit_cd = x_child_org_unit_cd
      AND      child_start_dt = x_child_start_dt
      AND      create_dt = x_create_dt
      FOR UPDATE NOWAIT;
Line: 216

      SELECT   rowid
      FROM     IGS_OR_UNIT_REL
      WHERE (   (child_org_unit_cd = x_org_unit_cd AND child_start_dt = x_start_dt)
      OR       (parent_org_unit_cd = x_org_unit_cd AND parent_start_dt = x_start_dt)) ;
Line: 243

    x_logical_delete_dt IN DATE 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_parent_org_unit_cd,
      x_parent_start_dt,
      x_child_org_unit_cd,
      x_child_start_dt,
      x_create_dt,
      x_logical_delete_dt,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );
Line: 266

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

      Check_Parent_Existance;
Line: 271

      BeforeRowInsert1 ( p_inserting => TRUE );
Line: 272

    ELSIF (p_action = 'UPDATE') THEN
      -- Call all the procedures related to Before Update.
      Check_Parent_Existance;
Line: 275

    ELSIF (p_action = 'DELETE') THEN
      -- Call all the procedures related to Before Delete.
      Check_Child_Existance;
Line: 279

	ELSIF (p_action = 'VALIDATE_INSERT') THEN
      BeforeRowInsert1 ( p_inserting => TRUE );
Line: 282

	ELSIF (p_action = 'VALIDATE_UPDATE') THEN

       NULL;
Line: 285

	ELSIF (p_action = 'VALIDATE_DELETE') THEN

   Check_Child_Existance ;
Line: 298

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

procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_PARENT_ORG_UNIT_CD in VARCHAR2,
  X_PARENT_START_DT in DATE,
  X_CHILD_ORG_UNIT_CD in VARCHAR2,
  X_CHILD_START_DT in DATE,
  X_CREATE_DT in out NOCOPY DATE,
  X_LOGICAL_DELETE_DT in DATE,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    cursor C is select ROWID from IGS_OR_UNIT_REL
      where PARENT_ORG_UNIT_CD = X_PARENT_ORG_UNIT_CD
      and PARENT_START_DT = X_PARENT_START_DT
      and CHILD_ORG_UNIT_CD = X_CHILD_ORG_UNIT_CD
      and CHILD_START_DT = X_CHILD_START_DT
      and CREATE_DT = NEW_REFERENCES.CREATE_DT;
Line: 320

    X_LAST_UPDATE_DATE DATE;
Line: 321

    X_LAST_UPDATED_BY NUMBER;
Line: 322

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 324

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 326

    X_LAST_UPDATED_BY := 1;
Line: 327

    X_LAST_UPDATE_LOGIN := 0;
Line: 329

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 330

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 334

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

   p_action=>'INSERT',
   x_rowid=>X_ROWID,
   x_child_org_unit_cd=>X_CHILD_ORG_UNIT_CD,
   x_child_start_dt=>X_CHILD_START_DT,
   x_create_dt=>NVL(X_CREATE_DT,SYSDATE),
   x_logical_delete_dt=>X_LOGICAL_DELETE_DT,
   x_parent_org_unit_cd=>X_PARENT_ORG_UNIT_CD,
   x_parent_start_dt=>X_PARENT_START_DT,
   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: 357

  insert into IGS_OR_UNIT_REL (
    PARENT_ORG_UNIT_CD,
    PARENT_START_DT,
    CHILD_ORG_UNIT_CD,
    CHILD_START_DT,
    CREATE_DT,
    LOGICAL_DELETE_DT,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.PARENT_ORG_UNIT_CD,
    NEW_REFERENCES.PARENT_START_DT,
    NEW_REFERENCES.CHILD_ORG_UNIT_CD,
    NEW_REFERENCES.CHILD_START_DT,
    NEW_REFERENCES.CREATE_DT,
    NEW_REFERENCES.LOGICAL_DELETE_DT,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );
Line: 390

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

end INSERT_ROW;
Line: 402

  X_LOGICAL_DELETE_DT in DATE
) AS
  cursor c1 is select
      LOGICAL_DELETE_DT
    from IGS_OR_UNIT_REL
    where ROWID = X_ROWID
    for update nowait ;
Line: 414

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

      if ( ((tlinfo.LOGICAL_DELETE_DT = X_LOGICAL_DELETE_DT)
           OR ((tlinfo.LOGICAL_DELETE_DT is null)
               AND (X_LOGICAL_DELETE_DT is null)))
  ) then
    null;
Line: 432

procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_PARENT_ORG_UNIT_CD in VARCHAR2,
  X_PARENT_START_DT in DATE,
  X_CHILD_ORG_UNIT_CD in VARCHAR2,
  X_CHILD_START_DT in DATE,
  X_CREATE_DT in DATE,
  X_LOGICAL_DELETE_DT in DATE,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    X_LAST_UPDATE_DATE DATE;
Line: 443

    X_LAST_UPDATED_BY NUMBER;
Line: 444

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 446

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 448

    X_LAST_UPDATED_BY := 1;
Line: 449

    X_LAST_UPDATE_LOGIN := 0;
Line: 451

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 452

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 456

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

    p_action=>'UPDATE',
    x_rowid=>X_ROWID,
    x_child_org_unit_cd=>X_CHILD_ORG_UNIT_CD,
    x_child_start_dt=>X_CHILD_START_DT,
    x_create_dt=>NVL(X_CREATE_DT,SYSDATE),
    x_logical_delete_dt=>X_LOGICAL_DELETE_DT,
    x_parent_org_unit_cd=>X_PARENT_ORG_UNIT_CD,
    x_parent_start_dt=>X_PARENT_START_DT,
    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: 479

  update IGS_OR_UNIT_REL set
    LOGICAL_DELETE_DT = NEW_REFERENCES.LOGICAL_DELETE_DT,
    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: 489

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

end UPDATE_ROW;
Line: 501

  X_LOGICAL_DELETE_DT in DATE,
  X_MODE in VARCHAR2 default 'R'
  ) AS
  cursor c1 is select rowid from IGS_OR_UNIT_REL
     where PARENT_ORG_UNIT_CD = X_PARENT_ORG_UNIT_CD
     and PARENT_START_DT = X_PARENT_START_DT
     and CHILD_ORG_UNIT_CD = X_CHILD_ORG_UNIT_CD
     and CHILD_START_DT = X_CHILD_START_DT
     and CREATE_DT = NVL(X_CREATE_DT,SYSDATE)
  ;
Line: 516

    INSERT_ROW (
     X_ROWID,
     X_PARENT_ORG_UNIT_CD,
     X_PARENT_START_DT,
     X_CHILD_ORG_UNIT_CD,
     X_CHILD_START_DT,
     X_CREATE_DT,
     X_LOGICAL_DELETE_DT,
     X_MODE);
Line: 528

  UPDATE_ROW (
   X_ROWID,
   X_PARENT_ORG_UNIT_CD,
   X_PARENT_START_DT,
   X_CHILD_ORG_UNIT_CD,
   X_CHILD_START_DT,
   X_CREATE_DT,
   X_LOGICAL_DELETE_DT,
   X_MODE);
Line: 539

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

  delete from IGS_OR_UNIT_REL
  where ROWID = X_ROWID ;
Line: 553

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

end DELETE_ROW;