DBA Data[Home] [Help]

APPS.IGW_PROP_PROGRAM_ADDRESSES_TBH SQL Statements

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

Line: 3

procedure INSERT_ROW (
  X_ROWID out NOCOPY ROWID,
  X_PROPOSAL_ID in NUMBER,
  X_ADDRESS_ID in NUMBER,
  X_NUMBER_OF_COPIES in NUMBER,
  X_MAIL_DESCRIPTION in VARCHAR2,
  X_MODE in VARCHAR2 default 'R',
  X_RETURN_STATUS   out NOCOPY VARCHAR2
   ) is
    cursor C is select ROWID from IGW_PROP_PROGRAM_ADDRESSES
      where PROPOSAL_ID = X_PROPOSAL_ID
      and ADDRESS_ID = X_ADDRESS_ID;
Line: 15

    X_LAST_UPDATE_DATE DATE;
Line: 16

    X_LAST_UPDATED_BY NUMBER;
Line: 17

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 21

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 23

    X_LAST_UPDATED_BY := 1;
Line: 24

    X_LAST_UPDATE_LOGIN := 0;
Line: 26

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 27

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 31

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

  insert into IGW_PROP_PROGRAM_ADDRESSES (
    PROPOSAL_ID,
    ADDRESS_ID,
    NUMBER_OF_COPIES,
    MAIL_DESCRIPTION,
    RECORD_VERSION_NUMBER,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    X_PROPOSAL_ID,
    X_ADDRESS_ID,
    decode(X_NUMBER_OF_COPIES, FND_API.G_MISS_CHAR, NULL, X_NUMBER_OF_COPIES),
    decode(X_MAIL_DESCRIPTION, FND_API.G_MISS_CHAR, NULL, X_MAIL_DESCRIPTION),
    1,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );
Line: 73

                              ,p_procedure_name => 'INSERT_ROW' );
Line: 76

end INSERT_ROW;
Line: 78

procedure UPDATE_ROW (
  X_ROWID in ROWID,
  X_PROPOSAL_ID in NUMBER,
  X_ADDRESS_ID in NUMBER,
  X_NUMBER_OF_COPIES in NUMBER,
  X_MAIL_DESCRIPTION in VARCHAR2,
  X_RECORD_VERSION_NUMBER   IN NUMBER,
  X_MODE in VARCHAR2 default 'R',
  X_RETURN_STATUS   out NOCOPY VARCHAR2
    ) is
    X_LAST_UPDATE_DATE DATE;
Line: 89

    X_LAST_UPDATED_BY NUMBER;
Line: 90

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 95

  SELECT rowid
  FROM   IGW_PROP_PROGRAM_ADDRESSES
  WHERE  proposal_id = x_proposal_id
  AND    address_id = x_address_id;
Line: 109

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 111

    X_LAST_UPDATED_BY := 1;
Line: 112

    X_LAST_UPDATE_LOGIN := 0;
Line: 114

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 115

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 119

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

  update IGW_PROP_PROGRAM_ADDRESSES set
    ADDRESS_ID = X_ADDRESS_ID,
    NUMBER_OF_COPIES = decode(X_NUMBER_OF_COPIES, FND_API.G_MISS_CHAR, NULL, X_NUMBER_OF_COPIES),
    MAIL_DESCRIPTION = decode(X_MAIL_DESCRIPTION, FND_API.G_MISS_CHAR, NULL, X_MAIL_DESCRIPTION),
    RECORD_VERSION_NUMBER = X_RECORD_VERSION_NUMBER + 1,
    LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
    LAST_UPDATED_BY = X_LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
    where ROWID = L_ROW_ID
    AND   RECORD_VERSION_NUMBER = X_RECORD_VERSION_NUMBER;
Line: 146

                              ,p_procedure_name => 'UPDATE_ROW' );
Line: 149

end UPDATE_ROW;
Line: 152

procedure DELETE_ROW (
  X_ROWID in ROWID,
  X_PROPOSAL_ID in NUMBER,
  X_ADDRESS_ID in NUMBER,
  X_RECORD_VERSION_NUMBER   IN NUMBER,
  X_RETURN_STATUS   out NOCOPY VARCHAR2
) is

  l_row_id  ROWID := x_rowid;
Line: 163

  SELECT rowid
  FROM   IGW_PROP_PROGRAM_ADDRESSES
  WHERE  proposal_id = x_proposal_id
  AND    address_id = x_address_id;
Line: 177

  delete from IGW_PROP_PROGRAM_ADDRESSES
  where ROWID = L_ROW_ID
  AND   RECORD_VERSION_NUMBER = X_RECORD_VERSION_NUMBER;
Line: 192

                              ,p_procedure_name => 'DELETE_ROW' );
Line: 195

end DELETE_ROW;