11:
12: G_PKG_NAME CONSTANT VARCHAR2(30) := 'OZF_SALES_TRANSACTIONS_PVT';
13: G_FILE_NAME CONSTANT VARCHAR2(30) := 'ozfvstnb.pls';
14:
15: OZF_DEBUG_HIGH_ON BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
16: OZF_DEBUG_LOW_ON BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low);
17:
18: G_COMMON_UOM_CODE VARCHAR2(30) := FND_PROFILE.value('OZF_TP_COMMON_UOM');
19: G_COMMON_CURRENCY_CODE VARCHAR2(15) := FND_PROFILE.value('OZF_TP_COMMON_CURRENCY');
12: G_PKG_NAME CONSTANT VARCHAR2(30) := 'OZF_SALES_TRANSACTIONS_PVT';
13: G_FILE_NAME CONSTANT VARCHAR2(30) := 'ozfvstnb.pls';
14:
15: OZF_DEBUG_HIGH_ON BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
16: OZF_DEBUG_LOW_ON BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low);
17:
18: G_COMMON_UOM_CODE VARCHAR2(30) := FND_PROFILE.value('OZF_TP_COMMON_UOM');
19: G_COMMON_CURRENCY_CODE VARCHAR2(15) := FND_PROFILE.value('OZF_TP_COMMON_CURRENCY');
20: ---------------------------------------------------------------------
62: END IF;
63:
64: --Initialize message list if p_init_msg_list is TRUE.
65: IF FND_API.To_Boolean (p_init_msg_list) THEN
66: FND_MSG_PUB.initialize;
67: END IF;
68:
69: -- Debug Message
70: IF OZF_DEBUG_LOW_ON THEN
141: IF OZF_DEBUG_LOW_ON THEN
142: OZF_UTILITY_PVT.debug_message(l_full_name||': End');
143: END IF;
144: --Standard call to get message count and if count=1, get the message
145: FND_MSG_PUB.Count_And_Get (
146: p_encoded => FND_API.G_FALSE,
147: p_count => x_msg_count,
148: p_data => x_msg_data
149: );
151: WHEN FND_API.G_EXC_ERROR THEN
152: ROLLBACK TO Validate_trans_PVT;
153: x_return_status := FND_API.G_RET_STS_ERROR;
154: -- Standard call to get message count and if count=1, get the message
155: FND_MSG_PUB.Count_And_Get (
156: p_encoded => FND_API.G_FALSE,
157: p_count => x_msg_count,
158: p_data => x_msg_data
159: );
160: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
161: ROLLBACK TO Validate_trans_PVT;
162: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
163: -- Standard call to get message count and if count=1, get the message
164: FND_MSG_PUB.Count_And_Get (
165: p_encoded => FND_API.G_FALSE,
166: p_count => x_msg_count,
167: p_data => x_msg_data
168: );
168: );
169: WHEN OTHERS THEN
170: ROLLBACK TO Validate_trans_PVT;
171: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
172: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
173: THEN
174: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
175: END IF;
176: -- Standard call to get message count and if count=1, get the message
170: ROLLBACK TO Validate_trans_PVT;
171: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
172: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
173: THEN
174: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
175: END IF;
176: -- Standard call to get message count and if count=1, get the message
177: FND_MSG_PUB.Count_And_Get (
178: p_encoded => FND_API.G_FALSE,
173: THEN
174: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
175: END IF;
176: -- Standard call to get message count and if count=1, get the message
177: FND_MSG_PUB.Count_And_Get (
178: p_encoded => FND_API.G_FALSE,
179: p_count => x_msg_count,
180: p_data => x_msg_data
181: );
259: END IF;
260:
261: --Initialize message list if p_init_msg_list is TRUE.
262: IF FND_API.To_Boolean (p_init_msg_list) THEN
263: FND_MSG_PUB.initialize;
264: END IF;
265:
266: -- Debug Message
267: IF OZF_DEBUG_LOW_ON THEN
586: IF OZF_DEBUG_LOW_ON THEN
587: OZF_UTILITY_PVT.debug_message(l_full_name||': End');
588: END IF;
589: --Standard call to get message count and if count=1, get the message
590: FND_MSG_PUB.Count_And_Get (
591: p_encoded => FND_API.G_FALSE,
592: p_count => x_msg_count,
593: p_data => x_msg_data
594: );
597: WHEN FND_API.G_EXC_ERROR THEN
598: ROLLBACK TO CREATE_TRANSACTION;
599: x_return_status := FND_API.G_RET_STS_ERROR;
600: -- Standard call to get message count and if count=1, get the message
601: FND_MSG_PUB.Count_And_Get (
602: p_encoded => FND_API.G_FALSE,
603: p_count => x_msg_count,
604: p_data => x_msg_data
605: );
607: ROLLBACK TO CREATE_TRANSACTION;
608: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
609:
610: -- Standard call to get message count and if count=1, get the message
611: FND_MSG_PUB.Count_And_Get (
612: p_encoded => FND_API.G_FALSE,
613: p_count => x_msg_count,
614: p_data => x_msg_data
615: );
617: ROLLBACK TO CREATE_TRANSACTION;
618: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
619:
620: -- Standard call to get message count and if count=1, get the message
621: FND_MSG_PUB.Count_And_Get (
622: p_encoded => FND_API.G_FALSE,
623: p_count => x_msg_count,
624: p_data => x_msg_data
625: );
679: END IF;
680:
681: --Initialize message list if p_init_msg_list is TRUE.
682: IF FND_API.To_Boolean (p_init_msg_list) THEN
683: FND_MSG_PUB.initialize;
684: END IF;
685:
686: -- Debug Message
687: IF OZF_DEBUG_LOW_ON THEN
918: IF OZF_DEBUG_LOW_ON THEN
919: OZF_UTILITY_PVT.debug_message(l_full_name||': End');
920: END IF;
921: --Standard call to get message count and if count=1, get the message
922: FND_MSG_PUB.Count_And_Get (
923: p_encoded => FND_API.G_FALSE,
924: p_count => x_msg_count,
925: p_data => x_msg_data
926: );
929: WHEN FND_API.G_EXC_ERROR THEN
930: ROLLBACK TO INIT_INVEN_TMP;
931: x_return_status := FND_API.G_RET_STS_ERROR;
932: -- Standard call to get message count and if count=1, get the message
933: FND_MSG_PUB.Count_And_Get (
934: p_encoded => FND_API.G_FALSE,
935: p_count => x_msg_count,
936: p_data => x_msg_data
937: );
939: ROLLBACK TO INIT_INVEN_TMP;
940: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
941:
942: -- Standard call to get message count and if count=1, get the message
943: FND_MSG_PUB.Count_And_Get (
944: p_encoded => FND_API.G_FALSE,
945: p_count => x_msg_count,
946: p_data => x_msg_data
947: );
949: ROLLBACK TO INIT_INVEN_TMP;
950: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
951:
952: -- Standard call to get message count and if count=1, get the message
953: FND_MSG_PUB.Count_And_Get (
954: p_encoded => FND_API.G_FALSE,
955: p_count => x_msg_count,
956: p_data => x_msg_data
957: );
1009: END IF;
1010:
1011: --Initialize message list if p_init_msg_list is TRUE.
1012: IF FND_API.To_Boolean (p_init_msg_list) THEN
1013: FND_MSG_PUB.initialize;
1014: END IF;
1015:
1016: -- Debug Message
1017: IF OZF_DEBUG_LOW_ON THEN
1040: IF OZF_DEBUG_LOW_ON THEN
1041: OZF_UTILITY_PVT.debug_message(l_full_name||': End');
1042: END IF;
1043: --Standard call to get message count and if count=1, get the message
1044: FND_MSG_PUB.Count_And_Get (
1045: p_encoded => FND_API.G_FALSE,
1046: p_count => x_msg_count,
1047: p_data => x_msg_data
1048: );
1051: WHEN FND_API.G_EXC_ERROR THEN
1052: ROLLBACK TO UPD_INVEN_TMP;
1053: x_return_status := FND_API.G_RET_STS_ERROR;
1054: -- Standard call to get message count and if count=1, get the message
1055: FND_MSG_PUB.Count_And_Get (
1056: p_encoded => FND_API.G_FALSE,
1057: p_count => x_msg_count,
1058: p_data => x_msg_data
1059: );
1061: ROLLBACK TO UPD_INVEN_TMP;
1062: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1063:
1064: -- Standard call to get message count and if count=1, get the message
1065: FND_MSG_PUB.Count_And_Get (
1066: p_encoded => FND_API.G_FALSE,
1067: p_count => x_msg_count,
1068: p_data => x_msg_data
1069: );
1071: ROLLBACK TO UPD_INVEN_TMP;
1072: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1073:
1074: -- Standard call to get message count and if count=1, get the message
1075: FND_MSG_PUB.Count_And_Get (
1076: p_encoded => FND_API.G_FALSE,
1077: p_count => x_msg_count,
1078: p_data => x_msg_data
1079: );
1173: END IF;
1174:
1175: --Initialize message list if p_init_msg_list is TRUE.
1176: IF FND_API.To_Boolean (p_init_msg_list) THEN
1177: FND_MSG_PUB.initialize;
1178: END IF;
1179:
1180: -- Debug Message
1181: IF OZF_DEBUG_LOW_ON THEN
1319: IF OZF_DEBUG_LOW_ON THEN
1320: OZF_UTILITY_PVT.debug_message(l_full_name||': End');
1321: END IF;
1322: --Standard call to get message count and if count=1, get the message
1323: FND_MSG_PUB.Count_And_Get (
1324: p_encoded => FND_API.G_FALSE,
1325: p_count => x_msg_count,
1326: p_data => x_msg_data
1327: );
1331: WHEN FND_API.G_EXC_ERROR THEN
1332: ROLLBACK TO VALID_INV_LVL;
1333: x_return_status := FND_API.G_RET_STS_ERROR;
1334: -- Standard call to get message count and if count=1, get the message
1335: FND_MSG_PUB.Count_And_Get (
1336: p_encoded => FND_API.G_FALSE,
1337: p_count => x_msg_count,
1338: p_data => x_msg_data
1339: );
1341: ROLLBACK TO VALID_INV_LVL;
1342: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1343:
1344: -- Standard call to get message count and if count=1, get the message
1345: FND_MSG_PUB.Count_And_Get (
1346: p_encoded => FND_API.G_FALSE,
1347: p_count => x_msg_count,
1348: p_data => x_msg_data
1349: );
1351: ROLLBACK TO VALID_INV_LVL;
1352: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1353:
1354: -- Standard call to get message count and if count=1, get the message
1355: FND_MSG_PUB.Count_And_Get (
1356: p_encoded => FND_API.G_FALSE,
1357: p_count => x_msg_count,
1358: p_data => x_msg_data
1359: );
1451: END IF;
1452:
1453: --Initialize message list if p_init_msg_list is TRUE.
1454: IF FND_API.To_Boolean (p_init_msg_list) THEN
1455: FND_MSG_PUB.initialize;
1456: END IF;
1457:
1458: -- Debug Message
1459: IF OZF_DEBUG_LOW_ON THEN
1578: IF OZF_DEBUG_LOW_ON THEN
1579: OZF_UTILITY_PVT.debug_message(l_full_name||': End');
1580: END IF;
1581: --Standard call to get message count and if count=1, get the message
1582: FND_MSG_PUB.Count_And_Get (
1583: p_encoded => FND_API.G_FALSE,
1584: p_count => x_msg_count,
1585: p_data => x_msg_data
1586: );
1590: WHEN FND_API.G_EXC_ERROR THEN
1591: ROLLBACK TO GET_WAC;
1592: x_return_status := FND_API.G_RET_STS_ERROR;
1593: -- Standard call to get message count and if count=1, get the message
1594: FND_MSG_PUB.Count_And_Get (
1595: p_encoded => FND_API.G_FALSE,
1596: p_count => x_msg_count,
1597: p_data => x_msg_data
1598: );
1600: ROLLBACK TO GET_WAC;
1601: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1602:
1603: -- Standard call to get message count and if count=1, get the message
1604: FND_MSG_PUB.Count_And_Get (
1605: p_encoded => FND_API.G_FALSE,
1606: p_count => x_msg_count,
1607: p_data => x_msg_data
1608: );
1610: ROLLBACK TO GET_WAC;
1611: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1612:
1613: -- Standard call to get message count and if count=1, get the message
1614: FND_MSG_PUB.Count_And_Get (
1615: p_encoded => FND_API.G_FALSE,
1616: p_count => x_msg_count,
1617: p_data => x_msg_data
1618: );