227: LOOP
228: FETCH SUBSCRIPTION_ROLES INTO p_principal_name;
229: EXIT WHEN SUBSCRIPTION_ROLES%NOTFOUND;
230:
231: JTF_AUTH_BULKLOAD_PKG.ASSIGN_ROLE
232: ( USER_NAME => X_USER_NAME,
233: ROLE_NAME => p_principal_name,
234: OWNERTABLE_NAME => 'JTF_UM_SUBSCRIPTIONS_B',
235: OWNERTABLE_KEY => X_SUBSCRIPTION_ID);
271: );
272:
273: -- Assign the deleagtion access role
274:
275: JTF_AUTH_BULKLOAD_PKG.ASSIGN_ROLE
276: ( USER_NAME => X_USER_NAME,
277: ROLE_NAME => 'JTA_UM_DELEGATION_ACCESS',
278: OWNERTABLE_NAME => 'JTF_UM_SUBSCRIPTIONS_B',
279: OWNERTABLE_KEY => X_SUBSCRIPTION_ID);