DBA Data[Home] [Help]

PACKAGE: APPS.OKS_AUTH_UTIL_PUB

Source


1 PACKAGE OKS_AUTH_UTIL_PUB AS
2 /* $Header: OKSPAUTS.pls 120.3 2005/11/09 05:43:28 maanand noship $ */
3 
4   -- GLOBAL VARIABLES
5   -------------------------------------------------------------------------------
6   G_PKG_NAME               CONSTANT VARCHAR2(200) := 'OKS_AUTH_UTIL_PUB';
7   G_APP_NAME_OKS           CONSTANT VARCHAR2(3)   :=  'OKS';
8   G_APP_NAME_OKC           CONSTANT VARCHAR2(3)   :=  'OKC';
9   G_SERIAL_NUMBER          CONSTANT VARCHAR2(10)  :=  'Srl: ';
10   G_QUANTITY               CONSTANT VARCHAR2(10)  :=  '; Qty: ';
11   G_PRICE                  CONSTANT VARCHAR2(10)  := '; Price: ';
12   G_INSTALLED_AT           CONSTANT VARCHAR2(15)  := '; Installed @ ';
13   G_REF                    CONSTANT VARCHAR2(10)  := '; Ref: ';
14   -------------------------------------------------------------------------------
15   ----------------------------------------------------------------------------------------
16   -- GLOBAL_MESSAGE_CONSTANTS
17   ----------------------------------------------------------------------------------------
18   G_TRUE                       CONSTANT VARCHAR2(1)   :=  OKC_API.G_TRUE;
19   G_FALSE                      CONSTANT VARCHAR2(1)   :=  OKC_API.G_FALSE;
20   G_RET_STS_SUCCESS            CONSTANT VARCHAR2(1)   :=  OKC_API.G_RET_STS_SUCCESS;
21   G_RET_STS_ERROR              CONSTANT VARCHAR2(1)   :=  OKC_API.G_RET_STS_ERROR;
22   G_RET_STS_UNEXP_ERROR        CONSTANT VARCHAR2(1)   :=  OKC_API.G_RET_STS_UNEXP_ERROR;
23   G_UNEXPECTED_ERROR           CONSTANT VARCHAR2(30)  := 'OKC_CONTRACTS_UNEXPECTED_ERROR';
24   G_SQLERRM_TOKEN              CONSTANT VARCHAR2(30)  := 'SQLerrm';
25   G_SQLCODE_TOKEN              CONSTANT VARCHAR2(30)  := 'SQLcode';
26   G_REQUIRED_VALUE             CONSTANT VARCHAR2(30)  := OKC_API.G_REQUIRED_VALUE;
27   G_COL_NAME_TOKEN             CONSTANT VARCHAR2(30)  := OKC_API.G_COL_NAME_TOKEN;
28   ----------------------------------------------------------------------------------------
29 
30   ----------------------------------------------------------------------------------------
31   -- GLOBAL EXCEPTION
32   ----------------------------------------------------------------------------------------
33   G_ERROR                      EXCEPTION;
34   ----------------------------------------------------------------------------------------
35 
36   --SUBTYPE DECLARATION
37   SUBTYPE clvl_filter_rec IS OKS_AUTH_UTIL_PVT.clvl_filter_rec;
38   SUBTYPE clvl_selections_tbl IS OKS_AUTH_UTIL_PVT.clvl_selections_tbl;
39   SUBTYPE prod_selections_tbl IS OKS_AUTH_UTIL_PVT.prod_selections_tbl;
40   SUBTYPE copy_source_rec IS OKS_AUTH_UTIL_PVT.copy_source_rec;
41   SUBTYPE copy_target_tbl IS OKS_AUTH_UTIL_PVT.copy_target_tbl;
42   SUBTYPE contact_point_rec IS OKS_AUTH_UTIL_PVT.contact_point_rec;
43 --  SUBTYPE contact_dtl_rec IS OKS_AUTH_UTIL_PVT.contact_dtl_rec;
44 
45 --  SUBTYPE prod_rec        IS OKS_AUTH_UTIL_PVT.prod_rec;
46 --  SUBTYPE prod_tbl        IS OKS_AUTH_UTIL_PVT.prod_tbl;
47 --  SUBTYPE cust_id_rec     IS OKS_AUTH_UTIL_PVT.cust_id_rec;
48 --  SUBTYPE cust_id_tbl     IS OKS_AUTH_UTIL_PVT.cust_id_tbl;
49 ------------------------------------------------------------------------
50      ---- start --CONTACT CREATION 11.5.10+ OCT 2004
51 ------------------------------------------------------------------------
52 SUBTYPE person_tbl_type IS OKS_AUTH_UTIL_PVT.person_tbl_type;
53 SUBTYPE relationship_tbl_type IS OKS_AUTH_UTIL_PVT.relationship_tbl_type;
54 SUBTYPE org_contact_tbl_type IS OKS_AUTH_UTIL_PVT.org_contact_tbl_type;
55 SUBTYPE party_site_tbl_type IS OKS_AUTH_UTIL_PVT.party_site_tbl_type;
56 SUBTYPE CUST_ACCOUNT_ROLE_tbl_TYPE IS OKS_AUTH_UTIL_PVT.CUST_ACCOUNT_ROLE_tbl_TYPE;
57 SUBTYPE CUST_ACCT_SITE_TBL_TYPE IS OKS_AUTH_UTIL_PVT.CUST_ACCT_SITE_TBL_TYPE;
58 
59 -- GCHADHA --
60 -- 28-OCT-2004 --
61 ---------------------------------------------------------------------------
62      -------- MUTLI CURRENCY PROJECT -------------------
63  -- Added two variable price_uom and line_price_uom for partial period project --
64 
65 
66   TYPE multi_line_rec IS RECORD
67     (
68       id                     OKC_K_LINES_V.ID%TYPE,
69       price_list_id          OKC_K_LINES_V.PRICE_LIST_ID%TYPE,
70       lse_id                 OKC_K_LINES_V.LSE_ID%TYPE,
71       line_pl_flag           Varchar2(1),
72       line_number            OKC_K_LINES_V.LINE_NUMBER%TYPE
73 -- Change Request Partial Period --
74 --      price_uom              OKS_K_LINES_V.PRICE_UOM%TYPE, -- new
75 --      line_uom_flag         VARCHAR2(1)  -- new
76 -- Change request Partial Period --
77   );
78   TYPE multi_line_tbl IS TABLE OF multi_line_rec INDEX BY BINARY_INTEGER;
79 ---------------------------------------------------------------------------
80 --END GCHADHA --
81 
82 
83 
84 -- end contact creation
85   PROCEDURE GetSelections_prod(p_api_version         IN  NUMBER
86                               ,p_init_msg_list       IN  VARCHAR2
87                               ,p_clvl_filter_rec     IN  clvl_filter_rec
88                               ,x_return_status       OUT NOCoPY VARCHAR2
89                               ,x_msg_count           OUT NOCoPY NUMBER
90                               ,x_msg_data            OUT NOCoPY VARCHAR2
91                               ,x_prod_selections_tbl OUT NOCoPY prod_selections_tbl);
92 
93   PROCEDURE GetSelections_other(p_api_version         IN  NUMBER
94                                ,p_init_msg_list       IN  VARCHAR2
95                                ,p_clvl_filter_rec     IN  clvl_filter_rec
96                                ,x_return_status       OUT NOCOPY VARCHAR2
97                                ,x_msg_count           OUT NOCOPY NUMBER
98                                ,x_msg_data            OUT NOCOPY VARCHAR2
99                                ,x_clvl_selections_tbl OUT NOCOPY clvl_selections_tbl);
100 
101   PROCEDURE CopyService(p_api_version   IN  NUMBER
102                        ,p_init_msg_list IN  VARCHAR2
103                        ,p_source_rec    IN  copy_source_rec
104                        ,p_target_tbl    IN  copy_target_tbl
105                        ,x_return_status OUT NOCOPY VARCHAR2
106                        ,x_msg_count     OUT NOCOPY NUMBER
107                        ,x_msg_data      OUT NOCOPY VARCHAR2
108 		             ,p_change_status IN  VARCHAR2 DEFAULT 'Y'); -- LLC Added additional flag parameter to the call
109 				   									  -- to not allow change of status of sublines of the
110 													  -- topline during update service
111 
112 
113    TYPE cur_rec Is Record
114     (
115      description           VARCHAR2(240),
116      segment1              VARCHAR2(40),
117      concatenated_segments VARCHAR2(40)
118     );
119 
120   TYPE hdr_cur_rec Is Record
121     (
122      short_description          VARCHAR2(240),
123      contract_number            VARCHAR2(120),
124      contract_number_modifier   VARCHAR2(120),
125      start_date                 DATE,
126      end_date                   DATE,
127      currency_code              OKC_K_HEADERS_B.CURRENCY_CODE%TYPE
128     );
129 
130   TYPE line_cur_rec Is Record
131     (
132      line_number          VARCHAR2(150),
133      start_date           DATE,
134      end_date             DATE,
135      cognomen             VARCHAR2(300),
136      lse_id               NUMBER
137     );
138 
139   TYPE in_parameter_record Is Record
140    (
141     chr_id               NUMBER,
142     line_id              NUMBER,
143     organization_id      NUMBER,
144     inventory_item_id    NUMBER
145    );
146 
147    PROCEDURE COPY_PARAMETER(
148                            p_api_version         IN NUMBER,
149                            p_init_msg_list       IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
150                            p_in_parameter_record IN  in_parameter_record,
151                            x_cur_rec             OUT NOCOPY cur_rec,
152                            x_hdr_cur_rec         OUT NOCOPY hdr_cur_rec,
153                            x_line_cur_rec        OUT NOCOPY line_cur_rec,
154                            x_return_status       OUT NOCOPY VARCHAR2,
155                            x_msg_count           OUT NOCOPY NUMBER,
156                            x_msg_data            OUT NOCOPY VARCHAR2 );
157 
158 FUNCTION chk_counter (p_object1_id1 NUMBER,
159 				  p_cle_id      NUMBER,
160 				  p_lse_id      NUMBER DEFAULT NULL) RETURN NUMBER;
161 
162 FUNCTION chk_event (p_object1_id1               NUMBER DEFAULT NULL,
163 				p_cle_id                    NUMBER DEFAULT NULL,
164 				p_lse_id                    NUMBER DEFAULT NULL,
165 				p_counter_group_id          NUMBER DEFAULT NULL,
166 				p_template_counter_group_id NUMBER DEFAULT NULL) RETURN NUMBER;
167 
168 
169 
170 PROCEDURE Contact_Point
171  (
172   p_api_version         IN   NUMBER,
173   p_init_msg_list       IN   VARCHAR2,
174   P_commit              IN   VARCHAR2,
175   P_contact_point_rec   IN   contact_point_rec,
176   x_return_status       OUT  NOCOPY VARCHAR2,
177   x_msg_count           OUT  NOCOPY NUMBER,
178   x_msg_data            OUT  NOCOPY VARCHAR2,
179   x_contact_point_id    OUT  NOCOPY NUMBER);
180 
181 
182 
183 PROCEDURE CREATE_CII_FOR_SUBSCRIPTION
184 (
185       p_api_version   IN NUMBER,
186       p_init_msg_list IN VARCHAR2,
187       x_return_status OUT NOCOPY VARCHAR2,
188       x_msg_count     OUT NOCOPY NUMBER,
189       x_msg_data      OUT NOCOPY VARCHAR2,
190       p_cle_id        IN NUMBER,
191       p_quantity      IN NUMBER DEFAULT 1,
192       x_instance_id   OUT NOCOPY NUMBER
193 
194  );
195 
196  PROCEDURE DELETE_CII_FOR_SUBSCRIPTION
197   ( p_api_version   IN NUMBER,
198       p_init_msg_list IN VARCHAR2,
199       x_return_status OUT NOCOPY VARCHAR2,
200       x_msg_count     OUT NOCOPY NUMBER,
201       x_msg_data      OUT NOCOPY VARCHAR2,
202       p_instance_id   IN NUMBER
203     ) ;
204 
205 FUNCTION def_sts_code(p_ste_code VARCHAR2) RETURN VARCHAR2;
206 FUNCTION get_ste_code(p_sts_code VARCHAR2) RETURN VARCHAR2;
207 -- start contact creation 10+ OCT 2004
208 PROCEDURE create_person (
209     p_init_msg_list                    IN      VARCHAR2:= FND_API.G_FALSE,
210     p_person_tbl                       IN      PERSON_TBL_TYPE,
211     x_party_id                         OUT NOCOPY     NUMBER,
212     x_party_number                     OUT NOCOPY     VARCHAR2,
213     x_profile_id                       OUT NOCOPY     NUMBER,
214     x_return_status                    OUT NOCOPY     VARCHAR2,
215     x_msg_count                        OUT NOCOPY     NUMBER,
216     x_msg_data                         OUT NOCOPY     VARCHAR2
217    );
218 
219 PROCEDURE update_person (
220     p_init_msg_list                    IN      VARCHAR2:= FND_API.G_FALSE,
221     p_person_tbl                       IN      PERSON_TBL_TYPE,
222     p_party_object_version_number      IN      NUMBER,
223     x_profile_id                       OUT NOCOPY     NUMBER,
224     x_return_status                    OUT NOCOPY     VARCHAR2,
225     x_msg_count                        OUT NOCOPY     NUMBER,
226     x_msg_data                         OUT NOCOPY     VARCHAR2
227    );
228 
229 PROCEDURE create_org_contact (
230     p_init_msg_list                    IN       VARCHAR2 := FND_API.G_FALSE,
231     p_org_contact_tbl                  IN       ORG_CONTACT_TBL_TYPE,
232     p_relationship_tbl_type            IN       relationship_tbl_type,
233     x_org_contact_id                   OUT NOCOPY      NUMBER,
234     x_party_rel_id                     OUT NOCOPY      NUMBER,
235     x_party_id                         OUT NOCOPY      NUMBER,
236     x_party_number                     OUT NOCOPY      VARCHAR2,
237     x_return_status                    OUT NOCOPY      VARCHAR2,
238     x_msg_count                        OUT NOCOPY      NUMBER,
239     x_msg_data                         OUT NOCOPY      VARCHAR2
240    );
241 PROCEDURE update_org_contact (
242     p_init_msg_list                    IN       VARCHAR2:= FND_API.G_FALSE,
243     p_org_contact_tbl                  IN       ORG_CONTACT_TBL_TYPE,
244     p_relationship_tbl_type            IN       relationship_tbl_type,
245     p_cont_object_version_number       IN OUT NOCOPY   NUMBER,
246     p_rel_object_version_number        IN OUT NOCOPY   NUMBER,
247     p_party_object_version_number      IN OUT NOCOPY   NUMBER,
248     x_return_status                    OUT NOCOPY      VARCHAR2,
249     x_msg_count                        OUT NOCOPY      NUMBER,
250     x_msg_data                         OUT NOCOPY      VARCHAR2
251   );
252 
253 PROCEDURE create_party_site (
254     p_init_msg_list                 IN          VARCHAR2 := FND_API.G_FALSE,
255     p_party_site_tbl                IN          PARTY_SITE_TBL_TYPE,
256     x_party_site_id                 OUT NOCOPY         NUMBER,
257     x_party_site_number             OUT NOCOPY         VARCHAR2,
258     x_return_status                 OUT NOCOPY         VARCHAR2,
259     x_msg_count                     OUT NOCOPY         NUMBER,
260     x_msg_data                      OUT NOCOPY         VARCHAR2
261   );
262 
263 PROCEDURE update_party_site (
264     p_init_msg_list                 IN          VARCHAR2 := FND_API.G_FALSE,
265     p_party_site_tbl                IN          PARTY_SITE_TBL_TYPE,
266     p_object_version_number         IN OUT NOCOPY      NUMBER,
267     x_return_status                 OUT NOCOPY         VARCHAR2,
268     x_msg_count                     OUT NOCOPY         NUMBER,
269     x_msg_data                      OUT NOCOPY         VARCHAR2
270   );
271 
272 PROCEDURE create_cust_account_role (
273     p_init_msg_list                         IN     VARCHAR2 := FND_API.G_FALSE,
274     p_cust_account_role_tbl                 IN     CUST_ACCOUNT_ROLE_tbl_TYPE,
275     x_cust_account_role_id                  OUT NOCOPY    NUMBER,
276     x_return_status                         OUT NOCOPY    VARCHAR2,
277     x_msg_count                             OUT NOCOPY    NUMBER,
278     x_msg_data                              OUT NOCOPY    VARCHAR2
279   ) ;
280 PROCEDURE update_cust_account_role (
281     p_init_msg_list                         IN     VARCHAR2 := FND_API.G_FALSE,
282     p_cust_account_role_tbl                 IN     CUST_ACCOUNT_ROLE_tbl_TYPE,
283     p_object_version_number                 IN OUT NOCOPY NUMBER,
284     x_return_status                         OUT NOCOPY    VARCHAR2,
285     x_msg_count                             OUT NOCOPY    NUMBER,
286     x_msg_data                              OUT NOCOPY    VARCHAR2
287   ) ;
288 PROCEDURE create_cust_acct_site (
289     p_init_msg_list                         IN     VARCHAR2 := FND_API.G_FALSE,
290     p_cust_acct_site_tbl                    IN     CUST_ACCT_SITE_TBL_TYPE,
291     x_cust_acct_site_id                     OUT NOCOPY    NUMBER,
292     x_return_status                         OUT NOCOPY    VARCHAR2,
293     x_msg_count                             OUT NOCOPY    NUMBER,
294     x_msg_data                              OUT NOCOPY    VARCHAR2
295   );
296 
297 PROCEDURE update_cust_acct_site (
298     p_init_msg_list                         IN     VARCHAR2 := FND_API.G_FALSE,
299     p_cust_acct_site_tbl                    IN     CUST_ACCT_SITE_TBL_TYPE,
300     p_object_version_number                 IN OUT NOCOPY NUMBER,
301     x_return_status                         OUT NOCOPY    VARCHAR2,
302     x_msg_count                             OUT NOCOPY    NUMBER,
303     x_msg_data                              OUT NOCOPY    VARCHAR2
304   );
305 
306 -- GCHADHA --
307 -- MULTI CURRENCY PROJECT --
308 --28-OCT-2004 --
309 -- ADDED A NEW PROCEDURE COMPUTE_PRICE_MULTIPLE_LINE --
310 PROCEDURE COMPUTE_PRICE_MULTIPLE_LINE(
311      p_api_version             IN         NUMBER,
312      p_detail_tbl                  IN         MULTI_LINE_TBL,
313      x_return_status               OUT NOCOPY VARCHAR2,
314      x_status_tbl                  OUT NOCOPY oks_qp_int_pvt.Pricing_Status_tbl
315 );
316 --END GCHADHA --
317 -- GCHADHA --
318 -- BUG 4053911 --
319 -- 15-DEC-2004 --
320 ---------------------------------------------------------------------------
321 PROCEDURE DELETE_PRICE_ADJUST_LINE(
322      p_api_version                 IN         NUMBER,
323      p_chr_id                      IN         NUMBER,
324      p_header_currency             IN         VARCHAR2 );
325 ---------------------------------------------------------------------------
326 --END GCHADHA --
327 
328 -------- Partial Period Computation Project -----
329 Function is_not_subscrip(p_cle_id Number) return varchar2;
330 --------- Partial Period Computation Project -----
331 
332 
333 -- end contact creation 10+ OCT 2004
334 END OKS_AUTH_UTIL_PUB;