[Home] [Help]
28: -- 08-jun-1999 choang@us Added dummy procedure for defaulting values.
29: -- Completed lock and delete API's for activity
30: -- metrics. Completed procedure for item level
31: -- validation for activity metrics. Changed order of
32: -- parameter list for API standards.
33: -- 10-jun-1999 choang@us Corrected validate API for metrics and activity
34: -- metrics to return the rec as an OUT variable --
35: -- this allows default values to be set properly.
36: -- Modified case of packages, procedures and functions
33: -- 10-jun-1999 choang@us Corrected validate API for metrics and activity
34: -- metrics to return the rec as an OUT variable --
35: -- this allows default values to be set properly.
36: -- Modified case of packages, procedures and functions
37: -- to conform to standards.
38: -- 14-jun-1999 choang@us Updated all case standards for procedure
39: -- references.
40: -- 22-jun-1999 choang@us Moved activity metrics to common objects package.
41: -- 17-jul-1999 choang@us Added validation for delete and update of seed
34: -- metrics to return the rec as an OUT variable --
35: -- this allows default values to be set properly.
36: -- Modified case of packages, procedures and functions
37: -- to conform to standards.
38: -- 14-jun-1999 choang@us Updated all case standards for procedure
39: -- references.
40: -- 22-jun-1999 choang@us Moved activity metrics to common objects package.
41: -- 17-jul-1999 choang@us Added validation for delete and update of seed
42: -- data. Added 'get' API's for metric values and
58: -- 04-Oct-1999 ptendulk@us Added Changed Metric Refresh Engine(UOM and
59: -- Currency Conversion)
60: -- 09-Oct-1999 ptendulk@us Seperated Metric package with Refresh Engine
61: -- Package and made changes according to new
62: -- standards.
63: -- 01/18/2000 bgeorge Reviewed code, made UOM non-required, removed
64: -- function ISSEEDED from the specs.
65: -- 17-Apr-2000 tdonohoe@us Added columns to metric_rec_type to support
66: -- 11.5.2 release.
282: -- NOTES
283: --
284: -- HISTORY
285: -- 05/26/1999 choang Created.
286: -- 10/9/1999 ptendulk Modified According to new Standards
287: -- 17-Apr-2000 tdonohoe Added columns to support 11.5.2 release.
288: --
289: -- End of comments
290:
302: x_metric_id OUT NOCOPY NUMBER
303: )
304: IS
305: --
306: -- Standard API information constants.
307: --
308: L_API_VERSION CONSTANT NUMBER := 1.0;
309: L_API_NAME CONSTANT VARCHAR2(30) := 'CREATE_METRIC';
310: L_FULL_NAME CONSTANT VARCHAR2(60) := G_PKG_NAME ||'.'|| L_API_NAME;
339: FND_MSG_PUB.Initialize;
340: END IF;
341:
342: --
343: -- Standard check for API version compatibility.
344: --
345: IF NOT FND_API.Compatible_API_Call (L_API_VERSION,
346: p_api_version,
347: L_API_NAME,
547: -- End API Body.
548: --
549:
550: --
551: -- Standard check for commit request.
552: --
553: IF FND_API.To_Boolean (p_commit) THEN
554: COMMIT WORK;
555: END IF;
554: COMMIT WORK;
555: END IF;
556:
557: --
558: -- Standard API to get message count, and if 1,
559: -- set the message data OUT variable.
560: --
561: FND_MSG_PUB.Count_And_Get (
562: p_count => x_msg_count,
611: -- NOTES
612: --
613: -- HISTORY
614: -- 05/26/1999 choang Created.
615: -- 10/9/1999 ptendulk Modified According to new Standards
616: -- 17-Apr-2000 tdonohoe Added columns to support 11.5.2 release.
617: --
618: -- End of comments
619:
659: FND_MSG_PUB.Initialize;
660: END IF;
661:
662: --
663: -- Standard check for API version compatibility.
664: --
665: IF NOT FND_API.Compatible_API_Call (L_API_VERSION,
666: p_api_version,
667: L_API_NAME,
862: COMMIT;
863: END IF;
864:
865: --
866: -- Standard API to get message count, and if 1,
867: -- set the message data OUT variable.
868: --
869: FND_MSG_PUB.Count_And_Get (
870: p_count => x_msg_count,
919: -- NOTES
920: --
921: -- HISTORY
922: -- 05/26/1999 choang Created.
923: -- 10/9/1999 ptendulk Modified according to new standards
924: --
925: -- End of comments
926:
927: PROCEDURE Delete_Metric (
980: FND_MSG_PUB.Initialize;
981: END IF;
982:
983: --
984: -- Standard check for API version compatibility.
985: --
986: IF NOT FND_API.Compatible_API_Call (L_API_VERSION,
987: p_api_version,
988: L_API_NAME,
1124: Ams_Utility_Pvt.debug_message(l_full_name ||': End');
1125:
1126:
1127: --
1128: -- Standard API to get message count, and if 1,
1129: -- set the message data OUT variable.
1130: --
1131: FND_MSG_PUB.Count_And_Get (
1132: p_count => x_msg_count,
1175: -- NOTES
1176: --
1177: -- HISTORY
1178: -- 05/26/1999 choang Created.
1179: -- 10/9/1999 ptendulk Modified according to new standards
1180: --
1181: -- End of comments
1182:
1183: PROCEDURE Lock_Metric (
1224: FND_MSG_PUB.Initialize;
1225: END IF;
1226:
1227: --
1228: -- Standard check for API version compatibility.
1229: --
1230: IF NOT FND_API.Compatible_API_Call (L_API_VERSION,
1231: p_api_version,
1232: L_API_NAME,
1264: OPEN c_language;
1265: CLOSE c_language;
1266:
1267: --
1268: -- Standard API to get message count, and if 1,
1269: -- set the message data OUT variable.
1270: --
1271: FND_MSG_PUB.Count_And_Get (
1272: p_count => x_msg_count,
1330: -- NOTES
1331: --
1332: -- HISTORY
1333: -- 05/26/1999 choang Created.
1334: -- 10/9/1999 ptendulk Modified according to new standards
1335: --
1336: -- End of comments
1337:
1338: PROCEDURE Validate_Metric (
1367: FND_MSG_PUB.Initialize;
1368: END IF;
1369:
1370: --
1371: -- Standard check for API version compatibility.
1372: --
1373: IF NOT FND_API.Compatible_API_Call (L_API_VERSION,
1374: p_api_version,
1375: L_API_NAME,
1428: -- End API Body.
1429: --
1430:
1431: --
1432: -- Standard API to get message count, and if 1,
1433: -- set the message data OUT variable.
1434: --
1435: FND_MSG_PUB.Count_And_Get (
1436: p_count => x_msg_count,
1485: -- NOTES
1486: --
1487: -- HISTORY
1488: -- 05/26/1999 choang Created.
1489: -- 10/9/1999 ptendulk Modified According to new standards
1490: --
1491: -- End of comments.
1492:
1493: PROCEDURE Check_Req_Metrics_Items (
1863: -- NOTES
1864: --
1865: -- HISTORY
1866: -- 05/26/1999 choang Created.
1867: -- 10/9/1999 ptendulk Modified According to new Standards
1868: --
1869: -- End of comments.
1870:
1871: PROCEDURE Check_Metric_Items (
1872: p_metric_rec IN metric_rec_type,
1873: x_return_status OUT NOCOPY VARCHAR2
1874: )
1875: IS
1876: l_item_name VARCHAR2(30); -- Used to standardize error messages.
1877: l_metrics_rec metric_rec_type := p_metric_rec;
1878: l_return_status VARCHAR2(1);
1879:
1880: l_table_name VARCHAR2(30);
3149: p_metric_id IN NUMBER,
3150: x_return_status OUT NOCOPY VARCHAR2
3151: )
3152: IS
3153: -- l_item_name VARCHAR2(30); -- Used to standardize error messages.
3154: l_metric_id NUMBER := p_metric_id;
3155: l_return_status VARCHAR2(1);
3156:
3157: CURSOR c_check_metric_id(p_metric_id number) IS