APPS.IEB_SVC_PLANS_PKG SQL Statements

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

Line: 4

procedure INSERT_ROW_B (
  P_SVCPLN_ID             IN NUMBER,
  P_SERVICE_PLAN_NAME     IN VARCHAR2,
  P_DIRECTION             IN VARCHAR2,
  P_TREATMENT             IN VARCHAR2,
  P_PLAN_NAME             IN VARCHAR2,
  P_DESCRIPTION           IN VARCHAR2,
  P_OBJECT_VERSION_NUMBER IN NUMBER,
  P_MEDIA_TYPE_ID         IN NUMBER,
  P_OWNER_ID			 IN NUMBER,
  X_ROWID                 IN OUT NOCOPY VARCHAR2
) is
  cursor C is select ROWID from IEB_SERVICE_PLANS
    where SVCPLN_ID = P_SVCPLN_ID ;

Line: 20

  insert into IEB_SERVICE_PLANS (
    SVCPLN_ID,
    SERVICE_PLAN_NAME,
    DIRECTION,
    TREATMENT,
    OBJECT_VERSION_NUMBER ,
    MEDIA_TYPE_ID,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    P_SVCPLN_ID,
    P_SERVICE_PLAN_NAME,
    P_DIRECTION,
    P_TREATMENT,
    P_OBJECT_VERSION_NUMBER,
    P_MEDIA_TYPE_ID,
    SYSDATE,
    P_OWNER_ID,
    SYSDATE,
    P_OWNER_ID,
    FND_GLOBAL.LOGIN_ID
  );

Line: 54

end INSERT_ROW_B;

Line: 57

procedure INSERT_ROW_TL (
  P_SVCPLN_ID             IN NUMBER,
  P_PLAN_NAME             IN VARCHAR2,
  P_DESCRIPTION           IN VARCHAR2,
  P_OBJECT_VERSION_NUMBER IN NUMBER,
  P_OWNER_ID			 IN NUMBER,
  X_ROWID                 IN OUT NOCOPY VARCHAR2
) is
  cursor C is select ROWID from IEB_SERVICE_PLANS_TL
    where SERVICE_PLAN_ID = P_SVCPLN_ID;

Line: 69

  insert into IEB_SERVICE_PLANS_TL (
    CREATION_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_DATE,
    CREATED_BY,
    SERVICE_PLAN_ID,
    OBJECT_VERSION_NUMBER,
    DESCRIPTION,
    LAST_UPDATE_LOGIN,
    PLAN_NAME,
    LANGUAGE,
    SOURCE_LANG
  ) select
    SYSDATE,
    P_OWNER_ID,
    SYSDATE,
    P_OWNER_ID,
    P_SVCPLN_ID,
    P_OBJECT_VERSION_NUMBER,
    P_DESCRIPTION,
    FND_GLOBAL.LOGIN_ID,
    P_PLAN_NAME,
    L.LANGUAGE_CODE,
    userenv('LANG')
  FROM FND_LANGUAGES L
  where L.INSTALLED_FLAG in ('I', 'B')
  and not exists
    (select NULL
    from IEB_SERVICE_PLANS_TL T
    where T.SERVICE_PLAN_ID = P_SVCPLN_ID
    and T.LANGUAGE = L.LANGUAGE_CODE);

Line: 109

end INSERT_ROW_TL;

Line: 121

  cursor c is select
      SERVICE_PLAN_NAME,
      DIRECTION,
      TREATMENT,
      OBJECT_VERSION_NUMBER,
      MEDIA_TYPE_ID
    FROM IEB_SERVICE_PLANS
    WHERE SVCPLN_ID = P_SVCPLN_ID
    FOR update of SVCPLN_ID nowait;

Line: 132

  cursor c1 is select
      PLAN_NAME,
      DESCRIPTION,
      decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
    FROM IEB_SERVICE_PLANS_TL
    WHERE SERVICE_PLAN_ID = P_SVCPLN_ID
    AND userenv('LANG') in (LANGUAGE, SOURCE_LANG)
    FOR update of SERVICE_PLAN_ID nowait;

Line: 145

    fnd_message.set_name('FND', 'FORM_RECORD_DELETED');

Line: 178

procedure UPDATE_ROW_B (
  P_SVCPLN_ID             IN NUMBER,
  P_SERVICE_PLAN_NAME             IN VARCHAR2,
  P_DIRECTION             IN VARCHAR2,
  P_TREATMENT             IN VARCHAR2,
  P_PLAN_NAME             IN VARCHAR2,
  P_DESCRIPTION           IN VARCHAR2,
  P_OBJECT_VERSION_NUMBER IN NUMBER,
  P_MEDIA_TYPE_ID         IN NUMBER,
  P_OWNER_ID			 IN NUMBER
) is
begin
  update IEB_SERVICE_PLANS set
    SERVICE_PLAN_NAME = P_SERVICE_PLAN_NAME,
    DIRECTION = P_DIRECTION,
    TREATMENT = P_TREATMENT,
    OBJECT_VERSION_NUMBER = P_OBJECT_VERSION_NUMBER,
    MEDIA_TYPE_ID = P_MEDIA_TYPE_ID,
    LAST_UPDATE_DATE = SYSDATE,
    LAST_UPDATED_BY = P_OWNER_ID,
    LAST_UPDATE_LOGIN = FND_GLOBAL.LOGIN_ID
  where SVCPLN_ID = P_SVCPLN_ID;

Line: 204

end UPDATE_ROW_B;

Line: 206

procedure UPDATE_ROW_TL (
  P_SVCPLN_ID             IN NUMBER,
  P_PLAN_NAME             IN VARCHAR2,
  P_DESCRIPTION           IN VARCHAR2,
  P_OBJECT_VERSION_NUMBER IN NUMBER,
  P_OWNER_ID              IN NUMBER
) is
begin
  update IEB_SERVICE_PLANS_TL set
    PLAN_NAME = P_PLAN_NAME,
    DESCRIPTION = P_DESCRIPTION,
    OBJECT_VERSION_NUMBER = P_OBJECT_VERSION_NUMBER,
    LAST_UPDATE_DATE = SYSDATE,
    LAST_UPDATED_BY = P_OWNER_ID,
    LAST_UPDATE_LOGIN = FND_GLOBAL.LOGIN_ID,
    SOURCE_LANG = userenv('LANG')
  where SERVICE_PLAN_ID = P_SVCPLN_ID
  and userenv('LANG') in (LANGUAGE, SOURCE_LANG);

Line: 228

end UPDATE_ROW_TL;

Line: 231

procedure DELETE_ROW (
  P_SVCPLN_ID in NUMBER
) is
begin
  delete from IEB_SERVICE_PLANS
  where SVCPLN_ID = P_SVCPLN_ID;

Line: 242

  delete from IEB_SERVICE_PLANS_TL
  where SERVICE_PLAN_ID = P_SVCPLN_ID;

Line: 248

end DELETE_ROW;

Line: 253

  delete from IEB_SERVICE_PLANS_TL T
  where not exists
    (select NULL
    from IEB_SERVICE_PLANS B
    where B.SVCPLN_ID = T.SERVICE_PLAN_ID
    );

Line: 260

  update IEB_SERVICE_PLANS_TL T set (
      PLAN_NAME,
      DESCRIPTION
    ) = (select
      B.PLAN_NAME,
      B.DESCRIPTION
    from IEB_SERVICE_PLANS_TL B
    where B.SERVICE_PLAN_ID = T.SERVICE_PLAN_ID
    and B.LANGUAGE = T.SOURCE_LANG)
  where (
      T.SERVICE_PLAN_ID,
      T.LANGUAGE
  ) in (select
      SUBT.SERVICE_PLAN_ID,
      SUBT.LANGUAGE
    from IEB_SERVICE_PLANS_TL SUBB, IEB_SERVICE_PLANS_TL SUBT
    where SUBB.SERVICE_PLAN_ID = SUBT.SERVICE_PLAN_ID
    and SUBB.LANGUAGE = SUBT.SOURCE_LANG
    and (SUBB.PLAN_NAME <> SUBT.PLAN_NAME
      or SUBB.DESCRIPTION <> SUBT.DESCRIPTION
  ));

Line: 282

  insert into IEB_SERVICE_PLANS_TL (
    CREATION_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_DATE,
    CREATED_BY,
    SERVICE_PLAN_ID,
    OBJECT_VERSION_NUMBER,
    DESCRIPTION,
    LAST_UPDATE_LOGIN,
    PLAN_NAME,
    LANGUAGE,
    SOURCE_LANG
  ) select
    B.CREATION_DATE,
    B.LAST_UPDATED_BY,
    B.LAST_UPDATE_DATE,
    B.CREATED_BY,
    B.SERVICE_PLAN_ID,
    B.OBJECT_VERSION_NUMBER,
    B.DESCRIPTION,
    B.LAST_UPDATE_LOGIN,
    B.PLAN_NAME,
    L.LANGUAGE_CODE,
    B.SOURCE_LANG
  from IEB_SERVICE_PLANS_TL B, FND_LANGUAGES L
  where L.INSTALLED_FLAG in ('I', 'B')
  and B.LANGUAGE = userenv('LANG')
  and not exists
    (select NULL
    from IEB_SERVICE_PLANS_TL T
    where T.SERVICE_PLAN_ID = B.SERVICE_PLAN_ID
    and T.LANGUAGE = L.LANGUAGE_CODE);

Line: 325

  UPDATE IEB_SERVICE_PLANS_TL
  SET
    PLAN_NAME = P_PLAN_NAME,
    SOURCE_LANG = userenv( 'LANG' ),
    DESCRIPTION = P_DESCRIPTION,
    LAST_UPDATE_DATE = SYSDATE,
    LAST_UPDATED_BY = fnd_load_util.owner_id(P_OWNER),
    LAST_UPDATE_LOGIN = 0
  WHERE
    SERVICE_PLAN_ID = P_SVCPLN_ID
  AND userenv('LANG') IN (LANGUAGE, SOURCE_LANG);

Line: 362

        UPDATE_ROW_B (
          P_SVCPLN_ID             ,
          P_SERVICE_PLAN_NAME     ,
          P_DIRECTION             ,
          P_TREATMENT             ,
          P_PLAN_NAME             ,
          P_DESCRIPTION           ,
          P_OBJECT_VERSION_NUMBER ,
          P_MEDIA_TYPE_ID         ,
		user_id
        );

Line: 377

        INSERT_ROW_B (
          P_SVCPLN_ID             ,
          P_SERVICE_PLAN_NAME     ,
          P_DIRECTION             ,
          P_TREATMENT             ,
          P_PLAN_NAME             ,
          P_DESCRIPTION           ,
          P_OBJECT_VERSION_NUMBER ,
          P_MEDIA_TYPE_ID         ,
		user_id,
          rowid
        );

Line: 392

        UPDATE_ROW_TL (
          P_SVCPLN_ID             ,
          P_PLAN_NAME             ,
          P_DESCRIPTION           ,
          P_OBJECT_VERSION_NUMBER ,
		user_id
        );

Line: 403

        INSERT_ROW_TL (
          P_SVCPLN_ID             ,
          P_PLAN_NAME             ,
          P_DESCRIPTION           ,
          P_OBJECT_VERSION_NUMBER ,
		user_id,
          rowid
        );