1 PACKAGE BODY PO_MGD_EURO_CP AS
2 /* $Header: POXCEURB.pls 115.8 2002/11/23 03:32:18 sbull ship $*/
3 /*+=======================================================================+
4 --| Copyright (c) 1998 Oracle Corporation |
5 --| Redwood Shores, CA, USA |
6 --| All rights reserved. |
7 --+=======================================================================+
8 --| FILENAME |
9 --| POXCEURB.pls |
10 --| |
11 --| DESCRIPTION |
12 --| Body of concurrent program package PO_MGD_EURO_CP |
13 --| |
14 --| PROCEDURE LIST |
15 --| Run_Vendor_Conversion |
16 --| |
17 --| HISTORY |
18 --| 12/02/1999 tsimmond Created |
19 --| 04/30/2001 tsimmond Added new public procedure |
20 --| Run_All_Vendor_Conversion |
21 --| |
22 --| 11/28/2001 tsimmond updated, added set verify off |
23 --| 03/25/2002 tsimmond updated, code removed for patch 'H' remove |
24 --+======================================================================*/
25
26
27 --========================================================================
28 -- PROCEDURE : Run_Vendor_Conversion PUBLIC
29 -- PARAMETERS: x_errbuf error buffer
30 -- x_retcode 0 success, 1 warning, 2 error
31 -- p_vend_id Supplier ID
32 -- p_vend_site_id Supplier Site ID
33 -- p_site_from_ncu NCU address sites to be converted
34 -- p_standard_po_flag Indicate if Standard PO needs to be converted
35 -- p_blanket_po_flag Indicate if Blanket PO needs to be converted
36 -- p_planned_po_flag Indicate if Planned PO needs to be converted
37 -- p_contract_po_flag Indicate if Contract PO needs to be converted
38 -- p_po_from_ncu NCU POs to be converted
39 -- p_convert_partial Indicates if partially transacted PO need to be converted
40 -- p_db_flag Indicate if database needs to be updated
41 --
42 -- COMMENT : This is the concurrent program for EURO conversion of
43 -- supplier and supplier sites,
44 -- Including different types of Purchase Orders.
45 --
46 --========================================================================
47 PROCEDURE Run_Vendor_Conversion
48 ( x_errbuf OUT NOCOPY VARCHAR2
49 , x_retcode OUT NOCOPY VARCHAR2
50 , p_vend_id IN NUMBER
51 , p_vend_site_id IN NUMBER DEFAULT NULL
52 , p_site_from_ncu IN VARCHAR2 DEFAULT NULL
53 , p_standard_po_flag IN VARCHAR2 DEFAULT 'N'
54 , p_blanket_po_flag IN VARCHAR2 DEFAULT 'N'
55 , p_planned_po_flag IN VARCHAR2 DEFAULT 'N'
56 , p_contract_po_flag IN VARCHAR2 DEFAULT 'N'
57 , p_po_from_ncu IN VARCHAR2 DEFAULT NULL
58 , p_convert_partial IN VARCHAR2 DEFAULT 'N'
59 , p_db_flag IN VARCHAR2 DEFAULT 'N'
60 )
61 IS
62 BEGIN
63 x_retcode:='0';
64 x_errbuf :=' ';
65
66 END Run_Vendor_Conversion;
67
68
69 --========================================================================
70 -- PROCEDURE : Run_All_Vendor_Conversion PUBLIC
71 -- PARAMETERS: x_errbuf error buffer
72 -- x_retcode 0 success, 1 warning, 2 error
73 -- p_st_po_flag Indicate if Standard PO needs to be converted
74 -- p_bl_po_flag Indicate if Blanket PO needs to be converted
75 -- p_pl_po_flag Indicate if Planned PO needs to be converted
76 -- p_ct_po_flag Indicate if Contract PO needs to be converted
77 -- p_po_from_cur NCU POs to be converted
78 -- p_convert_part Indicates if partially transacted PO need
79 -- to be converted
80 --
81 -- COMMENT : This is the concurrent program for EURO conversion of
82 -- ALL Suppliers and Suppliers sites,
83 -- including the Purchase Orders.
84 --
85 --========================================================================
86 PROCEDURE Run_All_Vendor_Conversion
87 ( x_retcode OUT NOCOPY VARCHAR2
88 , x_errbuf OUT NOCOPY VARCHAR2
89 , p_st_po_flag IN VARCHAR2 DEFAULT 'N'
90 , p_bl_po_flag IN VARCHAR2 DEFAULT 'N'
91 , p_pl_po_flag IN VARCHAR2 DEFAULT 'N'
92 , p_ct_po_flag IN VARCHAR2 DEFAULT 'N'
93 , p_po_from_cur IN VARCHAR2 DEFAULT NULL
94 , p_convert_part IN VARCHAR2 DEFAULT 'N'
95 )
96 IS
97 BEGIN
98
99 x_retcode:='0';
100 x_errbuf :=' ';
101
102
103 END Run_All_Vendor_Conversion;
104
105 END PO_MGD_EURO_CP;
106