1: package body GMO_VBATCH_TASK_PVT AS
2: /* $Header: GMOVVTKB.pls 120.1 2007/06/21 06:16:59 rvsingh noship $ */
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;
820: FND_MESSAGE.SET_NAME('GMO','GMO_UM_CONVERT_ERR');
821: FND_MESSAGE.SET_TOKEN('FROM_UOM',p_from_um);
822: FND_MESSAGE.SET_TOKEN('TO_UOM',p_to_um);
823: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
824: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_task_pvt.convert_um', FALSE);
825: end if;
826: FND_MSG_PUB.ADD;
827: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
828: WHEN OTHERS THEN
830: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
831: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
832: FND_MESSAGE.SET_TOKEN('ERROR_CODE',SQLCODE);
833: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
834: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_task_pvt.convert_um', FALSE);
835: end if;
836: FND_MSG_PUB.ADD;
837: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
838:
920: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
921: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
922: FND_MESSAGE.SET_TOKEN('ERROR_CODE',SQLCODE);
923: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
924: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_task_pvt.qty_within_deviation', FALSE);
925: end if;
926: FND_MSG_PUB.ADD;
927: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
928: END qty_within_deviation;
954: when DISP_NOT_REQ_EXCEPTION then
955: x_return_status:= fnd_api.g_ret_sts_error;
956: FND_MESSAGE.SET_NAME('GMO','GMO_DISP_DISPENSE_NOT_REQ_ERR');
957: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
958: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_task_pvt.get_dispense_um', FALSE);
959: end if;
960: FND_MSG_PUB.ADD;
961: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
962: WHEN OTHERS THEN
964: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
965: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
966: FND_MESSAGE.SET_TOKEN('ERROR_CODE',SQLCODE);
967: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
968: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_task_pvt.get_dispense_um', FALSE);
969: end if;
970: FND_MSG_PUB.ADD;
971: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
972:
997: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
998: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
999: FND_MESSAGE.SET_TOKEN('ERROR_CODE',SQLCODE);
1000: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1001: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_task_pvt.get_resource_txn_end_date', FALSE);
1002: end if;
1003: FND_MSG_PUB.ADD;
1004: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
1005: END relieve_reservation;
1030: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
1031: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
1032: FND_MESSAGE.SET_TOKEN('ERROR_CODE',SQLCODE);
1033: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1034: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_task_pvt.relieve_pending_lot', FALSE);
1035: end if;
1036: FND_MSG_PUB.ADD;
1037: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
1038: END relieve_pending_lot;
1095: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
1096: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
1097: FND_MESSAGE.SET_TOKEN('ERROR_CODE',SQLCODE);
1098: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1099: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_task_pvt.create_material_transaction', FALSE);
1100: end if;
1101: FND_MSG_PUB.ADD;
1102: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
1103: END create_material_transaction;
1164: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
1165: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
1166: FND_MESSAGE.SET_TOKEN('ERROR_CODE',SQLCODE);
1167: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1168: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_task_pvt.update_material_transaction', FALSE);
1169: end if;
1170: FND_MSG_PUB.ADD;
1171: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
1172: END update_material_transaction;
1229: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
1230: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
1231: FND_MESSAGE.SET_TOKEN('ERROR_CODE',SQLCODE);
1232: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1233: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_task_pvt.delete_material_transaction', FALSE);
1234: end if;
1235: FND_MSG_PUB.ADD;
1236: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
1237: END delete_material_transaction;
1319: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
1320: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
1321: FND_MESSAGE.SET_TOKEN('ERROR_CODE',SQLCODE);
1322: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1323: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_task_pvt.create_lot', FALSE);
1324: end if;
1325: FND_MSG_PUB.ADD;
1326: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
1327: END create_lot;
1370: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
1371: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
1372: FND_MESSAGE.SET_TOKEN('ERROR_CODE',SQLCODE);
1373: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1374: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_task_pvt.generate_lot', FALSE);
1375: end if;
1376: FND_MSG_PUB.ADD;
1377: FND_MSG_PUB.Count_And_Get (p_count => x_message_count, p_data => x_message_data);
1378: END generate_lot;
1392: and lot_number = p_lot_number;
1393:
1394: END get_lot_event_key;
1395:
1396: end GMO_VBATCH_TASK_PVT;