DBA Data[Home] [Help]

APPS.IGS_GE_REF_CD_TYPE_PKG SQL Statements

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

Line: 24

    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,
    x_mandatory_flag IN VARCHAR2 DEFAULT NULL,
    x_restricted_flag IN VARCHAR2
  ) as

/*************************************************************
  Created By :
  Date Created By :
  Purpose :
  Know limitations, enhancements or remarks
  Change History
  Who             When            What
  sbeerell        09-MAY-2000     Changed according to DLD version 2
  (reverse chronological order - newest change first)
***************************************************************/

    CURSOR cur_old_ref_values IS
      SELECT   *
      FROM     IGS_GE_REF_CD_TYPE_ALL
      WHERE    rowid = x_rowid;
Line: 56

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

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

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

    new_references.last_update_date := x_last_update_date;
Line: 86

    new_references.last_updated_by := x_last_updated_by;
Line: 87

    new_references.last_update_login := x_last_update_login;
Line: 92

  PROCEDURE BeforeRowInsertUpdate1(
    p_inserting IN BOOLEAN DEFAULT FALSE,
    p_updating IN BOOLEAN DEFAULT FALSE,
    p_deleting IN BOOLEAN DEFAULT FALSE
    ) as
/*************************************************************
  Created By :
  Date Created By :
  Purpose :
  Know limitations, enhancements or remarks
  Change History
  Who             When            What
  (reverse chronological order - newest change first)
***************************************************************/
v_message_name NUMBER(5);
Line: 109

	IF p_inserting OR
		(p_updating AND
		((old_references.s_reference_cd_type <> new_references.s_reference_cd_type) OR
		(old_references.closed_ind = 'Y' AND new_references.closed_ind = 'N'))) THEN
		IF IGS_PS_VAL_RCT.crsp_val_rct_srct (
			new_references.s_reference_cd_type,
			v_message_name) = FALSE THEN
			Fnd_Message.Set_Name('IGS' , v_message_name);
Line: 121

  END BeforeRowInsertUpdate1;
Line: 281

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

      SELECT   rowid
      FROM     IGS_GE_REF_CD_TYPE_ALL
      WHERE    reference_cd_type  = x_reference_cd_type
      FOR UPDATE NOWAIT;
Line: 412

    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,
    x_mandatory_flag                    IN     VARCHAR2    DEFAULT NULL,
    x_restricted_flag IN VARCHAR2
  ) as
/*************************************************************
  Created By :
  Date Created By :
  Purpose :
  Know limitations, enhancements or remarks
  Change History
  Who             When            What
  sbeerell        09-MAY-2000     Changed according to DLD version 2
  (reverse chronological order - newest change first)
***************************************************************/
  BEGIN

    Set_Column_Values (
      p_action,
      x_rowid,
      x_self_service_flag,
      x_reference_cd_type,
      x_description,
      x_s_reference_cd_type,
      x_closed_ind,
      x_program_flag,
      x_program_offering_option_flag,
      x_unit_flag,
      x_unit_section_flag,
      x_unit_section_occurrence_flag,

      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login,
      x_org_id,
      x_mandatory_flag,
      x_restricted_flag
    );
Line: 455

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

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

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

    ELSIF (p_action = 'VALIDATE_INSERT') THEN
  	IF  GET_PK_FOR_VALIDATION ( new_references.reference_cd_type )  THEN
		Fnd_Message.Set_Name('IGS','IGS_GE_MULTI_ORG_DUP_REC');
Line: 480

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

    ELSIF (p_action = 'VALIDATE_DELETE') THEN
      Check_Child_Existance;
Line: 507

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

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

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

procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  x_SELF_SERVICE_FLAG IN VARCHAR2,
  x_REFERENCE_CD_TYPE IN VARCHAR2,
  x_DESCRIPTION IN VARCHAR2,
  x_S_REFERENCE_CD_TYPE IN VARCHAR2,
  x_CLOSED_IND IN VARCHAR2,
  x_PROGRAM_FLAG IN VARCHAR2,
  x_PROGRAM_OFFERING_OPTION_FLAG IN VARCHAR2,
  x_UNIT_FLAG IN VARCHAR2,
  x_UNIT_SECTION_FLAG IN VARCHAR2,
  x_UNIT_SECTION_OCCURRENCE_FLAG IN VARCHAR2,
  X_MODE in VARCHAR2 default 'R',
  X_ORG_ID in NUMBER,
  x_mandatory_flag                    IN     VARCHAR2    DEFAULT NULL,
  x_restricted_flag IN VARCHAR2
  ) as
/*************************************************************
  Created By :
  Date Created By :
  Purpose :
  Know limitations, enhancements or remarks
  Change History
  Who             When            What
  sbaliga	13-feb-2002	  Assigned igs_ge_gen-003.get_org_id to x-org_id in before_dml
  				 as part of SWCR006 build.
  sbeerell        09-MAY-2000     Changed according to DLD version 2
  (reverse chronological order - newest change first)
***************************************************************/

    cursor C is select ROWID from IGS_GE_REF_CD_TYPE_ALL
      where REFERENCE_CD_TYPE = X_REFERENCE_CD_TYPE;
Line: 552

    X_LAST_UPDATE_DATE DATE;
Line: 553

    X_LAST_UPDATED_BY NUMBER;
Line: 554

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 556

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 558

    X_LAST_UPDATED_BY := 1;
Line: 559

    X_LAST_UPDATE_LOGIN := 0;
Line: 561

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 562

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 566

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

    p_action => 'INSERT',
    x_rowid => X_ROWID,
    x_org_id => igs_ge_gen_003.get_org_id,
    x_self_service_flag=>X_SELF_SERVICE_FLAG,
    x_reference_cd_type=>X_REFERENCE_CD_TYPE,
    x_description=>X_DESCRIPTION,
    x_s_reference_cd_type=>X_S_REFERENCE_CD_TYPE,
    x_closed_ind=>NVL(X_CLOSED_IND,'N' ),
    x_program_flag=>X_PROGRAM_FLAG,
    x_program_offering_option_flag=>X_PROGRAM_OFFERING_OPTION_FLAG,
    x_unit_flag=>X_UNIT_FLAG,
    x_unit_section_flag=>X_UNIT_SECTION_FLAG,
    x_unit_section_occurrence_flag=>X_UNIT_SECTION_OCCURRENCE_FLAG,
    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_mandatory_flag => X_MANDATORY_FLAG,
    x_restricted_flag =>x_restricted_flag
);
Line: 598

  insert into IGS_GE_REF_CD_TYPE_ALL (
                 SELF_SERVICE_FLAG
                ,REFERENCE_CD_TYPE
                ,DESCRIPTION
                ,S_REFERENCE_CD_TYPE
                ,CLOSED_IND
                ,PROGRAM_FLAG
                ,PROGRAM_OFFERING_OPTION_FLAG
                ,UNIT_FLAG
                ,UNIT_SECTION_FLAG
                ,UNIT_SECTION_OCCURRENCE_FLAG
                ,CREATION_DATE
                ,CREATED_BY
                ,LAST_UPDATE_DATE
                ,LAST_UPDATED_BY
                ,LAST_UPDATE_LOGIN
                ,ORG_ID
                ,MANDATORY_FLAG
                ,RESTRICTED_FLAG
  ) values (
                 NEW_REFERENCES.SELF_SERVICE_FLAG
                ,NEW_REFERENCES.REFERENCE_CD_TYPE
                ,NEW_REFERENCES.DESCRIPTION
                ,NEW_REFERENCES.S_REFERENCE_CD_TYPE
                ,NEW_REFERENCES.CLOSED_IND
                ,NEW_REFERENCES.PROGRAM_FLAG
                ,NEW_REFERENCES.PROGRAM_OFFERING_OPTION_FLAG
                ,NEW_REFERENCES.UNIT_FLAG
                ,NEW_REFERENCES.UNIT_SECTION_FLAG
                ,NEW_REFERENCES.UNIT_SECTION_OCCURRENCE_FLAG
                ,X_LAST_UPDATE_DATE
                ,X_LAST_UPDATED_BY
                ,X_LAST_UPDATE_DATE
                ,X_LAST_UPDATED_BY
                ,X_LAST_UPDATE_LOGIN
                ,NEW_REFERENCES.ORG_ID
                ,NEW_REFERENCES.MANDATORY_FLAG
                ,NEW_REFERENCES.RESTRICTED_FLAG
  );
Line: 647

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

end INSERT_ROW;
Line: 678

  cursor c1 is select
     SELF_SERVICE_FLAG,
     DESCRIPTION,
     S_REFERENCE_CD_TYPE,
     CLOSED_IND,
     PROGRAM_FLAG,
     PROGRAM_OFFERING_OPTION_FLAG,
     UNIT_FLAG,
     UNIT_SECTION_FLAG,
     UNIT_SECTION_OCCURRENCE_FLAG,
     MANDATORY_FLAG,
     RESTRICTED_FLAG
    from IGS_GE_REF_CD_TYPE_ALL
       where ROWID = X_ROWID
    for update  nowait;
Line: 700

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

procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  x_SELF_SERVICE_FLAG IN VARCHAR2,
  x_REFERENCE_CD_TYPE IN VARCHAR2,
  x_DESCRIPTION IN VARCHAR2,
  x_S_REFERENCE_CD_TYPE IN VARCHAR2,
  x_CLOSED_IND IN VARCHAR2,
  x_PROGRAM_FLAG IN VARCHAR2,
  x_PROGRAM_OFFERING_OPTION_FLAG IN VARCHAR2,
  x_UNIT_FLAG IN VARCHAR2,
  x_UNIT_SECTION_FLAG IN VARCHAR2,
  x_UNIT_SECTION_OCCURRENCE_FLAG IN VARCHAR2,
  X_MODE in VARCHAR2 default 'R',
  x_mandatory_flag IN VARCHAR2 DEFAULT NULL,
  x_restricted_flag IN VARCHAR2
  ) as
/*************************************************************
  Created By :
  Date Created By :
  Purpose :
  Know limitations, enhancements or remarks
  Change History
  Who             When            What
  sbeerell        09-MAY-2000     Changed according to DLD version 2
  (reverse chronological order - newest change first)
***************************************************************/

    X_LAST_UPDATE_DATE DATE;
Line: 760

    X_LAST_UPDATED_BY NUMBER;
Line: 761

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 763

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 765

    X_LAST_UPDATED_BY := 1;
Line: 766

    X_LAST_UPDATE_LOGIN := 0;
Line: 768

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 769

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 773

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

    p_action => 'UPDATE',
    x_rowid => X_ROWID,
    x_self_service_flag=>X_SELF_SERVICE_FLAG,
    x_reference_cd_type=>X_REFERENCE_CD_TYPE,
    x_description=>X_DESCRIPTION,
    x_s_reference_cd_type=>X_S_REFERENCE_CD_TYPE,
    x_closed_ind=>NVL(X_CLOSED_IND,'N' ),
    x_program_flag=>X_PROGRAM_FLAG,
    x_program_offering_option_flag=>X_PROGRAM_OFFERING_OPTION_FLAG,
    x_unit_flag=>X_UNIT_FLAG,
    x_unit_section_flag=>X_UNIT_SECTION_FLAG,
    x_unit_section_occurrence_flag=>X_UNIT_SECTION_OCCURRENCE_FLAG,
    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_mandatory_flag =>X_MANDATORY_FLAG,
    x_restricted_flag => x_restricted_flag
		);
Line: 805

  update IGS_GE_REF_CD_TYPE_ALL set
      SELF_SERVICE_FLAG =  NEW_REFERENCES.SELF_SERVICE_FLAG,
      DESCRIPTION =  NEW_REFERENCES.DESCRIPTION,
      S_REFERENCE_CD_TYPE =  NEW_REFERENCES.S_REFERENCE_CD_TYPE,
      CLOSED_IND =  NEW_REFERENCES.CLOSED_IND,
      PROGRAM_FLAG =  NEW_REFERENCES.PROGRAM_FLAG,
      PROGRAM_OFFERING_OPTION_FLAG =  NEW_REFERENCES.PROGRAM_OFFERING_OPTION_FLAG,
      UNIT_FLAG =  NEW_REFERENCES.UNIT_FLAG,
      UNIT_SECTION_FLAG =  NEW_REFERENCES.UNIT_SECTION_FLAG,
      UNIT_SECTION_OCCURRENCE_FLAG =  NEW_REFERENCES.UNIT_SECTION_OCCURRENCE_FLAG,
      LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
      LAST_UPDATED_BY = X_LAST_UPDATED_BY,
      LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
      MANDATORY_FLAG = NEW_REFERENCES.MANDATORY_FLAG,
      RESTRICTED_FLAG = NEW_REFERENCES.RESTRICTED_FLAG
    where ROWID = X_ROWID;
Line: 825

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

end UPDATE_ROW;
Line: 858

  cursor c1 is select rowid from IGS_GE_REF_CD_TYPE_ALL
  where ROWID = X_ROWID
  ;
Line: 867

    INSERT_ROW (
     X_ROWID,
     X_SELF_SERVICE_FLAG,
     X_REFERENCE_CD_TYPE,
     X_DESCRIPTION,
     X_S_REFERENCE_CD_TYPE,
     X_CLOSED_IND,
     X_PROGRAM_FLAG,
     X_PROGRAM_OFFERING_OPTION_FLAG,
     X_UNIT_FLAG,
     X_UNIT_SECTION_FLAG,
     X_UNIT_SECTION_OCCURRENCE_FLAG,
     X_MODE,
     X_ORG_ID,
     x_MANDATORY_FLAG,
     x_RESTRICTED_FLAG);
Line: 887

  UPDATE_ROW (
   X_ROWID,
   X_SELF_SERVICE_FLAG,
   X_REFERENCE_CD_TYPE,
   X_DESCRIPTION,
   X_S_REFERENCE_CD_TYPE,
   X_CLOSED_IND,
   X_PROGRAM_FLAG,
   X_PROGRAM_OFFERING_OPTION_FLAG,
   X_UNIT_FLAG,
   X_UNIT_SECTION_FLAG,
   X_UNIT_SECTION_OCCURRENCE_FLAG,
   X_MODE,
   x_MANDATORY_FLAG ,
   x_RESTRICTED_FLAG);
Line: 905

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

  delete from IGS_GE_REF_CD_TYPE_ALL
    where ROWID = X_ROWID;
Line: 920

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

end DELETE_ROW;