DBA Data[Home] [Help]

PACKAGE: APPS.PON_NEGOTIATION_COPY_GRP

Source


1 PACKAGE pon_negotiation_copy_grp AUTHID CURRENT_USER AS
2 --$Header: PONGCPYS.pls 120.4.12020000.2 2013/02/09 05:21:18 hvutukur ship $
3 
4 
5 --
6 -- Different Copy types
7 --
8 
9 -- Copy type for New round Creation
10 g_new_rnd_copy       VARCHAR2(15) := 'NEW_ROUND';
11 
12 -- Copy type for Active and Published Negotiation
13 g_active_neg_copy    VARCHAR2(15) := 'COPY_ACTIVE';
14 
15 -- Copy type for Draft Negotiaiton Copy
16 g_draft_neg_copy     VARCHAR2(15) := 'COPY_DRAFT';
17 
18 -- Copy type for Amendment Creation
19 g_amend_copy         VARCHAR2(15) := 'AMENDMENT';
20 
21 -- Copy type for RFI to Auction/RFQ Creation
22 g_rfi_to_other_copy  VARCHAR2(15) := 'COPY_TO_DOC';
23 
24 -- Copy type for Amendmet to Conform Document
25 g_conformed_doc_copy  VARCHAR2(15) := 'CONFORMED_DOC';
26 
27 /* For Federal CLM Solicitation Amendments project.
28  * This attribute decides if document copy is coming for approval workflow or not.
29  * If copy_negotiation is called from approval workflow, commit is done by workflow not by
30  * copy_negotiation procedure.
31 */
32 g_from_workflow  VARCHAR2(1) := 'N';
33 
34 
35 -- Start of comments
36 --      API name  : COPY_NEGOTIATION
37 --
38 --      Type      : Group
39 --
40 --      Pre-reqs  : Negotiation with the given auction_header_id
41 --                        (p_source_auction_header_id) must exists in the database
42 --
43 --      Function  : Creates a negotiation from copying the negotiation
44 --                        with given auction_header_id (p_source_auction_header_id)
45 --
46 --     Parameters:
47 --     IN   :      p_api_version       NUMBER   Required
48 --     IN   :      p_init_msg_list     VARCHAR2   DEFAULT   FND_API.G_TRUE Optional
49 --     IN   :      p_is_conc_call            VARCHAR2   Required This indicates if the
50 --                                      procedure is called online or via a concurrent program
51 --     IN   :      p_source_auction_header_id  NUMBER Required, auction_header_id
52 --                                                      of the source negotiation
53 --     IN   :      p_trading_partner_id    NUMBER Required,  trading_partner_id of user
54 --                                                      for which the reultant negotiation will be created
55 --     IN   :      p_trading_partner_contact_id     NUMBER Required,
56 --                                                      trading_partner_contact_id of user for which the
57 --                                                      reultant negotiation will be created
58 --     IN   :      p_language         VARCHAR2 Required, language of the resultant negotiation
59 --     IN   :      p_user_id          NUMBER Required, user_id (FND) of the calling user;
60 --                                                      It will used for WHO informations also
61 --     IN   :      p_doctype_id       NUMBER Required, doctype_id of the output negotiation
62 --     IN   :      p_copy_type        VARCHAR2 Required, Type of Copy action;
63 --                                                      It should be one of the following -
64 --                                                      g_new_rnd_copy (NEW_ROUND)
65 --                                                      g_active_neg_copy (COPY_ACTIVE)
66 --                                                      g_draft_neg_copy (COPY_DRAFT)
67 --                                                      g_amend_copy (AMENDMENT)
68 --                                                      g_rfi_to_other_copy (COPY_TO_DOC)
69 --     IN   :      p_is_award_approval_reqd     VARCHAR2 Required, flag to decide if
70 --                                                      award approval is required;
71 --                                                      Permissible values are Y or N
72 --
73 --     IN   :      p_user_name      VARCHAR2 Required, user name of the caller in
74 --                                                     the PON_NEG_TEAM_MEMBERS.USER_NAME format
75 --
76 --     IN   :      p_mgr_id       NUMBER Required, manager id of the caller in
77 --                                                     the PON_NEG_TEAM_MEMBERS.USER_ID format
78 --
79 --     IN   :      p_retain_clause  VARCHAR2 Required, flag to carry forward the
80 --                                                      Contracts related information;
81 --                                                      Permissible values are Y or N
82 --     IN   :      p_update_clause  VARCHAR2 Required, flag to ue/updatedate the Contracts
83 --                                                      related information from library;
84 --                                                      Permissible values are Y or N
85 --     IN   :      p_retain_attachments      VARCHAR2 Required, flag to carry forward the
86 --                                                      attachments related to negotiation;
87 --                                                      Permissible values are Y or N
88 --     IN   :      p_large_auction_header_id NUMBER Optional, In the case of the
89 --                                                      source auction being a super large one,
90 --                                                      non null value of this parameter
91 --                                                      corresponds to the header id of the new
92 --                                                      auction whose header has been created.
93 --                                                      Non null values of this parameter
94 --                                                      indicate that this procedure is called from
95 --                                                      a concurrent procedure
96 --     IN   :      p_style_id         NUMBER Optional    This parameter gives the
97 --                                                      style id of the
98 --                                                      destination auction
99 --     OUT  :      x_auction_header_id      NUMBER,     auction_header_id of the
100 --                                                      generated negotiation;
101 --
102 --     OUT  :      x_document_number        NUMBER,       document number of the
103 --                                                      generated negotiation;
104 --
105 --     OUT  :      x_request_id             NUMBER,       id of the  concurrent
106 --                                                      request generated;
107 --
108 --     OUT  :      x_return_status          VARCHAR2, flag to indicate if the copy procedure
109 --                                                       was successful or not; It can have
110 --                                                      following values -
111 --                                                         FND_API.G_RET_STS_SUCCESS (Success)
112 --                                                         FND_API.G_RET_STS_ERROR  (Success with warning)
113 --                                                         FND_API.G_RET_STS_UNEXP_ERROR (Failed due to error)
114 --
115 --     OUT  :      x_msg_count              NUMBER,   the number of warning of error messages due
116 --                                                       to this procedure call. It will have following
117 --                                                       values  -
118 --                                                       0 (for Success without warning)
119 --                                                       1 (for failure with error, check the
120 --                                                       x_return_status if it is error or waring)
121 --                                                       1 or more (for Success with warning, check the x_return_status)
122 --
123 --     OUT  :      x_msg_data               VARCHAR2,  the standard message data output parameter
124 --                                                       used to return the first message of the stack
125 --
126 --    Version    : Current version    1.0
127 --                 Previous version   1.0
128 --                 Initial version    1.0
129 --
130 -- End of comments
131 
132 
133 PROCEDURE COPY_NEGOTIATION(
134                     p_api_version                 IN          NUMBER,
135                     p_init_msg_list               IN          VARCHAR2,
136                     p_is_conc_call                IN          VARCHAR2,
137                     p_source_auction_header_id    IN          NUMBER,
138                     p_trading_partner_id          IN          NUMBER ,
139                     p_trading_partner_contact_id  IN          NUMBER ,
140                     p_language                    IN          VARCHAR2,
141                     p_user_id                     IN          NUMBER,
142                     p_doctype_id                  IN          NUMBER,
143                     p_copy_type                   IN          VARCHAR2,
144                     p_is_award_approval_reqd      IN          VARCHAR2,
145                     p_user_name                   IN          VARCHAR2,
146                     p_mgr_id                      IN          NUMBER,
147                     p_retain_clause               IN          VARCHAR2,
148                     p_update_clause               IN          VARCHAR2,
149                     p_retain_attachments          IN          VARCHAR2,
150                     p_large_auction_header_id     IN         NUMBER,
151                     p_style_id                    IN         NUMBER,
152                     x_auction_header_id           OUT NOCOPY  NUMBER,
153                     x_document_number             OUT NOCOPY VARCHAR2,
154                     x_request_id                  OUT NOCOPY  NUMBER,
155                     x_return_status               OUT NOCOPY  VARCHAR2,
156                     x_msg_count                   OUT NOCOPY  NUMBER,
157                     x_msg_data                    OUT NOCOPY  VARCHAR2
158                     );
159 
160 
161 -- Start of comments
162 --      API name  : CONFORM_AMENDMENT
163 --
164 --      Type      : Group
165 --
166 --      Pre-reqs  : Negotiation with the given auction_header_id
167 --                        (p_source_auction_header_id) must exists in the database
168 --
169 --      Function  : Creates a negotiation from copying the negotiation
170 --                        with given auction_header_id (p_source_auction_header_id)
171 --
172 --     Parameters:
173 --     IN   :      p_api_version       NUMBER   Required
174 --     IN   :      p_init_msg_list     VARCHAR2   DEFAULT   FND_API.G_TRUE Optional
175 --     IN   :      p_is_conc_call            VARCHAR2   Required This indicates if the
176 --                                      procedure is called online or via a concurrent program
177 --     IN   :      p_source_auction_header_id  NUMBER Required, auction_header_id
178 --                                                      of the source negotiation
179 --     IN   :      p_trading_partner_id    NUMBER Required,  trading_partner_id of user
180 --                                                      for which the reultant negotiation will be created
181 --     IN   :      p_trading_partner_contact_id     NUMBER Required,
182 --                                                      trading_partner_contact_id of user for which the
183 --                                                      reultant negotiation will be created
184 --     IN   :      p_language         VARCHAR2 Required, language of the resultant negotiation
185 --     IN   :      p_user_id          NUMBER Required, user_id (FND) of the calling user;
186 --                                                      It will used for WHO informations also
187 --     IN   :      p_doctype_id       NUMBER Required, doctype_id of the output negotiation
188 --     IN   :      p_copy_type        VARCHAR2 Required, Type of Copy action;
189 --                                                      It should be one of the following -
190 --                                                      g_new_rnd_copy (NEW_ROUND)
191 --                                                      g_active_neg_copy (COPY_ACTIVE)
192 --                                                      g_draft_neg_copy (COPY_DRAFT)
193 --                                                      g_amend_copy (AMENDMENT)
194 --                                                      g_rfi_to_other_copy (COPY_TO_DOC)
195 --     IN   :      p_is_award_approval_reqd     VARCHAR2 Required, flag to decide if
196 --                                                      award approval is required;
197 --                                                      Permissible values are Y or N
198 --
199 --     IN   :      p_user_name      VARCHAR2 Required, user name of the caller in
200 --                                                     the PON_NEG_TEAM_MEMBERS.USER_NAME format
201 --
202 --     IN   :      p_mgr_id       NUMBER Required, manager id of the caller in
203 --                                                     the PON_NEG_TEAM_MEMBERS.USER_ID format
204 --
205 --     IN   :      p_retain_clause  VARCHAR2 Required, flag to carry forward the
206 --                                                      Contracts related information;
207 --                                                      Permissible values are Y or N
208 --     IN   :      p_update_clause  VARCHAR2 Required, flag to ue/updatedate the Contracts
209 --                                                      related information from library;
210 --                                                      Permissible values are Y or N
211 --     IN   :      p_retain_attachments      VARCHAR2 Required, flag to carry forward the
212 --                                                      attachments related to negotiation;
213 --                                                      Permissible values are Y or N
214 --     IN   :      p_large_auction_header_id NUMBER Optional, In the case of the
215 --                                                      source auction being a super large one,
216 --                                                      non null value of this parameter
217 --                                                      corresponds to the header id of the new
218 --                                                      auction whose header has been created.
219 --                                                      Non null values of this parameter
220 --                                                      indicate that this procedure is called from
221 --                                                      a concurrent procedure
222 --     IN   :      p_style_id         NUMBER Optional    This parameter gives the
223 --                                                      style id of the
224 --                                                      destination auction
225 --     OUT  :      x_auction_header_id      NUMBER,     auction_header_id of the
226 --                                                      generated negotiation;
227 --
228 --     OUT  :      x_document_number        NUMBER,       document number of the
229 --                                                      generated negotiation;
230 --
231 --     OUT  :      x_request_id             NUMBER,       id of the  concurrent
232 --                                                      request generated;
233 --
234 --     OUT  :      x_return_status          VARCHAR2, flag to indicate if the copy procedure
235 --                                                       was successful or not; It can have
236 --                                                      following values -
237 --                                                         FND_API.G_RET_STS_SUCCESS (Success)
238 --                                                         FND_API.G_RET_STS_ERROR  (Success with warning)
239 --                                                         FND_API.G_RET_STS_UNEXP_ERROR (Failed due to error)
240 --
241 --     OUT  :      x_msg_count              NUMBER,   the number of warning of error messages due
242 --                                                       to this procedure call. It will have following
243 --                                                       values  -
244 --                                                       0 (for Success without warning)
245 --                                                       1 (for failure with error, check the
246 --                                                       x_return_status if it is error or waring)
247 --                                                       1 or more (for Success with warning, check the x_return_status)
248 --
249 --     OUT  :      x_msg_data               VARCHAR2,  the standard message data output parameter
250 --                                                       used to return the first message of the stack
251 --
252 --    Version    : Current version    1.0
253 --                 Previous version   1.0
254 --                 Initial version    1.0
255 --
256 -- End of comments
257 
258 PROCEDURE CONFORM_AMENDMENT(
259                     p_source_auction_header_id    IN          NUMBER,
260                     x_auction_header_id           OUT NOCOPY  NUMBER,
261                     x_document_number             OUT NOCOPY VARCHAR2,
262                     x_request_id                  OUT NOCOPY  NUMBER,
266                     x_revision                    OUT NOCOPY  NUMBER
263                     x_return_status               OUT NOCOPY  VARCHAR2,
264                     x_msg_count                   OUT NOCOPY  NUMBER,
265                     x_msg_data                    OUT NOCOPY  VARCHAR2,
267                     );
268 
269 
270 --
271 -- This is a function required for the COPY_NEGOTIATION procedure
272 -- and shouldn't be used any where validates negotiation team members
273 --
274 -- CAUTION: This function may get removed. So, consult it before use.
275 
276 FUNCTION HAS_NEED_TO_COPY_MEMBER ( p_login_user_id           NUMBER,
277                                    p_login_manager_id        NUMBER,
278                                    p_copy_type               VARCHAR2,
279                                    p_memeber_id              NUMBER,
280                                    p_memeber_type            VARCHAR2,
281                                    p_busines_group_id        NUMBER,
282                                    p_member_busines_group_id NUMBER,
283                                    p_member_eff_start_date   DATE,
284                                    p_member_eff_end_date     DATE,
285                                    p_member_user_start_date  DATE,
286                                    p_member_user_end_date    DATE) RETURN VARCHAR2;
287 
288 
289 
290 --     Parameters:
291 --     IN   :      p_api_version               NUMBER   Required
292 --     IN   :      p_init_msg_list             VARCHAR2 DEFAULT   FND_API.G_TRUE Optional
293 --     IN   :      p_source_auction_header_id  NUMBER Required, auction_header_id of the source negotiation
294 --     IN   :      p_trading_partner_id        NUMBER Required,  trading_partner_id of user
295 --                                                      for which the reultant negotiation will be created
296 --     IN   :      p_trading_partner_contact_id NUMBER Required,  trading_partner_contact_id of
297 --                                                       user for which the reultant negotiation will be created
298 --     IN   :      p_language                  VARCHAR2 Required, language of the resultant negotiation
299 --     IN   :      p_user_id                   NUMBER Required, user_id (FND) of the calling user;
300 --                                                          It will used for WHO informations also
301 --     IN   :      p_doctype_id                NUMBER Required, doctype_id of the output negotiation
302 --     IN   :      p_copy_type                 VARCHAR2 Required, Type of Copy action;
303 --                                                   It should be one of the following -
304 --                                                        g_new_rnd_copy (NEW_ROUND)
305 --                                                        g_active_neg_copy (COPY_ACTIVE)
306 --                                                        g_draft_neg_copy (COPY_DRAFT)
307 --                                                        g_amend_copy (AMENDMENT)
308 --                                                        g_rfi_to_other_copy (COPY_TO_DOC)
309 --     IN   :      p_is_award_approval_reqd    VARCHAR2 Required, flag to decide if
310 --                                                         award approval is required;
311 --                                                         Permissible values are Y or N
312 --
313 --     IN   :      p_user_name                 VARCHAR2 Required, user name of the caller in
314 --                                                     the PON_NEG_TEAM_MEMBERS.USER_NAME format
315 --
316 --     IN   :      p_mgr_id                  NUMBER Required, manager id of the caller in
317 --                                                     the PON_NEG_TEAM_MEMBERS.USER_ID format
318 --
319 --     IN   :      p_retain_clause             VARCHAR2 Required, flag to carry forward the
320 --                                                       Contracts related information;
321 --                                                       Permissible values are Y or N
322 --     IN   :      p_update_clause             VARCHAR2 Required, flag to update the Contracts
323 --                                                       related information from library;
324 --                                                          Permissible values are Y or N
325 --     IN   :      p_retain_attachments        VARCHAR2 Required, flag to carry forward the
326 --                                                       attachments related to negotiation;
327 --                                                       Permissible values are Y or N
328 --     IN   :      p_large_auction_header_id NUMBER Optional, In the case of the
329 --                                                      source auction being a
330 --                                                      super large one,
331 --                                                      non null value of this
332 --                                                      parameter
333 --                                                      corresponds to the
334 --                                                      header id of the new
335 --                                                      auction whose header has
336 --                                                      been created.
337 --                                                      Non null values of this
338 --                                                      parameter
339 --                                                      indicate that this
340 --                                                      procedure is called from
341 --                                                      a concurrent procedure
342 --                                                      and null
343 --                                                      values of this parameter
344 --                                                      indicates the
345 --                                                      procedure being called
346 --                                                      online.
347 --     IN   :      p_style_id         NUMBER Optional    This parameter gives
351 PROCEDURE PON_CONC_COPY_SUPER_LARGE_NEG (
348 --                                                       the
349 --                                                      style id of the
350 --                                                      destination auction
352                     EFFBUF           OUT NOCOPY VARCHAR2,
353                     RETCODE          OUT NOCOPY VARCHAR2,
354                     p_api_version                IN         NUMBER,
355                     p_init_msg_list              IN         VARCHAR2 DEFAULT FND_API.G_TRUE,
356                     p_source_auction_header_id   IN         NUMBER,
357                     p_trading_partner_id         IN         NUMBER ,
358                     p_trading_partner_contact_id IN         NUMBER ,
359                     p_language                   IN         VARCHAR2,
360                     p_user_id                    IN         NUMBER,
361                     p_doctype_id                 IN         NUMBER,
362                     p_copy_type                  IN         VARCHAR2,
363                     p_is_award_approval_reqd     IN         VARCHAR2,
364                     p_user_name                  IN         VARCHAR2,
365                     p_mgr_id                     IN         NUMBER,
366                     p_retain_clause              IN         VARCHAR2,
367                     p_update_clause              IN         VARCHAR2,
368                     p_retain_attachments         IN         VARCHAR2,
369                     p_large_auction_header_id    IN         NUMBER,
370                     p_style_id                   IN         NUMBER);
371 
372 --PROCEDURE NAME: PON_LRG_DRAFT_TO_ORD_PF_COPY
373 --
374 --This procedure creates the relevant records for a large destination
375 --auction in the case of a copy from a large DRAFT to a normal auction.
376 --
377 --p_source_auction_hdr_id    IN
378 --DATATYPE: pon_large_neg_pf_values.AUCTION_HEADER_ID%type
379 --This parameter is the auction_header_id of the source auction
380 --
381 --p_destination_auction_hdr_id    IN
382 --DATATYPE: pon_large_neg_pf_values.AUCTION_HEADER_ID%type
383 --This parameter is the auction_header_id of the destination auction
384 --
385 --p_user_id    IN
386 --DATATYPE: NUMBER
387 --This parameter is the id of the user invoking the procedure
388 
389 PROCEDURE  PON_LRG_DRAFT_TO_ORD_PF_COPY (
390                 p_source_auction_hdr_id IN pon_large_neg_pf_values.AUCTION_HEADER_ID%type,
391                 p_destination_auction_hdr_id IN pon_large_neg_pf_values.AUCTION_HEADER_ID%type,
392                 p_user_id IN number,
393                 p_from_line_number         IN NUMBER,
394                 p_to_line_number           IN NUMBER);
395 
396 --
397 -- TEAM SCORING PROCEDURE TO COPY SCORING TEAMS, MEMBERS AND ASSIGNMENTS
398 --
399 
400 --------------------------------------------------------------------------
401 --
402 -- This procedure copies the details of the scoring teams
403 --
404 --  Tables handled here:
405 --
406 --  PON_SCORING_TEAMS   : Stores name of team, instructions
407 --  PON_SCORING_TEAM_MEMBERS  : Stores the members of the team
408 --  PON_SCORING_TEAM_SECTIONS : Stores the sections that the team has to score
409 --
410 -- Business rules:
411 --
412 --  1.  If the negotiation style of the target document does not allow
413 --      scoring teams, then do not copy any rows
414 --
415 --  2.  If the source auction does not have any scoring teams
416 -- 		do not attempt to copy teams or children over.
417 --
418 --  3.  If a collaboration team member is invalid at the time of copying
419 --      do not add him as a member
420 --
421 --------------------------------------------------------------------------
422 
423 PROCEDURE COPY_SCORING_TEAMS(
424     p_source_auction_header_id        	IN NUMBER,
425     p_auction_header_id               	IN NUMBER,
426     p_user_id                      		IN NUMBER
427     );
428 
429 --
430 -- END TEAM SCORING
431 --
432 
433 -- Start of comments
434 --      API name  : FED_CREATE_AMD_COPY_NEG
435 --
436 --      Type      : Group
437 --
438 --      Pre-reqs  : Negotiation with the given auction_header_id
439 --                  (p_source_auction_header_id) must exists in the database
440 --
441 --      Function  : Called only in Federal case.
442 --                  Creates a negotiation from copying the negotiation
443 --                  with given auction_header_id (p_source_auction_header_id).
444 --                  Once negotiation is copied, updates the AMENDMENT_FLAG accordingly.
445 --
446 --     Parameters:
447 --     IN   :      p_api_version       NUMBER   Required
448 --     IN   :      p_init_msg_list     VARCHAR2   DEFAULT   FND_API.G_TRUE Optional
449 --     IN   :      p_is_conc_call      VARCHAR2   Required This indicates if the
450 --                                      procedure is called online or via a concurrent program
451 --     IN   :      p_source_auction_header_id  NUMBER Required, auction_header_id
452 --                                                      of the source negotiation
453 --     IN   :      p_trading_partner_id    NUMBER Required,  trading_partner_id of user
454 --                                                      for which the reultant negotiation will be created
455 --     IN   :      p_trading_partner_contact_id     NUMBER Required,
456 --                                                      trading_partner_contact_id of user for which the
457 --                                                      reultant negotiation will be created
458 --     IN   :      p_language         VARCHAR2 Required, language of the resultant negotiation
459 --     IN   :      p_user_id          NUMBER Required, user_id (FND) of the calling user;
460 --                                                      It will used for WHO informations also
461 --     IN   :      p_doctype_id       NUMBER Required, doctype_id of the output negotiation
465 --                                                      g_active_neg_copy (COPY_ACTIVE)
462 --     IN   :      p_copy_type        VARCHAR2 Required, Type of Copy action;
463 --                                                      It should be one of the following -
464 --                                                      g_new_rnd_copy (NEW_ROUND)
466 --                                                      g_draft_neg_copy (COPY_DRAFT)
467 --                                                      g_amend_copy (AMENDMENT)
468 --                                                      g_rfi_to_other_copy (COPY_TO_DOC)
469 --     IN   :      p_is_award_approval_reqd     VARCHAR2 Required, flag to decide if
470 --                                                      award approval is required;
471 --                                                      Permissible values are Y or N
472 --
473 --     IN   :      p_user_name      VARCHAR2 Required, user name of the caller in
474 --                                                     the PON_NEG_TEAM_MEMBERS.USER_NAME format
475 --
476 --     IN   :      p_mgr_id       NUMBER Required, manager id of the caller in
477 --                                                     the PON_NEG_TEAM_MEMBERS.USER_ID format
478 --
479 --     IN   :      p_retain_clause  VARCHAR2 Required, flag to carry forward the
480 --                                                      Contracts related information;
481 --                                                      Permissible values are Y or N
482 --     IN   :      p_update_clause  VARCHAR2 Required, flag to ue/updatedate the Contracts
483 --                                                      related information from library;
484 --                                                      Permissible values are Y or N
485 --     IN   :      p_retain_attachments      VARCHAR2 Required, flag to carry forward the
486 --                                                      attachments related to negotiation;
487 --                                                      Permissible values are Y or N
488 --     IN   :      p_large_auction_header_id NUMBER Optional, In the case of the
489 --                                                      source auction being a super large one,
490 --                                                      non null value of this parameter
491 --                                                      corresponds to the header id of the new
492 --                                                      auction whose header has been created.
493 --                                                      Non null values of this parameter
494 --                                                      indicate that this procedure is called from
495 --                                                      a concurrent procedure
496 --     IN   :      p_style_id         NUMBER Optional    This parameter gives the
497 --                                                      style id of the
498 --                                                      destination auction
499 --     OUT  :      x_auction_header_id      NUMBER,     auction_header_id of the
500 --                                                      generated negotiation;
501 --
502 --     OUT  :      x_document_number        NUMBER,       document number of the
503 --                                                      generated negotiation;
504 --
505 --     OUT  :      x_request_id             NUMBER,       id of the  concurrent
506 --                                                      request generated;
507 --
508 --     OUT  :      x_return_status          VARCHAR2, flag to indicate if the copy procedure
509 --                                                       was successful or not; It can have
510 --                                                      following values -
511 --                                                         FND_API.G_RET_STS_SUCCESS (Success)
512 --                                                         FND_API.G_RET_STS_ERROR  (Success with warning)
513 --                                                         FND_API.G_RET_STS_UNEXP_ERROR (Failed due to error)
514 --
515 --     OUT  :      x_msg_count              NUMBER,   the number of warning of error messages due
516 --                                                       to this procedure call. It will have following
517 --                                                       values  -
518 --                                                       0 (for Success without warning)
519 --                                                       1 (for failure with error, check the
520 --                                                       x_return_status if it is error or waring)
521 --                                                       1 or more (for Success with warning, check the x_return_status)
522 --
523 --     OUT  :      x_msg_data               VARCHAR2,  the standard message data output parameter
524 --                                                       used to return the first message of the stack
525 --
526 --    Version    : Current version    1.0
527 --                 Previous version   1.0
528 --                 Initial version    1.0
529 --
530 -- End of comments
531 
532 PROCEDURE FED_CREATE_AMD_COPY_NEG(
533                     p_api_version                 IN          NUMBER,
534                     p_init_msg_list               IN          VARCHAR2,
535                     p_is_conc_call                IN          VARCHAR2,
536                     p_source_auction_header_id    IN          NUMBER,
537                     p_trading_partner_id          IN          NUMBER ,
538                     p_trading_partner_contact_id  IN          NUMBER ,
539                     p_language                    IN          VARCHAR2,
540                     p_user_id                     IN          NUMBER,
541                     p_doctype_id                  IN          NUMBER,
542                     p_copy_type                   IN          VARCHAR2,
543                     p_is_award_approval_reqd      IN          VARCHAR2,
544                     p_user_name                   IN          VARCHAR2,
545                     p_mgr_id                      IN          NUMBER,
546                     p_retain_clause               IN          VARCHAR2,
547                     p_update_clause               IN          VARCHAR2,
548                     p_retain_attachments          IN          VARCHAR2,
549                     p_large_auction_header_id     IN         NUMBER,
550                     p_style_id                    IN         NUMBER,
551 		    p_is_cancel_amendment         IN          VARCHAR2,
552                     x_auction_header_id           OUT NOCOPY  NUMBER,
553                     x_document_number             OUT NOCOPY VARCHAR2,
554                     x_request_id                  OUT NOCOPY  NUMBER,
555                     x_return_status               OUT NOCOPY  VARCHAR2,
556                     x_msg_count                   OUT NOCOPY  NUMBER,
557                     x_msg_data                    OUT NOCOPY  VARCHAR2
558                     );
559 
560 -- Begin Supplier Management: Evaluation Team
561 --
562 -- This procedure copies the details of the evaluation teams
563 --
564 PROCEDURE COPY_EVALUATION_TEAMS(
565     p_source_auction_header_id    IN NUMBER,
566     p_auction_header_id           IN NUMBER,
567     p_user_id                     IN NUMBER
568     );
569 -- End Supplier Management: Evaluation Team
570 
571 /*
572   Procedure to handle copy action in federal amendments.
573   This procedure is called when copy button is clicked from UI
574   This will copy attachment from base document to amendment
575   either for modification or deletion.
576 */
577 PROCEDURE COPY_FEDERAL_AMEND_ATTACHMENT (
578                                 p_from_entity_name  IN VARCHAR2,
579                                 p_from_pk1_value    IN VARCHAR2,
580                                 p_from_pk2_value    IN VARCHAR2,
581                                 p_from_pk3_value    IN VARCHAR2,
582                                 p_to_entity_name    IN VARCHAR2,
583                                 p_to_pk1_value      IN VARCHAR2,
584                                 p_to_pk2_value      IN VARCHAR2,
585                                 p_to_pk3_value      IN VARCHAR2,
586                                 p_created_by        IN NUMBER DEFAULT NULL ,
587                                 p_last_update_login IN NUMBER DEFAULT NULL ,
588                                 p_orig_attach_doc_id IN NUMBER,
589                                 x_result OUT NOCOPY VARCHAR2
590                               );
591 
592 END PON_NEGOTIATION_COPY_GRP;