APPS.AMS_ACT_MARKET_SEGMENTS_PVT dependencies on AMS_ACT_MARKET_SEGMENTS

Line 1: PACKAGE BODY AMS_Act_Market_Segments_PVT AS

1: PACKAGE BODY AMS_Act_Market_Segments_PVT AS
2: /* $Header: amsvmksb.pls 120.1 2005/06/16 06:13:16 appldev $ */
3:
4: g_pkg_name CONSTANT VARCHAR2(30) := 'AMS_Act_Market_Segments_PVT';
5:

Line 4: g_pkg_name CONSTANT VARCHAR2(30) := 'AMS_Act_Market_Segments_PVT';

1: PACKAGE BODY AMS_Act_Market_Segments_PVT AS
2: /* $Header: amsvmksb.pls 120.1 2005/06/16 06:13:16 appldev $ */
3:
4: g_pkg_name CONSTANT VARCHAR2(30) := 'AMS_Act_Market_Segments_PVT';
5:
6: /*****************************************************************************/
7: -- Procedure: create_market_segments
8: --

Line 37: SELECT AMS_ACT_MARKET_SEGMENTS_S.NEXTVAL

33: l_mks_rec mks_rec_type := p_mks_rec;
34: l_mks_count NUMBER;
35:
36: CURSOR c_mks_seq IS
37: SELECT AMS_ACT_MARKET_SEGMENTS_S.NEXTVAL
38: FROM DUAL;
39:
40: CURSOR c_mks_count(mks_id IN NUMBER) IS
41: SELECT COUNT(*)

Line 42: FROM AMS_ACT_MARKET_SEGMENTS

38: FROM DUAL;
39:
40: CURSOR c_mks_count(mks_id IN NUMBER) IS
41: SELECT COUNT(*)
42: FROM AMS_ACT_MARKET_SEGMENTS
43: WHERE activity_market_segment_id = mks_id;
44:
45: BEGIN
46: -- initialize

Line 112: INSERT INTO AMS_ACT_MARKET_SEGMENTS

108: EXIT WHEN l_mks_count = 0;
109: END LOOP;
110: END IF;
111:
112: INSERT INTO AMS_ACT_MARKET_SEGMENTS
113: (
114: activity_market_segment_id,
115: last_update_date,
116: last_updated_by,

Line 367: UPDATE AMS_ACT_MARKET_SEGMENTS SET

363:
364: -- update
365: AMS_Utility_PVT.debug_message(l_full_name||': update');
366:
367: UPDATE AMS_ACT_MARKET_SEGMENTS SET
368: last_update_date = SYSDATE,
369: last_updated_by = FND_GLOBAL.user_id,
370: market_segment_id = l_mks_rec.market_segment_id,
371: act_market_segment_used_by_id = l_mks_rec.act_market_segment_used_by_id,

Line 485: FROM ams_act_market_segments

481:
482: CURSOR c_arc_det IS
483: SELECT act_market_segment_used_by_id ,
484: arc_act_market_segment_used_by
485: FROM ams_act_market_segments
486: WHERE activity_market_segment_id = p_act_mks_id;
487:
488: l_act_id NUMBER;
489: l_arc_act VARCHAR2(30);

Line 493: FROM ams_act_market_segments

489: l_arc_act VARCHAR2(30);
490: l_dummy NUMBER;
491: CURSOR c_mks IS
492: SELECT 1
493: FROM ams_act_market_segments
494: WHERE act_market_segment_used_by_id = l_act_id
495: AND arc_act_market_segment_used_by = l_arc_act ;
496:
497: BEGIN

Line 531: DELETE FROM AMS_ACT_MARKET_SEGMENTS

527: FETCH c_arc_det INTO l_act_id,l_arc_act;
528: CLOSE c_arc_det;
529:
530:
531: DELETE FROM AMS_ACT_MARKET_SEGMENTS
532: WHERE activity_market_segment_id = p_act_mks_id
533: AND object_version_number = p_object_version;
534:
535: IF (SQL%NOTFOUND) THEN

Line 655: FROM AMS_ACT_MARKET_SEGMENTS

651: l_mks_id NUMBER;
652:
653: CURSOR c_obj IS
654: SELECT activity_market_segment_id
655: FROM AMS_ACT_MARKET_SEGMENTS
656: WHERE activity_market_segment_id = p_act_mks_id
657: AND object_version_number = p_object_version
658: FOR UPDATE NOWAIT;
659:

Line 1112: -- This procedure is to validate ams_act_market_segments

1108: -- NAME
1109: -- Validate_Mks_UK_Items
1110: --
1111: -- PURPOSE
1112: -- This procedure is to validate ams_act_market_segments
1113: -- for Unique ness
1114: -- NOTES
1115: --
1116: --

Line 1139: 'ams_act_market_segments',

1135: IF p_validation_mode = JTF_PLSQL_API.g_create
1136: AND p_mks_rec.activity_market_segment_id IS NOT NULL
1137: THEN
1138: IF AMS_Utility_PVT.check_uniqueness(
1139: 'ams_act_market_segments',
1140: 'activity_market_segment_id = ' || p_mks_rec.activity_market_segment_id
1141: ) = FND_API.g_false
1142: THEN
1143: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)

Line 1340: p_table_name => 'ams_act_market_segments',

1336: l_where_clause := l_where_clause || ' AND activity_market_segment_id <> ' || p_mks_rec.activity_market_segment_id;
1337: END IF;
1338:
1339: IF AMS_Utility_PVT.Check_Uniqueness(
1340: p_table_name => 'ams_act_market_segments',
1341: p_where_clause => l_where_clause
1342: ) = FND_API.g_false
1343: THEN
1344: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)

Line 1361: -- This procedure is to validate ams_act_market_segments table

1357: -- NAME
1358: -- Validate_Mks_Record
1359: --
1360: -- PURPOSE
1361: -- This procedure is to validate ams_act_market_segments table
1362: -- NOTES
1363: --
1364: --
1365: -- HISTORY

Line 1534: SELECT * FROM AMS_ACT_MARKET_SEGMENTS

1530: )
1531: IS
1532:
1533: CURSOR c_obj IS
1534: SELECT * FROM AMS_ACT_MARKET_SEGMENTS
1535: WHERE activity_market_segment_id = p_mks_rec.activity_market_segment_id;
1536:
1537: -- ==============================================================================
1538: -- Following code is Modified by ptendulk on 05/08/2000

Line 1711: END AMS_Act_Market_Segments_PVT;

1707:
1708: END Init_Mks_Rec ;
1709:
1710:
1711: END AMS_Act_Market_Segments_PVT;