[Home] [Help]
11: -- 02/24/2000 ptendulk Add the code to update Object Attribute after
12: -- Deletion or addition
13: -- 02/26/2000 ptendulk Modified the Check_Record Procedure
14: -- 02/26/2000 ptendulk Modified the package to support the timezone
15: -- 07-Aug-2001 soagrawa Modified Check_Trig_Uk_Items (replaced call to ams_utility_pvt.check_uniqueness
16: -- with a manual check)
17: -- 24-sep-2001 soagrawa Removed security group id from everywhere
18: -- 10-Dec-2002 ptendulk Modified calculate_system_time api to combine two parameters into one
19: -- 22/apr/03 cgoyal added notify_flag, EXECUTE_SCHEDULE_FLAG for 11.5.8 backport
130: IF (AMS_DEBUG_HIGH_ON) THEN
131:
132:
133:
134: AMS_Utility_PVT.debug_message(l_full_name||': start');
135:
136: END IF;
137:
138: IF FND_API.to_boolean(p_init_msg_list) THEN
166: IF (AMS_DEBUG_HIGH_ON) THEN
167:
168:
169:
170: AMS_Utility_PVT.debug_message(l_full_name ||': validate');
171:
172: END IF;
173:
174: Validate_Trigger
219: -- Insert the Record
220: --
221: IF (AMS_DEBUG_HIGH_ON) THEN
222:
223: AMS_Utility_PVT.debug_message(l_full_name ||': insert Trigger');
224: END IF;
225: IF (AMS_DEBUG_HIGH_ON) THEN
226:
227: AMS_Utility_PVT.debug_message('Convert the system time'||p_trig_rec.arc_trigger_created_for||p_trig_rec.trigger_created_for_id);
223: AMS_Utility_PVT.debug_message(l_full_name ||': insert Trigger');
224: END IF;
225: IF (AMS_DEBUG_HIGH_ON) THEN
226:
227: AMS_Utility_PVT.debug_message('Convert the system time'||p_trig_rec.arc_trigger_created_for||p_trig_rec.trigger_created_for_id);
228: END IF;
229:
230: --
231: -- Find Unique Trigger ID if not sent
236: OPEN c_trig_seq;
237: FETCH c_trig_seq INTO l_trig_rec.trigger_id;
238: CLOSE c_trig_seq;
239:
240: AMS_Utility_PVT.debug_message(l_full_name ||': insert Trigger id is '||l_trig_rec.trigger_id);
241:
242: OPEN c_trig_exists(l_trig_rec.trigger_id);
243: FETCH c_trig_exists INTO l_trig_count;
244: CLOSE c_trig_exists;
242: OPEN c_trig_exists(l_trig_rec.trigger_id);
243: FETCH c_trig_exists INTO l_trig_count;
244: CLOSE c_trig_exists;
245:
246: AMS_Utility_PVT.debug_message(l_full_name ||': insert Trigger count is '||l_trig_count);
247:
248: EXIT WHEN l_trig_count IS null;
249: END LOOP;
250: END IF;
395: FROM ams_triggers_tl t
396: WHERE t.trigger_id = l_trig_rec.trigger_id
397: AND t.language = l.language_code ) ;
398:
399: AMS_Utility_PVT.debug_message(l_full_name ||': inserted in tl table');
400:
401:
402: -- Following code has been added by ptendulk on 24Feb2000
403: -- It will update the attribute in ams_object_attribites
456: IF (AMS_DEBUG_HIGH_ON) THEN
457:
458:
459:
460: AMS_Utility_PVT.debug_message(l_full_name ||': end');
461:
462: END IF;
463:
464: EXCEPTION
591: -- Debug Message
592: --
593: IF (AMS_DEBUG_HIGH_ON) THEN
594:
595: AMS_Utility_PVT.debug_message(l_full_name||': start');
596: END IF;
597: -- dbms_output.put_line('entered API Call');
598: -- dbms_output.put_line('trigger ID to be deleted is ');
599: -- dbms_output.put_line(p_trigger_id);
624: -- Debug Message
625: --
626: IF (AMS_DEBUG_HIGH_ON) THEN
627:
628: AMS_Utility_PVT.debug_message(l_full_name ||': delete');
629: END IF;
630:
631: --
632: -- API body
651: -- Following code is modified by soagrawa on 13-may-2003
652: -- Business rules for delete trigger have been modified
653: -------------------------------------------------------
654:
655: AMS_Utility_PVT.Create_Log (
656: x_return_status => l_return_status,
657: p_arc_log_used_by => 'TRIG',
658: p_log_used_by_id => p_trigger_id,
659: p_msg_data => 'l_assoc_sch:'||l_assoc_sch,
660: p_msg_type => 'DEBUG'
661: );
662: IF l_assoc_sch>0 THEN -- if exist schedule(s) associated with this triggerId
663: -- throw error msg
664: AMS_Utility_PVT.Error_Message('AMS_TRIG_NO_DEL_CSC_ASSOC');
665: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
666:
667: ELSE -- no schedules are associated with this trigger
668: AMS_Utility_PVT.Create_Log (
664: AMS_Utility_PVT.Error_Message('AMS_TRIG_NO_DEL_CSC_ASSOC');
665: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
666:
667: ELSE -- no schedules are associated with this trigger
668: AMS_Utility_PVT.Create_Log (
669: x_return_status => l_return_status,
670: p_arc_log_used_by => 'TRIG',
671: p_log_used_by_id => p_trigger_id,
672: p_msg_data => 'process_id:'||l_trig_rec.process_id,
677:
678: DELETE FROM AMS_triggers_tl
679: WHERE trigger_id = p_trigger_id ;
680: IF (SQL%NOTFOUND) THEN
681: AMS_Utility_PVT.Error_Message('AMS_API_RECORD_NOT_FOUND');
682: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
683: END IF;
684: AMS_Utility_PVT.Create_Log (
685: x_return_status => l_return_status,
680: IF (SQL%NOTFOUND) THEN
681: AMS_Utility_PVT.Error_Message('AMS_API_RECORD_NOT_FOUND');
682: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
683: END IF;
684: AMS_Utility_PVT.Create_Log (
685: x_return_status => l_return_status,
686: p_arc_log_used_by => 'TRIG',
687: p_log_used_by_id => p_trigger_id,
688: p_msg_data => 'going to delete trigger_id:'||p_trigger_id,
693: WHERE trigger_id = p_trigger_id
694: AND object_version_number = p_object_version_number ;
695:
696: IF (SQL%NOTFOUND) THEN
697: AMS_Utility_PVT.Error_Message('AMS_API_RECORD_NOT_FOUND');
698: RAISE FND_API.G_EXC_ERROR;
699: ELSE
700: -- Delete the Checks and Actions Attached to the Trigger
701: DELETE FROM ams_trigger_checks
708:
709:
710: ELSE -- if trigger has started
711: -- throw error msg
712: AMS_Utility_PVT.Error_Message('AMS_TRIG_NO_DEL_TRIG_ACTIVE');
713: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
714:
715:
716: END IF;
742: -- Debug message
743: --
744: IF (AMS_DEBUG_HIGH_ON) THEN
745:
746: AMS_Utility_PVT.debug_message(l_full_name ||': end');
747: END IF;
748:
749: EXCEPTION
750:
846: -- Debug Message
847: --
848: IF (AMS_DEBUG_HIGH_ON) THEN
849:
850: AMS_Utility_PVT.debug_message(l_full_name||': start');
851: END IF;
852:
853: --
854: -- Initialize message list if p_init_msg_list is set to TRUE.
877: IF (AMS_DEBUG_HIGH_ON) THEN
878:
879:
880:
881: AMS_Utility_PVT.debug_message(l_full_name||': lock');
882:
883: END IF;
884:
885:
919: IF (AMS_DEBUG_HIGH_ON) THEN
920:
921:
922:
923: AMS_Utility_PVT.debug_message(l_full_name ||': end');
924:
925: END IF;
926:
927: EXCEPTION
941: p_data => x_msg_data,
942: p_encoded => FND_API.G_FALSE
943: );
944:
945: WHEN AMS_Utility_PVT.RESOURCE_LOCKED THEN
946: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
947:
948: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
949: THEN -- MMSG
1031: -- Debug Message
1032: --
1033: IF (AMS_DEBUG_HIGH_ON) THEN
1034:
1035: AMS_Utility_PVT.debug_message(l_full_name||': start');
1036: END IF;
1037:
1038: --
1039: -- Initialize message list IF p_init_msg_list is set to TRUE.
1066: -- Debug Message
1067: --
1068: IF (AMS_DEBUG_HIGH_ON) THEN
1069:
1070: AMS_Utility_PVT.debug_message(l_full_name||': Validate');
1071: END IF;
1072:
1073: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_item THEN
1074: check_trig_items(
1109: CLOSE c_trig ;
1110:
1111: IF l_trig_det_rec.repeat_frequency_type = 'NONE' THEN
1112: IF l_trig_det_rec.last_run_date_time IS NOT NULL THEN
1113: AMS_Utility_PVT.Error_Message('AMS_TRIG_ERR_UPDT_TRIG_FIRED');
1114: RAISE FND_API.G_EXC_ERROR;
1115: END IF;
1116: ELSE
1117: IF l_trig_det_rec.repeat_stop_date_time < SYSDATE THEN
1114: RAISE FND_API.G_EXC_ERROR;
1115: END IF;
1116: ELSE
1117: IF l_trig_det_rec.repeat_stop_date_time < SYSDATE THEN
1118: AMS_Utility_PVT.Error_Message('AMS_TRIG_ERR_UPDT_EXPIRED');
1119: RAISE FND_API.G_EXC_ERROR;
1120: END IF;
1121: END IF;
1122:
1139: --Debug Message
1140: --
1141: IF (AMS_DEBUG_HIGH_ON) THEN
1142:
1143: AMS_Utility_PVT.debug_message(l_full_name ||': update');
1144: END IF;
1145:
1146: UPDATE ams_triggers
1147: SET
1182: WHERE trigger_id = l_trig_rec.trigger_id
1183: AND object_version_number = l_trig_rec.object_version_number ;
1184:
1185: IF (SQL%NOTFOUND) THEN
1186: AMS_Utility_PVT.Error_Message('AMS_API_RECORD_NOT_FOUND');
1187: RAISE FND_API.g_exc_error;
1188: END IF;
1189:
1190: UPDATE ams_triggers_tl
1200: -- removed by soagrawa on 24-sep-2001
1201: -- security_group_id = l_trig_rec.security_group_id
1202: WHERE trigger_id = l_trig_rec.trigger_id ;
1203: IF (SQL%NOTFOUND) THEN
1204: AMS_Utility_PVT.Error_Message('AMS_API_RECORD_NOT_FOUND');
1205: RAISE FND_API.g_exc_error;
1206: END IF;
1207: --
1208: -- END of API body.
1225: );
1226:
1227:
1228: IF (AMS_DEBUG_HIGH_ON) THEN
1229: AMS_Utility_PVT.debug_message(l_full_name ||': end');
1230: END IF;
1231:
1232: EXCEPTION
1233: WHEN FND_API.G_EXC_ERROR THEN
1305: IF px_trig_rec.usage <> 'MONITOR' THEN
1306: -- USAGE IS TRIGGER
1307: IF px_trig_rec.user_start_date_time <> FND_API.G_MISS_DATE
1308: THEN
1309: AMS_UTILITY_PVT.Convert_Timezone(
1310: p_init_msg_list => p_init_msg_list ,
1311: x_return_status => x_return_status ,
1312: x_msg_count => x_msg_count ,
1313: x_msg_data => x_msg_data ,
1321: END IF;
1322:
1323: IF px_trig_rec.user_repeat_daily_start_time <> FND_API.G_MISS_DATE
1324: THEN
1325: AMS_UTILITY_PVT.Convert_Timezone(
1326: p_init_msg_list => p_init_msg_list ,
1327: x_return_status => x_return_status ,
1328: x_msg_count => x_msg_count ,
1329: x_msg_data => x_msg_data ,
1336: END IF ;
1337:
1338: IF px_trig_rec.user_repeat_daily_end_time <> FND_API.G_MISS_DATE
1339: THEN
1340: AMS_UTILITY_PVT.Convert_Timezone(
1341: p_init_msg_list => p_init_msg_list ,
1342: x_return_status => x_return_status ,
1343: x_msg_count => x_msg_count ,
1344: x_msg_data => x_msg_data ,
1351: END IF ;
1352:
1353: IF px_trig_rec.user_repeat_stop_date_time <> FND_API.G_MISS_DATE
1354: THEN
1355: AMS_UTILITY_PVT.Convert_Timezone(
1356: p_init_msg_list => p_init_msg_list ,
1357: x_return_status => x_return_status ,
1358: x_msg_count => x_msg_count ,
1359: x_msg_data => x_msg_data ,
1369: -- FOR MONITORS, THE TIMEZONE CONVERSION IS DONE BY OA.
1370: -- SO, THE REVERSE CONVERSION HAS TO BE DONE TO POPULATE user_date_time fields
1371: IF px_trig_rec.start_date_time <> FND_API.G_MISS_DATE
1372: THEN
1373: AMS_UTILITY_PVT.Convert_Timezone(
1374: p_init_msg_list => p_init_msg_list ,
1375: x_return_status => x_return_status ,
1376: x_msg_count => x_msg_count ,
1377: x_msg_data => x_msg_data ,
1384: END IF;
1385:
1386: IF px_trig_rec.repeat_daily_start_time <> FND_API.G_MISS_DATE
1387: THEN
1388: AMS_UTILITY_PVT.Convert_Timezone(
1389: p_init_msg_list => p_init_msg_list ,
1390: x_return_status => x_return_status ,
1391: x_msg_count => x_msg_count ,
1392: x_msg_data => x_msg_data ,
1398: END IF ;
1399:
1400: IF px_trig_rec.repeat_daily_end_time <> FND_API.G_MISS_DATE
1401: THEN
1402: AMS_UTILITY_PVT.Convert_Timezone(
1403: p_init_msg_list => p_init_msg_list ,
1404: x_return_status => x_return_status ,
1405: x_msg_count => x_msg_count ,
1406: x_msg_data => x_msg_data ,
1412: END IF ;
1413:
1414: IF px_trig_rec.repeat_stop_date_time <> FND_API.G_MISS_DATE
1415: THEN
1416: AMS_UTILITY_PVT.Convert_Timezone(
1417: p_init_msg_list => p_init_msg_list ,
1418: x_return_status => x_return_status ,
1419: x_msg_count => x_msg_count ,
1420: x_msg_data => x_msg_data ,
1471: -- Debug Message
1472: --
1473: IF (AMS_DEBUG_HIGH_ON) THEN
1474:
1475: AMS_Utility_PVT.debug_message(l_full_name||': start');
1476: END IF;
1477:
1478: IF FND_API.to_boolean(p_init_msg_list) THEN
1479: FND_MSG_PUB.initialize;
1495: -- Debug Message
1496: --
1497: IF (AMS_DEBUG_HIGH_ON) THEN
1498:
1499: AMS_Utility_PVT.debug_message(l_full_name||': check items');
1500: END IF;
1501:
1502: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_item THEN
1503: Check_Trig_Items(
1518: -- Debug Message
1519: --
1520: IF (AMS_DEBUG_HIGH_ON) THEN
1521:
1522: AMS_Utility_PVT.debug_message(l_full_name||': check record');
1523: END IF;
1524:
1525: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_record THEN
1526: Check_Trig_Record(
1546: IF (AMS_DEBUG_HIGH_ON) THEN
1547:
1548:
1549:
1550: AMS_Utility_PVT.debug_message(l_full_name ||': end');
1551:
1552: END IF;
1553:
1554: EXCEPTION
1614: --
1615: IF p_trig_rec.trigger_created_for_id IS NULL
1616: THEN
1617: -- missing required field
1618: AMS_UTILITY_PVT.Error_Message('AMS_TRIG_MISSING_CREATED_FOR');
1619: x_return_status := FND_API.G_RET_STS_ERROR;
1620: -- If any errors happen abort API/Procedure.
1621: RETURN;
1622: END IF;
1625: -- Trigger Created for
1626: --
1627: IF p_trig_rec.arc_trigger_created_for IS NULL
1628: THEN
1629: AMS_UTILITY_PVT.Error_Message('AMS_TRIG_MISSING_CREATED_FOR');
1630: x_return_status := FND_API.G_RET_STS_ERROR;
1631: -- If any errors happen abort API/Procedure.
1632: RETURN;
1633: END IF;
1636: -- Triggering type
1637: --
1638: IF p_trig_rec.triggering_type IS NULL
1639: THEN
1640: AMS_UTILITY_PVT.Error_Message('AMS_TRIG_MISSING_TRIG_TYPE');
1641: x_return_status := FND_API.G_RET_STS_ERROR;
1642: -- If any errors happen abort API/Procedure.
1643: RETURN;
1644: END IF;
1647: -- Repeat Frequency Type
1648: --
1649: IF p_trig_rec.repeat_frequency_type IS NULL
1650: THEN
1651: AMS_UTILITY_PVT.Error_Message('AMS_TRIG_MISSING_REP_FREQ_TYPE');
1652: x_return_status := FND_API.G_RET_STS_ERROR;
1653: -- If any errors happen abort API/Procedure.
1654: RETURN;
1655: END IF;
1658: -- Trigger Name
1659: --
1660: IF p_trig_rec.trigger_name IS NULL
1661: THEN
1662: AMS_UTILITY_PVT.Error_Message('AMS_TRIG_MISSING_TRIG_NAME');
1663: x_return_status := FND_API.G_RET_STS_ERROR;
1664: -- If any errors happen abort API/Procedure.
1665: RETURN;
1666: END IF;
1669: -- Application ID
1670: --
1671: IF p_trig_rec.view_application_id IS NULL
1672: THEN
1673: AMS_UTILITY_PVT.Error_Message('AMS_API_MISSING_APP_ID');
1674: x_return_status := FND_API.G_RET_STS_ERROR;
1675: -- If any errors happen abort API/Procedure.
1676: RETURN;
1677: END IF;
1680: -- Start Date time
1681: --
1682: IF p_trig_rec.user_start_date_time IS NULL
1683: THEN
1684: AMS_UTILITY_PVT.Error_Message('AMS_TRIG_MISSING_START_DT');
1685: x_return_status := FND_API.G_RET_STS_ERROR;
1686: -- If any errors happen abort API/Procedure.
1687: RETURN;
1688: END IF;
1691: -- Start Date time
1692: --
1693: IF p_trig_rec.timezone_id IS NULL
1694: THEN
1695: AMS_UTILITY_PVT.Error_Message('AMS_TRIG_MISSING_TIMEZONE');
1696: x_return_status := FND_API.G_RET_STS_ERROR;
1697: -- If any errors happen abort API/Procedure.
1698: RETURN;
1699: END IF;
1712: --
1713: --
1714: -- HISTORY
1715: -- 25-oct-1999 ptendulk created
1716: -- 07-aug-2001 soagrawa Replaced call to ams_utility_pvt.check_uniqueness with manual check
1717: -- End of Comments
1718:
1719: PROCEDURE Check_Trig_Uk_Items(
1720: p_trig_rec IN trig_rec_type,
1725: l_valid_flag VARCHAR2(1);
1726: l_where_clause VARCHAR2(2000);
1727:
1728: -- following 2 cursors c_trig_name , c_trig_name_updt added by soagrawa on 07-Aug-2001
1729: -- to replace call to Ams_Utility_Pvt.check_uniqueness
1730: CURSOR c_trig_name IS
1731: -- modified by dhsingh on 20.05.2004 for bug# 3631107
1732: -- SELECT 1 from dual
1733: -- WHERE EXISTS (SELECT *
1766: -- check if this trigger_id is unique.
1767: IF p_validation_mode = JTF_PLSQL_API.g_create
1768: AND p_trig_rec.trigger_id IS NOT NULL
1769: THEN
1770: IF AMS_Utility_PVT.check_uniqueness(
1771: 'AMS_TRIGGERS',
1772: 'TRIGGER_ID = ' || p_trig_rec.trigger_id
1773: ) = FND_API.g_false
1774: THEN
1771: 'AMS_TRIGGERS',
1772: 'TRIGGER_ID = ' || p_trig_rec.trigger_id
1773: ) = FND_API.g_false
1774: THEN
1775: AMS_UTILITY_PVT.Error_Message('AMS_TRIG_DUP_TRIG_ID');
1776: x_return_status := FND_API.g_ret_sts_error;
1777: RETURN;
1778: END IF;
1779: END IF;
1781: -- Check if Trigger_name is unique. Need to handle create and
1782: -- update differently.
1783:
1784: -- modified by soagrawa on 07-aug-2001
1785: -- replaced use of ams_utility_pvt.check_uniqueness by manual check
1786: -- due to bug in check_uniqueness - does not handle AND in the condition
1787: /*
1788: -- Unique TRIGGER_NAME and TRIGGER_CREATED_FOR
1789: l_where_clause := ' UPPER(TRIGGER_NAME) = ''' || UPPER(p_trig_rec.trigger_name)||'''' ;
1792: IF p_validation_mode <> JTF_PLSQL_API.g_create THEN
1793: l_where_clause := l_where_clause || ' AND TRIGGER_ID <> ' || p_trig_rec.trigger_id;
1794: END IF;
1795:
1796: IF AMS_Utility_PVT.Check_Uniqueness(
1797: p_table_name => 'AMS_TRIGGERS_VL',
1798: p_where_clause => l_where_clause
1799: ) = FND_API.g_false
1800: THEN
1797: p_table_name => 'AMS_TRIGGERS_VL',
1798: p_where_clause => l_where_clause
1799: ) = FND_API.g_false
1800: THEN
1801: AMS_UTILITY_PVT.Error_Message('AMS_TRIG_DUP_TRIG_NAME');
1802: x_return_status := FND_API.g_ret_sts_error;
1803: RETURN;
1804: END IF;
1805: */
1815: END IF ;
1816:
1817: IF l_dummy IS NOT NULL THEN
1818: -- Duplicate Trigger
1819: AMS_Utility_PVT.Error_Message('AMS_TRIG_DUP_TRIG_NAME');
1820: x_return_status := FND_API.g_ret_sts_error;
1821: RETURN;
1822: END IF ;
1823:
1864: IF p_trig_rec.arc_trigger_created_for <> 'CAMP'
1865: -- Commented by ptendulk on 14-Oct-2001 as Metric is not using triggers for refresh.
1866: -- AND p_trig_rec.arc_trigger_created_for <> 'AMET'
1867: THEN
1868: AMS_UTILITY_PVT.Error_Message('AMS_TRIG_INVALID_CREATED_FOR');
1869: x_return_status := FND_API.G_RET_STS_ERROR;
1870: -- If any errors happen abort API/Procedure.
1871: RETURN;
1872: END IF;
1873: END IF;
1874: */
1875: l_table_name := 'FND_TIMEZONES_VL';
1876: l_pk_name := 'UPGRADE_TZ_ID' ;
1877: l_pk_data_type := AMS_Utility_PVT.G_NUMBER ;
1878: l_pk_value := p_trig_rec.timezone_id ;
1879:
1880: IF p_trig_rec.timezone_id <> FND_API.G_MISS_NUM THEN
1881: IF AMS_Utility_PVT.Check_FK_Exists (
1877: l_pk_data_type := AMS_Utility_PVT.G_NUMBER ;
1878: l_pk_value := p_trig_rec.timezone_id ;
1879:
1880: IF p_trig_rec.timezone_id <> FND_API.G_MISS_NUM THEN
1881: IF AMS_Utility_PVT.Check_FK_Exists (
1882: p_table_name => l_table_name
1883: ,p_pk_name => l_pk_name
1884: ,p_pk_value => l_pk_value
1885: ,p_pk_data_type => l_pk_data_type
1885: ,p_pk_data_type => l_pk_data_type
1886: ,p_additional_where_clause => null
1887: ) = FND_API.G_FALSE
1888: THEN
1889: AMS_UTILITY_PVT.Error_Message('AMS_TRIG_INVALID_TIMEZONE');
1890: x_return_status := FND_API.G_RET_STS_ERROR;
1891: RETURN;
1892: END IF;
1893: END IF ;
1919: x_return_status := FND_API.g_ret_sts_success ;
1920: -- Check triggering_type
1921: IF p_trig_rec.triggering_type <> FND_API.G_MISS_CHAR
1922: THEN
1923: IF AMS_Utility_PVT.Check_Lookup_Exists
1924: ( p_lookup_table_name => 'AMS_LOOKUPS'
1925: ,p_lookup_type => 'AMS_TRIGGER_TYPE'
1926: ,p_lookup_code => p_trig_rec.triggering_type
1927: ) = FND_API.G_FALSE
1925: ,p_lookup_type => 'AMS_TRIGGER_TYPE'
1926: ,p_lookup_code => p_trig_rec.triggering_type
1927: ) = FND_API.G_FALSE
1928: THEN
1929: AMS_UTILITY_PVT.Error_Message('AMS_TRIG_INVALID_TRIGGER_TYPE');
1930: x_return_status := FND_API.G_RET_STS_ERROR;
1931: -- If any errors happen abort API/Procedure.
1932: RETURN;
1933: END IF;
1936: -- Check repeat_frequency_type
1937: IF p_trig_rec.repeat_frequency_type <> FND_API.G_MISS_CHAR
1938: AND p_trig_rec.repeat_frequency_type IS NOT NULL
1939: THEN
1940: IF AMS_Utility_PVT.Check_Lookup_Exists
1941: ( p_lookup_table_name => 'AMS_LOOKUPS'
1942: ,p_lookup_type => 'AMS_TRIGGER_FREQUENCY_TYPE'
1943: ,p_lookup_code => p_trig_rec.repeat_frequency_type
1944: ) = FND_API.G_FALSE
1942: ,p_lookup_type => 'AMS_TRIGGER_FREQUENCY_TYPE'
1943: ,p_lookup_code => p_trig_rec.repeat_frequency_type
1944: ) = FND_API.G_FALSE
1945: THEN
1946: AMS_UTILITY_PVT.Error_Message('AMS_TRIG_INVALID_FREQ_TYPE');
1947: x_return_status := FND_API.G_RET_STS_ERROR;
1948: -- If any errors happen abort API/Procedure.
1949: RETURN;
1950: END IF;
2160: IF p_trig_rec.trigger_id IS NULL -- soagrawa added this on 21-aug-2003 for bug# 3108929, check only for create
2161: THEN
2162: -- soagrawa added time zone conversion on 27-aug-2003 for bug# 3115141
2163:
2164: AMS_UTILITY_PVT.Convert_Timezone(
2165: p_init_msg_list => FND_API.G_FALSE ,
2166: x_return_status => x_return_status ,
2167: x_msg_count => l_msg_count ,
2168: x_msg_data => l_msg_data ,
2236:
2237: IF (l_daily_start_time IS NULL AND l_daily_end_time IS NOT NULL )
2238: OR (l_daily_start_time IS NOT NULL AND l_daily_end_time IS NULL )
2239: THEN
2240: AMS_UTILITY_PVT.Error_Message('AMS_TRIG_MISSING_RPT_DAILY_TM');
2241: x_return_status := FND_API.G_RET_STS_ERROR;
2242: -- If any errors happen abort API/Procedure.
2243: RETURN;
2244: ELSIF l_daily_start_time > l_daily_end_time
2242: -- If any errors happen abort API/Procedure.
2243: RETURN;
2244: ELSIF l_daily_start_time > l_daily_end_time
2245: THEN
2246: AMS_UTILITY_PVT.Error_Message('AMS_TRIG_INVALID_DAILY_RANGE');
2247: x_return_status := FND_API.G_RET_STS_ERROR;
2248: -- If any errors happen abort API/Procedure.
2249: RETURN;
2250: END IF;
2267: END IF;
2268:
2269:
2270: -- Get table_name and pk_name for the ARC qualifier.
2271: AMS_Utility_PVT.Get_Qual_Table_Name_And_PK (
2272: p_sys_qual => l_trigger_created_for,
2273: x_return_status => x_return_status,
2274: x_table_name => l_table_name,
2275: x_pk_name => l_pk_name
2275: x_pk_name => l_pk_name
2276: );
2277:
2278: l_pk_value := l_trigger_created_for_id;
2279: l_pk_data_type := AMS_Utility_PVT.G_NUMBER;
2280: l_additional_where_clause := NULL;
2281: --dbms_output.put_line('Tab name : '||l_table_name);
2282: --dbms_output.put_line('pk name : '||l_pk_name);
2283: /* IF AMS_Utility_PVT.Check_FK_Exists (
2279: l_pk_data_type := AMS_Utility_PVT.G_NUMBER;
2280: l_additional_where_clause := NULL;
2281: --dbms_output.put_line('Tab name : '||l_table_name);
2282: --dbms_output.put_line('pk name : '||l_pk_name);
2283: /* IF AMS_Utility_PVT.Check_FK_Exists (
2284: p_table_name => l_table_name
2285: ,p_pk_name => l_pk_name
2286: ,p_pk_value => l_pk_value
2287: ,p_pk_data_type => l_pk_data_type
2287: ,p_pk_data_type => l_pk_data_type
2288: ,p_additional_where_clause => l_additional_where_clause
2289: ) = FND_API.G_FALSE
2290: THEN
2291: AMS_UTILITY_PVT.Error_Message('AMS_TRIG_INVALID_CREATED_FOR');
2292: x_return_status := FND_API.G_RET_STS_ERROR;
2293: RETURN;
2294: END IF;
2295: */
2306:
2307: IF p_trig_rec.repeat_frequency_type <> 'NONE' AND
2308: l_repeat_freq IS NULL
2309: THEN
2310: AMS_UTILITY_PVT.Error_Message('AMS_TRIG_MISSING_EVERY_X_FREQ');
2311: x_return_status := FND_API.G_RET_STS_ERROR;
2312: -- If any errors happen abort API/Procedure.
2313: RETURN;
2314: END IF;