DBA Data[Home] [Help]

APPS.IEM_EMAIL_SERVERS_PVT dependencies on IEM_EMAIL_SERVERS

Line 1: PACKAGE BODY IEM_EMAIL_SERVERS_PVT as

1: PACKAGE BODY IEM_EMAIL_SERVERS_PVT as
2: /* $Header: iemvevrb.pls 115.16 2002/12/03 20:02:44 chtang shipped $ */
3: G_PKG_NAME CONSTANT varchar2(30) :='IEM_EMAIL_SERVERS_PVT ';
4:
5: PROCEDURE create_item_sss (p_api_version_number IN NUMBER,

Line 3: G_PKG_NAME CONSTANT varchar2(30) :='IEM_EMAIL_SERVERS_PVT ';

1: PACKAGE BODY IEM_EMAIL_SERVERS_PVT as
2: /* $Header: iemvevrb.pls 115.16 2002/12/03 20:02:44 chtang shipped $ */
3: G_PKG_NAME CONSTANT varchar2(30) :='IEM_EMAIL_SERVERS_PVT ';
4:
5: PROCEDURE create_item_sss (p_api_version_number IN NUMBER,
6: p_init_msg_list IN VARCHAR2,
7: p_commit IN VARCHAR2,

Line 71: -- select count(*) into l_es_count from iem_email_servers

67: END IF;
68: -- Initialize API return status to SUCCESS
69: x_return_status := FND_API.G_RET_STS_SUCCESS;
70:
71: -- select count(*) into l_es_count from iem_email_servers
72: -- where UPPER(dns_name)=UPPER(p_dns_name)
73: -- and ip_address=p_ip_address and port=p_port;
74:
75: -- if l_es_count > 0 then

Line 79: SELECT iem_email_servers_s1.nextval

75: -- if l_es_count > 0 then
76: -- raise IEM_DUP_EMAIL_SERVER;
77: -- end if;
78:
79: SELECT iem_email_servers_s1.nextval
80: INTO l_seq_id
81: FROM dual;
82:
83: /* Check For Existing Server Type Id */

Line 105: INSERT INTO iem_email_servers

101: raise IEM_NON_EXISTENT_SERVER_GRP;
102: END IF;
103: -- raise_application_error(-20002,'Server Group Id ||to_char(p_server_group_id)||' Does not Exist');
104:
105: INSERT INTO iem_email_servers
106: (
107: EMAIL_SERVER_ID,
108: SERVER_NAME,
109: DNS_NAME,

Line 283: IEM_EMAIL_SERVERS_PVT.create_item_sss(

279: -- Initialize API return status to SUCCESS
280: x_return_status := FND_API.G_RET_STS_SUCCESS;
281:
282:
283: IEM_EMAIL_SERVERS_PVT.create_item_sss(
284: p_api_version_number =>1.0,
285: p_init_msg_list => FND_API.G_FALSE,
286: p_commit=>FND_API.G_FALSE,
287: p_server_name => p_server_name,

Line 326: select email_server_id into l_email_server_id from iem_email_servers

322: -- Update Cache Audit Trail
323: select email_server_type into l_email_server_type from iem_email_server_types where email_server_type_id=p_server_type_id;
324:
325: if (p_ip_address <> FND_API.G_MISS_CHAR) then
326: select email_server_id into l_email_server_id from iem_email_servers
327: where UPPER(dns_name)=UPPER(p_dns_name)
328: and ip_address=p_ip_address and port=p_port;
329: else
330: SELECT iem_email_servers_s1.currval

Line 330: SELECT iem_email_servers_s1.currval

326: select email_server_id into l_email_server_id from iem_email_servers
327: where UPPER(dns_name)=UPPER(p_dns_name)
328: and ip_address=p_ip_address and port=p_port;
329: else
330: SELECT iem_email_servers_s1.currval
331: INTO l_email_server_id
332: FROM dual;
333:
334: end if;

Line 431: delete from iem_email_servers

427: END IF;
428: -- Initialize API return status to SUCCESS
429: x_return_status := FND_API.G_RET_STS_SUCCESS;
430: if p_email_server_id =FND_API.G_MISS_NUM then
431: delete from iem_email_servers
432: where ip_address=p_ip_address and dns_name=p_dns_name and port=p_port;
433: else
434: delete from iem_email_servers
435: where email_server_id=p_email_server_id;

Line 434: delete from iem_email_servers

430: if p_email_server_id =FND_API.G_MISS_NUM then
431: delete from iem_email_servers
432: where ip_address=p_ip_address and dns_name=p_dns_name and port=p_port;
433: else
434: delete from iem_email_servers
435: where email_server_id=p_email_server_id;
436: end if;
437:
438: -- Standard Check Of p_commit.

Line 543: -- select email_server_id into l_es_count from iem_email_servers

539: END IF;
540: -- Initialize API return status to SUCCESS
541: x_return_status := FND_API.G_RET_STS_SUCCESS;
542:
543: -- select email_server_id into l_es_count from iem_email_servers
544: -- where UPPER(dns_name)=UPPER(p_dns_name)
545: -- and ip_address=p_ip_address and port=p_port;
546:
547: -- if l_es_count <> p_email_server_id then

Line 577: UPDATE IEM_EMAIL_SERVERS

573: end if;
574:
575: if p_email_server_id = FND_API.G_MISS_NUM then
576:
577: UPDATE IEM_EMAIL_SERVERS
578: set server_name=decode(p_server_name,FND_API.G_MISS_CHAR, NULL, NULL, server_name,p_server_name),
579: rt_availability=decode(p_rt_availability,FND_API.G_MISS_CHAR, NULL, NULL,rt_availability,p_rt_availability),
580: server_type_id=decode(p_server_type_id,FND_API.G_MISS_NUM, NULL, NULL,server_type_id,p_server_type_id),
581: server_group_id=decode(p_server_group_id,FND_API.G_MISS_NUM, NULL, NULL,server_group_id,p_server_group_id),

Line 603: UPDATE IEM_EMAIL_SERVERS

599: ATTRIBUTE15 = decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE15, p_ATTRIBUTE15)
600: where dns_name=p_dns_name and ip_address=p_ip_address and port=p_port;
601: ELSE
602:
603: UPDATE IEM_EMAIL_SERVERS
604: SET server_name=decode(p_server_name,FND_API.G_MISS_CHAR, NULL, NULL,server_name,p_server_name),
605: server_type_id=decode(p_server_type_id,FND_API.G_MISS_NUM, NULL, NULL,server_type_id,p_server_type_id),
606: rt_availability=decode(p_rt_availability,FND_API.G_MISS_CHAR, NULL, NULL,rt_availability,p_rt_availability),
607: server_group_id=decode(p_server_group_id,FND_API.G_MISS_NUM, NULL, NULL,server_group_id,p_server_group_id),

Line 751: IEM_EMAIL_SERVERS_PVT.update_item_sss(

747: -- Initialize API return status to SUCCESS
748: x_return_status := FND_API.G_RET_STS_SUCCESS;
749:
750:
751: IEM_EMAIL_SERVERS_PVT.update_item_sss(
752: p_api_version_number =>1.0,
753: p_init_msg_list => FND_API.G_FALSE,
754: p_commit=>FND_API.G_FALSE,
755: p_email_server_id => p_email_server_id,

Line 793: select email_server_id into l_email_server_id from iem_email_servers

789: -- Update Cache Audit Trail
790: select email_server_type into l_email_server_type from iem_email_server_types where email_server_type_id=p_server_type_id;
791:
792: if p_email_server_id = FND_API.G_MISS_NUM then
793: select email_server_id into l_email_server_id from iem_email_servers
794: where UPPER(dns_name)=UPPER(p_dns_name)
795: and ip_address=p_ip_address and port=p_port;
796: else
797: l_email_server_id := p_email_server_id;

Line 910: select server_type_id into l_server_type_id from iem_email_servers WHERE EMAIL_SERVER_ID =l_email_server_id;

906: FOR i IN p_group_tbl.FIRST..p_group_tbl.LAST LOOP
907: l_email_server_id:=p_group_tbl(i);
908:
909: -- Update Cache Audit Trail
910: select server_type_id into l_server_type_id from iem_email_servers WHERE EMAIL_SERVER_ID =l_email_server_id;
911:
912: select email_server_type into l_email_server_type from iem_email_server_types where email_server_type_id=l_server_type_id;
913:
914: IEM_COMP_RT_STATS_PVT.create_item(p_api_version_number =>1.0,

Line 926: DELETE FROM IEM_EMAIL_SERVERS

922: x_msg_data => l_data
923: );
924: -- Not raise error when failed to insert data into iem_comp_rt_stats, it is not user error.
925:
926: DELETE FROM IEM_EMAIL_SERVERS
927: WHERE EMAIL_SERVER_ID =l_email_server_id;
928:
929: END LOOP;
930:

Line 967: END IEM_EMAIL_SERVERS_PVT ;

963: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count ,p_data => x_msg_data);
964:
965: END delete_item_batch;
966:
967: END IEM_EMAIL_SERVERS_PVT ;