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_UC_POS_NECES_PVT dependencies on FND_LOG

Line 1009: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1005: l_mc_header_id NUMBER;
1006: L_DEBUG_KEY VARCHAR2(100) := 'ahl.plsql.' || G_PKG_NAME || '.Quantity_Rule_Exists';
1007:
1008: BEGIN
1009: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1010: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin',
1011: 'At the start of the function, p_instance_id = ' || p_instance_id);
1012: END IF;
1013: EXECUTE IMMEDIATE 'DELETE FROM AHL_APPLICABLE_INSTANCES';

Line 1010: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin',

1006: L_DEBUG_KEY VARCHAR2(100) := 'ahl.plsql.' || G_PKG_NAME || '.Quantity_Rule_Exists';
1007:
1008: BEGIN
1009: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1010: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin',
1011: 'At the start of the function, p_instance_id = ' || p_instance_id);
1012: END IF;
1013: EXECUTE IMMEDIATE 'DELETE FROM AHL_APPLICABLE_INSTANCES';
1014: -- Get all the Position Paths associated with the instance p_instance_id into AHL_APPLICABLE_INSTANCES.

Line 1040: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1036: LOOP
1037: FETCH rule_exists_csr INTO l_rule_id, l_rule_name, l_mc_header_id;
1038: EXIT WHEN rule_exists_csr%NOTFOUND;
1039:
1040: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1041: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1042: 'Quantity Type Rule Exists: l_rule_id: ' || l_rule_id ||
1043: ', l_mc_header_id: ' || l_mc_header_id ||
1044: ', l_rule_name: ' || l_rule_name);

Line 1041: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,

1037: FETCH rule_exists_csr INTO l_rule_id, l_rule_name, l_mc_header_id;
1038: EXIT WHEN rule_exists_csr%NOTFOUND;
1039:
1040: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1041: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1042: 'Quantity Type Rule Exists: l_rule_id: ' || l_rule_id ||
1043: ', l_mc_header_id: ' || l_mc_header_id ||
1044: ', l_rule_name: ' || l_rule_name);
1045: END IF;

Line 1052: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1048: FETCH check_inst_in_uc_ofmc_csr INTO l_rule_uc_top_inst_id;
1049:
1050: --Verify that the rule is applicable to currently installed instance
1051: IF (check_inst_in_uc_ofmc_csr%FOUND) THEN
1052: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1053: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1054: 'Rule is applicable to the UC top instance: l_rule_uc_top_inst_id: ' || l_rule_uc_top_inst_id);
1055: END IF;
1056: l_ret_val := 'Y';

Line 1053: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,

1049:
1050: --Verify that the rule is applicable to currently installed instance
1051: IF (check_inst_in_uc_ofmc_csr%FOUND) THEN
1052: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1053: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1054: 'Rule is applicable to the UC top instance: l_rule_uc_top_inst_id: ' || l_rule_uc_top_inst_id);
1055: END IF;
1056: l_ret_val := 'Y';
1057: CLOSE check_inst_in_uc_ofmc_csr;

Line 1066: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1062: END LOOP;
1063: CLOSE rule_exists_csr;
1064:
1065: IF (l_ret_val = 'N') THEN
1066: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1067: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Quantity Rule does not exist?');
1068: END IF;
1069: END IF;
1070:

Line 1067: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Quantity Rule does not exist?');

1063: CLOSE rule_exists_csr;
1064:
1065: IF (l_ret_val = 'N') THEN
1066: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1067: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Quantity Rule does not exist?');
1068: END IF;
1069: END IF;
1070:
1071: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 1071: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1067: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Quantity Rule does not exist?');
1068: END IF;
1069: END IF;
1070:
1071: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1072: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end',
1073: 'At the end of the function, About to return ' || l_ret_val);
1074: END IF;
1075: RETURN l_ret_val;

Line 1072: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end',

1068: END IF;
1069: END IF;
1070:
1071: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1072: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end',
1073: 'At the end of the function, About to return ' || l_ret_val);
1074: END IF;
1075: RETURN l_ret_val;
1076: END Quantity_Rule_Exists;

Line 1235: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1231: l_quantity NUMBER;
1232:
1233: BEGIN
1234:
1235: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1236: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin',
1237: 'At the start of the procedure, p_csi_instance_id = ' || p_csi_instance_id ||
1238: ', p_uc_header_id = ' || p_uc_header_id ||
1239: ', p_x_error_table.COUNT = ' || p_x_error_table.COUNT);

Line 1236: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin',

1232:
1233: BEGIN
1234:
1235: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1236: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin',
1237: 'At the start of the procedure, p_csi_instance_id = ' || p_csi_instance_id ||
1238: ', p_uc_header_id = ' || p_uc_header_id ||
1239: ', p_x_error_table.COUNT = ' || p_x_error_table.COUNT);
1240: END IF;

Line 1284: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1280: OPEN get_pos_ref_reln_csr(l_csi_ii_id);
1281: FETCH get_pos_ref_reln_csr INTO l_rel_id;
1282: CLOSE get_pos_ref_reln_csr;
1283:
1284: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1285: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1286: 'Checking Quantity for Instance ' || l_csi_ii_id ||
1287: ', l_rel_id = ' || l_rel_id);
1288: END IF;

Line 1285: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,

1281: FETCH get_pos_ref_reln_csr INTO l_rel_id;
1282: CLOSE get_pos_ref_reln_csr;
1283:
1284: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1285: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1286: 'Checking Quantity for Instance ' || l_csi_ii_id ||
1287: ', l_rel_id = ' || l_rel_id);
1288: END IF;
1289: IF (l_rel_id IS NOT NULL) THEN

Line 1317: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1313:
1314: -- Now Compare and Validate the Quantities
1315: IF (l_pos_dtls_rec.Inst_qty = l_pos_dtls_rec.Itm_qty) THEN
1316: -- Quantity matches: Don't raise error
1317: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1318: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1319: 'Quantities Match: ' || l_pos_dtls_rec.Itm_qty);
1320: END IF;
1321: ELSIF (l_pos_dtls_rec.Inst_qty > l_pos_dtls_rec.Itm_qty) THEN

Line 1318: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,

1314: -- Now Compare and Validate the Quantities
1315: IF (l_pos_dtls_rec.Inst_qty = l_pos_dtls_rec.Itm_qty) THEN
1316: -- Quantity matches: Don't raise error
1317: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1318: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1319: 'Quantities Match: ' || l_pos_dtls_rec.Itm_qty);
1320: END IF;
1321: ELSIF (l_pos_dtls_rec.Inst_qty > l_pos_dtls_rec.Itm_qty) THEN
1322: -- Instance Quantity can never be greater the Position quantity: Throw error

Line 1323: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1319: 'Quantities Match: ' || l_pos_dtls_rec.Itm_qty);
1320: END IF;
1321: ELSIF (l_pos_dtls_rec.Inst_qty > l_pos_dtls_rec.Itm_qty) THEN
1322: -- Instance Quantity can never be greater the Position quantity: Throw error
1323: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1324: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1325: 'Instance Qty (' || l_pos_dtls_rec.Inst_qty || ') > Position Quantity (' || l_pos_dtls_rec.Itm_qty || ')');
1326: END IF;
1327: Add_Qty_Message(p_position_ref_code => l_pos_dtls_rec.position_ref_code,

Line 1324: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,

1320: END IF;
1321: ELSIF (l_pos_dtls_rec.Inst_qty > l_pos_dtls_rec.Itm_qty) THEN
1322: -- Instance Quantity can never be greater the Position quantity: Throw error
1323: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1324: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1325: 'Instance Qty (' || l_pos_dtls_rec.Inst_qty || ') > Position Quantity (' || l_pos_dtls_rec.Itm_qty || ')');
1326: END IF;
1327: Add_Qty_Message(p_position_ref_code => l_pos_dtls_rec.position_ref_code,
1328: p_inst_qty => l_pos_dtls_rec.Inst_qty,

Line 1335: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1331: x_evaluation_status := FND_API.G_FALSE;
1332:
1333: ELSE
1334: -- Instance Quantity is less than Position Quantity
1335: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1336: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1337: 'Need to check for rules: Instance Qty (' || l_pos_dtls_rec.Inst_qty || ') < Position Quantity (' || l_pos_dtls_rec.Itm_qty || ')');
1338: END IF;
1339:

Line 1336: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,

1332:
1333: ELSE
1334: -- Instance Quantity is less than Position Quantity
1335: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1336: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1337: 'Need to check for rules: Instance Qty (' || l_pos_dtls_rec.Inst_qty || ') < Position Quantity (' || l_pos_dtls_rec.Itm_qty || ')');
1338: END IF;
1339:
1340: -- Check l_parent_rule_tbl to see if an entry exists for the index l_pos_dtls_rec.parent_relationship_id

Line 1355: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1351:
1352: -- Raise error only if there is no Quantity Rule at Parent position
1353: IF (l_parent_rule_tbl(l_pos_dtls_rec.parent_instance_id) > 0) THEN
1354: -- A 'Quantity type' rule exists at the parent position: Ignore the quantity shortage.
1355: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1356: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1357: 'Quantity Rule Exists. So not throwing error.');
1358: END IF;
1359: ELSE

Line 1356: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,

1352: -- Raise error only if there is no Quantity Rule at Parent position
1353: IF (l_parent_rule_tbl(l_pos_dtls_rec.parent_instance_id) > 0) THEN
1354: -- A 'Quantity type' rule exists at the parent position: Ignore the quantity shortage.
1355: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1356: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1357: 'Quantity Rule Exists. So not throwing error.');
1358: END IF;
1359: ELSE
1360: -- No 'Quantity type' rule exists at the parent position. So raise a validation error

Line 1361: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1357: 'Quantity Rule Exists. So not throwing error.');
1358: END IF;
1359: ELSE
1360: -- No 'Quantity type' rule exists at the parent position. So raise a validation error
1361: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1362: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1363: 'Quantity Rule Does not Exist. So throwing error.');
1364: END IF;
1365: Add_Qty_Message(p_position_ref_code => l_pos_dtls_rec.position_ref_code,

Line 1362: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,

1358: END IF;
1359: ELSE
1360: -- No 'Quantity type' rule exists at the parent position. So raise a validation error
1361: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1362: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1363: 'Quantity Rule Does not Exist. So throwing error.');
1364: END IF;
1365: Add_Qty_Message(p_position_ref_code => l_pos_dtls_rec.position_ref_code,
1366: p_inst_qty => l_pos_dtls_rec.Inst_qty,

Line 1384: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1380: IF x_msg_count > 0 THEN
1381: RAISE FND_API.G_EXC_ERROR;
1382: END IF;
1383:
1384: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1385: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end',
1386: 'At the end of the procedure, About to return x_evaluation_status as ' || x_evaluation_status ||
1387: ', p_x_error_table.COUNT = ' || p_x_error_table.COUNT);
1388: END IF;

Line 1385: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end',

1381: RAISE FND_API.G_EXC_ERROR;
1382: END IF;
1383:
1384: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1385: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end',
1386: 'At the end of the procedure, About to return x_evaluation_status as ' || x_evaluation_status ||
1387: ', p_x_error_table.COUNT = ' || p_x_error_table.COUNT);
1388: END IF;
1389:

Line 1570: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1566: l_quantity NUMBER;
1567:
1568: BEGIN
1569:
1570: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1571: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin',
1572: 'At the start of the procedure, p_uc_header_id = ' || p_uc_header_id);
1573: END IF;
1574: -- Standard call to check for call compatibility

Line 1571: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin',

1567:
1568: BEGIN
1569:
1570: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1571: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin',
1572: 'At the start of the procedure, p_uc_header_id = ' || p_uc_header_id);
1573: END IF;
1574: -- Standard call to check for call compatibility
1575: IF NOT FND_API.Compatible_API_Call(L_API_VERSION, p_api_version, L_API_NAME,

Line 1613: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1609: OPEN get_pos_ref_reln_csr(l_csi_ii_id);
1610: FETCH get_pos_ref_reln_csr INTO l_rel_id;
1611: CLOSE get_pos_ref_reln_csr;
1612:
1613: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1614: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1615: 'Checking Quantity for Instance ' || l_csi_ii_id ||
1616: ', l_rel_id = ' || l_rel_id);
1617: END IF;

Line 1614: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,

1610: FETCH get_pos_ref_reln_csr INTO l_rel_id;
1611: CLOSE get_pos_ref_reln_csr;
1612:
1613: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1614: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1615: 'Checking Quantity for Instance ' || l_csi_ii_id ||
1616: ', l_rel_id = ' || l_rel_id);
1617: END IF;
1618: IF (l_rel_id IS NOT NULL) THEN

Line 1646: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1642:
1643: -- Now Compare and Validate the Quantities
1644: IF (l_pos_dtls_rec.Inst_qty = l_pos_dtls_rec.Itm_qty) THEN
1645: -- Quantity matches: Don't raise error
1646: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1647: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1648: 'Quantities Match: ' || l_pos_dtls_rec.Itm_qty);
1649: END IF;
1650: ELSIF (l_pos_dtls_rec.Inst_qty > l_pos_dtls_rec.Itm_qty) THEN

Line 1647: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,

1643: -- Now Compare and Validate the Quantities
1644: IF (l_pos_dtls_rec.Inst_qty = l_pos_dtls_rec.Itm_qty) THEN
1645: -- Quantity matches: Don't raise error
1646: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1647: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1648: 'Quantities Match: ' || l_pos_dtls_rec.Itm_qty);
1649: END IF;
1650: ELSIF (l_pos_dtls_rec.Inst_qty > l_pos_dtls_rec.Itm_qty) THEN
1651: -- Instance Quantity can never be greater the Position quantity: Return error

Line 1652: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1648: 'Quantities Match: ' || l_pos_dtls_rec.Itm_qty);
1649: END IF;
1650: ELSIF (l_pos_dtls_rec.Inst_qty > l_pos_dtls_rec.Itm_qty) THEN
1651: -- Instance Quantity can never be greater the Position quantity: Return error
1652: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1653: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1654: 'Exiting Early: Instance Qty (' || l_pos_dtls_rec.Inst_qty || ') > Position Quantity (' || l_pos_dtls_rec.Itm_qty || ')');
1655: END IF;
1656: x_evaluation_status := FND_API.G_FALSE;

Line 1653: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,

1649: END IF;
1650: ELSIF (l_pos_dtls_rec.Inst_qty > l_pos_dtls_rec.Itm_qty) THEN
1651: -- Instance Quantity can never be greater the Position quantity: Return error
1652: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1653: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1654: 'Exiting Early: Instance Qty (' || l_pos_dtls_rec.Inst_qty || ') > Position Quantity (' || l_pos_dtls_rec.Itm_qty || ')');
1655: END IF;
1656: x_evaluation_status := FND_API.G_FALSE;
1657: EXIT; -- No need to process remaining instances

Line 1660: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1656: x_evaluation_status := FND_API.G_FALSE;
1657: EXIT; -- No need to process remaining instances
1658: ELSE
1659: -- Instance Quantity is less than Position Quantity
1660: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1661: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1662: 'Need to check for rules: Instance Qty (' || l_pos_dtls_rec.Inst_qty || ') < Position Quantity (' || l_pos_dtls_rec.Itm_qty || ')');
1663: END IF;
1664: -- Raise error only if there is no Quantity Rule at Parent position

Line 1661: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,

1657: EXIT; -- No need to process remaining instances
1658: ELSE
1659: -- Instance Quantity is less than Position Quantity
1660: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1661: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1662: 'Need to check for rules: Instance Qty (' || l_pos_dtls_rec.Inst_qty || ') < Position Quantity (' || l_pos_dtls_rec.Itm_qty || ')');
1663: END IF;
1664: -- Raise error only if there is no Quantity Rule at Parent position
1665: -- Check l_parent_rule_tbl to see if an entry exists for the index l_pos_dtls_rec.parent_relationship_id

Line 1678: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1674: END IF; -- NOT of l_parent_rule_tbl entry exists
1675:
1676: IF (l_parent_rule_tbl(l_pos_dtls_rec.parent_instance_id) > 0) THEN
1677: -- A 'Quantity type' rule exists at the parent position: Ignore the quantity shortage.
1678: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1679: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1680: 'Quantity Rule Exists. So not throwing error.');
1681: END IF;
1682: ELSE

Line 1679: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,

1675:
1676: IF (l_parent_rule_tbl(l_pos_dtls_rec.parent_instance_id) > 0) THEN
1677: -- A 'Quantity type' rule exists at the parent position: Ignore the quantity shortage.
1678: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1679: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1680: 'Quantity Rule Exists. So not throwing error.');
1681: END IF;
1682: ELSE
1683: -- No 'Quantity type' rule exists at the parent position. So return a validation error

Line 1684: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1680: 'Quantity Rule Exists. So not throwing error.');
1681: END IF;
1682: ELSE
1683: -- No 'Quantity type' rule exists at the parent position. So return a validation error
1684: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1685: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1686: 'Early Exit: Quantity Rule Does not Exist. So throwing error.');
1687: END IF;
1688: x_evaluation_status := FND_API.G_FALSE;

Line 1685: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,

1681: END IF;
1682: ELSE
1683: -- No 'Quantity type' rule exists at the parent position. So return a validation error
1684: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1685: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
1686: 'Early Exit: Quantity Rule Does not Exist. So throwing error.');
1687: END IF;
1688: x_evaluation_status := FND_API.G_FALSE;
1689: EXIT; -- No need to process remaining instances

Line 1704: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1700: IF x_msg_count > 0 THEN
1701: RAISE FND_API.G_EXC_ERROR;
1702: END IF;
1703:
1704: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1705: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end',
1706: 'At the end of the procedure, About to return x_evaluation_status as ' || x_evaluation_status);
1707: END IF;
1708:

Line 1705: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end',

1701: RAISE FND_API.G_EXC_ERROR;
1702: END IF;
1703:
1704: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1705: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end',
1706: 'At the end of the procedure, About to return x_evaluation_status as ' || x_evaluation_status);
1707: END IF;
1708:
1709: -- Standard call to get message count and if count is 1, get message info