[Home] [Help]
1631: BEGIN
1632: IF (n_milcs_id IS NOT NULL) AND (n_milcs_id <> fnd_api.g_miss_num) THEN
1633: -- Check activity value in the JTF_IH_ACTIVITIES table.
1634: BEGIN
1635: SELECT milcs_id INTO n_Return FROM jtf_ih_media_item_lc_segs WHERE milcs_id = n_milcs_id;
1636: -- If value is presend then return an error (invalid activity_id)
1637: IF n_Return IS NOT NULL THEN
1638: FND_MESSAGE.SET_NAME('JTF','JTF_IH_API_INVALID_MILCS_ID');
1639: FND_MESSAGE.SET_TOKEN('VALUE', n_milcs_id);
1648: ELSIF ((n_milcs_id IS NULL) OR (n_milcs_id = fnd_api.g_miss_num)) THEN
1649: LOOP
1650: SELECT jtf_ih_media_item_lc_seg_s1.NEXTVAL INTO n_Return FROM dual;
1651: BEGIN
1652: SELECT n_milcs_id INTO n_Dummy FROM jtf_ih_media_item_lc_segs WHERE milcs_id = n_Return;
1653: EXCEPTION
1654: WHEN NO_DATA_FOUND THEN
1655: EXIT;
1656: END;
1963: RAISE fnd_api.g_exc_error;
1964: END IF;
1965:
1966: -- Perf fix for literal Usage
1967: insert into jtf_ih_media_item_lc_segs
1968: (
1969: START_DATE_TIME,
1970: TYPE_TYPE,
1971: TYPE_ID,
2600: --l_milcs_id := Get_milcs_id(NULL);
2601: l_media_lc_rec.milcs_id := Get_milcs_id(NULL);
2602:
2603: -- Perf fix for literal Usage
2604: insert into jtf_ih_media_item_lc_segs
2605: (
2606: START_DATE_TIME,
2607: TYPE_TYPE,
2608: TYPE_ID,
8431: l_soft_closed_perf VARCHAR2(1);
8432:
8433: CURSOR c_media_item_lc_segs IS
8434: SELECT *
8435: FROM jtf_ih_media_item_lc_segs
8436: WHERE media_id = p_media_rec.media_id;
8437: BEGIN
8438: -- Standard start of API savepoint
8439: SAVEPOINT close_mediaitem_pub1;
8571:
8572: -- Close all related Media_Item_LCs
8573: --
8574: FOR cur_Milcs IN (SELECT milcs_id, start_date_time, end_date_time, duration
8575: FROM jtf_ih_media_item_lc_segs WHERE Media_Id = p_media_rec.media_id) LOOP
8576: IF (cur_Milcs.end_date_time IS NULL) OR (cur_Milcs.end_date_time = fnd_api.g_miss_date) THEN
8577: cur_Milcs.end_date_time := l_end_date_time;
8578: Validate_StartEnd_Date
8579: ( p_api_name => l_api_name_full,
8589: cur_Milcs.duration := ROUND((cur_Milcs.end_date_time - cur_Milcs.start_date_time)*24*60*60);
8590: END IF;
8591: END IF;
8592:
8593: UPDATE JTF_IH_MEDIA_ITEM_LC_SEGS SET
8594: End_Date_Time = cur_Milcs.end_date_time,
8595: Start_Date_time = cur_Milcs.start_date_time,
8596: Duration = cur_Milcs.duration,
8597: Active = l_active_perf
8872: -- DBMS_OUTPUT.PUT_LINE('PAST generated sequence JTF_IH_PUB.Add_MediaLifeCycle milcs := ' || l_milcs_id);
8873: --l_milcs_id := Get_milcs_id(NULL);
8874: l_media_lc_rec.milcs_id := Get_milcs_id(NULL);
8875:
8876: INSERT INTO jtf_ih_media_item_lc_segs
8877: (
8878: CREATED_BY,
8879: CREATION_DATE,
8880: LAST_UPDATED_BY,
9046: l_bulk_interaction_id NUMBER;
9047:
9048: CURSOR c_Update_MediaLifecycle_csr IS
9049: SELECT *
9050: FROM JTF_IH_MEDIA_ITEM_LC_SEGS
9051: WHERE milcs_id = p_media_lc_rec.milcs_id
9052: FOR UPDATE;
9053: v_Update_MediaLifecycle_rec c_Update_MediaLifecycle_csr%ROWTYPE;
9054:
9270: ELSE
9271: --l_resource_id := p_media_lc_rec.resource_id;
9272: l_media_lc_rec.resource_id := p_media_lc_rec.resource_id;
9273: END IF;
9274: -- DBMS_OUTPUT.PUT_LINE('Before UPDATE JTF_IH_MEDIA_ITEM_LC_SEGS in JTF_IH_PUB.Update_MediaLifecycle');
9275: --
9276: -- Check if object_version_number requies updating
9277: --
9278: IF (p_object_version IS NULL) then
9330: END IF;
9331: -- DBMS_OUTPUT.PUT_LINE('PAST Validate_MediaItem_Record in JTF_IH_PUB.Update_MediaLifecycle');
9332:
9333:
9334: UPDATE JTF_IH_MEDIA_ITEM_LC_SEGS
9335: SET
9336: handler_id = l_media_lc_rec.handler_id,
9337: resource_id = l_media_lc_rec.resource_id,
9338: duration = decode( l_media_lc_rec.duration, fnd_api.g_miss_num, 0,l_media_lc_rec.duration),