DBA Data[Home] [Help]

PACKAGE: APPS.OKL_VCR_PVT

Source


1 PACKAGE OKL_VCR_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLSVCRS.pls 120.0 2005/07/28 11:30:08 sjalasut noship $ */
3   ---------------------------------------------------------------------------
4   -- GLOBAL DATASTRUCTURES
5   ---------------------------------------------------------------------------
6   -- OKL_VP_CHANGE_REQUESTS_V Record Spec
7   TYPE vcrv_rec_type IS RECORD (
8      id                             NUMBER := OKL_API.G_MISS_NUM
9     ,object_version_number          NUMBER := OKL_API.G_MISS_NUM
10     ,change_request_number          NUMBER := OKL_API.G_MISS_NUM
11     ,chr_id                         NUMBER := OKL_API.G_MISS_NUM
12     ,change_type_code               OKL_VP_CHANGE_REQUESTS_V.CHANGE_TYPE_CODE%TYPE := OKL_API.G_MISS_CHAR
13     ,status_code                    OKL_VP_CHANGE_REQUESTS_V.STATUS_CODE%TYPE := OKL_API.G_MISS_CHAR
14     ,request_date                   OKL_VP_CHANGE_REQUESTS_V.REQUEST_DATE%TYPE := OKL_API.G_MISS_DATE
15     ,effective_date                 OKL_VP_CHANGE_REQUESTS_V.EFFECTIVE_DATE%TYPE := OKL_API.G_MISS_DATE
16     ,approved_date                  OKL_VP_CHANGE_REQUESTS_V.APPROVED_DATE%TYPE := OKL_API.G_MISS_DATE
17     ,rejected_date                  OKL_VP_CHANGE_REQUESTS_V.REJECTED_DATE%TYPE := OKL_API.G_MISS_DATE
18     ,ineffective_date               OKL_VP_CHANGE_REQUESTS_V.INEFFECTIVE_DATE%TYPE := OKL_API.G_MISS_DATE
19     ,applied_date                   OKL_VP_CHANGE_REQUESTS_V.APPLIED_DATE%TYPE := OKL_API.G_MISS_DATE
20     ,attribute_category             OKL_VP_CHANGE_REQUESTS_V.ATTRIBUTE_CATEGORY%TYPE := OKL_API.G_MISS_CHAR
21     ,attribute1                     OKL_VP_CHANGE_REQUESTS_V.ATTRIBUTE1%TYPE := OKL_API.G_MISS_CHAR
22     ,attribute2                     OKL_VP_CHANGE_REQUESTS_V.ATTRIBUTE2%TYPE := OKL_API.G_MISS_CHAR
23     ,attribute3                     OKL_VP_CHANGE_REQUESTS_V.ATTRIBUTE3%TYPE := OKL_API.G_MISS_CHAR
24     ,attribute4                     OKL_VP_CHANGE_REQUESTS_V.ATTRIBUTE4%TYPE := OKL_API.G_MISS_CHAR
25     ,attribute5                     OKL_VP_CHANGE_REQUESTS_V.ATTRIBUTE5%TYPE := OKL_API.G_MISS_CHAR
26     ,attribute6                     OKL_VP_CHANGE_REQUESTS_V.ATTRIBUTE6%TYPE := OKL_API.G_MISS_CHAR
27     ,attribute7                     OKL_VP_CHANGE_REQUESTS_V.ATTRIBUTE7%TYPE := OKL_API.G_MISS_CHAR
28     ,attribute8                     OKL_VP_CHANGE_REQUESTS_V.ATTRIBUTE8%TYPE := OKL_API.G_MISS_CHAR
29     ,attribute9                     OKL_VP_CHANGE_REQUESTS_V.ATTRIBUTE9%TYPE := OKL_API.G_MISS_CHAR
30     ,attribute10                    OKL_VP_CHANGE_REQUESTS_V.ATTRIBUTE10%TYPE := OKL_API.G_MISS_CHAR
31     ,attribute11                    OKL_VP_CHANGE_REQUESTS_V.ATTRIBUTE11%TYPE := OKL_API.G_MISS_CHAR
32     ,attribute12                    OKL_VP_CHANGE_REQUESTS_V.ATTRIBUTE12%TYPE := OKL_API.G_MISS_CHAR
33     ,attribute13                    OKL_VP_CHANGE_REQUESTS_V.ATTRIBUTE13%TYPE := OKL_API.G_MISS_CHAR
34     ,attribute14                    OKL_VP_CHANGE_REQUESTS_V.ATTRIBUTE14%TYPE := OKL_API.G_MISS_CHAR
35     ,attribute15                    OKL_VP_CHANGE_REQUESTS_V.ATTRIBUTE15%TYPE := OKL_API.G_MISS_CHAR
36     ,request_id                     NUMBER := OKL_API.G_MISS_NUM
37     ,program_application_id         NUMBER := OKL_API.G_MISS_NUM
38     ,program_id                     NUMBER := OKL_API.G_MISS_NUM
39     ,program_update_date            OKL_VP_CHANGE_REQUESTS_V.PROGRAM_UPDATE_DATE%TYPE := OKL_API.G_MISS_DATE
40     ,created_by                     NUMBER := OKL_API.G_MISS_NUM
41     ,creation_date                  OKL_VP_CHANGE_REQUESTS_V.CREATION_DATE%TYPE := OKL_API.G_MISS_DATE
42     ,last_updated_by                NUMBER := OKL_API.G_MISS_NUM
43     ,last_update_date               OKL_VP_CHANGE_REQUESTS_V.LAST_UPDATE_DATE%TYPE := OKL_API.G_MISS_DATE
44     ,last_update_login              NUMBER := OKL_API.G_MISS_NUM);
45   G_MISS_vcrv_rec                         vcrv_rec_type;
46   TYPE vcrv_tbl_type IS TABLE OF vcrv_rec_type
47         INDEX BY BINARY_INTEGER;
48   -- OKL_VP_CHANGE_REQUESTS Record Spec
49   TYPE vcr_rec_type IS RECORD (
50      id                             NUMBER := OKL_API.G_MISS_NUM
51     ,object_version_number          NUMBER := OKL_API.G_MISS_NUM
52     ,change_request_number          NUMBER := OKL_API.G_MISS_NUM
53     ,chr_id                         NUMBER := OKL_API.G_MISS_NUM
54     ,change_type_code               OKL_VP_CHANGE_REQUESTS.CHANGE_TYPE_CODE%TYPE := OKL_API.G_MISS_CHAR
55     ,status_code                    OKL_VP_CHANGE_REQUESTS.STATUS_CODE%TYPE := OKL_API.G_MISS_CHAR
56     ,request_date                   OKL_VP_CHANGE_REQUESTS.REQUEST_DATE%TYPE := OKL_API.G_MISS_DATE
57     ,effective_date                 OKL_VP_CHANGE_REQUESTS.EFFECTIVE_DATE%TYPE := OKL_API.G_MISS_DATE
58     ,approved_date                  OKL_VP_CHANGE_REQUESTS.APPROVED_DATE%TYPE := OKL_API.G_MISS_DATE
59     ,rejected_date                  OKL_VP_CHANGE_REQUESTS.REJECTED_DATE%TYPE := OKL_API.G_MISS_DATE
60     ,ineffective_date               OKL_VP_CHANGE_REQUESTS.INEFFECTIVE_DATE%TYPE := OKL_API.G_MISS_DATE
61     ,applied_date                   OKL_VP_CHANGE_REQUESTS.APPLIED_DATE%TYPE := OKL_API.G_MISS_DATE
62     ,attribute_category             OKL_VP_CHANGE_REQUESTS.ATTRIBUTE_CATEGORY%TYPE := OKL_API.G_MISS_CHAR
63     ,attribute1                     OKL_VP_CHANGE_REQUESTS.ATTRIBUTE1%TYPE := OKL_API.G_MISS_CHAR
64     ,attribute2                     OKL_VP_CHANGE_REQUESTS.ATTRIBUTE2%TYPE := OKL_API.G_MISS_CHAR
65     ,attribute3                     OKL_VP_CHANGE_REQUESTS.ATTRIBUTE3%TYPE := OKL_API.G_MISS_CHAR
66     ,attribute4                     OKL_VP_CHANGE_REQUESTS.ATTRIBUTE4%TYPE := OKL_API.G_MISS_CHAR
67     ,attribute5                     OKL_VP_CHANGE_REQUESTS.ATTRIBUTE5%TYPE := OKL_API.G_MISS_CHAR
68     ,attribute6                     OKL_VP_CHANGE_REQUESTS.ATTRIBUTE6%TYPE := OKL_API.G_MISS_CHAR
69     ,attribute7                     OKL_VP_CHANGE_REQUESTS.ATTRIBUTE7%TYPE := OKL_API.G_MISS_CHAR
70     ,attribute8                     OKL_VP_CHANGE_REQUESTS.ATTRIBUTE8%TYPE := OKL_API.G_MISS_CHAR
71     ,attribute9                     OKL_VP_CHANGE_REQUESTS.ATTRIBUTE9%TYPE := OKL_API.G_MISS_CHAR
72     ,attribute10                    OKL_VP_CHANGE_REQUESTS.ATTRIBUTE10%TYPE := OKL_API.G_MISS_CHAR
73     ,attribute11                    OKL_VP_CHANGE_REQUESTS.ATTRIBUTE11%TYPE := OKL_API.G_MISS_CHAR
74     ,attribute12                    OKL_VP_CHANGE_REQUESTS.ATTRIBUTE12%TYPE := OKL_API.G_MISS_CHAR
75     ,attribute13                    OKL_VP_CHANGE_REQUESTS.ATTRIBUTE13%TYPE := OKL_API.G_MISS_CHAR
76     ,attribute14                    OKL_VP_CHANGE_REQUESTS.ATTRIBUTE14%TYPE := OKL_API.G_MISS_CHAR
77     ,attribute15                    OKL_VP_CHANGE_REQUESTS.ATTRIBUTE15%TYPE := OKL_API.G_MISS_CHAR
78     ,request_id                     NUMBER := OKL_API.G_MISS_NUM
79     ,program_application_id         NUMBER := OKL_API.G_MISS_NUM
80     ,program_id                     NUMBER := OKL_API.G_MISS_NUM
81     ,program_update_date            OKL_VP_CHANGE_REQUESTS.PROGRAM_UPDATE_DATE%TYPE := OKL_API.G_MISS_DATE
82     ,created_by                     NUMBER := OKL_API.G_MISS_NUM
83     ,creation_date                  OKL_VP_CHANGE_REQUESTS.CREATION_DATE%TYPE := OKL_API.G_MISS_DATE
84     ,last_updated_by                NUMBER := OKL_API.G_MISS_NUM
85     ,last_update_date               OKL_VP_CHANGE_REQUESTS.LAST_UPDATE_DATE%TYPE := OKL_API.G_MISS_DATE
86     ,last_update_login              NUMBER := OKL_API.G_MISS_NUM);
87   G_MISS_vcr_rec                          vcr_rec_type;
88   TYPE vcr_tbl_type IS TABLE OF vcr_rec_type
89         INDEX BY BINARY_INTEGER;
90   ---------------------------------------------------------------------------
91   -- GLOBAL MESSAGE CONSTANTS
92   ---------------------------------------------------------------------------
93   G_FND_APP                      CONSTANT VARCHAR2(200) := OKL_API.G_FND_APP;
94   G_FORM_UNABLE_TO_RESERVE_REC   CONSTANT VARCHAR2(200) := OKL_API.G_FORM_UNABLE_TO_RESERVE_REC;
95   G_FORM_RECORD_DELETED          CONSTANT VARCHAR2(200) := OKL_API.G_FORM_RECORD_DELETED;
96   G_FORM_RECORD_CHANGED          CONSTANT VARCHAR2(200) := OKL_API.G_FORM_RECORD_CHANGED;
97   G_RECORD_LOGICALLY_DELETED     CONSTANT VARCHAR2(200) := OKL_API.G_RECORD_LOGICALLY_DELETED;
98   G_REQUIRED_VALUE               CONSTANT VARCHAR2(200) := OKL_API.G_REQUIRED_VALUE;
99   G_INVALID_VALUE                CONSTANT VARCHAR2(200) := OKL_API.G_INVALID_VALUE;
100   G_COL_NAME_TOKEN               CONSTANT VARCHAR2(200) := OKL_API.G_COL_NAME_TOKEN;
101   G_PARENT_TABLE_TOKEN           CONSTANT VARCHAR2(200) := OKL_API.G_PARENT_TABLE_TOKEN;
102   G_CHILD_TABLE_TOKEN            CONSTANT VARCHAR2(200) := OKL_API.G_CHILD_TABLE_TOKEN;
103   G_UNEXPECTED_ERROR             CONSTANT VARCHAR2(200) := 'OKS_SERVICE_AVAILABILITY_UNEXPECTED_ERROR';
104   G_SQLCODE_TOKEN                CONSTANT VARCHAR2(200) := 'SQLcode';
105   G_SQLERRM_TOKEN                CONSTANT VARCHAR2(200) := 'SQLerrm';
106 
107   ---------------------------------------------------------------------------
108   -- GLOBAL EXCEPTIONS
109   ---------------------------------------------------------------------------
110   G_EXCEPTION_HALT_VALIDATION    EXCEPTION;
111 
112   ---------------------------------------------------------------------------
113   -- GLOBAL VARIABLES
114   ---------------------------------------------------------------------------
115   G_PKG_NAME                     CONSTANT VARCHAR2(200) := 'OKL_VCR_PVT';
116   G_APP_NAME                     CONSTANT VARCHAR2(3)   := OKL_API.G_APP_NAME;
117   ---------------------------------------------------------------------------
118   -- Procedures and Functions
119   ---------------------------------------------------------------------------
120 
121   PROCEDURE qc;
122   PROCEDURE change_version;
123   PROCEDURE api_copy;
124   PROCEDURE insert_row(
125     p_api_version                  IN NUMBER,
126     p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
127     x_return_status                OUT NOCOPY VARCHAR2,
128     x_msg_count                    OUT NOCOPY NUMBER,
129     x_msg_data                     OUT NOCOPY VARCHAR2,
130     p_vcrv_rec                     IN vcrv_rec_type,
131     x_vcrv_rec                     OUT NOCOPY vcrv_rec_type);
132   PROCEDURE insert_row(
133     p_api_version                  IN NUMBER,
134     p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
135     x_return_status                OUT NOCOPY VARCHAR2,
136     x_msg_count                    OUT NOCOPY NUMBER,
137     x_msg_data                     OUT NOCOPY VARCHAR2,
138     p_vcrv_tbl                     IN vcrv_tbl_type,
139     x_vcrv_tbl                     OUT NOCOPY vcrv_tbl_type,
140     px_error_tbl                   IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
141   PROCEDURE insert_row(
142     p_api_version                  IN NUMBER,
143     p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
144     x_return_status                OUT NOCOPY VARCHAR2,
145     x_msg_count                    OUT NOCOPY NUMBER,
146     x_msg_data                     OUT NOCOPY VARCHAR2,
147     p_vcrv_tbl                     IN vcrv_tbl_type,
148     x_vcrv_tbl                     OUT NOCOPY vcrv_tbl_type);
149   PROCEDURE lock_row(
150     p_api_version                  IN NUMBER,
151     p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
152     x_return_status                OUT NOCOPY VARCHAR2,
153     x_msg_count                    OUT NOCOPY NUMBER,
154     x_msg_data                     OUT NOCOPY VARCHAR2,
155     p_vcrv_rec                     IN vcrv_rec_type);
156   PROCEDURE lock_row(
157     p_api_version                  IN NUMBER,
158     p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
159     x_return_status                OUT NOCOPY VARCHAR2,
160     x_msg_count                    OUT NOCOPY NUMBER,
161     x_msg_data                     OUT NOCOPY VARCHAR2,
162     p_vcrv_tbl                     IN vcrv_tbl_type,
163     px_error_tbl                   IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
164   PROCEDURE lock_row(
165     p_api_version                  IN NUMBER,
166     p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
167     x_return_status                OUT NOCOPY VARCHAR2,
168     x_msg_count                    OUT NOCOPY NUMBER,
169     x_msg_data                     OUT NOCOPY VARCHAR2,
170     p_vcrv_tbl                     IN vcrv_tbl_type);
171   PROCEDURE update_row(
172     p_api_version                  IN NUMBER,
173     p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
174     x_return_status                OUT NOCOPY VARCHAR2,
175     x_msg_count                    OUT NOCOPY NUMBER,
176     x_msg_data                     OUT NOCOPY VARCHAR2,
177     p_vcrv_rec                     IN vcrv_rec_type,
178     x_vcrv_rec                     OUT NOCOPY vcrv_rec_type);
179   PROCEDURE update_row(
180     p_api_version                  IN NUMBER,
181     p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
182     x_return_status                OUT NOCOPY VARCHAR2,
183     x_msg_count                    OUT NOCOPY NUMBER,
184     x_msg_data                     OUT NOCOPY VARCHAR2,
185     p_vcrv_tbl                     IN vcrv_tbl_type,
186     x_vcrv_tbl                     OUT NOCOPY vcrv_tbl_type,
187     px_error_tbl                   IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
188   PROCEDURE update_row(
189     p_api_version                  IN NUMBER,
190     p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
191     x_return_status                OUT NOCOPY VARCHAR2,
192     x_msg_count                    OUT NOCOPY NUMBER,
193     x_msg_data                     OUT NOCOPY VARCHAR2,
194     p_vcrv_tbl                     IN vcrv_tbl_type,
195     x_vcrv_tbl                     OUT NOCOPY vcrv_tbl_type);
196   PROCEDURE delete_row(
197     p_api_version                  IN NUMBER,
198     p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
199     x_return_status                OUT NOCOPY VARCHAR2,
200     x_msg_count                    OUT NOCOPY NUMBER,
201     x_msg_data                     OUT NOCOPY VARCHAR2,
202     p_vcrv_rec                     IN vcrv_rec_type);
203   PROCEDURE delete_row(
204     p_api_version                  IN NUMBER,
205     p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
206     x_return_status                OUT NOCOPY VARCHAR2,
207     x_msg_count                    OUT NOCOPY NUMBER,
208     x_msg_data                     OUT NOCOPY VARCHAR2,
209     p_vcrv_tbl                     IN vcrv_tbl_type,
210     px_error_tbl                   IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
211   PROCEDURE delete_row(
212     p_api_version                  IN NUMBER,
213     p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
214     x_return_status                OUT NOCOPY VARCHAR2,
215     x_msg_count                    OUT NOCOPY NUMBER,
216     x_msg_data                     OUT NOCOPY VARCHAR2,
217     p_vcrv_tbl                     IN vcrv_tbl_type);
218   PROCEDURE validate_row(
219     p_api_version                  IN NUMBER,
220     p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
221     x_return_status                OUT NOCOPY VARCHAR2,
222     x_msg_count                    OUT NOCOPY NUMBER,
223     x_msg_data                     OUT NOCOPY VARCHAR2,
224     p_vcrv_rec                     IN vcrv_rec_type);
225   PROCEDURE validate_row(
226     p_api_version                  IN NUMBER,
227     p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
228     x_return_status                OUT NOCOPY VARCHAR2,
229     x_msg_count                    OUT NOCOPY NUMBER,
230     x_msg_data                     OUT NOCOPY VARCHAR2,
231     p_vcrv_tbl                     IN vcrv_tbl_type,
232     px_error_tbl                   IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
233   PROCEDURE validate_row(
234     p_api_version                  IN NUMBER,
235     p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
236     x_return_status                OUT NOCOPY VARCHAR2,
237     x_msg_count                    OUT NOCOPY NUMBER,
238     x_msg_data                     OUT NOCOPY VARCHAR2,
239     p_vcrv_tbl                     IN vcrv_tbl_type);
240 END OKL_VCR_PVT;