eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.IEX_STRY_UTL_PUB dependencies on FND_LOG

Line 19: PG_DEBUG NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

15: **Appends to a message the api name, parameter name and parameter Value
16: */
17:
18: --PG_DEBUG NUMBER(2) := TO_NUMBER(NVL(FND_PROFILE.value('IEX_DEBUG_LEVEL'), '20'));
19: PG_DEBUG NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
20:
21: PROCEDURE AddInvalidArgMsg
22: ( p_api_name IN VARCHAR2,
23: p_param_value IN VARCHAR2,

Line 162: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

158:
159: -- Check for required parameter p_strategy_id
160: IF (p_strategy_id IS NULL) OR (p_strategy_id = FND_API.G_MISS_NUM) THEN
161: -- IF PG_DEBUG < 10 THEN
162: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
163: IEX_DEBUG_PUB.LogMessage('GET_NEXT_WORK_ITEMS: ' || 'Required Parameter p_strategy_id is invalid');
164: END IF;
165: AddMissingArgMsg(
166: p_api_name => l_api_name_full,

Line 171: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

167: p_param_name => 'p_strategy_id' );
168: RAISE FND_API.G_EXC_ERROR;
169: END IF;
170: -- IF PG_DEBUG < 10 THEN
171: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
172: IEX_DEBUG_PUB.LogMessage('GET_NEXT_WORK_ITEMS: ' || 'after p_strategy_id check');
173: END IF;
174:
175: OPEN c_get_strategy_template_id (p_strategy_id);

Line 182: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

178:
179: -- Check for required parameter p_template_id
180: IF (l_template_id IS NULL) THEN
181: -- IF PG_DEBUG < 10 THEN
182: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
183: IEX_DEBUG_PUB.LogMessage('GET_NEXT_WORK_ITEMS: ' || 'template_id is invalid');
184: END IF;
185: AddMissingArgMsg(
186: p_api_name => l_api_name_full,

Line 191: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

187: p_param_name => 'l_template_id' );
188: RAISE FND_API.G_EXC_ERROR;
189: END IF;
190: -- IF PG_DEBUG < 10 THEN
191: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
192: IEX_DEBUG_PUB.LogMessage('GET_NEXT_WORK_ITEMS: ' || 'after l_template_id check'||l_template_id);
193: END IF;
194:
195: FOR c_get_work_items_rec in c_get_work_items (p_strategy_id,l_template_id)

Line 291: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

287: IF FND_API.to_Boolean( p_init_msg_list ) THEN
288: FND_MSG_PUB.initialize;
289: END IF;
290: -- IF PG_DEBUG < 10 THEN
291: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
292: IEX_DEBUG_PUB.LogMessage('CLOSE_STRY_AND_WITEMS: ' || 'after init');
293: END IF;
294:
295: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 300: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

296:
297: -- Check for required parameter p_strategy_id
298: IF (p_strategy_id IS NULL) OR (p_strategy_id = FND_API.G_MISS_NUM) THEN
299: -- IF PG_DEBUG < 10 THEN
300: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
301: IEX_DEBUG_PUB.LogMessage('CLOSE_STRY_AND_WITEMS: ' || 'Required Parameter p_strategy_id is invalid');
302: END IF;
303: AddMissingArgMsg(
304: p_api_name => l_api_name_full,

Line 309: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

305: p_param_name => 'p_strategy_id' );
306: RAISE FND_API.G_EXC_ERROR;
307: END IF;
308: -- IF PG_DEBUG < 10 THEN
309: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
310: IEX_DEBUG_PUB.LogMessage('CLOSE_STRY_AND_WITEMS: ' || 'after p_strategy_id check');
311: END IF;
312:
313: -- Check for required parameter p_status_id

Line 316: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

312:
313: -- Check for required parameter p_status_id
314: IF (p_status IS NULL) OR (p_status = FND_API.G_MISS_CHAR) THEN
315: -- IF PG_DEBUG < 10 THEN
316: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
317: IEX_DEBUG_PUB.LogMessage('CLOSE_STRY_AND_WITEMS: ' || 'Required Parameter p_status is invalid');
318: END IF;
319: AddMissingArgMsg(
320: p_api_name => l_api_name_full,

Line 325: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

321: p_param_name => 'p_status' );
322: RAISE FND_API.G_EXC_ERROR;
323: END IF;
324: -- IF PG_DEBUG < 10 THEN
325: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
326: IEX_DEBUG_PUB.LogMessage('CLOSE_STRY_AND_WITEMS: ' || 'after p_status check');
327: END IF;
328:
329: FOR c_get_work_items_rec in c_get_work_items (p_strategy_id)

Line 337: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

333: l_strategy_work_item_Rec.object_version_number
334: :=c_get_work_items_rec.object_version_number;
335: l_strategy_work_item_Rec.execute_end := sysdate;
336: -- IF PG_DEBUG < 10 THEN
337: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
338: iex_debug_pub.logMessage('CLOSE_STRY_AND_WITEMS: ' || 'Before Calling IEX_STRATEGY_WORK_ITEMS_PVT.Update_strategy_work_items');
339: END IF;
340: -- IF PG_DEBUG < 10 THEN
341: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 341: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

337: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
338: iex_debug_pub.logMessage('CLOSE_STRY_AND_WITEMS: ' || 'Before Calling IEX_STRATEGY_WORK_ITEMS_PVT.Update_strategy_work_items');
339: END IF;
340: -- IF PG_DEBUG < 10 THEN
341: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
342: iex_debug_pub.logMessage('CLOSE_STRY_AND_WITEMS: ' || '---------------------------------');
343: END IF;
344:
345: -- Start for bug 8740185 PNAVEENK

Line 362: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

358: x_msg_data => l_msg_data,
359: x_return_status => l_return_status,
360: XO_OBJECT_VERSION_NUMBER =>l_object_version_number );
361: -- IF PG_DEBUG < 10 THEN
362: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
363: iex_debug_pub.logMessage('CLOSE_STRY_AND_WITEMS: ' || 'After Calling IEX_STRATEGY_WORK_ITEMS_PVT.Update_strategy_work_items '||
364: 'and Status =>'||l_return_status);
365: END IF;
366: IF l_return_status = FND_API.G_RET_STS_ERROR then

Line 376: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

372: END IF;
373:
374: END LOOP;
375: -- IF PG_DEBUG < 10 THEN
376: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
377: IEX_DEBUG_PUB.LogMessage('CLOSE_STRY_AND_WITEMS: ' || 'End of work items update ');
378: END IF;
379:
380: l_strategy_Rec.strategy_id :=p_strategy_id;

Line 390: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

386: where strategy_id =p_strategy_id;
387: EXCEPTION
388: WHEN NO_DATA_FOUND THEN
389: -- IF PG_DEBUG < 10 THEN
390: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
391: IEX_DEBUG_PUB.LogMessage('CLOSE_STRY_AND_WITEMS: ' || 'Required Parameter p_stragey_id is invalid');
392: END IF;
393: AddInvalidArgMsg(
394: p_api_name => l_api_name_full,

Line 405: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

401:
402: l_strategy_Rec.object_version_number := l_object_version_number;
403:
404: -- IF PG_DEBUG < 10 THEN
405: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
406: iex_debug_pub.logMessage('CLOSE_STRY_AND_WITEMS: ' || 'Before Calling IEX_STRATEGY_PVT.Update_strategy');
407: END IF;
408: -- IF PG_DEBUG < 10 THEN
409: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 409: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

405: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
406: iex_debug_pub.logMessage('CLOSE_STRY_AND_WITEMS: ' || 'Before Calling IEX_STRATEGY_PVT.Update_strategy');
407: END IF;
408: -- IF PG_DEBUG < 10 THEN
409: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
410: iex_debug_pub.logMessage('CLOSE_STRY_AND_WITEMS: ' || '---------------------------------');
411: END IF;
412:
413: IEX_STRATEGY_PVT.Update_strategy(

Line 424: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

420: x_msg_data => l_msg_data,
421: x_return_status => l_return_status,
422: XO_OBJECT_VERSION_NUMBER =>l_object_version_number );
423: -- IF PG_DEBUG < 10 THEN
424: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
425: iex_debug_pub.logMessage('CLOSE_STRY_AND_WITEMS: ' || 'After Calling IEX_STRATEGY_PVT.Update_strategy '||
426: 'and Status =>'||l_return_status);
427: END IF;
428:

Line 529: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

525:
526: -- Check for required parameter p_strategy_id
527: IF (p_strategy_id IS NULL) OR (p_strategy_id = FND_API.G_MISS_NUM) THEN
528: -- IF PG_DEBUG < 10 THEN
529: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
530: IEX_DEBUG_PUB.LogMessage('CLOSE_STRATEGY: ' || 'Required Parameter p_strategy_id is invalid');
531: END IF;
532: AddMissingArgMsg(
533: p_api_name => l_api_name_full,

Line 538: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

534: p_param_name => 'p_strategy_id' );
535: RAISE FND_API.G_EXC_ERROR;
536: END IF;
537: -- IF PG_DEBUG < 10 THEN
538: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
539: IEX_DEBUG_PUB.LogMessage('CLOSE_STRATEGY: ' || 'after p_strategy_id check');
540: END IF;
541:
542: -- Check for required parameter p_status_id

Line 545: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

541:
542: -- Check for required parameter p_status_id
543: IF (p_status IS NULL) OR (p_status = FND_API.G_MISS_CHAR) THEN
544: -- IF PG_DEBUG < 10 THEN
545: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
546: IEX_DEBUG_PUB.LogMessage('CLOSE_STRATEGY: ' || 'Required Parameter p_status is invalid');
547: END IF;
548: AddMissingArgMsg(
549: p_api_name => l_api_name_full,

Line 554: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

550: p_param_name => 'p_status' );
551: RAISE FND_API.G_EXC_ERROR;
552: END IF;
553: -- IF PG_DEBUG < 10 THEN
554: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
555: IEX_DEBUG_PUB.LogMessage('CLOSE_STRATEGY: ' || 'after p_status check');
556: END IF;
557:
558: l_strategy_Rec.strategy_id :=p_strategy_id;

Line 568: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

564: where strategy_id =p_strategy_id;
565: EXCEPTION
566: WHEN NO_DATA_FOUND THEN
567: -- IF PG_DEBUG < 10 THEN
568: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
569: IEX_DEBUG_PUB.LogMessage('CLOSE_STRATEGY: ' || 'Required Parameter p_stragey_id is invalid');
570: END IF;
571: AddInvalidArgMsg(
572: p_api_name => l_api_name_full,

Line 583: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

579:
580: l_strategy_Rec.object_version_number := l_object_version_number;
581:
582: -- IF PG_DEBUG < 10 THEN
583: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
584: iex_debug_pub.logMessage('CLOSE_STRATEGY: ' || 'Before Calling IEX_STRATEGY_PVT.Update_strategy');
585: END IF;
586: -- IF PG_DEBUG < 10 THEN
587: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 587: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

583: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
584: iex_debug_pub.logMessage('CLOSE_STRATEGY: ' || 'Before Calling IEX_STRATEGY_PVT.Update_strategy');
585: END IF;
586: -- IF PG_DEBUG < 10 THEN
587: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
588: iex_debug_pub.logMessage('CLOSE_STRATEGY: ' || '---------------------------------');
589: END IF;
590:
591: IEX_STRATEGY_PVT.Update_strategy(

Line 602: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

598: x_msg_data => l_msg_data,
599: x_return_status => l_return_status,
600: XO_OBJECT_VERSION_NUMBER =>l_object_version_number );
601: -- IF PG_DEBUG < 10 THEN
602: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
603: iex_debug_pub.logMessage('CLOSE_STRATEGY: ' || 'After Calling IEX_STRATEGY_PVT.Update_strategy '||
604: 'and Status =>'||l_return_status);
605: END IF;
606:

Line 698: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

694: IF FND_API.to_Boolean( p_init_msg_list ) THEN
695: FND_MSG_PUB.initialize;
696: END IF;
697: -- IF PG_DEBUG < 10 THEN
698: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
699: IEX_DEBUG_PUB.LogMessage('UPDATE_WORK_ITEM: ' || 'after init');
700: END IF;
701:
702: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 707: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

703:
704: -- Check for required parameter p_strategy_id
705: IF (p_work_item_id IS NULL) OR (p_work_item_id = FND_API.G_MISS_NUM) THEN
706: -- IF PG_DEBUG < 10 THEN
707: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
708: IEX_DEBUG_PUB.LogMessage('UPDATE_WORK_ITEM: ' || 'Required Parameter p_work_item_id is invalid');
709: END IF;
710: AddMissingArgMsg(
711: p_api_name => l_api_name_full,

Line 716: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

712: p_param_name => 'p_work_item_id' );
713: RAISE FND_API.G_EXC_ERROR;
714: END IF;
715: -- IF PG_DEBUG < 10 THEN
716: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
717: IEX_DEBUG_PUB.LogMessage('UPDATE_WORK_ITEM: ' || 'after p_work_item_id check');
718: END IF;
719:
720: -- Check for required parameter p_status_id

Line 723: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

719:
720: -- Check for required parameter p_status_id
721: IF (p_status IS NULL) OR (p_status = FND_API.G_MISS_CHAR) THEN
722: -- IF PG_DEBUG < 10 THEN
723: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
724: IEX_DEBUG_PUB.LogMessage('UPDATE_WORK_ITEM: ' || 'Required Parameter p_status is invalid');
725: END IF;
726: AddMissingArgMsg(
727: p_api_name => l_api_name_full,

Line 732: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

728: p_param_name => 'p_status' );
729: RAISE FND_API.G_EXC_ERROR;
730: END IF;
731: -- IF PG_DEBUG < 10 THEN
732: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
733: IEX_DEBUG_PUB.LogMessage('UPDATE_WORK_ITEM: ' || 'after p_status check');
734: END IF;
735:
736: FOR c_get_work_items_rec in c_get_work_items (p_work_item_id)

Line 744: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

740: l_strategy_work_item_Rec.object_version_number
741: :=c_get_work_items_rec.object_version_number;
742: l_strategy_work_item_Rec.execute_end := sysdate;
743: -- IF PG_DEBUG < 10 THEN
744: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
745: iex_debug_pub.logMessage('UPDATE_WORK_ITEM: ' || 'Before Calling IEX_STRATEGY_WORK_ITEMS_PVT.Update_strategy_work_items');
746: END IF;
747: -- IF PG_DEBUG < 10 THEN
748: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 748: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

744: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
745: iex_debug_pub.logMessage('UPDATE_WORK_ITEM: ' || 'Before Calling IEX_STRATEGY_WORK_ITEMS_PVT.Update_strategy_work_items');
746: END IF;
747: -- IF PG_DEBUG < 10 THEN
748: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
749: iex_debug_pub.logMessage('UPDATE_WORK_ITEM: ' || '---------------------------------');
750: END IF;
751:
752: IEX_STRATEGY_WORK_ITEMS_PVT.Update_strategy_work_items(

Line 763: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

759: x_msg_data => l_msg_data,
760: x_return_status => l_return_status,
761: XO_OBJECT_VERSION_NUMBER =>l_object_version_number );
762: -- IF PG_DEBUG < 10 THEN
763: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
764: iex_debug_pub.logMessage('UPDATE_WORK_ITEM: ' || 'After Calling IEX_STRATEGY_WORK_ITEMS_PVT.Update_strategy_work_items '||
765: 'and Status =>'||l_return_status);
766: END IF;
767: IF l_return_status = FND_API.G_RET_STS_ERROR then

Line 777: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

773: END IF;
774:
775: END LOOP;
776: -- IF PG_DEBUG < 10 THEN
777: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
778: IEX_DEBUG_PUB.LogMessage('UPDATE_WORK_ITEM: ' || 'End of work items update ');
779: END IF;
780:
781:

Line 864: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

860:
861: -- Check for required parameter p_strategy_id
862: IF (p_strategy_id IS NULL) OR (p_strategy_id = FND_API.G_MISS_NUM) THEN
863: -- IF PG_DEBUG < 10 THEN
864: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
865: IEX_DEBUG_PUB.LogMessage('UPDATE_NEXT_WORK_ITEM: ' || 'Required Parameter p_strategy_id is invalid');
866: END IF;
867: AddMissingArgMsg(
868: p_api_name => l_api_name_full,

Line 873: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

869: p_param_name => 'p_strategy_id' );
870: RAISE FND_API.G_EXC_ERROR;
871: END IF;
872: -- IF PG_DEBUG < 10 THEN
873: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
874: IEX_DEBUG_PUB.LogMessage('UPDATE_NEXT_WORK_ITEM: ' || 'after p_strategy_id check');
875: END IF;
876:
877: -- Check for required parameter p_work_item_id

Line 880: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

876:
877: -- Check for required parameter p_work_item_id
878: IF (p_work_item_id IS NULL) OR (p_work_item_id = FND_API.G_MISS_NUM) THEN
879: -- IF PG_DEBUG < 10 THEN
880: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
881: IEX_DEBUG_PUB.LogMessage('UPDATE_NEXT_WORK_ITEM: ' || 'Required Parameter p_work_item_id is invalid');
882: END IF;
883: AddMissingArgMsg(
884: p_api_name => l_api_name_full,

Line 889: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

885: p_param_name => 'p_work_item_id' );
886: RAISE FND_API.G_EXC_ERROR;
887: END IF;
888: -- IF PG_DEBUG < 10 THEN
889: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
890: IEX_DEBUG_PUB.LogMessage('UPDATE_NEXT_WORK_ITEM: ' || 'after p_work_item_id check');
891: END IF;
892: l_strategy_Rec.strategy_id :=p_strategy_id;
893: l_strategy_Rec.next_work_item_id := p_work_item_id;

Line 902: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

898: where strategy_id =p_strategy_id;
899: EXCEPTION
900: WHEN NO_DATA_FOUND THEN
901: -- IF PG_DEBUG < 10 THEN
902: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
903: IEX_DEBUG_PUB.LogMessage('UPDATE_NEXT_WORK_ITEM: ' || 'Required Parameter p_stratgey_id is invalid');
904: END IF;
905: AddInvalidArgMsg(
906: p_api_name => l_api_name_full,

Line 917: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

913:
914: l_strategy_Rec.object_version_number := l_object_version_number;
915:
916: -- IF PG_DEBUG < 10 THEN
917: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
918: iex_debug_pub.logMessage('UPDATE_NEXT_WORK_ITEM: ' || 'Before Calling IEX_STRATEGY_PVT.Update_strategy');
919: END IF;
920: -- IF PG_DEBUG < 10 THEN
921: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 921: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

917: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
918: iex_debug_pub.logMessage('UPDATE_NEXT_WORK_ITEM: ' || 'Before Calling IEX_STRATEGY_PVT.Update_strategy');
919: END IF;
920: -- IF PG_DEBUG < 10 THEN
921: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
922: iex_debug_pub.logMessage('UPDATE_NEXT_WORK_ITEM: ' || '---------------------------------');
923: END IF;
924:
925: IEX_STRATEGY_PVT.Update_strategy(

Line 936: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

932: x_msg_data => l_msg_data,
933: x_return_status => l_return_status,
934: XO_OBJECT_VERSION_NUMBER =>l_object_version_number );
935: -- IF PG_DEBUG < 10 THEN
936: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
937: iex_debug_pub.logMessage('UPDATE_NEXT_WORK_ITEM: ' || 'After Calling IEX_STRATEGY_PVT.Update_strategy '||
938: 'and Status =>'||l_return_status);
939: END IF;
940:

Line 1013: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1009: begin
1010:
1011: select sysdate into r_date from dual; -- default to sysdate;
1012:
1013: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1014: iex_debug_pub.logmessage ('get_date before get conversion rate ');
1015: END IF;
1016: --Start of bug 7434190 22-Jan-2009 barathsr
1017: l_jtf_time_uom_class := fnd_profile.value_specific(NAME => 'JTF_TIME_UOM_CLASS',APPLICATION_ID =>695);

Line 1024: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1020: /* where UOM_code = l_UOM and uom_class = (select fnd_profile.value('JTF_TIME_UOM_CLASS') from dual) */
1021: where UOM_code = l_UOM and uom_class = l_jtf_time_uom_class
1022: --End of Bug 7434190 22-Jan-2009 barathsr
1023: and inventory_item_id = 0;
1024: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1025: iex_debug_pub.logmessage ('get_date l_conversion => '|| l_conversion);
1026: END IF;
1027:
1028: select p_date + l_conversion * l_unit / 24 into r_date from dual;

Line 1029: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1025: iex_debug_pub.logmessage ('get_date l_conversion => '|| l_conversion);
1026: END IF;
1027:
1028: select p_date + l_conversion * l_unit / 24 into r_date from dual;
1029: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1030: iex_debug_pub.logmessage ('get_date => '|| to_char(r_date, 'yyyy/mm/dd/hh24:mi:ss'));
1031: END IF;
1032:
1033: return r_date;

Line 1036: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1032:
1033: return r_date;
1034: exception when others THEN
1035: r_date :=p_date;
1036: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1037: iex_debug_pub.logmessage ('get_date exception return sysdate');
1038: END IF;
1039: return r_date;
1040:

Line 1071: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1067: l_strategy_id := p_event.GetValueForParameter('STRATEGY_ID');
1068: l_workitem_id := p_event.GetValueForParameter('WORK_ITEMID');
1069:
1070: --IF PG_DEBUG < 10 THEN
1071: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1072: iex_debug_pub.logmessage ('create_workitem_check: ' || 'EVENT NAME =>'||p_event.getEventName());
1073: END IF;
1074: --IF PG_DEBUG < 10 THEN
1075: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 1075: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1071: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1072: iex_debug_pub.logmessage ('create_workitem_check: ' || 'EVENT NAME =>'||p_event.getEventName());
1073: END IF;
1074: --IF PG_DEBUG < 10 THEN
1075: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1076: iex_debug_pub.logmessage ('create_workitem_check: ' || 'DELID =>' || l_del_id);
1077: END IF;
1078: --IF PG_DEBUG < 10 THEN
1079: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 1079: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1075: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1076: iex_debug_pub.logmessage ('create_workitem_check: ' || 'DELID =>' || l_del_id);
1077: END IF;
1078: --IF PG_DEBUG < 10 THEN
1079: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1080: iex_debug_pub.logmessage ('create_workitem_check: ' || 'strategy ID =>' ||l_strategy_id );
1081: END IF;
1082: --IF PG_DEBUG < 10 THEN
1083: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 1083: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1079: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1080: iex_debug_pub.logmessage ('create_workitem_check: ' || 'strategy ID =>' ||l_strategy_id );
1081: END IF;
1082: --IF PG_DEBUG < 10 THEN
1083: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1084: iex_debug_pub.logmessage ('create_workitem_check: ' || 'work item ID =>' || l_workitem_id);
1085: END IF;
1086:
1087: IF x_return_status <> 'S' THEN

Line 1095: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1091:
1092: EXCEPTION
1093: WHEN EXC THEN
1094: -- IF PG_DEBUG < 10 THEN
1095: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1096: iex_debug_pub.logmessage ('create_workitem_check: ' || 'raised exe error');
1097: END IF;
1098: WF_CORE.CONTEXT('IEX_STRY_UTL_PUB', 'create_workitem_check', p_event.getEventName(), p_subscription_guid);
1099: WF_EVENT.setErrorInfo(p_event, 'ERROR');

Line 1138: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1134: l_strategy_id := p_event.GetValueForParameter('STRATEGY_ID');
1135: l_workitem_id := p_event.GetValueForParameter('WORK_ITEMID');
1136:
1137: --IF PG_DEBUG < 10 THEN
1138: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1139: iex_debug_pub.logmessage ('create_workitem_complete: ' || 'EVENT NAME =>'||p_event.getEventName());
1140: END IF;
1141: --IF PG_DEBUG < 10 THEN
1142: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 1142: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1138: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1139: iex_debug_pub.logmessage ('create_workitem_complete: ' || 'EVENT NAME =>'||p_event.getEventName());
1140: END IF;
1141: --IF PG_DEBUG < 10 THEN
1142: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1143: iex_debug_pub.logmessage ('create_workitem_complete: ' || 'DELID =>' || l_del_id);
1144: END IF;
1145: --IF PG_DEBUG < 10 THEN
1146: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 1146: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1142: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1143: iex_debug_pub.logmessage ('create_workitem_complete: ' || 'DELID =>' || l_del_id);
1144: END IF;
1145: --IF PG_DEBUG < 10 THEN
1146: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1147: iex_debug_pub.logmessage ('create_workitem_complete: ' || 'strategy ID =>' ||l_strategy_id );
1148: END IF;
1149: --IF PG_DEBUG < 10 THEN
1150: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 1150: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1146: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1147: iex_debug_pub.logmessage ('create_workitem_complete: ' || 'strategy ID =>' ||l_strategy_id );
1148: END IF;
1149: --IF PG_DEBUG < 10 THEN
1150: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1151: iex_debug_pub.logmessage ('create_workitem_complete: ' || 'work item ID =>' || l_workitem_id);
1152: END IF;
1153:
1154: IF x_return_status <> 'S' THEN

Line 1162: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1158:
1159: EXCEPTION
1160: WHEN EXC THEN
1161: -- IF PG_DEBUG < 10 THEN
1162: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1163: iex_debug_pub.logmessage ('create_workitem_complete: ' || 'raised exe error');
1164: END IF;
1165: WF_CORE.CONTEXT('IEX_STRY_UTL_PUB', 'create_workitem_complete', p_event.getEventName(), p_subscription_guid);
1166: WF_EVENT.setErrorInfo(p_event, 'ERROR');

Line 1180: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1176: --Begin bug#5874874 gnramasa 25-Apr-2007
1177: --Clear the Strategy related data in UWQ summary table.
1178: procedure clear_uwq_str_summ(p_object_id in number,p_object_type in varchar2) is
1179: begin
1180: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1181: iex_debug_pub.logmessage ('**** BEGIN : IEX_STRY_UTL_PUB.CLEAR_UWQ_STR_SUMM ************');
1182: iex_debug_pub.logmessage ('IEX_STRY_UTL_PUB.CLEAR_UWQ_STR_SUMM object_type='||p_object_type);
1183: iex_debug_pub.logmessage ('IEX_STRY_UTL_PUB.CLEAR_UWQ_STR_SUMM object_id='||p_object_id);
1184: END IF;

Line 1188: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1184: END IF;
1185:
1186: IF p_object_type = 'PARTY' THEN
1187:
1188: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1189: iex_debug_pub.logmessage ('**** IEX_STRY_UTL_PUB.CLEAR_UWQ_STR_SUMM: Clearing party level strategy uwq summary ************');
1190: END IF;
1191: UPDATE IEX_DLN_UWQ_SUMMARY
1192: SET WORK_ITEM_ID = null,

Line 1211: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1207: WKITEM_ESCALATED_YN = null
1208: WHERE PARTY_ID = p_object_id;
1209:
1210: ELSIF p_object_type = 'IEX_ACCOUNT' THEN
1211: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1212: iex_debug_pub.logmessage ('**** IEX_STRY_UTL_PUB.CLEAR_UWQ_STR_SUMM: Clearing account level strategy uwq summary ************');
1213: END IF;
1214: UPDATE IEX_DLN_UWQ_SUMMARY
1215: SET WORK_ITEM_ID = null,

Line 1234: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1230: WKITEM_ESCALATED_YN = null
1231: WHERE CUST_ACCOUNT_ID = p_object_id;
1232:
1233: ELSIF p_object_type = 'IEX_BILLTO' THEN
1234: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1235: iex_debug_pub.logmessage ('**** IEX_STRY_UTL_PUB.CLEAR_UWQ_STR_SUMM: Clearing billto level strategy uwq summary ************');
1236: END IF;
1237: UPDATE IEX_DLN_UWQ_SUMMARY
1238: SET WORK_ITEM_ID = null,

Line 1256: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1252: WORK_ITEM_ORDER = null,
1253: WKITEM_ESCALATED_YN = null
1254: WHERE SITE_USE_ID = p_object_id;
1255: END IF;
1256: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1257: iex_debug_pub.logmessage ('**** IEX_STRY_UTL_PUB.CLEAR_UWQ_STR_SUMM: Clearing party level strategy uwq summary ************');
1258: END IF;
1259: exception
1260: when others then

Line 1261: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1257: iex_debug_pub.logmessage ('**** IEX_STRY_UTL_PUB.CLEAR_UWQ_STR_SUMM: Clearing party level strategy uwq summary ************');
1258: END IF;
1259: exception
1260: when others then
1261: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1262: iex_debug_pub.logmessage ('**** EXCEPTION: IEX_STRY_UTL_PUB.CLEAR_UWQ_STR_SUMM ************');
1263: END IF;
1264: end;
1265:

Line 1316: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1312: l_work_item_order number;
1313: l_escalated_yn varchar2(1);
1314: begin
1315:
1316: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1317: iex_debug_pub.logmessage ('**** BEGIN refresh_uwq_str_summ ************');
1318: END IF;
1319:
1320: open c_strategy_summary(p_workitem_id);

Line 1351: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1347: END IF;
1348: return;
1349: end if;
1350: IF l_jtf_object_type = 'PARTY' THEN
1351: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1352: iex_debug_pub.logmessage ('**** IEX_STRY_UTL_PUB.REFRESH_UWQ_STR_SUMM: Updating party level strategy uwq summary ************');
1353: END IF;
1354: update iex_dln_uwq_summary
1355: set work_item_id = l_work_item_id,

Line 1374: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1370: wkitem_escalated_yn = l_escalated_yn
1371: where party_id = l_jtf_object_id;
1372:
1373: ELSIF l_jtf_object_type = 'IEX_ACCOUNT' THEN
1374: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1375: iex_debug_pub.logmessage ('**** IEX_STRY_UTL_PUB.REFRESH_UWQ_STR_SUMM: Updating account level strategy uwq summary ************');
1376: END IF;
1377: update iex_dln_uwq_summary
1378: set work_item_id = l_work_item_id,

Line 1397: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1393: wkitem_escalated_yn = l_escalated_yn
1394: where cust_account_id = l_jtf_object_id;
1395:
1396: ELSIF l_jtf_object_type = 'IEX_BILLTO' THEN
1397: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1398: iex_debug_pub.logmessage ('**** IEX_STRY_UTL_PUB.REFRESH_UWQ_STR_SUMM: Updating billto level strategy uwq summary ************');
1399: END IF;
1400: update iex_dln_uwq_summary
1401: set work_item_id = l_work_item_id,

Line 1425: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1421: -- Added IF condition for Bug #14053089 bibeura
1422: IF FND_API.To_Boolean(p_commit) THEN
1423: COMMIT WORK;
1424: END IF;
1425: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1426: iex_debug_pub.logmessage ('**** END refresh_uwq_str_summ ************');
1427: END IF;
1428: exception
1429: when others then

Line 1480: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1476: strategy_id => p_strategy_id,
1477: status => p_status ) ;
1478:
1479: -- IF PG_DEBUG < 10 THEN
1480: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1481: IEX_DEBUG_PUB.logmessage('REASSIGN_STRATEGY: ' || 'AFTER SEND SIGNAL');
1482: END IF;
1483:
1484: OPEN c_status(p_strategy_id);

Line 1490: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1486: CLOSE c_status;
1487:
1488: if ( l_status = 'CANCELLED' ) then
1489: -- IF PG_DEBUG < 10 THEN
1490: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1491: IEX_DEBUG_PUB.logmessage('REASSIGN_STRATEGY: ' || 'After Send Signal and it successfull ');
1492: END IF;
1493: OPEN c_object(p_strategy_id);
1494: FETCH c_object INTO l_delinquency_id,l_object_id,l_object_type;

Line 1498: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1494: FETCH c_object INTO l_delinquency_id,l_object_id,l_object_type;
1495: CLOSE c_object;
1496:
1497: -- IF PG_DEBUG < 10 THEN
1498: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1499: IEX_DEBUG_PUB.logmessage('REASSIGN_STRATEGY: ' || 'IEXSTTAB-Delinquency id'||
1500: 'before calling create strategy is '
1501: ||l_delinquency_id||
1502: ' object_id is '||l_object_id ||

Line 1507: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1503: ' object_type is' || l_object_type );
1504: END IF;
1505:
1506: -- IF PG_DEBUG < 10 THEN
1507: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1508: IEX_DEBUG_PUB.logmessage('REASSIGN_STRATEGY: ' || 'BEFORE CALLING CREATE_STRATEGY ');
1509: END IF;
1510:
1511: IEX_STRATEGY_PUB.CREATE_STRATEGY

Line 1524: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1520: x_msg_count => l_msg_count,
1521: x_msg_data => l_msg_data) ;
1522:
1523: -- IF PG_DEBUG < 10 THEN
1524: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1525: iex_debug_pub.logmessage('REASSIGN_STRATEGY: ' || 'status of create strategy ' ||l_return_status);
1526: END IF;
1527:
1528: x_msg_count :=l_msg_count;

Line 1547: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1543: EXCEPTION
1544: WHEN OTHERS THEN
1545: ROLLBACK TO REASSIGN_STRATEGY_PUB;
1546: -- IF PG_DEBUG < 10 THEN
1547: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1548: IEX_DEBUG_PUB.logmessage('REASSIGN_STRATEGY: ' || 'inexception of reassign strategy '||sqlerrm);
1549: END IF;
1550: END REASSIGN_STRATEGY;
1551: */

Line 1601: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1597: status => p_strategy_work_item_rec.status_code,
1598: work_item_id => p_strategy_work_item_rec.work_item_id);
1599:
1600: -- IF PG_DEBUG < 10 THEN
1601: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1602: IEX_DEBUG_PUB.logmessage('UPDATE_AND_SENDSIGNAL: ' || 'AFTER SEND SIGNAL');
1603: END IF;
1604: --check if it the strategy is open
1605: -- and next work item is not the same as the updated work item

Line 1616: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1612: and status_code ='OPEN';
1613:
1614: if v_result >0 THEN
1615: -- IF PG_DEBUG < 10 THEN
1616: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1617: IEX_DEBUG_PUB.logmessage('UPDATE_AND_SENDSIGNAL: ' || 'send signal has failed ');
1618: END IF;
1619: rollback to UPDATE_AND_SENDSIGNAL;
1620: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1624: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1620: x_return_status := FND_API.G_RET_STS_ERROR;
1621: return;
1622: else
1623: -- IF PG_DEBUG < 10 THEN
1624: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1625: IEX_DEBUG_PUB.logmessage('UPDATE_AND_SENDSIGNAL: ' || 'send signal is successful ');
1626: END IF;
1627: end if;
1628: END IF; --if status is successful

Line 1639: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1635: EXCEPTION
1636: WHEN OTHERS THEN
1637: ROLLBACK TO UPDATE_AND_SENDSIGNAL;
1638: -- IF PG_DEBUG < 10 THEN
1639: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1640: IEX_DEBUG_PUB.logmessage('inexception of UPDATE_AND_SENDSIGNAL '||sqlerrm);
1641: END IF;
1642:
1643: END UPDATE_AND_SENDSIGNAL;