1 PACKAGE IEM_SERVER_PUB as
2 /* $Header: iempsvrs.pls 120.0 2005/06/02 13:48:49 appldev noship $ */
3 -- *****************************************************
4 -- Start of Comments
5 -- Package name : IEM_Server_PUB
6 -- Purpose : Public Package. This package contains APIs that can be
7 -- used to retrieve connection information to various email
8 -- servers. The APIs are designed to be invoked during
9 -- middle-tier initialization/startup so that the email
10 -- server configuration information can be cached and
11 -- supplied to email clients without making further database
12 -- calls. Please refer to eMC Schema for details.
13 --
14 -- History : mpawar 12/19/99
15 -- : rtripath 12/25/99 Developed The Package Body
16 -- : sboorela 5/24/01 Added GetOESList() and GetProtocolSrvList()
17 -- NOTE :
18
19
20
21 TYPE EMAILSVR_rec_type IS RECORD (
22 SERVER_NAME VARCHAR2(50) ,
23 PORT NUMBER ,
24 ACTIVE VARCHAR2(1) );
25
26 TYPE EMAILSVR_tbl_type IS TABLE OF EMAILSVR_rec_type
27 INDEX BY BINARY_INTEGER;
28
29 --****************************************************************************
30 -- API name : Get_EmailServer_List
31 -- Type : Public
32 -- Function : This API returns both IMAP and SMTP email servers,
33 -- identify each by the SERVER_TYPE field in the return
34 -- record. Email accounts of a certain SERVER_GROUP_ID
35 -- can be serviced only by servers of the same GROUP_ID.
36 -- Use DNS name if provided, this allows load balancing
37 -- options (if they are available). IMAP or INBOUND Only
38 -- Or SMTP or OUTBOUND only servers can be retrieved by
39 -- passing appropriate arguments in the P_SERVER_TYPE
40 -- parameter.
41 -- 'I' - INBOUND 'IS' - INBOUND SECURE SERVER
42 -- 'O' - OUTBOUND 'OS' - OUTBOUND SECURE
43 -- These are options!, the secure server may not be
44 -- available.
45 -- Pre-reqs : None.
46 -- Parameters :
47 -- IN
48 -- p_api_version IN NUMBER Required
49 -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API.G_FALSE
50 -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
51 -- p_SERVER_GROUP_ID IN NUMBER := 0,
52 -- p_SERVER_TYPE IN VARCHAR2 := 'ALL',
53 --
54 -- OUT
55 -- x_return_status OUT VARCHAR2
56 -- x_msg_count OUT NUMBER
57 PROCEDURE Get_EmailServer_List (p_api_version_number IN NUMBER,
58 p_init_msg_list IN VARCHAR2 ,
59 p_commit IN VARCHAR2 ,
60 p_SERVER_ID IN NUMBER ,
61 p_SERVER_TYPE IN VARCHAR2,
62 x_return_status OUT NOCOPY VARCHAR2,
63 x_msg_count OUT NOCOPY NUMBER,
64 x_msg_data OUT NOCOPY VARCHAR2,
65 x_Email_Svr_tbl OUT NOCOPY EMAILSVR_tbl_type);
66 END IEM_SERVER_PUB;