[Home] [Help]
PACKAGE: APPS.OKL_AM_PARTIES_PVT
Source
1 PACKAGE okl_am_parties_pvt AUTHID CURRENT_USER AS
2 /* $Header: OKLRAMPS.pls 115.9 2003/11/10 23:19:07 rsrivast noship $ */
3
4 ---------------------------------------------------------------------------
5 -- GLOBAL DATASTRUCTURES
6 ---------------------------------------------------------------------------
7
8 TYPE q_party_uv_rec_type IS RECORD (
9 quote_id NUMBER,
10 contract_id NUMBER,
11 k_buy_or_sell VARCHAR2(3),
12 qp_party_id NUMBER, -- Quote Party Info
13 qp_role_code VARCHAR2(30),
14 qp_party_role VARCHAR2(80),
15 qp_date_sent DATE,
16 qp_date_hold DATE,
17 qp_created_by NUMBER, -- Quote Party WHO columns
18 qp_creation_date DATE,
19 qp_last_updated_by NUMBER,
20 qp_last_update_date DATE,
21 qp_last_update_login NUMBER,
22 kp_party_id NUMBER, -- Contract Party Info
23 kp_role_code VARCHAR2(30),
24 kp_party_role VARCHAR2(80),
25 po_party_id1 VARCHAR2(40), -- Party Object Info
26 po_party_id2 VARCHAR2(200),
27 po_party_object VARCHAR2(30),
28 po_party_name VARCHAR2(360),
29 po_party_desc VARCHAR2(2000),
30 co_contact_id1 VARCHAR2(40), -- Contact Object Info
31 co_contact_id2 VARCHAR2(200),
32 co_contact_object VARCHAR2(30),
33 co_contact_name VARCHAR2(360),
34 co_contact_desc VARCHAR2(2000),
35 co_email VARCHAR2(2000),
36 co_order_num NUMBER,
37 co_date_sent DATE,
38 cp_point_id NUMBER, -- Contact Point Info
39 cp_point_type VARCHAR2(30),
40 cp_primary_flag VARCHAR2(3),
41 cp_email VARCHAR2(2000),
42 cp_details VARCHAR2(2000),
43 cp_order_num NUMBER,
44 cp_date_sent DATE);
45
46 TYPE party_object_rec_type IS RECORD (
47 p_code VARCHAR2(30), -- Party Info
48 p_id1 VARCHAR2(40),
49 p_id2 VARCHAR2(200),
50 p_name VARCHAR2(360),
51 p_desc VARCHAR2(2000),
52 s_code VARCHAR2(30), -- Site Info
53 s_id1 VARCHAR2(40),
54 s_id2 VARCHAR2(200),
55 s_name VARCHAR2(360),
56 s_desc VARCHAR2(2000),
57 c_code VARCHAR2(30), -- Contact Info
58 c_id1 VARCHAR2(40),
59 c_id2 VARCHAR2(200),
60 c_name VARCHAR2(360),
61 c_desc VARCHAR2(2000),
62 c_email VARCHAR2(2000),
63 c_person_id NUMBER,
64 pcp_id NUMBER(15), -- Contact Point Info
65 pcp_primary VARCHAR2(3),
66 pcp_email VARCHAR2(2000));
67
68 TYPE q_party_uv_tbl_type IS TABLE OF q_party_uv_rec_type
69 INDEX BY BINARY_INTEGER;
70
71 TYPE party_object_tbl_type IS TABLE OF party_object_rec_type
72 INDEX BY BINARY_INTEGER;
73
74 SUBTYPE qtev_rec_type IS okl_trx_quotes_pub.qtev_rec_type;
75 SUBTYPE qpyv_tbl_type IS okl_quote_parties_pub.qpyv_tbl_type;
76 SUBTYPE qpyv_rec_type IS okl_quote_parties_pub.qpyv_rec_type;
77
78 G_EMPTY_QPYV_TBL qpyv_tbl_type;
79
80 ---------------------------------------------------------------------------
81 -- GLOBAL VARIABLES
82 ---------------------------------------------------------------------------
83
84 -- Validation for missing fields
85 G_MISS_NUM CONSTANT NUMBER := OKL_API.G_MISS_NUM;
86 G_MISS_CHAR CONSTANT VARCHAR2(1) := OKL_API.G_MISS_CHAR;
87 G_MISS_DATE CONSTANT DATE := OKL_API.G_MISS_DATE;
88
89 ---------------------------------------------------------------------------
90 -- GLOBAL MESSAGE CONSTANTS FOR ERROR HANDLING
91 ---------------------------------------------------------------------------
92
93 G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
94 G_API_VERSION CONSTANT NUMBER := 1;
95 G_PKG_NAME CONSTANT VARCHAR2(200) :=
96 'OKL_AM_PARTIES_PVT';
97
98 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLCODE';
99 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLERRM';
100 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) :=
101 'OKL_CONTRACTS_UNEXPECTED_ERROR';
102
103 G_OKC_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
104 G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_INVALID_VALUE;
105 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_REQUIRED_VALUE;
106 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_COL_NAME_TOKEN;
107
108 ---------------------------------------------------------------------------
109 -- Procedures and Functions
110 ---------------------------------------------------------------------------
111
112 -- Return quote parties using setup rules
113 PROCEDURE fetch_rule_quote_parties (
114 p_api_version IN NUMBER,
115 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
116 x_msg_count OUT NOCOPY NUMBER,
117 x_msg_data OUT NOCOPY VARCHAR2,
118 x_return_status OUT NOCOPY VARCHAR2,
119 p_qtev_rec IN qtev_rec_type,
120 x_qpyv_tbl OUT NOCOPY qpyv_tbl_type,
121 x_q_party_uv_tbl OUT NOCOPY q_party_uv_tbl_type,
122 x_record_count OUT NOCOPY NUMBER);
123
124 -- Assign a vendor partner as a quote recipient
125 PROCEDURE create_partner_as_recipient (
126 p_qtev_rec IN qtev_rec_type,
127 p_validate_only IN BOOLEAN DEFAULT FALSE,
128 x_qpyv_tbl OUT NOCOPY qpyv_tbl_type,
129 x_return_status OUT NOCOPY VARCHAR2);
130
131 -- Create all quote parties using setup rules
132 PROCEDURE create_quote_parties (
133 p_qtev_rec IN qtev_rec_type,
134 p_qpyv_tbl IN qpyv_tbl_type DEFAULT G_EMPTY_QPYV_TBL,
135 p_validate_only IN BOOLEAN DEFAULT FALSE,
136 x_qpyv_tbl OUT NOCOPY qpyv_tbl_type,
137 x_return_status OUT NOCOPY VARCHAR2);
138
139 -- Return OKX party, vendor, site, contact information
140 PROCEDURE get_party_details (
141 p_id_code IN VARCHAR2,
142 p_id_value IN VARCHAR2,
143 x_party_object_tbl OUT NOCOPY party_object_tbl_type,
144 x_return_status OUT NOCOPY VARCHAR2);
145
146 -- Return quote party information
147 PROCEDURE get_quote_parties (
148 p_api_version IN NUMBER,
149 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
150 x_msg_count OUT NOCOPY NUMBER,
151 x_msg_data OUT NOCOPY VARCHAR2,
152 x_return_status OUT NOCOPY VARCHAR2,
153 p_q_party_uv_rec IN q_party_uv_rec_type,
154 x_q_party_uv_tbl OUT NOCOPY q_party_uv_tbl_type,
155 x_record_count OUT NOCOPY NUMBER);
156
157 -- Return quote party contact information
158 PROCEDURE get_quote_party_contacts (
159 p_api_version IN NUMBER,
160 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
161 x_msg_count OUT NOCOPY NUMBER,
162 x_msg_data OUT NOCOPY VARCHAR2,
163 x_return_status OUT NOCOPY VARCHAR2,
164 p_q_party_uv_rec IN q_party_uv_rec_type,
165 x_q_party_uv_tbl OUT NOCOPY q_party_uv_tbl_type,
166 x_record_count OUT NOCOPY NUMBER);
167
168 -- Return quote party contact point information
169 PROCEDURE get_quote_contact_points (
170 p_api_version IN NUMBER,
171 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
172 x_msg_count OUT NOCOPY NUMBER,
173 x_msg_data OUT NOCOPY VARCHAR2,
174 x_return_status OUT NOCOPY VARCHAR2,
175 p_q_party_uv_rec IN q_party_uv_rec_type,
176 x_q_party_uv_tbl OUT NOCOPY q_party_uv_tbl_type,
177 x_record_count OUT NOCOPY NUMBER);
178
179 END okl_am_parties_pvt;