DBA Data[Home] [Help]

APPS.EAM_WO_SCHEDULE_PVT dependencies on EAM_ERROR_MESSAGE_PVT

Line 25: g_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;

21: ***************************************************************************/
22:
23: G_Pkg_Name VARCHAR2(30) := 'EAM_WO_SCHEDULE_PVT';
24:
25: g_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
26: g_dummy NUMBER;
27:
28: PROCEDURE EAM_GET_SHIFT_WKDAYS
29: ( p_curr_date IN DATE,

Line 71: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Enters eam_get_shift_wkdays'||p_shift_num||'in'||p_curr_date||'for'||p_calendar_code) ; END IF ;

67: ORDER BY SHIFT_NUM DESC, SHIFT_DATE DESC;
68:
69: BEGIN
70:
71: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Enters eam_get_shift_wkdays'||p_shift_num||'in'||p_curr_date||'for'||p_calendar_code) ; END IF ;
72:
73: l_cal_rec_count := shift_date_tbl.LAST;
74:
75: IF(l_cal_rec_count IS NOT NULL) THEN --if shift table exists in memory

Line 89: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Shift query executed') ; END IF ;

85: --if p_curr_date not exists between the shift dates in the table. Need to check 2 conditions as shift table can be organised in ascending/descending order for fwd/backward scheduling.
86: (NOT ((l_shift_first_index_date <= p_curr_date AND l_shift_last_index_date >= p_curr_date) OR (l_shift_first_index_date >= p_curr_date AND l_shift_last_index_date <= p_curr_date))))
87: ) THEN
88:
89: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Shift query executed') ; END IF ;
90:
91: shift_date_tbl.delete;
92: l_calendar_index := 0;
93:

Line 114: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Shift query executed') ; END IF ;

110: --if p_curr_date not exists between the shift dates in the table. Need to check 2 conditions as shift table can be organised in ascending/descending order for fwd/backward scheduling.
111: (NOT ((l_shift_first_index_date <= p_curr_date AND l_shift_last_index_date >= p_curr_date) OR (l_shift_first_index_date >= p_curr_date AND l_shift_last_index_date <= p_curr_date))))
112: ) THEN
113:
114: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Shift query executed') ; END IF ;
115:
116: shift_date_tbl.delete;
117: l_calendar_index := 0;
118:

Line 143: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Enters x_wkday_flag'||x_wkday_flag) ; END IF ;

139: ELSE
140: x_wkday_flag := 2;
141: END IF;
142:
143: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Enters x_wkday_flag'||x_wkday_flag) ; END IF ;
144:
145: EXIT;
146: END IF;
147: l_calendar_index := shift_date_tbl.NEXT(l_calendar_index);

Line 153: IF EAM_PROCESS_WO_PVT. Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Exception raised.No entry found for this date, calendar and exception_set_id combination'||p_shift_num||'in'||p_curr_date) ; END IF ;

149:
150: EXCEPTION WHEN OUT_OF_CAL_EXC THEN
151: x_return_status := fnd_api.g_ret_sts_error;
152: x_error_message := 'DATE OUT OF CALENDAR';
153: IF EAM_PROCESS_WO_PVT. Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Exception raised.No entry found for this date, calendar and exception_set_id combination'||p_shift_num||'in'||p_curr_date) ; END IF ;
154:
155: END;
156:
157:

Line 183: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Starting EAM_GET_SHIFT_NUM') ; END IF ;

179: temp NUMBER;
180:
181: BEGIN
182:
183: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Starting EAM_GET_SHIFT_NUM') ; END IF ;
184:
185: l_next_start_time := p_curr_time;
186: l_res_sft_index := p_curr_index ; /* Bug 4738273 : Changed code to set index to p_curr_index */
187:

Line 310: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Starting EAM_CALC_OPERATION_TIME') ; END IF ;

306: l_eam_res_usage_rec EAM_PROCESS_WO_PUB.eam_res_usage_rec_type;
307:
308: BEGIN /*SCHEDULE_RESOURCES*/
309:
310: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Starting EAM_CALC_OPERATION_TIME') ; END IF ;
311: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Scheduling Direction '|| p_schedule_dir) ; END IF ;
312:
313: IF p_schedule_dir = 1 THEN
314: i := op_res_info_tbl.FIRST;

Line 311: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Scheduling Direction '|| p_schedule_dir) ; END IF ;

307:
308: BEGIN /*SCHEDULE_RESOURCES*/
309:
310: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Starting EAM_CALC_OPERATION_TIME') ; END IF ;
311: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Scheduling Direction '|| p_schedule_dir) ; END IF ;
312:
313: IF p_schedule_dir = 1 THEN
314: i := op_res_info_tbl.FIRST;
315: ELSE

Line 321: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Initializing date parameters') ; END IF ;

317: END IF;
318:
319:
320:
321: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Initializing date parameters') ; END IF ;
322:
323:
324: l_res_start_date := p_op_start_date;
325: l_res_completion_date := p_op_completion_date;

Line 330: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Entering Loop') ; END IF ;

326: l_next_res_start_date := p_op_start_date ;
327: l_next_res_completion_date := p_op_completion_date;
328:
329:
330: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Entering Loop') ; END IF ;
331: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Scheduling Operation '|| p_op_seq_num) ; END IF ;
332:
333: l_rsc_index := 1; --initialise the resource index
334:

Line 331: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Scheduling Operation '|| p_op_seq_num) ; END IF ;

327: l_next_res_completion_date := p_op_completion_date;
328:
329:
330: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Entering Loop') ; END IF ;
331: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Scheduling Operation '|| p_op_seq_num) ; END IF ;
332:
333: l_rsc_index := 1; --initialise the resource index
334:
335: WHILE i is not NULL LOOP

Line 338: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Within Loop') ; END IF ;

334:
335: WHILE i is not NULL LOOP
336:
337:
338: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Within Loop') ; END IF ;
339:
340: l_res_lead_time := 0;
341:
342: IF (op_res_info_tbl(i).op_seq_num = p_op_seq_num) /*fix3725352 and (NVL(op_res_info_tbl(i).op_completed, 'N') <> 'Y')*/ THEN

Line 344: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Within op_seq_num and op_completed check') ; END IF ;

340: l_res_lead_time := 0;
341:
342: IF (op_res_info_tbl(i).op_seq_num = p_op_seq_num) /*fix3725352 and (NVL(op_res_info_tbl(i).op_completed, 'N') <> 'Y')*/ THEN
343:
344: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Within op_seq_num and op_completed check') ; END IF ;
345:
346: IF op_res_info_tbl(i).scheduled_flag = 1 THEN
347:
348: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Within scheduled_flag check') ; END IF ;

Line 348: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Within scheduled_flag check') ; END IF ;

344: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Within op_seq_num and op_completed check') ; END IF ;
345:
346: IF op_res_info_tbl(i).scheduled_flag = 1 THEN
347:
348: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Within scheduled_flag check') ; END IF ;
349:
350: IF op_res_info_tbl(i).avail_24_hrs_flag = 1 THEN
351:
352: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Resource available 24 hr') ; END IF ;

Line 352: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Resource available 24 hr') ; END IF ;

348: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Within scheduled_flag check') ; END IF ;
349:
350: IF op_res_info_tbl(i).avail_24_hrs_flag = 1 THEN
351:
352: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Resource available 24 hr') ; END IF ;
353:
354: /* Calculating the leadtime in seconds */ /* mmaduska */
355: l_res_lead_time := op_res_info_tbl(i).usage_rate/op_res_info_tbl(i).assigned_units;
356:

Line 416: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Reresource based on shift') ; END IF ;

412: end if;
413:
414: ELSE
415: -- Logic for shifts
416: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Reresource based on shift') ; END IF ;
417:
418:
419: l_res_seq_num := op_res_info_tbl(i).res_seq_num;
420: /* mmaduska */

Line 471: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Enters loop for lead time'||l_res_lead_time) ; END IF ;

467: l_curr_index := l_res_sft_tbl.FIRST ;
468:
469: WHILE l_res_lead_time > 0 LOOP
470:
471: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Enters loop for lead time'||l_res_lead_time) ; END IF ;
472:
473: eam_get_shift_num
474: ( l_curr_time,
475: p_schedule_dir,

Line 801: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Negative resource duration') ; END IF ;

797: if l_res_start_date > l_res_completion_date then
798: x_return_status := fnd_api.g_ret_sts_error;
799: fnd_message.set_name('EAM','EAM_WO_RES_DT_ERR');
800: fnd_message.set_token('RESNO', op_res_info_tbl(i).res_seq_num);
801: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Negative resource duration') ; END IF ;
802: return;
803: end if;
804:
805: UPDATE WIP_OPERATION_RESOURCES

Line 846: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('entering if'||p_op_seq_num||'...'||op_res_info_tbl(i).res_seq_num) ; END IF ;

842: end if;
843:
844: END IF;
845:
846: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('entering if'||p_op_seq_num||'...'||op_res_info_tbl(i).res_seq_num) ; END IF ;
847: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_res_start_date= '|| l_res_start_date) ; END IF ;
848: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_res_completion_date= '|| l_res_completion_date) ; END IF ;
849: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_next_res_start_date= '|| l_next_res_start_date) ; END IF ;
850: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_next_res_completion_date= '|| l_next_res_completion_date) ; END IF ;

Line 847: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_res_start_date= '|| l_res_start_date) ; END IF ;

843:
844: END IF;
845:
846: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('entering if'||p_op_seq_num||'...'||op_res_info_tbl(i).res_seq_num) ; END IF ;
847: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_res_start_date= '|| l_res_start_date) ; END IF ;
848: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_res_completion_date= '|| l_res_completion_date) ; END IF ;
849: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_next_res_start_date= '|| l_next_res_start_date) ; END IF ;
850: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_next_res_completion_date= '|| l_next_res_completion_date) ; END IF ;
851: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Op Start Date'|| p_op_start_date) ; END IF ;

Line 848: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_res_completion_date= '|| l_res_completion_date) ; END IF ;

844: END IF;
845:
846: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('entering if'||p_op_seq_num||'...'||op_res_info_tbl(i).res_seq_num) ; END IF ;
847: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_res_start_date= '|| l_res_start_date) ; END IF ;
848: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_res_completion_date= '|| l_res_completion_date) ; END IF ;
849: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_next_res_start_date= '|| l_next_res_start_date) ; END IF ;
850: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_next_res_completion_date= '|| l_next_res_completion_date) ; END IF ;
851: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Op Start Date'|| p_op_start_date) ; END IF ;
852: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Op Completion Date'|| p_op_completion_date) ; END IF ;

Line 849: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_next_res_start_date= '|| l_next_res_start_date) ; END IF ;

845:
846: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('entering if'||p_op_seq_num||'...'||op_res_info_tbl(i).res_seq_num) ; END IF ;
847: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_res_start_date= '|| l_res_start_date) ; END IF ;
848: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_res_completion_date= '|| l_res_completion_date) ; END IF ;
849: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_next_res_start_date= '|| l_next_res_start_date) ; END IF ;
850: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_next_res_completion_date= '|| l_next_res_completion_date) ; END IF ;
851: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Op Start Date'|| p_op_start_date) ; END IF ;
852: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Op Completion Date'|| p_op_completion_date) ; END IF ;
853:

Line 850: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_next_res_completion_date= '|| l_next_res_completion_date) ; END IF ;

846: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('entering if'||p_op_seq_num||'...'||op_res_info_tbl(i).res_seq_num) ; END IF ;
847: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_res_start_date= '|| l_res_start_date) ; END IF ;
848: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_res_completion_date= '|| l_res_completion_date) ; END IF ;
849: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_next_res_start_date= '|| l_next_res_start_date) ; END IF ;
850: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_next_res_completion_date= '|| l_next_res_completion_date) ; END IF ;
851: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Op Start Date'|| p_op_start_date) ; END IF ;
852: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Op Completion Date'|| p_op_completion_date) ; END IF ;
853:
854:

Line 851: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Op Start Date'|| p_op_start_date) ; END IF ;

847: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_res_start_date= '|| l_res_start_date) ; END IF ;
848: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_res_completion_date= '|| l_res_completion_date) ; END IF ;
849: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_next_res_start_date= '|| l_next_res_start_date) ; END IF ;
850: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_next_res_completion_date= '|| l_next_res_completion_date) ; END IF ;
851: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Op Start Date'|| p_op_start_date) ; END IF ;
852: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Op Completion Date'|| p_op_completion_date) ; END IF ;
853:
854:
855: END IF; /* End of identification of op_seq_num */

Line 852: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Op Completion Date'|| p_op_completion_date) ; END IF ;

848: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_res_completion_date= '|| l_res_completion_date) ; END IF ;
849: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_next_res_start_date= '|| l_next_res_start_date) ; END IF ;
850: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('l_next_res_completion_date= '|| l_next_res_completion_date) ; END IF ;
851: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Op Start Date'|| p_op_start_date) ; END IF ;
852: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Op Completion Date'|| p_op_completion_date) ; END IF ;
853:
854:
855: END IF; /* End of identification of op_seq_num */
856:

Line 878: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('No shift found for the resource') ; END IF ;

874: EXCEPTION
875: WHEN NO_SFT_EXC THEN
876: x_return_status := fnd_api.g_ret_sts_error;
877: x_error_message := 'NO SHIFT ASSOCIATED TO A RESOURCE';
878: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('No shift found for the resource') ; END IF ;
879:
880: END; /*SCHEDULE_RESOURCES */
881:
882:

Line 1096: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Starting SCHEDULE_OPERATIONS') ; END IF ;

1092:
1093:
1094: BEGIN /*SCHEDULE_OPERATIONS*/
1095:
1096: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Starting SCHEDULE_OPERATIONS') ; END IF ;
1097: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Scheduling '|| p_wip_entity_id) ; END IF ;
1098:
1099: l_res_rec_count:=0;
1100: op_res_info_tbl.delete;

Line 1097: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Scheduling '|| p_wip_entity_id) ; END IF ;

1093:
1094: BEGIN /*SCHEDULE_OPERATIONS*/
1095:
1096: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Starting SCHEDULE_OPERATIONS') ; END IF ;
1097: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Scheduling '|| p_wip_entity_id) ; END IF ;
1098:
1099: l_res_rec_count:=0;
1100: op_res_info_tbl.delete;
1101:

Line 1130: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Resource Count for Scheduling '||op_res_info_tbl.count) ; END IF ;

1126: op_res_info_tbl(l_res_rec_count).avail_24_hrs_flag := l_op_res_info_rec.AVAIL_24_HRS_FLAG;
1127:
1128: END LOOP;
1129:
1130: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Resource Count for Scheduling '||op_res_info_tbl.count) ; END IF ;
1131:
1132: l_res_sft_rec_count := 0;
1133: op_res_sft_tbl.delete;
1134:

Line 1163: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Forward Scheduling') ; END IF ;

1159:
1160:
1161: IF p_start_date IS NOT NULL THEN
1162:
1163: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Forward Scheduling') ; END IF ;
1164:
1165: l_schedule_dir := 1;
1166:
1167: l_op_scd_seq_count:=0;

Line 1189: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Operation Count for Scheduling '||op_scd_seq_tbl.count) ; END IF ;

1185: END LOOP;
1186:
1187: l_op_index := op_scd_seq_tbl.FIRST;
1188:
1189: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Operation Count for Scheduling '||op_scd_seq_tbl.count) ; END IF ;
1190:
1191: WHILE l_op_index is not NULL LOOP
1192:
1193: l_op_seq_num := op_scd_seq_tbl(l_op_index).op_seq_num;

Line 1269: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Calling EAM_CALC_OPERATION_TIME') ; END IF ;

1265: IF l_res_count = 0 THEN
1266: l_op_completion_date := l_op_start_date;
1267: ELSE
1268:
1269: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Calling EAM_CALC_OPERATION_TIME') ; END IF ;
1270: --fix for 3574991
1271: l_op_completion_date :=l_op_start_date;
1272:
1273: SCHEDULE_RESOURCES

Line 1304: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Backward Scheduling') ; END IF ;

1300: END LOOP;
1301:
1302: ELSE
1303:
1304: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Backward Scheduling') ; END IF ;
1305:
1306:
1307: l_schedule_dir := 2;
1308:

Line 1333: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Operation Count for Scheduling'||op_scd_seq_tbl.count) ; END IF ;

1329: END LOOP;
1330:
1331: l_op_index := op_scd_seq_tbl.FIRST;
1332:
1333: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Operation Count for Scheduling'||op_scd_seq_tbl.count) ; END IF ;
1334:
1335: WHILE l_op_index is not NULL LOOP
1336:
1337: l_op_seq_num := op_scd_seq_tbl(l_op_index).op_seq_num;

Line 1417: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Calling EAM_CALC_OPERATION_TIME') ; END IF ;

1413: IF l_res_count = 0 THEN
1414: l_op_start_date := l_op_completion_date;
1415: ELSE
1416:
1417: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Calling EAM_CALC_OPERATION_TIME') ; END IF ;
1418: --fix for 3574991
1419: l_op_start_date := l_op_completion_date;
1420:
1421: SCHEDULE_RESOURCES

Line 1474: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Negative operation duration') ; END IF ;

1470: if l_op_start_date > l_op_completion_date then
1471: x_return_status := fnd_api.g_ret_sts_error;
1472: fnd_message.set_name('EAM','EAM_WO_OP_DT_TK_ERR');
1473: fnd_message.set_token('OPNO', l_op_seq_num);
1474: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Negative operation duration') ; END IF ;
1475: return;
1476: end if;
1477:
1478:

Line 1509: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Negative workorder duration') ; END IF ;

1505: if p_start_date > p_completion_date then
1506: x_return_status := fnd_api.g_ret_sts_error;
1507: fnd_message.set_name('EAM','EAM_WO_DT_TK_ERR');
1508: fnd_message.set_token('WONO', p_wip_entity_id);
1509: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Negative workorder duration') ; END IF ;
1510: return;
1511: end if;
1512:
1513: update wip_discrete_jobs

Line 1584: l_mesg_token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

1580: l_WipOperResInst_tbl wip_op_res_inst_tbl_type;
1581: l_WipOperResInstSt_tbl wip_op_r_inst_st_tbl_type;
1582: l_WipOperResInstEnd_tbl wip_op_r_inst_end_tbl_type;
1583:
1584: l_mesg_token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
1585: l_out_mesg_token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
1586: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type ;
1587:
1588: -- Added for bug 5175006

Line 1585: l_out_mesg_token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

1581: l_WipOperResInstSt_tbl wip_op_r_inst_st_tbl_type;
1582: l_WipOperResInstEnd_tbl wip_op_r_inst_end_tbl_type;
1583:
1584: l_mesg_token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
1585: l_out_mesg_token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
1586: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type ;
1587:
1588: -- Added for bug 5175006
1589: l_count NUMBER ;

Line 1586: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type ;

1582: l_WipOperResInstEnd_tbl wip_op_r_inst_end_tbl_type;
1583:
1584: l_mesg_token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
1585: l_out_mesg_token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
1586: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type ;
1587:
1588: -- Added for bug 5175006
1589: l_count NUMBER ;
1590: CURSOR c_zero_res_req_hours IS

Line 1615: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Value of Profile BOM: Hour UOM is null') ; END IF ;

1611: /* For identifying Hour UOM for resource scheduling */
1612: l_hour_uom := fnd_profile.value('BOM:HOUR_UOM_CODE');
1613:
1614: IF l_hour_uom IS NULL THEN
1615: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Value of Profile BOM: Hour UOM is null') ; END IF ;
1616: x_return_status := FND_API.G_RET_STS_ERROR;
1617: l_token_tbl.DELETE;
1618: l_token_tbl(1).token_name := 'PROFILE';
1619: l_token_tbl(1).token_value := 'BOM: Hour UOM';

Line 1622: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

1618: l_token_tbl(1).token_name := 'PROFILE';
1619: l_token_tbl(1).token_value := 'BOM: Hour UOM';
1620: l_out_mesg_token_tbl := l_mesg_token_tbl;
1621:
1622: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
1623: ( x_Mesg_token_tbl => l_out_Mesg_Token_Tbl
1624: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1625: , p_message_name => 'EAM_NULL_PROFILE'
1626: , p_token_tbl => l_token_tbl

Line 1631: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages

1627: );
1628:
1629: l_mesg_token_tbl := l_out_mesg_token_tbl;
1630:
1631: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages
1632: ( p_mesg_token_tbl => l_mesg_token_tbl
1633: , p_error_level => EAM_ERROR_MESSAGE_PVT.G_WO_LEVEL
1634: , p_entity_index => 1
1635: );

Line 1633: , p_error_level => EAM_ERROR_MESSAGE_PVT.G_WO_LEVEL

1629: l_mesg_token_tbl := l_out_mesg_token_tbl;
1630:
1631: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages
1632: ( p_mesg_token_tbl => l_mesg_token_tbl
1633: , p_error_level => EAM_ERROR_MESSAGE_PVT.G_WO_LEVEL
1634: , p_entity_index => 1
1635: );
1636:
1637: RETURN;

Line 1662: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Calling CALC_SCHEDULE from SCHEDULE_WO') ; END IF ;

1658:
1659:
1660: l_stmt_num := 80;
1661:
1662: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Calling CALC_SCHEDULE from SCHEDULE_WO') ; END IF ;
1663:
1664: DELETE FROM wip_operation_resource_usage
1665: WHERE wip_entity_id = p_wip_entity_id
1666: AND organization_id = p_organization_id;

Line 1686: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Return status from Schedule_operations is :'||x_return_status) ; END IF ;

1682: );
1683:
1684: IF(x_return_status <> 'S' ) THEN
1685: ROLLBACK TO SCHEDULE_WO;
1686: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Return status from Schedule_operations is :'||x_return_status) ; END IF ;
1687: RETURN;
1688: END IF;
1689:
1690: -- Added for bug 5175006

Line 1902: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Negative workorder duration') ; END IF ;

1898: if l_wo_start_date > l_wo_end_date then
1899: x_return_status := fnd_api.g_ret_sts_error;
1900: fnd_message.set_name('EAM','EAM_WO_DT_ERR');
1901: fnd_message.set_token('RESNO', p_wip_entity_id);
1902: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Negative workorder duration') ; END IF ;
1903: return;
1904: end if;
1905:
1906: --dbms_output.put_line('Inside Schedule WO, At the end');

Line 1918: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Invalid parameter exception') ; END IF ;

1914: WHEN INVALID_PARAM_EXC THEN
1915: ROLLBACK TO SCHEDULE_WO;
1916: x_return_status := fnd_api.g_ret_sts_error;
1917: x_error_message := ' EAM_RTG_GET_INFO : Statement - '||l_stmt_num||' Invalid parameter - '||l_error_msg;
1918: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Invalid parameter exception') ; END IF ;
1919: WHEN NO_DATA_FOUND THEN
1920: ROLLBACK TO SCHEDULE_WO;
1921:
1922: IF ( l_stmt_num = 60 ) THEN -- change for bug # 16229398 start

Line 1923: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('UOM conversion for base UOM being set for profile BOM: UOM for Hour is end-dated : ' || l_uom_conv) ; END IF ;

1919: WHEN NO_DATA_FOUND THEN
1920: ROLLBACK TO SCHEDULE_WO;
1921:
1922: IF ( l_stmt_num = 60 ) THEN -- change for bug # 16229398 start
1923: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('UOM conversion for base UOM being set for profile BOM: UOM for Hour is end-dated : ' || l_uom_conv) ; END IF ;
1924: x_return_status := FND_API.G_RET_STS_ERROR;
1925: l_token_tbl.DELETE;
1926: l_token_tbl(1).token_name := 'PROFILE';
1927: l_token_tbl(1).token_value := 'BOM: Hour UOM';

Line 1930: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

1926: l_token_tbl(1).token_name := 'PROFILE';
1927: l_token_tbl(1).token_value := 'BOM: Hour UOM';
1928: l_out_mesg_token_tbl := l_mesg_token_tbl;
1929:
1930: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
1931: ( x_Mesg_token_tbl => l_out_Mesg_Token_Tbl
1932: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1933: , p_message_name => 'EAM_BOM_BASE_UOM_END_DATED'
1934: , p_token_tbl => l_token_tbl

Line 1939: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages

1935: );
1936:
1937: l_mesg_token_tbl := l_out_mesg_token_tbl;
1938:
1939: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages
1940: ( p_mesg_token_tbl => l_mesg_token_tbl
1941: , p_error_level => EAM_ERROR_MESSAGE_PVT.G_WO_LEVEL
1942: , p_entity_index => 1
1943: );

Line 1941: , p_error_level => EAM_ERROR_MESSAGE_PVT.G_WO_LEVEL

1937: l_mesg_token_tbl := l_out_mesg_token_tbl;
1938:
1939: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages
1940: ( p_mesg_token_tbl => l_mesg_token_tbl
1941: , p_error_level => EAM_ERROR_MESSAGE_PVT.G_WO_LEVEL
1942: , p_entity_index => 1
1943: );
1944:
1945: RETURN;

Line 1950: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('No calendar associated in Org parameters') ; END IF ;

1946:
1947: ELSE -- change for bug # 16229398 end
1948: x_return_status := fnd_api.g_ret_sts_error;
1949: x_error_message := ' EAM_RTG_GET_INFO : Statement - '||l_stmt_num||'No Calendar associated in Org parameters';
1950: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('No calendar associated in Org parameters') ; END IF ;
1951: END IF;
1952: WHEN OTHERS THEN
1953: ROLLBACK TO SCHEDULE_WO;
1954: x_return_status := fnd_api.g_ret_sts_unexp_error;

Line 1956: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Enters when others exception') ; END IF ;

1952: WHEN OTHERS THEN
1953: ROLLBACK TO SCHEDULE_WO;
1954: x_return_status := fnd_api.g_ret_sts_unexp_error;
1955: x_error_message := ' EAM_RTG_GET_INFO : Statement - '||l_stmt_num||' Error Message - '||SQLERRM;
1956: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Enters when others exception') ; END IF ;
1957: END;
1958:
1959:
1960: