DBA Data[Home] [Help]

PACKAGE: APPS.IEM_UTILS_PUB

Source


1 PACKAGE IEM_UTILS_PUB AUTHID CURRENT_USER as
2 /* $Header: iemputls.pls 120.0 2005/06/02 13:49:43 appldev noship $*/
3 
4 TYPE email_account IS RECORD (
5           email_account_id   iem_email_accounts.email_account_id%type,
6           account_name iem_email_accounts.account_name%type,
7           email_user iem_email_accounts.email_user%type,
8           domain iem_email_accounts.domain%type);
9 
10 TYPE email_account_tbl IS TABLE OF email_account
11            INDEX BY BINARY_INTEGER;
12 
13 
14 -- Start of Comments
15 --  API name 	: 	show_all_accounts
16 --  Type	: 	Private
17 --  Function	: 	This procedure retrieve email accounts from table IEM_EMAIL_ACCOUNTS for dropdownbox
18 --  Parameters	:
19 --	IN
20 --  p_api_version_number    	IN NUMBER	Required
21 --  p_init_msg_list		IN VARCHAR2 	Optional Default = FND_API.G_FALSE
22 --  p_commit			IN VARCHAR2	Optional Default = FND_API.G_FALSE
23 --
24 --	OUT
25 --   x_email_account_tbl OUT    iem_utils_pub.email_account_tbl
26 --   x_return_status	OUT	VARCHAR2
27 --   x_msg_count	OUT	NUMBER
28 --   x_msg_data		OUT	VARCHAR2
29 --
30 --	Version	: 1.0
31 --	Notes		:
32 --
33 -- End of comments
34 -- **********************************************************
35 
36 TYPE email_count_type IS RECORD (
37           resource_id   number,
38           count number);
39 
40 TYPE email_count_tbl IS TABLE OF email_count_type
41            INDEX BY BINARY_INTEGER;
42 
43 TYPE email_status_type IS RECORD (
44           resource_id   number,
45 		new_count		number,
46           read_count number);
47 
48 TYPE email_status_count_tbl IS TABLE OF email_status_type
49            INDEX BY BINARY_INTEGER;
50 TYPE email_milcs_type IS RECORD (
51           milcs_id   number);
52 TYPE t_number_table IS TABLE OF email_milcs_type
53            INDEX BY BINARY_INTEGER;
54 PROCEDURE show_all_accounts (p_api_version_number    	IN   	NUMBER,
55  		  	     p_init_msg_list  		IN   	VARCHAR2 := FND_API.G_FALSE,
56 		    	     p_commit	    		IN   	VARCHAR2 := FND_API.G_FALSE,
57 		  	     x_email_account_tbl 	OUT NOCOPY  	iem_utils_pub.email_account_tbl,
58 		  	     x_return_status		OUT NOCOPY	VARCHAR2,
59   		    	     x_msg_count	      	OUT 	NOCOPY  NUMBER,
60 	  	    	     x_msg_data			OUT	NOCOPY VARCHAR2);
61 
62 
63 PROCEDURE Get_Mailcount_by_days (p_api_version_number    IN   NUMBER,
64  		  	      p_init_msg_list  IN   VARCHAR2 ,
65 		    	      p_commit	    IN   VARCHAR2 ,
66 				 p_duration in number,
67 				 p_resource_id in number,
68 				 x_email_count out NOCOPY email_status_count_tbl,
69 			      x_return_status	OUT NOCOPY	VARCHAR2,
70   		  	      x_msg_count	      OUT NOCOPY	   NUMBER,
71 	  	  	      x_msg_data	OUT NOCOPY	VARCHAR2);
72 
73 PROCEDURE Get_Mailcount_by_MILCS (p_api_version_number    IN   NUMBER,
74  		  	      p_init_msg_list  IN   VARCHAR2 ,
75 		    	      p_commit	    IN   VARCHAR2 ,
76 				 p_duration in number,
77 				 p_resource_id in number,
78 				 p_tbl	in t_number_table,
79 				 x_email_count out NOCOPY email_count_tbl,
80 			      x_return_status	OUT NOCOPY	VARCHAR2,
81   		  	      x_msg_count	      OUT NOCOPY	   NUMBER,
82 	  	  	      x_msg_data	OUT NOCOPY	VARCHAR2);
83 
84 
85 END IEM_UTILS_PUB;