DBA Data[Home] [Help]

APPS.IEX_STRATEGY_WORK_ITEMS_PVT dependencies on FND_LOG

Line 10: PG_DEBUG NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

6:
7:
8: -- Hint: Primary key needs to be returned.
9: --PG_DEBUG NUMBER(2) := TO_NUMBER(NVL(FND_PROFILE.value('IEX_DEBUG_LEVEL'), '20'));
10: PG_DEBUG NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
11:
12: PROCEDURE Create_strategy_work_items(
13: P_Api_Version_Number IN NUMBER,
14: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

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

37: Cursor c2 is SELECT iex_strategy_work_items_S.nextval from dual;
38:
39: BEGIN
40: -- IF PG_DEBUG < 10 THEN
41: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
42: IEX_DEBUG_PUB.LogMessage ('********* Start of Procedure =>IEX_strategy_work_items_PVT.Create_strategy_work_items ******** ');
43: END IF;
44: -- Standard Start of API savepoint
45: SAVEPOINT CREATE_strategy_work_items_PVT;

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

52: THEN
53: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
54: END IF;
55: -- IF PG_DEBUG < 10 THEN
56: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
57: IEX_DEBUG_PUB.LogMessage('Create_strategy_work_items: ' || 'After Compatibility Check');
58: END IF;
59:
60: -- Initialize message list if p_init_msg_list is set to TRUE.

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

82: END IF;
83: RAISE FND_API.G_EXC_ERROR;
84: END IF;
85: -- IF PG_DEBUG < 10 THEN
86: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
87: IEX_DEBUG_PUB.LogMessage('Create_strategy_work_items: ' || 'After Global user Check');
88: END IF;
89:
90: --object version Number

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

93: OPEN C2;
94: FETCH C2 INTO v_work_item_id;
95: CLOSE C2;
96: -- IF PG_DEBUG < 10 THEN
97: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
98: IEX_DEBUG_PUB.LogMessage('Create_strategy_work_items: ' || 'After work_item_id Check and work_item_id is => '||v_work_item_id);
99: END IF;
100:
101: --strategy Id check

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

107: fnd_msg_pub.add;
108: RAISE FND_API.G_EXC_ERROR;
109: END IF;
110: -- IF PG_DEBUG < 10 THEN
111: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
112: IEX_DEBUG_PUB.LogMessage ('Create_strategy_work_items: ' || 'After strategy id check');
113: END IF;
114:
115: --resource Id check

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

121: fnd_msg_pub.add;
122: RAISE FND_API.G_EXC_ERROR;
123: END IF;
124: -- IF PG_DEBUG < 10 THEN
125: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
126: IEX_DEBUG_PUB.LogMessage ('Create_strategy_work_items: ' || 'After resource id check');
127: END IF;
128:
129:

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

127: END IF;
128:
129:
130: -- IF PG_DEBUG < 10 THEN
131: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
132: IEX_DEBUG_PUB.LogMessage('Create_strategy_work_items: ' || 'Before Calling iex_strategies_pkg.insert_row');
133: END IF;
134:
135: -- Invoke table handler(IEX_STRATEGY_WORK_ITEMS_PKG.Insert_Row)

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

187: x_msg_data => l_msg_data) ;
188:
189: --dbms_output.put_line('ERRRRRRRROS is '||l_msg_data) ;
190: if ( l_return_status = 'E') then
191: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
192: IEX_DEBUG_PUB.LogMessage('Create_strategy_work_items: ' || 'No Data Found');
193: END IF;
194: RAISE FND_API.G_EXC_ERROR;
195: elsif ( l_return_status ='U') then

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

192: IEX_DEBUG_PUB.LogMessage('Create_strategy_work_items: ' || 'No Data Found');
193: END IF;
194: RAISE FND_API.G_EXC_ERROR;
195: elsif ( l_return_status ='U') then
196: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
197: IEX_DEBUG_PUB.LogMessage('Create_strategy_work_items: ' || 'Create UwqmProcedure failed');
198: END IF;
199: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
200: end if ;

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

198: END IF;
199: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
200: end if ;
201: END;
202: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
203: IEX_DEBUG_PUB.LogMessage('Create_strategy_work_items: ' || 'In if metaphor');
204: END IF;
205: end if ;
206: --end of profile enabled checking

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

221: p_data => x_msg_data
222: );
223:
224: -- IF PG_DEBUG < 10 THEN
225: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
226: IEX_DEBUG_PUB.LogMessage ('********* end of Procedure =>IEX_strategy_work_items_PVT.Create_strategy_work_items ******** ');
227: END IF;
228: EXCEPTION
229: WHEN FND_API.G_EXC_ERROR THEN

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

326:
327: BEGIN
328:
329: -- IF PG_DEBUG < 10 THEN
330: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
331: IEX_DEBUG_PUB.LogMessage ('********* Start of Procedure =>IEX_strategy_work_items_PVT.update_strategy_work_items ******** ');
332: END IF;
333: -- Standard Start of API savepoint
334: SAVEPOINT UPDATE_strategy_work_items_PVT;

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

403: BEGIN
404: l_work_item_temp_id := p_strategy_work_item_rec.WORK_ITEM_TEMPLATE_ID ;
405: l_work_item_id := p_strategy_work_item_rec.WORK_ITEM_ID ;
406: l_strategy_id := p_strategy_work_item_rec.STRATEGY_ID ;
407: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
408: IEX_DEBUG_PUB.LogMessage('Update_strategy_work_items: ' || 'In VIMPIIIIIIII '||l_work_item_id);
409: END IF;
410: IEX_STRY_UWQ_PVT.Update_uwq_item(
411: p_api_version => 1.0,

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

416: x_return_status => l_return_status,
417: x_msg_count => l_msg_count,
418: x_msg_data => l_msg_data) ;
419: if ( l_return_status = 'E') then
420: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
421: IEX_DEBUG_PUB.LogMessage('Update_strategy_work_items: ' || 'No Data Found');
422: END IF;
423: RAISE FND_API.G_EXC_ERROR;
424: elsif ( l_return_status ='U') then

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

421: IEX_DEBUG_PUB.LogMessage('Update_strategy_work_items: ' || 'No Data Found');
422: END IF;
423: RAISE FND_API.G_EXC_ERROR;
424: elsif ( l_return_status ='U') then
425: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
426: IEX_DEBUG_PUB.LogMessage('Update_strategy_work_items: ' || 'Create UwqmProcedure failed');
427: END IF;
428: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
429: end if ;

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

427: END IF;
428: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
429: end if ;
430: END;
431: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
432: IEX_DEBUG_PUB.LogMessage('Update_strategy_work_items: ' || 'In if metaphor');
433: END IF;
434: end if ;
435: --end of profile enabled checking

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

461: x_msg_data => l_msg_data) ;
462:
463: EXCEPTION
464: WHEN OTHERS THEN
465: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
466: IEX_DEBUG_PUB.LogMessage( debug_msg => 'IEU_UWQM_ITEMS' || to_char(p_strategy_work_item_rec.work_item_id), print_date => 'Y');
467: END IF;
468: AS_UTILITY_PVT.Set_Message(
469: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,

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

473: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
474:
475: END;
476: -- IF PG_DEBUG < 10 THEN
477: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
478: IEX_DEBUG_PUB.LogMessage('Update_strategy_work_items: ' || 'In if metaphor');
479: END IF;
480: end if ;
481: --end of profile enabled checking

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

491: ( p_count => x_msg_count,
492: p_data => x_msg_data
493: );
494: -- IF PG_DEBUG < 10 THEN
495: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
496: IEX_DEBUG_PUB.LogMessage ('********* end of Procedure =>IEX_strategy_work_items_PVT.update_strategy_work_items ******** ');
497: END IF;
498: EXCEPTION
499: WHEN FND_API.G_EXC_ERROR THEN