[Home] [Help]
185:
186: select count(*) into l_count_msg_postmdt from iem_rt_proc_emails where rt_classification_id=p_class_ids_tbl(i);
187:
188: if l_count_msg_postmdt <> 0 then
189: select name into l_undeleted_class_name_1 from iem_route_classifications where route_classification_id=p_class_ids_tbl(i);
190: l_undeleted_class_name := l_undeleted_class_name||l_undeleted_class_name_1||', ';
191: else
192:
193: --First delete classification folder for all the email account that assoicated with this classification
201:
202:
203: --if (l_return_status = FND_API.G_RET_STS_ERROR) then
204:
205: -- select name into l_undeleted_class_name_1 from iem_route_classifications where route_classification_id=p_class_ids_tbl(i);
206:
207: -- l_undeleted_class_name := l_undeleted_class_name||l_undeleted_class_name_1||', ';
208:
209: --elsif (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
226: where be.route_classification_id=p_class_ids_tbl(i) and be.email_account_id = acct_id.email_account_id);
227: commit;
228: END LOOP;
229:
230: --finially delete from IEM_ROUTE_CLASSIFICATIONS, IEM_ACCOUNT_ROUTE_CLASS and IEM_ROUTE_CLASSIFICATIONS
231: UPDATE IEM_ROUTE_CLASSIFICATIONS
232: SET DELETED_FLAG='Y'
233: WHERE route_classification_id = p_class_ids_tbl(i);
234:
227: commit;
228: END LOOP;
229:
230: --finially delete from IEM_ROUTE_CLASSIFICATIONS, IEM_ACCOUNT_ROUTE_CLASS and IEM_ROUTE_CLASSIFICATIONS
231: UPDATE IEM_ROUTE_CLASSIFICATIONS
232: SET DELETED_FLAG='Y'
233: WHERE route_classification_id = p_class_ids_tbl(i);
234:
235: DELETE
329: l_api_name VARCHAR2(255):='create_item_wrap';
330:
331: l_api_version_number NUMBER:=1.0;
332:
333: l_class_id IEM_ROUTE_CLASSIFICATIONS.ROUTE_CLASSIFICATION_ID%TYPE;
334: l_class_rule_id IEM_ROUTE_CLASS_RULES.ROUTE_CLASS_RULE_ID%TYPE;
335: l_return_type VARCHAR2(30);
336:
337: l_userid NUMBER:=TO_NUMBER (FND_PROFILE.VALUE('USER_ID')) ;
539:
540: --begins here
541:
542: --check duplicate value for attribute Name
543: select count(*) into l_name_count from iem_route_classifications where UPPER(name) = UPPER(p_name) and deleted_flag='N';
544:
545: if l_name_count > 0 then
546: raise IEM_RT_CLASS_DUP_NAME;
547: end if;
579: IF FND_API.To_Boolean( p_is_sss ) THEN
580: G_CLASS_ID := 0;
581: ELSE
582: --get next sequential number for route_id
583: SELECT IEM_ROUTE_CLASSIFICATIONS_s1.nextval
584: INTO l_seq_id
585: FROM dual;
586:
587: G_CLASS_ID := l_seq_id;
586:
587: G_CLASS_ID := l_seq_id;
588: END IF;
589:
590: INSERT INTO IEM_ROUTE_CLASSIFICATIONS
591: (
592: ROUTE_CLASSIFICATION_ID,
593: NAME,
594: DESCRIPTION,
1013:
1014: --API Body
1015:
1016: --check if the route_id exist before update
1017: select count(*) into l_class from iem_route_classifications where route_classification_id = p_class_id;
1018:
1019:
1020: if l_class < 1 then
1021: raise IEM_NO_RT_CLASS_UPDATE;
1263: -- Initialize API return status to SUCCESS
1264: x_return_status := FND_API.G_RET_STS_SUCCESS;
1265:
1266: --check duplicate value for attribute Name
1267: /* select count(*) into l_name_count from iem_route_classifications where UPPER(name) = UPPER(p_name) and route_classification_id <> p_class_id;
1268:
1269:
1270:
1271: if l_name_count > 0 then
1318: else
1319: l_ruling_chain := ltrim(rtrim(p_ruling_chain));
1320: end if;
1321:
1322: update IEM_ROUTE_CLASSIFICATIONS
1323: set
1324: description=decode(l_description,FND_API.G_MISS_CHAR,description,l_description),
1325: boolean_type_code=decode(l_ruling_chain,FND_API.G_MISS_CHAR,boolean_type_code,l_ruling_chain),
1326: procedure_name=decode(l_proc_name,FND_API.G_MISS_CHAR,procedure_name,l_proc_name),
1641: x_return_status := FND_API.G_RET_STS_SUCCESS;
1642:
1643:
1644: -- check if the route_id exist in iem_routes
1645: select count(*) into l_class from iem_route_classifications
1646:
1647: where route_classification_id = p_class_id;
1648:
1649: if l_class < 1 then
1683: if (l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1684: raise IEM_RT_ClASS_ACCT_NOT_UPDATED;
1685: end if;
1686:
1687: select name into l_class_name from iem_route_classifications where route_classification_id = p_class_id;
1688:
1689: if ( l_class_name is null ) then
1690: l_class_name1 := null;
1691:
2213: x_return_status := FND_API.G_RET_STS_SUCCESS;
2214:
2215: -- Check For Existing IEM Server Group
2216: IF p_class_id <> FND_API.G_MISS_NUM THEN
2217: Select count(*) into l_class_cnt from iem_route_classifications
2218: where route_classification_id=p_class_id;
2219:
2220: IF l_class_cnt = 0 then
2221: raise IEM_RT_CLASS_NO_DATA;
2379: -- select count(*) into l_count_msg_postmdt from iem_post_mdts where rt_classification_id=p_class_ids_tbl(i) and email_account_id = p_account_id;
2380: select count(*) into l_count_msg_postmdt from iem_rt_proc_emails where rt_classification_id=p_class_ids_tbl(i) and email_account_id = p_account_id;
2381:
2382: if l_count_msg_postmdt <> 0 then
2383: select name into l_undeleted_class_name_1 from iem_route_classifications where route_classification_id=p_class_ids_tbl(i);
2384: l_undeleted_class_name := l_undeleted_class_name||l_undeleted_class_name_1||', ';
2385: else
2386:
2387: -- ***** Removed for 11i compliance *****
2397:
2398: --if ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2399: -- raise FND_API.G_EXC_UNEXPECTED_ERROR;
2400: --elsif (l_return_status = FND_API.G_RET_STS_ERROR) then
2401: -- select name into l_undeleted_class_name_1 from iem_route_classifications where route_classification_id=p_class_ids_tbl(i);
2402: -- l_undeleted_class_name := l_undeleted_class_name||l_undeleted_class_name_1||', ';
2403: --else
2404:
2405: -- update priority before delete an account_classification association
2943: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2944: END IF;
2945:
2946: --get folder name
2947: select name into l_folder from iem_route_classifications where route_classification_id = p_class_id;
2948: l_folder := '/'||l_folder;
2949:
2950: --check if the folder is empty
2951: l_ret := IEM_IM_WRAPPERS_PVT.openfolder(l_folder, l_im_link, l_message);