6: -- AMS_ThldChk_PVT
7: --
8: -- HISTORY
9: -- 06/25/1999 ptendulk CREATED
10: -- 10/26/1999 ptendulk Modified according to new standards
11: -- 12/30/1999 ptendulk Modified as there won't be any lookup
12: -- for Operator.
13: -- Also Chk2 Source can be Events /Campaign
14: -- Modified code for that
53: --
54: --
55: -- HISTORY
56: -- 06/29/1999 ptendulk created
57: -- 10/26/1999 ptendulk Modified according to new standards
58: -- End of Comments
59:
60: AMS_DEBUG_HIGH_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
61: AMS_DEBUG_LOW_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
95: WHERE trigger_check_id = l_my_chk_id;
96:
97: BEGIN
98:
99: -- Standard Start of API savepoint
100: SAVEPOINT Create_Thldchk_PVT;
101:
102: --
103: -- Debug Message
114: FND_MSG_PUB.initialize;
115: END IF;
116:
117: --
118: -- Standard call to check for call compatibility.
119: --
120: IF NOT FND_API.Compatible_API_Call ( l_api_version,
121: p_api_version,
122: l_api_name,
186:
187: INSERT INTO ams_trigger_checks
188: (trigger_check_id
189:
190: -- standard who columns
191: ,last_update_date
192: ,last_updated_by
193: ,creation_date
194: ,created_by
223: VALUES
224: (
225: l_thldchk_rec.trigger_check_id
226:
227: -- standard who columns
228: ,sysdate
229: ,FND_GLOBAL.User_Id
230: ,sysdate
231: ,FND_GLOBAL.User_Id
265: -- END of API body.
266: --
267:
268: --
269: -- Standard check of p_commit.
270: --
271: IF FND_API.To_Boolean ( p_commit )
272: THEN
273: COMMIT WORK;
273: COMMIT WORK;
274: END IF;
275:
276: --
277: -- Standard call to get message count AND IF count is 1, get message info.
278: --
279: FND_MSG_PUB.Count_AND_Get
280: ( p_count => x_msg_count,
281: p_data => x_msg_data,
343: -- check associated with it.
344: --
345: -- HISTORY
346: -- 06/29/1999 ptendulk created
347: -- 10/26/1999 ptendulk Modified according to new standards
348: -- End of Comments
349:
350: PROCEDURE Delete_Thldchk
351: ( p_api_version IN NUMBER,
366: l_full_name CONSTANT VARCHAR2(60) := g_pkg_name ||'.'|| l_api_name;
367:
368: BEGIN
369: --
370: -- Standard Start of API savepoint
371: --
372: SAVEPOINT Delete_Thldchk_PVT;
373:
374: --
386: FND_MSG_PUB.initialize;
387: END IF;
388:
389: --
390: -- Standard call to check for call compatibility.
391: --
392: IF NOT FND_API.Compatible_API_Call (l_api_version,
393: p_api_version,
394: l_api_name,
437: --
438: -- END of API body.
439: --
440: --
441: -- Standard check of p_commit.
442: --
443: IF FND_API.To_Boolean ( p_commit )
444: THEN
445: COMMIT WORK;
445: COMMIT WORK;
446: END IF;
447:
448: --
449: -- Standard call to get message count AND IF count is 1, get message info.
450: --
451: FND_MSG_PUB.Count_AND_Get
452: ( p_count => x_msg_count,
453: p_data => x_msg_data,
503: --
504: --
505: -- HISTORY
506: -- 06/29/1999 ptendulk created
507: -- 10/26/1999 ptendulk Modified according to new standards
508: -- End of Comments
509:
510: PROCEDURE Lock_Thldchk
511: ( p_api_version IN NUMBER,
551: FND_MSG_PUB.initialize;
552: END IF;
553:
554: --
555: -- Standard call to check for call compatibility.
556: --
557: IF NOT FND_API.Compatible_API_Call ( l_api_version,
558: p_api_version,
559: l_api_name,
599: -- END of API body.
600: --
601:
602: --
603: -- Standard call to get message count AND IF count is 1, get message info.
604: --
605: FND_MSG_PUB.Count_AND_Get
606: ( p_count => x_msg_count,
607: p_data => x_msg_data,
677: --
678: --
679: -- HISTORY
680: -- 06/29/1999 ptendulk created
681: -- 10/26/1999 ptendulk Modified according to new standards
682: -- End of Comments
683:
684: PROCEDURE Update_Thldchk
685: ( p_api_version IN NUMBER,
705: l_thldchk_rec thldchk_rec_type ;
706:
707: BEGIN
708: --
709: -- Standard Start of API savepoint
710: --
711: SAVEPOINT Update_Thldchk_PVT;
712:
713: --
725: FND_MSG_PUB.initialize;
726: END IF;
727:
728: --
729: -- Standard call to check for call compatibility.
730: --
731: IF NOT FND_API.Compatible_API_Call ( l_api_version,
732: p_api_version,
733: l_api_name,
832: --
833: -- END of API body.
834: --
835:
836: -- Standard check of p_commit.
837: IF FND_API.To_Boolean ( p_commit )
838: THEN
839: COMMIT WORK;
840: END IF;
839: COMMIT WORK;
840: END IF;
841:
842: --
843: -- Standard call to get message count AND IF count is 1, get message info.
844: --
845: FND_MSG_PUB.Count_AND_Get
846: ( p_count => x_msg_count,
847: p_data => x_msg_data,
905: --
906: --
907: -- HISTORY
908: -- 06/28/1999 ptendulk created
909: -- 10/26/1999 ptendulk Modified according to new standards
910: -- End of Comments
911:
912: PROCEDURE Validate_Thldchk
913: ( p_api_version IN NUMBER,
943: IF FND_API.to_Boolean( p_init_msg_list ) THEN
944: FND_MSG_PUB.initialize;
945: END IF;
946:
947: -- Standard call to check for call compatibility.
948: IF NOT FND_API.Compatible_API_Call ( l_api_version,
949: p_api_version,
950: l_api_name,
951: G_PKG_NAME)
996: END IF;
997: END IF;
998:
999: --
1000: -- Standard call to get message count AND IF count is 1, get message info.
1001: --
1002: FND_MSG_PUB.Count_AND_Get
1003: ( p_count => x_msg_count,
1004: p_data => x_msg_data,
1059: --
1060: --
1061: -- HISTORY
1062: -- 02/28/1999 ptendulk created
1063: -- 10/26/1999 ptendulk Modified according to new standards
1064: -- End of Comments
1065:
1066: PROCEDURE Check_Thldchk_Req_Items
1067: ( p_thldchk_rec IN thldchk_rec_type,
1159: --
1160: --
1161: -- HISTORY
1162: -- 06/28/1999 ptendulk created
1163: -- 10/26/1999 ptendulk Modified according to new standards
1164: -- End of Comments
1165: PROCEDURE Check_Thldchk_Uk_Items(
1166: p_thldchk_rec IN thldchk_rec_type,
1167: p_validation_mode IN VARCHAR2 := JTF_PLSQL_API.g_create,
1225: --
1226: --
1227: -- HISTORY
1228: -- 06/28/1999 ptendulk Created
1229: -- 10/26/1999 ptendulk Modified according to new standards
1230: -- End of Comments
1231: PROCEDURE Check_Thldchk_Fk_Items(
1232: p_thldchk_rec IN thldchk_rec_type,
1233: x_return_status OUT NOCOPY VARCHAR2
1284: --
1285: --
1286: -- HISTORY
1287: -- 06/28/1999 ptendulk Created
1288: -- 10/26/1999 ptendulk Modified according to new standards
1289: -- End of Comments
1290: PROCEDURE Check_Thldchk_Lookup_Items(
1291: p_thldchk_rec IN thldchk_rec_type,
1292: x_return_status OUT NOCOPY VARCHAR2
1352: --
1353: --
1354: -- HISTORY
1355: -- 06/28/1999 ptendulk Created
1356: -- 10/26/1999 ptendulk Modified according to new standards
1357: -- End of Comments
1358: PROCEDURE Check_Thldchk_Items(
1359: p_thldchk_rec IN thldchk_rec_type,
1360: p_validation_mode IN VARCHAR2 := JTF_PLSQL_API.g_create,
1415: --
1416: --
1417: -- HISTORY
1418: -- 07/26/1999 ptendulk Created
1419: -- 10/26/1999 ptendulk Modified according to new standards
1420: -- End of Comments
1421: PROCEDURE Check_Thldchk_Record(
1422: p_thldchk_rec IN thldchk_rec_type,
1423: p_complete_rec IN thldchk_rec_type,