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

APPS.AHL_WIP_JOB_PVT dependencies on FND_API

Line 51: x_return_status := FND_API.G_RET_STS_SUCCESS;

47: l_group_id NUMBER;
48: l_header_id NUMBER;
49:
50: BEGIN
51: x_return_status := FND_API.G_RET_STS_SUCCESS;
52:
53: -- Ensure the DML operation for the Job header is only Insert or Update
54: IF (p_ahl_wo_rec.dml_type <> 'I' AND p_ahl_wo_rec.dml_type <> 'U') THEN
55: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_INVALID_JOB_DML_TYPE');

Line 57: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

53: -- Ensure the DML operation for the Job header is only Insert or Update
54: IF (p_ahl_wo_rec.dml_type <> 'I' AND p_ahl_wo_rec.dml_type <> 'U') THEN
55: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_INVALID_JOB_DML_TYPE');
56: FND_MSG_PUB.ADD;
57: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
58: RETURN;
59: END IF;
60:
61: IF (p_group_id IS NULL AND p_header_id IS NOT NULL) OR

Line 65: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

61: IF (p_group_id IS NULL AND p_header_id IS NOT NULL) OR
62: (p_group_id IS NOT NULL AND p_header_id IS NULL) THEN
63: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_GROUP_HEADER_MISMATCH');
64: FND_MSG_PUB.ADD;
65: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
66: RETURN;
67: END IF;
68:
69: IF p_group_id IS NULL THEN

Line 246: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

242: EXCEPTION
243: WHEN OTHERS THEN
244: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_JOB_HEADER_INSERT_ERR');
245: FND_MSG_PUB.ADD;
246: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
247: RAISE; -- Reraise the exception and its calling procedure's exception handler
248: -- will handle it in its OTHERS exception part
249: END;
250: x_group_id := l_wip_job_rec.group_id;

Line 269: x_return_status := FND_API.G_RET_STS_SUCCESS;

265: l_wip_job_op_rec wip_job_dtls_interface%ROWTYPE;
266: l_dummy VARCHAR2(1);
267:
268: BEGIN
269: x_return_status := FND_API.G_RET_STS_SUCCESS;
270:
271: -- Ensure the DML operation for the Job operation is only Insert or Update
272: IF (p_ahl_wo_op_rec.dml_type <> 'I' AND p_ahl_wo_op_rec.dml_type <> 'U') THEN
273: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_INVALID_OPER_DML_TYPE');

Line 275: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

271: -- Ensure the DML operation for the Job operation is only Insert or Update
272: IF (p_ahl_wo_op_rec.dml_type <> 'I' AND p_ahl_wo_op_rec.dml_type <> 'U') THEN
273: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_INVALID_OPER_DML_TYPE');
274: FND_MSG_PUB.ADD;
275: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
276: RETURN;
277: END IF;
278:
279: -- Validate p_group_id and p_parent_header_id

Line 285: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

281: FETCH job_header_exists INTO l_dummy;
282: IF job_header_exists%NOTFOUND THEN
283: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_INVALID_JOB_HEADER');
284: FND_MSG_PUB.ADD;
285: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
286: CLOSE job_header_exists;
287: RETURN;
288: ELSE
289: CLOSE job_header_exists;

Line 297: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

293: -- a NOT NULL column in table wip_job_dtls_interface
294: IF p_ahl_wo_op_rec.operation_seq_num IS NULL THEN
295: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_OPERATION_SEQ_NULL');
296: FND_MSG_PUB.ADD;
297: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
298: RETURN;
299: END IF;
300:
301: l_wip_job_op_rec.load_type := 3; --loading operation

Line 405: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

401: EXCEPTION
402: WHEN OTHERS THEN
403: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_JOB_OPER_INSERT_ERR');
404: FND_MSG_PUB.ADD;
405: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
406: RAISE;
407: END;
408: IF G_DEBUG='Y' THEN
409: AHL_DEBUG_PUB.debug('Finish: insert_job_operation, x_return_status='||x_return_status);

Line 425: x_return_status := FND_API.G_RET_STS_SUCCESS;

421: l_wip_job_res_rec wip_job_dtls_interface%ROWTYPE;
422: l_dummy VARCHAR2(1);
423:
424: BEGIN
425: x_return_status := FND_API.G_RET_STS_SUCCESS;
426:
427: -- Ensure the DML operation for the Job resource is Insert, Update or Delete
428: IF (p_ahl_wo_res_rec.dml_type <> 'I' AND p_ahl_wo_res_rec.dml_type <> 'U'
429: AND p_ahl_wo_res_rec.dml_type <> 'D') THEN

Line 432: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

428: IF (p_ahl_wo_res_rec.dml_type <> 'I' AND p_ahl_wo_res_rec.dml_type <> 'U'
429: AND p_ahl_wo_res_rec.dml_type <> 'D') THEN
430: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_INVALID_RES_DML_TYPE');
431: FND_MSG_PUB.ADD;
432: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
433: RETURN;
434: END IF;
435:
436: -- validate p_group_id and p_parent_header_id

Line 442: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

438: FETCH job_header_exists INTO l_dummy;
439: IF job_header_exists%NOTFOUND THEN
440: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_INVALID_JOB_HEADER');
441: FND_MSG_PUB.ADD;
442: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
443: CLOSE job_header_exists;
444: RETURN;
445: ELSE
446: CLOSE job_header_exists;

Line 574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

570: EXCEPTION
571: WHEN OTHERS THEN
572: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_JOB_RES_INSERT_ERR');
573: FND_MSG_PUB.ADD;
574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
575: RAISE;
576: END;
577: IF G_DEBUG='Y' THEN
578: AHL_DEBUG_PUB.debug('Finish: insert_job_resource, x_return_status='||x_return_status);

Line 594: x_return_status := FND_API.G_RET_STS_SUCCESS;

590: l_wip_job_mtl_rec wip_job_dtls_interface%ROWTYPE;
591: l_dummy VARCHAR2(1);
592:
593: BEGIN
594: x_return_status := FND_API.G_RET_STS_SUCCESS;
595:
596: -- Ensure the DML operation for the Job material is Insert, Update or Delete
597: IF (p_ahl_wo_mtl_rec.dml_type <> 'I' AND p_ahl_wo_mtl_rec.dml_type <> 'U'
598: AND p_ahl_wo_mtl_rec.dml_type <> 'D') THEN

Line 601: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

597: IF (p_ahl_wo_mtl_rec.dml_type <> 'I' AND p_ahl_wo_mtl_rec.dml_type <> 'U'
598: AND p_ahl_wo_mtl_rec.dml_type <> 'D') THEN
599: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_INVALID_MTL_DML_TYPE');
600: FND_MSG_PUB.ADD;
601: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
602: RETURN;
603: END IF;
604:
605: -- Validate p_group_id and p_parent_header_id

Line 611: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

607: FETCH job_header_exists INTO l_dummy;
608: IF job_header_exists%NOTFOUND THEN
609: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_INVALID_JOB_HEADER');
610: FND_MSG_PUB.ADD;
611: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
612: CLOSE job_header_exists;
613: RETURN;
614: ELSE
615: CLOSE job_header_exists;

Line 713: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

709: EXCEPTION
710: WHEN OTHERS THEN
711: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_JOB_MTL_INSERT_ERR');
712: FND_MSG_PUB.ADD;
713: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
714: RAISE;
715: END;
716: IF G_DEBUG='Y' THEN
717: AHL_DEBUG_PUB.debug('Finish: insert_job_material, x_return_status='||x_return_status);

Line 754: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

750: IF job_header_exists%NOTFOUND THEN
751: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_INVALID_JOB_HEADER');
752: FND_MSG_PUB.ADD;
753: CLOSE job_header_exists;
754: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
755: RETURN;
756: ELSE
757: CLOSE job_header_exists;
758: END IF;

Line 777: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

773: callstat => l_callstat);
774: IF (l_activep <= 0 OR l_activep1 <= 0) THEN
775: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_CM_DOWN');
776: FND_MSG_PUB.ADD;
777: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
778: RETURN;
779: END IF;
780:
781: -- check whether Concurrent Program is available

Line 785: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

781: -- check whether Concurrent Program is available
782: IF NOT fnd_program.program_exists('WICMLP','WIP') THEN
783: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_NO_WICMLP');
784: FND_MSG_PUB.ADD;
785: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
786: RETURN;
787: END IF;
788:
789: -- check whether Concurrent Executible is available

Line 793: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

789: -- check whether Concurrent Executible is available
790: IF NOT fnd_program.executable_exists('WICMLX','WIP') THEN
791: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_NO_WICMLX');
792: FND_MSG_PUB.ADD;
793: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
794: RETURN;
795: END IF;
796:
797: IF G_DEBUG='Y' THEN

Line 812: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

808: END IF;
809: IF (l_req_id = 0 ) THEN
810: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_WICMLP_SUBMIT_FAILURE');
811: FND_MSG_PUB.ADD;
812: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
813: IF G_DEBUG='Y' THEN
814: AHL_DEBUG_PUB.debug('Submit request itself failed and the initialized parameters for the application are: ');
815: --dbms_output.put_line('Submit request itself failed and the initialized parameters for the application are: ');
816: AHL_DEBUG_PUB.debug('user_id='||to_char(fnd_global.user_id)||' resp_id='||to_char(fnd_global.resp_id)||' resp_appl_id='||to_char(fnd_global.resp_appl_id));

Line 840: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

836: message => l_message);
837: IF NOT l_boolvar THEN
838: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_WICMLP_WAIT_FAILURE');
839: FND_MSG_PUB.ADD;
840: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
841: IF G_DEBUG='Y' THEN
842: AHL_DEBUG_PUB.debug('Wait for request itself failed');
843: --dbms_output.put_line('Wait for request itself failed');
844: END IF;

Line 846: x_return_status := FND_API.G_RET_STS_SUCCESS;

842: AHL_DEBUG_PUB.debug('Wait for request itself failed');
843: --dbms_output.put_line('Wait for request itself failed');
844: END IF;
845: ELSIF (l_dev_phase = 'COMPLETE' AND l_dev_status = 'NORMAL') THEN
846: x_return_status := FND_API.G_RET_STS_SUCCESS;
847: ELSE
848: x_return_status := FND_API.G_RET_STS_ERROR;
849: END IF;
850: END IF;

Line 848: x_return_status := FND_API.G_RET_STS_ERROR;

844: END IF;
845: ELSIF (l_dev_phase = 'COMPLETE' AND l_dev_status = 'NORMAL') THEN
846: x_return_status := FND_API.G_RET_STS_SUCCESS;
847: ELSE
848: x_return_status := FND_API.G_RET_STS_ERROR;
849: END IF;
850: END IF;
851: IF G_DEBUG='Y' THEN
852: AHL_DEBUG_PUB.debug('Finish: submit_wip_load, x_return_status='||x_return_status);

Line 860: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

856:
857: -- Define procedure load_wip_job --
858: PROCEDURE load_wip_job(
859: p_api_version IN NUMBER,
860: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
861: -- p_commit IN VARCHAR2 := FND_API.G_FALSE,
862: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
863: x_return_status OUT NOCOPY VARCHAR2,
864: x_msg_count OUT NOCOPY NUMBER,

Line 861: -- p_commit IN VARCHAR2 := FND_API.G_FALSE,

857: -- Define procedure load_wip_job --
858: PROCEDURE load_wip_job(
859: p_api_version IN NUMBER,
860: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
861: -- p_commit IN VARCHAR2 := FND_API.G_FALSE,
862: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
863: x_return_status OUT NOCOPY VARCHAR2,
864: x_msg_count OUT NOCOPY NUMBER,
865: x_msg_data OUT NOCOPY VARCHAR2,

Line 862: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

858: PROCEDURE load_wip_job(
859: p_api_version IN NUMBER,
860: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
861: -- p_commit IN VARCHAR2 := FND_API.G_FALSE,
862: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
863: x_return_status OUT NOCOPY VARCHAR2,
864: x_msg_count OUT NOCOPY NUMBER,
865: x_msg_data OUT NOCOPY VARCHAR2,
866: p_ahl_wo_rec IN ahl_wo_rec_type,

Line 913: IF FND_API.to_boolean(p_init_msg_list) THEN

909: IF G_DEBUG='Y' THEN
910: AHL_DEBUG_PUB.enable_debug;
911: AHL_DEBUG_PUB.debug('Begin private API: AHL_WIP_JOB_PVT.LOAD_WIP_JOB');
912: END IF;
913: IF FND_API.to_boolean(p_init_msg_list) THEN
914: FND_MSG_PUB.initialize;
915: END IF;
916:
917: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 917: x_return_status := FND_API.G_RET_STS_SUCCESS;

913: IF FND_API.to_boolean(p_init_msg_list) THEN
914: FND_MSG_PUB.initialize;
915: END IF;
916:
917: x_return_status := FND_API.G_RET_STS_SUCCESS;
918:
919: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version,
920: l_api_name, G_PKG_NAME)
921: THEN

Line 919: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version,

915: END IF;
916:
917: x_return_status := FND_API.G_RET_STS_SUCCESS;
918:
919: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version,
920: l_api_name, G_PKG_NAME)
921: THEN
922: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
923: END IF;

Line 922: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

918:
919: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version,
920: l_api_name, G_PKG_NAME)
921: THEN
922: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
923: END IF;
924:
925: IF G_DEBUG='Y' THEN
926: AHL_DEBUG_PUB.debug('Inside: load_wip_job, just before calling insert_job_header');

Line 936: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

932: p_header_id => NULL,
933: x_group_id => l_group_id,
934: x_header_id => l_header_id,
935: x_return_status => l_return_status );
936: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
937: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
938: END IF;
939:
940: IF G_DEBUG='Y' THEN

Line 937: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

933: x_group_id => l_group_id,
934: x_header_id => l_header_id,
935: x_return_status => l_return_status );
936: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
937: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
938: END IF;
939:
940: IF G_DEBUG='Y' THEN
941: AHL_DEBUG_PUB.debug('Inside: load_wip_job, just before calling insert_job_operation');

Line 951: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

947: insert_job_operation( p_ahl_wo_op_rec => p_ahl_wo_op_tbl(i),
948: p_group_id => l_group_id,
949: p_parent_header_id => l_header_id,
950: x_return_status => l_return_status );
951: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
952: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
953: END IF;
954: END LOOP;
955: END IF;

Line 952: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

948: p_group_id => l_group_id,
949: p_parent_header_id => l_header_id,
950: x_return_status => l_return_status );
951: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
952: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
953: END IF;
954: END LOOP;
955: END IF;
956:

Line 968: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

964: insert_job_resource( p_ahl_wo_res_rec => p_ahl_wo_res_tbl(i),
965: p_group_id => l_group_id,
966: p_parent_header_id => l_header_id,
967: x_return_status => l_return_status );
968: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
969: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
970: END IF;
971: END LOOP;
972: END IF;

Line 969: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

965: p_group_id => l_group_id,
966: p_parent_header_id => l_header_id,
967: x_return_status => l_return_status );
968: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
969: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
970: END IF;
971: END LOOP;
972: END IF;
973:

Line 985: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

981: insert_job_material( p_ahl_wo_mtl_rec => p_ahl_wo_mtl_tbl(i),
982: p_group_id => l_group_id,
983: p_parent_header_id => l_header_id,
984: x_return_status => l_return_status );
985: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
986: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
987: END IF;
988: END LOOP;
989: END IF;

Line 986: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

982: p_group_id => l_group_id,
983: p_parent_header_id => l_header_id,
984: x_return_status => l_return_status );
985: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
986: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
987: END IF;
988: END LOOP;
989: END IF;
990:

Line 1003: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

999: --check the process_phase and process_status in WJSI
1000: OPEN get_cp_sts(l_group_id, l_header_id);
1001: FETCH get_cp_sts INTO l_get_cp_sts;
1002:
1003: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1004: CLOSE get_cp_sts;
1005: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1006: ELSIF (l_return_status = FND_API.G_RET_STS_SUCCESS AND (get_cp_sts%NOTFOUND OR
1007: (l_get_cp_sts.process_phase = 4 AND l_get_cp_sts.process_status = 4))) THEN

Line 1005: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1001: FETCH get_cp_sts INTO l_get_cp_sts;
1002:
1003: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1004: CLOSE get_cp_sts;
1005: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1006: ELSIF (l_return_status = FND_API.G_RET_STS_SUCCESS AND (get_cp_sts%NOTFOUND OR
1007: (l_get_cp_sts.process_phase = 4 AND l_get_cp_sts.process_status = 4))) THEN
1008: CLOSE get_cp_sts;
1009: OPEN get_wip_entity(p_ahl_wo_rec.wo_name, p_ahl_wo_rec.organization_id);

Line 1006: ELSIF (l_return_status = FND_API.G_RET_STS_SUCCESS AND (get_cp_sts%NOTFOUND OR

1002:
1003: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1004: CLOSE get_cp_sts;
1005: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1006: ELSIF (l_return_status = FND_API.G_RET_STS_SUCCESS AND (get_cp_sts%NOTFOUND OR
1007: (l_get_cp_sts.process_phase = 4 AND l_get_cp_sts.process_status = 4))) THEN
1008: CLOSE get_cp_sts;
1009: OPEN get_wip_entity(p_ahl_wo_rec.wo_name, p_ahl_wo_rec.organization_id);
1010: FETCH get_wip_entity INTO x_wip_entity_id;

Line 1015: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1011: IF get_wip_entity%NOTFOUND THEN
1012: CLOSE get_wip_entity;
1013: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_NO_WIP_ENTITY_ID');
1014: FND_MSG_PUB.ADD;
1015: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1016: ELSE
1017: CLOSE get_wip_entity;
1018: END IF;
1019: --call EAM API to update manual_rebuild_flag because WICMLP can't change it.

Line 1026: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1022: p_wip_entity_id => x_wip_entity_id,
1023: p_organization_id => p_ahl_wo_rec.organization_id,
1024: p_manual_rebuild_flag => p_ahl_wo_rec.manual_rebuild_flag,
1025: x_return_status => l_return_status);
1026: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1027: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_EAM_REBUILD_FLAG_FAIL');
1028: FND_MSG_PUB.ADD;
1029: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1030: END IF;

Line 1029: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1025: x_return_status => l_return_status);
1026: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1027: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_EAM_REBUILD_FLAG_FAIL');
1028: FND_MSG_PUB.ADD;
1029: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1030: END IF;
1031: END IF;
1032: --call EAM API to update owning_department_id because WICMLP can't change it.
1033: IF (p_ahl_wo_rec.dml_type = 'U' AND p_ahl_wo_rec.department_id IS NOT NULL) THEN

Line 1039: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1035: p_wip_entity_id => x_wip_entity_id,
1036: p_organization_id => p_ahl_wo_rec.organization_id,
1037: p_owning_department => p_ahl_wo_rec.department_id,
1038: x_return_status => l_return_status);
1039: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1040: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_EAM_OWN_DEPT_FAIL');
1041: FND_MSG_PUB.ADD;
1042: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1043: END IF;

Line 1042: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1038: x_return_status => l_return_status);
1039: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1040: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_EAM_OWN_DEPT_FAIL');
1041: FND_MSG_PUB.ADD;
1042: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1043: END IF;
1044: END IF;
1045:
1046: ELSE

Line 1052: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1048: OPEN get_header_interface(p_ahl_wo_rec.wo_name, p_ahl_wo_rec.organization_id, l_group_id);
1049: FETCH get_header_interface INTO l_interface1_id, l_header_id;
1050: IF get_header_interface%NOTFOUND THEN
1051: CLOSE get_header_interface;
1052: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1053: ELSE
1054: CLOSE get_header_interface;
1055: END IF;
1056:

Line 1094: x_return_status := FND_API.G_RET_STS_ERROR;

1090: FND_MESSAGE.SET_TOKEN('ERROR',l_error_msg);
1091: FND_MSG_PUB.ADD;
1092: x_msg_count := 1;
1093: x_msg_data := l_error_msg;
1094: x_return_status := FND_API.G_RET_STS_ERROR;
1095:
1096: IF G_DEBUG='Y' THEN
1097: AHL_DEBUG_PUB.debug('The concatenated error message is '||x_msg_data);
1098: --dbms_output.put_line(substr('The concatenated error message is '||x_msg_data, 1, 255));

Line 1109: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1105: AHL_DEBUG_PUB.debug('End private API: AHL_WIP_JOB_PVT.LOAD_WIP_JOB');
1106: AHL_DEBUG_PUB.disable_debug;
1107: END IF;
1108: EXCEPTION
1109: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1110: ROLLBACK;
1111: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1112: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1113: p_count => x_msg_count,

Line 1111: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1107: END IF;
1108: EXCEPTION
1109: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1110: ROLLBACK;
1111: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1112: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1113: p_count => x_msg_count,
1114: p_data => x_msg_data);
1115: IF G_DEBUG='Y' THEN

Line 1112: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

1108: EXCEPTION
1109: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1110: ROLLBACK;
1111: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1112: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1113: p_count => x_msg_count,
1114: p_data => x_msg_data);
1115: IF G_DEBUG='Y' THEN
1116: AHL_DEBUG_PUB.log_app_messages(x_msg_count, x_msg_data,

Line 1121: WHEN FND_API.G_EXC_ERROR THEN

1117: 'UNEXPECTED ERROR IN PRIVATE:' );
1118: AHL_DEBUG_PUB.debug('AHL_WIP_JOB_PVT.LOAD_WIP_JOB');
1119: AHL_DEBUG_PUB.disable_debug;
1120: END IF;
1121: WHEN FND_API.G_EXC_ERROR THEN
1122: ROLLBACK;
1123: x_return_status := FND_API.G_RET_STS_ERROR;
1124: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1125: p_count => x_msg_count,

Line 1123: x_return_status := FND_API.G_RET_STS_ERROR;

1119: AHL_DEBUG_PUB.disable_debug;
1120: END IF;
1121: WHEN FND_API.G_EXC_ERROR THEN
1122: ROLLBACK;
1123: x_return_status := FND_API.G_RET_STS_ERROR;
1124: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1125: p_count => x_msg_count,
1126: p_data => x_msg_data);
1127: IF G_DEBUG='Y' THEN

Line 1124: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

1120: END IF;
1121: WHEN FND_API.G_EXC_ERROR THEN
1122: ROLLBACK;
1123: x_return_status := FND_API.G_RET_STS_ERROR;
1124: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1125: p_count => x_msg_count,
1126: p_data => x_msg_data);
1127: IF G_DEBUG='Y' THEN
1128: AHL_DEBUG_PUB.log_app_messages(x_msg_count, x_msg_data,

Line 1135: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1131: AHL_DEBUG_PUB.disable_debug;
1132: END IF;
1133: WHEN OTHERS THEN
1134: ROLLBACK;
1135: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1136: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1137: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'AHL_WIP_JOB_PVT',
1138: p_procedure_name => 'LOAD_WIP_JOB');
1139: END IF;

Line 1140: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

1136: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1137: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'AHL_WIP_JOB_PVT',
1138: p_procedure_name => 'LOAD_WIP_JOB');
1139: END IF;
1140: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1141: p_count => x_msg_count,
1142: p_data => x_msg_data);
1143: IF G_DEBUG='Y' THEN
1144: AHL_DEBUG_PUB.log_app_messages (x_msg_count, x_msg_data,

Line 1155: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1151:
1152: -- Define procedure insert_resource_txn --
1153: PROCEDURE insert_resource_txn(
1154: p_api_version IN NUMBER,
1155: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1156: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1157: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1158: x_return_status OUT NOCOPY VARCHAR2,
1159: x_msg_count OUT NOCOPY NUMBER,

Line 1156: p_commit IN VARCHAR2 := FND_API.G_FALSE,

1152: -- Define procedure insert_resource_txn --
1153: PROCEDURE insert_resource_txn(
1154: p_api_version IN NUMBER,
1155: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1156: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1157: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1158: x_return_status OUT NOCOPY VARCHAR2,
1159: x_msg_count OUT NOCOPY NUMBER,
1160: x_msg_data OUT NOCOPY VARCHAR2,

Line 1157: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1153: PROCEDURE insert_resource_txn(
1154: p_api_version IN NUMBER,
1155: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1156: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1157: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1158: x_return_status OUT NOCOPY VARCHAR2,
1159: x_msg_count OUT NOCOPY NUMBER,
1160: x_msg_data OUT NOCOPY VARCHAR2,
1161: p_ahl_res_txn_tbl IN ahl_res_txn_tbl_type

Line 1257: IF FND_API.to_boolean(p_init_msg_list) THEN

1253: IF G_DEBUG='Y' THEN
1254: AHL_DEBUG_PUB.enable_debug;
1255: AHL_DEBUG_PUB.debug('Begin private API: AHL_WIP_JOB_PVT.INSERT_RESOURCE_TXN');
1256: END IF;
1257: IF FND_API.to_boolean(p_init_msg_list) THEN
1258: FND_MSG_PUB.initialize;
1259: END IF;
1260:
1261: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1261: x_return_status := FND_API.G_RET_STS_SUCCESS;

1257: IF FND_API.to_boolean(p_init_msg_list) THEN
1258: FND_MSG_PUB.initialize;
1259: END IF;
1260:
1261: x_return_status := FND_API.G_RET_STS_SUCCESS;
1262:
1263: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version,
1264: l_api_name, G_PKG_NAME)
1265: THEN

Line 1263: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version,

1259: END IF;
1260:
1261: x_return_status := FND_API.G_RET_STS_SUCCESS;
1262:
1263: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version,
1264: l_api_name, G_PKG_NAME)
1265: THEN
1266: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1267: END IF;

Line 1266: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1262:
1263: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version,
1264: l_api_name, G_PKG_NAME)
1265: THEN
1266: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1267: END IF;
1268:
1269: IF p_ahl_res_txn_tbl.count <= 0 THEN
1270: FND_MESSAGE.set_name('AHL','AHL_PRD_NO_RECORDS_IN_TBL');

Line 1272: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1268:
1269: IF p_ahl_res_txn_tbl.count <= 0 THEN
1270: FND_MESSAGE.set_name('AHL','AHL_PRD_NO_RECORDS_IN_TBL');
1271: FND_MSG_PUB.add;
1272: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1273: END IF;
1274:
1275: OPEN get_user_name(fnd_global.user_id);
1276: FETCH get_user_name INTO l_user_name;

Line 1281: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1277: IF get_user_name%NOTFOUND THEN
1278: FND_MESSAGE.set_name('AHL','AHL_PRD_USER_ID_INVALID');
1279: FND_MSG_PUB.add;
1280: CLOSE get_user_name;
1281: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1282: END IF;
1283: CLOSE get_user_name;
1284:
1285: FOR i IN p_ahl_res_txn_tbl.FIRST..p_ahl_res_txn_tbl.LAST LOOP

Line 1296: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1292: IF get_job_attr%NOTFOUND THEN
1293: FND_MESSAGE.set_name('AHL','AHL_PRD_NO_WIP_ENTITY_ID');
1294: FND_MSG_PUB.add;
1295: CLOSE get_job_attr;
1296: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1297: END IF;
1298: CLOSE get_job_attr;
1299:
1300: OPEN get_org_code(l_job_attr.organization_id);

Line 1306: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1302: IF get_org_code%NOTFOUND THEN
1303: FND_MESSAGE.set_name('AHL','AHL_PRD_ORG_ID_INVALID');
1304: FND_MSG_PUB.add;
1305: CLOSE get_org_code;
1306: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1307: END IF;
1308: CLOSE get_org_code;
1309:
1310: l_wip_cost_txn_rec.process_phase := 1; --Resource Validation

Line 1367: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1363: IF get_employee_num%NOTFOUND THEN
1364: FND_MESSAGE.set_name('AHL','AHL_PRD_EMPLOYEE_ID_INVALID');
1365: FND_MSG_PUB.add;
1366: CLOSE get_employee_num;
1367: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1368: END IF;
1369: CLOSE get_employee_num;
1370: l_wip_cost_txn_rec.employee_num := l_employee_num.employee_number;
1371: l_wip_cost_txn_rec.instance_id := l_employee_num.instance_id;

Line 1385: AND p_ahl_res_txn_tbl(i).serial_number<>FND_API.G_MISS_CHAR

1381: l_wip_cost_txn_rec.reason_name := p_ahl_res_txn_tbl(i).reason;
1382: l_wip_cost_txn_rec.reference := p_ahl_res_txn_tbl(i).reference;
1383:
1384: IF p_ahl_res_txn_tbl(i).serial_number IS NOT NULL
1385: AND p_ahl_res_txn_tbl(i).serial_number<>FND_API.G_MISS_CHAR
1386: THEN
1387: Open get_instance_sernum (p_ahl_res_txn_tbl(i).department_id,
1388: p_ahl_res_txn_tbl(i).serial_number,
1389: p_ahl_res_txn_tbl(i).resource_id,

Line 1499: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1495: EXCEPTION
1496: WHEN OTHERS THEN
1497: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_RES_TXN_INSERT_ERR');
1498: FND_MSG_PUB.ADD;
1499: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1500: RAISE;
1501: END;
1502: END LOOP;
1503:

Line 1504: IF FND_API.TO_BOOLEAN(p_commit) THEN

1500: RAISE;
1501: END;
1502: END LOOP;
1503:
1504: IF FND_API.TO_BOOLEAN(p_commit) THEN
1505: COMMIT;
1506: END IF;
1507: IF G_DEBUG='Y' THEN
1508: AHL_DEBUG_PUB.debug('End private API: AHL_WIP_JOB_PVT.INSERT_RESOURCE_TXN');

Line 1513: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1509: AHL_DEBUG_PUB.disable_debug;
1510: END IF;
1511:
1512: EXCEPTION
1513: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1514: ROLLBACK TO INSERT_RESOURCE_TXN_PVT;
1515: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1516: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1517: p_count => x_msg_count,

Line 1515: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1511:
1512: EXCEPTION
1513: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1514: ROLLBACK TO INSERT_RESOURCE_TXN_PVT;
1515: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1516: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1517: p_count => x_msg_count,
1518: p_data => x_msg_data);
1519: IF G_DEBUG='Y' THEN

Line 1516: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

1512: EXCEPTION
1513: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1514: ROLLBACK TO INSERT_RESOURCE_TXN_PVT;
1515: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1516: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1517: p_count => x_msg_count,
1518: p_data => x_msg_data);
1519: IF G_DEBUG='Y' THEN
1520: AHL_DEBUG_PUB.log_app_messages(x_msg_count, x_msg_data,

Line 1525: WHEN FND_API.G_EXC_ERROR THEN

1521: 'UNEXPECTED ERROR IN PRIVATE:' );
1522: AHL_DEBUG_PUB.debug('AHL_WIP_JOB_PVT.INSERT_RESOURCE_TXN');
1523: AHL_DEBUG_PUB.disable_debug;
1524: END IF;
1525: WHEN FND_API.G_EXC_ERROR THEN
1526: ROLLBACK TO INSERT_RESOURCE_TXN_PVT;
1527: x_return_status := FND_API.G_RET_STS_ERROR;
1528: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1529: p_count => x_msg_count,

Line 1527: x_return_status := FND_API.G_RET_STS_ERROR;

1523: AHL_DEBUG_PUB.disable_debug;
1524: END IF;
1525: WHEN FND_API.G_EXC_ERROR THEN
1526: ROLLBACK TO INSERT_RESOURCE_TXN_PVT;
1527: x_return_status := FND_API.G_RET_STS_ERROR;
1528: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1529: p_count => x_msg_count,
1530: p_data => x_msg_data);
1531: IF G_DEBUG='Y' THEN

Line 1528: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

1524: END IF;
1525: WHEN FND_API.G_EXC_ERROR THEN
1526: ROLLBACK TO INSERT_RESOURCE_TXN_PVT;
1527: x_return_status := FND_API.G_RET_STS_ERROR;
1528: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1529: p_count => x_msg_count,
1530: p_data => x_msg_data);
1531: IF G_DEBUG='Y' THEN
1532: AHL_DEBUG_PUB.log_app_messages(x_msg_count, x_msg_data,

Line 1539: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1535: AHL_DEBUG_PUB.disable_debug;
1536: END IF;
1537: WHEN OTHERS THEN
1538: ROLLBACK TO INSERT_RESOURCE_TXN_PVT;
1539: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1540: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1541: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'AHL_WIP_JOB_PVT',
1542: p_procedure_name => 'INSERT_RESOURCE_TXN');
1543: END IF;

Line 1544: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

1540: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1541: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'AHL_WIP_JOB_PVT',
1542: p_procedure_name => 'INSERT_RESOURCE_TXN');
1543: END IF;
1544: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1545: p_count => x_msg_count,
1546: p_data => x_msg_data);
1547: IF G_DEBUG='Y' THEN
1548: AHL_DEBUG_PUB.log_app_messages (x_msg_count, x_msg_data,

Line 1597: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1593: END wip_massload_pending;
1594:
1595: PROCEDURE load_wip_batch_jobs(
1596: p_api_version IN NUMBER,
1597: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1598: -- p_commit IN VARCHAR2 := FND_API.G_FALSE,
1599: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1600: x_return_status OUT NOCOPY VARCHAR2,
1601: x_msg_count OUT NOCOPY NUMBER,

Line 1598: -- p_commit IN VARCHAR2 := FND_API.G_FALSE,

1594:
1595: PROCEDURE load_wip_batch_jobs(
1596: p_api_version IN NUMBER,
1597: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1598: -- p_commit IN VARCHAR2 := FND_API.G_FALSE,
1599: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1600: x_return_status OUT NOCOPY VARCHAR2,
1601: x_msg_count OUT NOCOPY NUMBER,
1602: x_msg_data OUT NOCOPY VARCHAR2,

Line 1599: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1595: PROCEDURE load_wip_batch_jobs(
1596: p_api_version IN NUMBER,
1597: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1598: -- p_commit IN VARCHAR2 := FND_API.G_FALSE,
1599: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1600: x_return_status OUT NOCOPY VARCHAR2,
1601: x_msg_count OUT NOCOPY NUMBER,
1602: x_msg_data OUT NOCOPY VARCHAR2,
1603: p_group_id IN NUMBER,

Line 1649: IF FND_API.to_boolean(p_init_msg_list) THEN

1645: IF G_DEBUG='Y' THEN
1646: AHL_DEBUG_PUB.enable_debug;
1647: AHL_DEBUG_PUB.debug('Begin private API: AHL_WIP_JOB_PVT.LOAD_WIP_BATCH_JOBS');
1648: END IF;
1649: IF FND_API.to_boolean(p_init_msg_list) THEN
1650: FND_MSG_PUB.initialize;
1651: END IF;
1652:
1653: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1653: x_return_status := FND_API.G_RET_STS_SUCCESS;

1649: IF FND_API.to_boolean(p_init_msg_list) THEN
1650: FND_MSG_PUB.initialize;
1651: END IF;
1652:
1653: x_return_status := FND_API.G_RET_STS_SUCCESS;
1654:
1655: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version,
1656: l_api_name, G_PKG_NAME)
1657: THEN

Line 1655: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version,

1651: END IF;
1652:
1653: x_return_status := FND_API.G_RET_STS_SUCCESS;
1654:
1655: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version,
1656: l_api_name, G_PKG_NAME)
1657: THEN
1658: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1659: END IF;

Line 1658: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1654:
1655: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version,
1656: l_api_name, G_PKG_NAME)
1657: THEN
1658: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1659: END IF;
1660:
1661: IF G_DEBUG='Y' THEN
1662: AHL_DEBUG_PUB.debug('Inside: load_wip_batch_jobs, just before calling insert_job_header');

Line 1672: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1668: p_header_id => p_header_id,
1669: x_group_id => l_group_id,
1670: x_header_id => l_header_id,
1671: x_return_status => l_return_status );
1672: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1673: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1674: END IF;
1675:
1676: IF G_DEBUG='Y' THEN

Line 1673: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1669: x_group_id => l_group_id,
1670: x_header_id => l_header_id,
1671: x_return_status => l_return_status );
1672: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1673: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1674: END IF;
1675:
1676: IF G_DEBUG='Y' THEN
1677: AHL_DEBUG_PUB.debug('Inside: load_wip_batch_jobs, just before calling insert_job_operation');

Line 1687: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1683: insert_job_operation( p_ahl_wo_op_rec => p_ahl_wo_op_tbl(i),
1684: p_group_id => l_group_id,
1685: p_parent_header_id => l_header_id,
1686: x_return_status => l_return_status );
1687: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1688: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1689: END IF;
1690: END LOOP;
1691: END IF;

Line 1688: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1684: p_group_id => l_group_id,
1685: p_parent_header_id => l_header_id,
1686: x_return_status => l_return_status );
1687: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1688: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1689: END IF;
1690: END LOOP;
1691: END IF;
1692:

Line 1704: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1700: insert_job_resource( p_ahl_wo_res_rec => p_ahl_wo_res_tbl(i),
1701: p_group_id => l_group_id,
1702: p_parent_header_id => l_header_id,
1703: x_return_status => l_return_status );
1704: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1705: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1706: END IF;
1707: END LOOP;
1708: END IF;

Line 1705: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1701: p_group_id => l_group_id,
1702: p_parent_header_id => l_header_id,
1703: x_return_status => l_return_status );
1704: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1705: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1706: END IF;
1707: END LOOP;
1708: END IF;
1709:

Line 1721: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1717: insert_job_material( p_ahl_wo_mtl_rec => p_ahl_wo_mtl_tbl(i),
1718: p_group_id => l_group_id,
1719: p_parent_header_id => l_header_id,
1720: x_return_status => l_return_status );
1721: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1722: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1723: END IF;
1724: END LOOP;
1725: END IF;

Line 1722: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1718: p_group_id => l_group_id,
1719: p_parent_header_id => l_header_id,
1720: x_return_status => l_return_status );
1721: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1722: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1723: END IF;
1724: END LOOP;
1725: END IF;
1726:

Line 1745: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1741: IF get_job_attr%NOTFOUND THEN
1742: CLOSE get_job_attr;
1743: FND_MESSAGE.set_name('AHL','AHL_WIP_ITF_REC_NOT_FOUND');
1744: FND_MSG_PUB.add;
1745: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1746: END IF;
1747: x_ahl_wip_job_tbl(i+1).wip_entity_name := l_get_job_attr.job_name;
1748: x_ahl_wip_job_tbl(i+1).organization_id := l_get_job_attr.organization_id;
1749: CLOSE get_job_attr;

Line 1756: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

1752: submit_wip_load( p_group_id => l_group_id,
1753: x_return_status => l_return_status);
1754:
1755: -- Check whether wait_for_request fails
1756: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1757: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1758: END IF;
1759:
1760: -- if wait_for_request returns normally

Line 1757: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1753: x_return_status => l_return_status);
1754:
1755: -- Check whether wait_for_request fails
1756: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1757: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1758: END IF;
1759:
1760: -- if wait_for_request returns normally
1761: FOR i IN 0..(l_header_id - l_group_id) LOOP

Line 1775: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1771: CLOSE get_wip_entity;
1772: CLOSE get_job_attr;
1773: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_NO_WIP_ENTITY_ID');
1774: FND_MSG_PUB.ADD;
1775: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1776: ELSE
1777: CLOSE get_wip_entity;
1778: END IF;
1779: x_ahl_wip_job_tbl(i+1).error := NULL;

Line 1790: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1786: p_wip_entity_id => x_ahl_wip_job_tbl(i+1).wip_entity_id,
1787: p_organization_id => x_ahl_wip_job_tbl(i+1).organization_id,
1788: p_manual_rebuild_flag => x_ahl_wip_job_tbl(i+1).manual_rebuild_flag,
1789: x_return_status => l_return_status);
1790: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1791: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_EAM_REBUILD_FLAG_FAIL');
1792: FND_MSG_PUB.ADD;
1793: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1794: END IF;

Line 1793: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1789: x_return_status => l_return_status);
1790: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1791: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_EAM_REBUILD_FLAG_FAIL');
1792: FND_MSG_PUB.ADD;
1793: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1794: END IF;
1795: END IF;
1796: --call EAM API to update owning_department_id because WICMLP can't change it.
1797: IF (x_ahl_wip_job_tbl(i+1).load_type = 8 AND x_ahl_wip_job_tbl(i+1).owning_department IS NOT NULL) THEN

Line 1803: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1799: p_wip_entity_id => x_ahl_wip_job_tbl(i+1).wip_entity_id,
1800: p_organization_id => x_ahl_wip_job_tbl(i+1).organization_id,
1801: p_owning_department => x_ahl_wip_job_tbl(i+1).owning_department,
1802: x_return_status => l_return_status);
1803: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1804: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_EAM_OWN_DEPT_FAIL');
1805: FND_MSG_PUB.ADD;
1806: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1807: END IF;

Line 1806: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1802: x_return_status => l_return_status);
1803: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1804: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_EAM_OWN_DEPT_FAIL');
1805: FND_MSG_PUB.ADD;
1806: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1807: END IF;
1808: END IF;
1809: */
1810: ELSE

Line 1854: x_return_status := FND_API.G_RET_STS_ERROR;

1850: FND_MSG_PUB.ADD;
1851: */
1852: x_msg_count := 1;
1853: x_msg_data := l_error_msg;
1854: x_return_status := FND_API.G_RET_STS_ERROR;
1855:
1856: IF G_DEBUG='Y' THEN
1857: AHL_DEBUG_PUB.debug('The concatenated error message is '||x_msg_data||' '||i);
1858: --dbms_output.put_line(substr('The concatenated error message is '||x_msg_data||' '||i, 1, 255));

Line 1871: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1867: AHL_DEBUG_PUB.debug('End private API: AHL_WIP_JOB_PVT.LOAD_WIP_BATCH_JOBS');
1868: AHL_DEBUG_PUB.disable_debug;
1869: END IF;
1870: EXCEPTION
1871: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1872: ROLLBACK;
1873: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1874: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1875: p_count => x_msg_count,

Line 1873: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1869: END IF;
1870: EXCEPTION
1871: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1872: ROLLBACK;
1873: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1874: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1875: p_count => x_msg_count,
1876: p_data => x_msg_data);
1877: IF G_DEBUG='Y' THEN

Line 1874: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

1870: EXCEPTION
1871: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1872: ROLLBACK;
1873: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1874: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1875: p_count => x_msg_count,
1876: p_data => x_msg_data);
1877: IF G_DEBUG='Y' THEN
1878: AHL_DEBUG_PUB.log_app_messages(x_msg_count, x_msg_data,

Line 1883: WHEN FND_API.G_EXC_ERROR THEN

1879: 'UNEXPECTED ERROR IN PRIVATE:' );
1880: AHL_DEBUG_PUB.debug('AHL_WIP_JOB_PVT.LOAD_WIP_BATCH_JOBS');
1881: AHL_DEBUG_PUB.disable_debug;
1882: END IF;
1883: WHEN FND_API.G_EXC_ERROR THEN
1884: ROLLBACK;
1885: x_return_status := FND_API.G_RET_STS_ERROR;
1886: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1887: p_count => x_msg_count,

Line 1885: x_return_status := FND_API.G_RET_STS_ERROR;

1881: AHL_DEBUG_PUB.disable_debug;
1882: END IF;
1883: WHEN FND_API.G_EXC_ERROR THEN
1884: ROLLBACK;
1885: x_return_status := FND_API.G_RET_STS_ERROR;
1886: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1887: p_count => x_msg_count,
1888: p_data => x_msg_data);
1889: IF G_DEBUG='Y' THEN

Line 1886: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

1882: END IF;
1883: WHEN FND_API.G_EXC_ERROR THEN
1884: ROLLBACK;
1885: x_return_status := FND_API.G_RET_STS_ERROR;
1886: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1887: p_count => x_msg_count,
1888: p_data => x_msg_data);
1889: IF G_DEBUG='Y' THEN
1890: AHL_DEBUG_PUB.log_app_messages(x_msg_count, x_msg_data,

Line 1897: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1893: AHL_DEBUG_PUB.disable_debug;
1894: END IF;
1895: WHEN OTHERS THEN
1896: ROLLBACK;
1897: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1898: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1899: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'AHL_WIP_JOB_PVT',
1900: p_procedure_name => 'LOAD_WIP_BATCH_JOBS');
1901: END IF;

Line 1902: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

1898: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1899: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'AHL_WIP_JOB_PVT',
1900: p_procedure_name => 'LOAD_WIP_BATCH_JOBS');
1901: END IF;
1902: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1903: p_count => x_msg_count,
1904: p_data => x_msg_data);
1905: IF G_DEBUG='Y' THEN
1906: AHL_DEBUG_PUB.log_app_messages (x_msg_count, x_msg_data,