[Home] [Help]
1: PACKAGE BODY JTF_IH_PUB AS
2: /* $Header: JTFIHPBB.pls 120.4.12010000.2 2008/11/25 10:00:00 ppillai ship $ */
3: G_PKG_NAME CONSTANT VARCHAR2(30) := 'JTF_IH_PUB';
4:
5:
1: PACKAGE BODY JTF_IH_PUB AS
2: /* $Header: JTFIHPBB.pls 120.4.12010000.2 2008/11/25 10:00:00 ppillai ship $ */
3: G_PKG_NAME CONSTANT VARCHAR2(30) := 'JTF_IH_PUB';
4:
5:
6: -- 08/26/03 mpetrosi B3102306
7: -- added cross check of source_code, source_code_id
85: (p_start_date_time <> fnd_api.g_miss_date) AND
86: (p_end_date_time <> fnd_api.g_miss_date) AND
87: -- (p_end_date_time - p_start_date_time < 0) )THEN
88: (p_end_date_time < p_start_date_time) )THEN
89: -- DBMS_OUTPUT.PUT_LINE('end_date is less than start_date in JTF_IH_PUB.Validate_StartEnd_Date');
90: x_return_status := fnd_api.g_ret_sts_error;
91: -- jtf_ih_core_util_pvt.add_invalid_argument_msg(p_api_name, to_char(p_end_date_time, 'DD-MON-YYYY'),
92: -- 'end_date_time');
93: -- Enh# 2999069
601: jtf_ih_core_util_pvt.add_invalid_argument_msg(p_api_name, to_char(p_int_val_rec.handler_id),
602: 'handler_id');
603: RETURN;
604: END IF;
605: -- DBMS_OUTPUT.PUT_LINE('PAST Validate handler_id in JTF_IH_PUB.Validate_Interaction_Record');
606:
607: l_count := 0;
608: IF ((p_int_val_rec.resource_id IS NOT NULL) AND (p_int_val_rec.resource_id <> fnd_api.g_miss_num)) THEN
609: IF ((p_int_val_rec.touchpoint2_type <> 'PARTY') AND (p_int_val_rec.touchpoint2_type IS NOT NULL)) then
636: jtf_ih_core_util_pvt.add_invalid_argument_msg(p_api_name, to_char(p_int_val_rec.resource_id),
637: 'resource_id');
638: RETURN;
639: END IF;
640: -- DBMS_OUTPUT.PUT_LINE('PAST Validate resource_id in JTF_IH_PUB.Validate_Interaction_Record');
641:
642: l_count := 0;
643: IF ((p_int_val_rec.outcome_id IS NOT NULL) AND (p_int_val_rec.outcome_id <> fnd_api.g_miss_num)) THEN
644: BEGIN
652: RETURN;
653: END IF;
654: END;
655: END IF;
656: -- DBMS_OUTPUT.PUT_LINE('PAST Validate outcome_id in JTF_IH_PUB.Validate_Interaction_Record');
657:
658: l_count := 0;
659: IF ((p_int_val_rec.result_id IS NOT NULL) AND (p_int_val_rec.result_id <> fnd_api.g_miss_num)) THEN
660: BEGIN
669: END IF;
670:
671: END;
672: END IF;
673: -- DBMS_OUTPUT.PUT_LINE('PAST Validate result_id in JTF_IH_PUB.Validate_Interaction_Record');
674:
675: l_count := 0;
676: IF ((p_int_val_rec.reason_id IS NOT NULL) AND (p_int_val_rec.reason_id <> fnd_api.g_miss_num)) THEN
677: BEGIN
685: RETURN;
686: END IF;
687: END;
688: END IF;
689: -- DBMS_OUTPUT.PUT_LINE('PAST Validate reason_id in JTF_IH_PUB.Validate_Interaction_Record');
690:
691: l_count := 0;
692: IF ((p_int_val_rec.script_id IS NOT NULL) AND (p_int_val_rec.script_id <> fnd_api.g_miss_num)) THEN
693: BEGIN
701: RETURN;
702: END IF;
703: END;
704: END IF;
705: -- DBMS_OUTPUT.PUT_LINE('PAST Validate script_id in JTF_IH_PUB.Validate_Interaction_Record');
706:
707: -- Add by Jean Zhu to validate the source_code_id
708: -- Validate AMS_Source_Code table primary key source_code_id for the following permutation:
709: -- source_code_id does have a value
779: END IF;
780: END;
781: END IF;
782:
783: -- DBMS_OUTPUT.PUT_LINE('PAST Validate source_code_id in JTF_IH_PUB.Validate_Interaction_Record');
784:
785: l_count := 0;
786: IF ((p_int_val_rec.parent_id IS NOT NULL) AND (p_int_val_rec.parent_id <> fnd_api.g_miss_num)) THEN
787: BEGIN
795: RETURN;
796: END IF;
797: END;
798: END IF;
799: -- DBMS_OUTPUT.PUT_LINE('PAST Validate parent_id in JTF_IH_PUB.Validate_Interaction_Record');
800: /*
801: -- Validate descriptive flexfield values
802: ----------------------------------------
803: IF ((p_int_val_rec.attribute1 <> fnd_api.g_miss_char) OR
856: IF (x_return_status <> fnd_api.g_ret_sts_success) THEN
857: RETURN;
858: END IF;
859: END IF;*/
860: -- DBMS_OUTPUT.PUT_LINE('PAST Validate flexfields in JTF_IH_PUB.Validate_Interaction_Record');
861: END Validate_Interaction_Record;
862:
863:
864: PROCEDURE Default_Interaction_Record (x_interaction IN OUT NOCOPY interaction_rec_type);
992: jtf_ih_core_util_pvt.add_invalid_argument_msg(p_api_name, to_char(p_act_val_rec.interaction_id),
993: 'interaction_id');
994: RETURN;
995: END IF;
996: -- DBMS_OUTPUT.PUT_LINE('PAST Validate interaction_id in JTF_IH_PUB.Validate_Activity_Record');
997:
998: l_count := 0;
999: IF ((p_act_val_rec.action_item_id IS NOT NULL) AND (p_act_val_rec.action_item_id <> fnd_api.g_miss_num)) THEN
1000: BEGIN
1008: RETURN;
1009: END IF;
1010: END;
1011: END IF;
1012: -- DBMS_OUTPUT.PUT_LINE('PAST Validate action_item_id in JTF_IH_PUB.Validate_Activity_Record');
1013:
1014: l_count := 0;
1015: IF ((p_act_val_rec.outcome_id IS NOT NULL) AND (p_act_val_rec.outcome_id <> fnd_api.g_miss_num)) THEN
1016: BEGIN
1025: END IF;
1026:
1027: END;
1028: END IF;
1029: -- DBMS_OUTPUT.PUT_LINE('PAST Validate outcome_id in JTF_IH_PUB.Validate_Activity_Record');
1030:
1031:
1032: l_count := 0;
1033: IF ((p_act_val_rec.action_id IS NOT NULL) AND (p_act_val_rec.action_id <> fnd_api.g_miss_num)) THEN
1042: RETURN;
1043: END IF;
1044: END;
1045: END IF;
1046: -- DBMS_OUTPUT.PUT_LINE('PAST Validate action_id in JTF_IH_PUB.Validate_Activity_Record');
1047: l_count := 0;
1048: IF ((p_act_val_rec.result_id IS NOT NULL) AND (p_act_val_rec.result_id <> fnd_api.g_miss_num)) THEN
1049: BEGIN
1050: SELECT count(result_id) into l_count
1058: END IF;
1059:
1060: END;
1061: END IF;
1062: -- DBMS_OUTPUT.PUT_LINE('PAST Validate result_id in JTF_IH_PUB.Validate_Activity_Record');
1063:
1064: l_count := 0;
1065: IF ((p_act_val_rec.reason_id IS NOT NULL) AND (p_act_val_rec.reason_id <> fnd_api.g_miss_num)) THEN
1066: BEGIN
1074: RETURN;
1075: END IF;
1076: END;
1077: END IF;
1078: -- DBMS_OUTPUT.PUT_LINE('PAST Validate reason_id in JTF_IH_PUB.Validate_Activity_Record');
1079:
1080:
1081:
1082: -- Validate AMS_Source_Code table primary key source_code_id for the following permutation:
1153: END;
1154: END IF;
1155:
1156:
1157: -- DBMS_OUTPUT.PUT_LINE('PAST Validate source_code_id in JTF_IH_PUB.Validate_Activity_Record');
1158:
1159: l_count := 0;
1160: IF ((p_act_val_rec.cust_account_id IS NOT NULL) AND (p_act_val_rec.cust_account_id <> fnd_api.g_miss_num)) THEN
1161: BEGIN
1169: RETURN;
1170: END IF;
1171: END;
1172: END IF;
1173: -- DBMS_OUTPUT.PUT_LINE('PAST Validate cust_account_id in JTF_IH_PUB.Validate_Activity_Record');
1174:
1175: l_count := 0;
1176: IF ((p_act_val_rec.media_id IS NOT NULL) AND (p_act_val_rec.media_id <> fnd_api.g_miss_num)) THEN
1177: BEGIN
1185: RETURN;
1186: END IF;
1187: END;
1188: END IF;
1189: -- DBMS_OUTPUT.PUT_LINE('PAST Validate media_id in JTF_IH_PUB.Validate_Activity_Record');
1190:
1191: END Validate_Activity_Record;
1192:
1193:
1219: -- Modified to call Validate_Activity_Record
1220: for idx in 1 .. p_int_val_tbl.count loop
1221: Validate_Activity_Record(p_api_name, p_int_val_tbl(idx),p_resp_appl_id,p_resp_id,x_return_status);
1222: IF (x_return_status <> fnd_api.g_ret_sts_success) THEN
1223: ---- DBMS_OUTPUT.PUT_LINE('Unsuccessful validation of a activity record in jtf_ih_pub.Validate_Activity_table');
1224: RETURN;
1225: END IF;
1226: END loop;
1227: END Validate_Activity_table;
1337: BEGIN
1338: -- Initialize API return status to success
1339: x_return_status := fnd_api.g_ret_sts_success;
1340: l_count := 0;
1341: -- DBMS_OUTPUT.PUT_LINE('Beginning validation of a media_lc record in jtf_ih_pub.Validate_Mlcs_Record');
1342:
1343: IF (((p_media_lc_rec.milcs_type_id IS NULL) OR (p_media_lc_rec.milcs_type_id = fnd_api.g_miss_num))
1344: AND
1345: ((p_media_lc_rec.milcs_code IS NULL) OR (p_media_lc_rec.milcs_code = fnd_api.g_miss_char))) THEN
1464: Validate_Mlcs_Record ( p_api_name, p_mlcs_val_tab(idx), p_resp_appl_id, p_resp_id, x_return_status);
1465: END loop;
1466:
1467: IF (x_return_status <> fnd_api.g_ret_sts_success) THEN
1468: -- DBMS_OUTPUT.PUT_LINE('Unsuccessful validation of a media_lc record in jtf_ih_pub.Validate_Mlcs_table');
1469: RETURN;
1470: END IF;
1471: END Validate_Mlcs_table;
1472:
1672: -- INITIAL VERSION
1673: -- James Baldo Jr. 25-APR-2000 User Hooks Customer and Vertical Industry
1674: -- James Baldo Jr. 09-JUN-2000 Modified by for bug# 1326022
1675: -- Igor Aleshin 18-APR-2001 Fix for bugdb 2323210 - 1157.6RI:API
1676: -- ERR:JTF_IH_PUB.CLOSE_INTERACTION:WHEN DISAGREE WITH OKC IN IBE
1677: -- Igor Aleshin 20-MAY-2002 Changed piece of code for duration logic
1678: -- Igor Aleshin 24-FEB-2003 Fixed bug# 2817083 - Error loggin interactions
1679: -- Igor Aleshin 29-MAY-2003 Enh# 2940473 - IH Bulk API Changes
1680: -- Igor Aleshin 18-JUN-2003 Enh# 1846960 - REQUIRE CONTACT NAME OF
2067: --
2068: -- Jean Zhu split old version PROCEDURE Create_MediaItem() to
2069: -- two PROCEDUREs Create_MediaItem() and Create_MediaLifecycle()
2070: -- Igor Aleshin 18-APR-2001 Fix for bugdb 2323210 - 1157.6RI:API
2071: -- ERR:JTF_IH_PUB.CLOSE_INTERACTION:WHEN DISAGREE WITH OKC IN IBE
2072: -- Igor Aleshin 24-FEB-2003 Fixed bug# 2817083 - Error loggin interactions
2073: -- Igor Aleshin 29-MAY-2003 Enh# 2940473 - IH Bulk API Changes
2074: -- Igor Aleshin 03-JUL-2003 Enh# 3022511 - Add a column to the jtf_ih_media_items table
2075: -- vekrishn 27-JUL-2004 Perf Fix for literal Usage
2127: l_soft_closed_perf := 'N';
2128:
2129: -- Preprocessing Call
2130: l_media_rec := p_media_rec;
2131: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CREATE_MEDIAITEM', 'B', 'C') THEN
2132: JTF_IH_PUB_CUHK.create_mediaitem_pre(
2133: p_media_rec=>l_media_rec,
2134: x_data=>l_data,
2135: x_count=>l_count,
2128:
2129: -- Preprocessing Call
2130: l_media_rec := p_media_rec;
2131: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CREATE_MEDIAITEM', 'B', 'C') THEN
2132: JTF_IH_PUB_CUHK.create_mediaitem_pre(
2133: p_media_rec=>l_media_rec,
2134: x_data=>l_data,
2135: x_count=>l_count,
2136: x_return_code=>l_return_code);
2140: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2141: END IF;
2142: END IF;
2143:
2144: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CREATE_MEDIAITEM', 'B', 'V') THEN
2145: JTF_IH_PUB_VUHK.create_mediaitem_pre(
2146: p_media_rec=>l_media_rec,
2147: x_data=>l_data,
2148: x_count=>l_count,
2141: END IF;
2142: END IF;
2143:
2144: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CREATE_MEDIAITEM', 'B', 'V') THEN
2145: JTF_IH_PUB_VUHK.create_mediaitem_pre(
2146: p_media_rec=>l_media_rec,
2147: x_data=>l_data,
2148: x_count=>l_count,
2149: x_return_code=>l_return_code);
2158: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version,
2159: l_api_name, g_pkg_name) THEN
2160: RAISE fnd_api.g_exc_unexpected_error;
2161: END IF;
2162: -- DBMS_OUTPUT.PUT_LINE('PAST fnd_api.compatible_api_call in JTF_IH_PUB.Create_MediaItem');
2163:
2164: -- Initialize message list if p_init_msg_list is set to TRUE
2165: IF fnd_api.to_boolean(p_init_msg_list) THEN
2166: fnd_msg_pub.initialize;
2186: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
2187: RAISE fnd_api.g_exc_error;
2188: END IF;
2189: END IF;
2190: -- DBMS_OUTPUT.PUT_LINE('PAST jtf_ih_core_util_pvt.validate_who_info in JTF_IH_PUB.Create_MediaItem');
2191:
2192: Validate_Media_Item
2193: ( p_api_name => l_api_name_full,
2194: p_media_item_val => p_media_rec,
2199: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
2200: RAISE fnd_api.g_exc_error;
2201: END IF;
2202:
2203: -- DBMS_OUTPUT.PUT_LINE('PAST Validate_Media_Item in JTF_IH_PUB.Create_MediaItem');
2204:
2205: -- Added by IAleshin 21-MAY-2002
2206: IF (p_media_rec.end_date_time <> fnd_api.g_miss_date) AND (p_media_rec.end_date_time IS NOT NULL) THEN
2207: --l_end_date_time := p_media_rec.end_date_time;
2264: --SELECT jtf_ih_media_items_s1.NEXTVAL INTO l_media_id FROM dual;
2265: --l_media_id := Get_Media_Id(NULL);
2266: l_media_rec.media_id := Get_Media_Id(NULL);
2267:
2268: -- DBMS_OUTPUT.PUT_LINE('PAST generate PK in JTF_IH_PUB.Create_MediaItem');
2269: insert into jtf_ih_Media_Items
2270: (
2271: DURATION,
2272: DIRECTION,
2339: decode( l_media_rec.address, fnd_api.g_miss_char, null, l_media_rec.address),
2340: l_ao_update_pending_perf,
2341: l_soft_closed_perf
2342: );
2343: -- DBMS_OUTPUT.PUT_LINE('PAST Insert data in JTF_IH_PUB.Create_MediaItem');
2344:
2345: --
2346: -- Output
2347: -- --
2349: x_media_id := l_media_rec.media_id;
2350:
2351: -- Post processing Call
2352:
2353: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CREATE_MEDIAITEM', 'A', 'V') THEN
2354: JTF_IH_PUB_VUHK.create_mediaitem_post(
2355: p_media_rec=>l_media_rec,
2356: x_data=>l_data,
2357: x_count=>l_count,
2350:
2351: -- Post processing Call
2352:
2353: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CREATE_MEDIAITEM', 'A', 'V') THEN
2354: JTF_IH_PUB_VUHK.create_mediaitem_post(
2355: p_media_rec=>l_media_rec,
2356: x_data=>l_data,
2357: x_count=>l_count,
2358: x_return_code=>l_return_code);
2362: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2363: END IF;
2364: END IF;
2365:
2366: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CREATE_MEDIAITEM', 'A', 'C') THEN
2367: JTF_IH_PUB_CUHK.create_mediaitem_post(
2368: p_media_rec=>l_media_rec,
2369: x_data=>l_data,
2370: x_count=>l_count,
2363: END IF;
2364: END IF;
2365:
2366: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CREATE_MEDIAITEM', 'A', 'C') THEN
2367: JTF_IH_PUB_CUHK.create_mediaitem_post(
2368: p_media_rec=>l_media_rec,
2369: x_data=>l_data,
2370: x_count=>l_count,
2371: x_return_code=>l_return_code);
2472: l_active_perf := 'N';
2473:
2474: -- Preprocessing Call
2475: l_media_lc_rec := p_media_lc_rec;
2476: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CREATE_MEDIALIFEYCYCLE', 'B', 'C') THEN
2477: JTF_IH_PUB_CUHK.create_medialifecycle_pre(
2478: p_media_lc_rec=>l_media_lc_rec,
2479: x_data=>l_data,
2480: x_count=>l_count,
2473:
2474: -- Preprocessing Call
2475: l_media_lc_rec := p_media_lc_rec;
2476: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CREATE_MEDIALIFEYCYCLE', 'B', 'C') THEN
2477: JTF_IH_PUB_CUHK.create_medialifecycle_pre(
2478: p_media_lc_rec=>l_media_lc_rec,
2479: x_data=>l_data,
2480: x_count=>l_count,
2481: x_return_code=>l_return_code);
2485: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2486: END IF;
2487: END IF;
2488:
2489: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CREATE_MEDIALIFECYCLE', 'B', 'V') THEN
2490: JTF_IH_PUB_VUHK.create_medialifecycle_pre(
2491: p_media_lc_rec=>l_media_lc_rec,
2492: x_data=>l_data,
2493: x_count=>l_count,
2486: END IF;
2487: END IF;
2488:
2489: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CREATE_MEDIALIFECYCLE', 'B', 'V') THEN
2490: JTF_IH_PUB_VUHK.create_medialifecycle_pre(
2491: p_media_lc_rec=>l_media_lc_rec,
2492: x_data=>l_data,
2493: x_count=>l_count,
2494: x_return_code=>l_return_code);
2504: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version,
2505: l_api_name, g_pkg_name) THEN
2506: RAISE fnd_api.g_exc_unexpected_error;
2507: END IF;
2508: -- DBMS_OUTPUT.PUT_LINE('PAST fnd_api.compatible_api_call in JTF_IH_PUB.Create_MediaLifecycle');
2509: -- Initialize message list if p_init_msg_list is set to TRUE
2510: IF fnd_api.to_boolean(p_init_msg_list) THEN
2511: fnd_msg_pub.initialize;
2512: END IF;
2531: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
2532: RAISE fnd_api.g_exc_error;
2533: END IF;
2534: END IF;
2535: -- DBMS_OUTPUT.PUT_LINE('PAST jtf_ih_core_util_pvt.validate_who_info in JTF_IH_PUB.Create_MediaLifecycle' || p_user_id);
2536: -- DBMS_OUTPUT.PUT_LINE('milcs_type_id:= ' || p_media_lc_rec.milcs_type_id);
2537: -- DBMS_OUTPUT.PUT_LINE('milcs_type_code:= ' || p_media_lc_rec.milcs_code);
2538: Validate_Mlcs_Record
2539: ( p_api_name => l_api_name_full,
2544: );
2545: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
2546: RAISE fnd_api.g_exc_error;
2547: END IF;
2548: -- DBMS_OUTPUT.PUT_LINE('PAST Validate_Mlcs_Record in JTF_IH_PUB.Create_MediaLifecycle');
2549: -- assign the start_date_time
2550:
2551: IF(p_media_lc_rec.start_date_time IS NOT NULL) AND (p_media_lc_rec.start_date_time <> fnd_api.g_miss_date) THEN
2552: --l_start_date_time := p_media_lc_rec.start_date_time;
2595: END IF;
2596:
2597: -- Bug# 2817083
2598: --SELECT jtf_ih_media_item_lc_seg_s1.NEXTVAL INTO l_milcs_id FROM dual;
2599: -- DBMS_OUTPUT.PUT_LINE('PAST generate PK in JTF_IH_PUB.Create_MediaLifecycle '|| l_milcs_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
2651: decode( p_media_lc_rec.bulk_batch_type, fnd_api.g_miss_char, null, p_media_lc_rec.bulk_batch_type),
2652: decode( p_media_lc_rec.bulk_batch_id, fnd_api.g_miss_num, null, p_media_lc_rec.bulk_batch_id),
2653: decode( p_media_lc_rec.bulk_interaction_id, fnd_api.g_miss_num, null, p_media_lc_rec.bulk_interaction_id)
2654: );
2655: -- DBMS_OUTPUT.PUT_LINE('PAST insert data in JTF_IH_PUB.Create_MediaLifecycle');
2656:
2657: -- Post processing Call
2658:
2659: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CREATE_MEDIALIFECYCLE', 'A', 'V') THEN
2655: -- DBMS_OUTPUT.PUT_LINE('PAST insert data in JTF_IH_PUB.Create_MediaLifecycle');
2656:
2657: -- Post processing Call
2658:
2659: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CREATE_MEDIALIFECYCLE', 'A', 'V') THEN
2660: JTF_IH_PUB_VUHK.create_medialifecycle_post(
2661: p_media_lc_rec=>l_media_lc_rec,
2662: x_data=>l_data,
2663: x_count=>l_count,
2656:
2657: -- Post processing Call
2658:
2659: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CREATE_MEDIALIFECYCLE', 'A', 'V') THEN
2660: JTF_IH_PUB_VUHK.create_medialifecycle_post(
2661: p_media_lc_rec=>l_media_lc_rec,
2662: x_data=>l_data,
2663: x_count=>l_count,
2664: x_return_code=>l_return_code);
2668: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2669: END IF;
2670: END IF;
2671:
2672: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CREATE_MEDIALIFECYCLE', 'A', 'C') THEN
2673: JTF_IH_PUB_CUHK.create_medialifecycle_post(
2674: p_media_lc_rec=>l_media_lc_rec,
2675: x_data=>l_data,
2676: x_count=>l_count,
2669: END IF;
2670: END IF;
2671:
2672: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CREATE_MEDIALIFECYCLE', 'A', 'C') THEN
2673: JTF_IH_PUB_CUHK.create_medialifecycle_post(
2674: p_media_lc_rec=>l_media_lc_rec,
2675: x_data=>l_data,
2676: x_count=>l_count,
2677: x_return_code=>l_return_code);
2733: -- Igor Aleshin 22-MAY-2001 - Fixed the bug# 1791550 unable to Create
2734: -- Activity by Call Create_Interaction API
2735: -- Igor Aleshin 21-DEC-2001 Fix for bugdb - 2153913 - PREVENT G_MISS_DATE VALUE FROM BEING
2736: -- WRITTEN TO THE END_DATE_TIME VALUE.
2737: -- Igor Aleshin 21-FEB-2002 Fix for bugdb - 2235155 - JTF_IH_PUB.CREATE_INTERACTION DOESN'T
2738: -- INSERT ALL VALUES TO JTF_IH_ACTIVITIES
2739: -- Igor Aleshin 04-MAR-2002 Added Attributes to Activity_Rec.
2740: -- Igor Aleshin 18-APR-2001 Fix for bugdb 2323210 - 1157.6RI:API
2741: -- ERR:JTF_IH_PUB.CLOSE_INTERACTION:WHEN DISAGREE WITH OKC IN IBE
2737: -- Igor Aleshin 21-FEB-2002 Fix for bugdb - 2235155 - JTF_IH_PUB.CREATE_INTERACTION DOESN'T
2738: -- INSERT ALL VALUES TO JTF_IH_ACTIVITIES
2739: -- Igor Aleshin 04-MAR-2002 Added Attributes to Activity_Rec.
2740: -- Igor Aleshin 18-APR-2001 Fix for bugdb 2323210 - 1157.6RI:API
2741: -- ERR:JTF_IH_PUB.CLOSE_INTERACTION:WHEN DISAGREE WITH OKC IN IBE
2742: -- Igor Aleshin 10-MAY-2002 ENH# 2079963 - NEED INTERACTION HISTORY RECORD TO SUPPORT MULTIPLE AGENTS
2743: -- Igor Aleshin 05-JUN-2002 Removed from statemements Resource_ID for Activity_Rec_Type
2744: -- Igor Aleshin 24-FEB-2003 Fixed bug# 2817083 - Error loggin interactions
2745: -- Igor Aleshin 29-MAY-2003 Enh# 2940473 - IH Bulk API Changes
2803: FND_MSG_PUB.Add;
2804: RAISE FND_API.G_EXC_ERROR;
2805: END IF;
2806:
2807: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CREATE_INTERACTION', 'B', 'C') THEN
2808: JTF_IH_PUB_CUHK.create_interaction_pre(
2809: --p_interaction_rec=>l_interaction_rec,
2810: p_interaction_rec=>l_int_val_rec,
2811: --p_activities=>l_activities_hk,
2804: RAISE FND_API.G_EXC_ERROR;
2805: END IF;
2806:
2807: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CREATE_INTERACTION', 'B', 'C') THEN
2808: JTF_IH_PUB_CUHK.create_interaction_pre(
2809: --p_interaction_rec=>l_interaction_rec,
2810: p_interaction_rec=>l_int_val_rec,
2811: --p_activities=>l_activities_hk,
2812: p_activities=>l_activities,
2819: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2820: END IF;
2821: END IF;
2822:
2823: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CREATE_INTERACTION', 'B', 'V') THEN
2824: JTF_IH_PUB_VUHK.create_interaction_pre(
2825: --p_interaction_rec=>l_interaction_rec,
2826: p_interaction_rec=>l_int_val_rec,
2827: --p_activities=>l_activities_hk,
2820: END IF;
2821: END IF;
2822:
2823: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CREATE_INTERACTION', 'B', 'V') THEN
2824: JTF_IH_PUB_VUHK.create_interaction_pre(
2825: --p_interaction_rec=>l_interaction_rec,
2826: p_interaction_rec=>l_int_val_rec,
2827: --p_activities=>l_activities_hk,
2828: p_activities=>l_activities,
2841: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version,
2842: l_api_name, g_pkg_name) THEN
2843: RAISE fnd_api.g_exc_unexpected_error;
2844: END IF;
2845: -- DBMS_OUTPUT.PUT_LINE('PAST fnd_api.compatible_api_call in JTF_IH_PUB.Create_Interaction');
2846:
2847: -- Initialize message list if p_init_msg_list is set to TRUE
2848: IF fnd_api.to_boolean(p_init_msg_list) THEN
2849: fnd_msg_pub.initialize;
2871: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
2872: RAISE fnd_api.g_exc_error;
2873: END IF;
2874: END IF;
2875: -- DBMS_OUTPUT.PUT_LINE('PAST jtf_ih_core_util_pvt.validate_who_info in JTF_IH_PUB.Create_Interaction');
2876:
2877: --
2878: -- Validate all non-missing attributes by calling the utility procedure.
2879: --
2888: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
2889: RAISE fnd_api.g_exc_error;
2890: END IF;
2891:
2892: --DBMS_OUTPUT.PUT_LINE('PAST Validate_Interaction_Record in JTF_IH_PUB.Create_Interaction');
2893: -- mpetrosi 9/1/03 - should not default with zeroes
2894: -- Default_Interaction_Record(l_int_val_rec);
2895:
2896: -- Changed by IAleshin - 20-MAY-2002
3049: decode( l_int_val_rec.contact_rel_party_id, fnd_api.g_miss_num, null, l_int_val_rec.contact_rel_party_id),
3050: decode( l_int_val_rec.contact_party_id, fnd_api.g_miss_num, null, l_int_val_rec.contact_party_id)
3051: );
3052:
3053: -- DBMS_OUTPUT.PUT_LINE('PAST INSERT INTO jtf_ih_Interactions in JTF_IH_PUB.Create_Interaction');
3054: --1791550
3055: --
3056: for idx in 1 .. l_activities.count loop
3057: l_activities(idx).interaction_id := l_int_val_rec.interaction_id;
3274: --x_interaction_id := l_int_val_rec.interaction_id;
3275:
3276: -- Post processing Call
3277:
3278: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CREATE_INTERACTION', 'A', 'V') THEN
3279: JTF_IH_PUB_VUHK.create_interaction_post(
3280: --p_interaction_rec=>l_interaction_rec,
3281: p_interaction_rec=>l_int_val_rec,
3282: --p_activities=>l_activities_hk,
3275:
3276: -- Post processing Call
3277:
3278: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CREATE_INTERACTION', 'A', 'V') THEN
3279: JTF_IH_PUB_VUHK.create_interaction_post(
3280: --p_interaction_rec=>l_interaction_rec,
3281: p_interaction_rec=>l_int_val_rec,
3282: --p_activities=>l_activities_hk,
3283: p_activities=>l_activities,
3290: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3291: END IF;
3292: END IF;
3293:
3294: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CREATE_INTERACTION', 'A', 'C') THEN
3295: JTF_IH_PUB_CUHK.create_interaction_post(
3296: --p_interaction_rec=>l_interaction_rec,
3297: p_interaction_rec=>l_int_val_rec,
3298: --p_activities=>l_activities_hk,
3291: END IF;
3292: END IF;
3293:
3294: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CREATE_INTERACTION', 'A', 'C') THEN
3295: JTF_IH_PUB_CUHK.create_interaction_post(
3296: --p_interaction_rec=>l_interaction_rec,
3297: p_interaction_rec=>l_int_val_rec,
3298: --p_activities=>l_activities_hk,
3299: p_activities=>l_activities,
3397: l_result_id := p_result_id;
3398: l_reason_id := p_reason_id;
3399: l_script_id := p_script_id;
3400: l_media_id := p_media_id;
3401: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'GET_INTERACTIONACTIVITYCOUNT', 'B', 'C') THEN
3402: JTF_IH_PUB_CUHK.get_interactionactcnt_pre(
3403: p_outcome_id=>l_outcome_id,
3404: p_result_id=>l_result_id,
3405: p_reason_id=>l_reason_id,
3398: l_reason_id := p_reason_id;
3399: l_script_id := p_script_id;
3400: l_media_id := p_media_id;
3401: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'GET_INTERACTIONACTIVITYCOUNT', 'B', 'C') THEN
3402: JTF_IH_PUB_CUHK.get_interactionactcnt_pre(
3403: p_outcome_id=>l_outcome_id,
3404: p_result_id=>l_result_id,
3405: p_reason_id=>l_reason_id,
3406: p_script_id=>l_script_id,
3414: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3415: END IF;
3416: END IF;
3417:
3418: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'GET_INTERACTIONACTIVITYCOUNT', 'B', 'V') THEN
3419: JTF_IH_PUB_VUHK.get_interactionactcnt_pre(
3420: p_outcome_id=>l_outcome_id,
3421: p_result_id=>l_result_id,
3422: p_reason_id=>l_reason_id,
3415: END IF;
3416: END IF;
3417:
3418: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'GET_INTERACTIONACTIVITYCOUNT', 'B', 'V') THEN
3419: JTF_IH_PUB_VUHK.get_interactionactcnt_pre(
3420: p_outcome_id=>l_outcome_id,
3421: p_result_id=>l_result_id,
3422: p_reason_id=>l_reason_id,
3423: p_script_id=>l_script_id,
3657: END IF;
3658:
3659:
3660: -- Post processing Call
3661: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'GET_INTERACTIONACTIVITYCOUNT', 'B', 'V') THEN
3662: JTF_IH_PUB_VUHK.get_interactionactcnt_post(
3663: p_outcome_id=>l_outcome_id,
3664: p_result_id=>l_result_id,
3665: p_reason_id=>l_reason_id,
3658:
3659:
3660: -- Post processing Call
3661: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'GET_INTERACTIONACTIVITYCOUNT', 'B', 'V') THEN
3662: JTF_IH_PUB_VUHK.get_interactionactcnt_post(
3663: p_outcome_id=>l_outcome_id,
3664: p_result_id=>l_result_id,
3665: p_reason_id=>l_reason_id,
3666: p_script_id=>l_script_id,
3674: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3675: END IF;
3676: END IF;
3677:
3678: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'GET_INTERACTIONACTIVITYCOUNT', 'B', 'C') THEN
3679: JTF_IH_PUB_CUHK.get_interactionactcnt_post(
3680: p_outcome_id=>l_outcome_id,
3681: p_result_id=>l_result_id,
3682: p_reason_id=>l_reason_id,
3675: END IF;
3676: END IF;
3677:
3678: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'GET_INTERACTIONACTIVITYCOUNT', 'B', 'C') THEN
3679: JTF_IH_PUB_CUHK.get_interactionactcnt_post(
3680: p_outcome_id=>l_outcome_id,
3681: p_result_id=>l_result_id,
3682: p_reason_id=>l_reason_id,
3683: p_script_id=>l_script_id,
3777: -- Preprocessing Call
3778: l_outcome_id := p_outcome_id;
3779: l_result_id := p_result_id;
3780: l_reason_id := p_reason_id;
3781: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'GET_INTERACTIONCOUNT', 'B', 'C') THEN
3782: JTF_IH_PUB_CUHK.get_interactioncount_pre(
3783: p_outcome_id=>l_outcome_id,
3784: p_result_id=>l_result_id,
3785: p_reason_id=>l_reason_id,
3778: l_outcome_id := p_outcome_id;
3779: l_result_id := p_result_id;
3780: l_reason_id := p_reason_id;
3781: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'GET_INTERACTIONCOUNT', 'B', 'C') THEN
3782: JTF_IH_PUB_CUHK.get_interactioncount_pre(
3783: p_outcome_id=>l_outcome_id,
3784: p_result_id=>l_result_id,
3785: p_reason_id=>l_reason_id,
3786: x_data=>l_data,
3792: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3793: END IF;
3794: END IF;
3795:
3796: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'GET_INTERACTIONCOUNT', 'B', 'V') THEN
3797: JTF_IH_PUB_VUHK.get_interactioncount_pre(
3798: p_outcome_id=>l_outcome_id,
3799: p_result_id=>l_result_id,
3800: p_reason_id=>l_reason_id,
3793: END IF;
3794: END IF;
3795:
3796: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'GET_INTERACTIONCOUNT', 'B', 'V') THEN
3797: JTF_IH_PUB_VUHK.get_interactioncount_pre(
3798: p_outcome_id=>l_outcome_id,
3799: p_result_id=>l_result_id,
3800: p_reason_id=>l_reason_id,
3801: x_data=>l_data,
3865: -- and (p_attribute_category = p_attribute_category) -- or (p_attribute_category is NULL and p_attribute_category is NULL))
3866: ;
3867: x_interaction_count := interactionCount;
3868: -- Post processing Call
3869: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'GET_INTERACTIONCOUNT', 'B', 'V') THEN
3870: JTF_IH_PUB_VUHK.get_interactioncount_post(
3871: p_outcome_id=>l_outcome_id,
3872: p_result_id=>l_result_id,
3873: p_reason_id=>l_reason_id,
3866: ;
3867: x_interaction_count := interactionCount;
3868: -- Post processing Call
3869: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'GET_INTERACTIONCOUNT', 'B', 'V') THEN
3870: JTF_IH_PUB_VUHK.get_interactioncount_post(
3871: p_outcome_id=>l_outcome_id,
3872: p_result_id=>l_result_id,
3873: p_reason_id=>l_reason_id,
3874: x_data=>l_data,
3880: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3881: END IF;
3882: END IF;
3883:
3884: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'GET_INTERACTIONCOUNT', 'B', 'C') THEN
3885: JTF_IH_PUB_CUHK.get_interactioncount_post(
3886: p_outcome_id=>l_outcome_id,
3887: p_result_id=>l_result_id,
3888: p_reason_id=>l_reason_id,
3881: END IF;
3882: END IF;
3883:
3884: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'GET_INTERACTIONCOUNT', 'B', 'C') THEN
3885: JTF_IH_PUB_CUHK.get_interactioncount_post(
3886: p_outcome_id=>l_outcome_id,
3887: p_result_id=>l_result_id,
3888: p_reason_id=>l_reason_id,
3889: x_data=>l_data,
3937: -- Igor Aleshin 12-MAY-2001 Added request for the column Script_Trans_ID in the JTF_IH_ACTIVITIES.
3938: -- Igor Aleshin 21-DEC-2001 Fix for bugdb - 2153913 - PREVENT G_MISS_DATE VALUE FROM BEING
3939: -- WRITTEN TO THE END_DATE_TIME VALUE.
3940: -- Igor Aleshin 18-APR-2001 Fix for bugdb 2323210 - 1157.6RI:API
3941: -- ERR:JTF_IH_PUB.CLOSE_INTERACTION:WHEN DISAGREE WITH OKC IN IBE
3942: -- Igor Aleshin 24-FEB-2003 Fixed bug# 2817083 - Error loggin interactions
3943: -- Igor Aleshin 18-JUN-2003 Enh# 1846960 - REQUIRE CONTACT NAME OF ORGANISATION IN INTERACTION HISTORY
3944: --
3945: --
3984: SAVEPOINT open_interaction_pub;
3985:
3986: -- Preprocessing Call
3987: l_interaction_rec := p_interaction_rec;
3988: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'OPEN_INTERACTION', 'B', 'C') THEN
3989: JTF_IH_PUB_CUHK.open_interaction_pre(p_interaction_rec=>l_interaction_rec,
3990: x_data=>l_data,
3991: x_count=>l_count,
3992: x_return_code=>l_return_code);
3985:
3986: -- Preprocessing Call
3987: l_interaction_rec := p_interaction_rec;
3988: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'OPEN_INTERACTION', 'B', 'C') THEN
3989: JTF_IH_PUB_CUHK.open_interaction_pre(p_interaction_rec=>l_interaction_rec,
3990: x_data=>l_data,
3991: x_count=>l_count,
3992: x_return_code=>l_return_code);
3993: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
3996: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3997: END IF;
3998: END IF;
3999:
4000: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'OPEN_INTERACTION', 'B', 'V') THEN
4001: JTF_IH_PUB_VUHK.open_interaction_pre(p_interaction_rec=>l_interaction_rec,
4002: x_data=>l_data,
4003: x_count=>l_count,
4004: x_return_code=>l_return_code);
3997: END IF;
3998: END IF;
3999:
4000: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'OPEN_INTERACTION', 'B', 'V') THEN
4001: JTF_IH_PUB_VUHK.open_interaction_pre(p_interaction_rec=>l_interaction_rec,
4002: x_data=>l_data,
4003: x_count=>l_count,
4004: x_return_code=>l_return_code);
4005: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
4019:
4020: RAISE fnd_api.g_exc_unexpected_error;
4021: END IF;
4022: --l_test_msg := '1';
4023: -- DBMS_OUTPUT.PUT_LINE('PAST fnd_api.compatible_api_call in JTF_IH_PUB.Open_Interaction');
4024:
4025: -- Initialize message list if p_init_msg_list is set to TRUE
4026: IF fnd_api.to_boolean(p_init_msg_list) THEN
4027: fnd_msg_pub.initialize;
4050: RAISE fnd_api.g_exc_error;
4051: END IF;
4052: END IF;
4053:
4054: -- DBMS_OUTPUT.PUT_LINE('PAST jtf_ih_core_util_pvt.validate_who_info in JTF_IH_PUB.Open_Interaction');
4055:
4056: --
4057: -- Validate all non-missing attributes by calling the utility procedure.
4058: --
4068: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
4069: RAISE fnd_api.g_exc_error;
4070: END IF;
4071:
4072: -- DBMS_OUTPUT.PUT_LINE('PAST Validate_Interaction_Record in JTF_IH_PUB.Open_Interaction');
4073: -- assign the end_date_time
4074: IF (p_interaction_rec.end_date_time <> fnd_api.g_miss_date) AND (p_interaction_rec.end_date_time IS NOT NULL) THEN
4075: --l_end_date_time := p_interaction_rec.end_date_time;
4076: l_interaction_rec.end_date_time := p_interaction_rec.end_date_time;
4266: decode( l_interaction_rec.contact_rel_party_id, fnd_api.g_miss_num, null, l_interaction_rec.contact_rel_party_id),
4267: decode( l_interaction_rec.contact_party_id, fnd_api.g_miss_num, null, l_interaction_rec.contact_party_id)
4268: );
4269: --l_test_msg := '7';
4270: -- DBMS_OUTPUT.PUT_LINE('PAST INSERT INTO jtf_ih_Interactions in JTF_IH_PUB.Open_Interaction');
4271:
4272:
4273: IF ((p_interaction_rec.parent_id IS NOT NULL) AND (p_interaction_rec.parent_id <> fnd_api.g_miss_num)) THEN
4274: INSERT INTO jtf_ih_interaction_inters
4293: p_user_id
4294: );
4295: END IF;
4296: --l_test_msg := '8';
4297: -- DBMS_OUTPUT.PUT_LINE('PAST INSERT INTO jtf_ih_Interaction_inters in JTF_IH_PUB.Open_Interaction');
4298: --
4299: -- Set OUT value
4300: --
4301: --x_interaction_id := l_interaction_id;
4302: x_interaction_id := l_interaction_rec.interaction_id;
4303:
4304: -- Post processing Call
4305:
4306: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'OPEN_INTERACTION', 'A', 'V') THEN
4307: JTF_IH_PUB_VUHK.open_interaction_post(p_interaction_rec=>l_interaction_rec,
4308: x_data=>l_data,
4309: x_count=>l_count,
4310: x_return_code=>l_return_code);
4303:
4304: -- Post processing Call
4305:
4306: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'OPEN_INTERACTION', 'A', 'V') THEN
4307: JTF_IH_PUB_VUHK.open_interaction_post(p_interaction_rec=>l_interaction_rec,
4308: x_data=>l_data,
4309: x_count=>l_count,
4310: x_return_code=>l_return_code);
4311: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
4314: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4315: END IF;
4316: END IF;
4317:
4318: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'OPEN_INTERACTION', 'A', 'C') THEN
4319: JTF_IH_PUB_CUHK.open_interaction_post(p_interaction_rec=>l_interaction_rec,
4320: x_data=>l_data,
4321: x_count=>l_count,
4322: x_return_code=>l_return_code);
4315: END IF;
4316: END IF;
4317:
4318: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'OPEN_INTERACTION', 'A', 'C') THEN
4319: JTF_IH_PUB_CUHK.open_interaction_post(p_interaction_rec=>l_interaction_rec,
4320: x_data=>l_data,
4321: x_count=>l_count,
4322: x_return_code=>l_return_code);
4323: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
4375: -- James Baldo Jr. 06-MAR-2001 Fix touchpoint2_type update issue. Based on bugdb # 1674610
4376: -- James Baldo Jr. 08-MAR-2001 Fix performance issue for multiple updates. Based on bugdb # 1676866
4377: -- and Mike Petrosino
4378: -- Igor Aleshin 18-DEC-2001 Fix for bugdb 2153913
4379: -- Igor Aleshin 20-DEC-2001 Fix for bugdb 2012159 - JTF_IH_PUB.UPDATE_INTERACTION MISSING
4380: -- CODE FOR OBJECT_VERSION_NUMBER PARAMETER.
4381: -- Igor Aleshin 20-MAY-2002 Modyfied duration calculation
4382: -- Igor Aleshin 06-17-2002 Fix for bugdb 2418028 - Close Interaction gives incorrect error
4383: -- Igor Aleshin 06-17-2002 Fix for bugdb 2418345 - Update_Interaction incorrectly
4467: SAVEPOINT update_interaction_pub;
4468:
4469: -- Preprocessing Call
4470: --l_interaction_rec_hk := p_interaction_rec;
4471: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_INTERACTION', 'B', 'C') THEN
4472: JTF_IH_PUB_CUHK.update_interaction_pre(
4473: --p_interaction_rec=>l_interaction_rec_hk,
4474: p_interaction_rec=>l_int_rec,
4475: x_data=>l_data,
4468:
4469: -- Preprocessing Call
4470: --l_interaction_rec_hk := p_interaction_rec;
4471: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_INTERACTION', 'B', 'C') THEN
4472: JTF_IH_PUB_CUHK.update_interaction_pre(
4473: --p_interaction_rec=>l_interaction_rec_hk,
4474: p_interaction_rec=>l_int_rec,
4475: x_data=>l_data,
4476: x_count=>l_count_hk,
4481: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4482: END IF;
4483: END IF;
4484:
4485: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_INTERACTION', 'B', 'V') THEN
4486: JTF_IH_PUB_VUHK.update_interaction_pre(
4487: --p_interaction_rec=>l_interaction_rec_hk,
4488: p_interaction_rec=>l_int_rec,
4489: x_data=>l_data,
4482: END IF;
4483: END IF;
4484:
4485: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_INTERACTION', 'B', 'V') THEN
4486: JTF_IH_PUB_VUHK.update_interaction_pre(
4487: --p_interaction_rec=>l_interaction_rec_hk,
4488: p_interaction_rec=>l_int_rec,
4489: x_data=>l_data,
4490: x_count=>l_count_hk,
4500: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version,
4501: l_api_name, g_pkg_name) THEN
4502: RAISE fnd_api.g_exc_unexpected_error;
4503: END IF;
4504: -- DBMS_OUTPUT.PUT_LINE('PAST fnd_api.compatible_api_call in JTF_IH_PUB.Update_Interaction');
4505:
4506: -- Initialize message list if p_init_msg_list is set to TRUE
4507: IF fnd_api.to_boolean(p_init_msg_list) THEN
4508: fnd_msg_pub.initialize;
4530: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
4531: RAISE fnd_api.g_exc_error;
4532: END IF;
4533: END IF;
4534: -- DBMS_OUTPUT.PUT_LINE('PAST jtf_ih_core_util_pvt.validate_who_info in JTF_IH_PUB.Update_Interaction');
4535:
4536: --
4537: -- Restore existing column values if manadatory paramaters passed are
4538: -- NULL or of FND_API.G_MISS types
5124: );
5125: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
5126: RAISE fnd_api.g_exc_error;
5127: END IF;
5128: -- DBMS_OUTPUT.PUT_LINE('PAST Validate_Interaction_Record in JTF_IH_PUB.Update_Interaction');
5129:
5130: -- 08/26/03 mpetrosi B3102306
5131: -- added cross check of source_code, source_code_id
5132: validate_source_code(l_api_name_full,l_int_rec.source_code_id, l_int_rec.source_code, l_return_status);
5210: Close c_Interaction_csr;
5211: --
5212: END IF;
5213: END IF;
5214: -- DBMS_OUTPUT.PUT_LINE('PAST update table jtf_ih_interactions in JTF_IH_PUB.Update_Interaction');
5215:
5216: -- DBMS_OUTPUT.PUT_LINE('PAST INSERT INTO jtf_ih_Interaction_inters in JTF_IH_PUB.Update_Interaction');
5217:
5218: -- Post processing Call
5212: END IF;
5213: END IF;
5214: -- DBMS_OUTPUT.PUT_LINE('PAST update table jtf_ih_interactions in JTF_IH_PUB.Update_Interaction');
5215:
5216: -- DBMS_OUTPUT.PUT_LINE('PAST INSERT INTO jtf_ih_Interaction_inters in JTF_IH_PUB.Update_Interaction');
5217:
5218: -- Post processing Call
5219:
5220: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_INTERACTION', 'A', 'V') THEN
5216: -- DBMS_OUTPUT.PUT_LINE('PAST INSERT INTO jtf_ih_Interaction_inters in JTF_IH_PUB.Update_Interaction');
5217:
5218: -- Post processing Call
5219:
5220: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_INTERACTION', 'A', 'V') THEN
5221: JTF_IH_PUB_VUHK.update_interaction_post(
5222: --p_interaction_rec=>l_interaction_rec_hk,
5223: p_interaction_rec=>l_int_rec,
5224: x_data=>l_data,
5217:
5218: -- Post processing Call
5219:
5220: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_INTERACTION', 'A', 'V') THEN
5221: JTF_IH_PUB_VUHK.update_interaction_post(
5222: --p_interaction_rec=>l_interaction_rec_hk,
5223: p_interaction_rec=>l_int_rec,
5224: x_data=>l_data,
5225: x_count=>l_count_hk,
5230: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5231: END IF;
5232: END IF;
5233:
5234: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_INTERACTION', 'A', 'C') THEN
5235: JTF_IH_PUB_CUHK.update_interaction_post(
5236: --p_interaction_rec=>l_interaction_rec_hk,
5237: p_interaction_rec=>l_int_rec,
5238: x_data=>l_data,
5231: END IF;
5232: END IF;
5233:
5234: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_INTERACTION', 'A', 'C') THEN
5235: JTF_IH_PUB_CUHK.update_interaction_post(
5236: --p_interaction_rec=>l_interaction_rec_hk,
5237: p_interaction_rec=>l_int_rec,
5238: x_data=>l_data,
5239: x_count=>l_count_hk,
5358:
5359: -- Preprocessing Call
5360: l_interaction_rec := p_interaction_rec;
5361:
5362: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CLOSE_INTERACTION', 'B', 'C') THEN
5363: JTF_IH_PUB_CUHK.close_interaction_pre(p_interaction_rec=>l_interaction_rec,
5364: x_data=>l_data,
5365: x_count=>l_count_hk,
5366: x_return_code=>l_return_code);
5359: -- Preprocessing Call
5360: l_interaction_rec := p_interaction_rec;
5361:
5362: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CLOSE_INTERACTION', 'B', 'C') THEN
5363: JTF_IH_PUB_CUHK.close_interaction_pre(p_interaction_rec=>l_interaction_rec,
5364: x_data=>l_data,
5365: x_count=>l_count_hk,
5366: x_return_code=>l_return_code);
5367: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
5370: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5371: END IF;
5372: END IF;
5373:
5374: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CLOSE_INTERACTION', 'B', 'V') THEN
5375: JTF_IH_PUB_VUHK.close_interaction_pre(p_interaction_rec=>l_interaction_rec,
5376: x_data=>l_data,
5377: x_count=>l_count_hk,
5378: x_return_code=>l_return_code);
5371: END IF;
5372: END IF;
5373:
5374: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CLOSE_INTERACTION', 'B', 'V') THEN
5375: JTF_IH_PUB_VUHK.close_interaction_pre(p_interaction_rec=>l_interaction_rec,
5376: x_data=>l_data,
5377: x_count=>l_count_hk,
5378: x_return_code=>l_return_code);
5379: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
5387: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version,
5388: l_api_name, g_pkg_name) THEN
5389: RAISE fnd_api.g_exc_unexpected_error;
5390: END IF;
5391: -- DBMS_OUTPUT.PUT_LINE('PAST fnd_api.compatible_api_call in JTF_IH_PUB.Close_Interaction');
5392:
5393: -- Initialize message list if p_init_msg_list is set to TRUE
5394: IF fnd_api.to_boolean(p_init_msg_list) THEN
5395: fnd_msg_pub.initialize;
5417: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
5418: RAISE fnd_api.g_exc_error;
5419: END IF;
5420: END IF;
5421: -- DBMS_OUTPUT.PUT_LINE('PAST jtf_ih_core_util_pvt.validate_who_info in JTF_IH_PUB.Close_Interaction');
5422: SELECT count(*) into l_count
5423: FROM jtf_ih_activities
5424: WHERE interaction_id = p_interaction_rec.interaction_id;
5425: -- DBMS_OUTPUT.PUT_LINE('lcount = ' || l_count);
5465: p_object_version);
5466: IF (x_return_status <> fnd_api.g_ret_sts_success) THEN
5467: RAISE fnd_api.g_exc_error;
5468: END IF;
5469: -- DBMS_OUTPUT.PUT_LINE('PAST Update_Interaction in JTF_IH_PUB.Close_Interaction');
5470:
5471: -- DBMS_OUTPUT.PUT_LINE('PAST validate at least one Activity per Interaction in JTF_IH_PUB.Close_Interaction');
5472: --SELECT outcome_id into l_outcome_id
5473: SELECT outcome_id into l_interaction_rec.outcome_id
5467: RAISE fnd_api.g_exc_error;
5468: END IF;
5469: -- DBMS_OUTPUT.PUT_LINE('PAST Update_Interaction in JTF_IH_PUB.Close_Interaction');
5470:
5471: -- DBMS_OUTPUT.PUT_LINE('PAST validate at least one Activity per Interaction in JTF_IH_PUB.Close_Interaction');
5472: --SELECT outcome_id into l_outcome_id
5473: SELECT outcome_id into l_interaction_rec.outcome_id
5474: FROM jtf_ih_interactions
5475: WHERE interaction_id = p_interaction_rec.interaction_id;
5662: END IF;
5663: UPDATE jtf_ih_activities SET ACTIVE = 'N',end_date_time = l_end_date_time
5664: WHERE activity_id = v_activity_id_c.activity_id;*/
5665: END LOOP;
5666: -- DBMS_OUTPUT.PUT_LINE('PAST Update ACTIVE in JTF_IH_PUB.Close_Interaction');
5667:
5668: -- Changed location by IAleshin
5669: -- Bug# 2418028
5670: -- Set active to 'N' for jtf_ih_interactions and related jtf_ih_activities
5682: WHERE interaction_id = p_interaction_rec.interaction_id;
5683:
5684: -- Post processing Call
5685:
5686: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CLOSE_INTERACTION', 'A', 'V') THEN
5687: JTF_IH_PUB_VUHK.close_interaction_post(p_interaction_rec=>l_interaction_rec,
5688: x_data=>l_data,
5689: x_count=>l_count_hk,
5690: x_return_code=>l_return_code);
5683:
5684: -- Post processing Call
5685:
5686: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CLOSE_INTERACTION', 'A', 'V') THEN
5687: JTF_IH_PUB_VUHK.close_interaction_post(p_interaction_rec=>l_interaction_rec,
5688: x_data=>l_data,
5689: x_count=>l_count_hk,
5690: x_return_code=>l_return_code);
5691: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
5694: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5695: END IF;
5696: END IF;
5697:
5698: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CLOSE_INTERACTION', 'A', 'C') THEN
5699: JTF_IH_PUB_CUHK.close_interaction_post(p_interaction_rec=>l_interaction_rec,
5700: x_data=>l_data,
5701: x_count=>l_count_hk,
5702: x_return_code=>l_return_code);
5695: END IF;
5696: END IF;
5697:
5698: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CLOSE_INTERACTION', 'A', 'C') THEN
5699: JTF_IH_PUB_CUHK.close_interaction_post(p_interaction_rec=>l_interaction_rec,
5700: x_data=>l_data,
5701: x_count=>l_count_hk,
5702: x_return_code=>l_return_code);
5703: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
5803: -- Standard start of API savepoint
5804: SAVEPOINT add_activity_pub;
5805: -- Preprocessing Call
5806: l_activity_rec := p_activity_rec;
5807: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'ADD_ACTIVITY', 'B', 'C') THEN
5808: JTF_IH_PUB_CUHK.add_activity_pre(p_activity_rec=>l_activity_rec,
5809: x_data=>l_data,
5810: x_count=>l_count,
5811: x_return_code=>l_return_code);
5804: SAVEPOINT add_activity_pub;
5805: -- Preprocessing Call
5806: l_activity_rec := p_activity_rec;
5807: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'ADD_ACTIVITY', 'B', 'C') THEN
5808: JTF_IH_PUB_CUHK.add_activity_pre(p_activity_rec=>l_activity_rec,
5809: x_data=>l_data,
5810: x_count=>l_count,
5811: x_return_code=>l_return_code);
5812: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
5815: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5816: END IF;
5817: END IF;
5818:
5819: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'ADD_ACTIVITY', 'B', 'V') THEN
5820: JTF_IH_PUB_VUHK.add_activity_pre(p_activity_rec=>l_activity_rec,
5821: x_data=>l_data,
5822: x_count=>l_count,
5823: x_return_code=>l_return_code);
5816: END IF;
5817: END IF;
5818:
5819: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'ADD_ACTIVITY', 'B', 'V') THEN
5820: JTF_IH_PUB_VUHK.add_activity_pre(p_activity_rec=>l_activity_rec,
5821: x_data=>l_data,
5822: x_count=>l_count,
5823: x_return_code=>l_return_code);
5824: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
5833: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version,
5834: l_api_name, g_pkg_name) THEN
5835: RAISE fnd_api.g_exc_unexpected_error;
5836: END IF;
5837: -- DBMS_OUTPUT.PUT_LINE('PAST fnd_api.compatible_api_call in JTF_IH_PUB.Add_Activity');
5838:
5839: -- Initialize message list if p_init_msg_list is set to TRUE
5840: IF fnd_api.to_boolean(p_init_msg_list) THEN
5841: fnd_msg_pub.initialize;
5863: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
5864: RAISE fnd_api.g_exc_error;
5865: END IF;
5866: END IF;
5867: -- DBMS_OUTPUT.PUT_LINE('PAST jtf_ih_core_util_pvt.validate_who_info in JTF_IH_PUB.Add_Activity');
5868:
5869: --
5870: -- Validate all non-missing attributes by calling the utility procedure.
5871: --
5878: );
5879: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
5880: RAISE fnd_api.g_exc_error;
5881: END IF;
5882: -- DBMS_OUTPUT.PUT_LINE('PAST Validate_Activity_Record in JTF_IH_PUB.Add_Activity');
5883:
5884: -- Bug# 4477761
5885: -- Setting the Active status of the activity rec
5886: -- based on the fact whether the Interaction it is
6069: decode( p_activity_rec.script_trans_id, fnd_api.g_miss_num, null, p_activity_rec.script_trans_id),
6070: decode( p_activity_rec.role, fnd_api.g_miss_char, null, p_activity_rec.role)
6071: -- ,l_activity_rec.resource_id
6072: );
6073: -- DBMS_OUTPUT.PUT_LINE('PAST INSERT INTO jtf_ih_activities in JTF_IH_PUB.Add_Activity');
6074:
6075: --
6076: -- Set OUT value
6077: --
6079: x_activity_id := l_activity_rec.activity_id;
6080:
6081: -- Post processing Call
6082:
6083: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'ADD_ACTIVITY', 'A', 'V') THEN
6084: JTF_IH_PUB_VUHK.add_activity_post(p_activity_rec=>l_activity_rec,
6085: x_data=>l_data,
6086: x_count=>l_count,
6087: x_return_code=>l_return_code);
6080:
6081: -- Post processing Call
6082:
6083: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'ADD_ACTIVITY', 'A', 'V') THEN
6084: JTF_IH_PUB_VUHK.add_activity_post(p_activity_rec=>l_activity_rec,
6085: x_data=>l_data,
6086: x_count=>l_count,
6087: x_return_code=>l_return_code);
6088: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
6091: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6092: END IF;
6093: END IF;
6094:
6095: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'ADD_ACTIVITY', 'A', 'C') THEN
6096: JTF_IH_PUB_CUHK.add_activity_post(p_activity_rec=>l_activity_rec,
6097: x_data=>l_data,
6098: x_count=>l_count,
6099: x_return_code=>l_return_code);
6092: END IF;
6093: END IF;
6094:
6095: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'ADD_ACTIVITY', 'A', 'C') THEN
6096: JTF_IH_PUB_CUHK.add_activity_post(p_activity_rec=>l_activity_rec,
6097: x_data=>l_data,
6098: x_count=>l_count,
6099: x_return_code=>l_return_code);
6100: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
6252: SAVEPOINT update_activity_pub;
6253:
6254: -- Preprocessing Call
6255: l_activity_rec := p_activity_rec;
6256: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_ACTIVITY', 'B', 'C') THEN
6257: JTF_IH_PUB_CUHK.update_activity_pre(p_activity_rec=>l_activity_rec,
6258: x_data=>l_data,
6259: x_count=>l_count_hk,
6260: x_return_code=>l_return_code);
6253:
6254: -- Preprocessing Call
6255: l_activity_rec := p_activity_rec;
6256: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_ACTIVITY', 'B', 'C') THEN
6257: JTF_IH_PUB_CUHK.update_activity_pre(p_activity_rec=>l_activity_rec,
6258: x_data=>l_data,
6259: x_count=>l_count_hk,
6260: x_return_code=>l_return_code);
6261: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
6264: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6265: END IF;
6266: END IF;
6267:
6268: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_ACTIVITY', 'B', 'V') THEN
6269: JTF_IH_PUB_VUHK.update_activity_pre(p_activity_rec=>l_activity_rec,
6270: x_data=>l_data,
6271: x_count=>l_count,
6272: x_return_code=>l_return_code);
6265: END IF;
6266: END IF;
6267:
6268: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_ACTIVITY', 'B', 'V') THEN
6269: JTF_IH_PUB_VUHK.update_activity_pre(p_activity_rec=>l_activity_rec,
6270: x_data=>l_data,
6271: x_count=>l_count,
6272: x_return_code=>l_return_code);
6273: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
6281: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version,
6282: l_api_name, g_pkg_name) THEN
6283: RAISE fnd_api.g_exc_unexpected_error;
6284: END IF;
6285: -- DBMS_OUTPUT.PUT_LINE('PAST fnd_api.compatible_api_call in JTF_IH_PUB.Update_Activity');
6286:
6287: -- Initialize message list if p_init_msg_list is set to TRUE
6288: IF fnd_api.to_boolean(p_init_msg_list) THEN
6289: fnd_msg_pub.initialize;
6311: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
6312: RAISE fnd_api.g_exc_error;
6313: END IF;
6314: END IF;
6315: -- DBMS_OUTPUT.PUT_LINE('PAST jtf_ih_core_util_pvt.validate_who_info in JTF_IH_PUB.Update_Activity');
6316:
6317: --
6318: -- Validate all non-missing attributes by calling the utility procedure.
6319: --
6326: );
6327: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
6328: RAISE fnd_api.g_exc_error;
6329: END IF;
6330: -- DBMS_OUTPUT.PUT_LINE('PAST Validate_Activity_Record in JTF_IH_PUB.Update_Activity');
6331:
6332: --
6333: -- Update table JTF_IH_INTERACTIONS
6334: --
6824: RAISE fnd_api.g_exc_error ;
6825: END IF;
6826: END IF;
6827: END IF;
6828: -- DBMS_OUTPUT.PUT_LINE('PAST update table jtf_ih_activities in JTF_IH_PUB.Update_Activity');
6829:
6830: -- Post processing Call
6831:
6832: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_ACTIVITY', 'A', 'V') THEN
6828: -- DBMS_OUTPUT.PUT_LINE('PAST update table jtf_ih_activities in JTF_IH_PUB.Update_Activity');
6829:
6830: -- Post processing Call
6831:
6832: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_ACTIVITY', 'A', 'V') THEN
6833: JTF_IH_PUB_VUHK.update_activity_post(p_activity_rec=>l_activity_rec,
6834: x_data=>l_data,
6835: x_count=>l_count_hk,
6836: x_return_code=>l_return_code);
6829:
6830: -- Post processing Call
6831:
6832: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_ACTIVITY', 'A', 'V') THEN
6833: JTF_IH_PUB_VUHK.update_activity_post(p_activity_rec=>l_activity_rec,
6834: x_data=>l_data,
6835: x_count=>l_count_hk,
6836: x_return_code=>l_return_code);
6837: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
6840: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6841: END IF;
6842: END IF;
6843:
6844: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_ACTIVITY', 'A', 'C') THEN
6845: JTF_IH_PUB_CUHK.update_activity_post(p_activity_rec=>l_activity_rec,
6846: x_data=>l_data,
6847: x_count=>l_count_hk,
6848: x_return_code=>l_return_code);
6841: END IF;
6842: END IF;
6843:
6844: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_ACTIVITY', 'A', 'C') THEN
6845: JTF_IH_PUB_CUHK.update_activity_post(p_activity_rec=>l_activity_rec,
6846: x_data=>l_data,
6847: x_count=>l_count_hk,
6848: x_return_code=>l_return_code);
6849: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
6958: l_active_perf := 'N';
6959:
6960: -- Preprocessing Call
6961: l_interaction_id := p_interaction_id;
6962: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CLOSE_INTERACTION', 'B', 'C') THEN
6963: JTF_IH_PUB_CUHK.close_interaction_pre(p_interaction_id=>l_interaction_id,
6964: x_data=>l_data,
6965: x_count=>l_count_hk,
6966: x_return_code=>l_return_code);
6959:
6960: -- Preprocessing Call
6961: l_interaction_id := p_interaction_id;
6962: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CLOSE_INTERACTION', 'B', 'C') THEN
6963: JTF_IH_PUB_CUHK.close_interaction_pre(p_interaction_id=>l_interaction_id,
6964: x_data=>l_data,
6965: x_count=>l_count_hk,
6966: x_return_code=>l_return_code);
6967: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
6970: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6971: END IF;
6972: END IF;
6973:
6974: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CLOSE_INTERACTION', 'B', 'V') THEN
6975: JTF_IH_PUB_VUHK.close_interaction_pre(p_interaction_id=>l_interaction_id,
6976: x_data=>l_data,
6977: x_count=>l_count_hk,
6978: x_return_code=>l_return_code);
6971: END IF;
6972: END IF;
6973:
6974: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CLOSE_INTERACTION', 'B', 'V') THEN
6975: JTF_IH_PUB_VUHK.close_interaction_pre(p_interaction_id=>l_interaction_id,
6976: x_data=>l_data,
6977: x_count=>l_count_hk,
6978: x_return_code=>l_return_code);
6979: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
6987: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version,
6988: l_api_name, g_pkg_name) THEN
6989: RAISE fnd_api.g_exc_unexpected_error;
6990: END IF;
6991: -- DBMS_OUTPUT.PUT_LINE('PAST fnd_api.compatible_api_call in JTF_IH_PUB.Close_Interaction_2');
6992:
6993: -- Initialize message list if p_init_msg_list is set to TRUE
6994: IF fnd_api.to_boolean(p_init_msg_list) THEN
6995: fnd_msg_pub.initialize;
7017: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
7018: RAISE fnd_api.g_exc_error;
7019: END IF;
7020: END IF;
7021: -- DBMS_OUTPUT.PUT_LINE('PAST jtf_ih_core_util_pvt.validate_who_info in JTF_IH_PUB.Close_Interaction_2');
7022:
7023: SELECT outcome_id, end_date_time, start_date_time, duration
7024: INTO l_outcome_id, l_end_date_time, l_start_date_time, l_duration
7025: FROM jtf_ih_interactions
7157:
7158: UPDATE jtf_ih_activities SET ACTIVE = 'N',end_date_time = l_end_date_time, duration = l_duration
7159: WHERE interaction_id = p_interaction_id;*/
7160: END LOOP;
7161: -- DBMS_OUTPUT.PUT_LINE('PAST Update ACTIVE in JTF_IH_PUB.Close_Interaction_2');
7162:
7163: -- Bug# 2418345
7164: --
7165: -- Set active to 'N' for jtf_ih_interactions and related jtf_ih_activities
7170: WHERE interaction_id = p_interaction_id;
7171:
7172: -- Post processing Call
7173:
7174: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CLOSE_INTERACTION', 'A', 'V') THEN
7175: JTF_IH_PUB_VUHK.close_interaction_post(p_interaction_id=>l_interaction_id,
7176: x_data=>l_data,
7177: x_count=>l_count_hk,
7178: x_return_code=>l_return_code);
7171:
7172: -- Post processing Call
7173:
7174: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CLOSE_INTERACTION', 'A', 'V') THEN
7175: JTF_IH_PUB_VUHK.close_interaction_post(p_interaction_id=>l_interaction_id,
7176: x_data=>l_data,
7177: x_count=>l_count_hk,
7178: x_return_code=>l_return_code);
7179: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
7182: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7183: END IF;
7184: END IF;
7185:
7186: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CLOSE_INTERACTION', 'A', 'C') THEN
7187: JTF_IH_PUB_CUHK.close_interaction_post(p_interaction_id=>l_interaction_id,
7188: x_data=>l_data,
7189: x_count=>l_count_hk,
7190: x_return_code=>l_return_code);
7183: END IF;
7184: END IF;
7185:
7186: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CLOSE_INTERACTION', 'A', 'C') THEN
7187: JTF_IH_PUB_CUHK.close_interaction_post(p_interaction_id=>l_interaction_id,
7188: x_data=>l_data,
7189: x_count=>l_count_hk,
7190: x_return_code=>l_return_code);
7191: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
7305: l_duration := p_duration;
7306:
7307:
7308: -- Preprocessing Call
7309: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_ACTIVITYDURATION', 'B', 'C') THEN
7310: JTF_IH_PUB_CUHK.update_actduration_pre(
7311: p_activity_id=>l_activity_id,
7312: p_end_date_time=>l_end_date_time,
7313: p_duration=>l_duration,
7306:
7307:
7308: -- Preprocessing Call
7309: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_ACTIVITYDURATION', 'B', 'C') THEN
7310: JTF_IH_PUB_CUHK.update_actduration_pre(
7311: p_activity_id=>l_activity_id,
7312: p_end_date_time=>l_end_date_time,
7313: p_duration=>l_duration,
7314: x_data=>l_data,
7320: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7321: END IF;
7322: END IF;
7323:
7324: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_ACTIVITYDURATION', 'B', 'V') THEN
7325: JTF_IH_PUB_VUHK.update_actduration_pre(
7326: p_activity_id=>l_activity_id,
7327: p_end_date_time=>l_end_date_time,
7328: p_duration=>l_duration,
7321: END IF;
7322: END IF;
7323:
7324: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_ACTIVITYDURATION', 'B', 'V') THEN
7325: JTF_IH_PUB_VUHK.update_actduration_pre(
7326: p_activity_id=>l_activity_id,
7327: p_end_date_time=>l_end_date_time,
7328: p_duration=>l_duration,
7329: x_data=>l_data,
7341: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version,
7342: l_api_name, g_pkg_name) THEN
7343: RAISE fnd_api.g_exc_unexpected_error;
7344: END IF;
7345: --DBMS_OUTPUT.PUT_LINE('PAST fnd_api.compatible_api_call in JTF_IH_PUB.Update_ActivityDuration');
7346:
7347: -- Initialize message list if p_init_msg_list is set to TRUE
7348: IF fnd_api.to_boolean(p_init_msg_list) THEN
7349: fnd_msg_pub.initialize;
7371: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
7372: RAISE fnd_api.g_exc_error;
7373: END IF;
7374: END IF;
7375: --DBMS_OUTPUT.PUT_LINE('PAST jtf_ih_core_util_pvt.validate_who_info in JTF_IH_PUB.Update_ActivityDuration');
7376:
7377: --
7378: -- Get the current activity values
7379: --
7408: );
7409: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
7410: RAISE fnd_api.g_exc_error;
7411: END IF;
7412: -- DBMS_OUTPUT.PUT_LINE('PAST Validate_StartEnd_Date in JTF_IH_PUB.Update_ActivityDuration');
7413: END IF;
7414: END IF;
7415:
7416: -- Bug# 2656975 Determine how the duration is to be updated - RDD
7429: UPDATE jtf_ih_activities SET END_DATE_TIME = l_end_date_time,
7430: DURATION = l_duration,
7431: OBJECT_VERSION_NUMBER = p_object_version
7432: WHERE activity_id = p_activity_id;
7433: -- DBMS_OUTPUT.PUT_LINE('PAST update end_date_time and duration in JTF_IH_PUB.Update_ActivityDuration');
7434:
7435: -- Post processing Call
7436:
7437: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_ACTIVITYDURATION', 'A', 'V') THEN
7433: -- DBMS_OUTPUT.PUT_LINE('PAST update end_date_time and duration in JTF_IH_PUB.Update_ActivityDuration');
7434:
7435: -- Post processing Call
7436:
7437: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_ACTIVITYDURATION', 'A', 'V') THEN
7438: JTF_IH_PUB_VUHK.update_actduration_post(
7439: p_activity_id=>l_activity_id,
7440: p_end_date_time=>l_end_date_time,
7441: p_duration=>l_duration,
7434:
7435: -- Post processing Call
7436:
7437: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_ACTIVITYDURATION', 'A', 'V') THEN
7438: JTF_IH_PUB_VUHK.update_actduration_post(
7439: p_activity_id=>l_activity_id,
7440: p_end_date_time=>l_end_date_time,
7441: p_duration=>l_duration,
7442: x_data=>l_data,
7448: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7449: END IF;
7450: END IF;
7451:
7452: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_ACTIVITYDURATION', 'A', 'C') THEN
7453: JTF_IH_PUB_CUHK.update_actduration_post(
7454: p_activity_id=>l_activity_id,
7455: p_end_date_time=>l_end_date_time,
7456: p_duration=>l_duration,
7449: END IF;
7450: END IF;
7451:
7452: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_ACTIVITYDURATION', 'A', 'C') THEN
7453: JTF_IH_PUB_CUHK.update_actduration_post(
7454: p_activity_id=>l_activity_id,
7455: p_end_date_time=>l_end_date_time,
7456: p_duration=>l_duration,
7457: x_data=>l_data,
7567: SAVEPOINT open_mediaitem_pub;
7568:
7569: -- Preprocessing Call
7570: l_media_rec := p_media_rec;
7571: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'OPEN_MEDIAITEM', 'B', 'C') THEN
7572: JTF_IH_PUB_CUHK.open_mediaitem_pre(p_media_rec=>l_media_rec,
7573: x_data=>l_data,
7574: x_count=>l_count,
7575: x_return_code=>l_return_code);
7568:
7569: -- Preprocessing Call
7570: l_media_rec := p_media_rec;
7571: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'OPEN_MEDIAITEM', 'B', 'C') THEN
7572: JTF_IH_PUB_CUHK.open_mediaitem_pre(p_media_rec=>l_media_rec,
7573: x_data=>l_data,
7574: x_count=>l_count,
7575: x_return_code=>l_return_code);
7576: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
7579: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7580: END IF;
7581: END IF;
7582:
7583: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'OPEN_MEDIAITEM', 'B', 'V') THEN
7584: JTF_IH_PUB_VUHK.open_mediaitem_pre(p_media_rec=>l_media_rec,
7585: x_data=>l_data,
7586: x_count=>l_count,
7587: x_return_code=>l_return_code);
7580: END IF;
7581: END IF;
7582:
7583: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'OPEN_MEDIAITEM', 'B', 'V') THEN
7584: JTF_IH_PUB_VUHK.open_mediaitem_pre(p_media_rec=>l_media_rec,
7585: x_data=>l_data,
7586: x_count=>l_count,
7587: x_return_code=>l_return_code);
7588: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
7597: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version,
7598: l_api_name, g_pkg_name) THEN
7599: RAISE fnd_api.g_exc_unexpected_error;
7600: END IF;
7601: -- DBMS_OUTPUT.PUT_LINE('PAST fnd_api.compatible_api_call in JTF_IH_PUB.Open_MediaItem');
7602:
7603: -- Initialize message list if p_init_msg_list is set to TRUE
7604: IF fnd_api.to_boolean(p_init_msg_list) THEN
7605: fnd_msg_pub.initialize;
7627: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
7628: RAISE fnd_api.g_exc_error;
7629: END IF;
7630: END IF;
7631: -- DBMS_OUTPUT.PUT_LINE('PAST jtf_ih_core_util_pvt.validate_who_info in JTF_IH_PUB.Open_MediaItem');
7632:
7633: --
7634: -- Validate all non-missing attributes by calling the utility procedure.
7635: --
7642: );
7643: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
7644: RAISE fnd_api.g_exc_error;
7645: END IF;
7646: -- DBMS_OUTPUT.PUT_LINE('PAST Validate_MediaItem_Record in JTF_IH_PUB.Open_MediaItem');
7647:
7648: -- Bug# 2153913
7649: -- Assign the end_date_time
7650: IF (p_media_rec.end_date_time <> fnd_api.g_miss_date) THEN
7775: decode( l_media_rec.address, fnd_api.g_miss_char, null, l_media_rec.address),
7776: l_ao_update_pending_perf,
7777: l_soft_closed_perf
7778: );
7779: -- DBMS_OUTPUT.PUT_LINE('PAST INSERT INTO jtf_ih_media_items in JTF_IH_PUB.Open_MediaItem');
7780:
7781:
7782: --
7783: -- Set OUT value
7786: x_media_id := l_media_rec.media_id;
7787:
7788: -- Post processing Call
7789:
7790: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'OPEN_MEDIAITEM', 'A', 'V') THEN
7791: JTF_IH_PUB_VUHK.open_mediaitem_post(p_media_rec=>l_media_rec,
7792: x_data=>l_data,
7793: x_count=>l_count,
7794: x_return_code=>l_return_code);
7787:
7788: -- Post processing Call
7789:
7790: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'OPEN_MEDIAITEM', 'A', 'V') THEN
7791: JTF_IH_PUB_VUHK.open_mediaitem_post(p_media_rec=>l_media_rec,
7792: x_data=>l_data,
7793: x_count=>l_count,
7794: x_return_code=>l_return_code);
7795: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
7798: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7799: END IF;
7800: END IF;
7801:
7802: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'OPEN_MEDIAITEM', 'A', 'C') THEN
7803: JTF_IH_PUB_CUHK.open_mediaitem_post(p_media_rec=>l_media_rec,
7804: x_data=>l_data,
7805: x_count=>l_count,
7806: x_return_code=>l_return_code);
7799: END IF;
7800: END IF;
7801:
7802: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'OPEN_MEDIAITEM', 'A', 'C') THEN
7803: JTF_IH_PUB_CUHK.open_mediaitem_post(p_media_rec=>l_media_rec,
7804: x_data=>l_data,
7805: x_count=>l_count,
7806: x_return_code=>l_return_code);
7807: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
7927: SAVEPOINT update_mediaitem_pub;
7928:
7929: -- Preprocessing Call
7930: --l_media_rec_hk := p_media_rec;
7931: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_MEDIAITEM', 'B', 'C') THEN
7932: JTF_IH_PUB_CUHK.update_mediaitem_pre(
7933: --p_media_rec=>l_media_rec_hk,
7934: p_media_rec=>l_media_rec,
7935: x_data=>l_data,
7928:
7929: -- Preprocessing Call
7930: --l_media_rec_hk := p_media_rec;
7931: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_MEDIAITEM', 'B', 'C') THEN
7932: JTF_IH_PUB_CUHK.update_mediaitem_pre(
7933: --p_media_rec=>l_media_rec_hk,
7934: p_media_rec=>l_media_rec,
7935: x_data=>l_data,
7936: x_count=>l_count,
7941: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7942: END IF;
7943: END IF;
7944:
7945: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_MEDIAITEM', 'B', 'V') THEN
7946: JTF_IH_PUB_VUHK.update_mediaitem_pre(
7947: --p_media_rec=>l_media_rec_hk,
7948: p_media_rec=>l_media_rec,
7949: x_data=>l_data,
7942: END IF;
7943: END IF;
7944:
7945: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_MEDIAITEM', 'B', 'V') THEN
7946: JTF_IH_PUB_VUHK.update_mediaitem_pre(
7947: --p_media_rec=>l_media_rec_hk,
7948: p_media_rec=>l_media_rec,
7949: x_data=>l_data,
7950: x_count=>l_count,
7962: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version,
7963: l_api_name, g_pkg_name) THEN
7964: RAISE fnd_api.g_exc_unexpected_error;
7965: END IF;
7966: -- DBMS_OUTPUT.PUT_LINE('PAST fnd_api.compatible_api_call in JTF_IH_PUB.Update_MediaItem');
7967:
7968: -- Initialize message list if p_init_msg_list is set to TRUE
7969: IF fnd_api.to_boolean(p_init_msg_list) THEN
7970: fnd_msg_pub.initialize;
7992: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
7993: RAISE fnd_api.g_exc_error;
7994: END IF;
7995: END IF;
7996: -- DBMS_OUTPUT.PUT_LINE('PAST jtf_ih_core_util_pvt.validate_who_info in JTF_IH_PUB.Update_MediaItem');
7997:
7998:
7999: OPEN c_MediaItem_csr;
8000: FETCH c_MediaItem_csr INTO l_MediaItem_rec;
8259: );
8260: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
8261: RAISE fnd_api.g_exc_error;
8262: END IF;
8263: -- DBMS_OUTPUT.PUT_LINE('PAST Validate_MediaItem_Record in JTF_IH_PUB.Update_MediaItem');
8264:
8265: UPDATE JTF_IH_MEDIA_ITEMS
8266: SET source_id = l_media_rec.source_id,
8267: direction = l_media_rec.direction,
8298: --
8299:
8300: -- Post processing Call
8301:
8302: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_MEDIAITEM', 'A', 'V') THEN
8303: JTF_IH_PUB_VUHK.update_mediaitem_post(
8304: --p_media_rec=>l_media_rec_hk,
8305: p_media_rec=>l_media_rec,
8306: x_data=>l_data,
8299:
8300: -- Post processing Call
8301:
8302: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_MEDIAITEM', 'A', 'V') THEN
8303: JTF_IH_PUB_VUHK.update_mediaitem_post(
8304: --p_media_rec=>l_media_rec_hk,
8305: p_media_rec=>l_media_rec,
8306: x_data=>l_data,
8307: x_count=>l_count,
8312: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8313: END IF;
8314: END IF;
8315:
8316: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_MEDIAITEM', 'A', 'C') THEN
8317: JTF_IH_PUB_CUHK.update_mediaitem_post(
8318: --p_media_rec=>l_media_rec_hk,
8319: p_media_rec=>l_media_rec,
8320: x_data=>l_data,
8313: END IF;
8314: END IF;
8315:
8316: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_MEDIAITEM', 'A', 'C') THEN
8317: JTF_IH_PUB_CUHK.update_mediaitem_post(
8318: --p_media_rec=>l_media_rec_hk,
8319: p_media_rec=>l_media_rec,
8320: x_data=>l_data,
8321: x_count=>l_count,
8443: l_soft_closed_perf := 'Y';
8444:
8445: -- Preprocessing Call
8446: l_media_rec := p_media_rec;
8447: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CLOSE_MEDIAITEM', 'B', 'C') THEN
8448: JTF_IH_PUB_CUHK.close_mediaitem_pre(
8449: p_media_rec=>l_media_rec,
8450: x_data=>l_data,
8451: x_count=>l_count_hk,
8444:
8445: -- Preprocessing Call
8446: l_media_rec := p_media_rec;
8447: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CLOSE_MEDIAITEM', 'B', 'C') THEN
8448: JTF_IH_PUB_CUHK.close_mediaitem_pre(
8449: p_media_rec=>l_media_rec,
8450: x_data=>l_data,
8451: x_count=>l_count_hk,
8452: x_return_code=>l_return_code);
8456: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8457: END IF;
8458: END IF;
8459:
8460: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CLOSE_MEDIAITEM', 'B', 'V') THEN
8461: JTF_IH_PUB_VUHK.close_mediaitem_pre(
8462: p_media_rec=>l_media_rec,
8463: x_data=>l_data,
8464: x_count=>l_count_hk,
8457: END IF;
8458: END IF;
8459:
8460: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CLOSE_MEDIAITEM', 'B', 'V') THEN
8461: JTF_IH_PUB_VUHK.close_mediaitem_pre(
8462: p_media_rec=>l_media_rec,
8463: x_data=>l_data,
8464: x_count=>l_count_hk,
8465: x_return_code=>l_return_code);
8475: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version,
8476: l_api_name, g_pkg_name) THEN
8477: RAISE fnd_api.g_exc_unexpected_error;
8478: END IF;
8479: -- DBMS_OUTPUT.PUT_LINE('PAST fnd_api.compatible_api_call in JTF_IH_PUB.Close_MediaItem');
8480:
8481: -- Initialize message list if p_init_msg_list is set to TRUE
8482: IF fnd_api.to_boolean(p_init_msg_list) THEN
8483: fnd_msg_pub.initialize;
8545: p_object_version);
8546: IF (x_return_status <> fnd_api.g_ret_sts_success) THEN
8547: RAISE fnd_api.g_exc_error;
8548: END IF;
8549: -- DBMS_OUTPUT.PUT_LINE('PAST Update_MediaItem in JTF_IH_PUB.Close_MediaItem');
8550: --
8551: -- Enh# 3491849
8552: --
8553: IF l_direction = 'OUTBOUND' AND l_media_item_type = 'TELEPHONE' THEN
8598: WHERE milcs_id = cur_Milcs.milcs_id;
8599: END LOOP;
8600: -- Post processing Call
8601:
8602: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CLOSE_MEDIAITEM', 'A', 'V') THEN
8603: JTF_IH_PUB_VUHK.close_mediaitem_post(p_media_rec=>l_media_rec,
8604: x_data=>l_data,
8605: x_count=>l_count_hk,
8606: x_return_code=>l_return_code);
8599: END LOOP;
8600: -- Post processing Call
8601:
8602: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CLOSE_MEDIAITEM', 'A', 'V') THEN
8603: JTF_IH_PUB_VUHK.close_mediaitem_post(p_media_rec=>l_media_rec,
8604: x_data=>l_data,
8605: x_count=>l_count_hk,
8606: x_return_code=>l_return_code);
8607: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
8610: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8611: END IF;
8612: END IF;
8613:
8614: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CLOSE_MEDIAITEM', 'A', 'C') THEN
8615: JTF_IH_PUB_CUHK.close_mediaitem_post(p_media_rec=>l_media_rec,
8616: x_data=>l_data,
8617: x_count=>l_count_hk,
8618: x_return_code=>l_return_code);
8611: END IF;
8612: END IF;
8613:
8614: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'CLOSE_MEDIAITEM', 'A', 'C') THEN
8615: JTF_IH_PUB_CUHK.close_mediaitem_post(p_media_rec=>l_media_rec,
8616: x_data=>l_data,
8617: x_count=>l_count_hk,
8618: x_return_code=>l_return_code);
8619: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
8723: SAVEPOINT open_medialifecycle_pub;
8724:
8725: -- Preprocessing Call
8726: --l_media_lc_rec_hk := p_media_lc_rec;
8727: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'ADD_MEDIALIFECYCLE', 'B', 'C') THEN
8728: JTF_IH_PUB_CUHK.add_medialifecycle_pre(
8729: --p_media_lc_rec=>l_media_lc_rec_hk,
8730: p_media_lc_rec=>l_media_lc_rec,
8731: x_data=>l_data,
8724:
8725: -- Preprocessing Call
8726: --l_media_lc_rec_hk := p_media_lc_rec;
8727: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'ADD_MEDIALIFECYCLE', 'B', 'C') THEN
8728: JTF_IH_PUB_CUHK.add_medialifecycle_pre(
8729: --p_media_lc_rec=>l_media_lc_rec_hk,
8730: p_media_lc_rec=>l_media_lc_rec,
8731: x_data=>l_data,
8732: x_count=>l_count,
8737: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8738: END IF;
8739: END IF;
8740:
8741: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'ADD_MEDIALIFECYCLE', 'B', 'V') THEN
8742: JTF_IH_PUB_VUHK.add_medialifecycle_pre(
8743: --p_media_lc_rec=>l_media_lc_rec_hk,
8744: p_media_lc_rec=>l_media_lc_rec,
8745: x_data=>l_data,
8738: END IF;
8739: END IF;
8740:
8741: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'ADD_MEDIALIFECYCLE', 'B', 'V') THEN
8742: JTF_IH_PUB_VUHK.add_medialifecycle_pre(
8743: --p_media_lc_rec=>l_media_lc_rec_hk,
8744: p_media_lc_rec=>l_media_lc_rec,
8745: x_data=>l_data,
8746: x_count=>l_count,
8758: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version,
8759: l_api_name, g_pkg_name) THEN
8760: RAISE fnd_api.g_exc_unexpected_error;
8761: END IF;
8762: -- DBMS_OUTPUT.PUT_LINE('PAST fnd_api.compatible_api_call in JTF_IH_PUB.Add_MediaLifeCycle');
8763: --
8764: -- Initialize message list if p_init_msg_list is set to TRUE
8765: --
8766: IF fnd_api.to_boolean(p_init_msg_list) THEN
8790: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
8791: RAISE fnd_api.g_exc_error;
8792: END IF;
8793: END IF;
8794: -- DBMS_OUTPUT.PUT_LINE('PAST jtf_ih_core_util_pvt.validate_who_info in JTF_IH_PUB.Add_MediaLifeCycle');
8795:
8796: --
8797: -- Validate all non-missing attributes by calling the utility procedure.
8798: --
8805: );
8806: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
8807: RAISE fnd_api.g_exc_error;
8808: END IF;
8809: -- DBMS_OUTPUT.PUT_LINE('PAST Validate_Media_LC_Record in JTF_IH_PUB.Add_MediaLifeCycle');
8810: -- assign milcs_type_id if not supplied
8811: -- since milcs_code has been validate previously no checking is required.
8812: IF ((p_media_lc_rec.milcs_type_id IS NULL) OR (p_media_lc_rec.milcs_type_id = fnd_api.g_miss_num)) THEN
8813: select milcs_type_id
8864: --l_duration := ROUND((l_end_date_time - l_start_date_time)*24*60*60);
8865: l_media_lc_rec.duration := ROUND((l_media_lc_rec.end_date_time - l_media_lc_rec.start_date_time)*24*60*60);
8866: END IF;
8867:
8868: -- DBMS_OUTPUT.PUT_LINE('PAST assign the duration in JTF_IH_PUB.Add_MediaLifeCycle');
8869:
8870: -- Bug# 2817083
8871: --SELECT JTF_IH_MEDIA_ITEM_LC_SEG_S1.NextVal into l_milcs_id FROM dual;
8872: -- DBMS_OUTPUT.PUT_LINE('PAST generated sequence JTF_IH_PUB.Add_MediaLifeCycle milcs := ' || l_milcs_id);
8868: -- DBMS_OUTPUT.PUT_LINE('PAST assign the duration in JTF_IH_PUB.Add_MediaLifeCycle');
8869:
8870: -- Bug# 2817083
8871: --SELECT JTF_IH_MEDIA_ITEM_LC_SEG_S1.NextVal into l_milcs_id FROM dual;
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
8915: l_media_lc_rec.handler_id,
8916: decode(l_media_lc_rec.resource_id,fnd_api.g_miss_num, null, l_media_lc_rec.resource_id),
8917: l_active
8918: );
8919: -- DBMS_OUTPUT.PUT_LINE('PAST INSERT INTO Validate_Media_LC_Record in JTF_IH_PUB.Add_MediaLifeCycle');
8920:
8921: --
8922: -- Set OUT value
8923: --
8925: x_milcs_id := l_media_lc_rec.milcs_id;
8926:
8927: -- Post processing Call
8928:
8929: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'ADD_MEDIALIFECYCLE', 'A', 'V') THEN
8930: JTF_IH_PUB_VUHK.add_medialifecycle_post(
8931: --p_media_lc_rec=>l_media_lc_rec_hk,
8932: p_media_lc_rec=>l_media_lc_rec,
8933: x_data=>l_data,
8926:
8927: -- Post processing Call
8928:
8929: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'ADD_MEDIALIFECYCLE', 'A', 'V') THEN
8930: JTF_IH_PUB_VUHK.add_medialifecycle_post(
8931: --p_media_lc_rec=>l_media_lc_rec_hk,
8932: p_media_lc_rec=>l_media_lc_rec,
8933: x_data=>l_data,
8934: x_count=>l_count,
8939: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8940: END IF;
8941: END IF;
8942:
8943: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'ADD_MEDIALIFECYCLE', 'A', 'C') THEN
8944: JTF_IH_PUB_CUHK.add_medialifecycle_post(
8945: --p_media_lc_rec=>l_media_lc_rec_hk,
8946: p_media_lc_rec=>l_media_lc_rec,
8947: x_data=>l_data,
8940: END IF;
8941: END IF;
8942:
8943: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'ADD_MEDIALIFECYCLE', 'A', 'C') THEN
8944: JTF_IH_PUB_CUHK.add_medialifecycle_post(
8945: --p_media_lc_rec=>l_media_lc_rec_hk,
8946: p_media_lc_rec=>l_media_lc_rec,
8947: x_data=>l_data,
8948: x_count=>l_count,
9069: SAVEPOINT update_medialifecycle_pub;
9070:
9071: -- Preprocessing Call
9072: --l_media_lc_rec_hk := p_media_lc_rec;
9073: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_MEDIALIFECYCLE', 'B', 'C') THEN
9074: JTF_IH_PUB_CUHK.update_medialifecycle_pre(
9075: --p_media_lc_rec=>l_media_lc_rec_hk,
9076: p_media_lc_rec=>l_media_lc_rec,
9077: x_data=>l_data,
9070:
9071: -- Preprocessing Call
9072: --l_media_lc_rec_hk := p_media_lc_rec;
9073: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_MEDIALIFECYCLE', 'B', 'C') THEN
9074: JTF_IH_PUB_CUHK.update_medialifecycle_pre(
9075: --p_media_lc_rec=>l_media_lc_rec_hk,
9076: p_media_lc_rec=>l_media_lc_rec,
9077: x_data=>l_data,
9078: x_count=>l_count,
9083: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9084: END IF;
9085: END IF;
9086:
9087: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_MEDIALIFECYCLE', 'B', 'V') THEN
9088: JTF_IH_PUB_VUHK.update_medialifecycle_pre(
9089: --p_media_lc_rec=>l_media_lc_rec_hk,
9090: p_media_lc_rec=>l_media_lc_rec,
9091: x_data=>l_data,
9084: END IF;
9085: END IF;
9086:
9087: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_MEDIALIFECYCLE', 'B', 'V') THEN
9088: JTF_IH_PUB_VUHK.update_medialifecycle_pre(
9089: --p_media_lc_rec=>l_media_lc_rec_hk,
9090: p_media_lc_rec=>l_media_lc_rec,
9091: x_data=>l_data,
9092: x_count=>l_count,
9102: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version,
9103: l_api_name, g_pkg_name) THEN
9104: RAISE fnd_api.g_exc_unexpected_error;
9105: END IF;
9106: -- DBMS_OUTPUT.PUT_LINE('PAST fnd_api.compatible_api_call in JTF_IH_PUB.Update_MediaLifecycle');
9107:
9108: -- Initialize message list if p_init_msg_list is set to TRUE
9109: IF fnd_api.to_boolean(p_init_msg_list) THEN
9110: fnd_msg_pub.initialize;
9132: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
9133: RAISE fnd_api.g_exc_error;
9134: END IF;
9135: END IF;
9136: -- DBMS_OUTPUT.PUT_LINE('PAST jtf_ih_core_util_pvt.validate_who_info in JTF_IH_PUB.Update_MediaLifecycle');
9137:
9138: IF (p_media_lc_rec.milcs_id IS NULL) THEN
9139: jtf_ih_core_util_pvt.add_null_parameter_msg(l_api_name_full, 'milcs_id');
9140: RAISE fnd_api.g_exc_error;
9147: jtf_ih_core_util_pvt.add_invalid_argument_msg(l_api_name, to_char(p_media_lc_rec.milcs_id),
9148: 'media_id');
9149: RETURN;
9150: END IF;
9151: -- DBMS_OUTPUT.PUT_LINE('PAST OPEN c_Update_MediaLifecycle_csr in JTF_IH_PUB.Update_MediaLifecycle');
9152:
9153: IF(v_Update_MediaLifecycle_rec.active <> 'N') THEN
9154: --
9155: -- Check if start_date_time requires updating
9185: p_end_date_time => l_media_lc_rec.end_date_time,
9186: x_return_status => l_return_status
9187: );
9188: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
9189: --DBMS_OUTPUT.PUT_LINE('Error in Validate_StartEnd_Date of JTF_IH_PUB.Update_MediaLifecycle');
9190: RAISE fnd_api.g_exc_error;
9191: END IF;
9192: --
9193: -- Check if duration requires updating
9202:
9203: --
9204: -- Validate start_date_time and end_date_time by calling the utility procedure.
9205: --
9206: --DBMS_OUTPUT.PUT_LINE('PAST Validate_StartEnd_Date in JTF_IH_PUB.Update_MediaLifecycle');
9207: ELSE
9208: -- DBMS_OUTPUT.PUT_LINE('hello active error in JTF_IH_PUB.Update_MediaLifecycle');
9209: jtf_ih_core_util_pvt.add_invalid_argument_msg(l_api_name, to_char(p_media_lc_rec.milcs_id),'Active set to N for medialifecycle');
9210: RAISE fnd_api.g_exc_error;
9204: -- Validate start_date_time and end_date_time by calling the utility procedure.
9205: --
9206: --DBMS_OUTPUT.PUT_LINE('PAST Validate_StartEnd_Date in JTF_IH_PUB.Update_MediaLifecycle');
9207: ELSE
9208: -- DBMS_OUTPUT.PUT_LINE('hello active error in JTF_IH_PUB.Update_MediaLifecycle');
9209: jtf_ih_core_util_pvt.add_invalid_argument_msg(l_api_name, to_char(p_media_lc_rec.milcs_id),'Active set to N for medialifecycle');
9210: RAISE fnd_api.g_exc_error;
9211: END IF;
9212: --
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
9327: );
9328: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
9329: RAISE fnd_api.g_exc_error;
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
9353: END IF;
9354:
9355: -- Post processing Call
9356:
9357: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_MEDIALIFECYCLE', 'A', 'V') THEN
9358: JTF_IH_PUB_VUHK.update_medialifecycle_post(
9359: --p_media_lc_rec=>l_media_lc_rec_hk,
9360: p_media_lc_rec=>l_media_lc_rec,
9361: x_data=>l_data,
9354:
9355: -- Post processing Call
9356:
9357: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_MEDIALIFECYCLE', 'A', 'V') THEN
9358: JTF_IH_PUB_VUHK.update_medialifecycle_post(
9359: --p_media_lc_rec=>l_media_lc_rec_hk,
9360: p_media_lc_rec=>l_media_lc_rec,
9361: x_data=>l_data,
9362: x_count=>l_count,
9367: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9368: END IF;
9369: END IF;
9370:
9371: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_MEDIALIFECYCLE', 'A', 'C') THEN
9372: JTF_IH_PUB_CUHK.update_medialifecycle_post(
9373: --p_media_lc_rec=>l_media_lc_rec_hk,
9374: p_media_lc_rec=>l_media_lc_rec,
9375: x_data=>l_data,
9368: END IF;
9369: END IF;
9370:
9371: IF JTF_USR_HKS.Ok_TO_EXECUTE('JTF_IH_PUB', 'UPDATE_MEDIALIFECYCLE', 'A', 'C') THEN
9372: JTF_IH_PUB_CUHK.update_medialifecycle_post(
9373: --p_media_lc_rec=>l_media_lc_rec_hk,
9374: p_media_lc_rec=>l_media_lc_rec,
9375: x_data=>l_data,
9376: x_count=>l_count,
9441: return l_activity_rec_type;
9442:
9443: END INIT_ACTIVITY_REC;
9444:
9445: END JTF_IH_PUB;
9446: