1 package okl_jtot_contact_extract_pub AUTHID CURRENT_USER as
2 /* $Header: OKLPJCXS.pls 115.5 2003/09/24 06:13:55 kthiruva noship $ */
3 TYPE party_rec_type is record (rle_code OKC_K_PARTY_ROLES_V.RLE_CODE%TYPE := OKC_API.G_MISS_CHAR,
4
5 id1 OKC_K_PARTY_ROLES_V.OBJECT1_ID1%TYPE := OKC_API.G_MISS_CHAR,
6 id2 OKC_K_PARTY_ROLES_V.OBJECT1_ID2%TYPE := OKC_API.G_MISS_CHAR,
7 name VARCHAR2(250) := OKC_API.G_MISS_CHAR,
8 description VARCHAR2(250) := OKC_API.G_MISS_CHAR,
9 object_code VARCHAR2(30) := OKC_API.G_MISS_CHAR);
10 TYPE party_tab_type is table of party_rec_type INDEX BY BINARY_INTEGER;
11
12 G_API_TYPE CONSTANT VARCHAR2(4) := '_PVT';
13
14 --Start of Comments
15 --API Name : Get_Party
16 --Description : Fetched the select clause related to a party for a role code and intent
17 --End of Comments
18
19
20 --Start of Comments
21 --API Name : Get_Party
22 --Description : Fetches all parties attahced to a contract or line in a table
23 --End of Comments
24 Procedure Get_Party (p_api_version IN NUMBER,
25 p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
26 x_return_status OUT NOCOPY VARCHAR2,
27 x_msg_count OUT NOCOPY NUMBER,
28 x_msg_data OUT NOCOPY VARCHAR2,
29 p_chr_id IN VARCHAR2,
30 p_cle_id IN VARCHAR2,
31 p_role_code IN OKC_K_PARTY_ROLES_V.rle_code%Type,
32 p_intent IN VARCHAR2 default 'S',
33 x_party_tab OUT NOCOPY party_tab_type);
34
35
36
37 --Start of Comments
38 --Procedure : Get_Party
39 --Description : Fetches Name, Description of a Party role for a given
40 -- object1_id1 and object2_id2
41 --End of comments
42 Procedure Get_Party (p_api_version IN NUMBER,
43 p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
44 x_return_status OUT NOCOPY VARCHAR2,
45 x_msg_count OUT NOCOPY NUMBER,
46 x_msg_data OUT NOCOPY VARCHAR2,
47 p_role_code IN VARCHAR2,
48 p_intent IN VARCHAR2,
49 p_id1 IN VARCHAR2,
50 p_id2 IN VARCHAR2,
51 x_id1 OUT NOCOPY VARCHAR2,
52 x_id2 OUT NOCOPY VARCHAR2,
53 x_name OUT NOCOPY VARCHAR2,
54 x_description OUT NOCOPY VARCHAR2);
55
56
57 Procedure Get_Contact(p_api_version IN NUMBER,
58 p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
59 x_return_status OUT NOCOPY VARCHAR2,
60 x_msg_count OUT NOCOPY NUMBER,
61 x_msg_data OUT NOCOPY VARCHAR2,
62 p_role_code IN VARCHAR2,
63 p_contact_code IN VARCHAR2,
64 p_intent IN VARCHAR2 DEFAULT 'S',
65 p_id1 IN VARCHAR2,
66 p_id2 IN VARCHAR2,
67 p_name IN VARCHAR2,
68 x_select_clause OUT NOCOPY VARCHAR2,
69 x_from_clause OUT NOCOPY VARCHAR2,
70 x_where_clause OUT NOCOPY VARCHAR2,
71 x_order_by_clause OUT NOCOPY VARCHAR2,
72 x_object_code OUT NOCOPY VARCHAR2);
73
74
75
76 -- global variables
77 --g_ctsv_rec ctsv_rec_type;
78
79 -- public procedure declarations
80 procedure get_Contact (p_api_version IN NUMBER,
81 p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
82 x_return_status OUT NOCOPY VARCHAR2,
83 x_msg_count OUT NOCOPY NUMBER,
84 x_msg_data OUT NOCOPY VARCHAR2,
85 p_rle_code IN VARCHAR2,
86 p_cro_code IN VARCHAR2,
87 p_intent IN VARCHAR2,
88 p_id1 IN VARCHAR2,
89 p_id2 IN VARCHAR2,
90 x_id1 OUT NOCOPY VARCHAR2,
91 x_id2 OUT NOCOPY VARCHAR2,
92 x_name OUT NOCOPY VARCHAR2,
93 x_description OUT NOCOPY VARCHAR2);
94
95 Procedure Validate_Party (p_api_version IN NUMBER,
96 p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
97 x_return_status OUT NOCOPY VARCHAR2,
98 x_msg_count OUT NOCOPY NUMBER,
99 x_msg_data OUT NOCOPY VARCHAR2,
100 p_chr_id IN NUMBER,
101 p_cle_id IN NUMBER,
102 p_cpl_id IN NUMBER,
103 p_lty_code IN VARCHAR2,
104 p_rle_code IN VARCHAR2,
105 p_id1 IN OUT NOCOPY VARCHAR2,
106 p_id2 IN OUT NOCOPY VARCHAR2,
107 p_name IN VARCHAR2,
108 p_object_code IN VARCHAR2);
109
110
111 Procedure Delete_Party (p_api_version IN NUMBER,
112 p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
113 x_return_status OUT NOCOPY VARCHAR2,
114 x_msg_count OUT NOCOPY NUMBER,
115 x_msg_data OUT NOCOPY VARCHAR2,
116 p_chr_id IN NUMBER,
117 p_cpl_id IN NUMBER
118 );
119
120
121
122 end OKL_JTOT_CONTACT_EXTRACT_PUB;