APPS.PA_PROJECT_PARTIES_PKG SQL Statements

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

Line: 5

procedure INSERT_ROW (
  X_PROJECT_PARTY_ID in out NOCOPY NUMBER, --File.Sql.39 bug 4440895
  X_OBJECT_ID in NUMBER,
  X_OBJECT_TYPE in VARCHAR2,
  X_PROJECT_ID in NUMBER,
  X_RESOURCE_ID in NUMBER,
  X_RESOURCE_TYPE_ID in NUMBER,
  X_RESOURCE_SOURCE_ID in NUMBER,
  X_PROJECT_ROLE_ID in NUMBER,
  X_START_DATE_ACTIVE in DATE,
  X_END_DATE_ACTIVE in DATE,
  X_SCHEDULED_FLAG in varchar2,
  X_GRANT_ID in raw,
  X_CREATED_BY in NUMBER,
  X_LAST_UPDATED_BY in NUMBER,
  X_LAST_UPDATE_LOGIN in NUMBER
) is
  cursor C is select project_party_id from PA_PROJECT_PARTIES
    where PROJECT_PARTY_ID = X_PROJECT_PARTY_ID ;

Line: 27

  select pa_project_parties_s.nextval into x_project_party_id
from dual;

Line: 30

  insert into PA_PROJECT_PARTIES (
    PROJECT_PARTY_ID,
    OBJECT_ID,
    OBJECT_TYPE,
    PROJECT_ID,
    RESOURCE_ID,
    RESOURCE_TYPE_ID,
    RESOURCE_SOURCE_ID,
    PROJECT_ROLE_ID,
    START_DATE_ACTIVE,
    END_DATE_ACTIVE,
    SCHEDULED_FLAG,
    record_version_number,
    grant_id,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) select
    X_PROJECT_PARTY_ID,
    X_OBJECT_ID,
    X_OBJECT_TYPE,
    X_PROJECT_ID,
    X_RESOURCE_ID,
    X_RESOURCE_TYPE_ID,
    X_RESOURCE_SOURCE_ID,
    X_PROJECT_ROLE_ID,
    X_START_DATE_ACTIVE,
    X_END_DATE_ACTIVE,
    X_SCHEDULED_FLAG,
    1,
    x_grant_id,
    sysdate,
    X_CREATED_BY,
    sysdate,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  from dual;

Line: 81

                            p_procedure_name => 'INSERT_ROW',
                            p_error_text => SUBSTRB(SQLERRM,1,240));

Line: 84

end INSERT_ROW;

Line: 100

  cursor c1 is select
      OBJECT_ID,
      OBJECT_TYPE,
      PROJECT_ID,
      RESOURCE_ID,
      RESOURCE_TYPE_ID,
      RESOURCE_SOURCE_ID,
      PROJECT_ROLE_ID,
      START_DATE_ACTIVE,
      END_DATE_ACTIVE,
      SCHEDULED_FLAG,
      PROJECT_PARTY_ID
    from PA_PROJECT_PARTIES
    where PROJECT_PARTY_ID = X_PROJECT_PARTY_ID
    for update of PROJECT_PARTY_ID nowait;

Line: 141

procedure UPDATE_ROW (
  X_PROJECT_PARTY_ID in NUMBER,
  X_PROJECT_ID in NUMBER,
  X_RESOURCE_SOURCE_ID in NUMBER,
  X_RESOURCE_TYPE_ID in NUMBER,
  X_PROJECT_ROLE_ID in NUMBER,
  X_START_DATE_ACTIVE in DATE,
  X_END_DATE_ACTIVE in DATE,
  X_SCHEDULED_FLAG in varchar2,
  X_GRANT_ID in raw,
  x_record_version_number in number,
  X_LAST_UPDATE_DATE in DATE,
  X_LAST_UPDATED_BY in NUMBER,
  X_LAST_UPDATE_LOGIN in NUMBER,
  X_RETURN_STATUS Out NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
) is
begin
  x_return_status := 'S';

Line: 160

  update PA_PROJECT_PARTIES set
    RESOURCE_SOURCE_ID = X_RESOURCE_SOURCE_ID,
    RESOURCE_TYPE_ID = X_RESOURCE_TYPE_ID,
    PROJECT_ROLE_ID = X_PROJECT_ROLE_ID,
    START_DATE_ACTIVE = X_START_DATE_ACTIVE,
    END_DATE_ACTIVE = X_END_DATE_ACTIVE,
    SCHEDULED_FLAG = X_SCHEDULED_FLAG,
    GRANT_ID = nvl(X_GRANT_ID,GRANT_ID),
    record_version_number = 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 PROJECT_PARTY_ID = X_PROJECT_PARTY_ID
    and record_version_number = nvl(x_record_version_number,record_version_number);

Line: 175

   update PA_PROJECT_PARTIES set
    START_DATE_ACTIVE = X_START_DATE_ACTIVE,
    END_DATE_ACTIVE = X_END_DATE_ACTIVE,
    SCHEDULED_FLAG = X_SCHEDULED_FLAG,
    GRANT_ID = nvl(X_GRANT_ID,GRANT_ID),
    record_version_number = 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 PROJECT_PARTY_ID = X_PROJECT_PARTY_ID
    and record_version_number = nvl(x_record_version_number,record_version_number);

Line: 203

                            p_procedure_name => 'UPDATE_ROW',
                            p_error_text => SUBSTRB(SQLERRM,1,240));

Line: 207

end UPDATE_ROW;

Line: 210

procedure DELETE_ROW (
  X_PROJECT_ID in NUMBER,
  X_PROJECT_PARTY_ID in NUMBER,
  X_record_version_number in NUMBER
) is
begin
  if x_project_party_id is null then
    delete from pa_project_parties
     where project_id = x_project_id;

Line: 220

    delete from PA_PROJECT_PARTIES
     where PROJECT_PARTY_ID = X_PROJECT_PARTY_ID
       and record_version_number = nvl(x_record_version_number,record_version_number);

Line: 238

                            p_procedure_name => 'DELETE_ROW',
                            p_error_text => SUBSTRB(SQLERRM,1,240));

Line: 241

end DELETE_ROW;