42: -- Standard Start of API savepoint
43: SAVEPOINT launchInbound_pvt;
44:
45:
46: FND_LOG_REPOSITORY.init(null,null);
47:
48: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
49: logMessage := '[ launchInbound begin ]';
50: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
44:
45:
46: FND_LOG_REPOSITORY.init(null,null);
47:
48: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
49: logMessage := '[ launchInbound begin ]';
50: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
51: end if;
52:
46: FND_LOG_REPOSITORY.init(null,null);
47:
48: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
49: logMessage := '[ launchInbound begin ]';
50: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
51: end if;
52:
53: for i in 1..p_ieu_media_data.count loop
54:
63: end if;
64:
65: end loop;
66:
67: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
68: logMessage := 'l_acct_id='||l_acct_id||' | l_acct_rt_class_id='||
69: l_acct_rt_class_id||' | l_resource_id='||l_resource_id||
70: ' | l_launched_node=' ||l_launched_node ;
71: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
67: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
68: logMessage := 'l_acct_id='||l_acct_id||' | l_acct_rt_class_id='||
69: l_acct_rt_class_id||' | l_resource_id='||l_resource_id||
70: ' | l_launched_node=' ||l_launched_node ;
71: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
72: end if;
73:
74: if l_launched_node = 'EMAIL_ACCOUNT_ID' then
75: l_classification_id := '-1';
88: x_dialog_style := IEU_DS_CONSTS_PUB.G_DS_NONE;
89: x_msg_appl_short_name := null;
90:
91: /* End of Stub */
92: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
93: logMessage := '[ launchInbound end ]';
94: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
95: end if;
96:
90:
91: /* End of Stub */
92: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
93: logMessage := '[ launchInbound end ]';
94: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
95: end if;
96:
97: EXCEPTION
98: WHEN NO_DATA_FOUND THEN
96:
97: EXCEPTION
98: WHEN NO_DATA_FOUND THEN
99: ROLLBACK TO launchInbound_pvt;
100: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
101: logMessage := '[NO data found when query iem_account_route_class with l_acct_rt_class_id='||l_acct_rt_class_id||']';
102: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
103: end if;
104:
98: WHEN NO_DATA_FOUND THEN
99: ROLLBACK TO launchInbound_pvt;
100: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
101: logMessage := '[NO data found when query iem_account_route_class with l_acct_rt_class_id='||l_acct_rt_class_id||']';
102: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
103: end if;
104:
105: WHEN FND_API.G_EXC_ERROR THEN
106: ROLLBACK TO launchInbound_pvt;
103: end if;
104:
105: WHEN FND_API.G_EXC_ERROR THEN
106: ROLLBACK TO launchInbound_pvt;
107: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
108: logMessage := '[ FND_API.G_EXC_ERROR occur!!! ]';
109: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
110: end if;
111:
105: WHEN FND_API.G_EXC_ERROR THEN
106: ROLLBACK TO launchInbound_pvt;
107: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
108: logMessage := '[ FND_API.G_EXC_ERROR occur!!! ]';
109: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
110: end if;
111:
112: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
113: ROLLBACK TO launchInbound_pvt;
110: end if;
111:
112: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
113: ROLLBACK TO launchInbound_pvt;
114: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
115: logMessage := '[ FND_API.G_EXC_UNEXPECTED_ERROR occur!!! ]';
116: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
117: end if;
118: WHEN OTHERS THEN
112: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
113: ROLLBACK TO launchInbound_pvt;
114: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
115: logMessage := '[ FND_API.G_EXC_UNEXPECTED_ERROR occur!!! ]';
116: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
117: end if;
118: WHEN OTHERS THEN
119: ROLLBACK TO launchInbound_pvt;
120: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
116: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
117: end if;
118: WHEN OTHERS THEN
119: ROLLBACK TO launchInbound_pvt;
120: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
121: logMessage := '[Other exception:' ||substr(sqlerrm,1,300)||']';
122: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
123: end if;
124:
118: WHEN OTHERS THEN
119: ROLLBACK TO launchInbound_pvt;
120: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
121: logMessage := '[Other exception:' ||substr(sqlerrm,1,300)||']';
122: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHINBOUND', logMessage);
123: end if;
124:
125: END launchInbound;
126:
157: BEGIN
158:
159: -- Standard Start of API savepoint
160: SAVEPOINT launchInbound_pvt;
161: FND_LOG_REPOSITORY.init(null,null);
162:
163: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
164: logMessage := '[ launchAcquired begin ]';
165: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHACQUIRED', logMessage);
159: -- Standard Start of API savepoint
160: SAVEPOINT launchInbound_pvt;
161: FND_LOG_REPOSITORY.init(null,null);
162:
163: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
164: logMessage := '[ launchAcquired begin ]';
165: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHACQUIRED', logMessage);
166: end if;
167:
161: FND_LOG_REPOSITORY.init(null,null);
162:
163: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
164: logMessage := '[ launchAcquired begin ]';
165: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHACQUIRED', logMessage);
166: end if;
167:
168: for i in 1..p_ieu_media_data.count loop
169: if p_ieu_media_data(i).PARAM_NAME = 'EMAIL_ACCOUNT_ID' then
174: l_resource_id := p_ieu_media_data(i).PARAM_VALUE;
175: end if;
176: end loop;
177:
178: if( FND_LOG.LEVEL_STATEMENT>= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
179: logMessage := 'l_acct_id='||l_acct_id||' | l_msg_id='||l_msg_id||' | l_resource_id='||l_resource_id;
180: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUBLAUNCHACQUIRED', logMessage);
181: end if;
182:
176: end loop;
177:
178: if( FND_LOG.LEVEL_STATEMENT>= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
179: logMessage := 'l_acct_id='||l_acct_id||' | l_msg_id='||l_msg_id||' | l_resource_id='||l_resource_id;
180: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUBLAUNCHACQUIRED', logMessage);
181: end if;
182:
183: select route_classification_id, name
184: into l_classification_id, l_class_name
192: from IEM_RT_MEDIA_ITEMs
193: where message_id = l_msg_id
194: and expire='N';
195:
196: if( FND_LOG.LEVEL_STATEMENT>= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
197: logMessage := '[l_class_name='||l_class_name||' | l_rt_media_item_id='||l_rt_media_item_id||']';
198: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUBLAUNCHACQUIRED', logMessage);
199: end if;
200:
194: and expire='N';
195:
196: if( FND_LOG.LEVEL_STATEMENT>= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
197: logMessage := '[l_class_name='||l_class_name||' | l_rt_media_item_id='||l_rt_media_item_id||']';
198: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUBLAUNCHACQUIRED', logMessage);
199: end if;
200:
201: x_action_type := 2;
202: x_action_name := 'IEM_MC_LAUNCHER';
207: x_msg_param := NULL;
208: x_dialog_style := IEU_DS_CONSTS_PUB.G_DS_NONE;
209: x_msg_appl_short_name := NULL;
210:
211: if( FND_LOG.LEVEL_STATEMENT>= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
212: logMessage := '[ launchAcquired End ]';
213: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHACQUIRED', logMessage);
214: end if;
215:
209: x_msg_appl_short_name := NULL;
210:
211: if( FND_LOG.LEVEL_STATEMENT>= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
212: logMessage := '[ launchAcquired End ]';
213: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHACQUIRED', logMessage);
214: end if;
215:
216: /* End of Stub */
217:
218:
219: EXCEPTION
220: WHEN NO_DATA_FOUND THEN
221: ROLLBACK TO launchInbound_pvt;
222: if( FND_LOG.LEVEL_STATEMENT>= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
223: logMessage := '[NO data found when query iem_account_route_class,IEM_RT_MEDIA_ITEMs with l_msg_id='||l_msg_id||']';
224: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHACQUIRED', logMessage);
225: end if;
226:
220: WHEN NO_DATA_FOUND THEN
221: ROLLBACK TO launchInbound_pvt;
222: if( FND_LOG.LEVEL_STATEMENT>= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
223: logMessage := '[NO data found when query iem_account_route_class,IEM_RT_MEDIA_ITEMs with l_msg_id='||l_msg_id||']';
224: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHACQUIRED', logMessage);
225: end if;
226:
227: WHEN FND_API.G_EXC_ERROR THEN
228: ROLLBACK TO launchInbound_pvt;
225: end if;
226:
227: WHEN FND_API.G_EXC_ERROR THEN
228: ROLLBACK TO launchInbound_pvt;
229: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
230: logMessage := '[FND_API.G_EXC_ERROR ]';
231: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHACQUIRED', logMessage);
232: end if;
233:
227: WHEN FND_API.G_EXC_ERROR THEN
228: ROLLBACK TO launchInbound_pvt;
229: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
230: logMessage := '[FND_API.G_EXC_ERROR ]';
231: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHACQUIRED', logMessage);
232: end if;
233:
234: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
235: ROLLBACK TO launchInbound_pvt;
232: end if;
233:
234: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
235: ROLLBACK TO launchInbound_pvt;
236: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
237: logMessage := '[FND_API.G_EXC_UNEXPECTED_ERROR]';
238: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHACQUIRED', logMessage);
239: end if;
240:
234: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
235: ROLLBACK TO launchInbound_pvt;
236: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
237: logMessage := '[FND_API.G_EXC_UNEXPECTED_ERROR]';
238: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHACQUIRED', logMessage);
239: end if;
240:
241: WHEN OTHERS THEN
242: ROLLBACK TO launchInbound_pvt;
239: end if;
240:
241: WHEN OTHERS THEN
242: ROLLBACK TO launchInbound_pvt;
243: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
244: logMessage := '[Other exception:' ||substr(sqlerrm,1,300)||']';
245: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHACQUIRED', logMessage);
246: end if;
247: END launchAcquired;
241: WHEN OTHERS THEN
242: ROLLBACK TO launchInbound_pvt;
243: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
244: logMessage := '[Other exception:' ||substr(sqlerrm,1,300)||']';
245: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_CLIENTLAUNCH_PUB.LAUNCHACQUIRED', logMessage);
246: end if;
247: END launchAcquired;
248:
249: