61: BEGIN
62:
63: -- fnd_global.apps_initialize(1007888,22372,671);
64:
65: IBE_UTIL.debug('Inside postRejection procedure');
66: IBE_UTIL.debug('l_Key is '|| l_key);
67:
68: -- Check for the event and get the required WF parameters
69:
62:
63: -- fnd_global.apps_initialize(1007888,22372,671);
64:
65: IBE_UTIL.debug('Inside postRejection procedure');
66: IBE_UTIL.debug('l_Key is '|| l_key);
67:
68: -- Check for the event and get the required WF parameters
69:
70: IBE_UTIL.debug('Getting wf params');
66: IBE_UTIL.debug('l_Key is '|| l_key);
67:
68: -- Check for the event and get the required WF parameters
69:
70: IBE_UTIL.debug('Getting wf params');
71: l_userreg_id := p_event.getValueForParameter(G_USERTYPEREG_ID);
72: l_usertype_key := p_event.getValueForParameter(G_USERTYPE_KEY);
73: l_usertype_appId := p_event.getValueForParameter(G_USERTYPE_APPID);
74: l_party_id := p_event.getValueForParameter(G_USER_CUSTOMER_ID);
71: l_userreg_id := p_event.getValueForParameter(G_USERTYPEREG_ID);
72: l_usertype_key := p_event.getValueForParameter(G_USERTYPE_KEY);
73: l_usertype_appId := p_event.getValueForParameter(G_USERTYPE_APPID);
74: l_party_id := p_event.getValueForParameter(G_USER_CUSTOMER_ID);
75: IBE_UTIL.debug('l_userreg_id=' || l_userreg_id || 'l_usertype_key=' || l_usertype_key || 'l_usertype_appId=' || l_usertype_appId || 'l_party_id=' || l_party_id);
76:
77: -- Skip inactivation if username is not released
78:
79: OPEN C_get_user_id(l_userreg_id);
81: CLOSE C_get_user_id;
82:
83: IF (l_user_id is null) THEN
84:
85: IBE_UTIL.debug('l_user_id is released. Hence continue to inactivate contact details');
86:
87: IF (l_usertype_appId = '671' or l_usertype_appId = '672') THEN
88:
89: -- Skip inactivation for partial registrations
89: -- Skip inactivation for partial registrations
90: -- If l_usertype_key is not in Partial_register_usertypes_lookUp Then
91:
92: l_usertype_partial := getIsPartialRegistrationUser(l_userreg_id);
93: IBE_UTIL.debug('l_usertype_partial=' || l_usertype_partial);
94:
95: If l_usertype_partial = FND_API.G_TRUE Then
96: RETURN 'SUCCESS';
97: Else
101: FETCH C_get_party_id into l_party_id;
102: CLOSE C_get_party_id;
103: */
104:
105: IBE_UTIL.debug('l_party_id=' || l_party_id);
106:
107: If l_party_id = null Then
108: RETURN 'SUCCESS';
109: End If;
110:
111: -- For B2B, decide if Company shall also be inactivated?
112: l_change_org_status:=getIsUserCompanyToBeExpired(l_party_id);
113:
114: IBE_UTIL.debug('l_change_org_status=' || l_change_org_status);
115:
116: IBE_UTIL.debug('Calling Inactivation API');
117: -- Call inactivation API
118: ibe_party_v2pvt.Update_Party_Status(
112: l_change_org_status:=getIsUserCompanyToBeExpired(l_party_id);
113:
114: IBE_UTIL.debug('l_change_org_status=' || l_change_org_status);
115:
116: IBE_UTIL.debug('Calling Inactivation API');
117: -- Call inactivation API
118: ibe_party_v2pvt.Update_Party_Status(
119: p_party_id=>l_party_id,
120: p_party_status=>'I',
123: x_return_status=>l_return_status,
124: x_msg_count=>l_msg_count,
125: x_msg_data=>l_msg_data
126: ) ;
127: IBE_UTIL.debug('Called Inactivation API');
128:
129: -- If ERROR, propogate.
130: If l_return_status = FND_API.G_RET_STS_ERROR Then
131: WF_CORE.CONTEXT('IBE', 'postRejection',
139:
140: -- If Partner Usertype, call PRM API using dynamic sql, through dbms_sql
141:
142: l_usertype_partner := getIsPartnerUser(l_userreg_id);
143: IBE_UTIL.debug('l_usertype_partner=' || l_usertype_partner);
144:
145: If l_usertype_partner = FND_API.G_TRUE Then
146:
147: DBMS_SQL.PARSE (cur,
158: DBMS_SQL.VARIABLE_VALUE (cur, 'x_returnstatus', x_prm_return_status);
159: DBMS_SQL.VARIABLE_VALUE (cur, 'x_msgcount', x_prm_msg_count);
160: DBMS_SQL.VARIABLE_VALUE (cur, 'x_msgdata', x_prm_msg_data);
161:
162: IBE_UTIL.debug('x_prm_return_status ' || x_prm_return_status);
163: IBE_UTIL.debug('x_prm_msg_count ' || to_char(x_prm_msg_count));
164: IBE_UTIL.debug('x_prm_msg_data ' || x_prm_msg_data);
165:
166: If x_prm_return_status = FND_API.G_FALSE Then
159: DBMS_SQL.VARIABLE_VALUE (cur, 'x_msgcount', x_prm_msg_count);
160: DBMS_SQL.VARIABLE_VALUE (cur, 'x_msgdata', x_prm_msg_data);
161:
162: IBE_UTIL.debug('x_prm_return_status ' || x_prm_return_status);
163: IBE_UTIL.debug('x_prm_msg_count ' || to_char(x_prm_msg_count));
164: IBE_UTIL.debug('x_prm_msg_data ' || x_prm_msg_data);
165:
166: If x_prm_return_status = FND_API.G_FALSE Then
167: DBMS_SQL.CLOSE_CURSOR (cur);
160: DBMS_SQL.VARIABLE_VALUE (cur, 'x_msgdata', x_prm_msg_data);
161:
162: IBE_UTIL.debug('x_prm_return_status ' || x_prm_return_status);
163: IBE_UTIL.debug('x_prm_msg_count ' || to_char(x_prm_msg_count));
164: IBE_UTIL.debug('x_prm_msg_data ' || x_prm_msg_data);
165:
166: If x_prm_return_status = FND_API.G_FALSE Then
167: DBMS_SQL.CLOSE_CURSOR (cur);
168: IBE_UTIL.debug('Returning ERROR due to PRM');
164: IBE_UTIL.debug('x_prm_msg_data ' || x_prm_msg_data);
165:
166: If x_prm_return_status = FND_API.G_FALSE Then
167: DBMS_SQL.CLOSE_CURSOR (cur);
168: IBE_UTIL.debug('Returning ERROR due to PRM');
169: WF_CORE.CONTEXT('IBE', 'postRejection',
170: p_event.getEventName(), p_subscription_guid);
171: WF_EVENT.setErrorInfo(p_event, 'ERROR due to PRM : x_prm_msg_data=' || x_prm_msg_data);
172: RETURN 'ERROR';
179: End If;
180:
181: END IF;
182: ELSE
183: IBE_UTIL.debug('l_user_id is not released. Hence skipping inactivation of contact details');
184: END IF;
185:
186: IBE_UTIL.debug('Returning SUCCESS');
187: RETURN 'SUCCESS';
182: ELSE
183: IBE_UTIL.debug('l_user_id is not released. Hence skipping inactivation of contact details');
184: END IF;
185:
186: IBE_UTIL.debug('Returning SUCCESS');
187: RETURN 'SUCCESS';
188:
189: EXCEPTION
190: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
274: BEGIN
275: OPEN C_check_user_type(l_usertype_group);
276: FETCH C_check_user_type into l_usertype_key;
277: IF C_check_user_type%NOTFOUND THEN
278: IBE_UTIL.debug('Not a partial registration type');
279: CLOSE C_check_user_type;
280: RETURN FND_API.G_FALSE;
281: END IF;
282:
279: CLOSE C_check_user_type;
280: RETURN FND_API.G_FALSE;
281: END IF;
282:
283: IBE_UTIL.debug('Is a partial registration type');
284: CLOSE C_check_user_type;
285: RETURN FND_API.G_TRUE;
286:
287: EXCEPTION
325: BEGIN
326: OPEN C_check_user_type(l_usertype_group);
327: FETCH C_check_user_type into l_usertype_key;
328: IF C_check_user_type%NOTFOUND THEN
329: IBE_UTIL.debug('Not a partner registration type');
330: CLOSE C_check_user_type;
331: RETURN FND_API.G_FALSE;
332: END IF;
333:
330: CLOSE C_check_user_type;
331: RETURN FND_API.G_FALSE;
332: END IF;
333:
334: IBE_UTIL.debug('Is a partner registration type');
335: CLOSE C_check_user_type;
336: RETURN FND_API.G_TRUE;
337:
338: EXCEPTION