DBA Data[Home] [Help]

PACKAGE: APPS.IEM_PP_QUEUE_PVT

Source


1 PACKAGE IEM_PP_QUEUE_PVT AUTHID CURRENT_USER AS
2 /* $Header: iemvques.pls 120.3 2005/08/07 17:23:39 appldev noship $ */
3 --
4 -- file name: iemvques.pls
5 --
6 -- Purpose: EMTA runtime queue management
7 --
8 -- MODIFICATION HISTORY
9 -- Person      Date         Comments
10 --  Liang Xia   3/20/2003    Created
11 --  Liang Xia   08/29/2004   changed for new feature
12 --  Liang Xia   10/13/2004   Added x_subject for get_queue_rec
13 --  Liang Xia   11/02/2004   get Action from queue
14 --  Liang Xia   01/20/2005   Added expunge_queue
15 --  Liang Xia   05/20/2005   changed signature of expunge_queue
16 --  Liang Xia   05/20/2005   changed signature of create_pp_queue by adding RFC822_msgID
17 --		  					 received_date
18 -- ---------   ------  ------------------------------------------
19 TYPE key_tbl_type IS table of VARCHAR(100) INDEX BY BINARY_INTEGER;
20 
21 --  Start of Comments
22 --  API name    : create_pp_queue
23 --  Type        : Private
24 --  Function    : This procedure creates record in the table IEM_RT_PP_QUEUES table
25 --  Pre-reqs    : None.
26 --  Parameters  :
27 PROCEDURE create_pp_queue (
28                  p_api_version_number  IN   NUMBER,
29  		  	     p_init_msg_list       IN   VARCHAR2 := null,
30 		    	 p_commit              IN   VARCHAR2 := null,
31             	 p_msg_uid             IN   NUMBER,
32   				 p_email_acct_id       IN   NUMBER,
33                  p_subject             IN   VARCHAR2,
34                  p_from                IN   varchar2,
35                  p_size                IN   NUMBER,
36                  p_flag                IN   VARCHAR2,
37     			 p_retry_count		IN  NUMBER,
38 				 p_attach_name_tbl	IN JTF_VARCHAR2_TABLE_300,
39 				 p_attach_size_tbl	IN JTF_VARCHAR2_TABLE_300,
40     			 p_attach_type_tbl	IN JTF_VARCHAR2_TABLE_300,
41                  p_rfc822_msgId        IN   VARCHAR2,
42                  p_received_date       IN   DATE,
43     			 x_return_status	   OUT  NOCOPY VARCHAR2,
44   				 x_msg_count	       OUT	NOCOPY NUMBER,
45 				 x_msg_data	           OUT	NOCOPY VARCHAR2
46 			 ) ;
47 
48 
49 --  Start of Comments
50 --  API name    : get_queue_rec
51 --  Type        : Private
52 --  Function    : This procedure get record for EMTA Processing thread
53 --  Pre-reqs    : None.
54 --  Parameters  :
55 Procedure get_queue_rec(
56                  p_api_version_number  IN   NUMBER,
57  		  	     p_init_msg_list       IN   VARCHAR2 := null,
58 		    	 p_commit              IN   VARCHAR2 := null,
59                  x_pp_queue_id         OUT  NOCOPY NUMBER,
60                  x_msg_uid             OUT  NOCOPY NUMBER,
61                  x_subject             OUT  NOCOPY VARCHAR2,
62                  x_acct_id             OUT  NOCOPY NUMBER,
63                  x_action              OUT  NOCOPY NUMBER,
64                  x_return_status	   OUT  NOCOPY VARCHAR2,
65   		  	     x_msg_count	       OUT	NOCOPY NUMBER,
66 	  	  	     x_msg_data	           OUT	NOCOPY VARCHAR2
67     );
68 
69 --  Start of Comments
70 --  API name    : expunge_queue
71 --  Type        : Private
72 --  Function    : This procedure deletes emails that has been processed
73 --  Pre-reqs    : None.
74 --  Parameters  :
75 PROCEDURE expunge_queue (
76                  p_api_version_number  IN   NUMBER,
77  		  	     p_init_msg_list       IN   VARCHAR2 := null,
78 		    	 p_commit              IN   VARCHAR2 := null,
79 				 p_acct_id			   IN   VARCHAR2,
80 				 x_return_status	   OUT  NOCOPY VARCHAR2,
81   				 x_msg_count	       OUT	NOCOPY NUMBER,
82 				 x_msg_data	           OUT	NOCOPY VARCHAR2
83 			 );
84 
85 
86 --  Start of Comments
87 --  API name    : get_queue_recs
88 --  Type        : Private
89 --  Function    : This procedure get records for EMTA Processing thread
90 --  Pre-reqs    : None.
91 --  Parameters  :
92 Procedure get_queue_recs(
93                  p_api_version_number  IN   NUMBER,
94  		  	     p_init_msg_list       IN   VARCHAR2 := null,
95 		    	 p_commit              IN   VARCHAR2 := null,
96 				 p_batch			   IN   NUMBER,
97                  x_pp_queue_ids        OUT  NOCOPY JTF_NUMBER_TABLE,
98                  x_msg_uids            OUT  NOCOPY JTF_NUMBER_TABLE,
99                  x_subjects            OUT  NOCOPY jtf_varchar2_Table_2000,
100                  x_acct_id             OUT  NOCOPY NUMBER,
101                  x_actions             OUT  NOCOPY JTF_NUMBER_TABLE,
102 				 x_rfc_msgids          OUT  NOCOPY jtf_varchar2_Table_300,
103                  x_return_status	   OUT  NOCOPY VARCHAR2,
104   		  	     x_msg_count	       OUT	NOCOPY NUMBER,
105 	  	  	     x_msg_data	           OUT	NOCOPY VARCHAR2
106     );
107 
108 --  Start of Comments
109 --  API name    : mark_flags
110 --  Type        : Private
111 --  Function    : This procedure update flag for the batch data
112 --  Pre-reqs    : None.
113 --  Parameters  :
114 PROCEDURE mark_flags (
115                  p_api_version_number  IN   NUMBER,
116  		  	     p_init_msg_list       IN   VARCHAR2 := null,
117 		    	 p_commit              IN   VARCHAR2 := null,
118 				 p_flag			   	   IN   VARCHAR2,
119 				 p_queue_ids		   IN   jtf_varchar2_Table_100,
120 				 x_return_status	   OUT  NOCOPY VARCHAR2,
121   				 x_msg_count	       OUT	NOCOPY NUMBER,
122 				 x_msg_data	           OUT	NOCOPY VARCHAR2
123 			 );
124 
125 --  Start of Comments
126 --  API name    : reset_data
127 --  Type        : Private
128 --  Function    : This procedure reset flag to the queue data.
129 --  Pre-reqs    : None.
130 --  Parameters  :
131  PROCEDURE reset_data (
132                  p_api_version_number  IN   NUMBER,
133  		  	     p_init_msg_list       IN   VARCHAR2 := null,
134 		    	 p_commit              IN   VARCHAR2 := null,
135 				 x_return_status	   OUT  NOCOPY VARCHAR2,
136   				 x_msg_count	       OUT	NOCOPY NUMBER,
137 				 x_msg_data	           OUT	NOCOPY VARCHAR2
138 			 ) ;
139 
140 
141 END IEM_PP_QUEUE_PVT ;