1: package body JTF_UM_ENROLLMENT_CREDENTIALS as
2: /* $Header: JTFUMECB.pls 120.2 2005/10/29 03:45:13 snellepa ship $ */
3:
4: MODULE_NAME CONSTANT VARCHAR2(50) := 'JTF.UM.PLSQL.JTF_UM_ENROLLMENT_CREDENTIALS';
5: l_is_debug_parameter_on boolean := JTF_DEBUG_PUB.IS_LOG_PARAMETERS_ON(MODULE_NAME);
6:
7: PROCEDURE REVOKE_RESPONSIBILITY
8: (
9: X_USER_ID NUMBER,
159: AND EFFECTIVE_START_DATE < SYSDATE;
160:
161: BEGIN
162:
163: JTF_DEBUG_PUB.LOG_ENTERING_METHOD( p_module => MODULE_NAME,
164: p_message => l_procedure_name
165: );
166:
167: if l_is_debug_parameter_on then
164: p_message => l_procedure_name
165: );
166:
167: if l_is_debug_parameter_on then
168: JTF_DEBUG_PUB.LOG_PARAMETERS( p_module => MODULE_NAME,
169: p_message => 'X_USER_NAME:' || X_USER_NAME || '+' || 'X_USER_ID:' || X_USER_ID || '+' || 'X_SUBSCRIPTION_ID:' || X_SUBSCRIPTION_ID
170: );
171: end if;
172:
280: END IF;
281:
282: END IF;
283:
284: JTF_DEBUG_PUB.LOG_EXITING_METHOD( p_module => MODULE_NAME,
285: p_message => l_procedure_name
286: );
287:
288:
370:
371: begin
372:
373: -- Log the entering
374: JTF_DEBUG_PUB.LOG_ENTERING_METHOD (MODULE_NAME, METHOD_NAME);
375:
376: -- Log parameters
377: if l_is_debug_parameter_on then
378: JTF_DEBUG_PUB.LOG_PARAMETERS (MODULE_NAME || '.' || METHOD_NAME,
374: JTF_DEBUG_PUB.LOG_ENTERING_METHOD (MODULE_NAME, METHOD_NAME);
375:
376: -- Log parameters
377: if l_is_debug_parameter_on then
378: JTF_DEBUG_PUB.LOG_PARAMETERS (MODULE_NAME || '.' || METHOD_NAME,
379: 'p_user_id=' || p_user_id);
380: JTF_DEBUG_PUB.LOG_PARAMETERS (MODULE_NAME || '.' || METHOD_NAME,
381: 'p_username=' || p_username);
382: JTF_DEBUG_PUB.LOG_PARAMETERS (MODULE_NAME || '.' || METHOD_NAME,
376: -- Log parameters
377: if l_is_debug_parameter_on then
378: JTF_DEBUG_PUB.LOG_PARAMETERS (MODULE_NAME || '.' || METHOD_NAME,
379: 'p_user_id=' || p_user_id);
380: JTF_DEBUG_PUB.LOG_PARAMETERS (MODULE_NAME || '.' || METHOD_NAME,
381: 'p_username=' || p_username);
382: JTF_DEBUG_PUB.LOG_PARAMETERS (MODULE_NAME || '.' || METHOD_NAME,
383: 'p_usertype_id=' || p_usertype_id);
384: JTF_DEBUG_PUB.LOG_PARAMETERS (MODULE_NAME || '.' || METHOD_NAME,
378: JTF_DEBUG_PUB.LOG_PARAMETERS (MODULE_NAME || '.' || METHOD_NAME,
379: 'p_user_id=' || p_user_id);
380: JTF_DEBUG_PUB.LOG_PARAMETERS (MODULE_NAME || '.' || METHOD_NAME,
381: 'p_username=' || p_username);
382: JTF_DEBUG_PUB.LOG_PARAMETERS (MODULE_NAME || '.' || METHOD_NAME,
383: 'p_usertype_id=' || p_usertype_id);
384: JTF_DEBUG_PUB.LOG_PARAMETERS (MODULE_NAME || '.' || METHOD_NAME,
385: 'p_enrollment_id=' || p_enrollment_id);
386: JTF_DEBUG_PUB.LOG_PARAMETERS (MODULE_NAME || '.' || METHOD_NAME,
380: JTF_DEBUG_PUB.LOG_PARAMETERS (MODULE_NAME || '.' || METHOD_NAME,
381: 'p_username=' || p_username);
382: JTF_DEBUG_PUB.LOG_PARAMETERS (MODULE_NAME || '.' || METHOD_NAME,
383: 'p_usertype_id=' || p_usertype_id);
384: JTF_DEBUG_PUB.LOG_PARAMETERS (MODULE_NAME || '.' || METHOD_NAME,
385: 'p_enrollment_id=' || p_enrollment_id);
386: JTF_DEBUG_PUB.LOG_PARAMETERS (MODULE_NAME || '.' || METHOD_NAME,
387: 'p_delegate_flag=' || p_delegate_flag);
388: JTF_DEBUG_PUB.LOG_PARAMETERS (MODULE_NAME || '.' || METHOD_NAME,
382: JTF_DEBUG_PUB.LOG_PARAMETERS (MODULE_NAME || '.' || METHOD_NAME,
383: 'p_usertype_id=' || p_usertype_id);
384: JTF_DEBUG_PUB.LOG_PARAMETERS (MODULE_NAME || '.' || METHOD_NAME,
385: 'p_enrollment_id=' || p_enrollment_id);
386: JTF_DEBUG_PUB.LOG_PARAMETERS (MODULE_NAME || '.' || METHOD_NAME,
387: 'p_delegate_flag=' || p_delegate_flag);
388: JTF_DEBUG_PUB.LOG_PARAMETERS (MODULE_NAME || '.' || METHOD_NAME,
389: 'p_approval_id=' || p_approval_id);
390:
384: JTF_DEBUG_PUB.LOG_PARAMETERS (MODULE_NAME || '.' || METHOD_NAME,
385: 'p_enrollment_id=' || p_enrollment_id);
386: JTF_DEBUG_PUB.LOG_PARAMETERS (MODULE_NAME || '.' || METHOD_NAME,
387: 'p_delegate_flag=' || p_delegate_flag);
388: JTF_DEBUG_PUB.LOG_PARAMETERS (MODULE_NAME || '.' || METHOD_NAME,
389: 'p_approval_id=' || p_approval_id);
390:
391: end if;
392: -- get the workflow itemtype from jtf_um_approvals_b table
397: -- approval required
398: open get_wf_item_type;
399: fetch get_wf_item_type into l_wf_item_type;
400: if (get_wf_item_type%notfound) then
401: JTF_DEBUG_PUB.LOG_EXCEPTION (MODULE_NAME || '.' || METHOD_NAME, 'Workflow itemtype is missing for approval id ' || p_approval_id);
402: close get_wf_item_type;
403: raise_application_error (-20000, 'Workflow itemtype is missing for approval id ' || p_approval_id);
404: end if;
405: close get_wf_item_type;
425:
426: open get_user_usertype_status;
427: fetch get_user_usertype_status into l_usertype_status;
428: if (get_user_usertype_status%notfound) then
429: JTF_DEBUG_PUB.LOG_EXCEPTION (MODULE_NAME || '.' || METHOD_NAME, 'Usertype status is missing for ' || p_username);
430: close get_user_usertype_status;
431: raise_application_error (-20000, 'Usertype status is missing for ' || p_username);
432: end if;
433: close get_user_usertype_status;
456: requestRegID => x_enrollment_reg_id);
457: end if;
458: end if;
459:
460: JTF_DEBUG_PUB.LOG_EXITING_METHOD (MODULE_NAME, METHOD_NAME);
461:
462: end assign_user_enrollment;
463:
464: END JTF_UM_ENROLLMENT_CREDENTIALS;