1: package body GMO_VBATCH_TASK_PVT AS
2: /* $Header: GMOVVTKB.pls 120.2.12020000.7 2013/04/25 13:54:00 rborpatl ship $ */
3:
4: function is_wms_installed return varchar2 is
5: begin
54: x_return_status := fnd_api.g_ret_sts_error;
55: FND_MESSAGE.SET_NAME('GME','GME_API_UNABLE_TO_GET_CONSTANT');
56: FND_MESSAGE.SET_TOKEN('CONSTANT_NAME','BOM:HOUR_UOM_CODE');
57: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
58: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_task_pvt.get_resource_txn_end_date', FALSE);
59: end if;
60: FND_MSG_PUB.ADD;
61: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
62:
65: FND_MESSAGE.SET_NAME('GME','GME_RSRC_USG_NT_CNV_SYUOM');
66: FND_MESSAGE.SET_TOKEN('SY_UOM',l_hour_um);
67: FND_MESSAGE.SET_TOKEN('RSRC_USG_UOM',p_trans_um);
68: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
69: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_task_pvt.get_resource_txn_end_date', FALSE);
70: end if;
71: FND_MSG_PUB.ADD;
72: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
73: WHEN OTHERS THEN
75: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
76: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
77: FND_MESSAGE.SET_TOKEN('ERROR_CODE',SQLCODE);
78: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
79: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_task_pvt.get_resource_txn_end_date', FALSE);
80: end if;
81: FND_MSG_PUB.ADD;
82: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
83: END get_resource_txn_end_date;
127: x_return_status := fnd_api.g_ret_sts_error;
128: FND_MESSAGE.SET_NAME('GME','GME_API_UNABLE_TO_GET_CONSTANT');
129: FND_MESSAGE.SET_TOKEN('CONSTANT_NAME','BOM:HOUR_UOM_CODE');
130: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
131: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_task_pvt.get_resource_txn_usage', FALSE);
132: end if;
133: FND_MSG_PUB.ADD;
134: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
135:
138: FND_MESSAGE.SET_NAME('GME','GME_RSRC_USG_NT_CNV_SYUOM');
139: FND_MESSAGE.SET_TOKEN('SY_UOM',l_hour_um);
140: FND_MESSAGE.SET_TOKEN('RSRC_USG_UOM',p_trans_um);
141: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
142: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_task_pvt.get_resource_txn_usage', FALSE);
143: end if;
144: FND_MSG_PUB.ADD;
145: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
146: WHEN OTHERS THEN
148: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
149: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
150: FND_MESSAGE.SET_TOKEN('ERROR_CODE',SQLCODE);
151: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
152: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_task_pvt.get_resource_txn_usage', FALSE);
153: end if;
154: FND_MSG_PUB.ADD;
155: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
156: END get_resource_txn_usage;
828: FND_MESSAGE.SET_NAME('GMO','GMO_UM_CONVERT_ERR');
829: FND_MESSAGE.SET_TOKEN('FROM_UOM',p_from_um);
830: FND_MESSAGE.SET_TOKEN('TO_UOM',p_to_um);
831: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
832: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_task_pvt.convert_um', FALSE);
833: end if;
834: FND_MSG_PUB.ADD;
835: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
836: WHEN OTHERS THEN
838: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
839: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
840: FND_MESSAGE.SET_TOKEN('ERROR_CODE',SQLCODE);
841: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
842: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_task_pvt.convert_um', FALSE);
843: end if;
844: FND_MSG_PUB.ADD;
845: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
846:
928: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
929: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
930: FND_MESSAGE.SET_TOKEN('ERROR_CODE',SQLCODE);
931: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
932: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_task_pvt.qty_within_deviation', FALSE);
933: end if;
934: FND_MSG_PUB.ADD;
935: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
936: END qty_within_deviation;
962: when DISP_NOT_REQ_EXCEPTION then
963: x_return_status:= fnd_api.g_ret_sts_error;
964: FND_MESSAGE.SET_NAME('GMO','GMO_DISP_DISPENSE_NOT_REQ_ERR');
965: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
966: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_task_pvt.get_dispense_um', FALSE);
967: end if;
968: FND_MSG_PUB.ADD;
969: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
970: WHEN OTHERS THEN
972: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
973: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
974: FND_MESSAGE.SET_TOKEN('ERROR_CODE',SQLCODE);
975: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
976: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_task_pvt.get_dispense_um', FALSE);
977: end if;
978: FND_MSG_PUB.ADD;
979: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
980:
1005: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
1006: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
1007: FND_MESSAGE.SET_TOKEN('ERROR_CODE',SQLCODE);
1008: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1009: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_task_pvt.get_resource_txn_end_date', FALSE);
1010: end if;
1011: FND_MSG_PUB.ADD;
1012: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
1013: END relieve_reservation;
1038: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
1039: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
1040: FND_MESSAGE.SET_TOKEN('ERROR_CODE',SQLCODE);
1041: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1042: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_task_pvt.relieve_pending_lot', FALSE);
1043: end if;
1044: FND_MSG_PUB.ADD;
1045: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
1046: END relieve_pending_lot;
1237: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
1238: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
1239: FND_MESSAGE.SET_TOKEN('ERROR_CODE',SQLCODE);
1240: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1241: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_task_pvt.create_material_transaction', FALSE);
1242: end if;
1243: FND_MSG_PUB.ADD;
1244: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
1245: END create_material_transaction;
1313: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
1314: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
1315: FND_MESSAGE.SET_TOKEN('ERROR_CODE',SQLCODE);
1316: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1317: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_task_pvt.update_material_transaction', FALSE);
1318: end if;
1319: FND_MSG_PUB.ADD;
1320: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
1321: END update_material_transaction;
1378: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
1379: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
1380: FND_MESSAGE.SET_TOKEN('ERROR_CODE',SQLCODE);
1381: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1382: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_task_pvt.delete_material_transaction', FALSE);
1383: end if;
1384: FND_MSG_PUB.ADD;
1385: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
1386: END delete_material_transaction;
1468: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
1469: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
1470: FND_MESSAGE.SET_TOKEN('ERROR_CODE',SQLCODE);
1471: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1472: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_task_pvt.create_lot', FALSE);
1473: end if;
1474: FND_MSG_PUB.ADD;
1475: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
1476: END create_lot;
1519: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
1520: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
1521: FND_MESSAGE.SET_TOKEN('ERROR_CODE',SQLCODE);
1522: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1523: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_task_pvt.generate_lot', FALSE);
1524: end if;
1525: FND_MSG_PUB.ADD;
1526: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
1527: END generate_lot;
1722: WHEN OTHERS THEN
1723: x_orig_date := NULL;
1724: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1725: END get_origination_date;
1726: end GMO_VBATCH_TASK_PVT;