[Home] [Help]
PACKAGE: APPS.OKL_SIR_PVT
Source
1 Package OKL_SIR_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLSSIRS.pls 115.3 2002/02/21 16:02:36 pkm ship $ */
3 ---------------------------------------------------------------------------
4 -- GLOBAL DATASTRUCTURES
5 ---------------------------------------------------------------------------
6 TYPE sir_rec_type IS RECORD (
7 id NUMBER:= OKC_API.G_MISS_NUM,
8 transaction_number NUMBER := OKC_API.G_MISS_NUM,
9 srt_code OKL_SIF_RETS.SRT_CODE%TYPE := OKC_API.G_MISS_CHAR,
10 effective_pre_tax_yield NUMBER:= OKC_API.G_MISS_NUM,
11 yield_name OKL_SIF_RETS.YIELD_NAME%TYPE := OKC_API.G_MISS_CHAR,
12 index_number NUMBER := OKC_API.G_MISS_NUM,
13 effective_after_tax_yield NUMBER := OKC_API.G_MISS_NUM,
14 nominal_pre_tax_yield NUMBER := OKC_API.G_MISS_NUM,
15 nominal_after_tax_yield NUMBER := OKC_API.G_MISS_NUM,
16 stream_interface_attribute01 OKL_STREAM_INTERFACES.STREAM_INTERFACE_ATTRIBUTE01%TYPE := OKC_API.G_MISS_CHAR,
17 stream_interface_attribute02 OKL_SIF_RETS.STREAM_INTERFACE_ATTRIBUTE02%TYPE := OKC_API.G_MISS_CHAR,
18 stream_interface_attribute03 OKL_SIF_RETS.STREAM_INTERFACE_ATTRIBUTE03%TYPE := OKC_API.G_MISS_CHAR,
19 stream_interface_attribute04 OKL_SIF_RETS.STREAM_INTERFACE_ATTRIBUTE04%TYPE := OKC_API.G_MISS_CHAR,
20 stream_interface_attribute05 OKL_SIF_RETS.STREAM_INTERFACE_ATTRIBUTE05%TYPE := OKC_API.G_MISS_CHAR,
21 stream_interface_attribute06 OKL_SIF_RETS.STREAM_INTERFACE_ATTRIBUTE06%TYPE := OKC_API.G_MISS_CHAR,
22 stream_interface_attribute07 OKL_SIF_RETS.STREAM_INTERFACE_ATTRIBUTE07%TYPE := OKC_API.G_MISS_CHAR,
23 stream_interface_attribute08 OKL_SIF_RETS.STREAM_INTERFACE_ATTRIBUTE08%TYPE := OKC_API.G_MISS_CHAR,
24 stream_interface_attribute09 OKL_SIF_RETS.STREAM_INTERFACE_ATTRIBUTE09%TYPE := OKC_API.G_MISS_CHAR,
25 stream_interface_attribute10 OKL_SIF_RETS.STREAM_INTERFACE_ATTRIBUTE10%TYPE := OKC_API.G_MISS_CHAR,
26 stream_interface_attribute11 OKL_SIF_RETS.STREAM_INTERFACE_ATTRIBUTE11%TYPE := OKC_API.G_MISS_CHAR,
27 stream_interface_attribute12 OKL_SIF_RETS.STREAM_INTERFACE_ATTRIBUTE12%TYPE := OKC_API.G_MISS_CHAR,
28 stream_interface_attribute13 OKL_SIF_RETS.STREAM_INTERFACE_ATTRIBUTE13%TYPE := OKC_API.G_MISS_CHAR,
29 stream_interface_attribute14 OKL_SIF_RETS.STREAM_INTERFACE_ATTRIBUTE14%TYPE := OKC_API.G_MISS_CHAR,
30 stream_interface_attribute15 OKL_SIF_RETS.STREAM_INTERFACE_ATTRIBUTE15%TYPE := OKC_API.G_MISS_CHAR,
31 object_version_number OKL_SIF_RETS.OBJECT_VERSION_NUMBER%TYPE := OKC_API.G_MISS_NUM,
32 created_by NUMBER := OKC_API.G_MISS_NUM,
33 last_updated_by NUMBER := OKC_API.G_MISS_NUM,
34 creation_date OKL_SIF_RETS.CREATION_DATE%TYPE := OKC_API.G_MISS_DATE,
35 last_update_date OKL_SIF_RETS.LAST_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE,
36 last_update_login NUMBER := OKC_API.G_MISS_NUM,
37 implicit_interest_rate NUMBER := OKC_API.G_MISS_NUM,
38 date_processed OKL_SIF_RETS.DATE_PROCESSED%TYPE := OKC_API.G_MISS_DATE,
39 -- mvasudev -- 02/21/2002
40 -- new columns added for concurrent program manager
41 REQUEST_ID NUMBER := OKC_API.G_MISS_NUM,
42 PROGRAM_APPLICATION_ID NUMBER := OKC_API.G_MISS_NUM,
43 PROGRAM_ID NUMBER := OKC_API.G_MISS_NUM,
44 PROGRAM_UPDATE_DATE OKL_SIF_RETS.PROGRAM_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE
45 -- mvasudev -- 02/21/2002
46 );
47 g_miss_sir_rec sir_rec_type;
48
49 TYPE sir_tbl_type IS TABLE OF sir_rec_type
50 INDEX BY BINARY_INTEGER;
51 TYPE sirv_rec_type IS RECORD (
52 id NUMBER:= OKC_API.G_MISS_NUM,
53 transaction_number NUMBER := OKC_API.G_MISS_NUM,
54 srt_code OKL_SIF_RETS_V.SRT_CODE%TYPE := OKC_API.G_MISS_CHAR,
55 effective_pre_tax_yield NUMBER:= OKC_API.G_MISS_NUM,
56 yield_name OKL_SIF_RETS_V.YIELD_NAME%TYPE := OKC_API.G_MISS_CHAR,
57 index_number NUMBER := OKC_API.G_MISS_NUM,
58 effective_after_tax_yield NUMBER := OKC_API.G_MISS_NUM,
59 nominal_pre_tax_yield NUMBER := OKC_API.G_MISS_NUM,
60 nominal_after_tax_yield NUMBER := OKC_API.G_MISS_NUM,
61 stream_interface_attribute01 OKL_STREAM_INTERFACES.STREAM_INTERFACE_ATTRIBUTE01%TYPE := OKC_API.G_MISS_CHAR,
62 stream_interface_attribute02 OKL_SIF_RETS_V.STREAM_INTERFACE_ATTRIBUTE02%TYPE := OKC_API.G_MISS_CHAR,
63 stream_interface_attribute03 OKL_SIF_RETS_V.STREAM_INTERFACE_ATTRIBUTE03%TYPE := OKC_API.G_MISS_CHAR,
64 stream_interface_attribute04 OKL_SIF_RETS_V.STREAM_INTERFACE_ATTRIBUTE04%TYPE := OKC_API.G_MISS_CHAR,
65 stream_interface_attribute05 OKL_SIF_RETS_V.STREAM_INTERFACE_ATTRIBUTE05%TYPE := OKC_API.G_MISS_CHAR,
66 stream_interface_attribute06 OKL_SIF_RETS_V.STREAM_INTERFACE_ATTRIBUTE06%TYPE := OKC_API.G_MISS_CHAR,
67 stream_interface_attribute07 OKL_SIF_RETS_V.STREAM_INTERFACE_ATTRIBUTE07%TYPE := OKC_API.G_MISS_CHAR,
68 stream_interface_attribute08 OKL_SIF_RETS_V.STREAM_INTERFACE_ATTRIBUTE08%TYPE := OKC_API.G_MISS_CHAR,
69 stream_interface_attribute09 OKL_SIF_RETS_V.STREAM_INTERFACE_ATTRIBUTE09%TYPE := OKC_API.G_MISS_CHAR,
70 stream_interface_attribute10 OKL_SIF_RETS_V.STREAM_INTERFACE_ATTRIBUTE10%TYPE := OKC_API.G_MISS_CHAR,
71 stream_interface_attribute11 OKL_SIF_RETS_V.STREAM_INTERFACE_ATTRIBUTE11%TYPE := OKC_API.G_MISS_CHAR,
72 stream_interface_attribute12 OKL_SIF_RETS_V.STREAM_INTERFACE_ATTRIBUTE12%TYPE := OKC_API.G_MISS_CHAR,
73 stream_interface_attribute13 OKL_SIF_RETS_V.STREAM_INTERFACE_ATTRIBUTE13%TYPE := OKC_API.G_MISS_CHAR,
74 stream_interface_attribute14 OKL_SIF_RETS_V.STREAM_INTERFACE_ATTRIBUTE14%TYPE := OKC_API.G_MISS_CHAR,
75 stream_interface_attribute15 OKL_SIF_RETS_V.STREAM_INTERFACE_ATTRIBUTE15%TYPE := OKC_API.G_MISS_CHAR,
76 object_version_number OKL_SIF_RETS_V.OBJECT_VERSION_NUMBER%TYPE := OKC_API.G_MISS_NUM,
77 created_by NUMBER := OKC_API.G_MISS_NUM,
78 last_updated_by NUMBER := OKC_API.G_MISS_NUM,
79 creation_date OKL_SIF_RETS_V.CREATION_DATE%TYPE := OKC_API.G_MISS_DATE,
80 last_update_date OKL_SIF_RETS_V.LAST_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE,
81 last_update_login NUMBER := OKC_API.G_MISS_NUM,
82 implicit_interest_rate NUMBER := OKC_API.G_MISS_NUM,
83 date_processed OKL_SIF_RETS_V.DATE_PROCESSED%TYPE := OKC_API.G_MISS_DATE,
84 -- mvasudev -- 02/21/2002
85 -- new columns added for concurrent program manager
86 REQUEST_ID NUMBER := OKC_API.G_MISS_NUM,
87 PROGRAM_APPLICATION_ID NUMBER := OKC_API.G_MISS_NUM,
88 PROGRAM_ID NUMBER := OKC_API.G_MISS_NUM,
89 PROGRAM_UPDATE_DATE OKL_SIF_RETS_V.PROGRAM_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE
90 -- mvasudev -- 02/21/2002
91 );
92 g_miss_sirv_rec sirv_rec_type;
93 TYPE sirv_tbl_type IS TABLE OF sirv_rec_type
94 INDEX BY BINARY_INTEGER;
95 ---------------------------------------------------------------------------
96 -- GLOBAL MESSAGE CONSTANTS
97 ---------------------------------------------------------------------------
98 G_FND_APP CONSTANT VARCHAR2(200) := OKC_API.G_FND_APP;
99 G_OKC_APP CONSTANT VARCHAR2(200) := OKC_API.G_APP_NAME;
100 G_FORM_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := OKC_API.G_FORM_UNABLE_TO_RESERVE_REC;
101 G_FORM_RECORD_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_FORM_RECORD_DELETED;
102 G_FORM_RECORD_CHANGED CONSTANT VARCHAR2(200) := OKC_API.G_FORM_RECORD_CHANGED;
103 G_RECORD_LOGICALLY_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_LOGICALLY_DELETED;
104 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_REQUIRED_VALUE;
105 G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_INVALID_VALUE;
106 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_COL_NAME_TOKEN;
107 G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_PARENT_TABLE_TOKEN;
108 G_CHILD_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_CHILD_TABLE_TOKEN;
109
110
111
112 -- START CHANGE : akjain -- 09/05/2001
113 -- Adding Message constants
114 G_OKL_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) :='OKL_CONTRACTS_UNEXPECTED_ERROR';
115 G_OKL_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'OKL_SQLERRM';
116 G_OKL_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'OKL_SQLCODE';
117 G_OKL_UNQS CONSTANT VARCHAR2(200) := 'OKL_SIR_NOT_UNIQUE';
118
119 -- Added Exception for Halt_validation
120 --------------------------------------------------------------------------------
121 -- ERRORS AND EXCEPTIONS
122 --------------------------------------------------------------------------------
123 G_EXCEPTION_HALT_VALIDATION EXCEPTION;
124 -- END change : akjain
125
126 ---------------------------------------------------------------------------
127 -- GLOBAL VARIABLES
128 ---------------------------------------------------------------------------
129 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_SIR_PVT';
130 G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
131
132
133 ---------------------------------------------------------------------------
134 -- Procedures and Functions
135 ---------------------------------------------------------------------------
136
137 PROCEDURE qc;
138 PROCEDURE change_version;
139 PROCEDURE api_copy;
140 PROCEDURE insert_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_sirv_rec IN sirv_rec_type,
147 x_sirv_rec OUT NOCOPY sirv_rec_type);
148
149 PROCEDURE insert_row(
150 p_api_version IN NUMBER,
151 p_init_msg_list IN VARCHAR2 DEFAULT OKC_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_sirv_tbl IN sirv_tbl_type,
156 x_sirv_tbl OUT NOCOPY sirv_tbl_type);
157
158 PROCEDURE lock_row(
159 p_api_version IN NUMBER,
160 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
161 x_return_status OUT NOCOPY VARCHAR2,
162 x_msg_count OUT NOCOPY NUMBER,
163 x_msg_data OUT NOCOPY VARCHAR2,
164 p_sirv_rec IN sirv_rec_type);
165
166 PROCEDURE lock_row(
167 p_api_version IN NUMBER,
168 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
169 x_return_status OUT NOCOPY VARCHAR2,
170 x_msg_count OUT NOCOPY NUMBER,
171 x_msg_data OUT NOCOPY VARCHAR2,
172 p_sirv_tbl IN sirv_tbl_type);
173
174 PROCEDURE update_row(
175 p_api_version IN NUMBER,
176 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
177 x_return_status OUT NOCOPY VARCHAR2,
178 x_msg_count OUT NOCOPY NUMBER,
179 x_msg_data OUT NOCOPY VARCHAR2,
180 p_sirv_rec IN sirv_rec_type,
181 x_sirv_rec OUT NOCOPY sirv_rec_type);
182
183 PROCEDURE update_row(
184 p_api_version IN NUMBER,
185 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
186 x_return_status OUT NOCOPY VARCHAR2,
187 x_msg_count OUT NOCOPY NUMBER,
188 x_msg_data OUT NOCOPY VARCHAR2,
189 p_sirv_tbl IN sirv_tbl_type,
190 x_sirv_tbl OUT NOCOPY sirv_tbl_type);
191
192 PROCEDURE delete_row(
193 p_api_version IN NUMBER,
194 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
195 x_return_status OUT NOCOPY VARCHAR2,
196 x_msg_count OUT NOCOPY NUMBER,
197 x_msg_data OUT NOCOPY VARCHAR2,
198 p_sirv_rec IN sirv_rec_type);
199
200 PROCEDURE delete_row(
201 p_api_version IN NUMBER,
202 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
203 x_return_status OUT NOCOPY VARCHAR2,
204 x_msg_count OUT NOCOPY NUMBER,
205 x_msg_data OUT NOCOPY VARCHAR2,
206 p_sirv_tbl IN sirv_tbl_type);
207
208 PROCEDURE validate_row(
209 p_api_version IN NUMBER,
210 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
211 x_return_status OUT NOCOPY VARCHAR2,
212 x_msg_count OUT NOCOPY NUMBER,
213 x_msg_data OUT NOCOPY VARCHAR2,
214 p_sirv_rec IN sirv_rec_type);
215
216 PROCEDURE validate_row(
217 p_api_version IN NUMBER,
218 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
219 x_return_status OUT NOCOPY VARCHAR2,
220 x_msg_count OUT NOCOPY NUMBER,
221 x_msg_data OUT NOCOPY VARCHAR2,
222 p_sirv_tbl IN sirv_tbl_type);
223
224 END OKL_SIR_PVT;