DBA Data[Home] [Help]

PACKAGE: APPS.OKL_CAF_PVT

Source


1 PACKAGE OKL_CAF_PVT AS
2 /* $Header: OKLSCAFS.pls 120.2 2005/10/30 04:40:20 appldev noship $ */
3   ---------------------------------------------------------------------------
4   -- GLOBAL DATASTRUCTURES
5   ---------------------------------------------------------------------------
6   -- OKL_CASH_FLOWS_V Record Spec
7   TYPE cafv_rec_type IS RECORD (
8      id                             NUMBER := OKL_API.G_MISS_NUM
9     ,cfo_id                         NUMBER := OKL_API.G_MISS_NUM
10     ,sts_code                       OKL_CASH_FLOWS_V.STS_CODE%TYPE := OKL_API.G_MISS_CHAR
11     ,sty_id                         NUMBER := OKL_API.G_MISS_NUM
12     ,cft_code                       OKL_CASH_FLOWS_V.CFT_CODE%TYPE := OKL_API.G_MISS_CHAR
13     ,due_arrears_yn                 OKL_CASH_FLOWS_V.DUE_ARREARS_YN%TYPE := OKL_API.G_MISS_CHAR
14     ,start_date                     OKL_CASH_FLOWS_V.START_DATE%TYPE := OKL_API.G_MISS_DATE
15     ,number_of_advance_periods      NUMBER := OKL_API.G_MISS_NUM
16     ,dnz_khr_id                     NUMBER := OKL_API.G_MISS_NUM
17     ,dnz_qte_id                     NUMBER := OKL_API.G_MISS_NUM
18     ,attribute_category             OKL_CASH_FLOWS_V.ATTRIBUTE_CATEGORY%TYPE := OKL_API.G_MISS_CHAR
19     ,attribute1                     OKL_CASH_FLOWS_V.ATTRIBUTE1%TYPE := OKL_API.G_MISS_CHAR
20     ,attribute2                     OKL_CASH_FLOWS_V.ATTRIBUTE2%TYPE := OKL_API.G_MISS_CHAR
21     ,attribute3                     OKL_CASH_FLOWS_V.ATTRIBUTE3%TYPE := OKL_API.G_MISS_CHAR
22     ,attribute4                     OKL_CASH_FLOWS_V.ATTRIBUTE4%TYPE := OKL_API.G_MISS_CHAR
23     ,attribute5                     OKL_CASH_FLOWS_V.ATTRIBUTE5%TYPE := OKL_API.G_MISS_CHAR
24     ,attribute6                     OKL_CASH_FLOWS_V.ATTRIBUTE6%TYPE := OKL_API.G_MISS_CHAR
25     ,attribute7                     OKL_CASH_FLOWS_V.ATTRIBUTE7%TYPE := OKL_API.G_MISS_CHAR
26     ,attribute8                     OKL_CASH_FLOWS_V.ATTRIBUTE8%TYPE := OKL_API.G_MISS_CHAR
27     ,attribute9                     OKL_CASH_FLOWS_V.ATTRIBUTE9%TYPE := OKL_API.G_MISS_CHAR
28     ,attribute10                    OKL_CASH_FLOWS_V.ATTRIBUTE10%TYPE := OKL_API.G_MISS_CHAR
29     ,attribute11                    OKL_CASH_FLOWS_V.ATTRIBUTE11%TYPE := OKL_API.G_MISS_CHAR
30     ,attribute12                    OKL_CASH_FLOWS_V.ATTRIBUTE12%TYPE := OKL_API.G_MISS_CHAR
31     ,attribute13                    OKL_CASH_FLOWS_V.ATTRIBUTE13%TYPE := OKL_API.G_MISS_CHAR
32     ,attribute14                    OKL_CASH_FLOWS_V.ATTRIBUTE14%TYPE := OKL_API.G_MISS_CHAR
33     ,attribute15                    OKL_CASH_FLOWS_V.ATTRIBUTE15%TYPE := OKL_API.G_MISS_CHAR
34     ,created_by                     NUMBER := OKL_API.G_MISS_NUM
35     ,creation_date                  OKL_CASH_FLOWS_V.CREATION_DATE%TYPE := OKL_API.G_MISS_DATE
36     ,last_updated_by                NUMBER := OKL_API.G_MISS_NUM
37     ,last_update_date               OKL_CASH_FLOWS_V.LAST_UPDATE_DATE%TYPE := OKL_API.G_MISS_DATE
38     ,last_update_login              NUMBER := OKL_API.G_MISS_NUM
39     ,object_version_number          NUMBER := OKL_API.G_MISS_NUM);
40   G_MISS_cafv_rec                         cafv_rec_type;
41   TYPE cafv_tbl_type IS TABLE OF cafv_rec_type
42         INDEX BY BINARY_INTEGER;
43   -- OKL_CASH_FLOWS Record Spec
44   TYPE caf_rec_type IS RECORD (
45      id                             NUMBER := OKL_API.G_MISS_NUM
46     ,cfo_id                         NUMBER := OKL_API.G_MISS_NUM
47     ,sts_code                       OKL_CASH_FLOWS.STS_CODE%TYPE := OKL_API.G_MISS_CHAR
48     ,sty_id                         NUMBER := OKL_API.G_MISS_NUM
49     ,cft_code                       OKL_CASH_FLOWS.CFT_CODE%TYPE := OKL_API.G_MISS_CHAR
50     ,due_arrears_yn                 OKL_CASH_FLOWS.DUE_ARREARS_YN%TYPE := OKL_API.G_MISS_CHAR
51     ,start_date                     OKL_CASH_FLOWS.START_DATE%TYPE := OKL_API.G_MISS_DATE
52     ,number_of_advance_periods      NUMBER := OKL_API.G_MISS_NUM
53     ,dnz_khr_id                     NUMBER := OKL_API.G_MISS_NUM
54     ,dnz_qte_id                     NUMBER := OKL_API.G_MISS_NUM
55     ,attribute_category             OKL_CASH_FLOWS.ATTRIBUTE_CATEGORY%TYPE := OKL_API.G_MISS_CHAR
56     ,attribute1                     OKL_CASH_FLOWS.ATTRIBUTE1%TYPE := OKL_API.G_MISS_CHAR
57     ,attribute2                     OKL_CASH_FLOWS.ATTRIBUTE2%TYPE := OKL_API.G_MISS_CHAR
58     ,attribute3                     OKL_CASH_FLOWS.ATTRIBUTE3%TYPE := OKL_API.G_MISS_CHAR
59     ,attribute4                     OKL_CASH_FLOWS.ATTRIBUTE4%TYPE := OKL_API.G_MISS_CHAR
60     ,attribute5                     OKL_CASH_FLOWS.ATTRIBUTE5%TYPE := OKL_API.G_MISS_CHAR
61     ,attribute6                     OKL_CASH_FLOWS.ATTRIBUTE6%TYPE := OKL_API.G_MISS_CHAR
62     ,attribute7                     OKL_CASH_FLOWS.ATTRIBUTE7%TYPE := OKL_API.G_MISS_CHAR
63     ,attribute8                     OKL_CASH_FLOWS.ATTRIBUTE8%TYPE := OKL_API.G_MISS_CHAR
64     ,attribute9                     OKL_CASH_FLOWS.ATTRIBUTE9%TYPE := OKL_API.G_MISS_CHAR
65     ,attribute10                    OKL_CASH_FLOWS.ATTRIBUTE10%TYPE := OKL_API.G_MISS_CHAR
66     ,attribute11                    OKL_CASH_FLOWS.ATTRIBUTE11%TYPE := OKL_API.G_MISS_CHAR
67     ,attribute12                    OKL_CASH_FLOWS.ATTRIBUTE12%TYPE := OKL_API.G_MISS_CHAR
68     ,attribute13                    OKL_CASH_FLOWS.ATTRIBUTE13%TYPE := OKL_API.G_MISS_CHAR
69     ,attribute14                    OKL_CASH_FLOWS.ATTRIBUTE14%TYPE := OKL_API.G_MISS_CHAR
70     ,attribute15                    OKL_CASH_FLOWS.ATTRIBUTE15%TYPE := OKL_API.G_MISS_CHAR
71     ,created_by                     NUMBER := OKL_API.G_MISS_NUM
72     ,creation_date                  OKL_CASH_FLOWS.CREATION_DATE%TYPE := OKL_API.G_MISS_DATE
73     ,last_updated_by                NUMBER := OKL_API.G_MISS_NUM
74     ,last_update_date               OKL_CASH_FLOWS.LAST_UPDATE_DATE%TYPE := OKL_API.G_MISS_DATE
75     ,last_update_login              NUMBER := OKL_API.G_MISS_NUM
76     ,object_version_number          NUMBER := OKL_API.G_MISS_NUM);
77   G_MISS_caf_rec                          caf_rec_type;
78   TYPE caf_tbl_type IS TABLE OF caf_rec_type
79         INDEX BY BINARY_INTEGER;
80   ---------------------------------------------------------------------------
81   -- GLOBAL MESSAGE CONSTANTS
82   ---------------------------------------------------------------------------
83   G_FND_APP                      CONSTANT VARCHAR2(200) := OKL_API.G_FND_APP;
84   G_FORM_UNABLE_TO_RESERVE_REC   CONSTANT VARCHAR2(200) := OKL_API.G_FORM_UNABLE_TO_RESERVE_REC;
85   G_FORM_RECORD_DELETED          CONSTANT VARCHAR2(200) := OKL_API.G_FORM_RECORD_DELETED;
86   G_FORM_RECORD_CHANGED          CONSTANT VARCHAR2(200) := OKL_API.G_FORM_RECORD_CHANGED;
87   G_RECORD_LOGICALLY_DELETED     CONSTANT VARCHAR2(200) := OKL_API.G_RECORD_LOGICALLY_DELETED;
88   G_REQUIRED_VALUE               CONSTANT VARCHAR2(200) := OKL_API.G_REQUIRED_VALUE;
89   G_INVALID_VALUE                CONSTANT VARCHAR2(200) := OKL_API.G_INVALID_VALUE;
90   G_COL_NAME_TOKEN               CONSTANT VARCHAR2(200) := OKL_API.G_COL_NAME_TOKEN;
91   G_PARENT_TABLE_TOKEN           CONSTANT VARCHAR2(200) := OKL_API.G_PARENT_TABLE_TOKEN;
92   G_CHILD_TABLE_TOKEN            CONSTANT VARCHAR2(200) := OKL_API.G_CHILD_TABLE_TOKEN;
93   G_UNEXPECTED_ERROR             CONSTANT VARCHAR2(200) := 'OKS_SERVICE_AVAILABILITY_UNEXPECTED_ERROR';
94   G_SQLCODE_TOKEN                CONSTANT VARCHAR2(200) := 'SQLcode';
95   G_SQLERRM_TOKEN                CONSTANT VARCHAR2(200) := 'SQLerrm';
96 
97   ---------------------------------------------------------------------------
98   -- GLOBAL EXCEPTIONS
99   ---------------------------------------------------------------------------
100   G_EXCEPTION_HALT_VALIDATION    EXCEPTION;
101 
102   ---------------------------------------------------------------------------
103   -- GLOBAL VARIABLES
104   ---------------------------------------------------------------------------
105   G_PKG_NAME                     CONSTANT VARCHAR2(200) := 'OKL_CAF_PVT';
106   G_APP_NAME                     CONSTANT VARCHAR2(3)   := OKL_API.G_APP_NAME;
107 
108   -- SECHAWLA Added
109   G_NO_PARENT_RECORD            CONSTANT VARCHAR2(200) := 'OKL_NO_PARENT_RECORD';
110 
111 --Bug 4299668 PAGARG Included these types, to be used for bulk insert
112 --**START**--
113   TYPE NumberTabTyp IS TABLE OF NUMBER
114        INDEX BY BINARY_INTEGER;
115   TYPE Number9TabTyp IS TABLE OF NUMBER(9)
116        INDEX BY BINARY_INTEGER;
117   TYPE Var3TabTyp IS TABLE OF VARCHAR2(3)
118        INDEX BY BINARY_INTEGER;
119   TYPE Var30TabTyp IS TABLE OF VARCHAR2(30)
120        INDEX BY BINARY_INTEGER;
121   TYPE Var90TabTyp IS TABLE OF VARCHAR2(90)
122        INDEX BY BINARY_INTEGER;
123   TYPE Var450TabTyp IS TABLE OF VARCHAR2(450)
124        INDEX BY BINARY_INTEGER;
125   TYPE Number15TabTyp IS TABLE OF NUMBER(15)
126        INDEX BY BINARY_INTEGER;
127   TYPE DateTabTyp IS TABLE OF DATE
128        INDEX BY BINARY_INTEGER;
129 --**END 4299668**--
130 
131   ---------------------------------------------------------------------------
132   -- Procedures and Functions
133   ---------------------------------------------------------------------------
134   PROCEDURE qc;
135   PROCEDURE change_version;
136   PROCEDURE api_copy;
137   PROCEDURE insert_row(
138     p_api_version                  IN NUMBER,
139     p_init_msg_list                IN VARCHAR2,
140     x_return_status                OUT NOCOPY VARCHAR2,
141     x_msg_count                    OUT NOCOPY NUMBER,
142     x_msg_data                     OUT NOCOPY VARCHAR2,
143     p_cafv_rec                     IN cafv_rec_type,
144     x_cafv_rec                     OUT NOCOPY cafv_rec_type);
145   PROCEDURE insert_row(
146     p_api_version                  IN NUMBER,
147     p_init_msg_list                IN VARCHAR2,
148     x_return_status                OUT NOCOPY VARCHAR2,
149     x_msg_count                    OUT NOCOPY NUMBER,
150     x_msg_data                     OUT NOCOPY VARCHAR2,
151     p_cafv_tbl                     IN cafv_tbl_type,
152     x_cafv_tbl                     OUT NOCOPY cafv_tbl_type,
153     px_error_tbl                   IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
154   PROCEDURE insert_row(
155     p_api_version                  IN NUMBER,
156     p_init_msg_list                IN VARCHAR2,
157     x_return_status                OUT NOCOPY VARCHAR2,
158     x_msg_count                    OUT NOCOPY NUMBER,
159     x_msg_data                     OUT NOCOPY VARCHAR2,
160     p_cafv_tbl                     IN cafv_tbl_type,
161     x_cafv_tbl                     OUT NOCOPY cafv_tbl_type);
162 --Bug 4299668 PAGARG new procedure to implement bulk insert
163 --**START**--
164   PROCEDURE insert_row_bulk(
165     p_api_version                  IN NUMBER,
166     p_init_msg_list                IN VARCHAR2,
167     x_return_status                OUT NOCOPY VARCHAR2,
168     x_msg_count                    OUT NOCOPY NUMBER,
169     x_msg_data                     OUT NOCOPY VARCHAR2,
170     p_cafv_tbl                     IN cafv_tbl_type,
171     x_cafv_tbl                     OUT NOCOPY cafv_tbl_type);
172 --**END 4299668**--
173   PROCEDURE lock_row(
174     p_api_version                  IN NUMBER,
175     p_init_msg_list                IN VARCHAR2,
176     x_return_status                OUT NOCOPY VARCHAR2,
177     x_msg_count                    OUT NOCOPY NUMBER,
178     x_msg_data                     OUT NOCOPY VARCHAR2,
179     p_cafv_rec                     IN cafv_rec_type);
180   PROCEDURE lock_row(
181     p_api_version                  IN NUMBER,
182     p_init_msg_list                IN VARCHAR2,
183     x_return_status                OUT NOCOPY VARCHAR2,
184     x_msg_count                    OUT NOCOPY NUMBER,
185     x_msg_data                     OUT NOCOPY VARCHAR2,
186     p_cafv_tbl                     IN cafv_tbl_type,
187     px_error_tbl                   IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
188   PROCEDURE lock_row(
189     p_api_version                  IN NUMBER,
190     p_init_msg_list                IN VARCHAR2,
191     x_return_status                OUT NOCOPY VARCHAR2,
192     x_msg_count                    OUT NOCOPY NUMBER,
193     x_msg_data                     OUT NOCOPY VARCHAR2,
194     p_cafv_tbl                     IN cafv_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_cafv_rec                     IN cafv_rec_type,
202     x_cafv_rec                     OUT NOCOPY cafv_rec_type);
203   PROCEDURE update_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_cafv_tbl                     IN cafv_tbl_type,
210     x_cafv_tbl                     OUT NOCOPY cafv_tbl_type,
211     px_error_tbl                   IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
212   PROCEDURE update_row(
213     p_api_version                  IN NUMBER,
214     p_init_msg_list                IN VARCHAR2,
215     x_return_status                OUT NOCOPY VARCHAR2,
216     x_msg_count                    OUT NOCOPY NUMBER,
217     x_msg_data                     OUT NOCOPY VARCHAR2,
218     p_cafv_tbl                     IN cafv_tbl_type,
219     x_cafv_tbl                     OUT NOCOPY cafv_tbl_type);
220   PROCEDURE delete_row(
221     p_api_version                  IN NUMBER,
222     p_init_msg_list                IN VARCHAR2,
223     x_return_status                OUT NOCOPY VARCHAR2,
224     x_msg_count                    OUT NOCOPY NUMBER,
225     x_msg_data                     OUT NOCOPY VARCHAR2,
226     p_cafv_rec                     IN cafv_rec_type);
227   PROCEDURE delete_row(
228     p_api_version                  IN NUMBER,
229     p_init_msg_list                IN VARCHAR2,
230     x_return_status                OUT NOCOPY VARCHAR2,
231     x_msg_count                    OUT NOCOPY NUMBER,
232     x_msg_data                     OUT NOCOPY VARCHAR2,
233     p_cafv_tbl                     IN cafv_tbl_type,
234     px_error_tbl                   IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
235   PROCEDURE delete_row(
236     p_api_version                  IN NUMBER,
237     p_init_msg_list                IN VARCHAR2,
238     x_return_status                OUT NOCOPY VARCHAR2,
239     x_msg_count                    OUT NOCOPY NUMBER,
240     x_msg_data                     OUT NOCOPY VARCHAR2,
241     p_cafv_tbl                     IN cafv_tbl_type);
242   PROCEDURE validate_row(
243     p_api_version                  IN NUMBER,
244     p_init_msg_list                IN VARCHAR2,
245     x_return_status                OUT NOCOPY VARCHAR2,
246     x_msg_count                    OUT NOCOPY NUMBER,
247     x_msg_data                     OUT NOCOPY VARCHAR2,
248     p_cafv_rec                     IN cafv_rec_type);
249   PROCEDURE validate_row(
250     p_api_version                  IN NUMBER,
251     p_init_msg_list                IN VARCHAR2,
252     x_return_status                OUT NOCOPY VARCHAR2,
253     x_msg_count                    OUT NOCOPY NUMBER,
254     x_msg_data                     OUT NOCOPY VARCHAR2,
255     p_cafv_tbl                     IN cafv_tbl_type,
256     px_error_tbl                   IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
257   PROCEDURE validate_row(
258     p_api_version                  IN NUMBER,
259     p_init_msg_list                IN VARCHAR2,
260     x_return_status                OUT NOCOPY VARCHAR2,
261     x_msg_count                    OUT NOCOPY NUMBER,
262     x_msg_data                     OUT NOCOPY VARCHAR2,
263     p_cafv_tbl                     IN cafv_tbl_type);
264 END OKL_CAF_PVT;