DBA Data[Home] [Help]

PACKAGE: APPS.IEM_EMAILACCOUNT_PUB

Source


1 PACKAGE IEM_EMAILACCOUNT_PUB as
2 /* $Header: iempacts.pls 120.4 2006/04/12 13:55:11 rtripath ship $ */
3 
4 TYPE EMACNT_rec_type IS RECORD (
5 --		SERVER_ID		NUMBER,
6 		ACCOUNT_NAME	VARCHAR2(256) ,
7 		db_user		varchar2(256),
8 --		DOMAIN	VARCHAR2(256) ,
9 		ACCOUNT_PASSWORD	VARCHAR2(128) ,
10           ACCOUNT_ID      NUMBER );
11 
12 TYPE EMACNT_tbl_type IS TABLE OF EMACNT_rec_type
13 		 INDEX BY BINARY_INTEGER;
14 G_emacnt_tbl	emacnt_tbl_type;
15 
16 TYPE msg_header IS RECORD (
17         msg_id INTEGER,
18         smtp_msg_id VARCHAR2(240),
19         sender_name VARCHAR2(128),
20         received_date DATE,
21         from_str VARCHAR2(80),
22         to_str VARCHAR2(240),
23         priority VARCHAR2(30),
24         replyto VARCHAR2(240),
25         subject VARCHAR2(240),
26         classification VARCHAR2(240),
27         score NUMBER,
28         folder_path VARCHAR2(240)
29         );
30 
31 TYPE msg_header_table IS TABLE OF msg_header INDEX BY
32 binary_integer;
33 
34 type account_info_record is record (
35     email_user varchar2(80),
36     email_password varchar2(80),
37     domain varchar2(128),
38     db_server_id number,
39     email_account_id number
40 );
41 
42 type account_info_table is table of account_info_record index by
43 binary_integer;
44 
45 TYPE ACNTDETAILS_rec_type IS RECORD (
46 		ACCOUNT_NAME		VARCHAR2(256),
47 		EMAIL_USER		VARCHAR2(100),
48 		EMAIL_ADDRESS		VARCHAR2(120),
49 		REPLY_TO_ADDRESS	VARCHAR2(256),
50 		FROM_NAME			VARCHAR2(100),
51 		EMAIL_ACCOUNT_ID	NUMBER,
52 		SMTP_SERVER		VARCHAR2(256),
53 		PORT				NUMBER,
54 		TEMPLATE_CATEGORY_ID	NUMBER
55 		);
56 
57 TYPE ACNTDETAILS_tbl_type IS TABLE OF ACNTDETAILS_rec_type
58 		 INDEX BY BINARY_INTEGER;
59 
60 TYPE AGNTACNTDETAILS_rec_type IS RECORD (
61 		RESOURCE_ID		NUMBER,
62 		RESOURCE_NAME		VARCHAR2(256),
63 		USER_NAME		VARCHAR2(256),
64 		ROLE			VARCHAR2(60),
65 		LAST_LOGIN_TIME		VARCHAR2(256)
66 		);
67 
68 TYPE AGNTACNTDETAILS_tbl_type IS TABLE OF AGNTACNTDETAILS_rec_type
69 		 INDEX BY BINARY_INTEGER;
70 
71 type AGENTACNT_rec_type is record (
72     agent_account_id	number,
73     email_account_id	number,
74     account_name		varchar2(256),
75     reply_to_address	varchar2(256),
76     from_address		varchar2(256),
77     from_name			varchar2(256),
78     user_name			varchar2(256),
79     signature			varchar2(256)
80 );
81 
82 type AGENTACNT_tbl_type is table of AGENTACNT_rec_type index by
83 binary_integer;
84 
85 -- *****************************************************
86 -- Start of Comments
87 --  API name 	: 	Get_EmailAccount_List
88 --  Type	: 	Public
89 --  Function	: This procedure returns a list of email accounts that a
90 --		  particular agent has access to. The agent_id is passed
91 --		  in the p_RESOURCE_ID parameter. The returned PL/SQL ta--ble
92 --		  has a list of email accounts, their username and login
93 --		  passwords and the Group_ID. Any of the email servers that
94 --		  belong to this group ID can be used to access the email
95 --		  account. An account is available on only one IM server
96 --		  the ID of which is the SERVER_ID attribute.
97 --		  If the eMC client wants to invoke IM's PLSQL APIs
98 --		  it first has to make a JDBC connection to the named IM
99 --		  server.
100 --  Pre-reqs	: 	None.
101 --  Parameters	:
102 --	IN
103 --  p_api_version_number    	IN NUMBER	Required
104 --  p_init_msg_list	IN VARCHAR2 	Optional Default = FND_API.G_FALSE
105 --  p_commit	IN VARCHAR2	Optional Default = FND_API.G_FALSE
106 --  p_RESOURCE_ID  IN NUMBER,
107 --
108 --	OUT
109 --     	x_return_status	OUT	VARCHAR2
110 --	x_msg_count	OUT	NUMBER
111 --	x_msg_data	OUT	VARCHAR2
112 --      x_Email_Acnt_tbl  OUT  EMACNT_tbl_type
113 --
114 --	Version	: 1.0
115 --	Notes		:
116 --
117 -- End of comments
118 -- **********************************************************
119 
120 
121 PROCEDURE Get_EmailAccount_List (p_api_version_number    IN   NUMBER,
122  		  	      p_init_msg_list  IN   VARCHAR2 := FND_API.G_FALSE,
123 		    	      p_commit	    IN   VARCHAR2 := FND_API.G_FALSE,
124 			      p_RESOURCE_ID  IN NUMBER := null,
125 			      x_return_status OUT NOCOPY VARCHAR2,
126   		  	      x_msg_count	      OUT NOCOPY    NUMBER,
127 	  	  	      x_msg_data OUT NOCOPY VARCHAR2,
128  			      x_Email_Acnt_tbl  OUT NOCOPY  EMACNT_tbl_type
129 			 );
130 
131 Procedure getEmailHeaders(
132                            p_AgentName   IN VARCHAR2,
133                            p_top_n       IN INTEGER default 0,
134                            p_top_option  IN INTEGER default 1,
135                            p_folder_path IN VARCHAR2 default 'ALL',
136                            message_headers OUT NOCOPY msg_header_table
137                                         );
138 
139 PROCEDURE ListAgentAccounts (p_api_version_number    IN   NUMBER,
140  		  	      p_init_msg_list  IN   VARCHAR2 ,
141 		    	      p_commit	    IN   VARCHAR2 ,
142 			      p_RESOURCE_ID  IN NUMBER ,
143 			      x_return_status OUT NOCOPY VARCHAR2,
144   		  	      x_msg_count	      OUT NOCOPY    NUMBER,
145 	  	  	      x_msg_data OUT NOCOPY VARCHAR2,
146  			      x_Agent_Acnt_tbl  OUT NOCOPY  AGENTACNT_tbl_type
147 			 );
148 
149 PROCEDURE ListAgentAccountDetails (p_api_version_number    IN   NUMBER,
150  		  	      p_init_msg_list  IN   VARCHAR2 := FND_API.G_FALSE,
151 		    	      p_commit	    IN   VARCHAR2 := FND_API.G_FALSE,
152 			      p_EMAIL_ACCOUNT_ID  IN NUMBER,
153 				 p_ROLEid	IN NUMBER:=-1,
154 				 p_Resource_id	IN NUMBER:=-1,
155 				 p_search_criteria IN VARCHAR2:=null,
156 				 p_display_size     in NUMBER:=null,
157 				 p_page_count  in NUMBER:=null,
158 				 p_sort_by     in VARCHAR2:='F',
159 				 p_sort_order     in NUMBER:=1,
160 			      x_return_status OUT NOCOPY VARCHAR2,
161   		  	      x_msg_count	      OUT NOCOPY    NUMBER,
162   		  	      x_search_count	      OUT NOCOPY    NUMBER,
163 	  	  	      x_msg_data OUT NOCOPY VARCHAR2,
164  			      x_Agent_Acnt_Dtl_data  OUT NOCOPY  AGNTACNTDETAILS_tbl_type
165 			 );
166 
167 PROCEDURE ListAccountDetails (p_api_version_number    IN   NUMBER,
168  		  	      p_init_msg_list  	IN   VARCHAR2 := FND_API.G_FALSE,
169 		    	      p_commit	    		IN   VARCHAR2 := FND_API.G_FALSE,
170 			      p_email_account_id IN NUMBER := null,
171 			      x_return_status OUT NOCOPY VARCHAR2,
172   		  	      x_msg_count	     OUT NOCOPY    NUMBER,
173 	  	  	      x_msg_data	 OUT NOCOPY VARCHAR2,
174  			      x_Acnt_Details_tbl   OUT NOCOPY  ACNTDETAILS_tbl_type
175 			 );
176 
177 END IEM_EmailAccount_PUB;