DBA Data[Home] [Help]

APPS.OKC_KSQ_PVT dependencies on OKC_API

Line 54: g_session_id Varchar2(255) := OKC_API.G_MISS_CHAR;

50: g_end_seq_no_tbl end_seq_no_tbl;
51:
52: g_index Number;
53: g_seq_status Varchar2(30);
54: g_session_id Varchar2(255) := OKC_API.G_MISS_CHAR;
55: g_business_group_id Number := OKC_API.G_MISS_NUM;
56: g_operating_unit_id Number := OKC_API.G_MISS_NUM;
57: g_scs_code Varchar2(30) := OKC_API.G_MISS_CHAR;
58: /************************ HAND-CODED *********************************/

Line 55: g_business_group_id Number := OKC_API.G_MISS_NUM;

51:
52: g_index Number;
53: g_seq_status Varchar2(30);
54: g_session_id Varchar2(255) := OKC_API.G_MISS_CHAR;
55: g_business_group_id Number := OKC_API.G_MISS_NUM;
56: g_operating_unit_id Number := OKC_API.G_MISS_NUM;
57: g_scs_code Varchar2(30) := OKC_API.G_MISS_CHAR;
58: /************************ HAND-CODED *********************************/
59: -- Start of comments

Line 56: g_operating_unit_id Number := OKC_API.G_MISS_NUM;

52: g_index Number;
53: g_seq_status Varchar2(30);
54: g_session_id Varchar2(255) := OKC_API.G_MISS_CHAR;
55: g_business_group_id Number := OKC_API.G_MISS_NUM;
56: g_operating_unit_id Number := OKC_API.G_MISS_NUM;
57: g_scs_code Varchar2(30) := OKC_API.G_MISS_CHAR;
58: /************************ HAND-CODED *********************************/
59: -- Start of comments
60: --

Line 57: g_scs_code Varchar2(30) := OKC_API.G_MISS_CHAR;

53: g_seq_status Varchar2(30);
54: g_session_id Varchar2(255) := OKC_API.G_MISS_CHAR;
55: g_business_group_id Number := OKC_API.G_MISS_NUM;
56: g_operating_unit_id Number := OKC_API.G_MISS_NUM;
57: g_scs_code Varchar2(30) := OKC_API.G_MISS_CHAR;
58: /************************ HAND-CODED *********************************/
59: -- Start of comments
60: --
61: -- Procedure Name : validate_line_code

Line 72: x_return_status := OKC_API.G_RET_STS_SUCCESS;

68: p_ksqv_rec IN ksqv_rec_type) is
69:
70: Begin
71: -- initialize return status
72: x_return_status := OKC_API.G_RET_STS_SUCCESS;
73:
74: -- check that line_code has some valid value
75: If (p_ksqv_rec.line_code = OKC_API.G_MISS_CHAR or
76: p_ksqv_rec.line_code IS NULL) Then

Line 75: If (p_ksqv_rec.line_code = OKC_API.G_MISS_CHAR or

71: -- initialize return status
72: x_return_status := OKC_API.G_RET_STS_SUCCESS;
73:
74: -- check that line_code has some valid value
75: If (p_ksqv_rec.line_code = OKC_API.G_MISS_CHAR or
76: p_ksqv_rec.line_code IS NULL) Then
77: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
78: p_msg_name => g_required_value,
79: p_token1 => g_col_name_token,

Line 77: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

73:
74: -- check that line_code has some valid value
75: If (p_ksqv_rec.line_code = OKC_API.G_MISS_CHAR or
76: p_ksqv_rec.line_code IS NULL) Then
77: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
78: p_msg_name => g_required_value,
79: p_token1 => g_col_name_token,
80: p_token1_value => 'line_code');
81: -- set error flag

Line 82: x_return_status := OKC_API.G_RET_STS_ERROR;

78: p_msg_name => g_required_value,
79: p_token1 => g_col_name_token,
80: p_token1_value => 'line_code');
81: -- set error flag
82: x_return_status := OKC_API.G_RET_STS_ERROR;
83: End If;
84:
85: exception
86: when OTHERS then

Line 88: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

84:
85: exception
86: when OTHERS then
87: -- store SQL error message on message stack
88: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
89: p_msg_name => g_unexpected_error,
90: p_token1 => g_sqlcode_token,
91: p_token1_value => sqlcode,
92: p_token2 => g_sqlerrm_token,

Line 95: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

91: p_token1_value => sqlcode,
92: p_token2 => g_sqlerrm_token,
93: p_token2_value => sqlerrm);
94: -- set error flag as UNEXPETED error
95: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
96:
97: End validate_line_code;
98:
99: -- Start of comments

Line 111: x_return_status := OKC_API.G_RET_STS_SUCCESS;

107: procedure validate_site_yn(x_return_status OUT NOCOPY VARCHAR2,
108: p_ksqv_rec IN ksqv_rec_type) is
109: Begin
110: -- initialize return status
111: x_return_status := OKC_API.G_RET_STS_SUCCESS;
112:
113: -- check that site_yn has some valid value
114: If (p_ksqv_rec.site_yn = OKC_API.G_MISS_CHAR or
115: p_ksqv_rec.site_yn IS NULL)

Line 114: If (p_ksqv_rec.site_yn = OKC_API.G_MISS_CHAR or

110: -- initialize return status
111: x_return_status := OKC_API.G_RET_STS_SUCCESS;
112:
113: -- check that site_yn has some valid value
114: If (p_ksqv_rec.site_yn = OKC_API.G_MISS_CHAR or
115: p_ksqv_rec.site_yn IS NULL)
116: Then
117: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
118: p_msg_name => g_required_value,

Line 117: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

113: -- check that site_yn has some valid value
114: If (p_ksqv_rec.site_yn = OKC_API.G_MISS_CHAR or
115: p_ksqv_rec.site_yn IS NULL)
116: Then
117: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
118: p_msg_name => g_required_value,
119: p_token1 => g_col_name_token,
120: p_token1_value => 'site_yn');
121: -- set error flag

Line 122: x_return_status := OKC_API.G_RET_STS_ERROR;

118: p_msg_name => g_required_value,
119: p_token1 => g_col_name_token,
120: p_token1_value => 'site_yn');
121: -- set error flag
122: x_return_status := OKC_API.G_RET_STS_ERROR;
123:
124: -- halt validation
125: raise G_EXCEPTION_HALT_VALIDATION;
126: End If;

Line 130: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

126: End If;
127:
128: -- check allowed values
129: If (upper(p_ksqv_rec.site_yn) NOT IN ('Y','N')) Then
130: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
131: p_msg_name => g_invalid_value,
132: p_token1 => g_col_name_token,
133: p_token1_value => 'site_yn');
134: -- set error flag

Line 135: x_return_status := OKC_API.G_RET_STS_ERROR;

131: p_msg_name => g_invalid_value,
132: p_token1 => g_col_name_token,
133: p_token1_value => 'site_yn');
134: -- set error flag
135: x_return_status := OKC_API.G_RET_STS_ERROR;
136: End If;
137:
138: exception
139: when G_EXCEPTION_HALT_VALIDATION then

Line 145: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

141: null;
142:
143: when OTHERS then
144: -- store SQL error message on message stack
145: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
146: p_msg_name => g_unexpected_error,
147: p_token1 => g_sqlcode_token,
148: p_token1_value => sqlcode,
149: p_token2 => g_sqlerrm_token,

Line 152: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

148: p_token1_value => sqlcode,
149: p_token2 => g_sqlerrm_token,
150: p_token2_value => sqlerrm);
151: -- set error flag as UNEXPETED error
152: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
153: End validate_site_yn;
154:
155: -- Start of comments
156: --

Line 167: x_return_status := OKC_API.G_RET_STS_SUCCESS;

163: procedure validate_bg_ou_none(x_return_status OUT NOCOPY VARCHAR2,
164: p_ksqv_rec IN ksqv_rec_type) is
165: Begin
166: -- initialize return status
167: x_return_status := OKC_API.G_RET_STS_SUCCESS;
168:
169: -- check that bg_ou_none has some valid value
170: If (p_ksqv_rec.bg_ou_none = OKC_API.G_MISS_CHAR or
171: p_ksqv_rec.bg_ou_none IS NULL)

Line 170: If (p_ksqv_rec.bg_ou_none = OKC_API.G_MISS_CHAR or

166: -- initialize return status
167: x_return_status := OKC_API.G_RET_STS_SUCCESS;
168:
169: -- check that bg_ou_none has some valid value
170: If (p_ksqv_rec.bg_ou_none = OKC_API.G_MISS_CHAR or
171: p_ksqv_rec.bg_ou_none IS NULL)
172: Then
173: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
174: p_msg_name => g_required_value,

Line 173: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

169: -- check that bg_ou_none has some valid value
170: If (p_ksqv_rec.bg_ou_none = OKC_API.G_MISS_CHAR or
171: p_ksqv_rec.bg_ou_none IS NULL)
172: Then
173: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
174: p_msg_name => g_required_value,
175: p_token1 => g_col_name_token,
176: p_token1_value => 'bg_ou_none');
177: -- set error flag

Line 178: x_return_status := OKC_API.G_RET_STS_ERROR;

174: p_msg_name => g_required_value,
175: p_token1 => g_col_name_token,
176: p_token1_value => 'bg_ou_none');
177: -- set error flag
178: x_return_status := OKC_API.G_RET_STS_ERROR;
179:
180: -- halt validation
181: raise G_EXCEPTION_HALT_VALIDATION;
182: End If;

Line 186: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

182: End If;
183:
184: -- check allowed values
185: If (p_ksqv_rec.bg_ou_none NOT IN ('BUG', 'OPU', 'NON')) Then
186: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
187: p_msg_name => g_invalid_value,
188: p_token1 => g_col_name_token,
189: p_token1_value => 'bg_ou_none');
190: -- set error flag

Line 191: x_return_status := OKC_API.G_RET_STS_ERROR;

187: p_msg_name => g_invalid_value,
188: p_token1 => g_col_name_token,
189: p_token1_value => 'bg_ou_none');
190: -- set error flag
191: x_return_status := OKC_API.G_RET_STS_ERROR;
192: End If;
193:
194: exception
195: when G_EXCEPTION_HALT_VALIDATION then

Line 201: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

197: null;
198:
199: when OTHERS then
200: -- store SQL error message on message stack
201: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
202: p_msg_name => g_unexpected_error,
203: p_token1 => g_sqlcode_token,
204: p_token1_value => sqlcode,
205: p_token2 => g_sqlerrm_token,

Line 208: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

204: p_token1_value => sqlcode,
205: p_token2 => g_sqlerrm_token,
206: p_token2_value => sqlerrm);
207: -- set error flag as UNEXPETED error
208: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
209: End validate_bg_ou_none;
210:
211: -- Start of comments
212: --

Line 223: x_return_status := OKC_API.G_RET_STS_SUCCESS;

219: procedure validate_cls_scs_none(x_return_status OUT NOCOPY VARCHAR2,
220: p_ksqv_rec IN ksqv_rec_type) is
221: Begin
222: -- initialize return status
223: x_return_status := OKC_API.G_RET_STS_SUCCESS;
224:
225: -- check that cls_scs_none has valid value
226: If (p_ksqv_rec.cls_scs_none = OKC_API.G_MISS_CHAR or
227: p_ksqv_rec.cls_scs_none IS NULL)

Line 226: If (p_ksqv_rec.cls_scs_none = OKC_API.G_MISS_CHAR or

222: -- initialize return status
223: x_return_status := OKC_API.G_RET_STS_SUCCESS;
224:
225: -- check that cls_scs_none has valid value
226: If (p_ksqv_rec.cls_scs_none = OKC_API.G_MISS_CHAR or
227: p_ksqv_rec.cls_scs_none IS NULL)
228: Then
229: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
230: p_msg_name => g_required_value,

Line 229: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

225: -- check that cls_scs_none has valid value
226: If (p_ksqv_rec.cls_scs_none = OKC_API.G_MISS_CHAR or
227: p_ksqv_rec.cls_scs_none IS NULL)
228: Then
229: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
230: p_msg_name => g_required_value,
231: p_token1 => g_col_name_token,
232: p_token1_value => 'cls_scs_none');
233: -- set error flag

Line 234: x_return_status := OKC_API.G_RET_STS_ERROR;

230: p_msg_name => g_required_value,
231: p_token1 => g_col_name_token,
232: p_token1_value => 'cls_scs_none');
233: -- set error flag
234: x_return_status := OKC_API.G_RET_STS_ERROR;
235:
236: -- halt validation
237: raise G_EXCEPTION_HALT_VALIDATION;
238: End If;

Line 242: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

238: End If;
239:
240: -- check allowed values
241: If (upper(p_ksqv_rec.cls_scs_none) NOT IN ('CLS', 'SCS', 'NON')) Then
242: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
243: p_msg_name => g_invalid_value,
244: p_token1 => g_col_name_token,
245: p_token1_value => 'cls_scs_none');
246: -- set error flag

Line 247: x_return_status := OKC_API.G_RET_STS_ERROR;

243: p_msg_name => g_invalid_value,
244: p_token1 => g_col_name_token,
245: p_token1_value => 'cls_scs_none');
246: -- set error flag
247: x_return_status := OKC_API.G_RET_STS_ERROR;
248: End If;
249:
250: exception
251: when G_EXCEPTION_HALT_VALIDATION then

Line 257: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

253: null;
254:
255: when OTHERS then
256: -- store SQL error message on message stack
257: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
258: p_msg_name => g_unexpected_error,
259: p_token1 => g_sqlcode_token,
260: p_token1_value => sqlcode,
261: p_token2 => g_sqlerrm_token,

Line 264: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

260: p_token1_value => sqlcode,
261: p_token2 => g_sqlerrm_token,
262: p_token2_value => sqlerrm);
263: -- set error flag as UNEXPETED error
264: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
265: End validate_cls_scs_none;
266:
267: -- Start of comments
268: --

Line 279: x_return_status := OKC_API.G_RET_STS_SUCCESS;

275: procedure validate_user_function_yn(x_return_status OUT NOCOPY VARCHAR2,
276: p_ksqv_rec IN ksqv_rec_type) is
277: Begin
278: -- initialize return status
279: x_return_status := OKC_API.G_RET_STS_SUCCESS;
280:
281: -- check that user_function_yn has valid value
282: If (p_ksqv_rec.user_function_yn = OKC_API.G_MISS_CHAR or
283: p_ksqv_rec.user_function_yn IS NULL)

Line 282: If (p_ksqv_rec.user_function_yn = OKC_API.G_MISS_CHAR or

278: -- initialize return status
279: x_return_status := OKC_API.G_RET_STS_SUCCESS;
280:
281: -- check that user_function_yn has valid value
282: If (p_ksqv_rec.user_function_yn = OKC_API.G_MISS_CHAR or
283: p_ksqv_rec.user_function_yn IS NULL)
284: Then
285: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
286: p_msg_name => g_required_value,

Line 285: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

281: -- check that user_function_yn has valid value
282: If (p_ksqv_rec.user_function_yn = OKC_API.G_MISS_CHAR or
283: p_ksqv_rec.user_function_yn IS NULL)
284: Then
285: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
286: p_msg_name => g_required_value,
287: p_token1 => g_col_name_token,
288: p_token1_value => 'user_function_yn');
289: -- set error flag

Line 290: x_return_status := OKC_API.G_RET_STS_ERROR;

286: p_msg_name => g_required_value,
287: p_token1 => g_col_name_token,
288: p_token1_value => 'user_function_yn');
289: -- set error flag
290: x_return_status := OKC_API.G_RET_STS_ERROR;
291:
292: -- halt validation
293: raise G_EXCEPTION_HALT_VALIDATION;
294: End If;

Line 298: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

294: End If;
295:
296: -- check allowed values
297: If (upper(p_ksqv_rec.user_function_yn) NOT IN ('Y','N')) Then
298: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
299: p_msg_name => g_invalid_value,
300: p_token1 => g_col_name_token,
301: p_token1_value => 'user_function_yn');
302: -- set error flag

Line 303: x_return_status := OKC_API.G_RET_STS_ERROR;

299: p_msg_name => g_invalid_value,
300: p_token1 => g_col_name_token,
301: p_token1_value => 'user_function_yn');
302: -- set error flag
303: x_return_status := OKC_API.G_RET_STS_ERROR;
304: End If;
305:
306: exception
307: when G_EXCEPTION_HALT_VALIDATION then

Line 313: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

309: null;
310:
311: when OTHERS then
312: -- store SQL error message on message stack
313: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
314: p_msg_name => g_unexpected_error,
315: p_token1 => g_sqlcode_token,
316: p_token1_value => sqlcode,
317: p_token2 => g_sqlerrm_token,

Line 320: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

316: p_token1_value => sqlcode,
317: p_token2 => g_sqlerrm_token,
318: p_token2_value => sqlerrm);
319: -- set error flag as UNEXPETED error
320: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
321: End validate_user_function_yn;
322:
323: PROCEDURE validate_pdf_id(x_return_status OUT NOCOPY VARCHAR2,
324: p_ksqv_rec IN ksqv_rec_type) is

Line 335: x_return_status := OKC_API.G_RET_STS_SUCCESS;

331: from OKC_PROCESS_DEFS_B
332: where ID = p_ksqv_rec.pdf_id;
333: Begin
334: -- initialize return status
335: x_return_status := OKC_API.G_RET_STS_SUCCESS;
336:
337: If (p_ksqv_rec.user_function_yn = 'Y') Then
338: Null;
339: -- If no pdf, report it as an error

Line 340: /* If (p_ksqv_rec.pdf_id = OKC_API.G_MISS_NUM or

336:
337: If (p_ksqv_rec.user_function_yn = 'Y') Then
338: Null;
339: -- If no pdf, report it as an error
340: /* If (p_ksqv_rec.pdf_id = OKC_API.G_MISS_NUM or
341: p_ksqv_rec.pdf_id IS NULL) Then
342: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
343: p_msg_name => g_required_value,
344: p_token1 => g_col_name_token,

Line 342: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

338: Null;
339: -- If no pdf, report it as an error
340: /* If (p_ksqv_rec.pdf_id = OKC_API.G_MISS_NUM or
341: p_ksqv_rec.pdf_id IS NULL) Then
342: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
343: p_msg_name => g_required_value,
344: p_token1 => g_col_name_token,
345: p_token1_value => 'pdf_id');
346: -- set error flag

Line 347: x_return_status := OKC_API.G_RET_STS_ERROR;

343: p_msg_name => g_required_value,
344: p_token1 => g_col_name_token,
345: p_token1_value => 'pdf_id');
346: -- set error flag
347: x_return_status := OKC_API.G_RET_STS_ERROR;
348: -- halt validation
349: raise G_EXCEPTION_HALT_VALIDATION;
350: End If; */
351: End If;

Line 355: (p_ksqv_rec.pdf_id <> OKC_API.G_MISS_NUM) Then

351: End If;
352:
353: -- Check that it is a valid Process Definition
354: If (p_ksqv_rec.pdf_id IS Not Null) And
355: (p_ksqv_rec.pdf_id <> OKC_API.G_MISS_NUM) Then
356: Open l_pdfv_csr;
357: Fetch l_pdfv_csr Into l_dummy_var;
358: l_row_notfound := l_pdfv_csr%NOTFOUND;
359: Close l_pdfv_csr;

Line 362: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

358: l_row_notfound := l_pdfv_csr%NOTFOUND;
359: Close l_pdfv_csr;
360:
361: If l_row_notfound Then
362: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
363: p_msg_name => g_no_parent_record,
364: p_token1 => g_col_name_token,
365: p_token1_value => 'pdf_id',
366: p_token2 => g_child_table_token,

Line 372: x_return_status := OKC_API.G_RET_STS_ERROR;

368: p_token3 => g_parent_table_token,
369: p_token3_value => 'OKC_PROCESS_DEFS_V');
370:
371: -- notify caller of an error
372: x_return_status := OKC_API.G_RET_STS_ERROR;
373: End If;
374: End If;
375:
376: exception

Line 379: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

375:
376: exception
377: when OTHERS then
378: -- store SQL error message on message stack
379: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
380: p_msg_name => g_unexpected_error,
381: p_token1 => g_sqlcode_token,
382: p_token1_value => sqlcode,
383: p_token2 => g_sqlerrm_token,

Line 386: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

382: p_token1_value => sqlcode,
383: p_token2 => g_sqlerrm_token,
384: p_token2_value => sqlerrm);
385: -- set error flag as UNEXPETED error
386: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
387:
388: End validate_pdf_id;
389:
390: -- Start of comments

Line 402: x_return_status := OKC_API.G_RET_STS_SUCCESS;

398: procedure validate_manual_override_yn(x_return_status OUT NOCOPY VARCHAR2,
399: p_ksqv_rec IN ksqv_rec_type) is
400: Begin
401: -- initialize return status
402: x_return_status := OKC_API.G_RET_STS_SUCCESS;
403:
404: -- check that manual_override_yn has valid value
405: If (p_ksqv_rec.manual_override_yn = OKC_API.G_MISS_CHAR or
406: p_ksqv_rec.manual_override_yn IS NULL)

Line 405: If (p_ksqv_rec.manual_override_yn = OKC_API.G_MISS_CHAR or

401: -- initialize return status
402: x_return_status := OKC_API.G_RET_STS_SUCCESS;
403:
404: -- check that manual_override_yn has valid value
405: If (p_ksqv_rec.manual_override_yn = OKC_API.G_MISS_CHAR or
406: p_ksqv_rec.manual_override_yn IS NULL)
407: Then
408: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
409: p_msg_name => g_required_value,

Line 408: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

404: -- check that manual_override_yn has valid value
405: If (p_ksqv_rec.manual_override_yn = OKC_API.G_MISS_CHAR or
406: p_ksqv_rec.manual_override_yn IS NULL)
407: Then
408: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
409: p_msg_name => g_required_value,
410: p_token1 => g_col_name_token,
411: p_token1_value => 'manual_override_yn');
412: -- set error flag

Line 413: x_return_status := OKC_API.G_RET_STS_ERROR;

409: p_msg_name => g_required_value,
410: p_token1 => g_col_name_token,
411: p_token1_value => 'manual_override_yn');
412: -- set error flag
413: x_return_status := OKC_API.G_RET_STS_ERROR;
414:
415: -- halt validation
416: raise G_EXCEPTION_HALT_VALIDATION;
417: End If;

Line 421: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

417: End If;
418:
419: -- check allowed values
420: If (upper(p_ksqv_rec.manual_override_yn) NOT IN ('Y','N')) Then
421: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
422: p_msg_name => g_invalid_value,
423: p_token1 => g_col_name_token,
424: p_token1_value => 'manual_override_yn');
425: -- set error flag

Line 426: x_return_status := OKC_API.G_RET_STS_ERROR;

422: p_msg_name => g_invalid_value,
423: p_token1 => g_col_name_token,
424: p_token1_value => 'manual_override_yn');
425: -- set error flag
426: x_return_status := OKC_API.G_RET_STS_ERROR;
427: End If;
428:
429: exception
430: when G_EXCEPTION_HALT_VALIDATION then

Line 436: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

432: null;
433:
434: when OTHERS then
435: -- store SQL error message on message stack
436: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
437: p_msg_name => g_unexpected_error,
438: p_token1 => g_sqlcode_token,
439: p_token1_value => sqlcode,
440: p_token2 => g_sqlerrm_token,

Line 443: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

439: p_token1_value => sqlcode,
440: p_token2 => g_sqlerrm_token,
441: p_token2_value => sqlerrm);
442: -- set error flag as UNEXPETED error
443: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
444: End validate_manual_override_yn;
445:
446: /*********************** END HAND-CODED ********************************/
447: ---------------------------------------------------------------------------

Line 599: IF (l_ksqv_rec.pdf_id = OKC_API.G_MISS_NUM) THEN

595: p_ksqv_rec IN ksqv_rec_type
596: ) RETURN ksqv_rec_type IS
597: l_ksqv_rec ksqv_rec_type := p_ksqv_rec;
598: BEGIN
599: IF (l_ksqv_rec.pdf_id = OKC_API.G_MISS_NUM) THEN
600: l_ksqv_rec.pdf_id := NULL;
601: END IF;
602: IF (l_ksqv_rec.site_yn = OKC_API.G_MISS_CHAR) THEN
603: l_ksqv_rec.site_yn := NULL;

Line 602: IF (l_ksqv_rec.site_yn = OKC_API.G_MISS_CHAR) THEN

598: BEGIN
599: IF (l_ksqv_rec.pdf_id = OKC_API.G_MISS_NUM) THEN
600: l_ksqv_rec.pdf_id := NULL;
601: END IF;
602: IF (l_ksqv_rec.site_yn = OKC_API.G_MISS_CHAR) THEN
603: l_ksqv_rec.site_yn := NULL;
604: END IF;
605: IF (l_ksqv_rec.bg_ou_none = OKC_API.G_MISS_CHAR) THEN
606: l_ksqv_rec.bg_ou_none := NULL;

Line 605: IF (l_ksqv_rec.bg_ou_none = OKC_API.G_MISS_CHAR) THEN

601: END IF;
602: IF (l_ksqv_rec.site_yn = OKC_API.G_MISS_CHAR) THEN
603: l_ksqv_rec.site_yn := NULL;
604: END IF;
605: IF (l_ksqv_rec.bg_ou_none = OKC_API.G_MISS_CHAR) THEN
606: l_ksqv_rec.bg_ou_none := NULL;
607: END IF;
608: IF (l_ksqv_rec.cls_scs_none = OKC_API.G_MISS_CHAR) THEN
609: l_ksqv_rec.cls_scs_none := NULL;

Line 608: IF (l_ksqv_rec.cls_scs_none = OKC_API.G_MISS_CHAR) THEN

604: END IF;
605: IF (l_ksqv_rec.bg_ou_none = OKC_API.G_MISS_CHAR) THEN
606: l_ksqv_rec.bg_ou_none := NULL;
607: END IF;
608: IF (l_ksqv_rec.cls_scs_none = OKC_API.G_MISS_CHAR) THEN
609: l_ksqv_rec.cls_scs_none := NULL;
610: END IF;
611: IF (l_ksqv_rec.user_function_yn = OKC_API.G_MISS_CHAR) THEN
612: l_ksqv_rec.user_function_yn := NULL;

Line 611: IF (l_ksqv_rec.user_function_yn = OKC_API.G_MISS_CHAR) THEN

607: END IF;
608: IF (l_ksqv_rec.cls_scs_none = OKC_API.G_MISS_CHAR) THEN
609: l_ksqv_rec.cls_scs_none := NULL;
610: END IF;
611: IF (l_ksqv_rec.user_function_yn = OKC_API.G_MISS_CHAR) THEN
612: l_ksqv_rec.user_function_yn := NULL;
613: END IF;
614: IF (l_ksqv_rec.manual_override_yn = OKC_API.G_MISS_CHAR) THEN
615: l_ksqv_rec.manual_override_yn := NULL;

Line 614: IF (l_ksqv_rec.manual_override_yn = OKC_API.G_MISS_CHAR) THEN

610: END IF;
611: IF (l_ksqv_rec.user_function_yn = OKC_API.G_MISS_CHAR) THEN
612: l_ksqv_rec.user_function_yn := NULL;
613: END IF;
614: IF (l_ksqv_rec.manual_override_yn = OKC_API.G_MISS_CHAR) THEN
615: l_ksqv_rec.manual_override_yn := NULL;
616: END IF;
617: IF (l_ksqv_rec.object_version_number = OKC_API.G_MISS_NUM) THEN
618: l_ksqv_rec.object_version_number := NULL;

Line 617: IF (l_ksqv_rec.object_version_number = OKC_API.G_MISS_NUM) THEN

613: END IF;
614: IF (l_ksqv_rec.manual_override_yn = OKC_API.G_MISS_CHAR) THEN
615: l_ksqv_rec.manual_override_yn := NULL;
616: END IF;
617: IF (l_ksqv_rec.object_version_number = OKC_API.G_MISS_NUM) THEN
618: l_ksqv_rec.object_version_number := NULL;
619: END IF;
620: IF (l_ksqv_rec.created_by = OKC_API.G_MISS_NUM) THEN
621: l_ksqv_rec.created_by := NULL;

Line 620: IF (l_ksqv_rec.created_by = OKC_API.G_MISS_NUM) THEN

616: END IF;
617: IF (l_ksqv_rec.object_version_number = OKC_API.G_MISS_NUM) THEN
618: l_ksqv_rec.object_version_number := NULL;
619: END IF;
620: IF (l_ksqv_rec.created_by = OKC_API.G_MISS_NUM) THEN
621: l_ksqv_rec.created_by := NULL;
622: END IF;
623: IF (l_ksqv_rec.creation_date = OKC_API.G_MISS_DATE) THEN
624: l_ksqv_rec.creation_date := NULL;

Line 623: IF (l_ksqv_rec.creation_date = OKC_API.G_MISS_DATE) THEN

619: END IF;
620: IF (l_ksqv_rec.created_by = OKC_API.G_MISS_NUM) THEN
621: l_ksqv_rec.created_by := NULL;
622: END IF;
623: IF (l_ksqv_rec.creation_date = OKC_API.G_MISS_DATE) THEN
624: l_ksqv_rec.creation_date := NULL;
625: END IF;
626: IF (l_ksqv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
627: l_ksqv_rec.last_updated_by := NULL;

Line 626: IF (l_ksqv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN

622: END IF;
623: IF (l_ksqv_rec.creation_date = OKC_API.G_MISS_DATE) THEN
624: l_ksqv_rec.creation_date := NULL;
625: END IF;
626: IF (l_ksqv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
627: l_ksqv_rec.last_updated_by := NULL;
628: END IF;
629: IF (l_ksqv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
630: l_ksqv_rec.last_update_date := NULL;

Line 629: IF (l_ksqv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN

625: END IF;
626: IF (l_ksqv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
627: l_ksqv_rec.last_updated_by := NULL;
628: END IF;
629: IF (l_ksqv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
630: l_ksqv_rec.last_update_date := NULL;
631: END IF;
632: IF (l_ksqv_rec.last_update_login = OKC_API.G_MISS_NUM) THEN
633: l_ksqv_rec.last_update_login := NULL;

Line 632: IF (l_ksqv_rec.last_update_login = OKC_API.G_MISS_NUM) THEN

628: END IF;
629: IF (l_ksqv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
630: l_ksqv_rec.last_update_date := NULL;
631: END IF;
632: IF (l_ksqv_rec.last_update_login = OKC_API.G_MISS_NUM) THEN
633: l_ksqv_rec.last_update_login := NULL;
634: END IF;
635: RETURN(l_ksqv_rec);
636: END null_out_defaults;

Line 646: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

642: ----------------------------------------------
643: FUNCTION Validate_Attributes (
644: p_ksqv_rec IN ksqv_rec_type
645: ) RETURN VARCHAR2 IS
646: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
647: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
648: BEGIN
649: /************************ HAND-CODED *********************************/
650: validate_line_code

Line 647: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

643: FUNCTION Validate_Attributes (
644: p_ksqv_rec IN ksqv_rec_type
645: ) RETURN VARCHAR2 IS
646: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
647: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
648: BEGIN
649: /************************ HAND-CODED *********************************/
650: validate_line_code
651: (x_return_status => l_return_status,

Line 655: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

651: (x_return_status => l_return_status,
652: p_ksqv_rec => p_ksqv_rec);
653:
654: -- store the highest degree of error
655: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
656: If x_return_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
657: x_return_status := l_return_status;
658: End If;
659: End If;

Line 656: If x_return_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then

652: p_ksqv_rec => p_ksqv_rec);
653:
654: -- store the highest degree of error
655: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
656: If x_return_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
657: x_return_status := l_return_status;
658: End If;
659: End If;
660:

Line 666: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

662: (x_return_status => l_return_status,
663: p_ksqv_rec => p_ksqv_rec);
664:
665: -- store the highest degree of error
666: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
667: If x_return_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
668: x_return_status := l_return_status;
669: End If;
670: End If;

Line 667: If x_return_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then

663: p_ksqv_rec => p_ksqv_rec);
664:
665: -- store the highest degree of error
666: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
667: If x_return_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
668: x_return_status := l_return_status;
669: End If;
670: End If;
671:

Line 677: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

673: (x_return_status => l_return_status,
674: p_ksqv_rec => p_ksqv_rec);
675:
676: -- store the highest degree of error
677: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
678: If x_return_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
679: x_return_status := l_return_status;
680: End If;
681: End If;

Line 678: If x_return_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then

674: p_ksqv_rec => p_ksqv_rec);
675:
676: -- store the highest degree of error
677: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
678: If x_return_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
679: x_return_status := l_return_status;
680: End If;
681: End If;
682:

Line 688: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

684: (x_return_status => l_return_status,
685: p_ksqv_rec => p_ksqv_rec);
686:
687: -- store the highest degree of error
688: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
689: If x_return_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
690: x_return_status := l_return_status;
691: End If;
692: End If;

Line 689: If x_return_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then

685: p_ksqv_rec => p_ksqv_rec);
686:
687: -- store the highest degree of error
688: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
689: If x_return_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
690: x_return_status := l_return_status;
691: End If;
692: End If;
693:

Line 699: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

695: (x_return_status => l_return_status,
696: p_ksqv_rec => p_ksqv_rec);
697:
698: -- store the highest degree of error
699: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
700: If x_return_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
701: x_return_status := l_return_status;
702: End If;
703: End If;

Line 700: If x_return_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then

696: p_ksqv_rec => p_ksqv_rec);
697:
698: -- store the highest degree of error
699: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
700: If x_return_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
701: x_return_status := l_return_status;
702: End If;
703: End If;
704:

Line 710: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

706: (x_return_status => l_return_status,
707: p_ksqv_rec => p_ksqv_rec);
708:
709: -- store the highest degree of error
710: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
711: If x_return_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
712: x_return_status := l_return_status;
713: End If;
714: End If;

Line 711: If x_return_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then

707: p_ksqv_rec => p_ksqv_rec);
708:
709: -- store the highest degree of error
710: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
711: If x_return_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
712: x_return_status := l_return_status;
713: End If;
714: End If;
715:

Line 721: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

717: (x_return_status => l_return_status,
718: p_ksqv_rec => p_ksqv_rec);
719:
720: -- store the highest degree of error
721: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
722: If x_return_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
723: x_return_status := l_return_status;
724: End If;
725: End If;

Line 722: If x_return_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then

718: p_ksqv_rec => p_ksqv_rec);
719:
720: -- store the highest degree of error
721: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
722: If x_return_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
723: x_return_status := l_return_status;
724: End If;
725: End If;
726:

Line 731: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

727: RETURN(x_return_status);
728: exception
729: when OTHERS then
730: -- store SQL error message on message stack
731: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
732: p_msg_name => g_unexpected_error,
733: p_token1 => g_sqlcode_token,
734: p_token1_value => sqlcode,
735: p_token2 => g_sqlerrm_token,

Line 738: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

734: p_token1_value => sqlcode,
735: p_token2 => g_sqlerrm_token,
736: p_token2_value => sqlerrm);
737: -- notify caller of an UNEXPETED error
738: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
739: -- return status to caller
740: RETURN(x_return_status);
741: /*********************** END HAND-CODED ********************************/
742: END Validate_Attributes;

Line 760: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

756: SELECT count(*)
757: FROM OKC_K_SEQ_HEADER;
758: -- WHERE line_code = p_ksqv_rec.line_code;
759:
760: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
761: -- l_row_found BOOLEAN := FALSE;
762: l_dummy Number;
763:
764: BEGIN

Line 773: OKC_API.set_message(G_APP_NAME,

769:
770: -- If more than 1 setup, stack the error message
771: IF (l_dummy > 1) THEN
772: -- Display the error message
773: OKC_API.set_message(G_APP_NAME,
774: 'OKC_K_SEQ_SINGLE_HEADER');
775: l_return_status := OKC_API.G_RET_STS_ERROR;
776: RAISE G_EXCEPTION_HALT_VALIDATION;
777: END IF;

Line 775: l_return_status := OKC_API.G_RET_STS_ERROR;

771: IF (l_dummy > 1) THEN
772: -- Display the error message
773: OKC_API.set_message(G_APP_NAME,
774: 'OKC_K_SEQ_SINGLE_HEADER');
775: l_return_status := OKC_API.G_RET_STS_ERROR;
776: RAISE G_EXCEPTION_HALT_VALIDATION;
777: END IF;
778:
779: -- If there is no selection in the header, set the error message

Line 785: OKC_API.set_message(G_APP_NAME,

781: p_ksqv_rec.user_function_yn = 'N' And -- Not a User Defined Function
782: p_ksqv_rec.bg_ou_none = 'NON' And -- No Business Group/OU selected
783: p_ksqv_rec.cls_scs_none = 'NON' Then -- No Class/Category selected
784: -- Display the error message
785: OKC_API.set_message(G_APP_NAME,
786: 'OKC_NO_K_SEQ_SELECTED');
787: l_return_status := OKC_API.G_RET_STS_ERROR;
788: RAISE G_EXCEPTION_HALT_VALIDATION;
789: END IF;

Line 787: l_return_status := OKC_API.G_RET_STS_ERROR;

783: p_ksqv_rec.cls_scs_none = 'NON' Then -- No Class/Category selected
784: -- Display the error message
785: OKC_API.set_message(G_APP_NAME,
786: 'OKC_NO_K_SEQ_SELECTED');
787: l_return_status := OKC_API.G_RET_STS_ERROR;
788: RAISE G_EXCEPTION_HALT_VALIDATION;
789: END IF;
790:
791: If p_ksqv_rec.site_yn = 'Y' Then

Line 797: OKC_API.set_message(G_APP_NAME,

793: If p_ksqv_rec.bg_ou_none In ('BUG', 'OPU') Or
794: p_ksqv_rec.cls_scs_none In ('CLS', 'SCS') Or
795: p_ksqv_rec.user_function_yn = 'Y' Then
796: -- Display the error message
797: OKC_API.set_message(G_APP_NAME,
798: 'OKC_SITE_EXCLUSIVE');
799: l_return_status := OKC_API.G_RET_STS_ERROR;
800: RAISE G_EXCEPTION_HALT_VALIDATION;
801: END IF;

Line 799: l_return_status := OKC_API.G_RET_STS_ERROR;

795: p_ksqv_rec.user_function_yn = 'Y' Then
796: -- Display the error message
797: OKC_API.set_message(G_APP_NAME,
798: 'OKC_SITE_EXCLUSIVE');
799: l_return_status := OKC_API.G_RET_STS_ERROR;
800: RAISE G_EXCEPTION_HALT_VALIDATION;
801: END IF;
802: END IF;
803:

Line 810: OKC_API.set_message(G_APP_NAME,

806: -- no other combination can be selected
807: If p_ksqv_rec.bg_ou_none In ('BUG', 'OPU') Or
808: p_ksqv_rec.cls_scs_none In ('CLS', 'SCS') Then
809: -- Display the error message
810: OKC_API.set_message(G_APP_NAME,
811: 'OKC_USER_FUNCTION_EXCLUSIVE');
812: l_return_status := OKC_API.G_RET_STS_ERROR;
813: RAISE G_EXCEPTION_HALT_VALIDATION;
814: END IF;

Line 812: l_return_status := OKC_API.G_RET_STS_ERROR;

808: p_ksqv_rec.cls_scs_none In ('CLS', 'SCS') Then
809: -- Display the error message
810: OKC_API.set_message(G_APP_NAME,
811: 'OKC_USER_FUNCTION_EXCLUSIVE');
812: l_return_status := OKC_API.G_RET_STS_ERROR;
813: RAISE G_EXCEPTION_HALT_VALIDATION;
814: END IF;
815: -- For user defined function, function name must be supplied
816: -- Not necessary. We will make it mandatory in the UI itself.

Line 817: /* If p_ksqv_rec.pdf_id = OKC_API.G_MISS_NUM Or

813: RAISE G_EXCEPTION_HALT_VALIDATION;
814: END IF;
815: -- For user defined function, function name must be supplied
816: -- Not necessary. We will make it mandatory in the UI itself.
817: /* If p_ksqv_rec.pdf_id = OKC_API.G_MISS_NUM Or
818: p_ksqv_rec.pdf_id Is Null Then
819: -- Display the error message
820: OKC_API.set_message(G_APP_NAME,
821: 'OKC_FUNCTION_NAME_UNSELECTED');

Line 820: OKC_API.set_message(G_APP_NAME,

816: -- Not necessary. We will make it mandatory in the UI itself.
817: /* If p_ksqv_rec.pdf_id = OKC_API.G_MISS_NUM Or
818: p_ksqv_rec.pdf_id Is Null Then
819: -- Display the error message
820: OKC_API.set_message(G_APP_NAME,
821: 'OKC_FUNCTION_NAME_UNSELECTED');
822: l_return_status := OKC_API.G_RET_STS_ERROR;
823: RAISE G_EXCEPTION_HALT_VALIDATION;
824: END IF; */

Line 822: l_return_status := OKC_API.G_RET_STS_ERROR;

818: p_ksqv_rec.pdf_id Is Null Then
819: -- Display the error message
820: OKC_API.set_message(G_APP_NAME,
821: 'OKC_FUNCTION_NAME_UNSELECTED');
822: l_return_status := OKC_API.G_RET_STS_ERROR;
823: RAISE G_EXCEPTION_HALT_VALIDATION;
824: END IF; */
825: END IF;
826: /*********************** END HAND-CODED *************************/

Line 893: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

889: p_ksqv_rec IN ksqv_rec_type) IS
890:
891: l_api_version CONSTANT NUMBER := 1;
892: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
893: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
894: l_ksqv_rec ksqv_rec_type := p_ksqv_rec;
895: l_ksq_rec ksq_rec_type;
896: BEGIN
897: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

Line 897: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

893: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
894: l_ksqv_rec ksqv_rec_type := p_ksqv_rec;
895: l_ksq_rec ksq_rec_type;
896: BEGIN
897: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
898: G_PKG_NAME,
899: p_init_msg_list,
900: l_api_version,
901: p_api_version,

Line 904: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

900: l_api_version,
901: p_api_version,
902: '_PVT',
903: x_return_status);
904: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
905: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
906: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
907: RAISE OKC_API.G_EXCEPTION_ERROR;
908: END IF;

Line 905: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

901: p_api_version,
902: '_PVT',
903: x_return_status);
904: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
905: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
906: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
907: RAISE OKC_API.G_EXCEPTION_ERROR;
908: END IF;
909: --- Validate all non-missing attributes (Item Level Validation)

Line 906: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

902: '_PVT',
903: x_return_status);
904: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
905: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
906: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
907: RAISE OKC_API.G_EXCEPTION_ERROR;
908: END IF;
909: --- Validate all non-missing attributes (Item Level Validation)
910: l_return_status := Validate_Attributes(l_ksqv_rec);

Line 907: RAISE OKC_API.G_EXCEPTION_ERROR;

903: x_return_status);
904: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
905: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
906: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
907: RAISE OKC_API.G_EXCEPTION_ERROR;
908: END IF;
909: --- Validate all non-missing attributes (Item Level Validation)
910: l_return_status := Validate_Attributes(l_ksqv_rec);
911: --- If any errors happen abort API

Line 912: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

908: END IF;
909: --- Validate all non-missing attributes (Item Level Validation)
910: l_return_status := Validate_Attributes(l_ksqv_rec);
911: --- If any errors happen abort API
912: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
913: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
914: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
915: RAISE OKC_API.G_EXCEPTION_ERROR;
916: END IF;

Line 913: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

909: --- Validate all non-missing attributes (Item Level Validation)
910: l_return_status := Validate_Attributes(l_ksqv_rec);
911: --- If any errors happen abort API
912: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
913: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
914: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
915: RAISE OKC_API.G_EXCEPTION_ERROR;
916: END IF;
917: l_return_status := Validate_Record(l_ksqv_rec);

Line 914: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

910: l_return_status := Validate_Attributes(l_ksqv_rec);
911: --- If any errors happen abort API
912: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
913: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
914: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
915: RAISE OKC_API.G_EXCEPTION_ERROR;
916: END IF;
917: l_return_status := Validate_Record(l_ksqv_rec);
918: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 915: RAISE OKC_API.G_EXCEPTION_ERROR;

911: --- If any errors happen abort API
912: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
913: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
914: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
915: RAISE OKC_API.G_EXCEPTION_ERROR;
916: END IF;
917: l_return_status := Validate_Record(l_ksqv_rec);
918: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
919: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 918: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

914: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
915: RAISE OKC_API.G_EXCEPTION_ERROR;
916: END IF;
917: l_return_status := Validate_Record(l_ksqv_rec);
918: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
919: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
920: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
921: RAISE OKC_API.G_EXCEPTION_ERROR;
922: END IF;

Line 919: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

915: RAISE OKC_API.G_EXCEPTION_ERROR;
916: END IF;
917: l_return_status := Validate_Record(l_ksqv_rec);
918: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
919: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
920: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
921: RAISE OKC_API.G_EXCEPTION_ERROR;
922: END IF;
923: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 920: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

916: END IF;
917: l_return_status := Validate_Record(l_ksqv_rec);
918: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
919: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
920: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
921: RAISE OKC_API.G_EXCEPTION_ERROR;
922: END IF;
923: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
924: EXCEPTION

Line 921: RAISE OKC_API.G_EXCEPTION_ERROR;

917: l_return_status := Validate_Record(l_ksqv_rec);
918: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
919: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
920: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
921: RAISE OKC_API.G_EXCEPTION_ERROR;
922: END IF;
923: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
924: EXCEPTION
925: WHEN OKC_API.G_EXCEPTION_ERROR THEN

Line 923: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

919: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
920: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
921: RAISE OKC_API.G_EXCEPTION_ERROR;
922: END IF;
923: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
924: EXCEPTION
925: WHEN OKC_API.G_EXCEPTION_ERROR THEN
926: x_return_status := OKC_API.HANDLE_EXCEPTIONS
927: (

Line 925: WHEN OKC_API.G_EXCEPTION_ERROR THEN

921: RAISE OKC_API.G_EXCEPTION_ERROR;
922: END IF;
923: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
924: EXCEPTION
925: WHEN OKC_API.G_EXCEPTION_ERROR THEN
926: x_return_status := OKC_API.HANDLE_EXCEPTIONS
927: (
928: l_api_name,
929: G_PKG_NAME,

Line 926: x_return_status := OKC_API.HANDLE_EXCEPTIONS

922: END IF;
923: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
924: EXCEPTION
925: WHEN OKC_API.G_EXCEPTION_ERROR THEN
926: x_return_status := OKC_API.HANDLE_EXCEPTIONS
927: (
928: l_api_name,
929: G_PKG_NAME,
930: 'OKC_API.G_RET_STS_ERROR',

Line 930: 'OKC_API.G_RET_STS_ERROR',

926: x_return_status := OKC_API.HANDLE_EXCEPTIONS
927: (
928: l_api_name,
929: G_PKG_NAME,
930: 'OKC_API.G_RET_STS_ERROR',
931: x_msg_count,
932: x_msg_data,
933: '_PVT'
934: );

Line 935: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

931: x_msg_count,
932: x_msg_data,
933: '_PVT'
934: );
935: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
936: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
937: (
938: l_api_name,
939: G_PKG_NAME,

Line 936: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

932: x_msg_data,
933: '_PVT'
934: );
935: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
936: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
937: (
938: l_api_name,
939: G_PKG_NAME,
940: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 940: 'OKC_API.G_RET_STS_UNEXP_ERROR',

936: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
937: (
938: l_api_name,
939: G_PKG_NAME,
940: 'OKC_API.G_RET_STS_UNEXP_ERROR',
941: x_msg_count,
942: x_msg_data,
943: '_PVT'
944: );

Line 946: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

942: x_msg_data,
943: '_PVT'
944: );
945: WHEN OTHERS THEN
946: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
947: (
948: l_api_name,
949: G_PKG_NAME,
950: 'OTHERS',

Line 969: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

965: p_ksqv_tbl IN ksqv_tbl_type) IS
966:
967: l_api_version CONSTANT NUMBER := 1;
968: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
969: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
970: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
971: i NUMBER := 0;
972: BEGIN
973: OKC_API.init_msg_list(p_init_msg_list);

Line 970: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

966:
967: l_api_version CONSTANT NUMBER := 1;
968: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
969: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
970: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
971: i NUMBER := 0;
972: BEGIN
973: OKC_API.init_msg_list(p_init_msg_list);
974: -- Make sure PL/SQL table has records in it before passing

Line 973: OKC_API.init_msg_list(p_init_msg_list);

969: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
970: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
971: i NUMBER := 0;
972: BEGIN
973: OKC_API.init_msg_list(p_init_msg_list);
974: -- Make sure PL/SQL table has records in it before passing
975: IF (p_ksqv_tbl.COUNT > 0) THEN
976: i := p_ksqv_tbl.FIRST;
977: LOOP

Line 980: p_init_msg_list => OKC_API.G_FALSE,

976: i := p_ksqv_tbl.FIRST;
977: LOOP
978: validate_row (
979: p_api_version => p_api_version,
980: p_init_msg_list => OKC_API.G_FALSE,
981: x_return_status => x_return_status,
982: x_msg_count => x_msg_count,
983: x_msg_data => x_msg_data,
984: p_ksqv_rec => p_ksqv_tbl(i));

Line 987: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then

983: x_msg_data => x_msg_data,
984: p_ksqv_rec => p_ksqv_tbl(i));
985:
986: -- store the highest degree of error
987: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
988: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
989: l_overall_status := x_return_status;
990: End If;
991: End If;

Line 988: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then

984: p_ksqv_rec => p_ksqv_tbl(i));
985:
986: -- store the highest degree of error
987: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
988: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
989: l_overall_status := x_return_status;
990: End If;
991: End If;
992:

Line 1000: WHEN OKC_API.G_EXCEPTION_ERROR THEN

996: -- return overall status
997: x_return_status := l_overall_status;
998: END IF;
999: EXCEPTION
1000: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1001: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1002: (
1003: l_api_name,
1004: G_PKG_NAME,

Line 1001: x_return_status := OKC_API.HANDLE_EXCEPTIONS

997: x_return_status := l_overall_status;
998: END IF;
999: EXCEPTION
1000: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1001: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1002: (
1003: l_api_name,
1004: G_PKG_NAME,
1005: 'OKC_API.G_RET_STS_ERROR',

Line 1005: 'OKC_API.G_RET_STS_ERROR',

1001: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1002: (
1003: l_api_name,
1004: G_PKG_NAME,
1005: 'OKC_API.G_RET_STS_ERROR',
1006: x_msg_count,
1007: x_msg_data,
1008: '_PVT'
1009: );

Line 1010: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1006: x_msg_count,
1007: x_msg_data,
1008: '_PVT'
1009: );
1010: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1011: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1012: (
1013: l_api_name,
1014: G_PKG_NAME,

Line 1011: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1007: x_msg_data,
1008: '_PVT'
1009: );
1010: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1011: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1012: (
1013: l_api_name,
1014: G_PKG_NAME,
1015: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1015: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1011: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1012: (
1013: l_api_name,
1014: G_PKG_NAME,
1015: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1016: x_msg_count,
1017: x_msg_data,
1018: '_PVT'
1019: );

Line 1021: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1017: x_msg_data,
1018: '_PVT'
1019: );
1020: WHEN OTHERS THEN
1021: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1022: (
1023: l_api_name,
1024: G_PKG_NAME,
1025: 'OTHERS',

Line 1048: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1044: x_ksq_rec OUT NOCOPY ksq_rec_type) IS
1045:
1046: l_api_version CONSTANT NUMBER := 1;
1047: l_api_name CONSTANT VARCHAR2(30) := 'K_SEQ_insert_row';
1048: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1049: l_ksq_rec ksq_rec_type := p_ksq_rec;
1050: l_def_ksq_rec ksq_rec_type;
1051: ---------------------------------------
1052: -- Set_Attributes for:OKC_K_SEQ_HEADER --

Line 1058: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1054: FUNCTION Set_Attributes (
1055: p_ksq_rec IN ksq_rec_type,
1056: x_ksq_rec OUT NOCOPY ksq_rec_type
1057: ) RETURN VARCHAR2 IS
1058: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1059: BEGIN
1060: x_ksq_rec := p_ksq_rec;
1061: RETURN(l_return_status);
1062: END Set_Attributes;

Line 1064: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1060: x_ksq_rec := p_ksq_rec;
1061: RETURN(l_return_status);
1062: END Set_Attributes;
1063: BEGIN
1064: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1065: p_init_msg_list,
1066: '_PVT',
1067: x_return_status);
1068: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1068: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1064: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1065: p_init_msg_list,
1066: '_PVT',
1067: x_return_status);
1068: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1069: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1070: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1071: RAISE OKC_API.G_EXCEPTION_ERROR;
1072: END IF;

Line 1069: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1065: p_init_msg_list,
1066: '_PVT',
1067: x_return_status);
1068: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1069: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1070: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1071: RAISE OKC_API.G_EXCEPTION_ERROR;
1072: END IF;
1073: --- Setting item attributes

Line 1070: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1066: '_PVT',
1067: x_return_status);
1068: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1069: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1070: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1071: RAISE OKC_API.G_EXCEPTION_ERROR;
1072: END IF;
1073: --- Setting item attributes
1074: l_return_status := Set_Attributes(

Line 1071: RAISE OKC_API.G_EXCEPTION_ERROR;

1067: x_return_status);
1068: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1069: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1070: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1071: RAISE OKC_API.G_EXCEPTION_ERROR;
1072: END IF;
1073: --- Setting item attributes
1074: l_return_status := Set_Attributes(
1075: p_ksq_rec, -- IN

Line 1078: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1074: l_return_status := Set_Attributes(
1075: p_ksq_rec, -- IN
1076: l_ksq_rec); -- OUT
1077: --- If any errors happen abort API
1078: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1079: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1080: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1081: RAISE OKC_API.G_EXCEPTION_ERROR;
1082: END IF;

Line 1079: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1075: p_ksq_rec, -- IN
1076: l_ksq_rec); -- OUT
1077: --- If any errors happen abort API
1078: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1079: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1080: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1081: RAISE OKC_API.G_EXCEPTION_ERROR;
1082: END IF;
1083: INSERT INTO OKC_K_SEQ_HEADER(

Line 1080: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1076: l_ksq_rec); -- OUT
1077: --- If any errors happen abort API
1078: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1079: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1080: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1081: RAISE OKC_API.G_EXCEPTION_ERROR;
1082: END IF;
1083: INSERT INTO OKC_K_SEQ_HEADER(
1084: line_code,

Line 1081: RAISE OKC_API.G_EXCEPTION_ERROR;

1077: --- If any errors happen abort API
1078: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1079: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1080: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1081: RAISE OKC_API.G_EXCEPTION_ERROR;
1082: END IF;
1083: INSERT INTO OKC_K_SEQ_HEADER(
1084: line_code,
1085: site_yn,

Line 1113: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1109: l_ksq_rec.last_update_date,
1110: l_ksq_rec.last_update_login);
1111: -- Set OUT values
1112: x_ksq_rec := l_ksq_rec;
1113: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1114: EXCEPTION
1115: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1116: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1117: (

Line 1115: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1111: -- Set OUT values
1112: x_ksq_rec := l_ksq_rec;
1113: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1114: EXCEPTION
1115: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1116: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1117: (
1118: l_api_name,
1119: G_PKG_NAME,

Line 1116: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1112: x_ksq_rec := l_ksq_rec;
1113: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1114: EXCEPTION
1115: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1116: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1117: (
1118: l_api_name,
1119: G_PKG_NAME,
1120: 'OKC_API.G_RET_STS_ERROR',

Line 1120: 'OKC_API.G_RET_STS_ERROR',

1116: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1117: (
1118: l_api_name,
1119: G_PKG_NAME,
1120: 'OKC_API.G_RET_STS_ERROR',
1121: x_msg_count,
1122: x_msg_data,
1123: '_PVT'
1124: );

Line 1125: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1121: x_msg_count,
1122: x_msg_data,
1123: '_PVT'
1124: );
1125: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1126: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1127: (
1128: l_api_name,
1129: G_PKG_NAME,

Line 1126: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1122: x_msg_data,
1123: '_PVT'
1124: );
1125: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1126: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1127: (
1128: l_api_name,
1129: G_PKG_NAME,
1130: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1130: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1126: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1127: (
1128: l_api_name,
1129: G_PKG_NAME,
1130: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1131: x_msg_count,
1132: x_msg_data,
1133: '_PVT'
1134: );

Line 1136: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1132: x_msg_data,
1133: '_PVT'
1134: );
1135: WHEN OTHERS THEN
1136: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1137: (
1138: l_api_name,
1139: G_PKG_NAME,
1140: 'OTHERS',

Line 1160: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1156: x_ksqv_rec OUT NOCOPY ksqv_rec_type) IS
1157:
1158: l_api_version CONSTANT NUMBER := 1;
1159: l_api_name CONSTANT VARCHAR2(30) := 'V_insert_row';
1160: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1161: l_ksqv_rec ksqv_rec_type;
1162: l_def_ksqv_rec ksqv_rec_type;
1163: l_ksq_rec ksq_rec_type;
1164: lx_ksq_rec ksq_rec_type;

Line 1187: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1183: FUNCTION Set_Attributes (
1184: p_ksqv_rec IN ksqv_rec_type,
1185: x_ksqv_rec OUT NOCOPY ksqv_rec_type
1186: ) RETURN VARCHAR2 IS
1187: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1188: BEGIN
1189: x_ksqv_rec := p_ksqv_rec;
1190: x_ksqv_rec.OBJECT_VERSION_NUMBER := 1;
1191: RETURN(l_return_status);

Line 1194: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1190: x_ksqv_rec.OBJECT_VERSION_NUMBER := 1;
1191: RETURN(l_return_status);
1192: END Set_Attributes;
1193: BEGIN
1194: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1195: G_PKG_NAME,
1196: p_init_msg_list,
1197: l_api_version,
1198: p_api_version,

Line 1201: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1197: l_api_version,
1198: p_api_version,
1199: '_PVT',
1200: x_return_status);
1201: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1202: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1203: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1204: RAISE OKC_API.G_EXCEPTION_ERROR;
1205: END IF;

Line 1202: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1198: p_api_version,
1199: '_PVT',
1200: x_return_status);
1201: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1202: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1203: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1204: RAISE OKC_API.G_EXCEPTION_ERROR;
1205: END IF;
1206: l_ksqv_rec := null_out_defaults(p_ksqv_rec);

Line 1203: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1199: '_PVT',
1200: x_return_status);
1201: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1202: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1203: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1204: RAISE OKC_API.G_EXCEPTION_ERROR;
1205: END IF;
1206: l_ksqv_rec := null_out_defaults(p_ksqv_rec);
1207: -- Set primary key value

Line 1204: RAISE OKC_API.G_EXCEPTION_ERROR;

1200: x_return_status);
1201: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1202: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1203: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1204: RAISE OKC_API.G_EXCEPTION_ERROR;
1205: END IF;
1206: l_ksqv_rec := null_out_defaults(p_ksqv_rec);
1207: -- Set primary key value
1208: -- l_ksqv_rec.ID := get_seq_id;

Line 1214: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1210: l_return_status := Set_Attributes(
1211: l_ksqv_rec, -- IN
1212: l_def_ksqv_rec); -- OUT
1213: --- If any errors happen abort API
1214: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1215: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1216: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1217: RAISE OKC_API.G_EXCEPTION_ERROR;
1218: END IF;

Line 1215: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1211: l_ksqv_rec, -- IN
1212: l_def_ksqv_rec); -- OUT
1213: --- If any errors happen abort API
1214: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1215: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1216: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1217: RAISE OKC_API.G_EXCEPTION_ERROR;
1218: END IF;
1219: l_def_ksqv_rec := fill_who_columns(l_def_ksqv_rec);

Line 1216: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1212: l_def_ksqv_rec); -- OUT
1213: --- If any errors happen abort API
1214: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1215: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1216: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1217: RAISE OKC_API.G_EXCEPTION_ERROR;
1218: END IF;
1219: l_def_ksqv_rec := fill_who_columns(l_def_ksqv_rec);
1220: --- Validate all non-missing attributes (Item Level Validation)

Line 1217: RAISE OKC_API.G_EXCEPTION_ERROR;

1213: --- If any errors happen abort API
1214: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1215: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1216: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1217: RAISE OKC_API.G_EXCEPTION_ERROR;
1218: END IF;
1219: l_def_ksqv_rec := fill_who_columns(l_def_ksqv_rec);
1220: --- Validate all non-missing attributes (Item Level Validation)
1221: l_return_status := Validate_Attributes(l_def_ksqv_rec);

Line 1223: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1219: l_def_ksqv_rec := fill_who_columns(l_def_ksqv_rec);
1220: --- Validate all non-missing attributes (Item Level Validation)
1221: l_return_status := Validate_Attributes(l_def_ksqv_rec);
1222: --- If any errors happen abort API
1223: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1224: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1225: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1226: RAISE OKC_API.G_EXCEPTION_ERROR;
1227: END IF;

Line 1224: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1220: --- Validate all non-missing attributes (Item Level Validation)
1221: l_return_status := Validate_Attributes(l_def_ksqv_rec);
1222: --- If any errors happen abort API
1223: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1224: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1225: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1226: RAISE OKC_API.G_EXCEPTION_ERROR;
1227: END IF;
1228: l_return_status := Validate_Record(l_def_ksqv_rec);

Line 1225: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1221: l_return_status := Validate_Attributes(l_def_ksqv_rec);
1222: --- If any errors happen abort API
1223: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1224: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1225: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1226: RAISE OKC_API.G_EXCEPTION_ERROR;
1227: END IF;
1228: l_return_status := Validate_Record(l_def_ksqv_rec);
1229: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1226: RAISE OKC_API.G_EXCEPTION_ERROR;

1222: --- If any errors happen abort API
1223: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1224: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1225: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1226: RAISE OKC_API.G_EXCEPTION_ERROR;
1227: END IF;
1228: l_return_status := Validate_Record(l_def_ksqv_rec);
1229: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1230: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1229: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1225: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1226: RAISE OKC_API.G_EXCEPTION_ERROR;
1227: END IF;
1228: l_return_status := Validate_Record(l_def_ksqv_rec);
1229: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1230: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1231: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1232: RAISE OKC_API.G_EXCEPTION_ERROR;
1233: END IF;

Line 1230: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1226: RAISE OKC_API.G_EXCEPTION_ERROR;
1227: END IF;
1228: l_return_status := Validate_Record(l_def_ksqv_rec);
1229: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1230: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1231: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1232: RAISE OKC_API.G_EXCEPTION_ERROR;
1233: END IF;
1234: --------------------------------------

Line 1231: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1227: END IF;
1228: l_return_status := Validate_Record(l_def_ksqv_rec);
1229: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1230: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1231: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1232: RAISE OKC_API.G_EXCEPTION_ERROR;
1233: END IF;
1234: --------------------------------------
1235: -- Move VIEW record to "Child" records

Line 1232: RAISE OKC_API.G_EXCEPTION_ERROR;

1228: l_return_status := Validate_Record(l_def_ksqv_rec);
1229: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1230: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1231: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1232: RAISE OKC_API.G_EXCEPTION_ERROR;
1233: END IF;
1234: --------------------------------------
1235: -- Move VIEW record to "Child" records
1236: --------------------------------------

Line 1249: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1245: x_msg_data,
1246: l_ksq_rec,
1247: lx_ksq_rec
1248: );
1249: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1250: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1251: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1252: RAISE OKC_API.G_EXCEPTION_ERROR;
1253: END IF;

Line 1250: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1246: l_ksq_rec,
1247: lx_ksq_rec
1248: );
1249: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1250: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1251: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1252: RAISE OKC_API.G_EXCEPTION_ERROR;
1253: END IF;
1254: migrate(lx_ksq_rec, l_def_ksqv_rec);

Line 1251: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1247: lx_ksq_rec
1248: );
1249: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1250: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1251: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1252: RAISE OKC_API.G_EXCEPTION_ERROR;
1253: END IF;
1254: migrate(lx_ksq_rec, l_def_ksqv_rec);
1255: -- Set OUT values

Line 1252: RAISE OKC_API.G_EXCEPTION_ERROR;

1248: );
1249: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1250: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1251: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1252: RAISE OKC_API.G_EXCEPTION_ERROR;
1253: END IF;
1254: migrate(lx_ksq_rec, l_def_ksqv_rec);
1255: -- Set OUT values
1256: x_ksqv_rec := l_def_ksqv_rec;

Line 1257: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1253: END IF;
1254: migrate(lx_ksq_rec, l_def_ksqv_rec);
1255: -- Set OUT values
1256: x_ksqv_rec := l_def_ksqv_rec;
1257: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1258: EXCEPTION
1259: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1260: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1261: (

Line 1259: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1255: -- Set OUT values
1256: x_ksqv_rec := l_def_ksqv_rec;
1257: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1258: EXCEPTION
1259: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1260: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1261: (
1262: l_api_name,
1263: G_PKG_NAME,

Line 1260: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1256: x_ksqv_rec := l_def_ksqv_rec;
1257: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1258: EXCEPTION
1259: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1260: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1261: (
1262: l_api_name,
1263: G_PKG_NAME,
1264: 'OKC_API.G_RET_STS_ERROR',

Line 1264: 'OKC_API.G_RET_STS_ERROR',

1260: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1261: (
1262: l_api_name,
1263: G_PKG_NAME,
1264: 'OKC_API.G_RET_STS_ERROR',
1265: x_msg_count,
1266: x_msg_data,
1267: '_PVT'
1268: );

Line 1269: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1265: x_msg_count,
1266: x_msg_data,
1267: '_PVT'
1268: );
1269: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1270: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1271: (
1272: l_api_name,
1273: G_PKG_NAME,

Line 1270: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1266: x_msg_data,
1267: '_PVT'
1268: );
1269: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1270: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1271: (
1272: l_api_name,
1273: G_PKG_NAME,
1274: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1274: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1270: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1271: (
1272: l_api_name,
1273: G_PKG_NAME,
1274: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1275: x_msg_count,
1276: x_msg_data,
1277: '_PVT'
1278: );

Line 1280: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1276: x_msg_data,
1277: '_PVT'
1278: );
1279: WHEN OTHERS THEN
1280: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1281: (
1282: l_api_name,
1283: G_PKG_NAME,
1284: 'OTHERS',

Line 1304: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1300: x_ksqv_tbl OUT NOCOPY ksqv_tbl_type) IS
1301:
1302: l_api_version CONSTANT NUMBER := 1;
1303: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
1304: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1305: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1306: i NUMBER := 0;
1307: BEGIN
1308: OKC_API.init_msg_list(p_init_msg_list);

Line 1305: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1301:
1302: l_api_version CONSTANT NUMBER := 1;
1303: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
1304: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1305: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1306: i NUMBER := 0;
1307: BEGIN
1308: OKC_API.init_msg_list(p_init_msg_list);
1309: -- Make sure PL/SQL table has records in it before passing

Line 1308: OKC_API.init_msg_list(p_init_msg_list);

1304: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1305: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1306: i NUMBER := 0;
1307: BEGIN
1308: OKC_API.init_msg_list(p_init_msg_list);
1309: -- Make sure PL/SQL table has records in it before passing
1310: IF (p_ksqv_tbl.COUNT > 0) THEN
1311: i := p_ksqv_tbl.FIRST;
1312: LOOP

Line 1315: p_init_msg_list => OKC_API.G_FALSE,

1311: i := p_ksqv_tbl.FIRST;
1312: LOOP
1313: insert_row (
1314: p_api_version => p_api_version,
1315: p_init_msg_list => OKC_API.G_FALSE,
1316: x_return_status => x_return_status,
1317: x_msg_count => x_msg_count,
1318: x_msg_data => x_msg_data,
1319: p_ksqv_rec => p_ksqv_tbl(i),

Line 1323: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then

1319: p_ksqv_rec => p_ksqv_tbl(i),
1320: x_ksqv_rec => x_ksqv_tbl(i));
1321:
1322: -- store the highest degree of error
1323: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1324: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
1325: l_overall_status := x_return_status;
1326: End If;
1327: End If;

Line 1324: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then

1320: x_ksqv_rec => x_ksqv_tbl(i));
1321:
1322: -- store the highest degree of error
1323: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1324: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
1325: l_overall_status := x_return_status;
1326: End If;
1327: End If;
1328:

Line 1336: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1332: -- return overall status
1333: x_return_status := l_overall_status;
1334: END IF;
1335: EXCEPTION
1336: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1337: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1338: (
1339: l_api_name,
1340: G_PKG_NAME,

Line 1337: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1333: x_return_status := l_overall_status;
1334: END IF;
1335: EXCEPTION
1336: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1337: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1338: (
1339: l_api_name,
1340: G_PKG_NAME,
1341: 'OKC_API.G_RET_STS_ERROR',

Line 1341: 'OKC_API.G_RET_STS_ERROR',

1337: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1338: (
1339: l_api_name,
1340: G_PKG_NAME,
1341: 'OKC_API.G_RET_STS_ERROR',
1342: x_msg_count,
1343: x_msg_data,
1344: '_PVT'
1345: );

Line 1346: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1342: x_msg_count,
1343: x_msg_data,
1344: '_PVT'
1345: );
1346: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1347: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1348: (
1349: l_api_name,
1350: G_PKG_NAME,

Line 1347: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1343: x_msg_data,
1344: '_PVT'
1345: );
1346: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1347: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1348: (
1349: l_api_name,
1350: G_PKG_NAME,
1351: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1351: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1347: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1348: (
1349: l_api_name,
1350: G_PKG_NAME,
1351: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1352: x_msg_count,
1353: x_msg_data,
1354: '_PVT'
1355: );

Line 1357: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1353: x_msg_data,
1354: '_PVT'
1355: );
1356: WHEN OTHERS THEN
1357: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1358: (
1359: l_api_name,
1360: G_PKG_NAME,
1361: 'OTHERS',

Line 1396: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1392: FROM OKC_K_SEQ_HEADER
1393: WHERE LINE_CODE = p_ksq_rec.line_code;
1394: l_api_version CONSTANT NUMBER := 1;
1395: l_api_name CONSTANT VARCHAR2(30) := 'K_SEQ_lock_row';
1396: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1397: l_object_version_number OKC_K_SEQ_HEADER.OBJECT_VERSION_NUMBER%TYPE;
1398: lc_object_version_number OKC_K_SEQ_HEADER.OBJECT_VERSION_NUMBER%TYPE;
1399: l_row_notfound BOOLEAN := FALSE;
1400: lc_row_notfound BOOLEAN := FALSE;

Line 1402: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1398: lc_object_version_number OKC_K_SEQ_HEADER.OBJECT_VERSION_NUMBER%TYPE;
1399: l_row_notfound BOOLEAN := FALSE;
1400: lc_row_notfound BOOLEAN := FALSE;
1401: BEGIN
1402: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1403: p_init_msg_list,
1404: '_PVT',
1405: x_return_status);
1406: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1406: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1402: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1403: p_init_msg_list,
1404: '_PVT',
1405: x_return_status);
1406: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1407: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1408: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1409: RAISE OKC_API.G_EXCEPTION_ERROR;
1410: END IF;

Line 1407: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1403: p_init_msg_list,
1404: '_PVT',
1405: x_return_status);
1406: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1407: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1408: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1409: RAISE OKC_API.G_EXCEPTION_ERROR;
1410: END IF;
1411: BEGIN

Line 1408: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1404: '_PVT',
1405: x_return_status);
1406: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1407: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1408: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1409: RAISE OKC_API.G_EXCEPTION_ERROR;
1410: END IF;
1411: BEGIN
1412: OPEN lock_csr(p_ksq_rec);

Line 1409: RAISE OKC_API.G_EXCEPTION_ERROR;

1405: x_return_status);
1406: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1407: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1408: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1409: RAISE OKC_API.G_EXCEPTION_ERROR;
1410: END IF;
1411: BEGIN
1412: OPEN lock_csr(p_ksq_rec);
1413: FETCH lock_csr INTO l_object_version_number;

Line 1421: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);

1417: WHEN E_Resource_Busy THEN
1418: IF (lock_csr%ISOPEN) THEN
1419: CLOSE lock_csr;
1420: END IF;
1421: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);
1422: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
1423: END;
1424:
1425: IF ( l_row_notfound ) THEN

Line 1432: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);

1428: lc_row_notfound := lchk_csr%NOTFOUND;
1429: CLOSE lchk_csr;
1430: END IF;
1431: IF (lc_row_notfound) THEN
1432: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1433: RAISE OKC_API.G_EXCEPTION_ERROR;
1434: ELSIF lc_object_version_number > p_ksq_rec.object_version_number THEN
1435: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1436: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1433: RAISE OKC_API.G_EXCEPTION_ERROR;

1429: CLOSE lchk_csr;
1430: END IF;
1431: IF (lc_row_notfound) THEN
1432: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1433: RAISE OKC_API.G_EXCEPTION_ERROR;
1434: ELSIF lc_object_version_number > p_ksq_rec.object_version_number THEN
1435: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1436: RAISE OKC_API.G_EXCEPTION_ERROR;
1437: ELSIF lc_object_version_number <> p_ksq_rec.object_version_number THEN

Line 1435: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);

1431: IF (lc_row_notfound) THEN
1432: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1433: RAISE OKC_API.G_EXCEPTION_ERROR;
1434: ELSIF lc_object_version_number > p_ksq_rec.object_version_number THEN
1435: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1436: RAISE OKC_API.G_EXCEPTION_ERROR;
1437: ELSIF lc_object_version_number <> p_ksq_rec.object_version_number THEN
1438: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1439: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1436: RAISE OKC_API.G_EXCEPTION_ERROR;

1432: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1433: RAISE OKC_API.G_EXCEPTION_ERROR;
1434: ELSIF lc_object_version_number > p_ksq_rec.object_version_number THEN
1435: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1436: RAISE OKC_API.G_EXCEPTION_ERROR;
1437: ELSIF lc_object_version_number <> p_ksq_rec.object_version_number THEN
1438: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1439: RAISE OKC_API.G_EXCEPTION_ERROR;
1440: ELSIF lc_object_version_number = -1 THEN

Line 1438: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);

1434: ELSIF lc_object_version_number > p_ksq_rec.object_version_number THEN
1435: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1436: RAISE OKC_API.G_EXCEPTION_ERROR;
1437: ELSIF lc_object_version_number <> p_ksq_rec.object_version_number THEN
1438: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1439: RAISE OKC_API.G_EXCEPTION_ERROR;
1440: ELSIF lc_object_version_number = -1 THEN
1441: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1442: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1439: RAISE OKC_API.G_EXCEPTION_ERROR;

1435: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1436: RAISE OKC_API.G_EXCEPTION_ERROR;
1437: ELSIF lc_object_version_number <> p_ksq_rec.object_version_number THEN
1438: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1439: RAISE OKC_API.G_EXCEPTION_ERROR;
1440: ELSIF lc_object_version_number = -1 THEN
1441: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1442: RAISE OKC_API.G_EXCEPTION_ERROR;
1443: END IF;

Line 1441: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);

1437: ELSIF lc_object_version_number <> p_ksq_rec.object_version_number THEN
1438: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1439: RAISE OKC_API.G_EXCEPTION_ERROR;
1440: ELSIF lc_object_version_number = -1 THEN
1441: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1442: RAISE OKC_API.G_EXCEPTION_ERROR;
1443: END IF;
1444: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1445: EXCEPTION

Line 1442: RAISE OKC_API.G_EXCEPTION_ERROR;

1438: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1439: RAISE OKC_API.G_EXCEPTION_ERROR;
1440: ELSIF lc_object_version_number = -1 THEN
1441: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1442: RAISE OKC_API.G_EXCEPTION_ERROR;
1443: END IF;
1444: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1445: EXCEPTION
1446: WHEN OKC_API.G_EXCEPTION_ERROR THEN

Line 1444: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1440: ELSIF lc_object_version_number = -1 THEN
1441: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1442: RAISE OKC_API.G_EXCEPTION_ERROR;
1443: END IF;
1444: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1445: EXCEPTION
1446: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1447: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1448: (

Line 1446: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1442: RAISE OKC_API.G_EXCEPTION_ERROR;
1443: END IF;
1444: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1445: EXCEPTION
1446: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1447: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1448: (
1449: l_api_name,
1450: G_PKG_NAME,

Line 1447: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1443: END IF;
1444: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1445: EXCEPTION
1446: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1447: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1448: (
1449: l_api_name,
1450: G_PKG_NAME,
1451: 'OKC_API.G_RET_STS_ERROR',

Line 1451: 'OKC_API.G_RET_STS_ERROR',

1447: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1448: (
1449: l_api_name,
1450: G_PKG_NAME,
1451: 'OKC_API.G_RET_STS_ERROR',
1452: x_msg_count,
1453: x_msg_data,
1454: '_PVT'
1455: );

Line 1456: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1452: x_msg_count,
1453: x_msg_data,
1454: '_PVT'
1455: );
1456: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1457: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1458: (
1459: l_api_name,
1460: G_PKG_NAME,

Line 1457: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1453: x_msg_data,
1454: '_PVT'
1455: );
1456: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1457: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1458: (
1459: l_api_name,
1460: G_PKG_NAME,
1461: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1461: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1457: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1458: (
1459: l_api_name,
1460: G_PKG_NAME,
1461: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1462: x_msg_count,
1463: x_msg_data,
1464: '_PVT'
1465: );

Line 1467: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1463: x_msg_data,
1464: '_PVT'
1465: );
1466: WHEN OTHERS THEN
1467: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1468: (
1469: l_api_name,
1470: G_PKG_NAME,
1471: 'OTHERS',

Line 1490: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1486: p_ksqv_rec IN ksqv_rec_type) IS
1487:
1488: l_api_version CONSTANT NUMBER := 1;
1489: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1490: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1491: l_ksq_rec ksq_rec_type;
1492: BEGIN
1493: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1494: G_PKG_NAME,

Line 1493: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1489: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1490: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1491: l_ksq_rec ksq_rec_type;
1492: BEGIN
1493: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1494: G_PKG_NAME,
1495: p_init_msg_list,
1496: l_api_version,
1497: p_api_version,

Line 1500: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1496: l_api_version,
1497: p_api_version,
1498: '_PVT',
1499: x_return_status);
1500: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1501: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1502: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1503: RAISE OKC_API.G_EXCEPTION_ERROR;
1504: END IF;

Line 1501: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1497: p_api_version,
1498: '_PVT',
1499: x_return_status);
1500: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1501: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1502: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1503: RAISE OKC_API.G_EXCEPTION_ERROR;
1504: END IF;
1505: --------------------------------------

Line 1502: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1498: '_PVT',
1499: x_return_status);
1500: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1501: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1502: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1503: RAISE OKC_API.G_EXCEPTION_ERROR;
1504: END IF;
1505: --------------------------------------
1506: -- Move VIEW record to "Child" records

Line 1503: RAISE OKC_API.G_EXCEPTION_ERROR;

1499: x_return_status);
1500: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1501: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1502: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1503: RAISE OKC_API.G_EXCEPTION_ERROR;
1504: END IF;
1505: --------------------------------------
1506: -- Move VIEW record to "Child" records
1507: --------------------------------------

Line 1519: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1515: x_msg_count,
1516: x_msg_data,
1517: l_ksq_rec
1518: );
1519: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1520: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1521: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1522: RAISE OKC_API.G_EXCEPTION_ERROR;
1523: END IF;

Line 1520: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1516: x_msg_data,
1517: l_ksq_rec
1518: );
1519: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1520: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1521: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1522: RAISE OKC_API.G_EXCEPTION_ERROR;
1523: END IF;
1524: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 1521: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1517: l_ksq_rec
1518: );
1519: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1520: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1521: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1522: RAISE OKC_API.G_EXCEPTION_ERROR;
1523: END IF;
1524: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1525: EXCEPTION

Line 1522: RAISE OKC_API.G_EXCEPTION_ERROR;

1518: );
1519: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1520: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1521: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1522: RAISE OKC_API.G_EXCEPTION_ERROR;
1523: END IF;
1524: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1525: EXCEPTION
1526: WHEN OKC_API.G_EXCEPTION_ERROR THEN

Line 1524: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1520: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1521: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1522: RAISE OKC_API.G_EXCEPTION_ERROR;
1523: END IF;
1524: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1525: EXCEPTION
1526: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1527: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1528: (

Line 1526: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1522: RAISE OKC_API.G_EXCEPTION_ERROR;
1523: END IF;
1524: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1525: EXCEPTION
1526: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1527: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1528: (
1529: l_api_name,
1530: G_PKG_NAME,

Line 1527: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1523: END IF;
1524: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1525: EXCEPTION
1526: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1527: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1528: (
1529: l_api_name,
1530: G_PKG_NAME,
1531: 'OKC_API.G_RET_STS_ERROR',

Line 1531: 'OKC_API.G_RET_STS_ERROR',

1527: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1528: (
1529: l_api_name,
1530: G_PKG_NAME,
1531: 'OKC_API.G_RET_STS_ERROR',
1532: x_msg_count,
1533: x_msg_data,
1534: '_PVT'
1535: );

Line 1536: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1532: x_msg_count,
1533: x_msg_data,
1534: '_PVT'
1535: );
1536: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1537: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1538: (
1539: l_api_name,
1540: G_PKG_NAME,

Line 1537: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1533: x_msg_data,
1534: '_PVT'
1535: );
1536: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1537: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1538: (
1539: l_api_name,
1540: G_PKG_NAME,
1541: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1541: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1537: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1538: (
1539: l_api_name,
1540: G_PKG_NAME,
1541: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1542: x_msg_count,
1543: x_msg_data,
1544: '_PVT'
1545: );

Line 1547: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1543: x_msg_data,
1544: '_PVT'
1545: );
1546: WHEN OTHERS THEN
1547: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1548: (
1549: l_api_name,
1550: G_PKG_NAME,
1551: 'OTHERS',

Line 1570: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1566: p_ksqv_tbl IN ksqv_tbl_type) IS
1567:
1568: l_api_version CONSTANT NUMBER := 1;
1569: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
1570: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1571: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1572: i NUMBER := 0;
1573: BEGIN
1574: OKC_API.init_msg_list(p_init_msg_list);

Line 1571: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1567:
1568: l_api_version CONSTANT NUMBER := 1;
1569: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
1570: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1571: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1572: i NUMBER := 0;
1573: BEGIN
1574: OKC_API.init_msg_list(p_init_msg_list);
1575: -- Make sure PL/SQL table has records in it before passing

Line 1574: OKC_API.init_msg_list(p_init_msg_list);

1570: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1571: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1572: i NUMBER := 0;
1573: BEGIN
1574: OKC_API.init_msg_list(p_init_msg_list);
1575: -- Make sure PL/SQL table has records in it before passing
1576: IF (p_ksqv_tbl.COUNT > 0) THEN
1577: i := p_ksqv_tbl.FIRST;
1578: LOOP

Line 1581: p_init_msg_list => OKC_API.G_FALSE,

1577: i := p_ksqv_tbl.FIRST;
1578: LOOP
1579: lock_row (
1580: p_api_version => p_api_version,
1581: p_init_msg_list => OKC_API.G_FALSE,
1582: x_return_status => x_return_status,
1583: x_msg_count => x_msg_count,
1584: x_msg_data => x_msg_data,
1585: p_ksqv_rec => p_ksqv_tbl(i));

Line 1588: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then

1584: x_msg_data => x_msg_data,
1585: p_ksqv_rec => p_ksqv_tbl(i));
1586:
1587: -- store the highest degree of error
1588: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1589: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
1590: l_overall_status := x_return_status;
1591: End If;
1592: End If;

Line 1589: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then

1585: p_ksqv_rec => p_ksqv_tbl(i));
1586:
1587: -- store the highest degree of error
1588: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1589: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
1590: l_overall_status := x_return_status;
1591: End If;
1592: End If;
1593:

Line 1601: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1597: -- return overall status
1598: x_return_status := l_overall_status;
1599: END IF;
1600: EXCEPTION
1601: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1602: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1603: (
1604: l_api_name,
1605: G_PKG_NAME,

Line 1602: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1598: x_return_status := l_overall_status;
1599: END IF;
1600: EXCEPTION
1601: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1602: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1603: (
1604: l_api_name,
1605: G_PKG_NAME,
1606: 'OKC_API.G_RET_STS_ERROR',

Line 1606: 'OKC_API.G_RET_STS_ERROR',

1602: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1603: (
1604: l_api_name,
1605: G_PKG_NAME,
1606: 'OKC_API.G_RET_STS_ERROR',
1607: x_msg_count,
1608: x_msg_data,
1609: '_PVT'
1610: );

Line 1611: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1607: x_msg_count,
1608: x_msg_data,
1609: '_PVT'
1610: );
1611: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1612: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1613: (
1614: l_api_name,
1615: G_PKG_NAME,

Line 1612: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1608: x_msg_data,
1609: '_PVT'
1610: );
1611: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1612: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1613: (
1614: l_api_name,
1615: G_PKG_NAME,
1616: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1616: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1612: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1613: (
1614: l_api_name,
1615: G_PKG_NAME,
1616: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1617: x_msg_count,
1618: x_msg_data,
1619: '_PVT'
1620: );

Line 1622: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1618: x_msg_data,
1619: '_PVT'
1620: );
1621: WHEN OTHERS THEN
1622: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1623: (
1624: l_api_name,
1625: G_PKG_NAME,
1626: 'OTHERS',

Line 1649: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1645: x_ksq_rec OUT NOCOPY ksq_rec_type) IS
1646:
1647: l_api_version CONSTANT NUMBER := 1;
1648: l_api_name CONSTANT VARCHAR2(30) := 'K_SEQ_update_row';
1649: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1650: l_ksq_rec ksq_rec_type := p_ksq_rec;
1651: l_def_ksq_rec ksq_rec_type;
1652: l_row_notfound BOOLEAN := TRUE;
1653: ----------------------------------

Line 1662: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1658: x_ksq_rec OUT NOCOPY ksq_rec_type
1659: ) RETURN VARCHAR2 IS
1660: l_ksq_rec ksq_rec_type;
1661: l_row_notfound BOOLEAN := TRUE;
1662: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1663: BEGIN
1664: x_ksq_rec := p_ksq_rec;
1665: -- Get current database values
1666: l_ksq_rec := get_rec(p_ksq_rec, l_row_notfound);

Line 1668: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1664: x_ksq_rec := p_ksq_rec;
1665: -- Get current database values
1666: l_ksq_rec := get_rec(p_ksq_rec, l_row_notfound);
1667: IF (l_row_notfound) THEN
1668: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1669: END IF;
1670: IF (x_ksq_rec.line_code = OKC_API.G_MISS_CHAR)
1671: THEN
1672: x_ksq_rec.line_code := l_ksq_rec.line_code;

Line 1670: IF (x_ksq_rec.line_code = OKC_API.G_MISS_CHAR)

1666: l_ksq_rec := get_rec(p_ksq_rec, l_row_notfound);
1667: IF (l_row_notfound) THEN
1668: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1669: END IF;
1670: IF (x_ksq_rec.line_code = OKC_API.G_MISS_CHAR)
1671: THEN
1672: x_ksq_rec.line_code := l_ksq_rec.line_code;
1673: END IF;
1674: IF (x_ksq_rec.site_yn = OKC_API.G_MISS_CHAR)

Line 1674: IF (x_ksq_rec.site_yn = OKC_API.G_MISS_CHAR)

1670: IF (x_ksq_rec.line_code = OKC_API.G_MISS_CHAR)
1671: THEN
1672: x_ksq_rec.line_code := l_ksq_rec.line_code;
1673: END IF;
1674: IF (x_ksq_rec.site_yn = OKC_API.G_MISS_CHAR)
1675: THEN
1676: x_ksq_rec.site_yn := l_ksq_rec.site_yn;
1677: END IF;
1678: IF (x_ksq_rec.bg_ou_none = OKC_API.G_MISS_CHAR)

Line 1678: IF (x_ksq_rec.bg_ou_none = OKC_API.G_MISS_CHAR)

1674: IF (x_ksq_rec.site_yn = OKC_API.G_MISS_CHAR)
1675: THEN
1676: x_ksq_rec.site_yn := l_ksq_rec.site_yn;
1677: END IF;
1678: IF (x_ksq_rec.bg_ou_none = OKC_API.G_MISS_CHAR)
1679: THEN
1680: x_ksq_rec.bg_ou_none := l_ksq_rec.bg_ou_none;
1681: END IF;
1682: IF (x_ksq_rec.cls_scs_none = OKC_API.G_MISS_CHAR)

Line 1682: IF (x_ksq_rec.cls_scs_none = OKC_API.G_MISS_CHAR)

1678: IF (x_ksq_rec.bg_ou_none = OKC_API.G_MISS_CHAR)
1679: THEN
1680: x_ksq_rec.bg_ou_none := l_ksq_rec.bg_ou_none;
1681: END IF;
1682: IF (x_ksq_rec.cls_scs_none = OKC_API.G_MISS_CHAR)
1683: THEN
1684: x_ksq_rec.cls_scs_none := l_ksq_rec.cls_scs_none;
1685: END IF;
1686: IF (x_ksq_rec.user_function_yn = OKC_API.G_MISS_CHAR)

Line 1686: IF (x_ksq_rec.user_function_yn = OKC_API.G_MISS_CHAR)

1682: IF (x_ksq_rec.cls_scs_none = OKC_API.G_MISS_CHAR)
1683: THEN
1684: x_ksq_rec.cls_scs_none := l_ksq_rec.cls_scs_none;
1685: END IF;
1686: IF (x_ksq_rec.user_function_yn = OKC_API.G_MISS_CHAR)
1687: THEN
1688: x_ksq_rec.user_function_yn := l_ksq_rec.user_function_yn;
1689: END IF;
1690: IF (x_ksq_rec.pdf_id = OKC_API.G_MISS_NUM)

Line 1690: IF (x_ksq_rec.pdf_id = OKC_API.G_MISS_NUM)

1686: IF (x_ksq_rec.user_function_yn = OKC_API.G_MISS_CHAR)
1687: THEN
1688: x_ksq_rec.user_function_yn := l_ksq_rec.user_function_yn;
1689: END IF;
1690: IF (x_ksq_rec.pdf_id = OKC_API.G_MISS_NUM)
1691: THEN
1692: x_ksq_rec.pdf_id := l_ksq_rec.pdf_id;
1693: END IF;
1694: IF (x_ksq_rec.manual_override_yn = OKC_API.G_MISS_CHAR)

Line 1694: IF (x_ksq_rec.manual_override_yn = OKC_API.G_MISS_CHAR)

1690: IF (x_ksq_rec.pdf_id = OKC_API.G_MISS_NUM)
1691: THEN
1692: x_ksq_rec.pdf_id := l_ksq_rec.pdf_id;
1693: END IF;
1694: IF (x_ksq_rec.manual_override_yn = OKC_API.G_MISS_CHAR)
1695: THEN
1696: x_ksq_rec.manual_override_yn := l_ksq_rec.manual_override_yn;
1697: END IF;
1698: IF (x_ksq_rec.object_version_number = OKC_API.G_MISS_NUM)

Line 1698: IF (x_ksq_rec.object_version_number = OKC_API.G_MISS_NUM)

1694: IF (x_ksq_rec.manual_override_yn = OKC_API.G_MISS_CHAR)
1695: THEN
1696: x_ksq_rec.manual_override_yn := l_ksq_rec.manual_override_yn;
1697: END IF;
1698: IF (x_ksq_rec.object_version_number = OKC_API.G_MISS_NUM)
1699: THEN
1700: x_ksq_rec.object_version_number := l_ksq_rec.object_version_number;
1701: END IF;
1702: IF (x_ksq_rec.created_by = OKC_API.G_MISS_NUM)

Line 1702: IF (x_ksq_rec.created_by = OKC_API.G_MISS_NUM)

1698: IF (x_ksq_rec.object_version_number = OKC_API.G_MISS_NUM)
1699: THEN
1700: x_ksq_rec.object_version_number := l_ksq_rec.object_version_number;
1701: END IF;
1702: IF (x_ksq_rec.created_by = OKC_API.G_MISS_NUM)
1703: THEN
1704: x_ksq_rec.created_by := l_ksq_rec.created_by;
1705: END IF;
1706: IF (x_ksq_rec.creation_date = OKC_API.G_MISS_DATE)

Line 1706: IF (x_ksq_rec.creation_date = OKC_API.G_MISS_DATE)

1702: IF (x_ksq_rec.created_by = OKC_API.G_MISS_NUM)
1703: THEN
1704: x_ksq_rec.created_by := l_ksq_rec.created_by;
1705: END IF;
1706: IF (x_ksq_rec.creation_date = OKC_API.G_MISS_DATE)
1707: THEN
1708: x_ksq_rec.creation_date := l_ksq_rec.creation_date;
1709: END IF;
1710: IF (x_ksq_rec.last_updated_by = OKC_API.G_MISS_NUM)

Line 1710: IF (x_ksq_rec.last_updated_by = OKC_API.G_MISS_NUM)

1706: IF (x_ksq_rec.creation_date = OKC_API.G_MISS_DATE)
1707: THEN
1708: x_ksq_rec.creation_date := l_ksq_rec.creation_date;
1709: END IF;
1710: IF (x_ksq_rec.last_updated_by = OKC_API.G_MISS_NUM)
1711: THEN
1712: x_ksq_rec.last_updated_by := l_ksq_rec.last_updated_by;
1713: END IF;
1714: IF (x_ksq_rec.last_update_date = OKC_API.G_MISS_DATE)

Line 1714: IF (x_ksq_rec.last_update_date = OKC_API.G_MISS_DATE)

1710: IF (x_ksq_rec.last_updated_by = OKC_API.G_MISS_NUM)
1711: THEN
1712: x_ksq_rec.last_updated_by := l_ksq_rec.last_updated_by;
1713: END IF;
1714: IF (x_ksq_rec.last_update_date = OKC_API.G_MISS_DATE)
1715: THEN
1716: x_ksq_rec.last_update_date := l_ksq_rec.last_update_date;
1717: END IF;
1718: IF (x_ksq_rec.last_update_login = OKC_API.G_MISS_NUM)

Line 1718: IF (x_ksq_rec.last_update_login = OKC_API.G_MISS_NUM)

1714: IF (x_ksq_rec.last_update_date = OKC_API.G_MISS_DATE)
1715: THEN
1716: x_ksq_rec.last_update_date := l_ksq_rec.last_update_date;
1717: END IF;
1718: IF (x_ksq_rec.last_update_login = OKC_API.G_MISS_NUM)
1719: THEN
1720: x_ksq_rec.last_update_login := l_ksq_rec.last_update_login;
1721: END IF;
1722: RETURN(l_return_status);

Line 1731: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1727: FUNCTION Set_Attributes (
1728: p_ksq_rec IN ksq_rec_type,
1729: x_ksq_rec OUT NOCOPY ksq_rec_type
1730: ) RETURN VARCHAR2 IS
1731: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1732: BEGIN
1733: x_ksq_rec := p_ksq_rec;
1734: RETURN(l_return_status);
1735: END Set_Attributes;

Line 1737: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1733: x_ksq_rec := p_ksq_rec;
1734: RETURN(l_return_status);
1735: END Set_Attributes;
1736: BEGIN
1737: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1738: p_init_msg_list,
1739: '_PVT',
1740: x_return_status);
1741: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1741: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1737: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1738: p_init_msg_list,
1739: '_PVT',
1740: x_return_status);
1741: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1742: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1743: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1744: RAISE OKC_API.G_EXCEPTION_ERROR;
1745: END IF;

Line 1742: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1738: p_init_msg_list,
1739: '_PVT',
1740: x_return_status);
1741: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1742: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1743: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1744: RAISE OKC_API.G_EXCEPTION_ERROR;
1745: END IF;
1746: --- Setting item attributes

Line 1743: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1739: '_PVT',
1740: x_return_status);
1741: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1742: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1743: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1744: RAISE OKC_API.G_EXCEPTION_ERROR;
1745: END IF;
1746: --- Setting item attributes
1747: l_return_status := Set_Attributes(

Line 1744: RAISE OKC_API.G_EXCEPTION_ERROR;

1740: x_return_status);
1741: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1742: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1743: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1744: RAISE OKC_API.G_EXCEPTION_ERROR;
1745: END IF;
1746: --- Setting item attributes
1747: l_return_status := Set_Attributes(
1748: p_ksq_rec, -- IN

Line 1751: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1747: l_return_status := Set_Attributes(
1748: p_ksq_rec, -- IN
1749: l_ksq_rec); -- OUT
1750: --- If any errors happen abort API
1751: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1752: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1753: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1754: RAISE OKC_API.G_EXCEPTION_ERROR;
1755: END IF;

Line 1752: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1748: p_ksq_rec, -- IN
1749: l_ksq_rec); -- OUT
1750: --- If any errors happen abort API
1751: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1752: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1753: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1754: RAISE OKC_API.G_EXCEPTION_ERROR;
1755: END IF;
1756: l_return_status := populate_new_record(l_ksq_rec, l_def_ksq_rec);

Line 1753: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1749: l_ksq_rec); -- OUT
1750: --- If any errors happen abort API
1751: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1752: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1753: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1754: RAISE OKC_API.G_EXCEPTION_ERROR;
1755: END IF;
1756: l_return_status := populate_new_record(l_ksq_rec, l_def_ksq_rec);
1757: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1754: RAISE OKC_API.G_EXCEPTION_ERROR;

1750: --- If any errors happen abort API
1751: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1752: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1753: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1754: RAISE OKC_API.G_EXCEPTION_ERROR;
1755: END IF;
1756: l_return_status := populate_new_record(l_ksq_rec, l_def_ksq_rec);
1757: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1758: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1757: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1753: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1754: RAISE OKC_API.G_EXCEPTION_ERROR;
1755: END IF;
1756: l_return_status := populate_new_record(l_ksq_rec, l_def_ksq_rec);
1757: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1758: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1759: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1760: RAISE OKC_API.G_EXCEPTION_ERROR;
1761: END IF;

Line 1758: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1754: RAISE OKC_API.G_EXCEPTION_ERROR;
1755: END IF;
1756: l_return_status := populate_new_record(l_ksq_rec, l_def_ksq_rec);
1757: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1758: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1759: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1760: RAISE OKC_API.G_EXCEPTION_ERROR;
1761: END IF;
1762: UPDATE OKC_K_SEQ_HEADER

Line 1759: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1755: END IF;
1756: l_return_status := populate_new_record(l_ksq_rec, l_def_ksq_rec);
1757: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1758: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1759: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1760: RAISE OKC_API.G_EXCEPTION_ERROR;
1761: END IF;
1762: UPDATE OKC_K_SEQ_HEADER
1763: SET SITE_YN = l_def_ksq_rec.site_yn,

Line 1760: RAISE OKC_API.G_EXCEPTION_ERROR;

1756: l_return_status := populate_new_record(l_ksq_rec, l_def_ksq_rec);
1757: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1758: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1759: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1760: RAISE OKC_API.G_EXCEPTION_ERROR;
1761: END IF;
1762: UPDATE OKC_K_SEQ_HEADER
1763: SET SITE_YN = l_def_ksq_rec.site_yn,
1764: BG_OU_NONE = l_def_ksq_rec.bg_ou_none,

Line 1778: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1774: LAST_UPDATE_LOGIN = l_def_ksq_rec.last_update_login
1775: WHERE LINE_CODE = l_def_ksq_rec.line_code;
1776:
1777: x_ksq_rec := l_def_ksq_rec;
1778: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1779: EXCEPTION
1780: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1781: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1782: (

Line 1780: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1776:
1777: x_ksq_rec := l_def_ksq_rec;
1778: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1779: EXCEPTION
1780: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1781: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1782: (
1783: l_api_name,
1784: G_PKG_NAME,

Line 1781: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1777: x_ksq_rec := l_def_ksq_rec;
1778: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1779: EXCEPTION
1780: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1781: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1782: (
1783: l_api_name,
1784: G_PKG_NAME,
1785: 'OKC_API.G_RET_STS_ERROR',

Line 1785: 'OKC_API.G_RET_STS_ERROR',

1781: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1782: (
1783: l_api_name,
1784: G_PKG_NAME,
1785: 'OKC_API.G_RET_STS_ERROR',
1786: x_msg_count,
1787: x_msg_data,
1788: '_PVT'
1789: );

Line 1790: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1786: x_msg_count,
1787: x_msg_data,
1788: '_PVT'
1789: );
1790: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1791: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1792: (
1793: l_api_name,
1794: G_PKG_NAME,

Line 1791: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1787: x_msg_data,
1788: '_PVT'
1789: );
1790: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1791: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1792: (
1793: l_api_name,
1794: G_PKG_NAME,
1795: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1795: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1791: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1792: (
1793: l_api_name,
1794: G_PKG_NAME,
1795: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1796: x_msg_count,
1797: x_msg_data,
1798: '_PVT'
1799: );

Line 1801: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1797: x_msg_data,
1798: '_PVT'
1799: );
1800: WHEN OTHERS THEN
1801: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1802: (
1803: l_api_name,
1804: G_PKG_NAME,
1805: 'OTHERS',

Line 1825: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1821: x_ksqv_rec OUT NOCOPY ksqv_rec_type) IS
1822:
1823: l_api_version CONSTANT NUMBER := 1;
1824: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
1825: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1826: l_ksqv_rec ksqv_rec_type := p_ksqv_rec;
1827: l_def_ksqv_rec ksqv_rec_type;
1828: l_ksq_rec ksq_rec_type;
1829: lx_ksq_rec ksq_rec_type;

Line 1852: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1848: x_ksqv_rec OUT NOCOPY ksqv_rec_type
1849: ) RETURN VARCHAR2 IS
1850: l_ksqv_rec ksqv_rec_type;
1851: l_row_notfound BOOLEAN := TRUE;
1852: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1853: BEGIN
1854: x_ksqv_rec := p_ksqv_rec;
1855: -- Get current database values
1856: l_ksqv_rec := get_rec(p_ksqv_rec, l_row_notfound);

Line 1858: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1854: x_ksqv_rec := p_ksqv_rec;
1855: -- Get current database values
1856: l_ksqv_rec := get_rec(p_ksqv_rec, l_row_notfound);
1857: IF (l_row_notfound) THEN
1858: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1859: END IF;
1860: IF (x_ksqv_rec.line_code = OKC_API.G_MISS_CHAR)
1861: THEN
1862: x_ksqv_rec.line_code := l_ksqv_rec.line_code;

Line 1860: IF (x_ksqv_rec.line_code = OKC_API.G_MISS_CHAR)

1856: l_ksqv_rec := get_rec(p_ksqv_rec, l_row_notfound);
1857: IF (l_row_notfound) THEN
1858: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1859: END IF;
1860: IF (x_ksqv_rec.line_code = OKC_API.G_MISS_CHAR)
1861: THEN
1862: x_ksqv_rec.line_code := l_ksqv_rec.line_code;
1863: END IF;
1864: IF (x_ksqv_rec.site_yn = OKC_API.G_MISS_CHAR)

Line 1864: IF (x_ksqv_rec.site_yn = OKC_API.G_MISS_CHAR)

1860: IF (x_ksqv_rec.line_code = OKC_API.G_MISS_CHAR)
1861: THEN
1862: x_ksqv_rec.line_code := l_ksqv_rec.line_code;
1863: END IF;
1864: IF (x_ksqv_rec.site_yn = OKC_API.G_MISS_CHAR)
1865: THEN
1866: x_ksqv_rec.site_yn := l_ksqv_rec.site_yn;
1867: END IF;
1868: IF (x_ksqv_rec.bg_ou_none = OKC_API.G_MISS_CHAR)

Line 1868: IF (x_ksqv_rec.bg_ou_none = OKC_API.G_MISS_CHAR)

1864: IF (x_ksqv_rec.site_yn = OKC_API.G_MISS_CHAR)
1865: THEN
1866: x_ksqv_rec.site_yn := l_ksqv_rec.site_yn;
1867: END IF;
1868: IF (x_ksqv_rec.bg_ou_none = OKC_API.G_MISS_CHAR)
1869: THEN
1870: x_ksqv_rec.bg_ou_none := l_ksqv_rec.bg_ou_none;
1871: END IF;
1872: IF (x_ksqv_rec.cls_scs_none = OKC_API.G_MISS_CHAR)

Line 1872: IF (x_ksqv_rec.cls_scs_none = OKC_API.G_MISS_CHAR)

1868: IF (x_ksqv_rec.bg_ou_none = OKC_API.G_MISS_CHAR)
1869: THEN
1870: x_ksqv_rec.bg_ou_none := l_ksqv_rec.bg_ou_none;
1871: END IF;
1872: IF (x_ksqv_rec.cls_scs_none = OKC_API.G_MISS_CHAR)
1873: THEN
1874: x_ksqv_rec.cls_scs_none := l_ksqv_rec.cls_scs_none;
1875: END IF;
1876: IF (x_ksqv_rec.user_function_yn = OKC_API.G_MISS_CHAR)

Line 1876: IF (x_ksqv_rec.user_function_yn = OKC_API.G_MISS_CHAR)

1872: IF (x_ksqv_rec.cls_scs_none = OKC_API.G_MISS_CHAR)
1873: THEN
1874: x_ksqv_rec.cls_scs_none := l_ksqv_rec.cls_scs_none;
1875: END IF;
1876: IF (x_ksqv_rec.user_function_yn = OKC_API.G_MISS_CHAR)
1877: THEN
1878: x_ksqv_rec.user_function_yn := l_ksqv_rec.user_function_yn;
1879: END IF;
1880: IF (x_ksqv_rec.pdf_id = OKC_API.G_MISS_NUM)

Line 1880: IF (x_ksqv_rec.pdf_id = OKC_API.G_MISS_NUM)

1876: IF (x_ksqv_rec.user_function_yn = OKC_API.G_MISS_CHAR)
1877: THEN
1878: x_ksqv_rec.user_function_yn := l_ksqv_rec.user_function_yn;
1879: END IF;
1880: IF (x_ksqv_rec.pdf_id = OKC_API.G_MISS_NUM)
1881: THEN
1882: x_ksqv_rec.pdf_id := l_ksqv_rec.pdf_id;
1883: END IF;
1884: IF (x_ksqv_rec.manual_override_yn = OKC_API.G_MISS_CHAR)

Line 1884: IF (x_ksqv_rec.manual_override_yn = OKC_API.G_MISS_CHAR)

1880: IF (x_ksqv_rec.pdf_id = OKC_API.G_MISS_NUM)
1881: THEN
1882: x_ksqv_rec.pdf_id := l_ksqv_rec.pdf_id;
1883: END IF;
1884: IF (x_ksqv_rec.manual_override_yn = OKC_API.G_MISS_CHAR)
1885: THEN
1886: x_ksqv_rec.manual_override_yn := l_ksqv_rec.manual_override_yn;
1887: END IF;
1888: IF (x_ksqv_rec.object_version_number = OKC_API.G_MISS_NUM)

Line 1888: IF (x_ksqv_rec.object_version_number = OKC_API.G_MISS_NUM)

1884: IF (x_ksqv_rec.manual_override_yn = OKC_API.G_MISS_CHAR)
1885: THEN
1886: x_ksqv_rec.manual_override_yn := l_ksqv_rec.manual_override_yn;
1887: END IF;
1888: IF (x_ksqv_rec.object_version_number = OKC_API.G_MISS_NUM)
1889: THEN
1890: x_ksqv_rec.object_version_number := l_ksqv_rec.object_version_number;
1891: END IF;
1892: IF (x_ksqv_rec.created_by = OKC_API.G_MISS_NUM)

Line 1892: IF (x_ksqv_rec.created_by = OKC_API.G_MISS_NUM)

1888: IF (x_ksqv_rec.object_version_number = OKC_API.G_MISS_NUM)
1889: THEN
1890: x_ksqv_rec.object_version_number := l_ksqv_rec.object_version_number;
1891: END IF;
1892: IF (x_ksqv_rec.created_by = OKC_API.G_MISS_NUM)
1893: THEN
1894: x_ksqv_rec.created_by := l_ksqv_rec.created_by;
1895: END IF;
1896: IF (x_ksqv_rec.creation_date = OKC_API.G_MISS_DATE)

Line 1896: IF (x_ksqv_rec.creation_date = OKC_API.G_MISS_DATE)

1892: IF (x_ksqv_rec.created_by = OKC_API.G_MISS_NUM)
1893: THEN
1894: x_ksqv_rec.created_by := l_ksqv_rec.created_by;
1895: END IF;
1896: IF (x_ksqv_rec.creation_date = OKC_API.G_MISS_DATE)
1897: THEN
1898: x_ksqv_rec.creation_date := l_ksqv_rec.creation_date;
1899: END IF;
1900: IF (x_ksqv_rec.last_updated_by = OKC_API.G_MISS_NUM)

Line 1900: IF (x_ksqv_rec.last_updated_by = OKC_API.G_MISS_NUM)

1896: IF (x_ksqv_rec.creation_date = OKC_API.G_MISS_DATE)
1897: THEN
1898: x_ksqv_rec.creation_date := l_ksqv_rec.creation_date;
1899: END IF;
1900: IF (x_ksqv_rec.last_updated_by = OKC_API.G_MISS_NUM)
1901: THEN
1902: x_ksqv_rec.last_updated_by := l_ksqv_rec.last_updated_by;
1903: END IF;
1904: IF (x_ksqv_rec.last_update_date = OKC_API.G_MISS_DATE)

Line 1904: IF (x_ksqv_rec.last_update_date = OKC_API.G_MISS_DATE)

1900: IF (x_ksqv_rec.last_updated_by = OKC_API.G_MISS_NUM)
1901: THEN
1902: x_ksqv_rec.last_updated_by := l_ksqv_rec.last_updated_by;
1903: END IF;
1904: IF (x_ksqv_rec.last_update_date = OKC_API.G_MISS_DATE)
1905: THEN
1906: x_ksqv_rec.last_update_date := l_ksqv_rec.last_update_date;
1907: END IF;
1908: IF (x_ksqv_rec.last_update_login = OKC_API.G_MISS_NUM)

Line 1908: IF (x_ksqv_rec.last_update_login = OKC_API.G_MISS_NUM)

1904: IF (x_ksqv_rec.last_update_date = OKC_API.G_MISS_DATE)
1905: THEN
1906: x_ksqv_rec.last_update_date := l_ksqv_rec.last_update_date;
1907: END IF;
1908: IF (x_ksqv_rec.last_update_login = OKC_API.G_MISS_NUM)
1909: THEN
1910: x_ksqv_rec.last_update_login := l_ksqv_rec.last_update_login;
1911: END IF;
1912: RETURN(l_return_status);

Line 1921: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1917: FUNCTION Set_Attributes (
1918: p_ksqv_rec IN ksqv_rec_type,
1919: x_ksqv_rec OUT NOCOPY ksqv_rec_type
1920: ) RETURN VARCHAR2 IS
1921: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1922: BEGIN
1923: x_ksqv_rec := p_ksqv_rec;
1924: x_ksqv_rec.OBJECT_VERSION_NUMBER := NVL(x_ksqv_rec.OBJECT_VERSION_NUMBER, 0) + 1;
1925: RETURN(l_return_status);

Line 1928: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1924: x_ksqv_rec.OBJECT_VERSION_NUMBER := NVL(x_ksqv_rec.OBJECT_VERSION_NUMBER, 0) + 1;
1925: RETURN(l_return_status);
1926: END Set_Attributes;
1927: BEGIN
1928: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1929: G_PKG_NAME,
1930: p_init_msg_list,
1931: l_api_version,
1932: p_api_version,

Line 1935: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1931: l_api_version,
1932: p_api_version,
1933: '_PVT',
1934: x_return_status);
1935: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1936: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1937: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1938: RAISE OKC_API.G_EXCEPTION_ERROR;
1939: END IF;

Line 1936: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1932: p_api_version,
1933: '_PVT',
1934: x_return_status);
1935: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1936: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1937: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1938: RAISE OKC_API.G_EXCEPTION_ERROR;
1939: END IF;
1940: --- Setting item attributes

Line 1937: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1933: '_PVT',
1934: x_return_status);
1935: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1936: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1937: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1938: RAISE OKC_API.G_EXCEPTION_ERROR;
1939: END IF;
1940: --- Setting item attributes
1941: l_return_status := Set_Attributes(

Line 1938: RAISE OKC_API.G_EXCEPTION_ERROR;

1934: x_return_status);
1935: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1936: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1937: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1938: RAISE OKC_API.G_EXCEPTION_ERROR;
1939: END IF;
1940: --- Setting item attributes
1941: l_return_status := Set_Attributes(
1942: p_ksqv_rec, -- IN

Line 1945: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1941: l_return_status := Set_Attributes(
1942: p_ksqv_rec, -- IN
1943: l_ksqv_rec); -- OUT
1944: --- If any errors happen abort API
1945: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1946: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1947: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1948: RAISE OKC_API.G_EXCEPTION_ERROR;
1949: END IF;

Line 1946: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1942: p_ksqv_rec, -- IN
1943: l_ksqv_rec); -- OUT
1944: --- If any errors happen abort API
1945: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1946: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1947: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1948: RAISE OKC_API.G_EXCEPTION_ERROR;
1949: END IF;
1950: l_return_status := populate_new_record(l_ksqv_rec, l_def_ksqv_rec);

Line 1947: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1943: l_ksqv_rec); -- OUT
1944: --- If any errors happen abort API
1945: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1946: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1947: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1948: RAISE OKC_API.G_EXCEPTION_ERROR;
1949: END IF;
1950: l_return_status := populate_new_record(l_ksqv_rec, l_def_ksqv_rec);
1951: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1948: RAISE OKC_API.G_EXCEPTION_ERROR;

1944: --- If any errors happen abort API
1945: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1946: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1947: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1948: RAISE OKC_API.G_EXCEPTION_ERROR;
1949: END IF;
1950: l_return_status := populate_new_record(l_ksqv_rec, l_def_ksqv_rec);
1951: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1952: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1951: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1947: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1948: RAISE OKC_API.G_EXCEPTION_ERROR;
1949: END IF;
1950: l_return_status := populate_new_record(l_ksqv_rec, l_def_ksqv_rec);
1951: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1952: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1953: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1954: RAISE OKC_API.G_EXCEPTION_ERROR;
1955: END IF;

Line 1952: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1948: RAISE OKC_API.G_EXCEPTION_ERROR;
1949: END IF;
1950: l_return_status := populate_new_record(l_ksqv_rec, l_def_ksqv_rec);
1951: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1952: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1953: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1954: RAISE OKC_API.G_EXCEPTION_ERROR;
1955: END IF;
1956: l_def_ksqv_rec := fill_who_columns(l_def_ksqv_rec);

Line 1953: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1949: END IF;
1950: l_return_status := populate_new_record(l_ksqv_rec, l_def_ksqv_rec);
1951: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1952: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1953: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1954: RAISE OKC_API.G_EXCEPTION_ERROR;
1955: END IF;
1956: l_def_ksqv_rec := fill_who_columns(l_def_ksqv_rec);
1957: --- Validate all non-missing attributes (Item Level Validation)

Line 1954: RAISE OKC_API.G_EXCEPTION_ERROR;

1950: l_return_status := populate_new_record(l_ksqv_rec, l_def_ksqv_rec);
1951: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1952: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1953: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1954: RAISE OKC_API.G_EXCEPTION_ERROR;
1955: END IF;
1956: l_def_ksqv_rec := fill_who_columns(l_def_ksqv_rec);
1957: --- Validate all non-missing attributes (Item Level Validation)
1958: l_return_status := Validate_Attributes(l_def_ksqv_rec);

Line 1960: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1956: l_def_ksqv_rec := fill_who_columns(l_def_ksqv_rec);
1957: --- Validate all non-missing attributes (Item Level Validation)
1958: l_return_status := Validate_Attributes(l_def_ksqv_rec);
1959: --- If any errors happen abort API
1960: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1961: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1962: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1963: RAISE OKC_API.G_EXCEPTION_ERROR;
1964: END IF;

Line 1961: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1957: --- Validate all non-missing attributes (Item Level Validation)
1958: l_return_status := Validate_Attributes(l_def_ksqv_rec);
1959: --- If any errors happen abort API
1960: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1961: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1962: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1963: RAISE OKC_API.G_EXCEPTION_ERROR;
1964: END IF;
1965: l_return_status := Validate_Record(l_def_ksqv_rec);

Line 1962: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1958: l_return_status := Validate_Attributes(l_def_ksqv_rec);
1959: --- If any errors happen abort API
1960: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1961: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1962: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1963: RAISE OKC_API.G_EXCEPTION_ERROR;
1964: END IF;
1965: l_return_status := Validate_Record(l_def_ksqv_rec);
1966: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1963: RAISE OKC_API.G_EXCEPTION_ERROR;

1959: --- If any errors happen abort API
1960: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1961: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1962: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1963: RAISE OKC_API.G_EXCEPTION_ERROR;
1964: END IF;
1965: l_return_status := Validate_Record(l_def_ksqv_rec);
1966: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1967: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1966: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1962: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1963: RAISE OKC_API.G_EXCEPTION_ERROR;
1964: END IF;
1965: l_return_status := Validate_Record(l_def_ksqv_rec);
1966: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1967: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1968: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1969: RAISE OKC_API.G_EXCEPTION_ERROR;
1970: END IF;

Line 1967: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1963: RAISE OKC_API.G_EXCEPTION_ERROR;
1964: END IF;
1965: l_return_status := Validate_Record(l_def_ksqv_rec);
1966: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1967: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1968: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1969: RAISE OKC_API.G_EXCEPTION_ERROR;
1970: END IF;
1971:

Line 1968: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1964: END IF;
1965: l_return_status := Validate_Record(l_def_ksqv_rec);
1966: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1967: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1968: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1969: RAISE OKC_API.G_EXCEPTION_ERROR;
1970: END IF;
1971:
1972: --------------------------------------

Line 1969: RAISE OKC_API.G_EXCEPTION_ERROR;

1965: l_return_status := Validate_Record(l_def_ksqv_rec);
1966: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1967: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1968: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1969: RAISE OKC_API.G_EXCEPTION_ERROR;
1970: END IF;
1971:
1972: --------------------------------------
1973: -- Move VIEW record to "Child" records

Line 1987: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1983: x_msg_data,
1984: l_ksq_rec,
1985: lx_ksq_rec
1986: );
1987: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1988: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1989: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1990: RAISE OKC_API.G_EXCEPTION_ERROR;
1991: END IF;

Line 1988: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1984: l_ksq_rec,
1985: lx_ksq_rec
1986: );
1987: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1988: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1989: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1990: RAISE OKC_API.G_EXCEPTION_ERROR;
1991: END IF;
1992: migrate(lx_ksq_rec, l_def_ksqv_rec);

Line 1989: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1985: lx_ksq_rec
1986: );
1987: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1988: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1989: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1990: RAISE OKC_API.G_EXCEPTION_ERROR;
1991: END IF;
1992: migrate(lx_ksq_rec, l_def_ksqv_rec);
1993: x_ksqv_rec := l_def_ksqv_rec;

Line 1990: RAISE OKC_API.G_EXCEPTION_ERROR;

1986: );
1987: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1988: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1989: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1990: RAISE OKC_API.G_EXCEPTION_ERROR;
1991: END IF;
1992: migrate(lx_ksq_rec, l_def_ksqv_rec);
1993: x_ksqv_rec := l_def_ksqv_rec;
1994: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 1994: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1990: RAISE OKC_API.G_EXCEPTION_ERROR;
1991: END IF;
1992: migrate(lx_ksq_rec, l_def_ksqv_rec);
1993: x_ksqv_rec := l_def_ksqv_rec;
1994: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1995: EXCEPTION
1996: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1997: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1998: (

Line 1996: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1992: migrate(lx_ksq_rec, l_def_ksqv_rec);
1993: x_ksqv_rec := l_def_ksqv_rec;
1994: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1995: EXCEPTION
1996: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1997: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1998: (
1999: l_api_name,
2000: G_PKG_NAME,

Line 1997: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1993: x_ksqv_rec := l_def_ksqv_rec;
1994: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1995: EXCEPTION
1996: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1997: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1998: (
1999: l_api_name,
2000: G_PKG_NAME,
2001: 'OKC_API.G_RET_STS_ERROR',

Line 2001: 'OKC_API.G_RET_STS_ERROR',

1997: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1998: (
1999: l_api_name,
2000: G_PKG_NAME,
2001: 'OKC_API.G_RET_STS_ERROR',
2002: x_msg_count,
2003: x_msg_data,
2004: '_PVT'
2005: );

Line 2006: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2002: x_msg_count,
2003: x_msg_data,
2004: '_PVT'
2005: );
2006: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2007: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2008: (
2009: l_api_name,
2010: G_PKG_NAME,

Line 2007: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2003: x_msg_data,
2004: '_PVT'
2005: );
2006: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2007: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2008: (
2009: l_api_name,
2010: G_PKG_NAME,
2011: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2011: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2007: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2008: (
2009: l_api_name,
2010: G_PKG_NAME,
2011: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2012: x_msg_count,
2013: x_msg_data,
2014: '_PVT'
2015: );

Line 2017: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2013: x_msg_data,
2014: '_PVT'
2015: );
2016: WHEN OTHERS THEN
2017: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2018: (
2019: l_api_name,
2020: G_PKG_NAME,
2021: 'OTHERS',

Line 2041: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2037: x_ksqv_tbl OUT NOCOPY ksqv_tbl_type) IS
2038:
2039: l_api_version CONSTANT NUMBER := 1;
2040: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
2041: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2042: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2043: i NUMBER := 0;
2044: BEGIN
2045: OKC_API.init_msg_list(p_init_msg_list);

Line 2042: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2038:
2039: l_api_version CONSTANT NUMBER := 1;
2040: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
2041: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2042: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2043: i NUMBER := 0;
2044: BEGIN
2045: OKC_API.init_msg_list(p_init_msg_list);
2046: -- Make sure PL/SQL table has records in it before passing

Line 2045: OKC_API.init_msg_list(p_init_msg_list);

2041: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2042: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2043: i NUMBER := 0;
2044: BEGIN
2045: OKC_API.init_msg_list(p_init_msg_list);
2046: -- Make sure PL/SQL table has records in it before passing
2047: IF (p_ksqv_tbl.COUNT > 0) THEN
2048: i := p_ksqv_tbl.FIRST;
2049: LOOP

Line 2052: p_init_msg_list => OKC_API.G_FALSE,

2048: i := p_ksqv_tbl.FIRST;
2049: LOOP
2050: update_row (
2051: p_api_version => p_api_version,
2052: p_init_msg_list => OKC_API.G_FALSE,
2053: x_return_status => x_return_status,
2054: x_msg_count => x_msg_count,
2055: x_msg_data => x_msg_data,
2056: p_ksqv_rec => p_ksqv_tbl(i),

Line 2060: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then

2056: p_ksqv_rec => p_ksqv_tbl(i),
2057: x_ksqv_rec => x_ksqv_tbl(i));
2058:
2059: -- store the highest degree of error
2060: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
2061: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
2062: l_overall_status := x_return_status;
2063: End If;
2064: End If;

Line 2061: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then

2057: x_ksqv_rec => x_ksqv_tbl(i));
2058:
2059: -- store the highest degree of error
2060: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
2061: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
2062: l_overall_status := x_return_status;
2063: End If;
2064: End If;
2065:

Line 2073: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2069: -- return overall status
2070: x_return_status := l_overall_status;
2071: END IF;
2072: EXCEPTION
2073: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2074: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2075: (
2076: l_api_name,
2077: G_PKG_NAME,

Line 2074: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2070: x_return_status := l_overall_status;
2071: END IF;
2072: EXCEPTION
2073: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2074: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2075: (
2076: l_api_name,
2077: G_PKG_NAME,
2078: 'OKC_API.G_RET_STS_ERROR',

Line 2078: 'OKC_API.G_RET_STS_ERROR',

2074: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2075: (
2076: l_api_name,
2077: G_PKG_NAME,
2078: 'OKC_API.G_RET_STS_ERROR',
2079: x_msg_count,
2080: x_msg_data,
2081: '_PVT'
2082: );

Line 2083: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2079: x_msg_count,
2080: x_msg_data,
2081: '_PVT'
2082: );
2083: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2084: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2085: (
2086: l_api_name,
2087: G_PKG_NAME,

Line 2084: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2080: x_msg_data,
2081: '_PVT'
2082: );
2083: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2084: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2085: (
2086: l_api_name,
2087: G_PKG_NAME,
2088: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2088: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2084: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2085: (
2086: l_api_name,
2087: G_PKG_NAME,
2088: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2089: x_msg_count,
2090: x_msg_data,
2091: '_PVT'
2092: );

Line 2094: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2090: x_msg_data,
2091: '_PVT'
2092: );
2093: WHEN OTHERS THEN
2094: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2095: (
2096: l_api_name,
2097: G_PKG_NAME,
2098: 'OTHERS',

Line 2120: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2116: p_ksq_rec IN ksq_rec_type) IS
2117:
2118: l_api_version CONSTANT NUMBER := 1;
2119: l_api_name CONSTANT VARCHAR2(30) := 'K_SEQ_delete_row';
2120: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2121: l_ksq_rec ksq_rec_type:= p_ksq_rec;
2122: l_row_notfound BOOLEAN := TRUE;
2123: BEGIN
2124: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

Line 2124: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

2120: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2121: l_ksq_rec ksq_rec_type:= p_ksq_rec;
2122: l_row_notfound BOOLEAN := TRUE;
2123: BEGIN
2124: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2125: p_init_msg_list,
2126: '_PVT',
2127: x_return_status);
2128: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2128: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2124: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2125: p_init_msg_list,
2126: '_PVT',
2127: x_return_status);
2128: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2129: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2130: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2131: RAISE OKC_API.G_EXCEPTION_ERROR;
2132: END IF;

Line 2129: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2125: p_init_msg_list,
2126: '_PVT',
2127: x_return_status);
2128: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2129: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2130: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2131: RAISE OKC_API.G_EXCEPTION_ERROR;
2132: END IF;
2133: DELETE FROM OKC_K_SEQ_HEADER

Line 2130: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

2126: '_PVT',
2127: x_return_status);
2128: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2129: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2130: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2131: RAISE OKC_API.G_EXCEPTION_ERROR;
2132: END IF;
2133: DELETE FROM OKC_K_SEQ_HEADER
2134: WHERE LINE_CODE = l_ksq_rec.line_code;

Line 2131: RAISE OKC_API.G_EXCEPTION_ERROR;

2127: x_return_status);
2128: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2129: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2130: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2131: RAISE OKC_API.G_EXCEPTION_ERROR;
2132: END IF;
2133: DELETE FROM OKC_K_SEQ_HEADER
2134: WHERE LINE_CODE = l_ksq_rec.line_code;
2135:

Line 2136: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

2132: END IF;
2133: DELETE FROM OKC_K_SEQ_HEADER
2134: WHERE LINE_CODE = l_ksq_rec.line_code;
2135:
2136: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2137: EXCEPTION
2138: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2139: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2140: (

Line 2138: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2134: WHERE LINE_CODE = l_ksq_rec.line_code;
2135:
2136: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2137: EXCEPTION
2138: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2139: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2140: (
2141: l_api_name,
2142: G_PKG_NAME,

Line 2139: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2135:
2136: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2137: EXCEPTION
2138: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2139: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2140: (
2141: l_api_name,
2142: G_PKG_NAME,
2143: 'OKC_API.G_RET_STS_ERROR',

Line 2143: 'OKC_API.G_RET_STS_ERROR',

2139: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2140: (
2141: l_api_name,
2142: G_PKG_NAME,
2143: 'OKC_API.G_RET_STS_ERROR',
2144: x_msg_count,
2145: x_msg_data,
2146: '_PVT'
2147: );

Line 2148: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2144: x_msg_count,
2145: x_msg_data,
2146: '_PVT'
2147: );
2148: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2149: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2150: (
2151: l_api_name,
2152: G_PKG_NAME,

Line 2149: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2145: x_msg_data,
2146: '_PVT'
2147: );
2148: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2149: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2150: (
2151: l_api_name,
2152: G_PKG_NAME,
2153: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2153: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2149: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2150: (
2151: l_api_name,
2152: G_PKG_NAME,
2153: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2154: x_msg_count,
2155: x_msg_data,
2156: '_PVT'
2157: );

Line 2159: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2155: x_msg_data,
2156: '_PVT'
2157: );
2158: WHEN OTHERS THEN
2159: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2160: (
2161: l_api_name,
2162: G_PKG_NAME,
2163: 'OTHERS',

Line 2182: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2178: p_ksqv_rec IN ksqv_rec_type) IS
2179:
2180: l_api_version CONSTANT NUMBER := 1;
2181: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
2182: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2183: l_ksqv_rec ksqv_rec_type := p_ksqv_rec;
2184: l_ksq_rec ksq_rec_type;
2185: BEGIN
2186: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

Line 2186: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

2182: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2183: l_ksqv_rec ksqv_rec_type := p_ksqv_rec;
2184: l_ksq_rec ksq_rec_type;
2185: BEGIN
2186: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2187: G_PKG_NAME,
2188: p_init_msg_list,
2189: l_api_version,
2190: p_api_version,

Line 2193: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2189: l_api_version,
2190: p_api_version,
2191: '_PVT',
2192: x_return_status);
2193: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2194: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2195: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2196: RAISE OKC_API.G_EXCEPTION_ERROR;
2197: END IF;

Line 2194: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2190: p_api_version,
2191: '_PVT',
2192: x_return_status);
2193: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2194: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2195: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2196: RAISE OKC_API.G_EXCEPTION_ERROR;
2197: END IF;
2198: --------------------------------------

Line 2195: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

2191: '_PVT',
2192: x_return_status);
2193: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2194: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2195: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2196: RAISE OKC_API.G_EXCEPTION_ERROR;
2197: END IF;
2198: --------------------------------------
2199: -- Move VIEW record to "Child" records

Line 2196: RAISE OKC_API.G_EXCEPTION_ERROR;

2192: x_return_status);
2193: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2194: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2195: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2196: RAISE OKC_API.G_EXCEPTION_ERROR;
2197: END IF;
2198: --------------------------------------
2199: -- Move VIEW record to "Child" records
2200: --------------------------------------

Line 2212: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2208: x_msg_count,
2209: x_msg_data,
2210: l_ksq_rec
2211: );
2212: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2213: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2214: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2215: RAISE OKC_API.G_EXCEPTION_ERROR;
2216: END IF;

Line 2213: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2209: x_msg_data,
2210: l_ksq_rec
2211: );
2212: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2213: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2214: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2215: RAISE OKC_API.G_EXCEPTION_ERROR;
2216: END IF;
2217: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 2214: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

2210: l_ksq_rec
2211: );
2212: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2213: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2214: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2215: RAISE OKC_API.G_EXCEPTION_ERROR;
2216: END IF;
2217: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2218: EXCEPTION

Line 2215: RAISE OKC_API.G_EXCEPTION_ERROR;

2211: );
2212: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2213: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2214: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2215: RAISE OKC_API.G_EXCEPTION_ERROR;
2216: END IF;
2217: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2218: EXCEPTION
2219: WHEN OKC_API.G_EXCEPTION_ERROR THEN

Line 2217: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

2213: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2214: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2215: RAISE OKC_API.G_EXCEPTION_ERROR;
2216: END IF;
2217: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2218: EXCEPTION
2219: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2220: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2221: (

Line 2219: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2215: RAISE OKC_API.G_EXCEPTION_ERROR;
2216: END IF;
2217: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2218: EXCEPTION
2219: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2220: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2221: (
2222: l_api_name,
2223: G_PKG_NAME,

Line 2220: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2216: END IF;
2217: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2218: EXCEPTION
2219: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2220: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2221: (
2222: l_api_name,
2223: G_PKG_NAME,
2224: 'OKC_API.G_RET_STS_ERROR',

Line 2224: 'OKC_API.G_RET_STS_ERROR',

2220: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2221: (
2222: l_api_name,
2223: G_PKG_NAME,
2224: 'OKC_API.G_RET_STS_ERROR',
2225: x_msg_count,
2226: x_msg_data,
2227: '_PVT'
2228: );

Line 2229: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2225: x_msg_count,
2226: x_msg_data,
2227: '_PVT'
2228: );
2229: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2230: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2231: (
2232: l_api_name,
2233: G_PKG_NAME,

Line 2230: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2226: x_msg_data,
2227: '_PVT'
2228: );
2229: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2230: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2231: (
2232: l_api_name,
2233: G_PKG_NAME,
2234: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2234: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2230: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2231: (
2232: l_api_name,
2233: G_PKG_NAME,
2234: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2235: x_msg_count,
2236: x_msg_data,
2237: '_PVT'
2238: );

Line 2240: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2236: x_msg_data,
2237: '_PVT'
2238: );
2239: WHEN OTHERS THEN
2240: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2241: (
2242: l_api_name,
2243: G_PKG_NAME,
2244: 'OTHERS',

Line 2263: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2259: p_ksqv_tbl IN ksqv_tbl_type) IS
2260:
2261: l_api_version CONSTANT NUMBER := 1;
2262: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
2263: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2264: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2265: i NUMBER := 0;
2266: BEGIN
2267: OKC_API.init_msg_list(p_init_msg_list);

Line 2264: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2260:
2261: l_api_version CONSTANT NUMBER := 1;
2262: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
2263: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2264: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2265: i NUMBER := 0;
2266: BEGIN
2267: OKC_API.init_msg_list(p_init_msg_list);
2268: -- Make sure PL/SQL table has records in it before passing

Line 2267: OKC_API.init_msg_list(p_init_msg_list);

2263: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2264: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2265: i NUMBER := 0;
2266: BEGIN
2267: OKC_API.init_msg_list(p_init_msg_list);
2268: -- Make sure PL/SQL table has records in it before passing
2269: IF (p_ksqv_tbl.COUNT > 0) THEN
2270: i := p_ksqv_tbl.FIRST;
2271: LOOP

Line 2274: p_init_msg_list => OKC_API.G_FALSE,

2270: i := p_ksqv_tbl.FIRST;
2271: LOOP
2272: delete_row (
2273: p_api_version => p_api_version,
2274: p_init_msg_list => OKC_API.G_FALSE,
2275: x_return_status => x_return_status,
2276: x_msg_count => x_msg_count,
2277: x_msg_data => x_msg_data,
2278: p_ksqv_rec => p_ksqv_tbl(i));

Line 2281: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then

2277: x_msg_data => x_msg_data,
2278: p_ksqv_rec => p_ksqv_tbl(i));
2279:
2280: -- store the highest degree of error
2281: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
2282: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
2283: l_overall_status := x_return_status;
2284: End If;
2285: End If;

Line 2282: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then

2278: p_ksqv_rec => p_ksqv_tbl(i));
2279:
2280: -- store the highest degree of error
2281: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
2282: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
2283: l_overall_status := x_return_status;
2284: End If;
2285: End If;
2286:

Line 2294: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2290: -- return overall status
2291: x_return_status := l_overall_status;
2292: END IF;
2293: EXCEPTION
2294: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2295: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2296: (
2297: l_api_name,
2298: G_PKG_NAME,

Line 2295: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2291: x_return_status := l_overall_status;
2292: END IF;
2293: EXCEPTION
2294: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2295: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2296: (
2297: l_api_name,
2298: G_PKG_NAME,
2299: 'OKC_API.G_RET_STS_ERROR',

Line 2299: 'OKC_API.G_RET_STS_ERROR',

2295: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2296: (
2297: l_api_name,
2298: G_PKG_NAME,
2299: 'OKC_API.G_RET_STS_ERROR',
2300: x_msg_count,
2301: x_msg_data,
2302: '_PVT'
2303: );

Line 2304: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2300: x_msg_count,
2301: x_msg_data,
2302: '_PVT'
2303: );
2304: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2305: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2306: (
2307: l_api_name,
2308: G_PKG_NAME,

Line 2305: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2301: x_msg_data,
2302: '_PVT'
2303: );
2304: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2305: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2306: (
2307: l_api_name,
2308: G_PKG_NAME,
2309: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2309: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2305: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2306: (
2307: l_api_name,
2308: G_PKG_NAME,
2309: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2310: x_msg_count,
2311: x_msg_data,
2312: '_PVT'
2313: );

Line 2315: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2311: x_msg_data,
2312: '_PVT'
2313: );
2314: WHEN OTHERS THEN
2315: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2316: (
2317: l_api_name,
2318: G_PKG_NAME,
2319: 'OTHERS',

Line 2420: x_return_status := okc_api.g_false;

2416: IF (l_debug = 'Y') THEN
2417: Okc_Debug.Set_Indentation('Is_K_Autogenerted');
2418: Okc_Debug.Log('100: Is_K_Autogenerted', 2);
2419: END IF;
2420: x_return_status := okc_api.g_false;
2421:
2422: --NPALEPU ADDED ON 22-AUG-2006 FOR BUG # 5470760
2423: l_opu := MO_GLOBAL.GET_CURRENT_ORG_ID ;
2424:

Line 2471: x_return_status := okc_api.g_true;

2467: -- overwrite the contract number in the authoring form,
2468: -- So return false.
2469: Raise g_exception_halt_validation;
2470: End If;
2471: x_return_status := okc_api.g_true;
2472: Raise g_exception_halt_validation;
2473: End If;
2474:
2475: -- Get the sequence line details

Line 2582: x_return_status := okc_api.g_true;

2578: END IF;
2579: Raise g_exception_halt_validation;
2580: End If;
2581:
2582: x_return_status := okc_api.g_true;
2583: IF (l_debug = 'Y') THEN
2584: Okc_Debug.Log('1300: Exiting Is_K_Autogenerated', 2);
2585: Okc_Debug.Reset_Indentation;
2586: END IF;

Line 2594: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

2590: Okc_Debug.Log('1400: Exiting Is_K_Autogenerated', 2);
2591: Okc_Debug.Reset_Indentation;
2592: END IF;
2593: When Others Then
2594: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
2595: p_msg_name => g_unexpected_error,
2596: p_token1 => g_sqlcode_token,
2597: p_token1_value => sqlcode,
2598: p_token2 => g_sqlerrm_token,

Line 2601: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2597: p_token1_value => sqlcode,
2598: p_token2 => g_sqlerrm_token,
2599: p_token2_value => sqlerrm);
2600: -- set error flag as UNEXPETED error
2601: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2602: IF (l_debug = 'Y') THEN
2603: Okc_Debug.Log('1500: Exiting Is_K_Autogenerated', 2);
2604: Okc_Debug.Reset_Indentation;
2605: END IF;

Line 2692: p_contract_number_modifier = OKC_API.G_MISS_CHAR

2688: Okc_Debug.Log('125: Contract Number: '|| p_contract_number, 2);
2689: Okc_Debug.Log('150: Modifier : '|| p_contract_number_modifier, 2);
2690: END IF;
2691: If p_contract_number_modifier Is Null OR
2692: p_contract_number_modifier = OKC_API.G_MISS_CHAR
2693: Then
2694: IF (l_debug = 'Y') THEN
2695: Okc_Debug.Log('200: cursor opened is c2', 2);
2696: END IF;

Line 2730: x_return_status := okc_api.g_ret_sts_success;

2726: IF (l_debug = 'Y') THEN
2727: Okc_Debug.Set_Indentation('Get_K_Number');
2728: Okc_Debug.Log('2100: Entering Get_K_Number', 2);
2729: END IF;
2730: x_return_status := okc_api.g_ret_sts_success;
2731: -- First of check the sequence profile option. If it is
2732: -- not 'Always Used' then we need to loop to retrieve the
2733: -- contract number from DB sequence until a non-existing
2734: -- combination is found.

Line 2806: If l_return_status Not In (Okc_Api.g_true, Okc_Api.g_false) Then

2802: l_return_status);
2803: --
2804: -- Return if there is any error
2805: --
2806: If l_return_status Not In (Okc_Api.g_true, Okc_Api.g_false) Then
2807: x_return_status := okc_api.g_ret_sts_error;
2808: Raise g_exception_halt_validation;
2809: End If;
2810: End If;

Line 2807: x_return_status := okc_api.g_ret_sts_error;

2803: --
2804: -- Return if there is any error
2805: --
2806: If l_return_status Not In (Okc_Api.g_true, Okc_Api.g_false) Then
2807: x_return_status := okc_api.g_ret_sts_error;
2808: Raise g_exception_halt_validation;
2809: End If;
2810: End If;
2811:

Line 2817: Okc_Api.Set_Message('OKC', 'OKC_SEQ_NO_SETUP_FOUND');

2813: -- Return also in case setup cannot be found
2814: --
2815: If g_seq_status <> G_SETUP_FOUND Then
2816: If g_seq_status = G_NO_SETUP_FOUND Then
2817: Okc_Api.Set_Message('OKC', 'OKC_SEQ_NO_SETUP_FOUND');
2818: Elsif g_seq_status = G_NO_PDF_FOUND Then
2819: Okc_Api.Set_Message('OKC', 'OKC_SEQ_NO_PDF_FOUND');
2820: End If;
2821: x_return_status := okc_api.g_ret_sts_error;

Line 2819: Okc_Api.Set_Message('OKC', 'OKC_SEQ_NO_PDF_FOUND');

2815: If g_seq_status <> G_SETUP_FOUND Then
2816: If g_seq_status = G_NO_SETUP_FOUND Then
2817: Okc_Api.Set_Message('OKC', 'OKC_SEQ_NO_SETUP_FOUND');
2818: Elsif g_seq_status = G_NO_PDF_FOUND Then
2819: Okc_Api.Set_Message('OKC', 'OKC_SEQ_NO_PDF_FOUND');
2820: End If;
2821: x_return_status := okc_api.g_ret_sts_error;
2822: Raise g_exception_halt_validation;
2823: End If;

Line 2821: x_return_status := okc_api.g_ret_sts_error;

2817: Okc_Api.Set_Message('OKC', 'OKC_SEQ_NO_SETUP_FOUND');
2818: Elsif g_seq_status = G_NO_PDF_FOUND Then
2819: Okc_Api.Set_Message('OKC', 'OKC_SEQ_NO_PDF_FOUND');
2820: End If;
2821: x_return_status := okc_api.g_ret_sts_error;
2822: Raise g_exception_halt_validation;
2823: End If;
2824:
2825: If g_seq_header.user_function_yn = 'Y' Then

Line 2840: Okc_Api.Set_Message('OKC', 'OKC_SEQ_INVALID_PDF_FOUND');

2836: If l_row_notfound Then
2837: --
2838: -- If process defs could not be found, return with error
2839: --
2840: Okc_Api.Set_Message('OKC', 'OKC_SEQ_INVALID_PDF_FOUND');
2841: x_return_status := okc_api.g_ret_sts_error;
2842: Raise g_exception_halt_validation;
2843: End If;
2844: --

Line 2841: x_return_status := okc_api.g_ret_sts_error;

2837: --
2838: -- If process defs could not be found, return with error
2839: --
2840: Okc_Api.Set_Message('OKC', 'OKC_SEQ_INVALID_PDF_FOUND');
2841: x_return_status := okc_api.g_ret_sts_error;
2842: Raise g_exception_halt_validation;
2843: End If;
2844: --
2845: -- Start building up the plsql block here

Line 2875: If l_return_status <> Okc_Api.g_ret_sts_success Then

2871: IF (l_debug = 'Y') THEN
2872: Okc_Debug.Log('2130: l_contract_number : ' || l_contract_number);
2873: Okc_Debug.Log('2140: l_return_status : ' || l_return_status);
2874: END IF;
2875: If l_return_status <> Okc_Api.g_ret_sts_success Then
2876: x_return_status := l_return_status;
2877: Raise g_exception_halt_validation;
2878: End If;
2879: --

Line 2890: OKC_API.SET_MESSAGE(

2886: If Not Contract_Is_Unique(l_contract_number) Then
2887: --
2888: -- Means the combination already exists
2889: --
2890: OKC_API.SET_MESSAGE(
2891: p_app_name => g_app_name,
2892: p_msg_name => 'OKC_CONTRACT_EXISTS',
2893: p_token1 => 'VALUE1',
2894: p_token1_value => l_contract_number,

Line 2897: x_return_status := okc_api.g_ret_sts_error;

2893: p_token1 => 'VALUE1',
2894: p_token1_value => l_contract_number,
2895: p_token2 => 'VALUE2',
2896: p_token2_value => nvl(p_contract_number_modifier,' '));
2897: x_return_status := okc_api.g_ret_sts_error;
2898: Else
2899: --
2900: -- It is a unique combination. Set the contract number
2901: -- and return with success.

Line 2930: x_return_status := okc_api.g_ret_sts_error;

2926: IF (l_debug = 'Y') THEN
2927: Okc_Debug.Log('2200: l_return_status ' || l_return_status);
2928: END IF;
2929: If To_Number(l_return_status) <> FND_SEQNUM.SEQSUCC Then
2930: x_return_status := okc_api.g_ret_sts_error;
2931: Raise g_exception_halt_validation;
2932: End If;
2933: --
2934: -- The sequence number just generated should not exceed

Line 2939: Okc_Api.Set_Message('OKC', 'OKC_SEQ_EXCEED_MAX');

2935: -- the user limit
2936: --
2937: If g_end_seq_no_tbl(g_index) Is Not Null Then
2938: If l_seq > g_end_seq_no_tbl(g_index) Then
2939: Okc_Api.Set_Message('OKC', 'OKC_SEQ_EXCEED_MAX');
2940: x_return_status := okc_api.g_ret_sts_error;
2941: Raise g_exception_halt_validation;
2942: End If;
2943: End If;

Line 2940: x_return_status := okc_api.g_ret_sts_error;

2936: --
2937: If g_end_seq_no_tbl(g_index) Is Not Null Then
2938: If l_seq > g_end_seq_no_tbl(g_index) Then
2939: Okc_Api.Set_Message('OKC', 'OKC_SEQ_EXCEED_MAX');
2940: x_return_status := okc_api.g_ret_sts_error;
2941: Raise g_exception_halt_validation;
2942: End If;
2943: End If;
2944: --

Line 2979: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

2975: Okc_Debug.Reset_Indentation;
2976: END IF;
2977: When OTHERS then
2978: -- store SQL error message on message stack
2979: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
2980: p_msg_name => g_unexpected_error,
2981: p_token1 => g_sqlcode_token,
2982: p_token1_value => sqlcode,
2983: p_token2 => g_sqlerrm_token,

Line 2986: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2982: p_token1_value => sqlcode,
2983: p_token2 => g_sqlerrm_token,
2984: p_token2_value => sqlerrm);
2985: -- set error flag as UNEXPETED error
2986: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2987: IF (l_debug = 'Y') THEN
2988: Okc_Debug.Log('2700: Exiting Get_K_Number', 2);
2989: Okc_Debug.Reset_Indentation;
2990: END IF;