DBA Data[Home] [Help]

PACKAGE: APPS.OKL_QAB_PVT

Source


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