DBA Data[Home] [Help]

PACKAGE: APPS.OKL_IRK_PVT

Source


1 Package OKL_IRK_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLSIRKS.pls 115.0 2002/02/05 16:17:27 pkm ship        $ */
3   ---------------------------------------------------------------------------
4   -- GLOBAL DATASTRUCTURES
5   ---------------------------------------------------------------------------
6   TYPE irkv_rec_type IS RECORD (
7      id                             NUMBER := OKC_API.G_MISS_NUM
8     ,ranking_seq                    NUMBER := OKC_API.G_MISS_NUM
9     ,object_version_number          NUMBER := OKC_API.G_MISS_NUM
10     ,date_from                      OKL_INSURER_RANKINGS_V.DATE_FROM%TYPE := OKC_API.G_MISS_DATE
11     ,date_to                        OKL_INSURER_RANKINGS_V.DATE_TO%TYPE := OKC_API.G_MISS_DATE
12     ,isu_id                         NUMBER := OKC_API.G_MISS_NUM
13     ,ic_code                        OKL_INSURER_RANKINGS_V.IC_CODE%TYPE := OKC_API.G_MISS_CHAR
14     ,attribute_category             OKL_INSURER_RANKINGS_V.ATTRIBUTE_CATEGORY%TYPE := OKC_API.G_MISS_CHAR
15     ,attribute1                     OKL_INSURER_RANKINGS_V.ATTRIBUTE1%TYPE := OKC_API.G_MISS_CHAR
16     ,attribute2                     OKL_INSURER_RANKINGS_V.ATTRIBUTE2%TYPE := OKC_API.G_MISS_CHAR
17     ,attribute3                     OKL_INSURER_RANKINGS_V.ATTRIBUTE3%TYPE := OKC_API.G_MISS_CHAR
18     ,attribute4                     OKL_INSURER_RANKINGS_V.ATTRIBUTE4%TYPE := OKC_API.G_MISS_CHAR
19     ,attribute5                     OKL_INSURER_RANKINGS_V.ATTRIBUTE5%TYPE := OKC_API.G_MISS_CHAR
20     ,attribute6                     OKL_INSURER_RANKINGS_V.ATTRIBUTE6%TYPE := OKC_API.G_MISS_CHAR
21     ,attribute7                     OKL_INSURER_RANKINGS_V.ATTRIBUTE7%TYPE := OKC_API.G_MISS_CHAR
22     ,attribute8                     OKL_INSURER_RANKINGS_V.ATTRIBUTE8%TYPE := OKC_API.G_MISS_CHAR
23     ,attribute9                     OKL_INSURER_RANKINGS_V.ATTRIBUTE9%TYPE := OKC_API.G_MISS_CHAR
24     ,attribute10                    OKL_INSURER_RANKINGS_V.ATTRIBUTE10%TYPE := OKC_API.G_MISS_CHAR
25     ,attribute11                    OKL_INSURER_RANKINGS_V.ATTRIBUTE11%TYPE := OKC_API.G_MISS_CHAR
26     ,attribute12                    OKL_INSURER_RANKINGS_V.ATTRIBUTE12%TYPE := OKC_API.G_MISS_CHAR
27     ,attribute13                    OKL_INSURER_RANKINGS_V.ATTRIBUTE13%TYPE := OKC_API.G_MISS_CHAR
28     ,attribute14                    OKL_INSURER_RANKINGS_V.ATTRIBUTE14%TYPE := OKC_API.G_MISS_CHAR
29     ,attribute15                    OKL_INSURER_RANKINGS_V.ATTRIBUTE15%TYPE := OKC_API.G_MISS_CHAR
30     ,created_by                     NUMBER := OKC_API.G_MISS_NUM
31     ,creation_date                  OKL_INSURER_RANKINGS_V.CREATION_DATE%TYPE := OKC_API.G_MISS_DATE
32     ,last_updated_by                NUMBER := OKC_API.G_MISS_NUM
33     ,last_update_date               OKL_INSURER_RANKINGS_V.LAST_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE
34     ,last_update_login              NUMBER := OKC_API.G_MISS_NUM);
35   G_MISS_irkv_rec                         irkv_rec_type;
36   TYPE irkv_tbl_type IS TABLE OF irkv_rec_type
37         INDEX BY BINARY_INTEGER;
38   TYPE irk_rec_type IS RECORD (
39      id                             NUMBER := OKC_API.G_MISS_NUM
40     ,object_version_number          NUMBER := OKC_API.G_MISS_NUM
41     ,ranking_seq                    NUMBER := OKC_API.G_MISS_NUM
42     ,date_from                      OKL_INSURER_RANKINGS.DATE_FROM%TYPE := OKC_API.G_MISS_DATE
43     ,date_to                        OKL_INSURER_RANKINGS.DATE_TO%TYPE := OKC_API.G_MISS_DATE
44     ,isu_id                         NUMBER := OKC_API.G_MISS_NUM
45     ,ic_code                        OKL_INSURER_RANKINGS.IC_CODE%TYPE := OKC_API.G_MISS_CHAR
46     ,attribute_category             OKL_INSURER_RANKINGS.ATTRIBUTE_CATEGORY%TYPE := OKC_API.G_MISS_CHAR
47     ,attribute1                     OKL_INSURER_RANKINGS.ATTRIBUTE1%TYPE := OKC_API.G_MISS_CHAR
48     ,attribute2                     OKL_INSURER_RANKINGS.ATTRIBUTE2%TYPE := OKC_API.G_MISS_CHAR
49     ,attribute3                     OKL_INSURER_RANKINGS.ATTRIBUTE3%TYPE := OKC_API.G_MISS_CHAR
50     ,attribute4                     OKL_INSURER_RANKINGS.ATTRIBUTE4%TYPE := OKC_API.G_MISS_CHAR
51     ,attribute5                     OKL_INSURER_RANKINGS.ATTRIBUTE5%TYPE := OKC_API.G_MISS_CHAR
52     ,attribute6                     OKL_INSURER_RANKINGS.ATTRIBUTE6%TYPE := OKC_API.G_MISS_CHAR
53     ,attribute7                     OKL_INSURER_RANKINGS.ATTRIBUTE7%TYPE := OKC_API.G_MISS_CHAR
54     ,attribute8                     OKL_INSURER_RANKINGS.ATTRIBUTE8%TYPE := OKC_API.G_MISS_CHAR
55     ,attribute9                     OKL_INSURER_RANKINGS.ATTRIBUTE9%TYPE := OKC_API.G_MISS_CHAR
56     ,attribute10                    OKL_INSURER_RANKINGS.ATTRIBUTE10%TYPE := OKC_API.G_MISS_CHAR
57     ,attribute11                    OKL_INSURER_RANKINGS.ATTRIBUTE11%TYPE := OKC_API.G_MISS_CHAR
58     ,attribute12                    OKL_INSURER_RANKINGS.ATTRIBUTE12%TYPE := OKC_API.G_MISS_CHAR
59     ,attribute13                    OKL_INSURER_RANKINGS.ATTRIBUTE13%TYPE := OKC_API.G_MISS_CHAR
60     ,attribute14                    OKL_INSURER_RANKINGS.ATTRIBUTE14%TYPE := OKC_API.G_MISS_CHAR
61     ,attribute15                    OKL_INSURER_RANKINGS.ATTRIBUTE15%TYPE := OKC_API.G_MISS_CHAR
62     ,created_by                     NUMBER := OKC_API.G_MISS_NUM
63     ,creation_date                  OKL_INSURER_RANKINGS.CREATION_DATE%TYPE := OKC_API.G_MISS_DATE
64     ,last_updated_by                NUMBER := OKC_API.G_MISS_NUM
65     ,last_update_date               OKL_INSURER_RANKINGS.LAST_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE
66     ,last_update_login              NUMBER := OKC_API.G_MISS_NUM);
67   G_MISS_irk_rec                          irk_rec_type;
68   TYPE irk_tbl_type IS TABLE OF irk_rec_type
69         INDEX BY BINARY_INTEGER;
70   ---------------------------------------------------------------------------
71   -- GLOBAL MESSAGE CONSTANTS
72   ---------------------------------------------------------------------------
73   G_FND_APP                      CONSTANT VARCHAR2(200) := Okc_Api.G_FND_APP;
74   G_REQUIRED_VALUE               CONSTANT VARCHAR2(200) := 'OKL_REQUIRED_VALUE';
75   G_INVALID_VALUE                CONSTANT VARCHAR2(200) := 'OKL_REQUIRED_VALUE';
76   G_COL_NAME_TOKEN               CONSTANT VARCHAR2(200) := 'COL_NAME';
77   G_PARENT_TABLE_TOKEN           CONSTANT VARCHAR2(200) := 'PARENT_TABLE';
78   G_CHILD_TABLE_TOKEN            CONSTANT VARCHAR2(200) := 'CHILD_TABLE';
79   G_UNEXPECTED_ERROR             CONSTANT VARCHAR2(200) := 'OKL_UNEXPECTED_ERROR';
80   G_SQLCODE_TOKEN                CONSTANT VARCHAR2(200) := 'SQLcode';
81   G_SQLERRM_TOKEN                CONSTANT VARCHAR2(200) := 'SQLerrm';
82   G_NO_PARENT_RECORD             CONSTANT VARCHAR2(200) := 'OKL_NO_PARENT_RECORD';
83   G_FORM_UNABLE_TO_RESERVE_REC	CONSTANT VARCHAR2(200) := OKC_API.G_FORM_UNABLE_TO_RESERVE_REC;
84   G_FORM_RECORD_DELETED		CONSTANT VARCHAR2(200) := OKC_API.G_FORM_RECORD_DELETED;
85   G_FORM_RECORD_CHANGED		CONSTANT VARCHAR2(200) := OKC_API.G_FORM_RECORD_CHANGED;
86   G_RECORD_LOGICALLY_DELETED	CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_LOGICALLY_DELETED;
87 
88 
89 
90 
91   ---------------------------------------------------------------------------
92   -- GLOBAL EXCEPTIONS
93   ---------------------------------------------------------------------------
94   G_EXCEPTION_HALT_VALIDATION    EXCEPTION;
95 
96   ---------------------------------------------------------------------------
97   -- GLOBAL VARIABLES
98   ---------------------------------------------------------------------------
99   G_PKG_NAME                     CONSTANT VARCHAR2(200) := 'OKL_IRK_PVT';
100   G_APP_NAME                     CONSTANT VARCHAR2(3)   := 'OKL';
101   ---------------------------------------------------------------------------
102   -- Procedures and Functions
103   ---------------------------------------------------------------------------
104 
105   PROCEDURE qc;
106   PROCEDURE change_version;
107   PROCEDURE api_copy;
108   PROCEDURE insert_row(
109     p_api_version                  IN NUMBER,
110     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
111     x_return_status                OUT NOCOPY VARCHAR2,
112     x_msg_count                    OUT NOCOPY NUMBER,
113     x_msg_data                     OUT NOCOPY VARCHAR2,
114     p_irkv_rec                     IN irkv_rec_type,
115     x_irkv_rec                     OUT NOCOPY irkv_rec_type);
116   PROCEDURE insert_row(
117     p_api_version                  IN NUMBER,
118     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
119     x_return_status                OUT NOCOPY VARCHAR2,
120     x_msg_count                    OUT NOCOPY NUMBER,
121     x_msg_data                     OUT NOCOPY VARCHAR2,
122     p_irkv_tbl                     IN irkv_tbl_type,
123     x_irkv_tbl                     OUT NOCOPY irkv_tbl_type,
124     px_error_tbl                   IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
125   PROCEDURE insert_row(
126     p_api_version                  IN NUMBER,
127     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
128     x_return_status                OUT NOCOPY VARCHAR2,
129     x_msg_count                    OUT NOCOPY NUMBER,
130     x_msg_data                     OUT NOCOPY VARCHAR2,
131     p_irkv_tbl                     IN irkv_tbl_type,
132     x_irkv_tbl                     OUT NOCOPY irkv_tbl_type);
133   PROCEDURE lock_row(
134     p_api_version                  IN NUMBER,
135     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
136     x_return_status                OUT NOCOPY VARCHAR2,
137     x_msg_count                    OUT NOCOPY NUMBER,
138     x_msg_data                     OUT NOCOPY VARCHAR2,
139     p_irkv_rec                     IN irkv_rec_type);
140   PROCEDURE lock_row(
141     p_api_version                  IN NUMBER,
142     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
143     x_return_status                OUT NOCOPY VARCHAR2,
144     x_msg_count                    OUT NOCOPY NUMBER,
145     x_msg_data                     OUT NOCOPY VARCHAR2,
146     p_irkv_tbl                     IN irkv_tbl_type,
147     px_error_tbl                   IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
148   PROCEDURE lock_row(
149     p_api_version                  IN NUMBER,
150     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
151     x_return_status                OUT NOCOPY VARCHAR2,
152     x_msg_count                    OUT NOCOPY NUMBER,
153     x_msg_data                     OUT NOCOPY VARCHAR2,
154     p_irkv_tbl                     IN irkv_tbl_type);
155   PROCEDURE update_row(
156     p_api_version                  IN NUMBER,
157     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
158     x_return_status                OUT NOCOPY VARCHAR2,
159     x_msg_count                    OUT NOCOPY NUMBER,
160     x_msg_data                     OUT NOCOPY VARCHAR2,
161     p_irkv_rec                     IN irkv_rec_type,
162     x_irkv_rec                     OUT NOCOPY irkv_rec_type);
163   PROCEDURE update_row(
164     p_api_version                  IN NUMBER,
165     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
166     x_return_status                OUT NOCOPY VARCHAR2,
167     x_msg_count                    OUT NOCOPY NUMBER,
168     x_msg_data                     OUT NOCOPY VARCHAR2,
169     p_irkv_tbl                     IN irkv_tbl_type,
170     x_irkv_tbl                     OUT NOCOPY irkv_tbl_type,
171     px_error_tbl                   IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
172   PROCEDURE update_row(
173     p_api_version                  IN NUMBER,
174     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
175     x_return_status                OUT NOCOPY VARCHAR2,
176     x_msg_count                    OUT NOCOPY NUMBER,
177     x_msg_data                     OUT NOCOPY VARCHAR2,
178     p_irkv_tbl                     IN irkv_tbl_type,
179     x_irkv_tbl                     OUT NOCOPY irkv_tbl_type);
180   PROCEDURE delete_row(
181     p_api_version                  IN NUMBER,
182     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
183     x_return_status                OUT NOCOPY VARCHAR2,
184     x_msg_count                    OUT NOCOPY NUMBER,
185     x_msg_data                     OUT NOCOPY VARCHAR2,
186     p_irkv_rec                     IN irkv_rec_type);
187   PROCEDURE delete_row(
188     p_api_version                  IN NUMBER,
189     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
190     x_return_status                OUT NOCOPY VARCHAR2,
191     x_msg_count                    OUT NOCOPY NUMBER,
192     x_msg_data                     OUT NOCOPY VARCHAR2,
193     p_irkv_tbl                     IN irkv_tbl_type,
194     px_error_tbl                   IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
195   PROCEDURE delete_row(
196     p_api_version                  IN NUMBER,
197     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
198     x_return_status                OUT NOCOPY VARCHAR2,
199     x_msg_count                    OUT NOCOPY NUMBER,
200     x_msg_data                     OUT NOCOPY VARCHAR2,
201     p_irkv_tbl                     IN irkv_tbl_type);
202   PROCEDURE validate_row(
203     p_api_version                  IN NUMBER,
204     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
205     x_return_status                OUT NOCOPY VARCHAR2,
206     x_msg_count                    OUT NOCOPY NUMBER,
207     x_msg_data                     OUT NOCOPY VARCHAR2,
208     p_irkv_rec                     IN irkv_rec_type);
209   PROCEDURE validate_row(
210     p_api_version                  IN NUMBER,
211     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
212     x_return_status                OUT NOCOPY VARCHAR2,
213     x_msg_count                    OUT NOCOPY NUMBER,
214     x_msg_data                     OUT NOCOPY VARCHAR2,
215     p_irkv_tbl                     IN irkv_tbl_type,
216     px_error_tbl                   IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
217   PROCEDURE validate_row(
218     p_api_version                  IN NUMBER,
219     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
220     x_return_status                OUT NOCOPY VARCHAR2,
221     x_msg_count                    OUT NOCOPY NUMBER,
222     x_msg_data                     OUT NOCOPY VARCHAR2,
223     p_irkv_tbl                     IN irkv_tbl_type);
224 END OKL_IRK_PVT;