[Home] [Help]
563: FOR i IN 1..l_verify_access.count LOOP
564:
565: l_reg_access_verify_id := null;
566:
567: ARI_REG_VERIFICATIONS_PKG.Insert_Row(
568: x_rowid => l_rowid,
569: x_client_ip_address => p_client_ip_address,
570: x_question => l_verify_access(i).question,
571: x_expected_answer => l_verify_access(i).expected_answer,
640: IF (PG_DEBUG = 'Y') THEN
641: arp_standard.debug(l_debug_info);
642: END IF;
643:
644: DELETE FROM ARI_REG_VERIFICATIONS_GT;
645:
646: COMMIT;
647:
648: ----------------------------------------------------------------------------------------
715: FOR i IN 1..l_verify_access.count LOOP
716:
717: l_reg_access_verify_id := null;
718:
719: ARI_REG_VERIFICATIONS_PKG.Insert_Row(
720: x_rowid => l_rowid,
721: x_client_ip_address => p_client_ip_address,
722: x_question => l_verify_access(i).question,
723: x_expected_answer => l_verify_access(i).expected_answer,
780: p_reg_access_verify_id IN NUMBER)
781: RETURN VARCHAR2
782: ---------------------------------------------------------------------------
783: IS
784: l_expected_answer ari_reg_verifications_gt.expected_answer%type;
785: l_return VARCHAR2(5);
786: BEGIN
787:
788: BEGIN
787:
788: BEGIN
789: select expected_answer
790: into l_expected_answer
791: from ari_reg_verifications_gt
792: where reg_access_verify_id = p_reg_access_verify_id;
793: END;
794:
795: IF l_expected_answer = to_char(p_answer) THEN
855: IF (PG_DEBUG = 'Y') THEN
856: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');
857: END IF;
858: /* Added the below queries to fetch the user name and site_use_id for deleting
859: the record from ari_reg_verifications when access is removed for the selected location for Bug 13869981 */
860: ---------------------------------------------------------------------
861: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
862: l_debug_info := 'InsideRemoveRole'||p_person_party_id||' '||p_customer_id||p_cust_acct_site_id;
863: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,l_debug_info);
878: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
879: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'InsideRemoveRole'||l_user_name||l_site_use_id);
880: end if;
881: -------------------------------------------------------------------------
882: delete from ARI_REG_VERIFICATIONS
883: WHERE UPPER(user_email_addr) = UPPER(l_user_name)
884: AND application_code = 'ARI'
885: AND access_domain_cust_id = p_customer_id
886: AND (access_domain_billto_id is null or access_domain_billto_id = nvl(l_site_use_id,-1))
3029:
3030: -- This function is called on the event 'oracle.apps.ar.irec.accountrequest.notification.start'
3031: -- To ensure that the status has been updated to Rejected
3032: -- This function is called on the event 'oracle.apps.ar.irec.accountrequest.notification.start'
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,
3415: --------------------------------------------------------------------
3416: IF (p_mode = G_CUST_ACCT_HOLD) THEN
3417: OPEN p_registration_cur FOR
3418: SELECT trunc(sysdate - max(last_update_date))
3419: FROM ARI_REG_VERIFICATIONS
3420: WHERE access_domain_cust_id = p_cust_account_id
3421: AND application_code = p_application_code
3422: AND status = G_HOLD;
3423:
3424: ELSIF (p_mode = G_USER_HOLD) THEN
3425:
3426: OPEN p_registration_cur FOR
3427: SELECT trunc(sysdate - max(last_update_date))
3428: FROM ARI_REG_VERIFICATIONS
3429: WHERE UPPER(user_email_addr) = UPPER(p_user_name)
3430: AND application_code = p_application_code
3431: AND status = G_HOLD;
3432:
3432:
3433: ELSIF (p_mode = G_BILLTO_SITE_HOLD) THEN
3434: OPEN p_registration_cur FOR
3435: SELECT trunc(sysdate - max(last_update_date))
3436: FROM ARI_REG_VERIFICATIONS
3437: WHERE access_domain_cust_id = p_cust_account_id
3438: AND access_domain_billto_id = p_billto_id
3439: AND application_code = p_application_code
3440: AND status = G_HOLD;
3442: ELSIF (p_mode = G_USER_REG_COUNT) THEN
3443:
3444: OPEN p_registration_cur FOR
3445: SELECT count(*)
3446: FROM ARI_REG_VERIFICATIONS
3447: WHERE UPPER(user_email_addr) = UPPER(p_user_name)
3448: AND application_code = p_application_code
3449: AND access_domain_cust_id = p_cust_account_id
3450: AND status = 'COMPLETE';
3457: access_domain_cust_id,
3458: status,
3459: company_id,
3460: trunc(sysdate - last_update_date)
3461: FROM ARI_REG_VERIFICATIONS
3462: WHERE UPPER(user_email_addr) = UPPER(p_user_name)
3463: AND access_domain_cust_id = p_cust_account_id
3464: AND (access_domain_billto_id is null or access_domain_billto_id = nvl(p_billto_id,-1))
3465: AND application_code = p_application_code
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;
4038: COMMIT;
4039: p_result := 'COMPLETE';
4040: RETURN;
4041: END IF;
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;
4136: COMMIT;
4137: p_result := 'COMPLETE';
4138: RETURN;
4139: END IF;