1 Package OKL_VP_JTF_PARTY_NAME_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLRCTSS.pls 120.1 2005/09/08 12:44:58 sjalasut noship $ */
3 TYPE party_rec_type is record (rle_code OKC_K_PARTY_ROLES_V.RLE_CODE%TYPE := OKC_API.G_MISS_CHAR,
4 id1 OKC_K_PARTY_ROLES_V.OBJECT1_ID1%TYPE := OKC_API.G_MISS_CHAR,
5 id2 OKC_K_PARTY_ROLES_V.OBJECT1_ID2%TYPE := OKC_API.G_MISS_CHAR,
6 name VARCHAR2(250) := OKC_API.G_MISS_CHAR,
7 description VARCHAR2(250) := OKC_API.G_MISS_CHAR,
8 object_code VARCHAR2(30) := OKC_API.G_MISS_CHAR);
9 TYPE party_tab_type is table of party_rec_type INDEX BY BINARY_INTEGER;
10 TYPE rle_code_rec_type is record (scs_code OKC_SUBCLASS_ROLES.SCS_CODE%TYPE := OKC_API.G_MISS_CHAR,
11 rle_code OKC_SUBCLASS_ROLES.RLE_CODE%TYPE := OKC_API.G_MISS_CHAR);
12 TYPE rle_code_tbl_type is table of rle_code_rec_type INDEX BY BINARY_INTEGER;
13
14 --Start of Comments
15 --API Name : Get_Party
16 --Description : Fetches all parties attahced to a contract or line in a table
17 --End of Comments
18 Procedure Get_Party (p_api_version IN NUMBER,
19 p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
20 x_return_status OUT NOCOPY VARCHAR2,
21 x_msg_count OUT NOCOPY NUMBER,
22 x_msg_data OUT NOCOPY VARCHAR2,
23 p_chr_id IN VARCHAR2,
24 p_cle_id IN VARCHAR2,
25 p_role_code IN OKC_K_PARTY_ROLES_V.rle_code%Type,
26 p_intent IN VARCHAR2 default 'S',
27 x_party_tab OUT NOCOPY party_tab_type);
28 --Start of Comments
29 --Procedure : Get_Party
30 --Description : Fetches Name, Description of a Party role for a given
31 -- object1_id1 and object2_id2
32 --End of comments
33 Procedure Get_Party (p_api_version IN NUMBER,
34 p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
35 x_return_status OUT NOCOPY VARCHAR2,
36 x_msg_count OUT NOCOPY NUMBER,
37 x_msg_data OUT NOCOPY VARCHAR2,
38 p_role_code IN VARCHAR2,
39 p_intent IN VARCHAR2,
40 p_id1 IN VARCHAR2,
41 p_id2 IN VARCHAR2,
42 x_id1 OUT NOCOPY VARCHAR2,
43 x_id2 OUT NOCOPY VARCHAR2,
44 x_name OUT NOCOPY VARCHAR2,
45 x_description OUT NOCOPY VARCHAR2);
46 Procedure Get_SubClass_Def_Roles
47 (p_scs_code IN OKC_SUBCLASSES_V.CODE%TYPE,
48 x_rle_code_tbl OUT NOCOPY rle_code_tbl_type);
49 Procedure Get_Contract_Def_Roles
50 (p_chr_id IN VARCHAR2,
51 x_rle_code_tbl OUT NOCOPY rle_code_tbl_type);
52
53 --Start of Comments
54 --Procedure : Get contact
55 --Description : Returns the SQL string for LOV of a contact
56 --End of Comments
57 TYPE contact_rec_type is record (cro_code OKC_CONTACTS_V.cro_code%TYPE := OKC_API.G_MISS_CHAR,
58 id1 OKC_CONTACTS_V.OBJECT1_ID1%TYPE := OKC_API.G_MISS_CHAR,
59 id2 OKC_CONTACTS_V.OBJECT1_ID2%TYPE := OKC_API.G_MISS_CHAR,
60 name VARCHAR2(250) := OKC_API.G_MISS_CHAR,
61 description VARCHAR2(250) := OKC_API.G_MISS_CHAR,
62 object_code VARCHAR2(30) := OKC_API.G_MISS_CHAR);
63 TYPE contact_tab_type is table of contact_rec_type INDEX BY BINARY_INTEGER;
64 Procedure Get_Contact(p_api_version IN NUMBER,
65 p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
66 x_return_status OUT NOCOPY VARCHAR2,
67 x_msg_count OUT NOCOPY NUMBER,
68 x_msg_data OUT NOCOPY VARCHAR2,
69 p_rle_code IN VARCHAR2,
70 p_cro_code IN VARCHAR2,
71 p_intent IN VARCHAR2,
72 p_id1 IN VARCHAR2,
73 p_id2 IN VARCHAR2,
74 x_id1 OUT NOCOPY VARCHAR2,
75 x_id2 OUT NOCOPY VARCHAR2,
76 x_name OUT NOCOPY VARCHAR2,
77 x_description OUT NOCOPY VARCHAR2);
78
79 FUNCTION get_party_name (p_role_code IN VARCHAR2
80 ,p_intent IN VARCHAR2
81 ,p_id1 IN VARCHAR2
82 ,p_id2 IN VARCHAR2) RETURN VARCHAR2;
83
84 FUNCTION get_party_contact_name (p_rle_code IN VARCHAR2
85 ,p_cro_code IN VARCHAR2
86 ,p_intent IN VARCHAR2
87 ,p_id1 IN VARCHAR2
88 ,p_id2 IN VARCHAR2) RETURN VARCHAR2;
89
90 PROCEDURE get_party_lov_sql (p_role_code IN VARCHAR2
91 ,p_intent IN VARCHAR2
92 ,x_jtot_object_code OUT NOCOPY VARCHAR2
93 ,x_lov_sql OUT NOCOPY VARCHAR2);
94
95 PROCEDURE get_party_contact_lov_sql (p_rle_code IN VARCHAR2
96 ,p_cro_code IN VARCHAR2
97 ,p_intent IN VARCHAR2
98 ,x_jtot_object_code OUT NOCOPY VARCHAR2
99 ,x_lov_sql OUT NOCOPY VARCHAR2);
100
101 END; -- Package Specification OKL_VP_JTF_PARTY_NAME_PVT