APPS.GMS_REFERENCE_NUMBERS_PKG SQL Statements

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

Line: 3

procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_AWARD_ID in NUMBER,
  X_TYPE in VARCHAR2,
  X_VALUE in VARCHAR2,
  X_REQUIRED_FLAG in VARCHAR2,
  X_MODE in VARCHAR2
  ) is
    cursor C is select ROWID from GMS_REFERENCE_NUMBERS
      where AWARD_ID = X_AWARD_ID
      and TYPE = X_TYPE
      and (VALUE = X_VALUE
          OR (VALUE IS NULL AND X_VALUE IS NULL)) ;  -- Bug 2652987, Added;

Line: 16

    X_LAST_UPDATE_DATE DATE;

Line: 17

    X_LAST_UPDATED_BY NUMBER;

Line: 18

    X_LAST_UPDATE_LOGIN NUMBER;

Line: 20

  X_LAST_UPDATE_DATE := SYSDATE;

Line: 22

    X_LAST_UPDATED_BY := 1;

Line: 23

    X_LAST_UPDATE_LOGIN := 0;

Line: 25

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 26

    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 29

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 30

    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 37

  insert into GMS_REFERENCE_NUMBERS (
    AWARD_ID,
    TYPE,
    VALUE,
    REQUIRED_FLAG,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    X_AWARD_ID,
    X_TYPE,
    X_VALUE,
    X_REQUIRED_FLAG,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );

Line: 67

end INSERT_ROW;

Line: 76

  cursor c1 is select
      TYPE, VALUE, REQUIRED_FLAG
    from GMS_REFERENCE_NUMBERS
    where ROWID = X_ROWID  -- Bug 2652987, Added
    for update of AWARD_ID nowait;

Line: 106

procedure UPDATE_ROW (
  X_ROW_ID in VARCHAR2,
  X_AWARD_ID in NUMBER,
  X_TYPE in VARCHAR2,
  X_VALUE in VARCHAR2,
  X_REQUIRED_FLAG in VARCHAR2,
  X_MODE in VARCHAR2
  ) is
    X_LAST_UPDATE_DATE DATE;

Line: 115

    X_LAST_UPDATED_BY NUMBER;

Line: 116

    X_LAST_UPDATE_LOGIN NUMBER;

Line: 118

  X_LAST_UPDATE_DATE := SYSDATE;

Line: 120

    X_LAST_UPDATED_BY := 1;

Line: 121

    X_LAST_UPDATE_LOGIN := 0;

Line: 123

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 124

    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 127

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 128

    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 135

  update GMS_REFERENCE_NUMBERS set
    TYPE = X_TYPE,
    VALUE = X_VALUE,
    REQUIRED_FLAG = X_REQUIRED_FLAG,
    LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
    LAST_UPDATED_BY = X_LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
/* Commented out NOCOPY for bug fix 1829009.Now rowid is used to uniquely identify the records

  where AWARD_ID = X_AWARD_ID
  and TYPE = X_TYPE
*/
  where rowid = X_ROW_ID
  ;

Line: 152

end UPDATE_ROW;

Line: 162

  cursor c1 is select rowid from GMS_REFERENCE_NUMBERS
     where AWARD_ID = X_AWARD_ID
     and TYPE = X_TYPE
  ;

Line: 172

    INSERT_ROW (
     X_ROWID,
     X_AWARD_ID,
     X_TYPE,
     X_VALUE,
     X_REQUIRED_FLAG,
     X_MODE);

Line: 182

  UPDATE_ROW (
   X_ROWID,
   X_AWARD_ID,
   X_TYPE,
   X_VALUE,
   X_REQUIRED_FLAG,
   X_MODE);

Line: 191

procedure DELETE_ROW (
  X_AWARD_ID in NUMBER,
  X_TYPE in VARCHAR2,
  X_VALUE in VARCHAR2, -- Bug 2652987, Added
  X_ROWID in VARCHAR2  -- Bug 2652987, Added
) is
begin
  delete from GMS_REFERENCE_NUMBERS
  where ROWID = X_ROWID;

Line: 203

end DELETE_ROW;