DBA Data[Home] [Help]

APPS.AHL_PP_MATERIALS_PVT dependencies on FND_MSG_PUB

Line 623: Fnd_Msg_Pub.ADD;

619: WHERE SCHEDULED_MATERIAL_ID = X_SCHEDULED_MATERIAL_ID
620: AND OBJECT_VERSION_NUMBER=X_OBJECT_VERSION_NUMBER;
621: IF SQL%rowcount=0 THEN
622: Fnd_Message.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');
623: Fnd_Msg_Pub.ADD;
624: END IF;
625: END UPDATE_ROW;
626: -- Delete procedure to remove record from schedule materials
627: PROCEDURE DELETE_ROW (

Line 818: FND_MSG_PUB.initialize;

814: END IF;
815: -- Standard call to check for call compatibility.
816: IF FND_API.to_boolean(l_init_msg_list)
817: THEN
818: FND_MSG_PUB.initialize;
819: END IF;
820: -- Initialize API return status to success
821: x_return_status := FND_API.G_RET_STS_SUCCESS;
822: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 862: Fnd_Msg_Pub.ADD;

858:
859: IF NVL(l_return_status,'x') <> 'S'
860: THEN
861: Fnd_Message.SET_NAME('AHL','AHL_PP_WO_ORD_NOT_EXISTS');
862: Fnd_Msg_Pub.ADD;
863: END IF;
864: --
865: END IF;
866:

Line 884: FND_MSG_PUB.ADD;

880: );
881: IF l_return_status = FND_API.G_TRUE THEN
882: FND_MESSAGE.Set_Name('AHL', 'AHL_PP_CRT_MTL_UNTLCKD');
883: FND_MESSAGE.Set_Token('WO_NAME', l_workorder_name);
884: FND_MSG_PUB.ADD;
885: RAISE FND_API.G_EXC_ERROR;
886: END IF;
887:
888: -- rroy

Line 906: Fnd_Msg_Pub.ADD;

902:
903: IF NVL(l_return_status,'x') <> 'S'
904: THEN
905: Fnd_Message.SET_NAME('AHL','AHL_PP_VISIT_TASK_NOT_EXIST');
906: Fnd_Msg_Pub.ADD;
907:
908: END IF;
909: END IF;
910: -- Assign

Line 929: Fnd_Msg_Pub.ADD;

925: );
926: -- Validate for organization
927: IF l_organization_id IS NULL THEN
928: Fnd_Message.SET_NAME('AHL','AHL_PP_ORG_ID_NOT_EXISTS');
929: Fnd_Msg_Pub.ADD;
930: END IF;
931:
932: -- rroy
933: -- ACL Changes

Line 954: Fnd_Msg_Pub.ADD;

950: FETCH Check_wo_status_cur INTO l_dummy;
951: IF Check_wo_status_cur%NOTFOUND THEN
952: --
953: Fnd_Message.SET_NAME('AHL','AHL_PP_WO_STATUS_INVALID');
954: Fnd_Msg_Pub.ADD;
955: END IF;
956: --
957: CLOSE Check_wo_status_cur;
958: --

Line 992: Fnd_Msg_Pub.ADD;

988:
989: IF NVL(l_return_status,'x') <> 'S'
990: THEN
991: Fnd_Message.SET_NAME('AHL','AHL_PP_INV_ORG_NOT_EXIST');
992: Fnd_Msg_Pub.ADD;
993: END IF;
994: ELSE
995: Fnd_Message.SET_NAME('AHL','AHL_PP_INV_ID_REQUIRED');
996: Fnd_Msg_Pub.ADD;

Line 996: Fnd_Msg_Pub.ADD;

992: Fnd_Msg_Pub.ADD;
993: END IF;
994: ELSE
995: Fnd_Message.SET_NAME('AHL','AHL_PP_INV_ID_REQUIRED');
996: Fnd_Msg_Pub.ADD;
997:
998: END IF;
999:
1000: --Assign the returned value

Line 1010: Fnd_Msg_Pub.ADD;

1006: -- Validate for Requested Quantity
1007: IF (p_x_req_material_tbl(i).requested_quantity IS NULL OR
1008: p_x_req_material_tbl(i).requested_quantity = FND_API.G_MISS_NUM ) THEN
1009: Fnd_Message.SET_NAME('AHL','AHL_PP_REQ_QUANTITY_REQUIRED');
1010: Fnd_Msg_Pub.ADD;
1011: ELSIF (p_x_req_material_tbl(i).requested_quantity IS NOT NULL AND
1012: p_x_req_material_tbl(i).requested_quantity <> FND_API.G_MISS_NUM) THEN
1013: -- Fix for FP bug# 6642084. -- Allow 0 quantity.
1014: IF p_x_req_material_tbl(i).requested_quantity < 0 THEN

Line 1016: Fnd_Msg_Pub.ADD;

1012: p_x_req_material_tbl(i).requested_quantity <> FND_API.G_MISS_NUM) THEN
1013: -- Fix for FP bug# 6642084. -- Allow 0 quantity.
1014: IF p_x_req_material_tbl(i).requested_quantity < 0 THEN
1015: Fnd_Message.SET_NAME('AHL','AHL_PP_REQ_QUANTITY_INVALID');
1016: Fnd_Msg_Pub.ADD;
1017: END IF;
1018: END IF;
1019: --
1020:

Line 1031: Fnd_Msg_Pub.ADD;

1027: -- Validate for Requested Date
1028: IF (p_x_req_material_tbl(i).requested_date IS NULL OR
1029: p_x_req_material_tbl(i).requested_date = FND_API.G_MISS_DATE ) THEN
1030: Fnd_Message.SET_NAME('AHL','AHL_PP_REQ_DATE_REQUIRED');
1031: Fnd_Msg_Pub.ADD;
1032: ELSIF (p_x_req_material_tbl(i).requested_date IS NOT NULL AND
1033: p_x_req_material_tbl(i).requested_date <> FND_API.G_MISS_DATE) THEN
1034: IF p_x_req_material_tbl(i).requested_date < trunc(SYSDATE) THEN
1035: Fnd_Message.SET_NAME('AHL','AHL_PP_REQ_DATE_GT_SYSD');

Line 1036: Fnd_Msg_Pub.ADD;

1032: ELSIF (p_x_req_material_tbl(i).requested_date IS NOT NULL AND
1033: p_x_req_material_tbl(i).requested_date <> FND_API.G_MISS_DATE) THEN
1034: IF p_x_req_material_tbl(i).requested_date < trunc(SYSDATE) THEN
1035: Fnd_Message.SET_NAME('AHL','AHL_PP_REQ_DATE_GT_SYSD');
1036: Fnd_Msg_Pub.ADD;
1037: END IF;
1038: END IF;
1039: END IF;
1040: --

Line 1057: Fnd_Msg_Pub.ADD;

1053: OPEN Get_Operation_Seq_cur(p_x_req_material_tbl(i).workorder_operation_id);
1054: FETCH Get_Operation_Seq_cur INTO p_x_req_material_tbl(i).operation_sequence;
1055: IF Get_Operation_Seq_cur%NOTFOUND THEN
1056: Fnd_Message.SET_NAME('AHL','AHL_PP_OPER_SEQ_REQD');
1057: Fnd_Msg_Pub.ADD;
1058: END IF;
1059: CLOSE Get_Operation_Seq_cur;
1060: END IF;
1061: END IF;

Line 1090: Fnd_Msg_Pub.ADD;

1086:
1087: IF NVL(l_return_status,'x') <> 'S'
1088: THEN
1089: Fnd_Message.SET_NAME('AHL','AHL_PP_WO_OP_ID_NOT_EXIST');
1090: Fnd_Msg_Pub.ADD;
1091: --
1092: END IF;
1093: END IF;
1094: END IF;

Line 1132: Fnd_Msg_Pub.ADD;

1128: FETCH Get_sch_dates_cur INTO l_dummy;
1129: --
1130: IF Get_sch_dates_cur%NOTFOUND THEN
1131: Fnd_Message.SET_NAME('AHL','AHL_PP_RE_DATE_SCH_DATE');
1132: Fnd_Msg_Pub.ADD;
1133: END IF;
1134: --
1135: CLOSE Get_sch_dates_cur;
1136: --

Line 1161: Fnd_Msg_Pub.ADD;

1157: --
1158: IF Check_unique_cur%FOUND THEN
1159: Fnd_Message.SET_NAME('AHL','AHL_MAT_RECORD_EXIST');
1160: FND_MESSAGE.SET_TOKEN('ITEM',p_x_req_material_tbl(i).concatenated_segments,false);
1161: Fnd_Msg_Pub.ADD;
1162:
1163: END IF;
1164: --
1165: CLOSE Check_unique_cur;

Line 1200: l_msg_count := FND_MSG_PUB.count_msg;

1196:
1197: -- dbms_output.put_line( 'after uom conversion UOM:'||p_x_req_material_tbl(i).uom_code);
1198:
1199: -- Standard call to get message count and if count is get message info.
1200: l_msg_count := FND_MSG_PUB.count_msg;
1201: IF l_msg_count > 0 THEN
1202: X_msg_count := l_msg_count;
1203: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1204: RAISE FND_API.G_EXC_ERROR;

Line 1315: l_msg_count := FND_MSG_PUB.count_msg;

1311: AHL_DEBUG_PUB.debug('after wip job call:'||l_msg_count);
1312: AHL_DEBUG_PUB.debug('after wip job call:'||l_msg_data);
1313: END IF;
1314: --
1315: l_msg_count := FND_MSG_PUB.count_msg;
1316: --
1317: IF l_msg_count > 0 THEN
1318: X_msg_count := l_msg_count;
1319: X_msg_data := l_msg_data;

Line 1335: FND_MSG_PUB.initialize;

1331: --
1332: IF l_return_status ='S' THEN
1333: --Change made on Nov 17, 2005 by jeli due to bug 4742895.
1334: --Ignore messages in stack if return status is S after calls to EAM APIs.
1335: FND_MSG_PUB.initialize;
1336:
1337: -- dbms_output.put_line( 'inside return status success:');
1338:
1339: IF p_x_req_material_tbl.COUNT > 0 THEN

Line 1929: l_msg_count := Fnd_Msg_Pub.count_msg;

1925: -- dbms_output.put_line( 'end of API:');
1926:
1927: ------------------------End of Body---------------------------------------
1928: --Standard check to count messages
1929: l_msg_count := Fnd_Msg_Pub.count_msg;
1930:
1931: IF l_msg_count > 0 THEN
1932: X_msg_count := l_msg_count;
1933: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

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

1948: EXCEPTION
1949: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1950: ROLLBACK TO create_material_reqst;
1951: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1952: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1953: p_count => x_msg_count,
1954: p_data => x_msg_data);
1955: IF G_DEBUG='Y' THEN
1956: AHL_DEBUG_PUB.log_app_messages (

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

1962:
1963: WHEN FND_API.G_EXC_ERROR THEN
1964: ROLLBACK TO create_material_reqst;
1965: X_return_status := FND_API.G_RET_STS_ERROR;
1966: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1967: p_count => x_msg_count,
1968: p_data => X_msg_data);
1969: IF G_DEBUG='Y' THEN
1970: -- Debug info.

Line 1980: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

1976: END IF;
1977: WHEN OTHERS THEN
1978: ROLLBACK TO create_material_reqst;
1979: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1980: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1981: THEN
1982: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_MATERIALS_PVT',
1983: p_procedure_name => 'CREATE_MATERIAL_REQST',
1984: p_error_text => SUBSTR(SQLERRM,1,240));

Line 1982: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_MATERIALS_PVT',

1978: ROLLBACK TO create_material_reqst;
1979: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1980: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1981: THEN
1982: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_MATERIALS_PVT',
1983: p_procedure_name => 'CREATE_MATERIAL_REQST',
1984: p_error_text => SUBSTR(SQLERRM,1,240));
1985: END IF;
1986: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

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

1982: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_MATERIALS_PVT',
1983: p_procedure_name => 'CREATE_MATERIAL_REQST',
1984: p_error_text => SUBSTR(SQLERRM,1,240));
1985: END IF;
1986: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1987: p_count => x_msg_count,
1988: p_data => X_msg_data);
1989: IF G_DEBUG='Y' THEN
1990: -- Debug info.

Line 2181: FND_MSG_PUB.initialize;

2177: END IF;
2178: -- Standard call to check for call compatibility.
2179: IF FND_API.to_boolean(p_init_msg_list)
2180: THEN
2181: FND_MSG_PUB.initialize;
2182: END IF;
2183: -- Initialize API return status to success
2184: x_return_status := FND_API.G_RET_STS_SUCCESS;
2185: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 2218: Fnd_Msg_Pub.ADD;

2214:
2215: IF NVL(l_return_status,'x') <> 'S'
2216: THEN
2217: Fnd_Message.SET_NAME('AHL','AHL_PP_WO_ORD_NOT_EXISTS');
2218: Fnd_Msg_Pub.ADD;
2219: END IF;
2220: --
2221: ELSE
2222: Fnd_Message.SET_NAME('AHL','AHL_PP_WO_ORD_REQUIRED');

Line 2223: Fnd_Msg_Pub.ADD;

2219: END IF;
2220: --
2221: ELSE
2222: Fnd_Message.SET_NAME('AHL','AHL_PP_WO_ORD_REQUIRED');
2223: Fnd_Msg_Pub.ADD;
2224: END IF;
2225: --
2226: p_x_req_material_tbl(i).workorder_id := l_workorder_id;
2227:

Line 2241: FND_MSG_PUB.ADD;

2237: FETCH get_job_number INTO l_workorder_name;
2238: CLOSE get_job_number;
2239: FND_MESSAGE.Set_Name('AHL', 'AHL_PP_UPD_MTL_UNTLCKD');
2240: FND_MESSAGE.Set_Token('WO_NAME', l_workorder_name);
2241: FND_MSG_PUB.ADD;
2242: RAISE FND_API.G_EXC_ERROR;
2243: END IF;
2244: -- rroy
2245: -- ACL Changes

Line 2276: Fnd_Msg_Pub.ADD;

2272: -- Validate for Requested Quantity
2273: IF (p_x_req_material_tbl(i).requested_quantity IS NULL OR
2274: p_x_req_material_tbl(i).requested_quantity = FND_API.G_MISS_NUM) THEN
2275: Fnd_Message.SET_NAME('AHL','AHL_PP_REQ_QUANTITY_REQUIRED');
2276: Fnd_Msg_Pub.ADD;
2277: ELSIF (p_x_req_material_tbl(i).requested_quantity IS NOT NULL AND
2278: p_x_req_material_tbl(i).requested_quantity <> FND_API.G_MISS_NUM) THEN
2279: IF p_x_req_material_tbl(i).requested_quantity < 0 THEN
2280: Fnd_Message.SET_NAME('AHL','AHL_PP_REQ_QUANTITY_INVALID');

Line 2281: Fnd_Msg_Pub.ADD;

2277: ELSIF (p_x_req_material_tbl(i).requested_quantity IS NOT NULL AND
2278: p_x_req_material_tbl(i).requested_quantity <> FND_API.G_MISS_NUM) THEN
2279: IF p_x_req_material_tbl(i).requested_quantity < 0 THEN
2280: Fnd_Message.SET_NAME('AHL','AHL_PP_REQ_QUANTITY_INVALID');
2281: Fnd_Msg_Pub.ADD;
2282: END IF;
2283: -- added in R12: Serial Reservation project.
2284: -- If requested quantity changed -
2285: IF (p_x_req_material_tbl(i).requested_quantity <>

Line 2301: Fnd_Msg_Pub.ADD;

2297: THEN
2298: Fnd_Message.SET_NAME('AHL','AHL_PP_REQ_RESRV_QTY');
2299: Fnd_Message.SET_TOKEN('REQ_QTY',p_x_req_material_tbl(i).requested_quantity);
2300: Fnd_Message.SET_TOKEN('RRV_QTY',l_reserved_quantity);
2301: Fnd_Msg_Pub.ADD;
2302: END IF;-- p_x_req_material_tbl(i).requested_quantity <
2303: END IF; --p_x_req_material_tbl(i).requested_quantity <>
2304: END IF;
2305: IF G_DEBUG='Y' THEN

Line 2313: Fnd_Msg_Pub.ADD;

2309: -- Validate for Requested Date
2310: IF (p_x_req_material_tbl(i).requested_date IS NULL OR
2311: p_x_req_material_tbl(i).requested_date = FND_API.G_MISS_DATE) THEN
2312: Fnd_Message.SET_NAME('AHL','AHL_PP_REQ_DATE_REQUIRED');
2313: Fnd_Msg_Pub.ADD;
2314: ELSIF (p_x_req_material_tbl(i).requested_date IS NOT NULL AND
2315: p_x_req_material_tbl(i).requested_date <> FND_API.G_MISS_DATE) THEN
2316: IF p_x_req_material_tbl(i).requested_date < trunc(SYSDATE) THEN
2317: Fnd_Message.SET_NAME('AHL','AHL_PP_REQ_DATE_GT_EQ_SYSD');

Line 2318: Fnd_Msg_Pub.ADD;

2314: ELSIF (p_x_req_material_tbl(i).requested_date IS NOT NULL AND
2315: p_x_req_material_tbl(i).requested_date <> FND_API.G_MISS_DATE) THEN
2316: IF p_x_req_material_tbl(i).requested_date < trunc(SYSDATE) THEN
2317: Fnd_Message.SET_NAME('AHL','AHL_PP_REQ_DATE_GT_EQ_SYSD');
2318: Fnd_Msg_Pub.ADD;
2319: END IF;
2320: END IF;
2321: IF G_DEBUG='Y' THEN
2322: AHL_DEBUG_PUB.debug( 'DATE :'||p_x_req_material_tbl(i).requested_date);

Line 2329: Fnd_Msg_Pub.ADD;

2325: -- Validate for Schedule Material ID
2326: IF (p_x_req_material_tbl(i).schedule_material_id IS NULL AND
2327: p_x_req_material_tbl(i).schedule_material_id = FND_API.G_MISS_NUM) THEN
2328: Fnd_Message.SET_NAME('AHL','AHL_PP_SCH_MATRL_REQUIRED');
2329: Fnd_Msg_Pub.ADD;
2330: END IF;
2331: IF G_DEBUG='Y' THEN
2332: AHL_DEBUG_PUB.debug( 'SCHID :'||p_x_req_material_tbl(i).schedule_material_id);
2333: AHL_DEBUG_PUB.debug( 'OSID'||p_x_req_material_tbl(i).operation_sequence);

Line 2341: Fnd_Msg_Pub.ADD;

2337: FETCH Check_wo_status_cur INTO l_dummy;
2338: IF Check_wo_status_cur%NOTFOUND THEN
2339: --
2340: Fnd_Message.SET_NAME('AHL','AHL_PP_WO_STATUS_INVALID');
2341: Fnd_Msg_Pub.ADD;
2342: END IF;
2343: --
2344: CLOSE Check_wo_status_cur;
2345: --

Line 2352: l_msg_count := Fnd_Msg_Pub.count_msg;

2348:
2349: END IF; --Module type
2350:
2351: --Standard check to count messages
2352: l_msg_count := Fnd_Msg_Pub.count_msg;
2353:
2354: IF l_msg_count > 0 THEN
2355: X_msg_count := l_msg_count;
2356: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 2792: l_msg_count := Fnd_Msg_Pub.count_msg;

2788: END IF;
2789: --
2790: ------------------------End of Body---------------------------------------
2791: --Standard check to count messages
2792: l_msg_count := Fnd_Msg_Pub.count_msg;
2793:
2794: --Change made on Nov 17, 2005 by jeli due to bug 4742895.
2795: --Ignore messages in stack if return status is S after calls to EAM APIs.
2796: /*

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

2815: EXCEPTION
2816: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2817: ROLLBACK TO update_material_reqst;
2818: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2819: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2820: p_count => x_msg_count,
2821: p_data => x_msg_data);
2822: IF G_DEBUG='Y' THEN
2823: AHL_DEBUG_PUB.log_app_messages (

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

2828: END IF;
2829: WHEN FND_API.G_EXC_ERROR THEN
2830: ROLLBACK TO update_material_reqst;
2831: X_return_status := FND_API.G_RET_STS_ERROR;
2832: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2833: p_count => x_msg_count,
2834: p_data => X_msg_data);
2835: IF G_DEBUG='Y' THEN
2836: -- Debug info.

Line 2846: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

2842: END IF;
2843: WHEN OTHERS THEN
2844: ROLLBACK TO update_material_reqst;
2845: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2846: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2847: THEN
2848: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_MATERIALS_PVT',
2849: p_procedure_name => 'UPDATE_MATERIAL_REQST',
2850: p_error_text => SUBSTR(SQLERRM,1,240));

Line 2848: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_MATERIALS_PVT',

2844: ROLLBACK TO update_material_reqst;
2845: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2846: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2847: THEN
2848: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_MATERIALS_PVT',
2849: p_procedure_name => 'UPDATE_MATERIAL_REQST',
2850: p_error_text => SUBSTR(SQLERRM,1,240));
2851: END IF;
2852: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

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

2848: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_MATERIALS_PVT',
2849: p_procedure_name => 'UPDATE_MATERIAL_REQST',
2850: p_error_text => SUBSTR(SQLERRM,1,240));
2851: END IF;
2852: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2853: p_count => x_msg_count,
2854: p_data => X_msg_data);
2855: IF G_DEBUG='Y' THEN
2856: -- Debug info.

Line 3045: Fnd_Msg_Pub.initialize;

3041: END IF;
3042: -- Standard call to check for call compatibility.
3043: IF Fnd_Api.to_boolean(p_init_msg_list)
3044: THEN
3045: Fnd_Msg_Pub.initialize;
3046: END IF;
3047: -- Initialize API return status to success
3048: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
3049: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 3072: Fnd_Msg_Pub.ADD;

3068: OPEN Get_job_details(p_x_req_material_tbl(i).workorder_id);
3069: FETCH Get_job_details INTO l_workorder_name;
3070: IF Get_job_details%NOTFOUND THEN
3071: Fnd_Message.SET_NAME('AHL','AHL_PP_WO_ORD_NOT_EXISTS');
3072: Fnd_Msg_Pub.ADD;
3073: CLOSE Get_job_details;
3074: RAISE FND_API.G_EXC_ERROR;
3075: END IF;
3076: CLOSE Get_job_details;

Line 3088: Fnd_Msg_Pub.ADD;

3084:
3085: IF l_wo_status IN ('7', '5', '12')
3086: THEN
3087: Fnd_Message.SET_NAME('AHL','AHL_PP_WO_STATUS_INVALID');
3088: Fnd_Msg_Pub.ADD;
3089: RAISE FND_API.G_EXC_ERROR;
3090: END IF;
3091: -- Bug # 6680137 - end
3092: END IF;

Line 3105: FND_MSG_PUB.ADD;

3101: p_item_instance_id => NULL);
3102: IF l_return_status = FND_API.G_TRUE THEN
3103: FND_MESSAGE.Set_Name('AHL', 'AHL_PP_DEL_MTL_UNTLCKD');
3104: FND_MESSAGE.Set_Token('WO_NAME', l_workorder_name);
3105: FND_MSG_PUB.ADD;
3106: RAISE FND_API.G_EXC_ERROR;
3107: END IF;
3108: -- rroy
3109: -- ACL Changes

Line 3115: Fnd_Msg_Pub.ADD;

3111: -- Check for Schedule Material ID
3112: IF (p_x_req_material_tbl(i).schedule_material_id IS NULL OR
3113: p_x_req_material_tbl(i).schedule_material_id = FND_API.G_MISS_NUM) THEN
3114: Fnd_Message.SET_NAME('AHL','AHL_PP_SCH_MATRL_REQUIRED');
3115: Fnd_Msg_Pub.ADD;
3116: END IF;
3117: --
3118: IF G_DEBUG='Y' THEN
3119: Ahl_Debug_Pub.debug( 'Obj Number:'||p_x_req_material_tbl(i).object_version_number);

Line 3134: Fnd_Msg_Pub.ADD;

3130: FOR UPDATE OF STATUS NOWAIT;
3131: --
3132: IF p_x_req_material_tbl(i).object_version_number <> l_object_version_number THEN
3133: Fnd_Message.SET_NAME('AHL','AHL_PP_RECORD_CHANGED');
3134: Fnd_Msg_Pub.ADD;
3135: RAISE Fnd_Api.G_EXC_ERROR;
3136: END IF;
3137: --
3138: END IF;

Line 3141: l_msg_count := Fnd_Msg_Pub.count_msg;

3137: --
3138: END IF;
3139:
3140: --Standard check to count messages
3141: l_msg_count := Fnd_Msg_Pub.count_msg;
3142:
3143: IF l_msg_count > 0 THEN
3144: X_msg_count := l_msg_count;
3145: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 3280: l_msg_count := Fnd_Msg_Pub.count_msg;

3276: --
3277: END IF; --Status
3278: ---------------------------End of Body---------------------------------------
3279: --Standard check to count messages
3280: l_msg_count := Fnd_Msg_Pub.count_msg;
3281:
3282: --Change made on Nov 17, 2005 by jeli due to bug 4742895.
3283: --Ignore messages in stack if return status is S after calls to EAM APIs.
3284: /*

Line 3306: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

3302: EXCEPTION
3303: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
3304: ROLLBACK TO remove_material_request;
3305: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3306: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
3307: p_count => x_msg_count,
3308: p_data => x_msg_data);
3309:
3310: IF G_DEBUG='Y' THEN

Line 3320: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

3316: END IF;
3317: WHEN Fnd_Api.G_EXC_ERROR THEN
3318: ROLLBACK TO remove_material_request;
3319: X_return_status := Fnd_Api.G_RET_STS_ERROR;
3320: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
3321: p_count => x_msg_count,
3322: p_data => X_msg_data);
3323: IF G_DEBUG='Y' THEN
3324: -- Debug info.

Line 3334: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)

3330: END IF;
3331: WHEN OTHERS THEN
3332: ROLLBACK TO remove_material_request;
3333: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3334: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
3335: THEN
3336: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_PP_MATERIALS_PVT',
3337: p_procedure_name => 'REMOVE_MATERIAL_REQUEST',
3338: p_error_text => SUBSTR(SQLERRM,1,240));

Line 3336: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_PP_MATERIALS_PVT',

3332: ROLLBACK TO remove_material_request;
3333: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3334: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
3335: THEN
3336: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_PP_MATERIALS_PVT',
3337: p_procedure_name => 'REMOVE_MATERIAL_REQUEST',
3338: p_error_text => SUBSTR(SQLERRM,1,240));
3339: END IF;
3340: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

Line 3340: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

3336: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_PP_MATERIALS_PVT',
3337: p_procedure_name => 'REMOVE_MATERIAL_REQUEST',
3338: p_error_text => SUBSTR(SQLERRM,1,240));
3339: END IF;
3340: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
3341: p_count => x_msg_count,
3342: p_data => X_msg_data);
3343:
3344: IF G_DEBUG='Y' THEN

Line 3428: FND_MSG_PUB.initialize;

3424: END IF;
3425: -- Standard call to check for call compatibility.
3426: IF FND_API.to_boolean(p_init_msg_list)
3427: THEN
3428: FND_MSG_PUB.initialize;
3429: END IF;
3430: -- Initialize API return status to success
3431: x_return_status := FND_API.G_RET_STS_SUCCESS;
3432: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 3477: l_msg_count := FND_MSG_PUB.count_msg;

3473: x_msg_count => l_msg_count,
3474: x_msg_data => l_msg_data
3475: ) ;
3476: IF (l_return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
3477: l_msg_count := FND_MSG_PUB.count_msg;
3478: IF l_msg_count > 0 THEN
3479: RAISE FND_API.G_EXC_ERROR;
3480: END IF;
3481: END IF;

Line 3502: l_msg_count := FND_MSG_PUB.count_msg;

3498: x_msg_data => l_msg_data
3499: );
3500:
3501: IF (l_return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
3502: l_msg_count := FND_MSG_PUB.count_msg;
3503: IF l_msg_count > 0 THEN
3504: RAISE FND_API.G_EXC_ERROR;
3505: END IF;
3506: END IF;

Line 3524: l_msg_count := FND_MSG_PUB.count_msg;

3520: x_msg_data => l_msg_data
3521: );
3522:
3523: IF (l_return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
3524: l_msg_count := FND_MSG_PUB.count_msg;
3525: IF l_msg_count > 0 THEN
3526: RAISE FND_API.G_EXC_ERROR;
3527: END IF;
3528: END IF;

Line 3533: l_msg_count := Fnd_Msg_Pub.count_msg;

3529:
3530: END IF;
3531: ------------------------End of Body---------------------------------------
3532: --Standard check to count messages
3533: l_msg_count := Fnd_Msg_Pub.count_msg;
3534:
3535: IF l_msg_count > 0 THEN
3536: X_msg_count := l_msg_count;
3537: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

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

3552: EXCEPTION
3553: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3554: ROLLBACK TO process_material_request;
3555: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3556: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3557: p_count => x_msg_count,
3558: p_data => x_msg_data);
3559: IF G_DEBUG='Y' THEN
3560: AHL_DEBUG_PUB.log_app_messages (

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

3565: END IF;
3566: WHEN FND_API.G_EXC_ERROR THEN
3567: ROLLBACK TO process_material_request;
3568: X_return_status := FND_API.G_RET_STS_ERROR;
3569: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3570: p_count => x_msg_count,
3571: p_data => X_msg_data);
3572: IF G_DEBUG='Y' THEN
3573: -- Debug info.

Line 3584: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

3580: END IF;
3581: WHEN OTHERS THEN
3582: ROLLBACK TO process_material_request;
3583: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3584: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3585: THEN
3586: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_MATERIALS_PVT',
3587: p_procedure_name => 'PROCESS_MATERIAL_REQUEST',
3588: p_error_text => SUBSTR(SQLERRM,1,240));

Line 3586: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_MATERIALS_PVT',

3582: ROLLBACK TO process_material_request;
3583: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3584: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3585: THEN
3586: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_MATERIALS_PVT',
3587: p_procedure_name => 'PROCESS_MATERIAL_REQUEST',
3588: p_error_text => SUBSTR(SQLERRM,1,240));
3589: END IF;
3590: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

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

3586: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_MATERIALS_PVT',
3587: p_procedure_name => 'PROCESS_MATERIAL_REQUEST',
3588: p_error_text => SUBSTR(SQLERRM,1,240));
3589: END IF;
3590: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3591: p_count => x_msg_count,
3592: p_data => X_msg_data);
3593: IF G_DEBUG='Y' THEN
3594: -- Debug info.

Line 4137: FND_MSG_PUB.initialize;

4133: SAVEPOINT Process_Wo_Op_Materials;
4134: -- Standard call to check for call compatibility.
4135: IF FND_API.to_boolean(p_init_msg_list)
4136: THEN
4137: FND_MSG_PUB.initialize;
4138: END IF;
4139: -- Initialize API return status to success
4140: x_return_status := FND_API.G_RET_STS_SUCCESS;
4141: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 4435: l_msg_count := Fnd_Msg_Pub.count_msg;

4431: END IF;
4432:
4433: ------------------------End of Body---------------------------------------
4434: --Standard check to count messages
4435: l_msg_count := Fnd_Msg_Pub.count_msg;
4436:
4437: IF l_msg_count > 0 THEN
4438: X_msg_count := l_msg_count;
4439: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

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

4457: EXCEPTION
4458: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4459: ROLLBACK TO Process_Wo_Op_Materials;
4460: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4461: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4462: p_count => x_msg_count,
4463: p_data => x_msg_data);
4464:
4465: WHEN FND_API.G_EXC_ERROR THEN

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

4464:
4465: WHEN FND_API.G_EXC_ERROR THEN
4466: ROLLBACK TO Process_Wo_Op_Materials;
4467: X_return_status := FND_API.G_RET_STS_ERROR;
4468: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4469: p_count => x_msg_count,
4470: p_data => X_msg_data);
4471: WHEN OTHERS THEN
4472: ROLLBACK TO Process_Wo_Op_Materials;

Line 4474: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

4470: p_data => X_msg_data);
4471: WHEN OTHERS THEN
4472: ROLLBACK TO Process_Wo_Op_Materials;
4473: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4474: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4475: THEN
4476: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_MATERIALS_PVT',
4477: p_procedure_name => 'PROCESS_WO_OP_MATERIALS',
4478: p_error_text => SUBSTR(SQLERRM,1,240));

Line 4476: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_MATERIALS_PVT',

4472: ROLLBACK TO Process_Wo_Op_Materials;
4473: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4474: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4475: THEN
4476: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_MATERIALS_PVT',
4477: p_procedure_name => 'PROCESS_WO_OP_MATERIALS',
4478: p_error_text => SUBSTR(SQLERRM,1,240));
4479: END IF;
4480: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

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

4476: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_MATERIALS_PVT',
4477: p_procedure_name => 'PROCESS_WO_OP_MATERIALS',
4478: p_error_text => SUBSTR(SQLERRM,1,240));
4479: END IF;
4480: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4481: p_count => x_msg_count,
4482: p_data => X_msg_data);
4483:
4484: END Process_Wo_Op_Materials;

Line 4631: FND_MSG_PUB.initialize;

4627: SAVEPOINT Material_Notification;
4628: -- Initialize message list if p_init_msg_list is set to TRUE.
4629: IF FND_API.to_boolean(p_init_msg_list)
4630: THEN
4631: FND_MSG_PUB.initialize;
4632: END IF;
4633: -- Initialize API return status to success
4634: x_return_status := FND_API.G_RET_STS_SUCCESS;
4635: -- Standard call to check for call compatibility.

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

4797: EXCEPTION
4798: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4799: ROLLBACK TO Material_Notification;
4800: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4801: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
4802: p_count => x_msg_count,
4803: p_data => x_msg_data);
4804:
4805: WHEN FND_API.G_EXC_ERROR THEN

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

4804:
4805: WHEN FND_API.G_EXC_ERROR THEN
4806: ROLLBACK TO MATERIAL_NOTIFICATION;
4807: X_return_status := FND_API.G_RET_STS_ERROR;
4808: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
4809: p_count => x_msg_count,
4810: p_data => X_msg_data);
4811: WHEN OTHERS THEN
4812: ROLLBACK TO Material_Notification;

Line 4814: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

4810: p_data => X_msg_data);
4811: WHEN OTHERS THEN
4812: ROLLBACK TO Material_Notification;
4813: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4814: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4815: THEN
4816: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
4817: p_procedure_name => 'MATERIAL_NOTIFICATION',
4818: p_error_text => SUBSTR(SQLERRM,1,240));

Line 4816: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,

4812: ROLLBACK TO Material_Notification;
4813: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4814: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4815: THEN
4816: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
4817: p_procedure_name => 'MATERIAL_NOTIFICATION',
4818: p_error_text => SUBSTR(SQLERRM,1,240));
4819: END IF;
4820: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

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

4816: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
4817: p_procedure_name => 'MATERIAL_NOTIFICATION',
4818: p_error_text => SUBSTR(SQLERRM,1,240));
4819: END IF;
4820: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
4821: p_count => x_msg_count,
4822: p_data => X_msg_data);
4823:
4824: END Material_Notification;