DBA Data[Home] [Help]

PACKAGE BODY: APPS.PO_MGD_EURO_CP

Source


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