PACKAGE BODY: APPS.OKC_INTERACT_HISTORY_PUB

Source

1 PACKAGE BODY OKC_INTERACT_HISTORY_PUB AS
2 /* $Header: OKCPIHAB.pls 120.0 2005/05/25 23:10:13 appldev noship $ */
3 	l_debug VARCHAR2(1) := NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N');
4 
5   PROCEDURE CREATE_INTERACT_HISTORY (
6     x_return_status OUT NOCOPY VARCHAR2,
7     x_msg_count OUT NOCOPY NUMBER,
8     x_msg_data OUT NOCOPY VARCHAR2,
9     x_interaction_id OUT NOCOPY NUMBER,
10     p_media_type IN varchar2,
11     p_action_item_id IN NUMBER,
12     p_outcome_id IN NUMBER,
13     p_touchpoint1_type IN VARCHAR2,
14     p_resource1_id IN NUMBER,
15     p_touchpoint2_type IN VARCHAR2,
16     p_resource2_id IN NUMBER,
17     p_contract_id IN NUMBER,
18     p_int_start_date IN DATE,
19     p_int_end_date IN DATE,
20     p_notes IN varchar2,
21     p_notes_detail IN varchar2) IS
22     BEGIN
23       OKC_INTERACT_HISTORY_PVT.CREATE_INTERACT_HISTORY (
24         x_return_status ,
25         x_msg_count ,
26         x_msg_data,
27         x_interaction_id,
28         p_media_type,
29         p_action_item_id,
30         p_outcome_id,
31         p_touchpoint1_type,
32         p_resource1_id,
33         p_touchpoint2_type,
34         p_resource2_id,
35         p_contract_id,
36         p_int_start_date,
37         p_int_end_date,
38         p_notes,
39         p_notes_detail) ;
40     END CREATE_INTERACT_HISTORY;
41  END OKC_INTERACT_HISTORY_PUB;