PACKAGE BODY: APPS.OKC_TERMS_11510_MIG_PVT

Source

1 PACKAGE BODY OKC_TERMS_11510_MIG_PVT AS
2 /* $Header: OKCVMIGB.pls 120.0 2005/05/26 09:57:19 appldev noship $ */
3 
4   ---------------------------------------------------------------------------
5   -- Procedures and Functions
6   ---------------------------------------------------------------------------
7  Procedure migrate_to_11510(
8     p_batch_size      IN NUMBER,
9     x_return_status   OUT NOCOPY VARCHAR2,
10     x_msg_data        OUT NOCOPY VARCHAR2
11 
12     ) IS
13 BEGIN
14 NULL;
15 END migrate_to_11510;
16 
17 
18 
19 
20 PROCEDURE migrate_to_11510(errbuf              OUT NOCOPY VARCHAR2 ,
21                            retcode             OUT NOCOPY NUMBER,
22                            p_batch_size        IN NUMBER := 1000
23                             ) IS
24 l_return_status Varchar2(1);
25 l_msg_data      varchar2(1000);
26 BEGIN
27              okc_util.init_trace;
28 
29              migrate_to_11510(p_batch_size    => p_batch_size,
30                               x_return_status => l_return_status,
31                               x_msg_data      => l_msg_data);
32 
33                IF l_return_status <> 'S' THEN
34 	         RETCODE := 2;
35                ELSE
36                	 RETCODE:=0;
37                END IF;
38 
39                ERRBUF:=l_msg_data;
40                okc_util.stop_trace;
41 END migrate_to_11510;
42 
43 END OKC_TERMS_11510_MIG_PVT;