[Home] [Help]
PACKAGE: APPS.OKS_QA_DATA_INTEGRITY
Source
1 PACKAGE OKS_QA_DATA_INTEGRITY AS
2 /* $Header: OKSRQADS.pls 120.5.12000000.1 2007/01/16 22:11:44 appldev ship $ */
3
4 ---------------------------------------------------------------------------
5 -- GLOBAL MESSAGE CONSTANTS
6 ---------------------------------------------------------------------------
7 G_FND_APP CONSTANT VARCHAR2(200) := OKC_API.G_FND_APP;
8 G_NO_PARENT_RECORD CONSTANT VARCHAR2(200) := 'OKC_NO_PARENT_RECORD';
9 G_FORM_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := OKC_API.G_FORM_UNABLE_TO_RESERVE_REC;
10 G_FORM_RECORD_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_FORM_RECORD_DELETED;
11 G_FORM_RECORD_CHANGED CONSTANT VARCHAR2(200) := OKC_API.G_FORM_RECORD_CHANGED;
12 G_RECORD_LOGICALLY_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_LOGICALLY_DELETED;
13 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_REQUIRED_VALUE;
14 G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_INVALID_VALUE;
15 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_COL_NAME_TOKEN;
16 G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_PARENT_TABLE_TOKEN;
17 G_CHILD_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_CHILD_TABLE_TOKEN;
18 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKC_CONTRACTS_UNEXP_ERROR';
19 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLerrm';
20 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLcode';
21 G_UPPERCASE_REQUIRED CONSTANT VARCHAR2(200) := 'OKC_CONTRACTS_UPPERCASE_REQUIRED';
22 G_INVALID_END_DATE CONSTANT VARCHAR2(200) := 'OKC_INVALID_END_DATE';
23 --
24 G_QA_SUCCESS CONSTANT VARCHAR2(200) := 'OKS__QA_SUCCESS';
25 G_PARTY_COUNT CONSTANT VARCHAR2(200) := 'OKC_CONTRACTS_PARTY_COUNT';
26 G_REQUIRED_RULE CONSTANT VARCHAR2(200) := 'OKC_REQUIRED_RULE';
27 G_REQUIRED_RULE_VALUES CONSTANT VARCHAR2(200) := 'OKC_REQUIRED_RULE_VALUES';
28 G_REQUIRED_RULE_PARTY_ROLE CONSTANT VARCHAR2(200) := 'OKC_REQUIRED_RULE_PARTY_ROLE';
29 G_RULE_DEPENDENT_VALUE CONSTANT VARCHAR2(200) := 'OKC_RULE_DEPENDENT_VALUE';
30 G_INVALID_LINE_DATES CONSTANT VARCHAR2(200) := 'OKC_INVALID_LINE_DATES';
31 G_REQUIRED_LINE_VALUE CONSTANT VARCHAR2(200) := 'OKC_REQUIRED_LINE_FIELD';
32 G_INVALID_LINE_CURRENCY CONSTANT VARCHAR2(200) := 'OKC_INVALID_LINE_CURRENCY';
33 G_INVALID_LINE_ITEM CONSTANT VARCHAR2(200) := 'OKS_INVALID_LINE_ITEM';
34 G_REQUIRED_COVERED_LINE CONSTANT VARCHAR2(200) := 'OKS_REQUIRED_COVERED_LINE';
35 G_INVALID_COVERAGE_LINE CONSTANT VARCHAR2(200) := 'OKS_INVALID_COVERAGE_LINE';
36 --G_COVERAGE_OVERLAP CONSTANT VARCHAR2(200) := 'OKS_COVERAGE_OVERLAP';
37 G_PARTY_ROLE CONSTANT VARCHAR2(200) := 'OKS_PARTY_ROLE';
38 G_PARTY_MISSING_ROLE CONSTANT VARCHAR2(200) := 'OKS_PARTY_MISSING_ROLE';
39 G_BASE_READING CONSTANT VARCHAR2(200) := 'OKS_COUNTER_BASE_READING';
40 G_BILL_ATTR CONSTANT VARCHAR2(200) := 'OKS_BILLING_ATTRIBUTES';
41 G_SHORT_DESC CONSTANT VARCHAR2(200) := 'OKS_HDR_SHORT_DESC';
42 G_QA_CHECK CONSTANT VARCHAR2(200) := 'OKS_QA_CHECK_LIST';
43 G_K_GROUP CONSTANT VARCHAR2(200) := 'OKS_CONTRACT_GROUP';
44 G_WORKFLOW CONSTANT VARCHAR2(200) := 'OKS_WORK_FLOW';
45 G_DEFAULT_READING CONSTANT VARCHAR2(200) := 'OKS_COUNTER_DEFAULT_READING';
46 G_PRICE_LIST CONSTANT VARCHAR2(200) := 'OKS_PRICE_LIST';
47
48 G_ONE_CUST_CONTACT CONSTANT VARCHAR2(200) := 'OKS_ONE_CUST_CONTACT';
49 G_INVALID_TAX_EXEMPT CONSTANT VARCHAR2(200) := 'OKS_INVALID_TAX_EXEMPT';
50 G_CUSTOMER_ON_CREDIT_HOLD CONSTANT VARCHAR2(200) := 'OKS_CUST_ON_CREDIT_HOLD';
51 G_CUST_REQUIRED CONSTANT VARCHAR2(200) := 'OKS_CUST_REQUIRED';
52 G_PO_NUM_REQUIRED CONSTANT VARCHAR2(200) := 'OKS_PO_NUM_REQUIRED';
53 G_PO_NUM_FOR_RENEWAL CONSTANT VARCHAR2(200) := 'OKS_PO_NUM_FOR_RENEWAL';
54 G_SERVICE_PO_NUM CONSTANT VARCHAR2(200) := 'OKS_SERVICE_PO_NUM';
55 G_AUTHORIZE_PAYMENT CONSTANT VARCHAR2(200) := 'AUTHORIZE_PAYMENT';
56 G_ITEM_INST_INVALID CONSTANT VARCHAR2(200) := 'OKS_ITEM_INSTANCE_INVALID';
57 G_CP_DATE_INVALID CONSTANT VARCHAR2(200) := 'OKS_CP_DATE_INVALID';
58 G_SUBSCR_ELEM_MISS CONSTANT VARCHAR2(200) := 'OKS_SUBSCR_ELEM_MISS';
59 G_SHIP_RULE_MISS CONSTANT VARCHAR2(200) := 'OKS_SHIP_RULE_MISS';
60 G_SHIP_ADDR_MISS CONSTANT VARCHAR2(200) := 'OKS_SHIP_ADDR_MISS';
61 G_PRECESION CONSTANT NUMBER := .01;
62 G_CUST_MISSING CONSTANT VARCHAR2(200) :='OKC_K2O_CUSTOMER3';
63 G_CURR_CONV_REQUIRED CONSTANT VARCHAR2(200) := 'OKS_CURR_CONV_REQUIRED';
64 G_NUM_ONE CONSTANT NUMBER := 1;
65 G_COVERAGE_OVERLAP_LIST CONSTANT VARCHAR2(200) := 'OKS_COVERAGE_OVERLAP_LIST';
66 G_ITEM_INST_MISS CONSTANT VARCHAR2(200) := 'OKS_ITEM_INST_MISS';
67 G_QUANT_UOM_INVALID CONSTANT VARCHAR2(200) := 'OKS_QUANT_UOM_INVALID';
68 G_QUANT_INVALID CONSTANT VARCHAR2(200) := 'OKS_QUANT_INVALID';
69 G_UOM_INVALID CONSTANT VARCHAR2(200) := 'OKS_UOM_INVALID';
70 G_CUST_NOT_ACTIVE CONSTANT VARCHAR2(200) := 'OKS_CUST_NOT_ACTIVE';
71 G_SHIP_CUST_NOT_ACTIVE CONSTANT VARCHAR2(200) := 'OKS_SHIP_CUST_NOT_ACTIVE'; -- added for bug # 3630149
72 -- BUG 4138244 --
73 -- GCHADHA --
74 G_BILL_CUST_INACTIVE CONSTANT VARCHAR2(200) := 'OKS_BILL_CUST_NOT_ACTIVE_HEAD';
75 G_SHIP_CUST_INACTIVE CONSTANT VARCHAR2(200) := 'OKS_SHIP_CUST_NOT_ACTIVE_HEAD';
76 G_BTO_INVALID_HEAD CONSTANT VARCHAR2(200) := 'OKS_BTO_INVALID_HEADER';
77 G_STO_INVALID_HEAD CONSTANT VARCHAR2(200) := 'OKS_STO_INVALID_HEADER';
78
79 -- END GCHADHA--
80 -- GCHADHA --
81 -- MULTI CURRENCY PRICELIST --
82 -- 05-DEC-2004 --
83 -- BUG 4048186 --
84 -- ADDED THE MESSAGE G_PRICE_LIST_CURR_R --
85 G_PRICE_LIST_CURR_L CONSTANT VARCHAR2(200) := 'OKS_INVALID_PRICE_LIST_LINE'; -- MSG FOR INVALID PL AT LINES
86 G_PRICE_LIST_CURR_H CONSTANT VARCHAR2(200) := 'OKS_INVALID_PRICE_LIST'; -- MSG FOR INVALID PL AT HDR
87 G_PRICE_LIST_CURR_R CONSTANT VARCHAR2(200) := 'OKS_INVALID_RENEWAL_PRICE_LIST'; -- MSG FOR INVALID PL AT RENEWAL
88 -- END GCHADHA --
89 -- Added for bug # 3630149
90 G_BTO_INVALID CONSTANT VARCHAR2(200) := 'OKS_BTO_INVALID';
91 G_STO_INVALID CONSTANT VARCHAR2(200) := 'OKS_STO_INVALID';
92 G_BTO_REQUIRED CONSTANT VARCHAR2(200) := 'OKS_BTO_REQUIRED';
93 G_BTO_ACCT CONSTANT VARCHAR2(200) := 'OKS_BT_ACCT';
94 G_STO_ACCT CONSTANT VARCHAR2(200) := 'OKS_ST_ACCT';
95 G_CUST_INACTIVE CONSTANT VARCHAR2(200) := 'OKS_CUST_INACTIVE'; -- Customer is not acitive.
96 G_THIRD_PARTY_INACTIVE CONSTANT VARCHAR2(200) := 'OKS_THIRD_PARTY_INACTIVE'; -- Third party is not active.
97 G_SUB_INACTIVE CONSTANT VARCHAR2(200) := 'OKS_SUB_INACTIVE';
98 G_INVALID_TAX_EXEMPT_DATE CONSTANT VARCHAR2(200) := 'OKS_INVALID_TAX_EXEMPT_DATE'; -- added for bug # 4069388
99 --- End of bug # 3630149
100 G_MISS_PRICE_LOCK CONSTANT VARCHAR2(200) := 'OKS_MISS_PRICE_LOCK';
101 G_UNAPPROVED_TAX_EXEMPT CONSTANT VARCHAR2(200) := 'OKS_UNAPPROVED_TAX_EXEMPT';
102 G_UNAPPROVED_HDR_TAX_EXEMPT CONSTANT VARCHAR2(200) := 'OKS_UNAPPROVED_HDR_TAX_EXEMPT';
103 -- IKON ENHANCEMENT --
104 G_INVALID_TAX_EXEMPT_LINE CONSTANT VARCHAR2(200) := 'OKS_INVALID_TAX_EXEMPT_LINE';
105 -- IKON ENHANCEMENT --
106
107
108 G_LINE_REQUIRED CONSTANT VARCHAR2(200) := 'OKS_LINE_REQUIRED';
109 G_COVERED_LINE_REQUIRED CONSTANT VARCHAR2(200) := 'OKS_COVERED_LINE_REQUIRED';
110 G_NEG_AMT_REQUIRED CONSTANT VARCHAR2(200) := 'OKS_NEG_AMT_REQUIRED';
111 G_INVALID_BILLING_CONTACTS CONSTANT VARCHAR2(200) := 'OKS_INVALID_BILLING_CONTACTS';
112 G_INACTIVE_INVENTORY_ITEM CONSTANT VARCHAR2(200) := 'OKS_INACTIVE_INVENTORY_ITEM';
113 G_INACTIVE_COVERED_ITEM CONSTANT VARCHAR2(200) := 'OKS_INACTIVE_COVERED_ITEM';
114 G_INACTIVE_COVERED_PARTY CONSTANT VARCHAR2(200) := 'OKS_INACTIVE_COVERED_PARTY';
115 G_INACTIVE_COVERED_PRODUCT CONSTANT VARCHAR2(200) := 'OKS_INACTIVE_COVERED_PRODUCT';
116 G_INACTIVE_COVERED_SYSTEM CONSTANT VARCHAR2(200) := 'OKS_INACTIVE_COVERED_SYSTEM';
117 G_INACTIVE_COVERED_SITE CONSTANT VARCHAR2(200) := 'OKS_INACTIVE_COVERED_SITE';
118
119 G_MISSING_SALESREP CONSTANT VARCHAR2(200) := 'OKS_MISSING_SALESREP';
120
121 TYPE numeric_tab_typ IS TABLE of number INDEX BY BINARY_INTEGER;
122
123 ------------------------------------------------------------------------------------
124 -- GLOBAL EXCEPTION
125 ---------------------------------------------------------------------------
126 G_EXCEPTION_HALT_VALIDATION EXCEPTION;
127
128 -- GLOBAL VARIABLES
129 ---------------------------------------------------------------------------
130 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKS_QA_DATA_INTEGRITY';
131 G_APP_NAME CONSTANT VARCHAR2(3) := 'OKS';
132 ---------------------------------------------------------------------------
133
134 FUNCTION val_credit_card(
135 p_cc_num_stripped IN Varchar2
136 ) RETURN number;
137
138 PROCEDURE check_required_values(
139 x_return_status OUT NOCOPY VARCHAR2,
140 p_chr_id IN NUMBER);
141
142 PROCEDURE check_req_values(
143 x_return_status OUT NOCOPY VARCHAR2,
144 p_chr_id IN NUMBER);
145
146 PROCEDURE check_covered_levels(
147 x_return_status OUT NOCOPY VARCHAR2,
148 p_chr_id IN NUMBER
149 ) ;
150
151 Procedure Check_Counter_base_reading
152 (
153 p_chr_id IN Number,
154 X_return_status OUT NOCOPY Varchar2
155 );
156
157 PROCEDURE check_covlvl_Overlap(
158 x_return_status OUT NOCOPY VARCHAR2,
159 p_chr_id IN NUMBER
160 ) ;
161
162
163 PROCEDURE check_tax_exemption(
164 x_return_status OUT NOCOPY VARCHAR2,
165 p_chr_id IN NUMBER
166 ) ;
167
168 PROCEDURE check_cust_credit_hold(
169 x_return_status OUT NOCOPY VARCHAR2,
170 p_chr_id IN NUMBER
171 ) ;
172
173 PROCEDURE check_address(
174 x_return_status OUT NOCOPY VARCHAR2,
175 p_chr_id IN NUMBER
176 ) ;
177
178 PROCEDURE check_item_effectivity
179 (
180 x_return_status OUT NOCOPY VARCHAR2,
181 p_chr_id IN NUMBER
182 );
183
184 PROCEDURE Check_Authorize_Payment
185 (
186 x_return_status OUT NOCOPY VARCHAR2,
187 p_chr_id IN NUMBER
188 );
189
190
191 PROCEDURE check_billing_schedule
192 (
193 x_return_status OUT NOCOPY VARCHAR2,
194 p_chr_id IN NUMBER
195 );
196
197 Procedure Check_product_availability
198 (
199 X_Return_Status OUT NOCOPY Varchar2,
200 p_chr_id IN NUMBER
201 );
202
203 Procedure check_customer_availability
204 (
205 x_return_status OUT NOCOPY Varchar2,
206 p_chr_id IN NUMBER
207 );
208
209 PROCEDURE check_pm
210 (
211 x_return_status OUT NOCOPY VARCHAR2,
212 p_chr_id IN NUMBER
213 );
214
215 PROCEDURE Check_item_instance_valid
216 (
217 x_return_status OUT NOCOPY VARCHAR2,
218 p_chr_id IN NUMBER
219 );
220
221 PROCEDURE check_subscr_element_exist
222 (
223 p_chr_id IN NUMBER,
224 x_return_status OUT NOCOPY VARCHAR2
225 );
226
227 PROCEDURE check_subscr_is_shipable
228 (
229 p_chr_id IN NUMBER,
230 x_return_status OUT NOCOPY VARCHAR2
231 );
232
233 PROCEDURE check_covered_product
234 (
235 p_chr_id IN NUMBER,
236 x_return_status OUT NOCOPY VARCHAR2
237 );
238
239 PROCEDURE check_required_PM
240 (
241 p_chr_id IN NUMBER,
242 x_return_status OUT NOCOPY VARCHAR2
243 );
244
245 PROCEDURE check_pirce_lock
246 (
247 p_chr_id IN NUMBER,
248 x_return_status OUT NOCOPY VARCHAR2
249 );
250
251 --[llc]
252
253 PROCEDURE Check_Ren_Source_Lines
254 (
255 p_chr_id IN NUMBER,
256 x_return_status OUT NOCOPY VARCHAR2
257 );
258
259 PROCEDURE Check_Ren_Target_Lines
260 (
261 p_chr_id in NUMBER,
262 x_return_status OUT NOCOPY VARCHAR2
263 );
264
265
266
267 END OKS_QA_DATA_INTEGRITY;