1 PACKAGE BODY QP_MGD_EURO_CP AS
2 /* $Header: QPXCEURB.pls 120.1 2005/06/15 00:02:31 appldev $ */
3 --+=======================================================================+
4 --| Copyright (c) 2000 Oracle Corporation |
5 --| Redwood Shores, CA, USA |
6 --| All rights reserved. |
7 --+=======================================================================+
8 --| FILENAME |
9 --| QPXCEURB.pls |
10 --| |
11 --| DESCRIPTION |
12 --| Body of concurrent program package QP_MGD_EURO_CP |
13 --| |
14 --| HISTORY |
15 --| 01-May-2000 rajkrish Created |
16 --| 17-Aug-2000 rajkrish Updated |
17 --| 04-May-2001 tsimmond Added new procedure Run_All_Customer_ |
18 --| Conversion |
19 --| 05-Sep-2001 rajkrish TCA Model |
20 --| 03-APR-2002 tsimmond removed code |
21 --+======================================================================--
22
23 --===================
24 -- CONSTANTS
25 --===================
26 G_PKG_NAME CONSTANT VARCHAR2(30) := 'QP_MGD_EURO_CP';
27
28
29 --========================================================================
30 -- PROCEDURE : Run_Euro_Customer_Conversion PUBLIC
31 -- PARAMETERS:
32 -- x_retcode OUT NOCOPY /* file.sql.39 change */ VARCHAR2
33 -- x_errbuf OUT NOCOPY /* file.sql.39 change */ VARCHAR2
34 -- p_customer_id Customer being converted
35 -- p_customer_address_id Customer Site Address
36 -- p_convert_so_flag Flag to indicate of SO needs to be converted
37 -- p_line_invoice_to_org_id Bill to site of the Order Lines
38 -- p_so_conversion_ncu NCU of the So to be converted
39 -- Default is ALL
40 -- p_convert_partial_so Indicate to convert partially transacted SO
41 -- p_so_reprice_flag Reprice flag for the new Euro Order
42 -- NULL will take the original value
43 --
44 -- COMMENT : This is the concurrent program for EURO conversion of
45 -- customer and customer sites,
46 -- Including the Sales Orders.
47 --
48 --========================================================================
49 PROCEDURE Run_Euro_Customer_Conversion
50 ( x_retcode OUT NOCOPY /* file.sql.39 change */ VARCHAR2
51 , x_errbuf OUT NOCOPY /* file.sql.39 change */ VARCHAR2
52 , p_customer_id IN NUMBER
53 , p_customer_address_id IN NUMBER
54 , p_convert_so_flag IN VARCHAR2
55 , p_line_invoice_to_org_id IN NUMBER
56 , p_so_conversion_ncu IN VARCHAR2
57 , p_convert_partial_so IN VARCHAR2
58 , p_so_reprice_flag IN VARCHAR2
59 )
60 IS
61 BEGIN
62
63 x_retcode:='0';
64 x_errbuf :=' ';
65
66 ---code is removed, since Euro Customer Conversion program
67 ---is decomissioned
68
69 END Run_Euro_Customer_Conversion;
70
71
72 --========================================================================
73 -- PROCEDURE : Run_All_Customer_Conversion PUBLIC
74 -- PARAMETERS:
75 -- x_retcode OUT NOCOPY /* file.sql.39 change */ VARCHAR2
76 -- x_errbuf OUT NOCOPY /* file.sql.39 change */ VARCHAR2
77 -- p_default_euro_price_list_id Id of the default Euro price list
78 -- p_update_existing_euro_pl Yes/No to update existing price list
79 -- p_convert_so_flag Yes/No to convert Sales Orders
80 -- p_so_conversion_ncu NCU of the So to be converted
81 -- Default is ALL
82 -- p_convert_partial_so Yes/No to convert partially shipped SO
83 -- p_so_reprice_flag Yes/No to reprice all sales orders
84 --
85 -- COMMENT : This is the concurrent program for EURO conversion of
86 -- all customers and customer sites, including the Sales Orders
87 -- in one operation.
88 --
89 --========================================================================
90 PROCEDURE Run_All_Customer_Conversion
91 ( x_retcode OUT NOCOPY /* file.sql.39 change */ VARCHAR2
92 , x_errbuf OUT NOCOPY /* file.sql.39 change */ VARCHAR2
93 , p_default_euro_price_list_id IN NUMBER
94 , p_update_existing_euro_pl IN VARCHAR2
95 , p_convert_so_flag IN VARCHAR2
96 , p_so_conversion_ncu IN VARCHAR2
97 , p_convert_partial_so IN VARCHAR2
98 , p_so_reprice_flag IN VARCHAR2
99 )
100 IS
101 BEGIN
102
103 x_retcode:='0';
104 x_errbuf :=' ';
105
106 ---code is removed, since Euro Customer Conversion program
107 ---is decomissioned
108
109 END Run_All_Customer_Conversion;
110
111
112 END QP_MGD_EURO_CP;
113