[Home] [Help]
53:
54: l_resource_type number;
55: l_employee_id number;
56: l_employee_num varchar2(30);
57: l_params wip_logger.param_tbl_t;
58: l_logLevel NUMBER := fnd_log.g_current_runtime_level;
59:
60: BEGIN
61: if(l_logLevel <= wip_constants.trace_logging) then
107: l_params(23).paramValue := p_uom_code;
108: l_params(24).paramName := 'p_employee_id';
109: l_params(24).paramValue := p_employee_id;
110:
111: wip_logger.entryPoint(p_procName => 'WIP_WS_TIME_ENTRY.record_insert',
112: p_params => l_params,
113: x_returnStatus => x_return_status);
114: if(x_return_status <> fnd_api.g_ret_sts_success) then
115: raise fnd_api.g_exc_unexpected_error;
136:
137: l_time_uom_flag := is_time_uom(p_uom_code);
138:
139: if(l_logLevel <= wip_constants.full_logging) then
140: wip_logger.log('l_time_uom_flag: ' || l_time_uom_flag, l_return_status);
141: end if;
142: if( p_start_date is null and p_duration is null) then
143: /* skip, consider as empty record */
144: null;
151: end if;
152:
153: if l_duration is not null and l_uom_code <> p_uom_code then
154: if(l_logLevel <= wip_constants.full_logging) then
155: wip_logger.log('calling inv_convert.inv_um_convert', l_return_status);
156: end if;
157: l_duration := inv_convert.inv_um_convert(item_id => -1,
158: precision => 38,
159: from_quantity => l_duration,
161: to_unit => l_uom_code,
162: from_name => null,
163: to_name => null);
164: if(l_logLevel <= wip_constants.full_logging) then
165: wip_logger.log('Value returned inv_convert.inv_um_convert: ' || l_duration, l_return_status);
166: end if;
167: end if;
168:
169: if p_projected_completion_date is null then
178: l_projected_completion_date := p_projected_completion_date;
179: end if;
180:
181: if(l_logLevel <= wip_constants.full_logging) then
182: wip_logger.log('Projected Completion Date: ' || l_projected_completion_date, l_return_status);
183: wip_logger.log('Inserting into wip_resource_actual_times', l_return_status);
184: end if;
185: insert into wip_resource_actual_times
186: (time_entry_id,
179: end if;
180:
181: if(l_logLevel <= wip_constants.full_logging) then
182: wip_logger.log('Projected Completion Date: ' || l_projected_completion_date, l_return_status);
183: wip_logger.log('Inserting into wip_resource_actual_times', l_return_status);
184: end if;
185: insert into wip_resource_actual_times
186: (time_entry_id,
187: organization_id,
235: p_employee_id,
236: l_process_status);
237:
238: if(l_logLevel <= wip_constants.full_logging) then
239: wip_logger.log('Calling update_actual_start_dates', l_return_status);
240: end if;
241: update_actual_start_dates(p_wip_entity_id => p_wip_entity_id,
242: p_operation_seq_num => p_operation_seq_num,
243: p_resource_seq_num => p_resource_seq_num);
255: l_return_status := 'S';
256:
257: else
258: if(l_logLevel <= wip_constants.full_logging) then
259: wip_logger.log('Calling derive_insert_wcti', l_return_status);
260: end if;
261: /*Add for Bug 10097774 */
262: derive_insert_wcti(p_organization_id => p_organization_id,
263: p_wip_entity_id => p_wip_entity_id,
275:
276: x_time_entry_id := l_time_entry_id;
277: x_return_status := l_return_status;
278: if (l_logLevel <= wip_constants.trace_logging) then
279: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.record_insert',
280: p_procReturnStatus => x_return_status,
281: p_msg => 'normal completion',
282: x_returnStatus => l_return_status);
283: end if;
318: l_start_date date;
319: l_time_uom_flag varchar2(1);
320: l_projected_completion_date date;
321: l_return_status varchar2(10);
322: l_params wip_logger.param_tbl_t;
323: l_logLevel NUMBER := fnd_log.g_current_runtime_level;
324: BEGIN
325: if(l_logLevel <= wip_constants.trace_logging) then
326: l_params(1).paramName := 'p_time_entry_id';
371: l_params(23).paramValue := p_uom_code;
372: l_params(24).paramName := 'p_employee_id';
373: l_params(24).paramValue := p_employee_id;
374:
375: wip_logger.entryPoint(p_procName => 'WIP_WS_TIME_ENTRY.record_update',
376: p_params => l_params,
377: x_returnStatus => x_return_status);
378: if(x_return_status <> fnd_api.g_ret_sts_success) then
379: raise fnd_api.g_exc_unexpected_error;
393: else
394: l_duration := p_duration;
395: end if;
396: if(l_logLevel <= wip_constants.full_logging) then
397: wip_logger.log('Before inv_convert, l_duration: ' || l_duration, l_return_status);
398: end if;
399: if l_duration is not null and l_uom_code <> p_uom_code then
400: l_duration := inv_convert.inv_um_convert(item_id => -1,
401: precision => 38,
405: from_name => null,
406: to_name => null);
407: end if;
408: if(l_logLevel <= wip_constants.full_logging) then
409: wip_logger.log('After inv_convert, l_duration: ' || l_duration, l_return_status);
410: end if;
411:
412: select object_version_number, start_date into l_object_version_num, l_start_date
413: from wip_resource_actual_times where time_entry_id = p_time_entry_id;
412: select object_version_number, start_date into l_object_version_num, l_start_date
413: from wip_resource_actual_times where time_entry_id = p_time_entry_id;
414:
415: if(l_logLevel <= wip_constants.full_logging) then
416: wip_logger.log('l_object_version_num: ' || l_object_version_num, l_return_status);
417: wip_logger.log('l_start_date: ' || l_start_date, l_return_status);
418: end if;
419: if l_start_date <> p_start_date then
420: l_projected_completion_date := wip_ws_util.get_projected_completion_date(p_organization_id => p_organization_id,
413: from wip_resource_actual_times where time_entry_id = p_time_entry_id;
414:
415: if(l_logLevel <= wip_constants.full_logging) then
416: wip_logger.log('l_object_version_num: ' || l_object_version_num, l_return_status);
417: wip_logger.log('l_start_date: ' || l_start_date, l_return_status);
418: end if;
419: if l_start_date <> p_start_date then
420: l_projected_completion_date := wip_ws_util.get_projected_completion_date(p_organization_id => p_organization_id,
421: p_wip_entity_id => p_wip_entity_id,
429: end if;
430:
431: if l_object_version_num = p_object_version_num then
432: if(l_logLevel <= wip_constants.full_logging) then
433: wip_logger.log('updating wip_resource_actual_times', l_return_status);
434: end if;
435: update wip_resource_actual_times set
436: organization_id = p_organization_id,
437: wip_entity_id = p_wip_entity_id,
460: where time_entry_id = p_time_entry_id;
461:
462: if p_start_date is not null and l_start_date <> p_start_date then
463: if(l_logLevel <= wip_constants.full_logging) then
464: wip_logger.log('calling update_actual_start_dates()', l_return_status);
465: end if;
466: update_actual_start_dates(p_wip_entity_id => p_wip_entity_id,
467: p_operation_seq_num => p_operation_seq_num,
468: p_resource_seq_num => p_resource_seq_num);
467: p_operation_seq_num => p_operation_seq_num,
468: p_resource_seq_num => p_resource_seq_num);
469:
470: if(l_logLevel <= wip_constants.full_logging) then
471: wip_logger.log('calling update_proj_completion_dates()', l_return_status);
472: end if;
473: update_proj_completion_dates(p_organization_id => p_organization_id,
474: p_wip_entity_id => p_wip_entity_id,
475: p_operation_seq_num => p_operation_seq_num,
487: end if;
488:
489: x_return_status := l_return_status;
490: if (l_logLevel <= wip_constants.trace_logging) then
491: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.record_update',
492: p_procReturnStatus => x_return_status,
493: p_msg => 'normal completion',
494: x_returnStatus => l_return_status);
495: end if;
510: l_resource_seq_num number;
511: l_start_date date;
512: l_return_status varchar2(10);
513:
514: l_params wip_logger.param_tbl_t;
515: l_logLevel NUMBER := fnd_log.g_current_runtime_level;
516: cursor delete_cursor is select object_version_number,
517: organization_id,
518: wip_entity_id,
528: l_params(1).paramValue := p_time_entry_id;
529: l_params(2).paramName := 'p_object_version_num';
530: l_params(2).paramValue := p_object_version_num;
531:
532: wip_logger.entryPoint(p_procName => 'WIP_WS_TIME_ENTRY.record_delete',
533: p_params => l_params,
534: x_returnStatus => x_return_status);
535: if(x_return_status <> fnd_api.g_ret_sts_success) then
536: raise fnd_api.g_exc_unexpected_error;
549: l_start_date;
550: if delete_cursor%NOTFOUND then
551: l_return_status := 'U';
552: if(l_logLevel <= wip_constants.full_logging) then
553: wip_logger.log('delete_cursor not found', l_return_status);
554: end if;
555: else
556: if l_object_version_num = p_object_version_num then
557: if(l_logLevel <= wip_constants.full_logging) then
554: end if;
555: else
556: if l_object_version_num = p_object_version_num then
557: if(l_logLevel <= wip_constants.full_logging) then
558: wip_logger.log('updating wip_resource_actual_times', l_return_status);
559: end if;
560: update wip_resource_actual_times set
561: process_status = l_process_status,
562: object_version_number = p_object_version_num + 1,
566: where time_entry_id = p_time_entry_id
567: and process_status <> 4;
568:
569: if(l_logLevel <= wip_constants.full_logging) then
570: wip_logger.log('calling update_actual_start_dates()', l_return_status);
571: end if;
572: update_actual_start_dates(p_wip_entity_id => l_wip_entity_id,
573: p_operation_seq_num => l_operation_seq_num,
574: p_resource_seq_num => l_resource_seq_num);
574: p_resource_seq_num => l_resource_seq_num);
575:
576: if l_start_date is not null then
577: if(l_logLevel <= wip_constants.full_logging) then
578: wip_logger.log('calling update_proj_completion_dates()', l_return_status);
579: end if;
580: update_proj_completion_dates(p_organization_id => l_organization_id,
581: p_wip_entity_id => l_wip_entity_id,
582: p_operation_seq_num => l_operation_seq_num,
590: end if;
591: close delete_cursor;
592: x_return_status := l_return_status;
593: if (l_logLevel <= wip_constants.trace_logging) then
594: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.record_delete',
595: p_procReturnStatus => x_return_status,
596: p_msg => 'normal completion',
597: x_returnStatus => l_return_status);
598: end if;
612: l_resource_seq_num number;
613: l_start_date date;
614: l_return_status varchar2(10);
615:
616: l_params wip_logger.param_tbl_t;
617: l_logLevel NUMBER := fnd_log.g_current_runtime_level;
618: cursor delete_cursor is select object_version_number,
619: organization_id,
620: resource_id,
633: l_params(2).paramValue := p_operation_seq_num;
634: l_params(3).paramName := 'p_employee_id';
635: l_params(3).paramValue := p_employee_id;
636:
637: wip_logger.entryPoint(p_procName => 'WIP_WS_TIME_ENTRY.record_delete',
638: p_params => l_params,
639: x_returnStatus => x_return_status);
640: if(x_return_status <> fnd_api.g_ret_sts_success) then
641: raise fnd_api.g_exc_unexpected_error;
652: l_start_date;
653: if delete_cursor%NOTFOUND then
654: l_return_status := 'U';
655: if(l_logLevel <= wip_constants.full_logging) then
656: wip_logger.log('delete_cursor not found', l_return_status);
657: end if;
658: else
659: if(l_logLevel <= wip_constants.full_logging) then
660: wip_logger.log('updating wip_resource_actual_times', l_return_status);
656: wip_logger.log('delete_cursor not found', l_return_status);
657: end if;
658: else
659: if(l_logLevel <= wip_constants.full_logging) then
660: wip_logger.log('updating wip_resource_actual_times', l_return_status);
661: end if;
662: update wip_resource_actual_times set
663: process_status = l_process_status,
664: object_version_number = l_object_version_num + 1,
669: and operation_seq_num = p_operation_seq_num
670: and employee_id = p_employee_id
671: and process_status <> 4;
672: if(l_logLevel <= wip_constants.full_logging) then
673: wip_logger.log('calling update_actual_start_dates()', l_return_status);
674: end if;
675:
676: update_actual_start_dates(p_wip_entity_id => p_wip_entity_id,
677: p_operation_seq_num => p_operation_seq_num,
678: p_resource_seq_num => l_resource_seq_num);
679:
680: if l_start_date is not null then
681: if(l_logLevel <= wip_constants.full_logging) then
682: wip_logger.log('calling update_proj_completion_dates()', l_return_status);
683: end if;
684: update_proj_completion_dates(p_organization_id => l_organization_id,
685: p_wip_entity_id => p_wip_entity_id,
686: p_operation_seq_num => p_operation_seq_num,
693: end if;
694: close delete_cursor;
695: x_return_status := l_return_status;
696: if (l_logLevel <= wip_constants.trace_logging) then
697: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.record_delete',
698: p_procReturnStatus => x_return_status,
699: p_msg => 'normal completion',
700: x_returnStatus => l_return_status);
701: end if;
709: /*************************************************/
710: PROCEDURE job_off_internal(p_wip_entity_id IN NUMBER, p_operation_seq_num NUMBER)
711: IS
712: x_return_status varchar2(10);
713: l_params wip_logger.param_tbl_t;
714: l_logLevel NUMBER := fnd_log.g_current_runtime_level;
715: BEGIN
716:
717: if(l_logLevel <= wip_constants.trace_logging) then
719: l_params(1).paramValue := p_wip_entity_id;
720: l_params(2).paramName := 'p_operation_seq_num';
721: l_params(2).paramValue := p_operation_seq_num;
722:
723: wip_logger.entryPoint(p_procName => 'WIP_WS_TIME_ENTRY.job_off_internal',
724: p_params => l_params,
725: x_returnStatus => x_return_status);
726: if(x_return_status <> fnd_api.g_ret_sts_success) then
727: raise fnd_api.g_exc_unexpected_error;
733: and operation_seq_num = p_operation_seq_num
734: and employee_id is not null;
735:
736: if (l_logLevel <= wip_constants.trace_logging) then
737: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.job_off_internal',
738: p_procReturnStatus => x_return_status,
739: p_msg => 'normal completion',
740: x_returnStatus => x_return_status);
741: end if;
745: is
746: l_uom_code varchar2(3);
747: l_date date;
748: x_return_status varchar2(10);
749: l_params wip_logger.param_tbl_t;
750: l_logLevel NUMBER := fnd_log.g_current_runtime_level;
751: Begin
752: if(l_logLevel <= wip_constants.trace_logging) then
753: l_params(1).paramName := 'p_wip_entity_id';
756: l_params(2).paramValue := p_operation_seq_num;
757: l_params(3).paramName := 'exclude_scheduled_flag';
758: l_params(3).paramValue := exclude_scheduled_flag;
759:
760: wip_logger.entryPoint(p_procName => 'WIP_WS_TIME_ENTRY.clock_out_labors',
761: p_params => l_params,
762: x_returnStatus => x_return_status);
763: if(x_return_status <> fnd_api.g_ret_sts_success) then
764: raise fnd_api.g_exc_unexpected_error;
792: and wor.resource_seq_num = t.resource_seq_num), 2) /* ad-hoc has no scheduled flag*/
793: );
794:
795: if (l_logLevel <= wip_constants.trace_logging) then
796: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.clock_out_labors',
797: p_procReturnStatus => x_return_status,
798: p_msg => 'normal completion',
799: x_returnStatus => x_return_status);
800: end if;
802:
803: procedure clock_out_machines(p_wip_entity_id number, p_operation_seq_num number)
804: is
805:
806: l_params wip_logger.param_tbl_t;
807: l_logLevel NUMBER := fnd_log.g_current_runtime_level;
808: cursor all_labor_clocked_out(p_scheduled_flag number) is
809: select
810: decode(
856: l_params(1).paramValue := p_wip_entity_id;
857: l_params(2).paramName := 'p_operation_seq_num';
858: l_params(2).paramValue := p_operation_seq_num;
859:
860: wip_logger.entryPoint(p_procName => 'WIP_WS_TIME_ENTRY.clock_out_machines',
861: p_params => l_params,
862: x_returnStatus => x_return_status);
863: if(x_return_status <> fnd_api.g_ret_sts_success) then
864: raise fnd_api.g_exc_unexpected_error;
975: and wor.operation_seq_num = t.operation_seq_num
976: and wor.resource_seq_num = t.resource_seq_num) = l_scheduled_flag;
977: end if;
978: if (l_logLevel <= wip_constants.trace_logging) then
979: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.clock_out_machines',
980: p_procReturnStatus => x_return_status,
981: p_msg => 'normal completion',
982: x_returnStatus => x_return_status);
983: end if;
1258:
1259: l_retStatus varchar2(10);
1260: l_return_status varchar2(10);
1261:
1262: l_params wip_logger.param_tbl_t;
1263: l_logLevel NUMBER := fnd_log.g_current_runtime_level;
1264: --time records (for all resource types) cursor- used for setting cost_flag, add_to_rtg,
1265: -- resource_seq_num (for ad-hoc resources), inserting into wcti and updating wrat status_type to completed
1266: cursor time_records_cursor (c_time_entry_mode1 number,
1329: l_params(3).paramValue := p_instance_id;
1330: l_params(4).paramName := 'p_time_entry_source';
1331: l_params(4).paramValue := p_time_entry_source;
1332:
1333: wip_logger.entryPoint(p_procName => 'WIP_WS_TIME_ENTRY.process_time_records',
1334: p_params => l_params,
1335: x_returnStatus => l_return_status);
1336: if(l_return_status <> fnd_api.g_ret_sts_success) then
1337: raise fnd_api.g_exc_unexpected_error;
1346: l_last_op_qty := 'Y';
1347: end if;
1348:
1349: if(l_logLevel <= wip_constants.full_logging) then
1350: wip_logger.log('l_last_op_qty_num: ' || l_last_op_qty_num, l_return_status);
1351: wip_logger.log('l_last_op_qty: ' || l_last_op_qty, l_return_status);
1352: end if;
1353: l_last_job_qty_num := get_last_job_qty(p_wip_entity_id => p_wip_entity_id,
1354: p_operation_seq_num => p_completed_op);
1347: end if;
1348:
1349: if(l_logLevel <= wip_constants.full_logging) then
1350: wip_logger.log('l_last_op_qty_num: ' || l_last_op_qty_num, l_return_status);
1351: wip_logger.log('l_last_op_qty: ' || l_last_op_qty, l_return_status);
1352: end if;
1353: l_last_job_qty_num := get_last_job_qty(p_wip_entity_id => p_wip_entity_id,
1354: p_operation_seq_num => p_completed_op);
1355: --fix bug 13826369
1357: l_last_job_qty := 'Y';
1358: end if;
1359:
1360: if(l_logLevel <= wip_constants.full_logging) then
1361: wip_logger.log('l_last_job_qty_num: ' || l_last_job_qty_num, l_return_status);
1362: wip_logger.log('l_last_job_qty: ' || l_last_job_qty, l_return_status);
1363: end if;
1364: if (l_last_op_qty = 'Y' and p_time_entry_source = 'move') then
1365: if(l_logLevel <= wip_constants.full_logging) then
1358: end if;
1359:
1360: if(l_logLevel <= wip_constants.full_logging) then
1361: wip_logger.log('l_last_job_qty_num: ' || l_last_job_qty_num, l_return_status);
1362: wip_logger.log('l_last_job_qty: ' || l_last_job_qty, l_return_status);
1363: end if;
1364: if (l_last_op_qty = 'Y' and p_time_entry_source = 'move') then
1365: if(l_logLevel <= wip_constants.full_logging) then
1366: wip_logger.log('calling clock_out_labors()', l_return_status);
1362: wip_logger.log('l_last_job_qty: ' || l_last_job_qty, l_return_status);
1363: end if;
1364: if (l_last_op_qty = 'Y' and p_time_entry_source = 'move') then
1365: if(l_logLevel <= wip_constants.full_logging) then
1366: wip_logger.log('calling clock_out_labors()', l_return_status);
1367: end if;
1368: clock_out_labors(p_wip_entity_id, p_completed_op, 4); /* don't clock out next resources */
1369: end if;
1370:
1371: /*Bug 9853104: Clock out machines even if there is job qty in Queue/Run but
1372: all person resources have clocked out
1373: if (l_last_job_qty = 'Y') then*/
1374: if(l_logLevel <= wip_constants.full_logging) then
1375: wip_logger.log('calling clock_out_machines()', l_return_status);
1376: end if;
1377: clock_out_machines(p_wip_entity_id, p_completed_op);
1378: --end if;
1379:
1409: l_time_entry_mode;
1410: exit when time_records_cursor%NOTFOUND;
1411:
1412: if(l_logLevel <= wip_constants.full_logging) then
1413: wip_logger.log('l_entry_id: ' || l_entry_id, l_return_status);
1414: wip_logger.log('l_object_version_num: ' || l_object_version_num, l_return_status);
1415: wip_logger.log('l_add_to_rtg: ' || l_add_to_rtg, l_return_status);
1416: wip_logger.log('l_cost_flag: ' || l_cost_flag, l_return_status);
1417: wip_logger.log('l_status_type: ' || l_status_type, l_return_status);
1410: exit when time_records_cursor%NOTFOUND;
1411:
1412: if(l_logLevel <= wip_constants.full_logging) then
1413: wip_logger.log('l_entry_id: ' || l_entry_id, l_return_status);
1414: wip_logger.log('l_object_version_num: ' || l_object_version_num, l_return_status);
1415: wip_logger.log('l_add_to_rtg: ' || l_add_to_rtg, l_return_status);
1416: wip_logger.log('l_cost_flag: ' || l_cost_flag, l_return_status);
1417: wip_logger.log('l_status_type: ' || l_status_type, l_return_status);
1418: wip_logger.log('l_process_status: ' || l_process_status, l_return_status);
1411:
1412: if(l_logLevel <= wip_constants.full_logging) then
1413: wip_logger.log('l_entry_id: ' || l_entry_id, l_return_status);
1414: wip_logger.log('l_object_version_num: ' || l_object_version_num, l_return_status);
1415: wip_logger.log('l_add_to_rtg: ' || l_add_to_rtg, l_return_status);
1416: wip_logger.log('l_cost_flag: ' || l_cost_flag, l_return_status);
1417: wip_logger.log('l_status_type: ' || l_status_type, l_return_status);
1418: wip_logger.log('l_process_status: ' || l_process_status, l_return_status);
1419: wip_logger.log('l_resource_seq_num: ' || l_resource_seq_num, l_return_status);
1412: if(l_logLevel <= wip_constants.full_logging) then
1413: wip_logger.log('l_entry_id: ' || l_entry_id, l_return_status);
1414: wip_logger.log('l_object_version_num: ' || l_object_version_num, l_return_status);
1415: wip_logger.log('l_add_to_rtg: ' || l_add_to_rtg, l_return_status);
1416: wip_logger.log('l_cost_flag: ' || l_cost_flag, l_return_status);
1417: wip_logger.log('l_status_type: ' || l_status_type, l_return_status);
1418: wip_logger.log('l_process_status: ' || l_process_status, l_return_status);
1419: wip_logger.log('l_resource_seq_num: ' || l_resource_seq_num, l_return_status);
1420: wip_logger.log('l_org_id: ' || l_org_id, l_return_status);
1413: wip_logger.log('l_entry_id: ' || l_entry_id, l_return_status);
1414: wip_logger.log('l_object_version_num: ' || l_object_version_num, l_return_status);
1415: wip_logger.log('l_add_to_rtg: ' || l_add_to_rtg, l_return_status);
1416: wip_logger.log('l_cost_flag: ' || l_cost_flag, l_return_status);
1417: wip_logger.log('l_status_type: ' || l_status_type, l_return_status);
1418: wip_logger.log('l_process_status: ' || l_process_status, l_return_status);
1419: wip_logger.log('l_resource_seq_num: ' || l_resource_seq_num, l_return_status);
1420: wip_logger.log('l_org_id: ' || l_org_id, l_return_status);
1421: wip_logger.log('l_resource_id: ' || l_resource_id, l_return_status);
1414: wip_logger.log('l_object_version_num: ' || l_object_version_num, l_return_status);
1415: wip_logger.log('l_add_to_rtg: ' || l_add_to_rtg, l_return_status);
1416: wip_logger.log('l_cost_flag: ' || l_cost_flag, l_return_status);
1417: wip_logger.log('l_status_type: ' || l_status_type, l_return_status);
1418: wip_logger.log('l_process_status: ' || l_process_status, l_return_status);
1419: wip_logger.log('l_resource_seq_num: ' || l_resource_seq_num, l_return_status);
1420: wip_logger.log('l_org_id: ' || l_org_id, l_return_status);
1421: wip_logger.log('l_resource_id: ' || l_resource_id, l_return_status);
1422: wip_logger.log('l_duration: ' || l_duration, l_return_status);
1415: wip_logger.log('l_add_to_rtg: ' || l_add_to_rtg, l_return_status);
1416: wip_logger.log('l_cost_flag: ' || l_cost_flag, l_return_status);
1417: wip_logger.log('l_status_type: ' || l_status_type, l_return_status);
1418: wip_logger.log('l_process_status: ' || l_process_status, l_return_status);
1419: wip_logger.log('l_resource_seq_num: ' || l_resource_seq_num, l_return_status);
1420: wip_logger.log('l_org_id: ' || l_org_id, l_return_status);
1421: wip_logger.log('l_resource_id: ' || l_resource_id, l_return_status);
1422: wip_logger.log('l_duration: ' || l_duration, l_return_status);
1423: wip_logger.log('l_uom_code: ' || l_uom_code, l_return_status);
1416: wip_logger.log('l_cost_flag: ' || l_cost_flag, l_return_status);
1417: wip_logger.log('l_status_type: ' || l_status_type, l_return_status);
1418: wip_logger.log('l_process_status: ' || l_process_status, l_return_status);
1419: wip_logger.log('l_resource_seq_num: ' || l_resource_seq_num, l_return_status);
1420: wip_logger.log('l_org_id: ' || l_org_id, l_return_status);
1421: wip_logger.log('l_resource_id: ' || l_resource_id, l_return_status);
1422: wip_logger.log('l_duration: ' || l_duration, l_return_status);
1423: wip_logger.log('l_uom_code: ' || l_uom_code, l_return_status);
1424: wip_logger.log('l_end_date: ' || l_end_date, l_return_status);
1417: wip_logger.log('l_status_type: ' || l_status_type, l_return_status);
1418: wip_logger.log('l_process_status: ' || l_process_status, l_return_status);
1419: wip_logger.log('l_resource_seq_num: ' || l_resource_seq_num, l_return_status);
1420: wip_logger.log('l_org_id: ' || l_org_id, l_return_status);
1421: wip_logger.log('l_resource_id: ' || l_resource_id, l_return_status);
1422: wip_logger.log('l_duration: ' || l_duration, l_return_status);
1423: wip_logger.log('l_uom_code: ' || l_uom_code, l_return_status);
1424: wip_logger.log('l_end_date: ' || l_end_date, l_return_status);
1425: wip_logger.log('l_time_entry_mode: ' || l_time_entry_mode, l_return_status);
1418: wip_logger.log('l_process_status: ' || l_process_status, l_return_status);
1419: wip_logger.log('l_resource_seq_num: ' || l_resource_seq_num, l_return_status);
1420: wip_logger.log('l_org_id: ' || l_org_id, l_return_status);
1421: wip_logger.log('l_resource_id: ' || l_resource_id, l_return_status);
1422: wip_logger.log('l_duration: ' || l_duration, l_return_status);
1423: wip_logger.log('l_uom_code: ' || l_uom_code, l_return_status);
1424: wip_logger.log('l_end_date: ' || l_end_date, l_return_status);
1425: wip_logger.log('l_time_entry_mode: ' || l_time_entry_mode, l_return_status);
1426: end if;
1419: wip_logger.log('l_resource_seq_num: ' || l_resource_seq_num, l_return_status);
1420: wip_logger.log('l_org_id: ' || l_org_id, l_return_status);
1421: wip_logger.log('l_resource_id: ' || l_resource_id, l_return_status);
1422: wip_logger.log('l_duration: ' || l_duration, l_return_status);
1423: wip_logger.log('l_uom_code: ' || l_uom_code, l_return_status);
1424: wip_logger.log('l_end_date: ' || l_end_date, l_return_status);
1425: wip_logger.log('l_time_entry_mode: ' || l_time_entry_mode, l_return_status);
1426: end if;
1427: /* add the cost_flag and add_to_rtg and resource seq for the inserted rows */
1420: wip_logger.log('l_org_id: ' || l_org_id, l_return_status);
1421: wip_logger.log('l_resource_id: ' || l_resource_id, l_return_status);
1422: wip_logger.log('l_duration: ' || l_duration, l_return_status);
1423: wip_logger.log('l_uom_code: ' || l_uom_code, l_return_status);
1424: wip_logger.log('l_end_date: ' || l_end_date, l_return_status);
1425: wip_logger.log('l_time_entry_mode: ' || l_time_entry_mode, l_return_status);
1426: end if;
1427: /* add the cost_flag and add_to_rtg and resource seq for the inserted rows */
1428: if ( l_process_status = 2 ) then
1421: wip_logger.log('l_resource_id: ' || l_resource_id, l_return_status);
1422: wip_logger.log('l_duration: ' || l_duration, l_return_status);
1423: wip_logger.log('l_uom_code: ' || l_uom_code, l_return_status);
1424: wip_logger.log('l_end_date: ' || l_end_date, l_return_status);
1425: wip_logger.log('l_time_entry_mode: ' || l_time_entry_mode, l_return_status);
1426: end if;
1427: /* add the cost_flag and add_to_rtg and resource seq for the inserted rows */
1428: if ( l_process_status = 2 ) then
1429: l_change_flag := 'N';
1436: l_change_flag := 'Y';
1437: end if;
1438:
1439: if(l_logLevel <= wip_constants.full_logging) then
1440: wip_logger.log('l_cost_flag: ' || l_cost_flag, l_return_status);
1441: wip_logger.log('l_change_flag: ' || l_change_flag, l_return_status);
1442: end if;
1443: if (l_add_to_rtg is null) then
1444: l_add_to_rtg := get_add_to_rtg_flag(p_wip_entity_id => p_wip_entity_id,
1437: end if;
1438:
1439: if(l_logLevel <= wip_constants.full_logging) then
1440: wip_logger.log('l_cost_flag: ' || l_cost_flag, l_return_status);
1441: wip_logger.log('l_change_flag: ' || l_change_flag, l_return_status);
1442: end if;
1443: if (l_add_to_rtg is null) then
1444: l_add_to_rtg := get_add_to_rtg_flag(p_wip_entity_id => p_wip_entity_id,
1445: p_operation_seq_num => p_completed_op,
1449: l_change_flag := 'Y';
1450: end if;
1451:
1452: if(l_logLevel <= wip_constants.full_logging) then
1453: wip_logger.log('l_add_to_rtg: ' || l_add_to_rtg, l_return_status);
1454: wip_logger.log('l_change_flag: ' || l_change_flag, l_return_status);
1455: end if;
1456: if (l_add_to_rtg = 'Y' and l_resource_seq_num is null) then
1457: l_resource_seq_num := get_adhoc_resource_seq(
1450: end if;
1451:
1452: if(l_logLevel <= wip_constants.full_logging) then
1453: wip_logger.log('l_add_to_rtg: ' || l_add_to_rtg, l_return_status);
1454: wip_logger.log('l_change_flag: ' || l_change_flag, l_return_status);
1455: end if;
1456: if (l_add_to_rtg = 'Y' and l_resource_seq_num is null) then
1457: l_resource_seq_num := get_adhoc_resource_seq(
1458: p_wip_entity_id, p_completed_op, l_resource_id);
1458: p_wip_entity_id, p_completed_op, l_resource_id);
1459: l_change_flag := 'Y';
1460: end if;
1461: if(l_logLevel <= wip_constants.full_logging) then
1462: wip_logger.log('l_resource_seq_num: ' || l_resource_seq_num, l_return_status);
1463: wip_logger.log('l_change_flag: ' || l_change_flag, l_return_status);
1464: end if;
1465:
1466: if l_change_flag = 'Y' then
1459: l_change_flag := 'Y';
1460: end if;
1461: if(l_logLevel <= wip_constants.full_logging) then
1462: wip_logger.log('l_resource_seq_num: ' || l_resource_seq_num, l_return_status);
1463: wip_logger.log('l_change_flag: ' || l_change_flag, l_return_status);
1464: end if;
1465:
1466: if l_change_flag = 'Y' then
1467: update wip_resource_actual_times
1483: and not (p_time_entry_source = 'move' and l_time_entry_mode = 3) /* clock out but not charge */
1484: ) then
1485: if (l_cost_flag = 'Y') then
1486: if(l_logLevel <= wip_constants.full_logging) then
1487: wip_logger.log('calling derive_insert_wcti', l_return_status);
1488: end if;
1489: /*Add for Bug 10097774 */
1490: derive_insert_wcti(p_organization_id => l_org_id,
1491: p_wip_entity_id => p_wip_entity_id,
1500: x_return_status =>l_return_status);
1501: end if;
1502:
1503: if(l_logLevel <= wip_constants.full_logging) then
1504: wip_logger.log('update wip_resource_actual_times', l_return_status);
1505: end if;
1506: --mark status type complete for wrat records
1507: update wip_resource_actual_times
1508: set
1523: no active clock-ins */
1524: /*Bug 12982934:Fix the regression caused by bug 9853104*/
1525: /* Added condition on last_op_qty for Bug 13826369 */
1526: if(l_logLevel <= wip_constants.full_logging) then
1527: wip_logger.log('l_last_job_qty : '|| l_last_job_qty, l_return_status);
1528: wip_logger.log('l_last_op_qty : '|| l_last_op_qty, l_return_status);
1529: wip_logger.log('l_active_clocks : '|| l_active_clocks, l_return_status);
1530: wip_logger.log('Before calling job_off_internal', l_return_status);
1531: wip_logger.log('p_time_entry_source:'||p_time_entry_source, l_return_status);
1524: /*Bug 12982934:Fix the regression caused by bug 9853104*/
1525: /* Added condition on last_op_qty for Bug 13826369 */
1526: if(l_logLevel <= wip_constants.full_logging) then
1527: wip_logger.log('l_last_job_qty : '|| l_last_job_qty, l_return_status);
1528: wip_logger.log('l_last_op_qty : '|| l_last_op_qty, l_return_status);
1529: wip_logger.log('l_active_clocks : '|| l_active_clocks, l_return_status);
1530: wip_logger.log('Before calling job_off_internal', l_return_status);
1531: wip_logger.log('p_time_entry_source:'||p_time_entry_source, l_return_status);
1532: end if;
1525: /* Added condition on last_op_qty for Bug 13826369 */
1526: if(l_logLevel <= wip_constants.full_logging) then
1527: wip_logger.log('l_last_job_qty : '|| l_last_job_qty, l_return_status);
1528: wip_logger.log('l_last_op_qty : '|| l_last_op_qty, l_return_status);
1529: wip_logger.log('l_active_clocks : '|| l_active_clocks, l_return_status);
1530: wip_logger.log('Before calling job_off_internal', l_return_status);
1531: wip_logger.log('p_time_entry_source:'||p_time_entry_source, l_return_status);
1532: end if;
1533: -- Added p_time_entry_source check for Bug 14705770
1526: if(l_logLevel <= wip_constants.full_logging) then
1527: wip_logger.log('l_last_job_qty : '|| l_last_job_qty, l_return_status);
1528: wip_logger.log('l_last_op_qty : '|| l_last_op_qty, l_return_status);
1529: wip_logger.log('l_active_clocks : '|| l_active_clocks, l_return_status);
1530: wip_logger.log('Before calling job_off_internal', l_return_status);
1531: wip_logger.log('p_time_entry_source:'||p_time_entry_source, l_return_status);
1532: end if;
1533: -- Added p_time_entry_source check for Bug 14705770
1534:
1527: wip_logger.log('l_last_job_qty : '|| l_last_job_qty, l_return_status);
1528: wip_logger.log('l_last_op_qty : '|| l_last_op_qty, l_return_status);
1529: wip_logger.log('l_active_clocks : '|| l_active_clocks, l_return_status);
1530: wip_logger.log('Before calling job_off_internal', l_return_status);
1531: wip_logger.log('p_time_entry_source:'||p_time_entry_source, l_return_status);
1532: end if;
1533: -- Added p_time_entry_source check for Bug 14705770
1534:
1535: if (l_last_job_qty = 'Y' or p_time_entry_source = 'clock' ) then
1534:
1535: if (l_last_job_qty = 'Y' or p_time_entry_source = 'clock' ) then
1536: if( l_active_clocks = 0 and (l_last_op_qty = 'Y' or p_time_entry_source = 'clock') ) then
1537: if(l_logLevel <= wip_constants.full_logging) then
1538: wip_logger.log('While calling job_off_internal', l_return_status);
1539: end if;
1540: job_off_internal(p_wip_entity_id, p_completed_op);
1541: end if;
1542: --if (l_last_job_qty = 'Y') then
1542: --if (l_last_job_qty = 'Y') then
1543: update_actual_comp_dates(p_wip_entity_id, p_completed_op);
1544: end if;
1545: if(l_logLevel <= wip_constants.full_logging) then
1546: wip_logger.log('After calling job_off_internal', l_return_status);
1547: end if;
1548: /* for wrat records with process status deleted - delete records */
1549: delete from wip_resource_actual_times
1550: where wip_entity_id = p_wip_entity_id
1562: and operation_seq_num = p_completed_op
1563: and status_type = 1
1564: and process_status in (2,3);
1565: if (l_logLevel <= wip_constants.trace_logging) then
1566: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.process_time_records',
1567: p_procReturnStatus => l_return_status,
1568: p_msg => 'normal completion',
1569: x_returnStatus => l_return_status);
1570: end if;
1632:
1633: l_retStatus varchar2(1);
1634: l_manual_exist number;
1635: l_return_status varchar2(1);
1636: l_params wip_logger.param_tbl_t;
1637: l_logLevel NUMBER := fnd_log.g_current_runtime_level;
1638: cursor has_autocharge_manual_cursor is
1639: select 1
1640: from wip_operation_resources wor
1658: l_params(3).paramValue := p_resource_seq_num;
1659: l_params(4).paramName := 'p_time_entry_source';
1660: l_params(4).paramValue := p_time_entry_source;
1661:
1662: wip_logger.entryPoint(p_procName => 'WIP_WS_TIME_ENTRY.get_cost_flag',
1663: p_params => l_params,
1664: x_returnStatus => l_return_status);
1665: if(l_return_status <> fnd_api.g_ret_sts_success) then
1666: raise fnd_api.g_exc_unexpected_error;
1711: end if;
1712: end if;
1713: end if;
1714: if (l_logLevel <= wip_constants.trace_logging) then
1715: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.process_time_records',
1716: p_procReturnStatus => l_cost_flag,
1717: p_msg => 'normal completion',
1718: x_returnStatus => l_return_status);
1719: end if;
1783:
1784: l_min_start_date_wrat date;
1785:
1786: l_return_status varchar2(1);
1787: l_params wip_logger.param_tbl_t;
1788: l_logLevel NUMBER := fnd_log.g_current_runtime_level;
1789: cursor min_start_date_wrat_cursor is select min(wrat.start_date)
1790: from wip_resource_actual_times wrat
1791: where wrat.wip_entity_id = p_wip_entity_id
1813: l_params(2).paramValue := p_operation_seq_num;
1814: l_params(3).paramName := 'p_resource_seq_num';
1815: l_params(3).paramValue := p_resource_seq_num;
1816:
1817: wip_logger.entryPoint(p_procName => 'WIP_WS_TIME_ENTRY.update_actual_start_dates',
1818: p_params => l_params,
1819: x_returnStatus => l_return_status);
1820: if(l_return_status <> fnd_api.g_ret_sts_success) then
1821: raise fnd_api.g_exc_unexpected_error;
1866: end if;
1867: end if;
1868: close min_start_date_wo_cursor;
1869: if (l_logLevel <= wip_constants.trace_logging) then
1870: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.update_actual_start_dates',
1871: p_procReturnStatus => l_return_status,
1872: p_msg => 'normal completion',
1873: x_returnStatus => l_return_status);
1874: end if;
1882: l_max_end_date date;
1883: l_active_next_resource_flag varchar2(1);
1884:
1885: l_return_status varchar2(1);
1886: l_params wip_logger.param_tbl_t;
1887: l_logLevel NUMBER := fnd_log.g_current_runtime_level;
1888: cursor max_end_date_wrat_cursor is select max(wrat.end_date)
1889: from wip_resource_actual_times wrat
1890: where wrat.wip_entity_id = p_wip_entity_id
1930: l_params(2).paramValue := p_operation_seq_num;
1931: l_params(3).paramName := 'p_resource_seq_num';
1932: l_params(3).paramValue := p_resource_seq_num;
1933:
1934: wip_logger.entryPoint(p_procName => 'WIP_WS_TIME_ENTRY.update_actual_completion_dates',
1935: p_params => l_params,
1936: x_returnStatus => l_return_status);
1937: if(l_return_status <> fnd_api.g_ret_sts_success) then
1938: raise fnd_api.g_exc_unexpected_error;
1967: close max_end_date_wor_cursor;
1968: end if;
1969: close active_next_resource_cursor;
1970: if (l_logLevel <= wip_constants.trace_logging) then
1971: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.update_actual_completion_dates',
1972: p_procReturnStatus => l_return_status,
1973: p_msg => 'normal completion',
1974: x_returnStatus => l_return_status);
1975: end if;
1984: p_start_date IN DATE)
1985: IS
1986: l_projected_completion_date date;
1987: l_return_status varchar2(1);
1988: l_params wip_logger.param_tbl_t;
1989: l_logLevel NUMBER := fnd_log.g_current_runtime_level;
1990: BEGIN
1991: if(l_logLevel <= wip_constants.trace_logging) then
1992: l_params(1).paramName := 'p_organization_id';
2001: l_params(5).paramValue := p_resource_id;
2002: l_params(6).paramName := 'p_start_date';
2003: l_params(6).paramValue := p_start_date;
2004:
2005: wip_logger.entryPoint(p_procName => 'WIP_WS_TIME_ENTRY.update_proj_completion_dates',
2006: p_params => l_params,
2007: x_returnStatus => l_return_status);
2008: if(l_return_status <> fnd_api.g_ret_sts_success) then
2009: raise fnd_api.g_exc_unexpected_error;
2033: projected_completion_date = l_projected_completion_date
2034: where wip_entity_id = p_wip_entity_id
2035: and operation_seq_num = p_operation_seq_num;
2036: if (l_logLevel <= wip_constants.trace_logging) then
2037: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.update_proj_completion_dates',
2038: p_procReturnStatus => l_return_status,
2039: p_msg => 'normal completion',
2040: x_returnStatus => l_return_status);
2041: end if;
2106: l_status varchar2(1);
2107: l_msg_count number;
2108: l_msg varchar2(10);
2109: lx_return_status varchar2(10);
2110: l_params wip_logger.param_tbl_t;
2111: l_logLevel NUMBER := fnd_log.g_current_runtime_level;
2112: BEGIN
2113: if(l_logLevel <= wip_constants.trace_logging) then
2114: l_params(1).paramName := 'p_employee_id';
2117: l_params(2).paramValue := p_wip_entity_id;
2118: l_params(3).paramName := 'p_operation_seq_num';
2119: l_params(3).paramValue := p_operation_seq_num;
2120:
2121: wip_logger.entryPoint(p_procName => 'WIP_WS_TIME_ENTRY.job_on',
2122: p_params => l_params,
2123: x_returnStatus => l_status);
2124: if(l_status <> fnd_api.g_ret_sts_success) then
2125: raise fnd_api.g_exc_unexpected_error;
2142: x_status := l_status;
2143: x_msg_count := l_msg_count;
2144: x_msg := l_msg;
2145: if (l_logLevel <= wip_constants.trace_logging) then
2146: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.job_on',
2147: p_procReturnStatus => l_status,
2148: p_msg => 'normal completion',
2149: x_returnStatus => l_status);
2150: end if;
2162:
2163: l_status varchar2(1);
2164: l_msg_count number;
2165: l_msg varchar2(255);
2166: l_params wip_logger.param_tbl_t;
2167: l_logLevel NUMBER := fnd_log.g_current_runtime_level;
2168: BEGIN
2169: if(l_logLevel <= wip_constants.trace_logging) then
2170: l_params(1).paramName := 'p_wip_entity_id';
2171: l_params(1).paramValue := p_wip_entity_id;
2172: l_params(2).paramName := 'p_operation_seq_num';
2173: l_params(2).paramValue := p_operation_seq_num;
2174:
2175: wip_logger.entryPoint(p_procName => 'WIP_WS_TIME_ENTRY.job_off',
2176: p_params => l_params,
2177: x_returnStatus => l_status);
2178: if(l_status <> fnd_api.g_ret_sts_success) then
2179: raise fnd_api.g_exc_unexpected_error;
2209: x_status := l_status;
2210: x_msg_count := l_msg_count;
2211: x_msg := l_msg;
2212: if (l_logLevel <= wip_constants.trace_logging) then
2213: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.job_off',
2214: p_procReturnStatus => l_status,
2215: p_msg => 'normal completion',
2216: x_returnStatus => l_status);
2217: end if;
2282: badge_validation Boolean:=FALSE;
2283: l_person_id number;
2284: l_time_entry number;
2285: l_ret_status varchar2(200);
2286: l_params wip_logger.param_tbl_t;
2287: l_logLevel NUMBER := fnd_log.g_current_runtime_level;
2288:
2289: CURSOR shift_in_cursor IS
2290: SELECT 1 FROM wip_resource_actual_times wrat
2299: l_params(1).paramValue := p_wip_employee_id;
2300: l_params(2).paramName := 'p_org_id';
2301: l_params(2).paramValue := p_org_id;
2302:
2303: wip_logger.entryPoint(p_procName => 'WIP_WS_TIME_ENTRY.shift_in',
2304: p_params => l_params,
2305: x_returnStatus => x_status);
2306: if(x_status <> fnd_api.g_ret_sts_success) then
2307: raise fnd_api.g_exc_unexpected_error;
2319:
2320: IF (badge_validation = true) then
2321: l_shift_status :='N';
2322: if(l_logLevel <= wip_constants.trace_logging) then
2323: wip_logger.log('l_shift_status: ' || l_shift_status, l_ret_status);
2324: end if;
2325: ELSIF shift_in_cursor % FOUND THEN
2326: --Already Shifted in
2327: l_shift_status := 'C';
2326: --Already Shifted in
2327: l_shift_status := 'C';
2328: ELSE
2329: if(l_logLevel <= wip_constants.trace_logging) then
2330: wip_logger.log('inserting into wip_resource_actual_times', l_ret_status);
2331: end if;
2332: --shift in employee for which badge number was entered
2333: -- removed hardcoding of resource_id for bug 6969269.
2334: insert into wip_resource_actual_times
2356: END IF;
2357: CLOSE shift_in_cursor;
2358: x_status := l_shift_status;
2359: --fix logging issue. x_status is the output parameter for this procedure
2360: --we shouldn't set it as an output of wip_logger.exitPoint. Else
2361: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
2362: if (l_logLevel <= wip_constants.trace_logging) then
2363: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.shift_in',
2364: p_procReturnStatus => x_status,
2357: CLOSE shift_in_cursor;
2358: x_status := l_shift_status;
2359: --fix logging issue. x_status is the output parameter for this procedure
2360: --we shouldn't set it as an output of wip_logger.exitPoint. Else
2361: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
2362: if (l_logLevel <= wip_constants.trace_logging) then
2363: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.shift_in',
2364: p_procReturnStatus => x_status,
2365: p_msg => 'normal completion',
2359: --fix logging issue. x_status is the output parameter for this procedure
2360: --we shouldn't set it as an output of wip_logger.exitPoint. Else
2361: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
2362: if (l_logLevel <= wip_constants.trace_logging) then
2363: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.shift_in',
2364: p_procReturnStatus => x_status,
2365: p_msg => 'normal completion',
2366: x_returnStatus => l_ret_status);
2367: end if;
2378: l_date date;
2379: l_duration number;
2380: badge_validation Boolean:= false;
2381: l_person_id number;
2382: l_params wip_logger.param_tbl_t;
2383: l_logLevel NUMBER := fnd_log.g_current_runtime_level;
2384: l_ret_status varchar2(1);
2385:
2386: cursor shift_out_test_cursor is
2396: l_params(1).paramValue := p_wip_employee_id;
2397: l_params(2).paramName := 'p_org_id';
2398: l_params(2).paramValue := p_org_id;
2399:
2400: wip_logger.entryPoint(p_procName => 'WIP_WS_TIME_ENTRY.shift_out',
2401: p_params => l_params,
2402: x_returnStatus => x_status);
2403: if(x_status <> fnd_api.g_ret_sts_success) then
2404: raise fnd_api.g_exc_unexpected_error;
2434: end if;
2435: close shift_out_test_cursor;
2436: x_status := l_shift_status;
2437: --fix logging issue. x_status is the output parameter for this procedure
2438: --we shouldn't set it as an output of wip_logger.exitPoint. Else
2439: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
2440: if (l_logLevel <= wip_constants.trace_logging) then
2441: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.shift_out',
2442: p_procReturnStatus => x_status,
2435: close shift_out_test_cursor;
2436: x_status := l_shift_status;
2437: --fix logging issue. x_status is the output parameter for this procedure
2438: --we shouldn't set it as an output of wip_logger.exitPoint. Else
2439: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
2440: if (l_logLevel <= wip_constants.trace_logging) then
2441: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.shift_out',
2442: p_procReturnStatus => x_status,
2443: p_msg => 'normal completion',
2437: --fix logging issue. x_status is the output parameter for this procedure
2438: --we shouldn't set it as an output of wip_logger.exitPoint. Else
2439: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
2440: if (l_logLevel <= wip_constants.trace_logging) then
2441: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.shift_out',
2442: p_procReturnStatus => x_status,
2443: p_msg => 'normal completion',
2444: x_returnStatus => l_ret_status);
2445: end if;
2456: badge_validation Boolean :=false;
2457: l_person_id number;
2458: l_ret_status varchar2(1);
2459:
2460: l_params wip_logger.param_tbl_t;
2461: l_logLevel NUMBER := fnd_log.g_current_runtime_level;
2462: cursor undo_shift_in_test_cursor is
2463: select 1 from wip_resource_actual_times wrat
2464: where wrat.wip_entity_id is null
2471: l_params(1).paramValue := p_wip_employee_id;
2472: l_params(2).paramName := 'p_org_id';
2473: l_params(2).paramValue := p_org_id;
2474:
2475: wip_logger.entryPoint(p_procName => 'WIP_WS_TIME_ENTRY.undo_shift_in',
2476: p_params => l_params,
2477: x_returnStatus => x_status);
2478: if(x_status <> fnd_api.g_ret_sts_success) then
2479: raise fnd_api.g_exc_unexpected_error;
2503: end if;
2504: close undo_shift_in_test_cursor;
2505: x_status := l_shift_status;
2506: --fix logging issue. x_status is the output parameter for this procedure
2507: --we shouldn't set it as an output of wip_logger.exitPoint. Else
2508: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
2509: if (l_logLevel <= wip_constants.trace_logging) then
2510: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.undo_shift_in',
2511: p_procReturnStatus => x_status,
2504: close undo_shift_in_test_cursor;
2505: x_status := l_shift_status;
2506: --fix logging issue. x_status is the output parameter for this procedure
2507: --we shouldn't set it as an output of wip_logger.exitPoint. Else
2508: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
2509: if (l_logLevel <= wip_constants.trace_logging) then
2510: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.undo_shift_in',
2511: p_procReturnStatus => x_status,
2512: p_msg => 'normal completion',
2506: --fix logging issue. x_status is the output parameter for this procedure
2507: --we shouldn't set it as an output of wip_logger.exitPoint. Else
2508: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
2509: if (l_logLevel <= wip_constants.trace_logging) then
2510: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.undo_shift_in',
2511: p_procReturnStatus => x_status,
2512: p_msg => 'normal completion',
2513: x_returnStatus => l_ret_status);
2514: end if;
2524: badge_validation Boolean:=FALSE;
2525: l_person_id number;
2526: l_time_entry number;
2527: l_ret_status varchar2(200);
2528: l_params wip_logger.param_tbl_t;
2529: l_logLevel NUMBER := fnd_log.g_current_runtime_level;
2530:
2531: CURSOR shift_in_cursor IS
2532: SELECT 1 FROM wip_resource_actual_times wrat
2541: l_params(1).paramValue := p_wip_employee_id;
2542: l_params(2).paramName := 'p_org_id';
2543: l_params(2).paramValue := p_org_id;
2544:
2545: wip_logger.entryPoint(p_procName => 'WIP_WS_TIME_ENTRY.shift_in_UM',
2546: p_params => l_params,
2547: x_returnStatus => x_status);
2548: if(x_status <> fnd_api.g_ret_sts_success) then
2549: raise fnd_api.g_exc_unexpected_error;
2588: END IF;
2589: CLOSE shift_in_cursor;
2590: x_status := l_shift_status;
2591: --fix logging issue. x_status is the output parameter for this procedure
2592: --we shouldn't set it as an output of wip_logger.exitPoint. Else
2593: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
2594: if (l_logLevel <= wip_constants.trace_logging) then
2595: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.shift_in_UM',
2596: p_procReturnStatus => x_status,
2589: CLOSE shift_in_cursor;
2590: x_status := l_shift_status;
2591: --fix logging issue. x_status is the output parameter for this procedure
2592: --we shouldn't set it as an output of wip_logger.exitPoint. Else
2593: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
2594: if (l_logLevel <= wip_constants.trace_logging) then
2595: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.shift_in_UM',
2596: p_procReturnStatus => x_status,
2597: p_msg => 'normal completion',
2591: --fix logging issue. x_status is the output parameter for this procedure
2592: --we shouldn't set it as an output of wip_logger.exitPoint. Else
2593: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
2594: if (l_logLevel <= wip_constants.trace_logging) then
2595: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.shift_in_UM',
2596: p_procReturnStatus => x_status,
2597: p_msg => 'normal completion',
2598: x_returnStatus => l_ret_status);
2599: end if;
2611: badge_validation Boolean:= false;
2612: l_person_id number;
2613: l_ret_status varchar2(1);
2614:
2615: l_params wip_logger.param_tbl_t;
2616: l_logLevel NUMBER := fnd_log.g_current_runtime_level;
2617: cursor shift_out_test_cursor is
2618: select start_date from wip_resource_actual_times wrat
2619: where wrat.wip_entity_id is null
2627: l_params(1).paramValue := p_wip_employee_id;
2628: l_params(2).paramName := 'p_org_id';
2629: l_params(2).paramValue := p_org_id;
2630:
2631: wip_logger.entryPoint(p_procName => 'WIP_WS_TIME_ENTRY.shift_out_UM',
2632: p_params => l_params,
2633: x_returnStatus => x_status);
2634: if(x_status <> fnd_api.g_ret_sts_success) then
2635: raise fnd_api.g_exc_unexpected_error;
2661: end if;
2662: close shift_out_test_cursor;
2663: x_status := l_shift_status;
2664: --fix logging issue. x_status is the output parameter for this procedure
2665: --we shouldn't set it as an output of wip_logger.exitPoint. Else
2666: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
2667: if (l_logLevel <= wip_constants.trace_logging) then
2668: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.shift_out_UM',
2669: p_procReturnStatus => x_status,
2662: close shift_out_test_cursor;
2663: x_status := l_shift_status;
2664: --fix logging issue. x_status is the output parameter for this procedure
2665: --we shouldn't set it as an output of wip_logger.exitPoint. Else
2666: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
2667: if (l_logLevel <= wip_constants.trace_logging) then
2668: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.shift_out_UM',
2669: p_procReturnStatus => x_status,
2670: p_msg => 'normal completion',
2664: --fix logging issue. x_status is the output parameter for this procedure
2665: --we shouldn't set it as an output of wip_logger.exitPoint. Else
2666: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
2667: if (l_logLevel <= wip_constants.trace_logging) then
2668: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.shift_out_UM',
2669: p_procReturnStatus => x_status,
2670: p_msg => 'normal completion',
2671: x_returnStatus => l_ret_status);
2672: end if;
2680: l_shift_status varchar2(1);
2681: l_dummy_var number;
2682: badge_validation Boolean :=false;
2683: l_person_id number;
2684: l_params wip_logger.param_tbl_t;
2685: l_logLevel NUMBER := fnd_log.g_current_runtime_level;
2686: l_ret_status varchar2(1);
2687:
2688: cursor undo_shift_in_test_cursor is
2698: l_params(1).paramValue := p_wip_employee_id;
2699: l_params(2).paramName := 'p_org_id';
2700: l_params(2).paramValue := p_org_id;
2701:
2702: wip_logger.entryPoint(p_procName => 'WIP_WS_TIME_ENTRY.undo_shift_in_UM',
2703: p_params => l_params,
2704: x_returnStatus => x_status);
2705: if(x_status <> fnd_api.g_ret_sts_success) then
2706: raise fnd_api.g_exc_unexpected_error;
2728: end if;
2729: close undo_shift_in_test_cursor;
2730: x_status := l_shift_status;
2731: --fix logging issue. x_status is the output parameter for this procedure
2732: --we shouldn't set it as an output of wip_logger.exitPoint. Else
2733: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
2734: if (l_logLevel <= wip_constants.trace_logging) then
2735: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.undo_shift_in_UM',
2736: p_procReturnStatus => x_status,
2729: close undo_shift_in_test_cursor;
2730: x_status := l_shift_status;
2731: --fix logging issue. x_status is the output parameter for this procedure
2732: --we shouldn't set it as an output of wip_logger.exitPoint. Else
2733: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
2734: if (l_logLevel <= wip_constants.trace_logging) then
2735: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.undo_shift_in_UM',
2736: p_procReturnStatus => x_status,
2737: p_msg => 'normal completion',
2731: --fix logging issue. x_status is the output parameter for this procedure
2732: --we shouldn't set it as an output of wip_logger.exitPoint. Else
2733: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
2734: if (l_logLevel <= wip_constants.trace_logging) then
2735: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.undo_shift_in_UM',
2736: p_procReturnStatus => x_status,
2737: p_msg => 'normal completion',
2738: x_returnStatus => l_ret_status);
2739: end if;
2766: lx_time_entry_id number;
2767: lx_return_status varchar2(10);
2768: l_num_job_op number;
2769: l_skill_check number;
2770: l_params wip_logger.param_tbl_t;
2771: l_logLevel NUMBER := fnd_log.g_current_runtime_level;
2772: l_ret_status varchar2(1);
2773:
2774: cursor clock_in_cursor is select 1
2848: l_params(7).paramValue := p_resource_id;
2849: l_params(8).paramName := 'p_resource_seq_num';
2850: l_params(8).paramValue := p_resource_seq_num;
2851:
2852: wip_logger.entryPoint(p_procName => 'WIP_WS_TIME_ENTRY.clock_in',
2853: p_params => l_params,
2854: x_returnStatus => x_status);
2855: if(x_status <> fnd_api.g_ret_sts_success) then
2856: raise fnd_api.g_exc_unexpected_error;
2861: if WIP_TIME_ENTRY_PUB.is_emp_shift_in(p_wip_entity_id => p_wip_entity_id,
2862: p_employee_id => p_employee_id) then
2863:
2864: if(l_logLevel <= wip_constants.trace_logging) then
2865: wip_logger.log('is_emp_shift_in = Y', x_status);
2866: end if;
2867: l_skill_check := WIP_WS_SKILL_CHECK_PVT.validate_skill_for_clock_in(
2868: p_wip_entity_id => p_wip_entity_id,
2869: p_op_seq_num => p_operation_seq_num,
2869: p_op_seq_num => p_operation_seq_num,
2870: p_emp_id => p_employee_id);
2871:
2872: if(l_logLevel <= wip_constants.trace_logging) then
2873: wip_logger.log('l_skill_check: ' || l_skill_check, x_status);
2874: end if;
2875: if l_skill_check = WIP_WS_SKILL_CHECK_PVT.G_SKILL_VALIDATION_SUCCESS then
2876:
2877: open clock_in_cursor;
2879: if clock_in_cursor%FOUND then
2880: l_clock_status := 'C';
2881: else
2882: if(l_logLevel <= wip_constants.trace_logging) then
2883: wip_logger.log('calling job_on', x_status);
2884: end if;
2885: job_on(p_wip_entity_id => p_wip_entity_id,
2886: p_operation_seq_num => p_operation_seq_num,
2887: p_employee_id => p_employee_id,
2889: x_msg_count => lx_msg_count,
2890: x_msg => lx_msg);
2891:
2892: if(l_logLevel <= wip_constants.trace_logging) then
2893: wip_logger.log('calling get_org_dept_ids', x_status);
2894: end if;
2895: get_org_dept_ids(p_wip_entity_id => p_wip_entity_id,
2896: p_operation_seq_num => p_operation_seq_num,
2897: x_organization_id => lx_organization_id,
2953: l_uom_code;
2954: exit when time_records_machine_cursor%NOTFOUND;
2955:
2956: if(l_logLevel <= wip_constants.trace_logging) then
2957: wip_logger.log('calling record_insert (loop)', x_status);
2958: end if;
2959: --clock in machines that have not already been clocked in
2960: record_insert(p_time_entry_id => null,
2961: p_organization_id => lx_organization_id,
2987: close time_records_machine_cursor;
2988: end if;
2989:
2990: if(l_logLevel <= wip_constants.trace_logging) then
2991: wip_logger.log('calling process_time_records', x_status);
2992: end if;
2993:
2994: process_time_records(p_wip_entity_id => p_wip_entity_id,
2995: p_completed_op => p_operation_seq_num,
3011: else
3012: x_status := 'H';
3013: end if;
3014: --fix logging issue. x_status is the output parameter for this procedure
3015: --we shouldn't set it as an output of wip_logger.exitPoint. Else
3016: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
3017: if (l_logLevel <= wip_constants.trace_logging) then
3018: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.clock_in',
3019: p_procReturnStatus => x_status,
3012: x_status := 'H';
3013: end if;
3014: --fix logging issue. x_status is the output parameter for this procedure
3015: --we shouldn't set it as an output of wip_logger.exitPoint. Else
3016: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
3017: if (l_logLevel <= wip_constants.trace_logging) then
3018: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.clock_in',
3019: p_procReturnStatus => x_status,
3020: p_msg => 'normal completion',
3014: --fix logging issue. x_status is the output parameter for this procedure
3015: --we shouldn't set it as an output of wip_logger.exitPoint. Else
3016: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
3017: if (l_logLevel <= wip_constants.trace_logging) then
3018: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.clock_in',
3019: p_procReturnStatus => x_status,
3020: p_msg => 'normal completion',
3021: x_returnStatus => l_ret_status);
3022: end if;
3047: l_duration number;
3048: l_uom_code varchar2(3);
3049: l_ret_status varchar2(1);
3050:
3051: l_params wip_logger.param_tbl_t;
3052: l_logLevel NUMBER := fnd_log.g_current_runtime_level;
3053: cursor clock_out_test_cursor is
3054: select object_version_number,
3055: start_date
3080: l_params(7).paramValue := p_resource_id;
3081: l_params(8).paramName := 'p_resource_seq_num';
3082: l_params(8).paramValue := p_resource_seq_num;
3083:
3084: wip_logger.entryPoint(p_procName => 'WIP_WS_TIME_ENTRY.clock_out',
3085: p_params => l_params,
3086: x_returnStatus => x_status);
3087: if(x_status <> fnd_api.g_ret_sts_success) then
3088: raise fnd_api.g_exc_unexpected_error;
3098: if clock_out_test_cursor%NOTFOUND then
3099: l_clock_status := 'O';
3100: else
3101: if(l_logLevel <= wip_constants.trace_logging) then
3102: wip_logger.log('updating wip_resource_actual_times', x_status);
3103: end if;
3104: l_date := sysdate;
3105: l_duration := (l_date - l_start_date)*24;
3106: update wip_resource_actual_times set
3123: and status_type = 1
3124: and end_date is null;
3125:
3126: if(l_logLevel <= wip_constants.trace_logging) then
3127: wip_logger.log('calling process_time_records()', x_status);
3128: end if;
3129: process_time_records(p_wip_entity_id => p_wip_entity_id,
3130: p_completed_op => p_operation_seq_num,
3131: p_instance_id => null,
3139: l_clock_status := 'T';
3140: end if;
3141: x_status := l_clock_status;
3142: --fix logging issue. x_status is the output parameter for this procedure
3143: --we shouldn't set it as an output of wip_logger.exitPoint. Else
3144: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
3145: if (l_logLevel <= wip_constants.trace_logging) then
3146: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.clock_out',
3147: p_procReturnStatus => x_status,
3140: end if;
3141: x_status := l_clock_status;
3142: --fix logging issue. x_status is the output parameter for this procedure
3143: --we shouldn't set it as an output of wip_logger.exitPoint. Else
3144: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
3145: if (l_logLevel <= wip_constants.trace_logging) then
3146: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.clock_out',
3147: p_procReturnStatus => x_status,
3148: p_msg => 'normal completion',
3142: --fix logging issue. x_status is the output parameter for this procedure
3143: --we shouldn't set it as an output of wip_logger.exitPoint. Else
3144: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
3145: if (l_logLevel <= wip_constants.trace_logging) then
3146: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.clock_out',
3147: p_procReturnStatus => x_status,
3148: p_msg => 'normal completion',
3149: x_returnStatus => l_ret_status);
3150: end if;
3164: x_msg out NOCOPY VARCHAR2)
3165: IS
3166: l_clock_status varchar2(1);
3167: lx_return_status varchar2(10);
3168: l_params wip_logger.param_tbl_t;
3169: l_logLevel NUMBER := fnd_log.g_current_runtime_level;
3170: l_ret_status varchar2(1);
3171: BEGIN
3172: if(l_logLevel <= wip_constants.trace_logging) then
3186: l_params(7).paramValue := p_resource_id;
3187: l_params(8).paramName := 'p_resource_seq_num';
3188: l_params(8).paramValue := p_resource_seq_num;
3189:
3190: wip_logger.entryPoint(p_procName => 'WIP_WS_TIME_ENTRY.undo_clock_in',
3191: p_params => l_params,
3192: x_returnStatus => x_status);
3193: if(x_status <> fnd_api.g_ret_sts_success) then
3194: raise fnd_api.g_exc_unexpected_error;
3195: end if;
3196: end if;
3197: l_clock_status := 'U';
3198: if(l_logLevel <= wip_constants.trace_logging) then
3199: wip_logger.log('calling record_delete', x_status);
3200: end if;
3201: record_delete(p_wip_entity_id => p_wip_entity_id,
3202: p_operation_seq_num => p_operation_seq_num,
3203: p_employee_id => p_employee_id,
3204: x_return_status => lx_return_status);
3205:
3206: if (lx_return_status = 'S') then
3207: if(l_logLevel <= wip_constants.trace_logging) then
3208: wip_logger.log('calling process_time_records()', x_status);
3209: end if;
3210: process_time_records(p_wip_entity_id => p_wip_entity_id,
3211: p_completed_op => p_operation_seq_num,
3212: p_instance_id => null,
3216: l_clock_status := 'E';
3217: end if;
3218: x_status := l_clock_status;
3219: --fix logging issue. x_status is the output parameter for this procedure
3220: --we shouldn't set it as an output of wip_logger.exitPoint. Else
3221: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
3222: if (l_logLevel <= wip_constants.trace_logging) then
3223: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.undo_clock_in',
3224: p_procReturnStatus => x_status,
3217: end if;
3218: x_status := l_clock_status;
3219: --fix logging issue. x_status is the output parameter for this procedure
3220: --we shouldn't set it as an output of wip_logger.exitPoint. Else
3221: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
3222: if (l_logLevel <= wip_constants.trace_logging) then
3223: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.undo_clock_in',
3224: p_procReturnStatus => x_status,
3225: p_msg => 'normal completion',
3219: --fix logging issue. x_status is the output parameter for this procedure
3220: --we shouldn't set it as an output of wip_logger.exitPoint. Else
3221: --x_status will be overwritten by wip_logger.exitPoint and wrong x_status is return
3222: if (l_logLevel <= wip_constants.trace_logging) then
3223: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.undo_clock_in',
3224: p_procReturnStatus => x_status,
3225: p_msg => 'normal completion',
3226: x_returnStatus => l_ret_status);
3227: end if;
3413: p_hour_uom in varchar2,
3414: x_return_status out NOCOPY varchar2)
3415: IS
3416: l_logLevel NUMBER := to_number(fnd_log.g_current_runtime_level);
3417: l_params wip_logger.param_tbl_t;
3418: l_msg VARCHAR2(100);
3419: l_retStatus VARCHAR2(1);
3420:
3421: l_organization_code varchar2(3);
3464: l_params(9).paramName := 'p_txn_uom';
3465: l_params(9).paramValue := p_txn_uom;
3466: l_params(10).paramName := 'p_hour_uom';
3467: l_params(10).paramValue := p_hour_uom;
3468: wip_logger.entryPoint(p_procName => 'WIP_WS_TIME_ENTRY.derive_insert_wcti',
3469: p_params => l_params,
3470: x_returnStatus => l_retStatus);
3471: end if;
3472:
3476: where organization_id = p_organization_id;
3477:
3478:
3479: if (l_logLevel <= wip_constants.full_logging) then
3480: wip_logger.log('derive_insert_wcti Phase 10', l_retStatus);
3481: wip_logger.log('l_organization_code = '|| l_organization_code, l_retStatus);
3482: end if;
3483:
3484: select wip_entity_name
3477:
3478:
3479: if (l_logLevel <= wip_constants.full_logging) then
3480: wip_logger.log('derive_insert_wcti Phase 10', l_retStatus);
3481: wip_logger.log('l_organization_code = '|| l_organization_code, l_retStatus);
3482: end if;
3483:
3484: select wip_entity_name
3485: into l_wip_entity_name
3486: from wip_entities
3487: where wip_entity_id = p_wip_entity_id;
3488:
3489: if (l_logLevel <= wip_constants.full_logging) then
3490: wip_logger.log('derive_insert_wcti Phase 20', l_retStatus);
3491: wip_logger.log('l_wip_entity_name = '|| l_wip_entity_name, l_retStatus);
3492: end if;
3493:
3494: -- Modified for Bug 16528843.
3487: where wip_entity_id = p_wip_entity_id;
3488:
3489: if (l_logLevel <= wip_constants.full_logging) then
3490: wip_logger.log('derive_insert_wcti Phase 20', l_retStatus);
3491: wip_logger.log('l_wip_entity_name = '|| l_wip_entity_name, l_retStatus);
3492: end if;
3493:
3494: -- Modified for Bug 16528843.
3495: select br.resource_code, br.resource_type
3497: from bom_resources br
3498: where br.resource_id = p_resource_id;
3499:
3500: if (l_logLevel <= wip_constants.full_logging) then
3501: wip_logger.log('derive_insert_wcti Phase 30', l_retStatus);
3502: wip_logger.log('l_resource_code = '|| l_resource_code|| ' l_resource_type = '|| l_resource_type, l_retStatus);
3503: end if;
3504:
3505: if( l_resource_type = 2 ) then /* for labor, try get the employee id and num */
3498: where br.resource_id = p_resource_id;
3499:
3500: if (l_logLevel <= wip_constants.full_logging) then
3501: wip_logger.log('derive_insert_wcti Phase 30', l_retStatus);
3502: wip_logger.log('l_resource_code = '|| l_resource_code|| ' l_resource_type = '|| l_resource_type, l_retStatus);
3503: end if;
3504:
3505: if( l_resource_type = 2 ) then /* for labor, try get the employee id and num */
3506:
3578: l_employee_num := null;
3579: end if;
3580:
3581: if (l_logLevel <= wip_constants.full_logging) then
3582: wip_logger.log('derive_insert_wcti Phase 40', l_retStatus);
3583: wip_logger.log('l_employee_id = '|| l_employee_id ||' l_employee_num = '|| l_employee_num, l_retStatus);
3584: end if;
3585:
3586: -- Bug 13481688 @Start
3579: end if;
3580:
3581: if (l_logLevel <= wip_constants.full_logging) then
3582: wip_logger.log('derive_insert_wcti Phase 40', l_retStatus);
3583: wip_logger.log('l_employee_id = '|| l_employee_id ||' l_employee_num = '|| l_employee_num, l_retStatus);
3584: end if;
3585:
3586: -- Bug 13481688 @Start
3587: l_resource_seq_num := p_resource_seq_num;
3589: l_resource_seq_num := get_adhoc_resource_seq(
3590: p_wip_entity_id, p_operation_seq_num, p_resource_id);
3591: end if;
3592: if (l_logLevel <= wip_constants.full_logging) then
3593: wip_logger.log('derive_insert_wcti:l_resource_seq_num = '|| l_resource_seq_num , l_retStatus);
3594: end if;
3595: -- Bug 13481688 @End
3596: --Bug 10097774 get department_id and department_code
3597: select wo.department_id, bd.department_code
3601: and wo.operation_seq_num = p_operation_seq_num
3602: and wo.department_id = bd.department_id;
3603:
3604: if (l_logLevel <= wip_constants.full_logging) then
3605: wip_logger.log('derive_insert_wcti Phase 50', l_retStatus);
3606: wip_logger.log('l_department_id = '|| l_department_id ||' l_department_code = '|| l_department_code, l_retStatus);
3607: end if;
3608:
3609:
3602: and wo.department_id = bd.department_id;
3603:
3604: if (l_logLevel <= wip_constants.full_logging) then
3605: wip_logger.log('derive_insert_wcti Phase 50', l_retStatus);
3606: wip_logger.log('l_department_id = '|| l_department_id ||' l_department_code = '|| l_department_code, l_retStatus);
3607: end if;
3608:
3609:
3610: --Bug 10097774 get resource basis_type, standard_rate_flag, primary_uom
3632: and (ca.organization_id is null or ca.organization_id = p_organization_id);
3633: end;
3634:
3635: if (l_logLevel <= wip_constants.full_logging) then
3636: wip_logger.log('derive_insert_wcti Phase 60', l_retStatus);
3637: wip_logger.log('l_basis_type = '|| l_basis_type, l_retStatus);
3638: wip_logger.log('l_standard_rate_flag = '|| l_standard_rate_flag, l_retStatus);
3639: wip_logger.log('l_primary_uom = '|| l_primary_uom, l_retStatus);
3640: end if;
3633: end;
3634:
3635: if (l_logLevel <= wip_constants.full_logging) then
3636: wip_logger.log('derive_insert_wcti Phase 60', l_retStatus);
3637: wip_logger.log('l_basis_type = '|| l_basis_type, l_retStatus);
3638: wip_logger.log('l_standard_rate_flag = '|| l_standard_rate_flag, l_retStatus);
3639: wip_logger.log('l_primary_uom = '|| l_primary_uom, l_retStatus);
3640: end if;
3641:
3634:
3635: if (l_logLevel <= wip_constants.full_logging) then
3636: wip_logger.log('derive_insert_wcti Phase 60', l_retStatus);
3637: wip_logger.log('l_basis_type = '|| l_basis_type, l_retStatus);
3638: wip_logger.log('l_standard_rate_flag = '|| l_standard_rate_flag, l_retStatus);
3639: wip_logger.log('l_primary_uom = '|| l_primary_uom, l_retStatus);
3640: end if;
3641:
3642: --Bug 10097774 get primary_item_id, project_id, task_id
3635: if (l_logLevel <= wip_constants.full_logging) then
3636: wip_logger.log('derive_insert_wcti Phase 60', l_retStatus);
3637: wip_logger.log('l_basis_type = '|| l_basis_type, l_retStatus);
3638: wip_logger.log('l_standard_rate_flag = '|| l_standard_rate_flag, l_retStatus);
3639: wip_logger.log('l_primary_uom = '|| l_primary_uom, l_retStatus);
3640: end if;
3641:
3642: --Bug 10097774 get primary_item_id, project_id, task_id
3643: select primary_item_id, project_id, task_id
3645: from wip_discrete_jobs
3646: where wip_entity_id = p_wip_entity_id;
3647:
3648: if (l_logLevel <= wip_constants.full_logging) then
3649: wip_logger.log('derive_insert_wcti Phase 70', l_retStatus);
3650: wip_logger.log('l_primary_item_id = '|| l_primary_item_id, l_retStatus);
3651: wip_logger.log('l_project_id = '|| l_project_id, l_retStatus);
3652: wip_logger.log('l_task_id = '|| l_task_id, l_retStatus);
3653: end if;
3646: where wip_entity_id = p_wip_entity_id;
3647:
3648: if (l_logLevel <= wip_constants.full_logging) then
3649: wip_logger.log('derive_insert_wcti Phase 70', l_retStatus);
3650: wip_logger.log('l_primary_item_id = '|| l_primary_item_id, l_retStatus);
3651: wip_logger.log('l_project_id = '|| l_project_id, l_retStatus);
3652: wip_logger.log('l_task_id = '|| l_task_id, l_retStatus);
3653: end if;
3654:
3647:
3648: if (l_logLevel <= wip_constants.full_logging) then
3649: wip_logger.log('derive_insert_wcti Phase 70', l_retStatus);
3650: wip_logger.log('l_primary_item_id = '|| l_primary_item_id, l_retStatus);
3651: wip_logger.log('l_project_id = '|| l_project_id, l_retStatus);
3652: wip_logger.log('l_task_id = '|| l_task_id, l_retStatus);
3653: end if;
3654:
3655: --Bug 10097774 get account_period_id
3648: if (l_logLevel <= wip_constants.full_logging) then
3649: wip_logger.log('derive_insert_wcti Phase 70', l_retStatus);
3650: wip_logger.log('l_primary_item_id = '|| l_primary_item_id, l_retStatus);
3651: wip_logger.log('l_project_id = '|| l_project_id, l_retStatus);
3652: wip_logger.log('l_task_id = '|| l_task_id, l_retStatus);
3653: end if;
3654:
3655: --Bug 10097774 get account_period_id
3656: invttmtx.tdatechk(org_id => p_organization_id,
3663: raise fnd_api.g_exc_unexpected_error;
3664: end if;
3665:
3666: if (l_logLevel <= wip_constants.full_logging) then
3667: wip_logger.log('derive_insert_wcti Phase 80', l_retStatus);
3668: wip_logger.log('l_acctPeriodID = '|| l_acctPeriodID, l_retStatus);
3669: end if;
3670:
3671: --Bug 10097774 get employee hourly rate for labor resoruce
3664: end if;
3665:
3666: if (l_logLevel <= wip_constants.full_logging) then
3667: wip_logger.log('derive_insert_wcti Phase 80', l_retStatus);
3668: wip_logger.log('l_acctPeriodID = '|| l_acctPeriodID, l_retStatus);
3669: end if;
3670:
3671: --Bug 10097774 get employee hourly rate for labor resoruce
3672: if(l_employee_id is not null) then
3689: l_actual_resource_rate := null;
3690: end if;
3691:
3692: if (l_logLevel <= wip_constants.full_logging) then
3693: wip_logger.log('derive_insert_wcti Phase 90', l_retStatus);
3694: wip_logger.log('l_actual_resource_rate = '|| l_actual_resource_rate, l_retStatus);
3695: end if;
3696:
3697: --Bug 10097774 when transaction uom is different from resource primariry uom, recaculate the primary quantity
3690: end if;
3691:
3692: if (l_logLevel <= wip_constants.full_logging) then
3693: wip_logger.log('derive_insert_wcti Phase 90', l_retStatus);
3694: wip_logger.log('l_actual_resource_rate = '|| l_actual_resource_rate, l_retStatus);
3695: end if;
3696:
3697: --Bug 10097774 when transaction uom is different from resource primariry uom, recaculate the primary quantity
3698: if(l_primary_uom <> p_txn_uom) then
3712:
3713: l_primary_quantity := p_duration/conversion_rate;
3714:
3715: if (l_logLevel <= wip_constants.full_logging) then
3716: wip_logger.log('derive_insert_wcti Phase 100', l_retStatus);
3717: wip_logger.log('l_primary_quantity = '|| l_primary_quantity, l_retStatus);
3718: end if;
3719:
3720: if G_RES_CHG_FAILED <> wip_constants.yes then --Bug 6891758
3713: l_primary_quantity := p_duration/conversion_rate;
3714:
3715: if (l_logLevel <= wip_constants.full_logging) then
3716: wip_logger.log('derive_insert_wcti Phase 100', l_retStatus);
3717: wip_logger.log('l_primary_quantity = '|| l_primary_quantity, l_retStatus);
3718: end if;
3719:
3720: if G_RES_CHG_FAILED <> wip_constants.yes then --Bug 6891758
3721: x_group_id := -9999; -- Bug 13481688 , Assiginning dummy value to group_id to identify this group later while inserting the resources.
3719:
3720: if G_RES_CHG_FAILED <> wip_constants.yes then --Bug 6891758
3721: x_group_id := -9999; -- Bug 13481688 , Assiginning dummy value to group_id to identify this group later while inserting the resources.
3722: if (l_logLevel <= wip_constants.full_logging) then
3723: wip_logger.log('derive_insert_wcti Phase 110', l_retStatus);
3724: wip_logger.log('inserting into wip_cost_txn_interface', l_retStatus);
3725: end if;
3726: insert into wip_cost_txn_interface(
3727: group_id, -- Bug 13481688
3720: if G_RES_CHG_FAILED <> wip_constants.yes then --Bug 6891758
3721: x_group_id := -9999; -- Bug 13481688 , Assiginning dummy value to group_id to identify this group later while inserting the resources.
3722: if (l_logLevel <= wip_constants.full_logging) then
3723: wip_logger.log('derive_insert_wcti Phase 110', l_retStatus);
3724: wip_logger.log('inserting into wip_cost_txn_interface', l_retStatus);
3725: end if;
3726: insert into wip_cost_txn_interface(
3727: group_id, -- Bug 13481688
3728: created_by,
3899: -- Bug 13481688 @End
3900: end if;
3901: x_return_status := fnd_api.g_ret_sts_success;
3902: if (l_logLevel <= wip_constants.trace_logging) then
3903: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.derive_insert_wcti',
3904: p_procReturnStatus => x_return_status,
3905: p_msg => l_msg,
3906: x_returnStatus => l_retStatus);
3907: wip_logger.cleanUp(x_returnStatus => l_retStatus);
3903: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.derive_insert_wcti',
3904: p_procReturnStatus => x_return_status,
3905: p_msg => l_msg,
3906: x_returnStatus => l_retStatus);
3907: wip_logger.cleanUp(x_returnStatus => l_retStatus);
3908: end if;
3909:
3910: Exception
3911: when others then
3911: when others then
3912: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;
3913: l_msg := 'unexpected error: ' || SQLERRM || 'SQLCODE = ' || SQLCODE;
3914: if (l_logLevel <= wip_constants.trace_logging) then
3915: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.derive_insert_wcti',
3916: p_procReturnStatus => x_return_status,
3917: p_msg => l_msg,
3918: x_returnStatus => l_retStatus);
3919: wip_logger.cleanUp(x_returnStatus => l_retStatus);
3915: wip_logger.exitPoint(p_procName => 'WIP_WS_TIME_ENTRY.derive_insert_wcti',
3916: p_procReturnStatus => x_return_status,
3917: p_msg => l_msg,
3918: x_returnStatus => l_retStatus);
3919: wip_logger.cleanUp(x_returnStatus => l_retStatus);
3920: end if;
3921: raise; --reraise the exeption back because caller expects exception to be raised when it happened.
3922: END derive_insert_wcti;
3923: