2725: SELECT UMX_REG_REQUESTS_S.nextval INTO l_item_key FROM dual;
2726:
2727: IF (l_approval_profile='Y') THEN
2728:
2729: WF_ENGINE.CREATEPROCESS('ARIADDAC',
2730: l_item_key,
2731: 'ADD_ACCESS_ACCOUNT_REQUEST');
2732:
2733: /*------------------------------------------------------------------+
2732:
2733: /*------------------------------------------------------------------+
2734: | Set the Person_party_id |
2735: +------------------------------------------------------------------*/
2736: WF_ENGINE.SetItemAttrText('ARIADDAC',
2737: l_item_key,
2738: 'PERSON_PARTY_ID',
2739: p_person_party_id);
2740:
2738: 'PERSON_PARTY_ID',
2739: p_person_party_id);
2740:
2741:
2742: WF_ENGINE.SetItemAttrText('ARIADDAC',
2743: l_item_key,
2744: 'ACCOUNT_NUMBER',
2745: p_req_acc_no);
2746:
2743: l_item_key,
2744: 'ACCOUNT_NUMBER',
2745: p_req_acc_no);
2746:
2747: WF_ENGINE.SetItemAttrText('ARIADDAC',
2748: l_item_key,
2749: 'CUSTOMER_NAME',
2750: p_req_cust_name);
2751: WF_ENGINE.SetItemAttrText('ARIADDAC',
2747: WF_ENGINE.SetItemAttrText('ARIADDAC',
2748: l_item_key,
2749: 'CUSTOMER_NAME',
2750: p_req_cust_name);
2751: WF_ENGINE.SetItemAttrText('ARIADDAC',
2752: l_item_key,
2753: 'CUSTOMER_LOCATION',
2754: p_req_location);
2755:
2755:
2756: /*------------------------------------------------------------------+
2757: | Set the Person_party_id |
2758: +------------------------------------------------------------------*/
2759: WF_ENGINE.SetItemAttrText('ARIADDAC',
2760: l_item_key,
2761: 'CUSTOMER_ID',
2762: p_customer_id);
2763:
2763:
2764: /*------------------------------------------------------------------+
2765: | Set the Person_party_id |
2766: +------------------------------------------------------------------*/
2767: WF_ENGINE.SetItemAttrText('ARIADDAC',
2768: l_item_key,
2769: 'CUSTOMER_SITE_USE_ID',
2770: p_cust_site_use_id);
2771:
2771:
2772: /*------------------------------------------------------------------+
2773: | Set the Person_party_id |
2774: +------------------------------------------------------------------*/
2775: WF_ENGINE.SetItemAttrText('ARIADDAC',
2776: l_item_key,
2777: 'REG_SERVICE_TYPE',
2778: 'ARI_ADD_CUST_ACCESS');
2779:
2779:
2780: /*------------------------------------------------------------------+
2781: | Set the Person_party_id |
2782: +------------------------------------------------------------------*/
2783: WF_ENGINE.SetItemAttrText('ARIADDAC',
2784: l_item_key,
2785: 'CUST_ACCT_TYPE',
2786: p_cust_acct_type);
2787:
2787:
2788: /*------------------------------------------------------------------+
2789: | Set the Person_party_id |
2790: +------------------------------------------------------------------*/
2791: WF_ENGINE.SetItemAttrText('ARIADDAC',
2792: l_item_key,
2793: 'FIRST_NAME',
2794: p_first_name);
2795:
2795:
2796: /*------------------------------------------------------------------+
2797: | Set the Person_party_id |
2798: +------------------------------------------------------------------*/
2799: WF_ENGINE.SetItemAttrText('ARIADDAC',
2800: l_item_key,
2801: 'LAST_NAME',
2802: p_last_name);
2803:
2803:
2804: /*------------------------------------------------------------------+
2805: | Set the Person_party_id |
2806: +------------------------------------------------------------------*/
2807: WF_ENGINE.SetItemAttrText('ARIADDAC',
2808: l_item_key,
2809: 'MIDDLE_NAME',
2810: p_middle_name);
2811:
2812:
2813: /*------------------------------------------------------------------+
2814: | Set the Person_party_id |
2815: +------------------------------------------------------------------*/
2816: WF_ENGINE.SetItemAttrText('ARIADDAC',
2817: l_item_key,
2818: 'PRE_NAME_ADJUNCT',
2819: p_pre_name_adjunct);
2820:
2820:
2821: /*------------------------------------------------------------------+
2822: | Set the Person_party_id |
2823: +------------------------------------------------------------------*/
2824: WF_ENGINE.SetItemAttrText('ARIADDAC',
2825: l_item_key,
2826: 'PERSON_SUFFIX',
2827: p_person_suffix);
2828:
2828:
2829: /*------------------------------------------------------------------+
2830: | Set the Person_party_id |
2831: +------------------------------------------------------------------*/
2832: WF_ENGINE.SetItemAttrText('ARIADDAC',
2833: l_item_key,
2834: 'REQUESTED_USERNAME',
2835: l_user_name);
2836:
2835: l_user_name);
2836:
2837:
2838:
2839: WF_ENGINE.SetItemAttrText('ARIADDAC',
2840: l_item_key,
2841: 'FND_USER',
2842: l_user_name);
2843:
2844: /*------------------------------------------------------------------+
2845: | Set the Person_party_id |
2846: +------------------------------------------------------------------*/
2847: SELECT UMX_REG_REQUESTS_S.nextval INTO l_event_key FROM dual;
2848: WF_ENGINE.SetItemAttrText('ARIADDAC',
2849: l_item_key,
2850: 'EVENT_KEY',
2851: l_event_key);
2852:
2849: l_item_key,
2850: 'EVENT_KEY',
2851: l_event_key);
2852:
2853: WF_ENGINE.setitemattrevent ('ARIADDAC',
2854: l_item_key,
2855: 'ADD_ACCESS_DATA',
2856: l_event);
2857: ARI_REG_VERIFY_PKG.Update_Row(x_Registration_id => p_registration_id,
2863: -----------------------------------------------------------------------------------------
2864: IF (PG_DEBUG = 'Y') THEN
2865: arp_standard.debug(l_debug_info);
2866: END IF;
2867: WF_ENGINE.STARTPROCESS('ARIADDAC',
2868: l_item_key);
2869:
2870: ELSE
2871: wf_event.raise(l_event_name,l_item_key,null,l_parameter_list,sysdate);
3033: -- To ensure that the status has been updated to Complete or Rejected in the ARI_REG_VERIFICATIONS table
3034: l_registration_id := p_event.getvalueforparameter('REGISTRATION_ID');
3035: l_item_key := p_event.getvalueforparameter('UMX_PARENT_ITEM_KEY');
3036: l_item_type := p_event.getvalueforparameter ('UMX_PARENT_ITEM_TYPE');
3037: l_approval_result := wf_engine.getitemattrtext(itemtype => l_item_type,
3038: itemkey => l_item_key,
3039: aname => 'APPROVAL_RESULT',
3040: ignore_notfound => false);
3041: -----------------------------------------------------------------------------
3931:
3932: ---------------------------------------------------------------------------
3933: l_debug_info := 'Set Login Url to access current application';
3934: ----------------------------------------------------------------------------
3935: WF_ENGINE.SetItemAttrText(p_itemtype,
3936: p_itemkey,
3937: 'APPLICATION_URL',
3938: l_url);
3939:
4029:
4030: -------------------------------------------------------
4031: l_debug_info := 'Set Approval Result Item Attribute';
4032: -------------------------------------------------------
4033: WF_ENGINE.SetItemAttrText(p_itemtype,
4034: p_itemkey,
4035: 'APPROVAL_RESULT',
4036: 'COMPLETE');
4037: UPDATE ARI_REG_VERIFICATIONS SET STATUS = 'COMPLETE', LAST_UPDATE_DATE = sysdate WHERE WF_ITEM_KEY = p_itemkey;
4127:
4128: -------------------------------------------------------
4129: l_debug_info := 'Set Approval Result Item Attribute';
4130: -------------------------------------------------------
4131: WF_ENGINE.SetItemAttrText(p_itemtype,
4132: p_itemkey,
4133: 'APPROVAL_RESULT',
4134: 'REJECTED');
4135: UPDATE ARI_REG_VERIFICATIONS SET STATUS = 'REJECTED', LAST_UPDATE_DATE = sysdate WHERE WF_ITEM_KEY = p_itemkey;