APPS.IEM_EMC_SERVERS_PVT dependencies on IEM_EMC_SERVERS

Line 1: PACKAGE BODY IEM_EMC_SERVERS_PVT as

1: PACKAGE BODY IEM_EMC_SERVERS_PVT as
2: /* $Header: iemvemcb.pls 115.8 2002/12/09 21:31:41 sboorela shipped $ */
3:
4: G_PKG_NAME CONSTANT varchar2(30) :='IEM_EMC_SERVERS_PVT ';
5:

Line 4: G_PKG_NAME CONSTANT varchar2(30) :='IEM_EMC_SERVERS_PVT ';

1: PACKAGE BODY IEM_EMC_SERVERS_PVT as
2: /* $Header: iemvemcb.pls 115.8 2002/12/09 21:31:41 sboorela shipped $ */
3:
4: G_PKG_NAME CONSTANT varchar2(30) :='IEM_EMC_SERVERS_PVT ';
5:
6: PROCEDURE create_item (p_api_version_number IN NUMBER,
7: p_init_msg_list IN VARCHAR2 ,
8: p_commit IN VARCHAR2 ,

Line 61: SELECT IEM_EMC_SERVERS_s1.nextval

57: END IF;
58: -- Initialize API return status to SUCCESS
59: x_return_status := FND_API.G_RET_STS_SUCCESS;
60:
61: SELECT IEM_EMC_SERVERS_s1.nextval
62: INTO l_seq_id
63: FROM dual;
64:
65: /*Check For Existing Server Group Id */

Line 75: INSERT INTO IEM_EMC_SERVERS

71: FND_MESSAGE.SET_NAME('IEM','IEM_NON_EXISTENT_SERVER_GRP');
72: APP_EXCEPTION.RAISE_EXCEPTION;
73: END IF;
74:
75: INSERT INTO IEM_EMC_SERVERS
76: (
77: EMC_SERVER_ID,
78: SERVER_GROUP_ID,
79: EMC_SERVER_NAME,

Line 214: delete from IEM_EMC_SERVERS

210: -- Initialize API return status to SUCCESS
211: x_return_status := FND_API.G_RET_STS_SUCCESS;
212:
213: if (p_emc_server_id is null or p_emc_server_id=FND_API.G_MISS_CHAR) then
214: delete from IEM_EMC_SERVERS
215: where emc_server_name=p_emc_server_name and server_group_id=p_server_group_id ;
216: else
217: delete from IEM_EMC_SERVERS
218: where emc_server_id=p_emc_server_id;

Line 217: delete from IEM_EMC_SERVERS

213: if (p_emc_server_id is null or p_emc_server_id=FND_API.G_MISS_CHAR) then
214: delete from IEM_EMC_SERVERS
215: where emc_server_name=p_emc_server_name and server_group_id=p_server_group_id ;
216: else
217: delete from IEM_EMC_SERVERS
218: where emc_server_id=p_emc_server_id;
219: end if;
220:
221: -- Standard Check Of p_commit.

Line 333: update IEM_EMC_SERVERS

329: APP_EXCEPTION.RAISE_EXCEPTION;
330: END IF;
331: end if;
332: if (p_emc_server_id = FND_API.G_MISS_NUM OR p_emc_server_id is null) then
333: update IEM_EMC_SERVERS
334: SET dns_name=decode(p_dns_name,FND_API.G_MISS_CHAR,null,null,dns_name,p_dns_name),
335: ip_address=decode(p_ip_address,FND_API.G_MISS_CHAR,null,null,ip_address,p_ip_address),
336: LAST_UPDATE_DATE = sysdate,
337: LAST_UPDATED_BY = decode(l_LAST_UPDATED_BY, null,last_updated_by,l_LAST_UPDATED_BY),

Line 356: update IEM_EMC_SERVERS

352: ATTRIBUTE14 = decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR,null,null, ATTRIBUTE14, p_ATTRIBUTE14),
353: ATTRIBUTE15 = decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR,null,null, ATTRIBUTE15, p_ATTRIBUTE15)
354: where emc_server_name=p_emc_server_name and server_group_id=p_server_group_id ;
355: ELSE
356: update IEM_EMC_SERVERS
357: set server_group_id=decode(p_server_group_id,FND_API.G_MISS_NUM,null,null,server_group_id,p_server_group_id),
358: emc_server_name=decode(p_emc_server_name,FND_API.G_MISS_CHAR,null,null,emc_server_name,p_emc_server_name),
359: dns_name=decode(p_dns_name,FND_API.G_MISS_CHAR,null,null,dns_name,p_dns_name),
360: ip_address=decode(p_ip_address,FND_API.G_MISS_CHAR,null,null,ip_address,p_ip_address),

Line 471: FROM IEM_EMC_SERVERS

467:
468: --Actual API starts here
469: FORALL i IN p_group_tbl.FIRST..p_group_tbl.LAST
470: DELETE
471: FROM IEM_EMC_SERVERS
472: WHERE EMC_SERVER_ID = p_group_tbl(i);
473:
474: if SQL%NOTFOUND then
475: raise SERVER_GROUP_NOT_DELETED;

Line 514: END IEM_EMC_SERVERS_PVT ;

510:
511: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count ,p_data => x_msg_data);
512:
513: END delete_item_batch;
514: END IEM_EMC_SERVERS_PVT ;