DBA Data[Home] [Help]

PACKAGE: APPS.OKS_AUTH_UTIL_PVT

Source


1 PACKAGE OKS_AUTH_UTIL_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKSRAUTS.pls 120.8 2006/06/21 16:50:57 tweichen noship $ */
3 
4 /*
5    For all procedures following parameters are standard
6    p_api_version, p_init_msg_list, x_return_status, x_msg_count, x_msg_data
7 */
8  ----------------------------------------------------------------------------------------
9   -- GLOBAL VARIABLES
10   ----------------------------------------------------------------------------------------
11   G_PKG_NAME                           CONSTANT VARCHAR2(200) :=  'OKS_AUTH_UTIL_PVT';
12   G_APP_NAME_OKS                       CONSTANT VARCHAR2(3)   :=  'OKS';
13   G_APP_NAME_OKC                       CONSTANT VARCHAR2(3)   :=  'OKC';
14   ----------------------------------------------------------------------------------------
15   -- GLOBAL_MESSAGE_CONSTANTS
16   ----------------------------------------------------------------------------------------
17   G_TRUE                       CONSTANT VARCHAR2(1)   :=  OKC_API.G_TRUE;
18   G_FALSE                      CONSTANT VARCHAR2(1)   :=  OKC_API.G_FALSE;
19   G_RET_STS_SUCCESS            CONSTANT VARCHAR2(1)   :=  OKC_API.G_RET_STS_SUCCESS;
20   G_RET_STS_ERROR              CONSTANT VARCHAR2(1)   :=  OKC_API.G_RET_STS_ERROR;
21   G_RET_STS_UNEXP_ERROR        CONSTANT VARCHAR2(1)   :=  OKC_API.G_RET_STS_UNEXP_ERROR;
22   G_UNEXPECTED_ERROR           CONSTANT VARCHAR2(30)  := 'OKC_CONTRACTS_UNEXPECTED_ERROR';
23   G_SQLERRM_TOKEN              CONSTANT VARCHAR2(30)  := 'SQLerrm';
24   G_SQLCODE_TOKEN              CONSTANT VARCHAR2(30)  := 'SQLcode';
25   G_REQUIRED_VALUE             CONSTANT VARCHAR2(30)  := OKC_API.G_REQUIRED_VALUE;
26   G_COL_NAME_TOKEN             CONSTANT VARCHAR2(30)  := OKC_API.G_COL_NAME_TOKEN;
27   ----------------------------------------------------------------------------------------
28   -- GLOBAL EXCEPTION
29   ----------------------------------------------------------------------------------------
30   G_ERROR                      EXCEPTION;
31   G_DUPLICATE_RECORD           EXCEPTION;
32   ----------------------------------------------------------------------------------------
33 
34   G_BULK_FETCH_LIMIT  CONSTANT NUMBER := 1000;
35 
36   g_serial_number  VARCHAR2(20) ;
37   g_quantity       VARCHAR2(20) ;
38   g_price          VARCHAR2(23) ;
39   g_installed_at   VARCHAR2(28) ;
40   g_ref            VARCHAR2(20) ;
41 
42 
43   l_param_party_id NUMBER ;
44 
45 l_chrv_tbl                      OKC_CONTRACT_PUB.chrv_tbl_type;
46 l_khrv_tbl                      OKS_CONTRACT_HDR_PUB.khrv_tbl_type;
47 l_klnv_tbl                      OKS_CONTRACT_LINE_PUB.klnv_tbl_type;
48 
49  -- BUG 4372877 --
50  -- GCHADHA --
51  -- 5/25/2005 --
52 TYPE get_prod_rec IS RECORD ( id1                 CSI_ITEM_INSTANCES.instance_ID%TYPE ,
53                               install_location_Id CSI_ITEM_INSTANCES.install_location_id%TYPE,
54                               quantity            CSI_ITEM_INSTANCES.quantity%TYPE,
55 			      instance_number     CSI_ITEM_INSTANCES.instance_number%TYPE,
56                               unit_of_measure     CSI_ITEM_INSTANCES.unit_of_measure%Type,
57                               unit_selling_price  OE_ORDER_LINES_ALL.unit_selling_price%TYPE,
58                               inventory_item_id   CSI_ITEM_INSTANCES.inventory_item_id%TYPE,
59                               serial_number       CSI_ITEM_INSTANCES.serial_number%TYPE,
60                               id2                 VARCHAR2(1),
61                               oe_line_id          NUMBER,
62 			     external_reference  CSI_ITEM_INSTANCES.external_reference%TYPE -- new
63 
64                             );
65 
66 -- END GCHADHA --
67 
68  -- BUG 4372877 --
69  -- GCHADHA --
70  -- 5/25/2005 --
71 TYPE prod_rec IS RECORD (config_parent_id    CSI_ITEM_INSTANCES.instance_id%TYPE,
72                          id1                 CSI_ITEM_INSTANCES.instance_ID%TYPE ,
73                          install_location_Id CSI_ITEM_INSTANCES.install_location_id%TYPE,
74                          quantity            CSI_ITEM_INSTANCES.quantity%TYPE,
75                          instance_number     CSI_ITEM_INSTANCES.instance_number%TYPE,
76                          unit_of_measure     CSI_ITEM_INSTANCES.unit_of_measure%Type,
77                          unit_selling_price  OE_ORDER_LINES_ALL.unit_selling_price%TYPE,
78                          inventory_item_id   CSI_ITEM_INSTANCES.inventory_item_id%TYPE,
79                          parent_inventory_item_id CSI_ITEM_INSTANCES.inventory_item_id%TYPE,
80                          serial_number       CSI_ITEM_INSTANCES.serial_number%TYPE,
81                          id2                 VARCHAR2(1),
82                          oe_line_id          NUMBER ,
83                          model_level         NUMBER,
84 			 external_reference  CSI_ITEM_INSTANCES.external_reference%TYPE -- new
85                          );
86 TYPE prod_tbl is Table of prod_rec INDEX BY BINARY_INTEGER;
87 -- END GCHADHA --
88 
89 g_prod_rec prod_rec;
90 g_prod_tbl prod_tbl;
91 
92 TYPE clvl_filter_rec IS RECORD(  clvl_level        VARCHAR2(200)
93                                 ,clvl_lse_id       Number
94                                 ,clvl_party_id     NUMBER
95                                 ,clvl_auth_org_id  NUMBER
96                                 ,clvl_name         VARCHAR2(1000)
97                                 ,clvl_description  VARCHAR2(1000)
98                                 ,clvl_inv_org_id   NUMBER
99                                 ,clvl_filter       VARCHAR2(25)
100                                 ,clvl_default      VARCHAR2(25)
101                                 ,clvl_find_id      NUMBER
102                                 ,clvl_organization_id NUMBER
103                                 ,clvl_display_pref VARCHAR2(25),
104                                  lbl_serial_number   VARCHAR2(20),
105                                  lbl_quantity        VARCHAR2(20),
106                                  lbl_price           VARCHAR2(23)   ,
107                                  lbl_installed_at    VARCHAR2(28),
108                                  lbl_ref             VARCHAR2(20) );
109 
110 
111 TYPE clvl_filter_tbl  IS TABLE OF clvl_filter_rec INDEX BY BINARY_INTEGER;
112 g_clvl_filter_rec clvl_filter_rec;
113 
114 -- BUG 4372877 --
115  -- GCHADHA --
116  -- 5/25/2005 --
117 TYPE prod_selections_rec IS RECORD ( rec_no       NUMBER,
118                                      rec_name     VARCHAR2(15),
119                                      rec_type     Varchar2(1),
120                                      config_parent_id Number,
121                                      cp_id        Number,
122                                      cp_id2       Varchar2(1),
123                                      ser_number   CSI_ITEM_INSTANCES.serial_Number%TYPE,
124                                      ref_number   CSI_ITEM_INSTANCES.instance_Number%TYPE,
125                                      quantity     CSI_ITEM_INSTANCES.quantity%TYPE,
126                                      site_id      CSI_ITEM_INSTANCES.install_location_id%TYPE,
127                                      site_name    VARCHAR2(2000), -- Bug 4915711
128                                      inventory_item_id CSI_ITEM_INSTANCES.inventory_item_id%TYPE,
129                                      id           Number,
130                                      name         Varchar2(2000), -- Bug 4915711 --
131                                      display_name Varchar2(2000), -- Bug 4915711 --
132                                      description  OKC_K_LINES_V.ITEM_DESCRIPTION%TYPE,
133                                      uom_code     CSI_ITEM_INSTANCES.unit_of_measure%TYPE,
134                                      orig_net_amt OE_ORDER_LINES_ALL.unit_selling_price%TYPE,
135                                      price        Number,
136                                      model_level Number,
137 				     ext_reference  CSI_ITEM_INSTANCES.external_reference%TYPE -- new
138                                      );
139  -- END GCHADHA --
140 
141   TYPE prod_selections_tbl IS TABLE OF prod_selections_rec INDEX BY BINARY_INTEGER;
142   g_prod_selections_tbl prod_selections_tbl;
143 
144   TYPE clvl_selections_rec IS RECORD ( rec_no             NUMBER,
145                                        rec_name           VARCHAR2(15),
146                                        rec_type           VARCHAR2(1),
147                                        id1                OKX_CUSTOMER_ACCOUNTS_V.id1%TYPE,
148                                        name               OKX_CUSTOMER_ACCOUNTS_V.name%TYPE,
149                                        id2                OKX_CUSTOMER_ACCOUNTS_V.id2%TYPE,
150                                        Party_id           OKX_PARTIES_V.id1%TYPE,
151                                        party_name         OKX_PARTIES_V.name%TYPE,
152                                        description        Varchar2(2000),
153                                        display_name       VARCHAR2(500),
154                                        clvl_id            NUMBER,
155                                        clvl_name          VARCHAR2(200),
156                                        lse_id             NUMBER,
157                                        lse_name           VARCHAR2(20) );
158 
159   TYPE clvl_selections_tbl IS TABLE OF clvl_selections_rec INDEX BY BINARY_INTEGER;
160   g_clvl_selections_tbl clvl_selections_tbl;
161 
162 
163   TYPE cust_id_rec IS RECORD ( customer_id OKX_CUSTOMER_ACCOUNTS_V.id1%TYPE,
164                                customer_name OKX_CUSTOMER_ACCOUNTS_V.name%TYPE);
165   TYPE cust_id_tbl IS TABLE of cust_id_rec INDEX BY BINARY_INTEGER;
166 
167   TYPE party_id_rec IS RECORD ( party_id OKX_PARTIES_V.id1%TYPE,
168                                 party_name OKX_PARTIES_V.name%TYPE );
169 
170   TYPE party_id_tbl IS TABLE of party_id_rec INDEX BY BINARY_INTEGER;
171 
172   PROCEDURE GetSelections_prod(p_api_version         IN  NUMBER
173                               ,p_init_msg_list       IN  VARCHAR2
174                               ,p_clvl_filter_rec     IN  clvl_filter_rec
175                               ,x_return_status       OUT NOCOPY VARCHAR2
176                               ,x_msg_count           OUT NOCOPY NUMBER
177                               ,x_msg_data            OUT NOCOPY VARCHAR2
178                               ,x_prod_selections_tbl OUT NOCOPY prod_selections_tbl);
179 
180   PROCEDURE GetSelections_other(p_api_version         IN  NUMBER
181                                ,p_init_msg_list       IN  VARCHAR2
182                                ,p_clvl_filter_rec     IN  clvl_filter_rec
183                                ,x_return_status       OUT NOCOPY VARCHAR2
184                                ,x_msg_count           OUT NOCOPY NUMBER
185                                ,x_msg_data            OUT NOCOPY VARCHAR2
186                                ,x_clvl_selections_tbl OUT NOCOPY clvl_selections_tbl);
187 
188 
189   /** Procedure for copying/splitting service lines **/
190   TYPE copy_source_rec is RECORD(cle_id     NUMBER
191                                 ,item_id    VARCHAR2(40)
192                                 ,amount     NUMBER);
193   TYPE copy_target_rec is RECORD(cle_id     NUMBER
194                                 ,item_id    VARCHAR2(40)
195                                 ,item_desc  VARCHAR2(1000)
196                                 ,amount     NUMBER
197                                 ,percentage NUMBER);
198   TYPE copy_target_tbl is table of copy_target_rec INDEX BY BINARY_INTEGER;
199   PROCEDURE CopyService(p_api_version   IN  NUMBER
200                        ,p_init_msg_list IN  VARCHAR2
201                        ,p_source_rec    IN  copy_source_rec
202                        ,p_target_tbl    IN  copy_target_tbl
203                        ,x_return_status OUT NOCOPY VARCHAR2
204                        ,x_msg_count     OUT NOCOPY NUMBER
205                        ,x_msg_data      OUT NOCOPY VARCHAR2
206 		             ,p_change_status IN  VARCHAR2 DEFAULT 'Y'); -- LLC Added additional flag parameter to the call
207 				   									  -- to not allow change of status of sublines of the
208 													  -- topline during update service
209 
210 TYPE contact_point_rec IS RECORD
211       (contact_point_id    NUMBER,
212        contact_point_type  VARCHAR2(30),
213        status	           VARCHAR2(30),
214        owner_table_name	   VARCHAR2(30),
215        owner_table_id	   NUMBER,
216        primary_flag	   VARCHAR2(1),
217        content_source_type VARCHAR2(30),
218        email_address       VARCHAR2(2000),
219        area_code           VARCHAR2(10),
220        phone_country_code  VARCHAR2(10)); -- added phone country code for HZ
221 
222 
223 TYPE Clvl_Rec_Type IS RECORD
224       (
225         Coverage_Level_Line_Id     Number,
226         Price_Unit                 Number,
227         Price_Unit_Percent         Number,
228         Price_Negotiated           Number
229     );
230 
231 
232 /*TYPE contact_dtl_rec IS RECORD
233 (
234   contact_id         NUMBER,
235   contact_first_name VARCHAR2(2000),
236   contact_name       VARCHAR2(2000),
237   party_id           NUMBER,
238   party_name         VARCHAR2(2000),
239   email_point_id     NUMBER,
240   email              VARCHAR2(2000),
241   phone_point_id     NUMBER,
242   phone              VARCHAR2(2000),
243   fax_point_id       NUMBER,
244   fax                VARCHAR2(2000),
245   quote_site_id      NUMBER,
246   quote_address      VARCHAR2(2000),
247   quote_city         VARCHAR2(2000),
248   quote_country      VARCHAR2(2000)
249 
250 );
251 */
252 
253 
254 PROCEDURE Create_Contact_Points
255  (
256   p_api_version         IN   Number,
257   p_init_msg_list       IN   Varchar2,
258   p_commit              IN   Varchar2,
259   P_contact_point_rec   IN   contact_point_rec,
260   x_return_status       OUT NOCOPY  Varchar2,
261   x_msg_count           OUT NOCOPY  Number,
262   x_msg_data            OUT NOCOPY  Varchar2,
263   x_contact_point_id    OUT NOCOPY  Number);
264 
265 PROCEDURE Update_Contact_Points
266  (
267   p_api_version         IN   Number,
268   p_init_msg_list       IN   Varchar2,
269   P_commit              IN   Varchar2,
270   P_contact_point_rec   IN   contact_point_rec,
271   x_return_status       OUT NOCOPY  Varchar2,
272   x_msg_count           OUT NOCOPY  Number,
273   x_msg_data            OUT NOCOPY  Varchar2);
274 
275 
276 PROCEDURE CreateOperationInstance(p_chr_id IN NUMBER
277                                    ,p_object1_id1 IN VARCHAR2
278                                    ,p_object1_id2 IN VARCHAR2
279                                    ,p_jtot_object1_code IN VARCHAR2
280                                    ,x_return_status OUT NOCOPY VARCHAR2
281                                    ,x_oie_id OUT NOCOPY NUMBER);
282 
283 PROCEDURE CreateOperationLines(p_chr_id IN NUMBER
284                                 ,p_object_line_id IN NUMBER
285                                 ,p_subject_line_id IN NUMBER
286                                 ,p_oie_id IN NUMBER
287                            --BUG#4066428 01/24/05 hkamdar
288                            --     ,x_return_status OUT NOCOPY NUMBER);
289                                 ,x_return_status OUT NOCOPY VARCHAR2);
290 			   --End BUG#4066428 01/24/05 hkamdar
291 FUNCTION get_item_desc(p_inventory_item_id IN NUMBER)
292 return VARCHAR2  ;
293 
294 FUNCTION get_item_name(p_inventory_item_id IN NUMBER)
295 return VARCHAR2  ;
296 
297 FUNCTION get_item_name(p_inventory_item_id IN NUMBER,
298                        p_organization_id    IN NUMBER)
299 return VARCHAR2  ;
300 
301 
302 FUNCTION get_item_desc(p_inventory_item_id IN NUMBER,
303                        p_organization_id    IN NUMBER)
304 return VARCHAR2  ;
305 
306 PROCEDURE CREATE_CII_FOR_SUBSCRIPTION
307 (
308       p_api_version   IN NUMBER,
309       p_init_msg_list IN VARCHAR2,
310       x_return_status OUT NOCOPY VARCHAR2,
311       x_msg_count     OUT NOCOPY NUMBER,
312       x_msg_data      OUT NOCOPY VARCHAR2,
313       p_cle_id        IN NUMBER,
314       p_quantity      IN NUMBER DEFAULT 1,
315       x_instance_id   OUT NOCOPY NUMBER
316 
317  );
318  PROCEDURE DELETE_CII_FOR_SUBSCRIPTION
319   ( p_api_version   IN NUMBER,
320       p_init_msg_list IN VARCHAR2,
321       x_return_status OUT NOCOPY VARCHAR2,
322       x_msg_count     OUT NOCOPY NUMBER,
323       x_msg_data      OUT NOCOPY VARCHAR2,
324       p_instance_id   IN NUMBER
325     ) ;
326 
327 
328 
329 PROCEDURE line_contact_name_addr(
330           p_object_code       IN  VARCHAR2,
331           p_id1               IN  VARCHAR2,
332           p_id2               IN  VARCHAR2,
333           x_name              OUT NOCOPY VARCHAR2,
334           x_addr              OUT NOCOPY okx_cust_sites_v.description%type);
335 
336 
337   TYPE opn_lines_rec Is Record
338   (creation_date  DATE,
339    subject_chr_id NUMBER,
340    object_chr_id  NUMBER,
341    subject_cle_id NUMBER,
342    object_cle_id  NUMBER
343    );
344 
345    Type opn_lines_tbl is TABLE of opn_lines_rec index by binary_integer;
346 
347    PROCEDURE select_renewal_info
348            (p_chr_id IN NUMBER,
349             x_operation_lines_tbl OUT NOCOPY opn_lines_tbl
350           );
351 
352    PROCEDURE update_renewal_info
353               (p_operation_lines_tbl IN opn_lines_tbl,
354                x_return_status OUT NOCOPY VARCHAR2,
355                x_msg_count     OUT NOCOPY NUMBER,
356                x_msg_data      OUT NOCOPY VARCHAR2
357                );
358 
359   TYPE price_adj_rec IS RECORD(list_line_id NUMBER,
360                                cle_id       NUMBER,
361                                chr_id       NUMBER);
362 
363   PROCEDURE CheckDuplicatePriceAdj(p_api_version   IN  NUMBER
364                                   ,p_init_msg_list IN  VARCHAR2
365                                   ,p_pradj_rec     IN  price_adj_rec
366                                   ,x_return_status OUT NOCOPY VARCHAR2
367                                   ,x_msg_count     OUT NOCOPY NUMBER
368                                   ,x_msg_data      OUT NOCOPY VARCHAR2);
369 
370    /** newly added procedure to calculate cascade service price */
371 
372   PROCEDURE Cascade_Service_Price(
373                                    p_api_version        IN  NUMBER,
374                                    p_init_msg_lISt      IN  VARCHAR2,
375                                    p_contract_line_id   IN  NUMBER,
376                                    p_new_service_price  IN  NUMBER,
377                                    x_return_status      OUT NOCOPY VARCHAR2,
378                                    x_msg_count          OUT NOCOPY NUMBER,
379                                    x_msg_data           OUT NOCOPY VARCHAR2
380                                  );
381 
382 
383 /*** PROCEDURE delete_contract  (
384                              p_api_version      IN NUMBER,
385                              p_init_msg_list    IN NUMBER,
386                              x_return_status    OUT NOCOPY VARCHAR2,
387                              x_msg_count        OUT NOCOPY NUMBER,
388                              x_msg_data         OUT NOCOPY VARCHAR2,
389                              p_chrv_tbl         IN  okc_contract_pub.chrv_tbl_type );
390 
391 
392 PROCEDURE Copy_Contract(
393                              p_api_version       IN VARCHAR2
394                              p_init_msg_list     IN VARCHAR2,
395                              x_return_status     OUT NOCOPY VARCHAR2,
396                              x_msg_count         OUT NOCOPY NUMBER,
397                              x_msg_data          OUT NOCOPY VARCHAR2,
398                              p_chr_id            IN  NUMBER,
399                              p_contract_number   IN  VARCHAR2,
400                              p_contract_number_modifier IN VARCHAR2,
401                              p_to_template_yn     IN  VARCHAR2,
402                              p_renew_ref_yn       IN  VARCHAR2,
403                              x_chr_id             OUT NOCOPY NUMBER ); ***/
404 
405 PROCEDURE update_quantity(p_cle_id         IN NUMBER,
406                           x_return_status      OUT NOCOPY VARCHAR2,
407                           x_msg_count          OUT NOCOPY NUMBER,
408                           x_msg_data           OUT NOCOPY VARCHAR2
409                                  );
410 -- start contact creation OCT 2004
411 
412 TYPE CUST_ACCOUNT_ROLE_REC_TYPE IS RECORD(
413 party_id              NUMBER,
414 cust_account_id       NUMBER,
415 role_type             VARCHAR2(30),
416 cust_account_role_id  NUMBER,
417 cust_acct_site_id     NUMBER,
418 primary_flag          VARCHAR2(1),
419 status                VARCHAR2(1)
420 );
421 
422 TYPE CUST_ACCOUNT_ROLE_tbl_TYPE IS TABLE OF CUST_ACCOUNT_ROLE_REC_TYPE INDEX BY BINARY_INTEGER;
423 
424 TYPE CUST_ACCT_SITE_REC_TYPE IS RECORD(
425 Cust_account_id     NUMBER,
426 party_site_id       NUMBER,
427 cust_acct_site_id   NUMBER
428 );
429 
430 TYPE CUST_ACCT_SITE_TBL_TYPE IS TABLE OF CUST_ACCT_SITE_REC_TYPE INDEX BY BINARY_INTEGER;
431 
432 TYPE PERSON_REC_TYPE IS RECORD(
433   party_id                  NUMBER,
434   person_pre_name_adjunct   VARCHAR2(30),
435   person_first_name         VARCHAR2(150),
436   person_last_name          VARCHAR2(150)
437 );
438 
439 TYPE person_tbl_type IS TABLE OF PERSON_REC_TYPE INDEX BY BINARY_INTEGER;
440 
441 TYPE relationship_rec_type IS RECORD(
442     relationship_id                 NUMBER,
443     subject_id                      NUMBER,
444     subject_type                    VARCHAR2(30),
445     subject_table_name              VARCHAR2(30),
446     object_id                       NUMBER,
447     object_type                     VARCHAR2(30),
448     object_table_name               VARCHAR2(30),
449     relationship_code               VARCHAR2(30),
450     relationship_type               VARCHAR2(30)
451 );
452 
453 TYPE relationship_tbl_type IS TABLE OF relationship_rec_type INDEX BY BINARY_INTEGER;
454 
455 TYPE org_contact_rec_type IS RECORD(
456     org_contact_id                  NUMBER,
457     job_title                       VARCHAR2(100),
458     job_title_code                  VARCHAR2(30),
459     party_site_id                  NUMBER
460 );
461 
462 TYPE org_contact_tbl_type IS TABLE OF org_contact_rec_type INDEX BY BINARY_INTEGER;
463 
464 TYPE party_site_rec_type IS RECORD(
465     party_site_id            NUMBER,
466     party_id                 NUMBER,
467     location_id              NUMBER,
468     mailstop                 VARCHAR2(30)
469 );
470 
471 TYPE party_site_tbl_type IS TABLE OF party_site_rec_type INDEX BY BINARY_INTEGER;
472 -- added the following procedure for contact creation oct 2004
473 PROCEDURE create_person (
474                           p_init_msg_list                    IN      VARCHAR2:= FND_API.G_FALSE,
475                           p_person_tbl                       IN      PERSON_TBL_TYPE,
476                           x_party_id                         OUT NOCOPY     NUMBER,
477                           x_party_number                     OUT NOCOPY     VARCHAR2,
478                           x_profile_id                       OUT NOCOPY     NUMBER,
479                           x_return_status                    OUT NOCOPY     VARCHAR2,
480                           x_msg_count                        OUT NOCOPY     NUMBER,
481                           x_msg_data                         OUT NOCOPY     VARCHAR2
482                        );
483 
484 PROCEDURE update_person (
485                           p_init_msg_list                    IN      VARCHAR2:= FND_API.G_FALSE,
486                           p_person_tbl                       IN      PERSON_TBL_TYPE,
487                           p_party_object_version_number      IN      NUMBER,
488                           x_profile_id                       OUT NOCOPY     NUMBER,
489                           x_return_status                    OUT NOCOPY     VARCHAR2,
490                           x_msg_count                        OUT NOCOPY     NUMBER,
491                           x_msg_data                         OUT NOCOPY     VARCHAR2
492                         );
493 
494 PROCEDURE create_org_contact (
495                                p_init_msg_list                    IN       VARCHAR2 := FND_API.G_FALSE,
496                                p_org_contact_tbl                  IN       ORG_CONTACT_TBL_TYPE,
497                                p_relationship_tbl_type            IN       relationship_tbl_type,
498                                x_org_contact_id                   OUT NOCOPY      NUMBER,
499                                x_party_rel_id                     OUT NOCOPY      NUMBER,
500                                x_party_id                         OUT NOCOPY      NUMBER,
501                                x_party_number                     OUT NOCOPY      VARCHAR2,
502                                x_return_status                    OUT NOCOPY      VARCHAR2,
503                                x_msg_count                        OUT NOCOPY      NUMBER,
504                                x_msg_data                         OUT NOCOPY      VARCHAR2
505                              );
506 
507 PROCEDURE update_org_contact (
508                                p_init_msg_list                    IN       VARCHAR2:= FND_API.G_FALSE,
509                                p_org_contact_tbl                  IN       ORG_CONTACT_TBL_TYPE,
510                                p_relationship_tbl_type            IN       relationship_tbl_type,
511                                p_cont_object_version_number       IN OUT NOCOPY   NUMBER,
512                                p_rel_object_version_number        IN OUT NOCOPY   NUMBER,
513                                p_party_object_version_number      IN OUT NOCOPY   NUMBER,
514                                x_return_status                    OUT NOCOPY      VARCHAR2,
515                                x_msg_count                        OUT NOCOPY      NUMBER,
516                                x_msg_data                         OUT NOCOPY      VARCHAR2
517                              );
518 
519 PROCEDURE create_party_site (
520                              p_init_msg_list                 IN          VARCHAR2 := FND_API.G_FALSE,
521                              p_party_site_tbl                IN          PARTY_SITE_TBL_TYPE,
522                              x_party_site_id                 OUT NOCOPY         NUMBER,
523                              x_party_site_number             OUT NOCOPY         VARCHAR2,
524                              x_return_status                 OUT NOCOPY         VARCHAR2,
525                              x_msg_count                     OUT NOCOPY         NUMBER,
526                              x_msg_data                      OUT NOCOPY         VARCHAR2
527                           );
528 
529 PROCEDURE update_party_site (
530                               p_init_msg_list                 IN          VARCHAR2 := FND_API.G_FALSE,
531                               p_party_site_tbl                IN          PARTY_SITE_TBL_TYPE,
532                               p_object_version_number         IN OUT NOCOPY      NUMBER,
533                               x_return_status                 OUT NOCOPY         VARCHAR2,
534                               x_msg_count                     OUT NOCOPY         NUMBER,
535                               x_msg_data                      OUT NOCOPY         VARCHAR2
536                             );
537 
538 PROCEDURE create_cust_account_role (
539                                      p_init_msg_list                         IN     VARCHAR2 := FND_API.G_FALSE,
540                                      p_cust_account_role_tbl                 IN     CUST_ACCOUNT_ROLE_tbl_TYPE,
541                                      x_cust_account_role_id                  OUT NOCOPY    NUMBER,
542                                      x_return_status                         OUT NOCOPY    VARCHAR2,
543                                      x_msg_count                             OUT NOCOPY    NUMBER,
544                                      x_msg_data                              OUT NOCOPY    VARCHAR2
545                                    ) ;
546 
547 PROCEDURE update_cust_account_role (
548                                      p_init_msg_list                         IN     VARCHAR2 := FND_API.G_FALSE,
549                                      p_cust_account_role_tbl                 IN     CUST_ACCOUNT_ROLE_tbl_TYPE,
550                                      p_object_version_number                 IN OUT NOCOPY NUMBER,
551                                      x_return_status                         OUT NOCOPY    VARCHAR2,
552                                      x_msg_count                             OUT NOCOPY    NUMBER,
553                                      x_msg_data                              OUT NOCOPY    VARCHAR2
554                                    ) ;
555 
556 PROCEDURE create_cust_acct_site (
557                                   p_init_msg_list                         IN     VARCHAR2 := FND_API.G_FALSE,
558                                   p_cust_acct_site_tbl                    IN     CUST_ACCT_SITE_TBL_TYPE,
559                                   x_cust_acct_site_id                     OUT NOCOPY    NUMBER,
560                                   x_return_status                         OUT NOCOPY    VARCHAR2,
561                                   x_msg_count                             OUT NOCOPY    NUMBER,
562                                   x_msg_data                              OUT NOCOPY    VARCHAR2
563                                 );
564 
565 PROCEDURE update_cust_acct_site (
566                                   p_init_msg_list                         IN     VARCHAR2 := FND_API.G_FALSE,
567                                   p_cust_acct_site_tbl                    IN     CUST_ACCT_SITE_TBL_TYPE,
568                                   p_object_version_number                 IN OUT NOCOPY NUMBER,
569                                   x_return_status                         OUT NOCOPY    VARCHAR2,
570                                   x_msg_count                             OUT NOCOPY    NUMBER,
571                                   x_msg_data                              OUT NOCOPY    VARCHAR2
572                                );
573 -- end contact creation OCT2004--
574  /**** Partial Period Computation Project  **/
575 FUNCTION Is_Line_Eligible(
576                           p_api_version        IN  NUMBER,
577                           p_init_msg_list      IN  VARCHAR2,
578                           p_contract_hdr_id    IN  NUMBER, -- VARCHAR2
579 			  p_contract_line_id   IN  NUMBER,
580 			  p_price_list_id      IN  NUMBER,
581                           p_intent	       IN  VARCHAR2,
582                           x_msg_count          OUT NOCOPY NUMBER,
583                           x_msg_data           OUT NOCOPY VARCHAR2
584 			  ) RETURN BOOLEAN;
585  /**** Partial Period Computation Project  **/
586 
587      PROCEDURE check_update_amounts (
588                                     p_api_version                           IN NUMBER,
589                                     p_init_msg_list                         IN VARCHAR2 DEFAULT FND_API.G_FALSE,
590                                     p_commit                                IN VARCHAR2 DEFAULT FND_API.G_FALSE,
591                                     p_chr_id                                IN NUMBER,
592                                     x_msg_count                             OUT NOCOPY    NUMBER,
593                                     x_msg_data                              OUT NOCOPY    VARCHAR2,
594                                     x_return_status                         OUT NOCOPY    VARCHAR2
595                                     );
596 
597 FUNCTION get_net_reading(p_counter_id NUMBER)
598 RETURN  NUMBER ;
599 
600 END OKS_AUTH_UTIL_PVT;