105: l_return_status := FND_API.G_RET_STS_ERROR;
106:
107: /* Debug message */
108: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
109: FND_MESSAGE.Set_Name ('JTF', 'PVTQUAL API:Miss req itms');
110: FND_MESSAGE.Set_Token ('COLUMN', 'NAME, DESCRIPTION');
111: FND_MSG_PUB.ADD;
112: END IF;
113:
106:
107: /* Debug message */
108: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
109: FND_MESSAGE.Set_Name ('JTF', 'PVTQUAL API:Miss req itms');
110: FND_MESSAGE.Set_Token ('COLUMN', 'NAME, DESCRIPTION');
111: FND_MSG_PUB.ADD;
112: END IF;
113:
114: END IF;
183: l_seed_qual_out_rec.seeded_qual_id := l_seeded_qual_id_csr;
184:
185: -- Debug message
186: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
187: FND_MESSAGE.Set_Name ('JTF', 'PVTQUAL API:name exists');
188: FND_MESSAGE.Set_Token ('ROW', 'JTF_SEEDED_QUAL_B');
189: FND_MSG_PUB.ADD;
190: END IF;
191:
184:
185: -- Debug message
186: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
187: FND_MESSAGE.Set_Name ('JTF', 'PVTQUAL API:name exists');
188: FND_MESSAGE.Set_Token ('ROW', 'JTF_SEEDED_QUAL_B');
189: FND_MSG_PUB.ADD;
190: END IF;
191:
192: END IF;
303: IF c_column_datatype%NOTFOUND THEN
304:
305: -- Debug message
306: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
307: FND_MESSAGE.Set_Name ('JTF', 'PVTQUAL API:Col dtype noexist');
308: FND_MESSAGE.Set_Token ( 'COLUMN', 'QUAL_TABLE1');
309: FND_MSG_PUB.ADD;
310: END IF;
311:
304:
305: -- Debug message
306: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
307: FND_MESSAGE.Set_Name ('JTF', 'PVTQUAL API:Col dtype noexist');
308: FND_MESSAGE.Set_Token ( 'COLUMN', 'QUAL_TABLE1');
309: FND_MSG_PUB.ADD;
310: END IF;
311:
312: l_column_datatype_csr := NULL;
427: )
428: THEN
429: -- Debug message
430: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
431: FND_MESSAGE.Set_Name ('JTF', 'PVTQUAL API:Miss mandtry itms');
432: FND_MESSAGE.Set_Token ( 'COLUMN',
433: 'QUAL_TYPE_USG_ID, ' ||
434: 'QUAL_COL1, QUAL_COL1_ALIAS, QUAL_COL1_DATATYPE, ' ||
435: 'QUAL_COL1_TABLE, QUAL_COL1_TABLE_ALIAS');
428: THEN
429: -- Debug message
430: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
431: FND_MESSAGE.Set_Name ('JTF', 'PVTQUAL API:Miss mandtry itms');
432: FND_MESSAGE.Set_Token ( 'COLUMN',
433: 'QUAL_TYPE_USG_ID, ' ||
434: 'QUAL_COL1, QUAL_COL1_ALIAS, QUAL_COL1_DATATYPE, ' ||
435: 'QUAL_COL1_TABLE, QUAL_COL1_TABLE_ALIAS');
436: FND_MSG_PUB.ADD;
489: l_return_variable := FND_API.G_FALSE;
490:
491: /* Debug message */
492: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
493: FND_MESSAGE.Set_Name ('JTF', 'PVTQUAL API:Table dnot exist');
494: FND_MESSAGE.Set_Token ('TABLE', p_table_name);
495: FND_MSG_PUB.ADD;
496: END IF;
497:
490:
491: /* Debug message */
492: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
493: FND_MESSAGE.Set_Name ('JTF', 'PVTQUAL API:Table dnot exist');
494: FND_MESSAGE.Set_Token ('TABLE', p_table_name);
495: FND_MSG_PUB.ADD;
496: END IF;
497:
498: END IF;
512: l_return_variable := FND_API.G_FALSE;
513:
514: /* Debug message */
515: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
516: FND_MESSAGE.Set_Name ('JTF', 'PVTQUAL API:Column dnot exist');
517: FND_MESSAGE.Set_Token ('COLUMN', p_col_name);
518: FND_MSG_PUB.ADD;
519: END IF;
520:
513:
514: /* Debug message */
515: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
516: FND_MESSAGE.Set_Name ('JTF', 'PVTQUAL API:Column dnot exist');
517: FND_MESSAGE.Set_Token ('COLUMN', p_col_name);
518: FND_MSG_PUB.ADD;
519: END IF;
520:
521: END IF;
674: l_return_status := FND_API.G_RET_STS_ERROR;
675:
676: /* Debug message */
677: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
678: FND_MESSAGE.Set_Name ('JTF', 'PVTQUAL API:UK Violation');
679: FND_MESSAGE.Set_Token ('TABLE', 'JTF_QUAL_USGS');
680: FND_MSG_PUB.ADD;
681: END IF;
682:
675:
676: /* Debug message */
677: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
678: FND_MESSAGE.Set_Name ('JTF', 'PVTQUAL API:UK Violation');
679: FND_MESSAGE.Set_Token ('TABLE', 'JTF_QUAL_USGS');
680: FND_MSG_PUB.ADD;
681: END IF;
682:
683: END IF; /* c_chk_uk_violation%FOUND */
999:
1000: /* Debug Message */
1001: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1002: THEN
1003: FND_MESSAGE.Set_Name('JTF', 'DELETE QUAL PVT: CHECK_DEL1');
1004: FND_MSG_PUB.Add;
1005: END IF;
1006:
1007: l_return_status := FND_API.G_RET_STS_ERROR;
1017:
1018: /* Debug Message */
1019: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1020: THEN
1021: FND_MESSAGE.Set_Name('JTF', 'DELETE QUAL PVT: CHECK_DEL2');
1022: FND_MSG_PUB.Add;
1023: END IF;
1024:
1025: l_return_status := FND_API.G_RET_STS_ERROR;
1034: IF c_chk_terr%FOUND THEN
1035: /* Debug Message */
1036: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1037: THEN
1038: FND_MESSAGE.Set_Name('JTF', 'DELETE QUAL PVT: CHECK_DEL3');
1039: FND_MSG_PUB.Add;
1040: END IF;
1041:
1042: l_return_status := FND_API.G_RET_STS_ERROR;
1053:
1054: /* Debug Message */
1055: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1056: THEN
1057: FND_MESSAGE.Set_Name('JTF', 'DELETE QUAL PVT: CHECK_DEL4');
1058: FND_MSG_PUB.Add;
1059: END IF;
1060:
1061: l_return_status := FND_API.G_RET_STS_ERROR;
1185:
1186: /* Debug Message */
1187: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1188: THEN
1189: FND_MESSAGE.Set_Name('JTF', 'PVT Create Qual: Start');
1190: FND_MSG_PUB.Add;
1191: END IF;
1192:
1193:
1219: IF p_validation_level > FND_API.G_VALID_LEVEL_NONE THEN
1220:
1221: -- Debug message
1222: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1223: FND_MESSAGE.Set_Name('JTF', 'PVTQUAL API:Validate Rec');
1224: FND_MSG_PUB.ADD;
1225: END IF;
1226:
1227:
1253: ----------------------------------
1254:
1255: -- Debug message
1256: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1257: FND_MESSAGE.Set_Name('JTF', 'PVT QUALIFIER API:');
1258: FND_MSG_PUB.ADD;
1259: END IF;
1260:
1261: -- Insert seeded qualifier record into database
1276: ----------------------------------
1277:
1278: -- Debug message
1279: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1280: FND_MESSAGE.Set_Name('JTF', 'PVT API: Ins');
1281: FND_MSG_PUB.ADD;
1282: END IF;
1283:
1284: create_qual_usgs_record ( l_seed_qual_out_rec.seeded_qual_id,
1309: -- Success Message
1310: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) AND
1311: l_return_status = FND_API.G_RET_STS_SUCCESS
1312: THEN
1313: FND_MESSAGE.Set_Name('JTF', 'API_SUCCESS');
1314: FND_MESSAGE.Set_Token('ROW', 'JTF_QUALIFIER', TRUE);
1315: FND_MSG_PUB.Add;
1316: END IF;
1317:
1310: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) AND
1311: l_return_status = FND_API.G_RET_STS_SUCCESS
1312: THEN
1313: FND_MESSAGE.Set_Name('JTF', 'API_SUCCESS');
1314: FND_MESSAGE.Set_Token('ROW', 'JTF_QUALIFIER', TRUE);
1315: FND_MSG_PUB.Add;
1316: END IF;
1317:
1318: -- Standard check of p_commit.
1323:
1324: -- Debug Message
1325: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1326: THEN
1327: FND_MESSAGE.Set_Name('JTF', 'PVT Create Qual API: End');
1328: FND_MSG_PUB.Add;
1329: END IF;
1330:
1331: -- Standard call to get message count and if count is 1, get message info.
1458:
1459: -- Debug Message
1460: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1461: THEN
1462: FND_MESSAGE.Set_Name('JTF', 'PVT UpdateQual API: Start');
1463: FND_MSG_PUB.Add;
1464: END IF;
1465:
1466:
1484: IF p_validation_level > FND_API.G_VALID_LEVEL_NONE THEN
1485:
1486: -- Debug message
1487: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1488: FND_MESSAGE.Set_Name('JTF', 'PVT QUAL API: Valdte Record');
1489: FND_MSG_PUB.ADD;
1490: END IF;
1491:
1492: -- validate the seeded qualifier record
1524: ----------------------------------
1525:
1526: -- Debug message
1527: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1528: FND_MESSAGE.Set_Name('JTF', 'PVTQUAL API:Updte SeedQualRec');
1529: FND_MSG_PUB.ADD;
1530: END IF;
1531:
1532: -- Update seeded qualifier record into database
1544: ----------------------------------
1545:
1546: -- Debug message
1547: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1548: FND_MESSAGE.Set_Name('JTF', 'PVTQUAL API:Update QualUsgRec');
1549: FND_MSG_PUB.ADD;
1550: END IF;
1551:
1552: update_qual_usgs_record ( l_qual_usgs_rec,
1571: -- Success Message
1572: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) AND
1573: l_return_status = FND_API.G_RET_STS_SUCCESS
1574: THEN
1575: FND_MESSAGE.Set_Name('JTF', 'API_SUCCESS');
1576: FND_MESSAGE.Set_Token('ROW', 'JTF_QUALIFIER', TRUE);
1577: FND_MSG_PUB.Add;
1578: END IF;
1579:
1572: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) AND
1573: l_return_status = FND_API.G_RET_STS_SUCCESS
1574: THEN
1575: FND_MESSAGE.Set_Name('JTF', 'API_SUCCESS');
1576: FND_MESSAGE.Set_Token('ROW', 'JTF_QUALIFIER', TRUE);
1577: FND_MSG_PUB.Add;
1578: END IF;
1579:
1580:
1587:
1588: -- Debug Message
1589: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1590: THEN
1591: FND_MESSAGE.Set_Name('JTF', 'PVT Update Qual API: End');
1592: FND_MSG_PUB.Add;
1593: END IF;
1594:
1595: -- Standard call to get message count and if count is 1, get message info.
1717:
1718: -- Debug Message
1719: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1720: THEN
1721: FND_MESSAGE.Set_Name('JTF', 'Delete Qualifier PVT: Start');
1722: FND_MSG_PUB.Add;
1723: END IF;
1724:
1725: -- ******************************************************************
1758: ----------------------------------
1759:
1760: -- Debug message
1761: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1762: FND_MESSAGE.Set_Name('JTF', 'Delete Qualifier PVT: Debug1');
1763: FND_MSG_PUB.ADD;
1764: END IF;
1765:
1766:
1781: ----------------------------------
1782:
1783: -- Debug message
1784: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1785: FND_MESSAGE.Set_Name('JTF', 'Delete Qualifier PVT: Debug2');
1786: FND_MSG_PUB.ADD;
1787: END IF;
1788:
1789:
1807: -- Success Message
1808: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) AND
1809: l_return_status = FND_API.G_RET_STS_SUCCESS
1810: THEN
1811: FND_MESSAGE.Set_Name('JTF', 'API_SUCCESS');
1812: FND_MESSAGE.Set_Token('ROW', 'JTF_QUALIFIER', TRUE);
1813: FND_MSG_PUB.Add;
1814: END IF;
1815:
1808: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) AND
1809: l_return_status = FND_API.G_RET_STS_SUCCESS
1810: THEN
1811: FND_MESSAGE.Set_Name('JTF', 'API_SUCCESS');
1812: FND_MESSAGE.Set_Token('ROW', 'JTF_QUALIFIER', TRUE);
1813: FND_MSG_PUB.Add;
1814: END IF;
1815:
1816: -- Standard check of p_commit.
1821:
1822: -- Debug Message
1823: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1824: THEN
1825: FND_MESSAGE.Set_Name('JTF', 'PVT Delete Qual API: End');
1826: FND_MSG_PUB.Add;
1827: END IF;
1828:
1829: -- Standard call to get message count and if count is 1, get message info.