1: Package okl_jtot_contact_extract_pvt AUTHID CURRENT_USER as
2: /* $Header: OKLRJCXS.pls 115.3 2003/09/23 14:21:05 kthiruva noship $ */
3: --HERE jtot extract BEGIN
4: TYPE party_rec_type is record (rle_code OKC_K_PARTY_ROLES_V.RLE_CODE%TYPE := OKC_API.G_MISS_CHAR,
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,
1: Package okl_jtot_contact_extract_pvt AUTHID CURRENT_USER as
2: /* $Header: OKLRJCXS.pls 115.3 2003/09/23 14:21:05 kthiruva noship $ */
3: --HERE jtot extract BEGIN
4: TYPE party_rec_type is record (rle_code OKC_K_PARTY_ROLES_V.RLE_CODE%TYPE := OKC_API.G_MISS_CHAR,
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);
2: /* $Header: OKLRJCXS.pls 115.3 2003/09/23 14:21:05 kthiruva noship $ */
3: --HERE jtot extract BEGIN
4: TYPE party_rec_type is record (rle_code OKC_K_PARTY_ROLES_V.RLE_CODE%TYPE := OKC_API.G_MISS_CHAR,
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;
3: --HERE jtot extract BEGIN
4: TYPE party_rec_type is record (rle_code OKC_K_PARTY_ROLES_V.RLE_CODE%TYPE := OKC_API.G_MISS_CHAR,
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: TYPE rle_code_rec_type is record (scs_code OKC_SUBCLASS_ROLES.SCS_CODE%TYPE := OKC_API.G_MISS_CHAR,
4: TYPE party_rec_type is record (rle_code OKC_K_PARTY_ROLES_V.RLE_CODE%TYPE := OKC_API.G_MISS_CHAR,
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: TYPE rle_code_rec_type is record (scs_code OKC_SUBCLASS_ROLES.SCS_CODE%TYPE := OKC_API.G_MISS_CHAR,
12: rle_code OKC_SUBCLASS_ROLES.RLE_CODE%TYPE := OKC_API.G_MISS_CHAR);
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: TYPE rle_code_rec_type is record (scs_code OKC_SUBCLASS_ROLES.SCS_CODE%TYPE := OKC_API.G_MISS_CHAR,
12: rle_code OKC_SUBCLASS_ROLES.RLE_CODE%TYPE := OKC_API.G_MISS_CHAR);
13: TYPE rle_code_tbl_type is table of rle_code_rec_type INDEX BY BINARY_INTEGER;
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: TYPE rle_code_rec_type is record (scs_code OKC_SUBCLASS_ROLES.SCS_CODE%TYPE := OKC_API.G_MISS_CHAR,
12: rle_code OKC_SUBCLASS_ROLES.RLE_CODE%TYPE := OKC_API.G_MISS_CHAR);
13: TYPE rle_code_tbl_type is table of rle_code_rec_type INDEX BY BINARY_INTEGER;
14:
15: --Start of Comments
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: TYPE rle_code_rec_type is record (scs_code OKC_SUBCLASS_ROLES.SCS_CODE%TYPE := OKC_API.G_MISS_CHAR,
12: rle_code OKC_SUBCLASS_ROLES.RLE_CODE%TYPE := OKC_API.G_MISS_CHAR);
13: TYPE rle_code_tbl_type is table of rle_code_rec_type INDEX BY BINARY_INTEGER;
14:
15: --Start of Comments
16: --API Name : Get_Party
16: --API Name : Get_Party
17: --Description : Fetches all parties attahced to a contract or line in a table
18: --End of Comments
19: Procedure Get_Party (p_api_version IN NUMBER,
20: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
21: x_return_status OUT NOCOPY VARCHAR2,
22: x_msg_count OUT NOCOPY NUMBER,
23: x_msg_data OUT NOCOPY VARCHAR2,
24: p_chr_id IN VARCHAR2,
32: --Description : Fetches Name, Description of a Party role for a given
33: -- object1_id1 and object2_id2
34: --End of comments
35: Procedure Get_Party (p_api_version IN NUMBER,
36: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
37: x_return_status OUT NOCOPY VARCHAR2,
38: x_msg_count OUT NOCOPY NUMBER,
39: x_msg_data OUT NOCOPY VARCHAR2,
40: p_role_code IN VARCHAR2,
57: --Start of Comments
58: --Procedure : Get contact
59: --Description : Returns the SQL string for LOV of a contact
60: --End of Comments
61: TYPE contact_rec_type is record (cro_code OKC_CONTACTS_V.cro_code%TYPE := OKC_API.G_MISS_CHAR,
62: id1 OKC_CONTACTS_V.OBJECT1_ID1%TYPE := OKC_API.G_MISS_CHAR,
63: id2 OKC_CONTACTS_V.OBJECT1_ID2%TYPE := OKC_API.G_MISS_CHAR,
64: name VARCHAR2(250) := OKC_API.G_MISS_CHAR,
65: description VARCHAR2(250) := OKC_API.G_MISS_CHAR,
58: --Procedure : Get contact
59: --Description : Returns the SQL string for LOV of a contact
60: --End of Comments
61: TYPE contact_rec_type is record (cro_code OKC_CONTACTS_V.cro_code%TYPE := OKC_API.G_MISS_CHAR,
62: id1 OKC_CONTACTS_V.OBJECT1_ID1%TYPE := OKC_API.G_MISS_CHAR,
63: id2 OKC_CONTACTS_V.OBJECT1_ID2%TYPE := OKC_API.G_MISS_CHAR,
64: name VARCHAR2(250) := OKC_API.G_MISS_CHAR,
65: description VARCHAR2(250) := OKC_API.G_MISS_CHAR,
66: object_code VARCHAR2(30) := OKC_API.G_MISS_CHAR);
59: --Description : Returns the SQL string for LOV of a contact
60: --End of Comments
61: TYPE contact_rec_type is record (cro_code OKC_CONTACTS_V.cro_code%TYPE := OKC_API.G_MISS_CHAR,
62: id1 OKC_CONTACTS_V.OBJECT1_ID1%TYPE := OKC_API.G_MISS_CHAR,
63: id2 OKC_CONTACTS_V.OBJECT1_ID2%TYPE := OKC_API.G_MISS_CHAR,
64: name VARCHAR2(250) := OKC_API.G_MISS_CHAR,
65: description VARCHAR2(250) := OKC_API.G_MISS_CHAR,
66: object_code VARCHAR2(30) := OKC_API.G_MISS_CHAR);
67: TYPE contact_tab_type is table of contact_rec_type INDEX BY BINARY_INTEGER;
60: --End of Comments
61: TYPE contact_rec_type is record (cro_code OKC_CONTACTS_V.cro_code%TYPE := OKC_API.G_MISS_CHAR,
62: id1 OKC_CONTACTS_V.OBJECT1_ID1%TYPE := OKC_API.G_MISS_CHAR,
63: id2 OKC_CONTACTS_V.OBJECT1_ID2%TYPE := OKC_API.G_MISS_CHAR,
64: name VARCHAR2(250) := OKC_API.G_MISS_CHAR,
65: description VARCHAR2(250) := OKC_API.G_MISS_CHAR,
66: object_code VARCHAR2(30) := OKC_API.G_MISS_CHAR);
67: TYPE contact_tab_type is table of contact_rec_type INDEX BY BINARY_INTEGER;
68: /*Procedure get_contact (
61: TYPE contact_rec_type is record (cro_code OKC_CONTACTS_V.cro_code%TYPE := OKC_API.G_MISS_CHAR,
62: id1 OKC_CONTACTS_V.OBJECT1_ID1%TYPE := OKC_API.G_MISS_CHAR,
63: id2 OKC_CONTACTS_V.OBJECT1_ID2%TYPE := OKC_API.G_MISS_CHAR,
64: name VARCHAR2(250) := OKC_API.G_MISS_CHAR,
65: description VARCHAR2(250) := OKC_API.G_MISS_CHAR,
66: object_code VARCHAR2(30) := OKC_API.G_MISS_CHAR);
67: TYPE contact_tab_type is table of contact_rec_type INDEX BY BINARY_INTEGER;
68: /*Procedure get_contact (
69: p_rle_code IN VARCHAR2,
62: id1 OKC_CONTACTS_V.OBJECT1_ID1%TYPE := OKC_API.G_MISS_CHAR,
63: id2 OKC_CONTACTS_V.OBJECT1_ID2%TYPE := OKC_API.G_MISS_CHAR,
64: name VARCHAR2(250) := OKC_API.G_MISS_CHAR,
65: description VARCHAR2(250) := OKC_API.G_MISS_CHAR,
66: object_code VARCHAR2(30) := OKC_API.G_MISS_CHAR);
67: TYPE contact_tab_type is table of contact_rec_type INDEX BY BINARY_INTEGER;
68: /*Procedure get_contact (
69: p_rle_code IN VARCHAR2,
70: p_cro_code IN VARCHAR2,
77: x_where_clause OUT NOCOPY VARCHAR2,
78: x_order_by_clause OUT NOCOPY VARCHAR2,
79: x_object_code OUT NOCOPY VARCHAR2); */
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,