49: -- Standard Start of API savepoint
50: SAVEPOINT launchInbound_pvt;
51:
52:
53: FND_LOG_REPOSITORY.init(null,null);
54:
55: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
56: logMessage := '[ launchInbound begin ]';
57: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
51:
52:
53: FND_LOG_REPOSITORY.init(null,null);
54:
55: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
56: logMessage := '[ launchInbound begin ]';
57: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
58: end if;
59:
53: FND_LOG_REPOSITORY.init(null,null);
54:
55: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
56: logMessage := '[ launchInbound begin ]';
57: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
58: end if;
59:
60: for i in 1..p_ieu_media_data.count loop
61:
75: end if;
76:
77: end loop;
78:
79: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
80: logMessage := 'l_acct_id='||l_acct_id||' | l_acct_rt_class_id='||
81: l_acct_rt_class_id||' | l_resource_id='||l_resource_id||
82: ' | l_launched_node=' ||l_launched_node ;
83: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
79: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
80: logMessage := 'l_acct_id='||l_acct_id||' | l_acct_rt_class_id='||
81: l_acct_rt_class_id||' | l_resource_id='||l_resource_id||
82: ' | l_launched_node=' ||l_launched_node ;
83: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
84: end if;
85:
86: if l_launched_node = 'EMAIL_ACCOUNT_ID' then
87: l_classification_id := '-1';
119: x_dialog_style := IEU_DS_CONSTS_PUB.G_DS_NONE;
120: x_msg_appl_short_name := null;
121:
122: /* End of Stub */
123: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
124: logMessage := '[ launchInbound end ]';
125: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
126: end if;
127:
121:
122: /* End of Stub */
123: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
124: logMessage := '[ launchInbound end ]';
125: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
126: end if;
127:
128: EXCEPTION
129: WHEN NO_DATA_FOUND THEN
127:
128: EXCEPTION
129: WHEN NO_DATA_FOUND THEN
130: ROLLBACK TO launchInbound_pvt;
131: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
132: logMessage := '[NO data found when query iem_account_route_class with l_acct_rt_class_id='||l_acct_rt_class_id||']';
133: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
134: end if;
135:
129: WHEN NO_DATA_FOUND THEN
130: ROLLBACK TO launchInbound_pvt;
131: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
132: logMessage := '[NO data found when query iem_account_route_class with l_acct_rt_class_id='||l_acct_rt_class_id||']';
133: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
134: end if;
135:
136: WHEN FND_API.G_EXC_ERROR THEN
137: ROLLBACK TO launchInbound_pvt;
134: end if;
135:
136: WHEN FND_API.G_EXC_ERROR THEN
137: ROLLBACK TO launchInbound_pvt;
138: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
139: logMessage := '[ FND_API.G_EXC_ERROR occur!!! ]';
140: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
141: end if;
142:
136: WHEN FND_API.G_EXC_ERROR THEN
137: ROLLBACK TO launchInbound_pvt;
138: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
139: logMessage := '[ FND_API.G_EXC_ERROR occur!!! ]';
140: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
141: end if;
142:
143: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
144: ROLLBACK TO launchInbound_pvt;
141: end if;
142:
143: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
144: ROLLBACK TO launchInbound_pvt;
145: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
146: logMessage := '[ FND_API.G_EXC_UNEXPECTED_ERROR occur!!! ]';
147: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
148: end if;
149: WHEN OTHERS THEN
143: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
144: ROLLBACK TO launchInbound_pvt;
145: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
146: logMessage := '[ FND_API.G_EXC_UNEXPECTED_ERROR occur!!! ]';
147: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
148: end if;
149: WHEN OTHERS THEN
150: ROLLBACK TO launchInbound_pvt;
151: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
147: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
148: end if;
149: WHEN OTHERS THEN
150: ROLLBACK TO launchInbound_pvt;
151: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
152: logMessage := '[Other exception:' ||substr(sqlerrm,1,300)||']';
153: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
154: end if;
155:
149: WHEN OTHERS THEN
150: ROLLBACK TO launchInbound_pvt;
151: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
152: logMessage := '[Other exception:' ||substr(sqlerrm,1,300)||']';
153: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
154: end if;
155:
156: END launchInbound;
157:
188: BEGIN
189:
190: -- Standard Start of API savepoint
191: SAVEPOINT launchInbound_pvt;
192: FND_LOG_REPOSITORY.init(null,null);
193:
194: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
195: logMessage := '[ launchAcquired begin ]';
196: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHACQUIRED', logMessage);
190: -- Standard Start of API savepoint
191: SAVEPOINT launchInbound_pvt;
192: FND_LOG_REPOSITORY.init(null,null);
193:
194: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
195: logMessage := '[ launchAcquired begin ]';
196: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHACQUIRED', logMessage);
197: end if;
198:
192: FND_LOG_REPOSITORY.init(null,null);
193:
194: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
195: logMessage := '[ launchAcquired begin ]';
196: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHACQUIRED', logMessage);
197: end if;
198:
199: for i in 1..p_ieu_media_data.count loop
200: if p_ieu_media_data(i).PARAM_NAME = 'EMAIL_ACCOUNT_ID' then
205: l_resource_id := p_ieu_media_data(i).PARAM_VALUE;
206: end if;
207: end loop;
208:
209: if( FND_LOG.LEVEL_STATEMENT>= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
210: logMessage := 'l_acct_id='||l_acct_id||' | l_msg_id='||l_msg_id||' | l_resource_id='||l_resource_id;
211: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUBLAUNCHACQUIRED', logMessage);
212: end if;
213:
207: end loop;
208:
209: if( FND_LOG.LEVEL_STATEMENT>= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
210: logMessage := 'l_acct_id='||l_acct_id||' | l_msg_id='||l_msg_id||' | l_resource_id='||l_resource_id;
211: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUBLAUNCHACQUIRED', logMessage);
212: end if;
213:
214: select route_classification_id, name
215: into l_classification_id, l_class_name
223: from IEM_RT_MEDIA_ITEMs
224: where message_id = l_msg_id
225: and expire='N';
226:
227: if( FND_LOG.LEVEL_STATEMENT>= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
228: logMessage := '[l_class_name='||l_class_name||' | l_rt_media_item_id='||l_rt_media_item_id||']';
229: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUBLAUNCHACQUIRED', logMessage);
230: end if;
231:
225: and expire='N';
226:
227: if( FND_LOG.LEVEL_STATEMENT>= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
228: logMessage := '[l_class_name='||l_class_name||' | l_rt_media_item_id='||l_rt_media_item_id||']';
229: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUBLAUNCHACQUIRED', logMessage);
230: end if;
231:
232: x_action_type := 2;
233: x_action_name := 'IEM_MC_LAUNCHER';
238: x_msg_param := NULL;
239: x_dialog_style := IEU_DS_CONSTS_PUB.G_DS_NONE;
240: x_msg_appl_short_name := NULL;
241:
242: if( FND_LOG.LEVEL_STATEMENT>= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
243: logMessage := '[ launchAcquired End ]';
244: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHACQUIRED', logMessage);
245: end if;
246:
240: x_msg_appl_short_name := NULL;
241:
242: if( FND_LOG.LEVEL_STATEMENT>= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
243: logMessage := '[ launchAcquired End ]';
244: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHACQUIRED', logMessage);
245: end if;
246:
247: /* End of Stub */
248:
249:
250: EXCEPTION
251: WHEN NO_DATA_FOUND THEN
252: ROLLBACK TO launchInbound_pvt;
253: if( FND_LOG.LEVEL_STATEMENT>= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
254: logMessage := '[NO data found when query iem_account_route_class,IEM_RT_MEDIA_ITEMs with l_msg_id='||l_msg_id||']';
255: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHACQUIRED', logMessage);
256: end if;
257:
251: WHEN NO_DATA_FOUND THEN
252: ROLLBACK TO launchInbound_pvt;
253: if( FND_LOG.LEVEL_STATEMENT>= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
254: logMessage := '[NO data found when query iem_account_route_class,IEM_RT_MEDIA_ITEMs with l_msg_id='||l_msg_id||']';
255: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHACQUIRED', logMessage);
256: end if;
257:
258: WHEN FND_API.G_EXC_ERROR THEN
259: ROLLBACK TO launchInbound_pvt;
256: end if;
257:
258: WHEN FND_API.G_EXC_ERROR THEN
259: ROLLBACK TO launchInbound_pvt;
260: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
261: logMessage := '[FND_API.G_EXC_ERROR ]';
262: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHACQUIRED', logMessage);
263: end if;
264:
258: WHEN FND_API.G_EXC_ERROR THEN
259: ROLLBACK TO launchInbound_pvt;
260: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
261: logMessage := '[FND_API.G_EXC_ERROR ]';
262: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHACQUIRED', logMessage);
263: end if;
264:
265: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
266: ROLLBACK TO launchInbound_pvt;
263: end if;
264:
265: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
266: ROLLBACK TO launchInbound_pvt;
267: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
268: logMessage := '[FND_API.G_EXC_UNEXPECTED_ERROR]';
269: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHACQUIRED', logMessage);
270: end if;
271:
265: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
266: ROLLBACK TO launchInbound_pvt;
267: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
268: logMessage := '[FND_API.G_EXC_UNEXPECTED_ERROR]';
269: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHACQUIRED', logMessage);
270: end if;
271:
272: WHEN OTHERS THEN
273: ROLLBACK TO launchInbound_pvt;
270: end if;
271:
272: WHEN OTHERS THEN
273: ROLLBACK TO launchInbound_pvt;
274: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
275: logMessage := '[Other exception:' ||substr(sqlerrm,1,300)||']';
276: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHACQUIRED', logMessage);
277: end if;
278: END launchAcquired;
272: WHEN OTHERS THEN
273: ROLLBACK TO launchInbound_pvt;
274: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
275: logMessage := '[Other exception:' ||substr(sqlerrm,1,300)||']';
276: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHACQUIRED', logMessage);
277: end if;
278: END launchAcquired;
279:
280: