DBA Data[Home] [Help]

APPS.JTF_UM_SUBSCRIPTIONS_PKG SQL Statements

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

Line: 6

procedure INSERT_ROW (
  X_SUBSCRIPTION_ID out NOCOPY NUMBER,
  X_APPLICATION_ID in NUMBER,
  X_EFFECTIVE_START_DATE in DATE,
  X_SUBSCRIPTION_KEY in VARCHAR2,
  X_ENABLED_FLAG in VARCHAR2,
  X_EFFECTIVE_END_DATE in DATE,
  X_APPROVAL_ID in NUMBER,
  X_PARENT_SUBSCRIPTION_ID in NUMBER,
  X_AVAILABILITY_CODE in VARCHAR2,
  X_LOGON_DISPLAY_FREQUENCY in NUMBER,
  X_SUBSCRIPTION_NAME in VARCHAR2,
  X_DESCRIPTION in VARCHAR2,
  X_CREATION_DATE in DATE,
  X_CREATED_BY in NUMBER,
  X_LAST_UPDATE_DATE in DATE,
  X_LAST_UPDATED_BY in NUMBER,
  X_LAST_UPDATE_LOGIN in NUMBER,
  X_AUTH_DELEGATION_ROLE_ID in NUMBER
  )
 is
  cursor C is select ROWID from JTF_UM_SUBSCRIPTIONS_B
    where SUBSCRIPTION_ID = X_SUBSCRIPTION_ID
    ;
Line: 32

  insert into JTF_UM_SUBSCRIPTIONS_B (
    APPLICATION_ID,
    EFFECTIVE_START_DATE,
    SUBSCRIPTION_ID,
    SUBSCRIPTION_KEY,
    ENABLED_FLAG,
    EFFECTIVE_END_DATE,
    APPROVAL_ID,
    PARENT_SUBSCRIPTION_ID,
    AVAILABILITY_CODE,
    LOGON_DISPLAY_FREQUENCY,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN,
    AUTH_DELEGATION_ROLE_ID
  ) values (
    X_APPLICATION_ID,
    X_EFFECTIVE_START_DATE,
    JTF_UM_SUBSCRIPTIONS_B_S.NEXTVAL,
    X_SUBSCRIPTION_KEY,
    X_ENABLED_FLAG,
    X_EFFECTIVE_END_DATE,
    X_APPROVAL_ID,
    X_PARENT_SUBSCRIPTION_ID,
    X_AVAILABILITY_CODE,
    X_LOGON_DISPLAY_FREQUENCY,
    X_CREATION_DATE,
    X_CREATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN,
    X_AUTH_DELEGATION_ROLE_ID
  )RETURNING SUBSCRIPTION_ID INTO X_SUBSCRIPTION_ID;
Line: 68

  insert into JTF_UM_SUBSCRIPTIONS_TL (
    LAST_UPDATED_BY,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_LOGIN,
    LAST_UPDATE_DATE,
    DESCRIPTION,
    APPLICATION_ID,
    SUBSCRIPTION_ID,
    SUBSCRIPTION_NAME,
    LANGUAGE,
    SOURCE_LANG
  ) select
    X_LAST_UPDATED_BY,
    X_CREATION_DATE,
    X_CREATED_BY,
    X_LAST_UPDATE_LOGIN,
    X_LAST_UPDATE_DATE,
    X_DESCRIPTION,
    X_APPLICATION_ID,
    X_SUBSCRIPTION_ID,
    X_SUBSCRIPTION_NAME,
    L.LANGUAGE_CODE,
    userenv('LANG')
  from FND_LANGUAGES L
  where L.INSTALLED_FLAG in ('I', 'B')
  and not exists
    (select NULL
    from JTF_UM_SUBSCRIPTIONS_TL T
    where T.SUBSCRIPTION_ID = X_SUBSCRIPTION_ID
    and T.LANGUAGE = L.LANGUAGE_CODE);
Line: 107

end INSERT_ROW;
Line: 124

  cursor c is select
      APPLICATION_ID,
      EFFECTIVE_START_DATE,
      SUBSCRIPTION_KEY,
      ENABLED_FLAG,
      EFFECTIVE_END_DATE,
      APPROVAL_ID,
      PARENT_SUBSCRIPTION_ID,
      AVAILABILITY_CODE,
      LOGON_DISPLAY_FREQUENCY,
      AUTH_DELEGATION_ROLE_ID
    from JTF_UM_SUBSCRIPTIONS_B
    where SUBSCRIPTION_ID = X_SUBSCRIPTION_ID
    for update of SUBSCRIPTION_ID nowait;
Line: 140

  cursor c1 is select
      SUBSCRIPTION_NAME,
      DESCRIPTION,
      decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
    from JTF_UM_SUBSCRIPTIONS_TL
    where SUBSCRIPTION_ID = X_SUBSCRIPTION_ID
    and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
    for update of SUBSCRIPTION_ID nowait;
Line: 153

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

procedure UPDATE_ROW (
  X_SUBSCRIPTION_ID in NUMBER,
  X_APPLICATION_ID in NUMBER,
  X_SUBSCRIPTION_KEY in VARCHAR2,
  X_ENABLED_FLAG in VARCHAR2,
  X_EFFECTIVE_END_DATE in DATE,
  X_APPROVAL_ID in NUMBER,
  X_PARENT_SUBSCRIPTION_ID in NUMBER,
  X_AVAILABILITY_CODE in VARCHAR2,
  X_LOGON_DISPLAY_FREQUENCY in NUMBER,
  X_SUBSCRIPTION_NAME in VARCHAR2,
  X_DESCRIPTION in VARCHAR2,
  X_LAST_UPDATE_DATE in DATE,
  X_LAST_UPDATED_BY in NUMBER,
  X_LAST_UPDATE_LOGIN in NUMBER,
  X_AUTH_DELEGATION_ROLE_ID in NUMBER
) is
begin
  update JTF_UM_SUBSCRIPTIONS_B set
    APPLICATION_ID = X_APPLICATION_ID,
    SUBSCRIPTION_KEY = X_SUBSCRIPTION_KEY,
    ENABLED_FLAG = X_ENABLED_FLAG,
    EFFECTIVE_END_DATE = X_EFFECTIVE_END_DATE,
    APPROVAL_ID = X_APPROVAL_ID,
    PARENT_SUBSCRIPTION_ID = X_PARENT_SUBSCRIPTION_ID,
    AVAILABILITY_CODE = X_AVAILABILITY_CODE,
    LOGON_DISPLAY_FREQUENCY = X_LOGON_DISPLAY_FREQUENCY,
    LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
    LAST_UPDATED_BY = X_LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
    AUTH_DELEGATION_ROLE_ID = X_AUTH_DELEGATION_ROLE_ID
  where SUBSCRIPTION_ID = X_SUBSCRIPTION_ID;
Line: 230

  update JTF_UM_SUBSCRIPTIONS_TL set
    SUBSCRIPTION_NAME = X_SUBSCRIPTION_NAME,
    DESCRIPTION = X_DESCRIPTION,
    LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
    LAST_UPDATED_BY = X_LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
    SOURCE_LANG = userenv('LANG')
  where SUBSCRIPTION_ID = X_SUBSCRIPTION_ID
  and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
Line: 243

end UPDATE_ROW;
Line: 245

procedure DELETE_ROW (
  X_SUBSCRIPTION_ID in NUMBER
) is
begin
  delete from JTF_UM_SUBSCRIPTIONS_TL
  where SUBSCRIPTION_ID = X_SUBSCRIPTION_ID;
Line: 256

  delete from JTF_UM_SUBSCRIPTIONS_B
  where SUBSCRIPTION_ID = X_SUBSCRIPTION_ID;
Line: 262

end DELETE_ROW;
Line: 267

  delete from JTF_UM_SUBSCRIPTIONS_TL T
  where not exists
    (select NULL
    from JTF_UM_SUBSCRIPTIONS_B B
    where B.SUBSCRIPTION_ID = T.SUBSCRIPTION_ID
    );
Line: 274

  update JTF_UM_SUBSCRIPTIONS_TL T set (
      SUBSCRIPTION_NAME,
      DESCRIPTION
    ) = (select
      B.SUBSCRIPTION_NAME,
      B.DESCRIPTION
    from JTF_UM_SUBSCRIPTIONS_TL B
    where B.SUBSCRIPTION_ID = T.SUBSCRIPTION_ID
    and B.LANGUAGE = T.SOURCE_LANG)
  where (
      T.SUBSCRIPTION_ID,
      T.LANGUAGE
  ) in (select
      SUBT.SUBSCRIPTION_ID,
      SUBT.LANGUAGE
    from JTF_UM_SUBSCRIPTIONS_TL SUBB, JTF_UM_SUBSCRIPTIONS_TL SUBT
    where SUBB.SUBSCRIPTION_ID = SUBT.SUBSCRIPTION_ID
    and SUBB.LANGUAGE = SUBT.SOURCE_LANG
    and (SUBB.SUBSCRIPTION_NAME <> SUBT.SUBSCRIPTION_NAME
      or SUBB.DESCRIPTION <> SUBT.DESCRIPTION
  ));
Line: 296

  insert into JTF_UM_SUBSCRIPTIONS_TL (
    LAST_UPDATED_BY,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_LOGIN,
    LAST_UPDATE_DATE,
    DESCRIPTION,
    APPLICATION_ID,
    SUBSCRIPTION_ID,
    SUBSCRIPTION_NAME,
    LANGUAGE,
    SOURCE_LANG
  ) select /*+ ORDERED */
    B.LAST_UPDATED_BY,
    B.CREATION_DATE,
    B.CREATED_BY,
    B.LAST_UPDATE_LOGIN,
    B.LAST_UPDATE_DATE,
    B.DESCRIPTION,
    B.APPLICATION_ID,
    B.SUBSCRIPTION_ID,
    B.SUBSCRIPTION_NAME,
    L.LANGUAGE_CODE,
    B.SOURCE_LANG
  from JTF_UM_SUBSCRIPTIONS_TL B, FND_LANGUAGES L
  where L.INSTALLED_FLAG in ('I', 'B')
  and B.LANGUAGE = userenv('LANG')
  and not exists
    (select NULL
    from JTF_UM_SUBSCRIPTIONS_TL T
    where T.SUBSCRIPTION_ID = B.SUBSCRIPTION_ID
    and T.LANGUAGE = L.LANGUAGE_CODE);
Line: 349

    x_last_update_date       in varchar2 default NULL,
    X_CUSTOM_MODE            in varchar2 default NULL
) is
        l_user_id NUMBER := fnd_load_util.owner_id(x_owner);
Line: 355

  f_ludate  date;    -- entity update date in file
Line: 357

  db_ludate date;    -- entity update date in db
Line: 365

	-- Translate owner to file_last_updated_by
    f_luby := fnd_load_util.owner_id(x_owner);
Line: 369

    f_ludate := nvl(to_date(x_last_update_date, 'YYYY/MM/DD'), sysdate);
Line: 373

           INSERT_ROW(
		X_SUBSCRIPTION_ID 	=> l_subscription_id,
                X_EFFECTIVE_START_DATE 	=> X_EFFECTIVE_START_DATE,
		X_EFFECTIVE_END_DATE 	=> X_EFFECTIVE_END_DATE,
		X_APPROVAL_ID 		=> X_APPROVAL_ID,
		X_APPLICATION_ID 	=> X_APPLICATION_ID,
		X_ENABLED_FLAG 		=> X_ENABLED_FLAG,
		X_PARENT_SUBSCRIPTION_ID => X_PARENT_SUBSCRIPTION_ID,
		X_AVAILABILITY_CODE	=> X_AVAILABILITY_CODE,
		X_LOGON_DISPLAY_FREQUENCY => X_LOGON_DISPLAY_FREQUENCY,
		X_SUBSCRIPTION_KEY	=> X_SUBSCRIPTION_KEY,
		X_SUBSCRIPTION_NAME	=> X_SUBSCRIPTION_NAME,
		X_DESCRIPTION		=> X_DESCRIPTION,
                X_CREATION_DATE         => f_ludate,
                X_CREATED_BY            => f_luby,
                X_LAST_UPDATE_DATE      => f_ludate,
                X_LAST_UPDATED_BY       => f_luby,
                X_LAST_UPDATE_LOGIN     => l_user_id,
                X_AUTH_DELEGATION_ROLE_ID => X_AUTH_DELEGATION_ROLE_ID
             );
Line: 397

              select LAST_UPDATED_BY, LAST_UPDATE_DATE
                into db_luby, db_ludate
                FROM JTF_UM_SUBSCRIPTIONS_B
               where SUBSCRIPTION_ID = X_SUBSCRIPTION_ID;
Line: 405

                     UPDATE_ROW(
                          X_SUBSCRIPTION_ID 	=> X_SUBSCRIPTION_ID,
		          X_EFFECTIVE_END_DATE 	=> X_EFFECTIVE_END_DATE,
		          X_APPROVAL_ID 		=> X_APPROVAL_ID,
		          X_APPLICATION_ID 	=> X_APPLICATION_ID,
		          X_ENABLED_FLAG 		=> X_ENABLED_FLAG,
		          X_PARENT_SUBSCRIPTION_ID => X_PARENT_SUBSCRIPTION_ID,
		          X_AVAILABILITY_CODE	=> X_AVAILABILITY_CODE,
		          X_LOGON_DISPLAY_FREQUENCY => X_LOGON_DISPLAY_FREQUENCY,
		          X_SUBSCRIPTION_KEY	=> X_SUBSCRIPTION_KEY,
		          X_SUBSCRIPTION_NAME	=> X_SUBSCRIPTION_NAME,
		          X_DESCRIPTION		=> X_DESCRIPTION,
                          X_LAST_UPDATE_DATE      => f_ludate,
                          X_LAST_UPDATED_BY       => f_luby,
                          X_LAST_UPDATE_LOGIN     => l_user_id,
                          X_AUTH_DELEGATION_ROLE_ID => X_AUTH_DELEGATION_ROLE_ID
                       );
Line: 433

  x_last_update_date       in varchar2 default NULL,
  X_CUSTOM_MODE            in varchar2 default NULL
) is
  f_luby    number;  -- entity owner in file
Line: 437

  f_ludate  date;    -- entity update date in file
Line: 439

  db_ludate date;    -- entity update date in db
Line: 446

     f_ludate := nvl(to_date(x_last_update_date, 'YYYY/MM/DD'), sysdate);
Line: 451

      select LAST_UPDATED_BY, LAST_UPDATE_DATE
      into db_luby, db_ludate
      FROM JTF_UM_SUBSCRIPTIONS_TL
      where userenv('LANG') in (LANGUAGE, SOURCE_LANG)
            and SUBSCRIPTION_ID = X_SUBSCRIPTION_ID;
Line: 459

          update JTF_UM_SUBSCRIPTIONS_TL set
        	SUBSCRIPTION_NAME   = X_SUBSCRIPTION_NAME,
        	DESCRIPTION       = X_DESCRIPTION,
        	LAST_UPDATE_DATE  = f_ludate,
        	LAST_UPDATED_BY   = f_luby,
        	LAST_UPDATE_LOGIN = 0,
        	SOURCE_LANG       = userenv('LANG')
          where userenv('LANG') in (LANGUAGE, SOURCE_LANG)
  	        and SUBSCRIPTION_ID = X_SUBSCRIPTION_ID;
Line: 474

CURSOR C IS SELECT SUBSCRIPTION_ID FROM JTF_UM_SUBSCRIPTION_TMPL WHERE SUBSCRIPTION_ID = X_SUBSCRIPTION_ID AND TEMPLATE_ID = X_TEMPLATE_ID AND (EFFECTIVE_END_DATE IS NULL OR EFFECTIVE_END_DATE > SYSDATE);
Line: 492

   UPDATE JTF_UM_SUBSCRIPTION_TMPL SET
   EFFECTIVE_END_DATE = SYSDATE,
   LAST_UPDATED_BY=FND_GLOBAL.USER_ID,
   LAST_UPDATE_DATE= SYSDATE
   WHERE SUBSCRIPTION_ID = X_SUBSCRIPTION_ID ;
Line: 506

   X_LAST_UPDATED_BY IN NUMBER DEFAULT FND_GLOBAL.USER_ID
) is
begin

INSERT INTO JTF_UM_SUBSCRIPTION_TMPL(
            SUBSCRIPTION_ID,
	    TEMPLATE_ID,
	    EFFECTIVE_START_DATE,
	    EFFECTIVE_END_DATE,
	    CREATED_BY,
	    CREATION_DATE,
	    LAST_UPDATED_BY,
	    LAST_UPDATE_DATE)
      VALUES(
             X_SUBSCRIPTION_ID,
	     X_TEMPLATE_ID,
	     X_EFFECTIVE_START_DATE,
	     X_EFFECTIVE_END_DATE,
	     X_CREATED_BY,
	     SYSDATE,
	     X_LAST_UPDATED_BY,
	     SYSDATE
	     );
Line: 545

procedure UPDATE_TEMPLATE_ASSIGNMENT(
   X_SUBSCRIPTION_ID IN NUMBER,
   X_TEMPLATE_ID IN NUMBER,
   X_EFFECTIVE_START_DATE IN DATE,
   X_EFFECTIVE_END_DATE IN DATE,
   X_LAST_UPDATE_DATE IN DATE,
   X_LAST_UPDATED_BY IN NUMBER,
   X_LAST_UPDATE_LOGIN IN NUMBER
) is
begin
	update JTF_UM_SUBSCRIPTION_TMPL
	set EFFECTIVE_END_DATE=X_EFFECTIVE_END_DATE,
	    LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
	    LAST_UPDATED_BY = X_LAST_UPDATED_BY,
	    LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
	where  SUBSCRIPTION_ID = X_SUBSCRIPTION_ID
	and    TEMPLATE_ID = X_TEMPLATE_ID
	and    EFFECTIVE_START_DATE = X_EFFECTIVE_START_DATE;
Line: 564

end UPDATE_TEMPLATE_ASSIGNMENT;
Line: 572

    x_last_update_date       in varchar2 default NULL,
    X_CUSTOM_MODE            in varchar2 default NULL
)
is
        l_user_id NUMBER := fnd_load_util.owner_id(x_owner);
Line: 579

  f_ludate  date;    -- entity update date in file
Line: 581

  db_ludate date;    -- entity update date in db
Line: 588

        select count(*)
        into   h_record_exists
        from   jtf_UM_SUBSCRIPTION_TMPL
	where  SUBSCRIPTION_ID = X_SUBSCRIPTION_ID
	and    TEMPLATE_ID = X_TEMPLATE_ID
	and    EFFECTIVE_START_DATE = X_EFFECTIVE_START_DATE;
Line: 599

    f_ludate := nvl(to_date(x_last_update_date, 'YYYY/MM/DD'), sysdate);
Line: 602

	-- TRY update, and if it fails, insert

          if ( h_record_exists = 0 ) then
            CREATE_TEMPLATE_ASSIGNMENT(
                X_SUBSCRIPTION_ID       => X_SUBSCRIPTION_ID,
                X_TEMPLATE_ID           => X_TEMPLATE_ID,
                X_EFFECTIVE_START_DATE  => X_EFFECTIVE_START_DATE,
                X_EFFECTIVE_END_DATE    => X_EFFECTIVE_END_DATE,
                X_CREATED_BY            => f_luby,
                X_LAST_UPDATED_BY       => f_luby
             );
Line: 617

             select LAST_UPDATED_BY, LAST_UPDATE_DATE
               into db_luby, db_ludate
               FROM JTF_UM_SUBSCRIPTION_TMPL
              where SUBSCRIPTION_ID = X_SUBSCRIPTION_ID
	         and    TEMPLATE_ID = X_TEMPLATE_ID
	         and    EFFECTIVE_START_DATE = X_EFFECTIVE_START_DATE;
Line: 627

                    UPDATE_TEMPLATE_ASSIGNMENT(
                         X_SUBSCRIPTION_ID       => X_SUBSCRIPTION_ID,
                         X_TEMPLATE_ID           => X_TEMPLATE_ID,
                         X_EFFECTIVE_START_DATE  => X_EFFECTIVE_START_DATE,
			 X_EFFECTIVE_END_DATE    => X_EFFECTIVE_END_DATE,
			 X_LAST_UPDATE_DATE      => f_ludate,
                         X_LAST_UPDATED_BY       => f_luby,
                         X_LAST_UPDATE_LOGIN     => l_user_id
                      );
Line: 643

procedure INSERT_SUBREG_ROW (
  X_SUBSCRIPTION_ID in NUMBER,
  X_LAST_APPROVER_COMMENT in VARCHAR2,
  X_APPROVER_USER_ID in NUMBER,
  X_EFFECTIVE_END_DATE in DATE,
  X_WF_ITEM_TYPE in VARCHAR2,
  X_EFFECTIVE_START_DATE in DATE,
  X_SUBSCRIPTION_REG_ID out NOCOPY NUMBER,
  X_USER_ID in NUMBER,
  X_STATUS_CODE in VARCHAR2,
  X_CREATION_DATE in DATE,
  X_CREATED_BY in NUMBER,
  X_LAST_UPDATE_DATE in DATE,
  X_LAST_UPDATED_BY in NUMBER,
  X_LAST_UPDATE_LOGIN in NUMBER,
  X_GRANT_DELEGATION_FLAG in VARCHAR2

) is
begin
  insert into JTF_UM_SUBSCRIPTION_REG (
    LAST_APPROVER_COMMENT,
    APPROVER_USER_ID,
    EFFECTIVE_END_DATE,
    WF_ITEM_TYPE,
    EFFECTIVE_START_DATE,
    SUBSCRIPTION_REG_ID,
    SUBSCRIPTION_ID,
    USER_ID,
    STATUS_CODE,
    CREATION_DATE,
     CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN,
    GRANT_DELEGATION_FLAG
  ) values (
    X_LAST_APPROVER_COMMENT,
    X_APPROVER_USER_ID,
    X_EFFECTIVE_END_DATE,
    X_WF_ITEM_TYPE,
    X_EFFECTIVE_START_DATE,
    JTF_UM_UT_SUBSC_REG_S.NEXTVAL,
    X_SUBSCRIPTION_ID,
    X_USER_ID,
    X_STATUS_CODE,
    X_CREATION_DATE,
    X_CREATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN,
    X_GRANT_DELEGATION_FLAG
  ) RETURNING SUBSCRIPTION_REG_ID INTO X_SUBSCRIPTION_REG_ID;
Line: 695

end INSERT_SUBREG_ROW;
Line: 699

 * Name        :  update_grant_delegation_flag
 * Pre_reqs    :  None
 * Description :  Will update the information of the grant_delegation_flag
 * Parameters  :
 * input parameters
 * @param     p_subscription_reg_id
 *    description:  The subscription_reg_id of an enrollment
 *     required   :  Y
 *     validation :  Must be a valid subscription_id. The procedure will not do
 *                   any explicit validation.
 *   p_grant_delegation_flag:
 *     description:  The Boolean value of the grant_delegation_flag
 *     required   :  Y
 *     validation :  Should be true or false. The procedure will default it to
 *                   false, if null value is passed
 *
 * output parameters
 * None
 *
 * Notes:
 *
 *   The procedure will try to update the grant_delegation_flag based on the input values.
 *   If a procedure can not find any matching row, then it will not raise any exception
 *   but will not update any rows. It is caller's responsibility to make sure that
 *   the correct parameters are passed
 */
procedure update_grant_delegation_flag (
                       p_subscription_reg_id       in number,
                       p_grant_delegation_flag     in boolean
                                        ) is

l_procedure_name CONSTANT varchar2(30) := 'update_grant_delegation_flag';
Line: 752

     UPDATE JTF_UM_SUBSCRIPTION_REG SET GRANT_DELEGATION_FLAG = l_flag_value
     WHERE  SUBSCRIPTION_REG_ID = p_subscription_reg_id ;
Line: 759

end update_grant_delegation_flag;
Line: 762

 * Name        :  update_grant_delegation_flag
 * Pre_reqs    :  None
 * Description :  Will update the information of the grant_delegation_flag
 * Parameters  :
 * input parameters
 * @param     p_subscription_reg_id
 *    description:  The subscription_reg_id of an enrollment
 *     required   :  Y
 *     validation :  Must be a valid subscription_id. The procedure will not do
 *                   any explicit validation.
 *   p_grant_delegation_flag:
 *     description:  The Boolean equivallent int value of the grant_delegation_flag
 *     required   :  Y
 *     validation :  Should be 0 or 1. The procedure will default it to
 *                   0, if null value is passed
 *   p_grant_delegation_role:
 *     description:  The Boolean equivallent int value of the decision
 *                   whether to grant delegation role or not
 *     required   :  Y
 *     validation :  Should be 0 or 1. The procedure will default it to
 *                   0, if null value is passed
 *
 * output parameters
 * None
 *
 * Notes:
 *
 *   This procedure is create as wrapper procedure to pass boolean
 *   values, as JDBC cannot handle boolean !!!!!
 */
procedure update_grant_delegation_flag (
                       p_subscription_reg_id       in number,
                       p_grant_delegation_flag     in number,
                       p_grant_delegation_role     in number
                                        ) IS

l_procedure_name CONSTANT varchar2(30) := 'update_grant_delegation_flag';
Line: 801

CURSOR FIND_PRINCIPAL_NAME IS SELECT FU.USER_NAME, SUBREG.SUBSCRIPTION_ID
FROM FND_USER FU, JTF_UM_SUBSCRIPTION_REG SUBREG
WHERE FU.USER_ID = SUBREG.USER_ID
AND   SUBREG.SUBSCRIPTION_REG_ID = p_subscription_reg_id;
Line: 830

     UPDATE JTF_UM_SUBSCRIPTION_REG SET GRANT_DELEGATION_FLAG = l_flag_value
     WHERE  SUBSCRIPTION_REG_ID = p_subscription_reg_id ;
Line: 871

END update_grant_delegation_flag;
Line: 876

 * Name        :  update_grant_delegation_flag
 * Pre_reqs    :  None
 * Description :  Will update the information of the grant_delegation_flag
 * Parameters  :
 * input parameters
 * @param     p_subscription_reg_id
 *    description:  The subscription_reg_id of an enrollment
 *     required   :  Y
 *     validation :  Must be a valid subscription_id. The procedure will not do
 *                   any explicit validation.
 *   p_grant_delegation_flag:
 *     description:  The Boolean equivallent int value of the grant_delegation_flag
 *     required   :  Y
 *     validation :  Should be 0 or 1. The procedure will default it to
 *                   0, if null value is passed
 *
 * output parameters
 * None
 *
 * Notes:
 *
 *   This procedure is create as wrapper procedure to pass boolean
 *   values, as JDBC cannot handle boolean !!!!!
 */
procedure update_grant_delegation_flag (
                       p_subscription_reg_id       in number,
                       p_grant_delegation_flag     in number
                                        ) IS

l_procedure_name CONSTANT varchar2(30) := 'update_grant_delegation_flag';
Line: 925

   update_grant_delegation_flag (
                       p_subscription_reg_id   => p_subscription_reg_id,
                       p_grant_delegation_flag => l_grant_delegation_flag
                                        );
Line: 934

end update_grant_delegation_flag;
Line: 938

 * Name        :  update_grant_delegation_flag
 * Pre_reqs    :  None
 * Description :  Will update the information of the grant_delegation_flag
 * Parameters  :
 * input parameters
 * @param     p_subscription_id
 *    description:  The subscription_id of an enrollment
 *     required   :  Y
 *     validation :  Must be a valid subscription_id. The procedure will not do
 *                   any explicit validation.
 *   p_user_name:
 *     description:  The user_name of a user
 *     required   :  Y
 *     validation :  Must be a valid user_name.The procedure will not do
 *                   any explicit validation.
 *   p_grant_delegation_flag:
 *     description:  The Boolean value of the grant_delegation_flag
 *     required   :  Y
 *     validation :  Should be true or false. The procedure will default it to
 *                   false, if null value is passed
 *
 * output parameters
 * None
 *
 * Notes:
 *
 *   The procedure will try to update the grant_delegation_flag based on the input values.
 *   If a procedure can not find any matching row, then it will not raise any exception
 *   but will not update any rows. It is caller's responsibility to make sure that
 *   the correct parameters are passed
 */
procedure update_grant_delegation_flag (
                       p_subscription_id       in number,
                       p_user_name             in varchar2,
                       p_grant_delegation_flag in boolean
                                        ) is

l_procedure_name CONSTANT varchar2(30) := 'update_grant_delegation_flag';
Line: 977

CURSOR FIND_REG_ID IS SELECT SUBSCRIPTION_REG_ID
FROM JTF_UM_SUBSCRIPTION_REG SUBREG, FND_USER FU
WHERE  SUBSCRIPTION_ID = p_subscription_id
AND    SUBREG.USER_ID  = FU.USER_ID
AND    FU.USER_NAME    = p_user_name
AND    NVL(SUBREG.EFFECTIVE_END_DATE, SYSDATE+1) > SYSDATE;
Line: 1003

       update_grant_delegation_flag (
                       p_subscription_reg_id   => l_subscription_reg_id,
                       p_grant_delegation_flag => p_grant_delegation_flag
                                     );
Line: 1015

end update_grant_delegation_flag;
Line: 1018

 * Name        :  update_grant_delegation_flag
 * Pre_reqs    :  None
 * Description :  Will update the information of the grant_delegation_flag
 * Parameters  :
 * input parameters
 * @param     p_subscription_id
 *    description:  The subscription_id of an enrollment
 *     required   :  Y
 *     validation :  Must be a valid subscription_id. The procedure will not do
 *                   any explicit validation.
 *   p_user_name:
 *     description:  The user_name of a user
 *     required   :  Y
 *     validation :  Must be a valid user_name.The procedure will not do
 *                   any explicit validation.
 *   p_grant_delegation_flag:
 *     description:  The Boolean equivallent int value of the grant_delegation_flag
 *     required   :  Y
 *     validation :  Should be 0 or 1. The procedure will default it to
 *                   0, if null value is passed
 *
 * output parameters
 * None
 *
 * Notes:
 *
 *   This procedure is create as wrapper procedure to pass boolean
 *   values, as JDBC cannot handle boolean !!!!!
 */
procedure update_grant_delegation_flag (
                       p_subscription_id       in number,
                       p_user_name             in varchar2,
                       p_grant_delegation_flag in number
                                        ) IS

l_procedure_name CONSTANT varchar2(30) := 'update_grant_delegation_flag';
Line: 1073

   update_grant_delegation_flag (
                       p_subscription_id       => p_subscription_id,
                       p_user_name             => p_user_name,
                       p_grant_delegation_flag => l_grant_delegation_flag
                                        );
Line: 1084

end update_grant_delegation_flag;
Line: 1089

 * Name        :  update_grant_delegation_flag
 * Pre_reqs    :  None
 * Description :  Will update the information of the grant_delegation_flag
 * Parameters  :
 * input parameters
 * @param     p_subscription_id
 *    description:  The subscription_id of an enrollment
 *     required   :  Y
 *     validation :  Must be a valid subscription_id. The procedure will not do
 *                   any explicit validation.
 *   p_user_id:
 *     description:  The user_id of a user
 *     required   :  Y
 *     validation :  Must be a valid user_id.The procedure will not do
 *                   any explicit validation.
 *   p_grant_delegation_flag:
 *     description:  The Boolean value of the grant_delegation_flag
 *     required   :  Y
 *     validation :  Should be true or false. The procedure will default it to
 *                   false, if null value is passed
 *
 * output parameters
 * None
 *
 * Notes:
 *
 *   The procedure will try to update the grant_delegation_flag based on the input values.
 *   If a procedure can not find any matching row, then it will not raise any exception
 *   but will not update any rows. It is caller's responsibility to make sure that
 *   the correct parameters are passed
 */
procedure update_grant_delegation_flag (
                       p_subscription_id       in number,
                       p_user_id               in number,
                       p_grant_delegation_flag in boolean
                                        ) is

l_procedure_name CONSTANT varchar2(30) := 'update_grant_delegation_flag';
Line: 1127

CURSOR FIND_REG_ID IS SELECT SUBSCRIPTION_REG_ID
FROM JTF_UM_SUBSCRIPTION_REG SUBREG, FND_USER FU
WHERE  SUBSCRIPTION_ID = p_subscription_id
AND    SUBREG.USER_ID  = FU.USER_ID
AND    FU.USER_ID      = p_user_id
AND    NVL(SUBREG.EFFECTIVE_END_DATE, SYSDATE+1) > SYSDATE;
Line: 1153

       update_grant_delegation_flag (
                       p_subscription_reg_id   => l_subscription_reg_id,
                       p_grant_delegation_flag => p_grant_delegation_flag
                                     );
Line: 1165

end update_grant_delegation_flag;
Line: 1169

 * Name        :  update_grant_delegation_flag
 * Pre_reqs    :  None
 * Description :  Will update the information of the grant_delegation_flag
 * Parameters  :
 * input parameters
 * @param     p_subscription_id
 *    description:  The subscription_id of an enrollment
 *     required   :  Y
 *     validation :  Must be a valid subscription_id. The procedure will not do
 *                   any explicit validation.
 *   p_user_id:
 *     description:  The user_id of a user
 *     required   :  Y
 *     validation :  Must be a valid user_id.The procedure will not do
 *                   any explicit validation.
 *   p_grant_delegation_flag:
 *     description:  The Boolean equivallent int value of the grant_delegation_flag
 *     required   :  Y
 *     validation :  Should be 0 or 1. The procedure will default it to
 *                   0, if null value is passed
 *
 * output parameters
 * None
 *
 * Notes:
 *
 *   This procedure is create as wrapper procedure to pass boolean
 *   values, as JDBC cannot handle boolean !!!!!
 */

procedure update_grant_delegation_flag (
                       p_subscription_id       in number,
                       p_user_id               in number,
                       p_grant_delegation_flag in number
                                        ) IS

l_procedure_name CONSTANT varchar2(30) := 'update_grant_delegation_flag';
Line: 1219

   update_grant_delegation_flag (
                       p_subscription_id       => p_subscription_id,
                       p_user_id               => p_user_id,
                       p_grant_delegation_flag => l_grant_delegation_flag
                                        );
Line: 1230

end update_grant_delegation_flag;
Line: 1259

l_procedure_name CONSTANT varchar2(30) := 'update_grant_delegation_flag';
Line: 1261

CURSOR FIND_DELEGATION_ROLE IS SELECT AUTH_DELEGATION_ROLE_ID FROM JTF_UM_SUBSCRIPTIONS_B
WHERE SUBSCRIPTION_ID = p_subscription_id;
Line: 1334

CURSOR FIND_DELEGATION_FLAG IS SELECT GRANT_DELEGATION_FLAG FROM JTF_UM_SUBSCRIPTION_REG
WHERE SUBSCRIPTION_ID = p_subscription_id AND USER_ID = p_user_id
AND NVL(EFFECTIVE_END_DATE, SYSDATE+1) > SYSDATE;