DBA Data[Home] [Help]

APPS.OKS_SCR_PVT dependencies on OKC_API

Line 159: IF (l_scrv_rec.id = OKC_API.G_MISS_NUM) THEN

155: p_scrv_rec IN scrv_rec_type
156: ) RETURN scrv_rec_type IS
157: l_scrv_rec scrv_rec_type := p_scrv_rec;
158: BEGIN
159: IF (l_scrv_rec.id = OKC_API.G_MISS_NUM) THEN
160: l_scrv_rec.id := NULL;
161: END IF;
162: IF (l_scrv_rec.percent = OKC_API.G_MISS_NUM) THEN
163: l_scrv_rec.percent := NULL;

Line 162: IF (l_scrv_rec.percent = OKC_API.G_MISS_NUM) THEN

158: BEGIN
159: IF (l_scrv_rec.id = OKC_API.G_MISS_NUM) THEN
160: l_scrv_rec.id := NULL;
161: END IF;
162: IF (l_scrv_rec.percent = OKC_API.G_MISS_NUM) THEN
163: l_scrv_rec.percent := NULL;
164: END IF;
165: IF (l_scrv_rec.sales_group_id = OKC_API.G_MISS_NUM) THEN
166: l_scrv_rec.sales_group_id := NULL;

Line 165: IF (l_scrv_rec.sales_group_id = OKC_API.G_MISS_NUM) THEN

161: END IF;
162: IF (l_scrv_rec.percent = OKC_API.G_MISS_NUM) THEN
163: l_scrv_rec.percent := NULL;
164: END IF;
165: IF (l_scrv_rec.sales_group_id = OKC_API.G_MISS_NUM) THEN
166: l_scrv_rec.sales_group_id := NULL;
167: END IF;
168: IF (l_scrv_rec.chr_id = OKC_API.G_MISS_NUM) THEN
169: l_scrv_rec.chr_id := NULL;

Line 168: IF (l_scrv_rec.chr_id = OKC_API.G_MISS_NUM) THEN

164: END IF;
165: IF (l_scrv_rec.sales_group_id = OKC_API.G_MISS_NUM) THEN
166: l_scrv_rec.sales_group_id := NULL;
167: END IF;
168: IF (l_scrv_rec.chr_id = OKC_API.G_MISS_NUM) THEN
169: l_scrv_rec.chr_id := NULL;
170: END IF;
171: IF (l_scrv_rec.cle_id = OKC_API.G_MISS_NUM) THEN
172: l_scrv_rec.cle_id := NULL;

Line 171: IF (l_scrv_rec.cle_id = OKC_API.G_MISS_NUM) THEN

167: END IF;
168: IF (l_scrv_rec.chr_id = OKC_API.G_MISS_NUM) THEN
169: l_scrv_rec.chr_id := NULL;
170: END IF;
171: IF (l_scrv_rec.cle_id = OKC_API.G_MISS_NUM) THEN
172: l_scrv_rec.cle_id := NULL;
173: END IF;
174: IF (l_scrv_rec.ctc_id = OKC_API.G_MISS_NUM) THEN
175: l_scrv_rec.ctc_id := NULL;

Line 174: IF (l_scrv_rec.ctc_id = OKC_API.G_MISS_NUM) THEN

170: END IF;
171: IF (l_scrv_rec.cle_id = OKC_API.G_MISS_NUM) THEN
172: l_scrv_rec.cle_id := NULL;
173: END IF;
174: IF (l_scrv_rec.ctc_id = OKC_API.G_MISS_NUM) THEN
175: l_scrv_rec.ctc_id := NULL;
176: END IF;
177: IF (l_scrv_rec.sales_credit_type_id1 = OKC_API.G_MISS_CHAR) THEN
178: l_scrv_rec.sales_credit_type_id1 := NULL;

Line 177: IF (l_scrv_rec.sales_credit_type_id1 = OKC_API.G_MISS_CHAR) THEN

173: END IF;
174: IF (l_scrv_rec.ctc_id = OKC_API.G_MISS_NUM) THEN
175: l_scrv_rec.ctc_id := NULL;
176: END IF;
177: IF (l_scrv_rec.sales_credit_type_id1 = OKC_API.G_MISS_CHAR) THEN
178: l_scrv_rec.sales_credit_type_id1 := NULL;
179: END IF;
180: IF (l_scrv_rec.sales_credit_type_id2 = OKC_API.G_MISS_CHAR) THEN
181: l_scrv_rec.sales_credit_type_id2 := NULL;

Line 180: IF (l_scrv_rec.sales_credit_type_id2 = OKC_API.G_MISS_CHAR) THEN

176: END IF;
177: IF (l_scrv_rec.sales_credit_type_id1 = OKC_API.G_MISS_CHAR) THEN
178: l_scrv_rec.sales_credit_type_id1 := NULL;
179: END IF;
180: IF (l_scrv_rec.sales_credit_type_id2 = OKC_API.G_MISS_CHAR) THEN
181: l_scrv_rec.sales_credit_type_id2 := NULL;
182: END IF;
183: IF (l_scrv_rec.object_version_number = OKC_API.G_MISS_NUM) THEN
184: l_scrv_rec.object_version_number := NULL;

Line 183: IF (l_scrv_rec.object_version_number = OKC_API.G_MISS_NUM) THEN

179: END IF;
180: IF (l_scrv_rec.sales_credit_type_id2 = OKC_API.G_MISS_CHAR) THEN
181: l_scrv_rec.sales_credit_type_id2 := NULL;
182: END IF;
183: IF (l_scrv_rec.object_version_number = OKC_API.G_MISS_NUM) THEN
184: l_scrv_rec.object_version_number := NULL;
185: END IF;
186: IF (l_scrv_rec.created_by = OKC_API.G_MISS_NUM) THEN
187: l_scrv_rec.created_by := NULL;

Line 186: IF (l_scrv_rec.created_by = OKC_API.G_MISS_NUM) THEN

182: END IF;
183: IF (l_scrv_rec.object_version_number = OKC_API.G_MISS_NUM) THEN
184: l_scrv_rec.object_version_number := NULL;
185: END IF;
186: IF (l_scrv_rec.created_by = OKC_API.G_MISS_NUM) THEN
187: l_scrv_rec.created_by := NULL;
188: END IF;
189: IF (l_scrv_rec.creation_date = OKC_API.G_MISS_DATE) THEN
190: l_scrv_rec.creation_date := NULL;

Line 189: IF (l_scrv_rec.creation_date = OKC_API.G_MISS_DATE) THEN

185: END IF;
186: IF (l_scrv_rec.created_by = OKC_API.G_MISS_NUM) THEN
187: l_scrv_rec.created_by := NULL;
188: END IF;
189: IF (l_scrv_rec.creation_date = OKC_API.G_MISS_DATE) THEN
190: l_scrv_rec.creation_date := NULL;
191: END IF;
192: IF (l_scrv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
193: l_scrv_rec.last_updated_by := NULL;

Line 192: IF (l_scrv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN

188: END IF;
189: IF (l_scrv_rec.creation_date = OKC_API.G_MISS_DATE) THEN
190: l_scrv_rec.creation_date := NULL;
191: END IF;
192: IF (l_scrv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
193: l_scrv_rec.last_updated_by := NULL;
194: END IF;
195: IF (l_scrv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
196: l_scrv_rec.last_update_date := NULL;

Line 195: IF (l_scrv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN

191: END IF;
192: IF (l_scrv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
193: l_scrv_rec.last_updated_by := NULL;
194: END IF;
195: IF (l_scrv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
196: l_scrv_rec.last_update_date := NULL;
197: END IF;
198: RETURN(l_scrv_rec);
199: END null_out_defaults;

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

208: -----------------------------------------------------
209: PROCEDURE validate_id(x_return_status OUT NOCOPY varchar2,
210: P_SCRV_REC IN SCRV_REC_TYPE)
211: Is
212: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
213: Begin
214:
215: x_return_status := OKC_API.G_RET_STS_SUCCESS;
216:

Line 215: x_return_status := OKC_API.G_RET_STS_SUCCESS;

211: Is
212: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
213: Begin
214:
215: x_return_status := OKC_API.G_RET_STS_SUCCESS;
216:
217: If P_SCRV_REC.id = OKC_API.G_MISS_NUM OR
218: P_SCRV_REC.id IS NULL
219: Then

Line 217: If P_SCRV_REC.id = OKC_API.G_MISS_NUM OR

213: Begin
214:
215: x_return_status := OKC_API.G_RET_STS_SUCCESS;
216:
217: If P_SCRV_REC.id = OKC_API.G_MISS_NUM OR
218: P_SCRV_REC.id IS NULL
219: Then
220: OKC_API.set_message(G_APP_NAME,G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
221: l_return_status := OKC_API.G_RET_STS_ERROR;

Line 220: OKC_API.set_message(G_APP_NAME,G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');

216:
217: If P_SCRV_REC.id = OKC_API.G_MISS_NUM OR
218: P_SCRV_REC.id IS NULL
219: Then
220: OKC_API.set_message(G_APP_NAME,G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
221: l_return_status := OKC_API.G_RET_STS_ERROR;
222: End If;
223:
224: Exception

Line 221: l_return_status := OKC_API.G_RET_STS_ERROR;

217: If P_SCRV_REC.id = OKC_API.G_MISS_NUM OR
218: P_SCRV_REC.id IS NULL
219: Then
220: OKC_API.set_message(G_APP_NAME,G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
221: l_return_status := OKC_API.G_RET_STS_ERROR;
222: End If;
223:
224: Exception
225: When G_EXCEPTION_HALT_VALIDATION THEN

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

226: x_return_status := l_return_status;
227: NULL;
228: When OTHERS THEN
229: -- store SQL error message on message stack for caller
230: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
231: p_msg_name => g_unexpected_error,
232: p_token1 => g_sqlcode_token,
233: p_token1_value => sqlcode,
234: p_token2 => g_sqlerrm_token,

Line 238: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

234: p_token2 => g_sqlerrm_token,
235: p_token2_value => sqlerrm);
236:
237: -- notify caller of an UNEXPECTED error
238: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
239: End validate_id;
240:
241: -----------------------------------------------------
242: -- Validate Object Version Number --

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

243: -----------------------------------------------------
244: PROCEDURE validate_objvernum(x_return_status OUT NOCOPY varchar2,
245: P_SCRV_REC IN SCRV_REC_TYPE)
246: Is
247: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
248: Begin
249:
250: x_return_status := OKC_API.G_RET_STS_SUCCESS;
251:

Line 250: x_return_status := OKC_API.G_RET_STS_SUCCESS;

246: Is
247: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
248: Begin
249:
250: x_return_status := OKC_API.G_RET_STS_SUCCESS;
251:
252: If P_SCRV_REC.object_version_number = OKC_API.G_MISS_NUM OR
253: P_SCRV_REC.object_version_number IS NULL
254: Then

Line 252: If P_SCRV_REC.object_version_number = OKC_API.G_MISS_NUM OR

248: Begin
249:
250: x_return_status := OKC_API.G_RET_STS_SUCCESS;
251:
252: If P_SCRV_REC.object_version_number = OKC_API.G_MISS_NUM OR
253: P_SCRV_REC.object_version_number IS NULL
254: Then
255: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
256: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 255: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');

251:
252: If P_SCRV_REC.object_version_number = OKC_API.G_MISS_NUM OR
253: P_SCRV_REC.object_version_number IS NULL
254: Then
255: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
256: x_return_status := OKC_API.G_RET_STS_ERROR;
257: RAISE G_EXCEPTION_HALT_VALIDATION;
258: End If;
259:

Line 256: x_return_status := OKC_API.G_RET_STS_ERROR;

252: If P_SCRV_REC.object_version_number = OKC_API.G_MISS_NUM OR
253: P_SCRV_REC.object_version_number IS NULL
254: Then
255: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
256: x_return_status := OKC_API.G_RET_STS_ERROR;
257: RAISE G_EXCEPTION_HALT_VALIDATION;
258: End If;
259:
260: Exception

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

261: When G_EXCEPTION_HALT_VALIDATION Then
262: NULL;
263: When OTHERS Then
264: -- store SQL error message on message stack for caller
265: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
266: p_msg_name => g_unexpected_error,
267: p_token1 => g_sqlcode_token,
268: p_token1_value => sqlcode,
269: p_token2 => g_sqlerrm_token,

Line 273: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

269: p_token2 => g_sqlerrm_token,
270: p_token2_value => sqlerrm);
271:
272: -- notify caller of an UNEXPECTED error
273: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
274: END validate_objvernum;
275: -----------------------------------------------------
276: -- Validate CHR_ID
277: -----------------------------------------------------

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

277: -----------------------------------------------------
278: PROCEDURE validate_CHR_ID (x_return_status OUT NOCOPY varchar2,
279: P_SCRV_REC IN SCRV_REC_TYPE)
280: Is
281: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
282: l_Count INTEGER;
283: CURSOR Chr_Cur IS
284: SELECT COUNT(1) FROM OKC_K_Headers_v
285: WHERE ID=P_SCRV_REC.CHR_ID;

Line 287: x_return_status := OKC_API.G_RET_STS_SUCCESS;

283: CURSOR Chr_Cur IS
284: SELECT COUNT(1) FROM OKC_K_Headers_v
285: WHERE ID=P_SCRV_REC.CHR_ID;
286: Begin
287: x_return_status := OKC_API.G_RET_STS_SUCCESS;
288: If P_SCRV_REC.CHR_ID = OKC_API.G_MISS_NUM OR
289: P_SCRV_REC.CHR_ID IS NULL
290: Then
291: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'CHR_Id');

Line 288: If P_SCRV_REC.CHR_ID = OKC_API.G_MISS_NUM OR

284: SELECT COUNT(1) FROM OKC_K_Headers_v
285: WHERE ID=P_SCRV_REC.CHR_ID;
286: Begin
287: x_return_status := OKC_API.G_RET_STS_SUCCESS;
288: If P_SCRV_REC.CHR_ID = OKC_API.G_MISS_NUM OR
289: P_SCRV_REC.CHR_ID IS NULL
290: Then
291: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'CHR_Id');
292: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 291: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'CHR_Id');

287: x_return_status := OKC_API.G_RET_STS_SUCCESS;
288: If P_SCRV_REC.CHR_ID = OKC_API.G_MISS_NUM OR
289: P_SCRV_REC.CHR_ID IS NULL
290: Then
291: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'CHR_Id');
292: x_return_status := OKC_API.G_RET_STS_ERROR;
293: -- halt further validation of this column
294: RAISE G_EXCEPTION_HALT_VALIDATION;
295: END IF;

Line 292: x_return_status := OKC_API.G_RET_STS_ERROR;

288: If P_SCRV_REC.CHR_ID = OKC_API.G_MISS_NUM OR
289: P_SCRV_REC.CHR_ID IS NULL
290: Then
291: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'CHR_Id');
292: x_return_status := OKC_API.G_RET_STS_ERROR;
293: -- halt further validation of this column
294: RAISE G_EXCEPTION_HALT_VALIDATION;
295: END IF;
296:

Line 302: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'CHR_Id');

298: FETCH Chr_Cur INTO l_Count;
299: CLOSE Chr_Cur;
300: IF NOT l_Count=1
301: THEN
302: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'CHR_Id');
303: x_return_status := OKC_API.G_RET_STS_ERROR;
304: -- halt further validation of this column
305: RAISE G_EXCEPTION_HALT_VALIDATION;
306: END IF;

Line 303: x_return_status := OKC_API.G_RET_STS_ERROR;

299: CLOSE Chr_Cur;
300: IF NOT l_Count=1
301: THEN
302: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'CHR_Id');
303: x_return_status := OKC_API.G_RET_STS_ERROR;
304: -- halt further validation of this column
305: RAISE G_EXCEPTION_HALT_VALIDATION;
306: END IF;
307:

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

309: When G_EXCEPTION_HALT_VALIDATION Then
310: NULL;
311: When OTHERS Then
312: -- store SQL error message on message stack for caller
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 321: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

317: p_token2 => g_sqlerrm_token,
318: p_token2_value => sqlerrm);
319:
320: -- notify caller of an UNEXPECTED error
321: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
322: END validate_CHR_ID;
323:
324: -----------------------------------------------------
325: -- Validate Cle_Id

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

326: -----------------------------------------------------
327: PROCEDURE validate_Cle_Id (x_return_status OUT NOCOPY varchar2,
328: P_SCRV_REC IN SCRV_REC_TYPE)
329: Is
330: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
331: l_Count INTEGER;
332: CURSOR Cle_Cur IS
333: SELECT COUNT(1) FROM OKC_K_Lines_V
334: WHERE ID=P_SCRV_REC.Cle_Id;

Line 336: x_return_status := OKC_API.G_RET_STS_SUCCESS;

332: CURSOR Cle_Cur IS
333: SELECT COUNT(1) FROM OKC_K_Lines_V
334: WHERE ID=P_SCRV_REC.Cle_Id;
335: Begin
336: x_return_status := OKC_API.G_RET_STS_SUCCESS;
337: If NOT (P_SCRV_REC.cle_Id = OKC_API.G_MISS_NUM OR
338: P_SCRV_REC.cle_Id IS NULL)
339: Then
340: OPEN cle_Cur;

Line 337: If NOT (P_SCRV_REC.cle_Id = OKC_API.G_MISS_NUM OR

333: SELECT COUNT(1) FROM OKC_K_Lines_V
334: WHERE ID=P_SCRV_REC.Cle_Id;
335: Begin
336: x_return_status := OKC_API.G_RET_STS_SUCCESS;
337: If NOT (P_SCRV_REC.cle_Id = OKC_API.G_MISS_NUM OR
338: P_SCRV_REC.cle_Id IS NULL)
339: Then
340: OPEN cle_Cur;
341: FETCH cle_Cur INTO l_Count;

Line 345: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'Cle_Id');

341: FETCH cle_Cur INTO l_Count;
342: CLOSE cle_Cur;
343: IF NOT l_Count=1
344: THEN
345: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'Cle_Id');
346: x_return_status := OKC_API.G_RET_STS_ERROR;
347: -- halt further validation of this column
348: RAISE G_EXCEPTION_HALT_VALIDATION;
349: END IF;

Line 346: x_return_status := OKC_API.G_RET_STS_ERROR;

342: CLOSE cle_Cur;
343: IF NOT l_Count=1
344: THEN
345: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'Cle_Id');
346: x_return_status := OKC_API.G_RET_STS_ERROR;
347: -- halt further validation of this column
348: RAISE G_EXCEPTION_HALT_VALIDATION;
349: END IF;
350: END IF;

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

352: When G_EXCEPTION_HALT_VALIDATION Then
353: NULL;
354: When OTHERS Then
355: -- store SQL error message on message stack for caller
356: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
357: p_msg_name => g_unexpected_error,
358: p_token1 => g_sqlcode_token,
359: p_token1_value => sqlcode,
360: p_token2 => g_sqlerrm_token,

Line 364: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

360: p_token2 => g_sqlerrm_token,
361: p_token2_value => sqlerrm);
362:
363: -- notify caller of an UNEXPECTED error
364: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
365: END validate_Cle_Id;
366:
367: -----------------------------------------------------
368: -- Validate CTC_Id

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

369: -----------------------------------------------------
370: PROCEDURE validate_CTC_Id( x_return_status OUT NOCOPY varchar2,
371: P_SCRV_REC IN SCRV_REC_TYPE)
372: Is
373: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
374: CURSOR Ctc_Cur IS
375: SELECT COUNT(1) FROM Okx_Vendor_Contacts_v
376: WHERE Id1=P_SCRV_REC.ctc_Id;
377: l_Count NUMBER;

Line 379: x_return_status := OKC_API.G_RET_STS_SUCCESS;

375: SELECT COUNT(1) FROM Okx_Vendor_Contacts_v
376: WHERE Id1=P_SCRV_REC.ctc_Id;
377: l_Count NUMBER;
378: Begin
379: x_return_status := OKC_API.G_RET_STS_SUCCESS;
380:
381: If P_SCRV_REC.Ctc_Id= OKC_API.G_MISS_NUM OR
382: P_SCRV_REC.Ctc_Id IS NULL
383: Then

Line 381: If P_SCRV_REC.Ctc_Id= OKC_API.G_MISS_NUM OR

377: l_Count NUMBER;
378: Begin
379: x_return_status := OKC_API.G_RET_STS_SUCCESS;
380:
381: If P_SCRV_REC.Ctc_Id= OKC_API.G_MISS_NUM OR
382: P_SCRV_REC.Ctc_Id IS NULL
383: Then
384: OKC_API.set_message(G_APP_NAME,G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'CTC_ID');
385: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 384: OKC_API.set_message(G_APP_NAME,G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'CTC_ID');

380:
381: If P_SCRV_REC.Ctc_Id= OKC_API.G_MISS_NUM OR
382: P_SCRV_REC.Ctc_Id IS NULL
383: Then
384: OKC_API.set_message(G_APP_NAME,G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'CTC_ID');
385: x_return_status := OKC_API.G_RET_STS_ERROR;
386: RAISE G_EXCEPTION_HALT_VALIDATION;
387: END IF;
388: OPEN Ctc_Cur;

Line 385: x_return_status := OKC_API.G_RET_STS_ERROR;

381: If P_SCRV_REC.Ctc_Id= OKC_API.G_MISS_NUM OR
382: P_SCRV_REC.Ctc_Id IS NULL
383: Then
384: OKC_API.set_message(G_APP_NAME,G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'CTC_ID');
385: x_return_status := OKC_API.G_RET_STS_ERROR;
386: RAISE G_EXCEPTION_HALT_VALIDATION;
387: END IF;
388: OPEN Ctc_Cur;
389: FETCH Ctc_Cur INTO l_Count;

Line 393: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'CTC_ID');

389: FETCH Ctc_Cur INTO l_Count;
390: CLOSE Ctc_Cur;
391: IF NOT l_Count=1
392: THEN
393: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'CTC_ID');
394: x_return_status := OKC_API.G_RET_STS_ERROR;
395: RAISE G_EXCEPTION_HALT_VALIDATION;
396: END IF;
397:

Line 394: x_return_status := OKC_API.G_RET_STS_ERROR;

390: CLOSE Ctc_Cur;
391: IF NOT l_Count=1
392: THEN
393: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'CTC_ID');
394: x_return_status := OKC_API.G_RET_STS_ERROR;
395: RAISE G_EXCEPTION_HALT_VALIDATION;
396: END IF;
397:
398: Exception

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

399: When G_EXCEPTION_HALT_VALIDATION Then
400: NULL;
401: When OTHERS Then
402: -- store SQL error message on message stack for caller
403: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
404: p_msg_name => g_unexpected_error,
405: p_token1 => g_sqlcode_token,
406: p_token1_value => sqlcode,
407: p_token2 => g_sqlerrm_token,

Line 411: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

407: p_token2 => g_sqlerrm_token,
408: p_token2_value => sqlerrm);
409:
410: -- notify caller of an UNEXPECTED error
411: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
412: END validate_CTC_Id;
413:
414: -----------------------------------------------------
415: -- Validate SALES_CREDIT_Type_Id1

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

417: PROCEDURE validate_SALES_CREDIT_Type_Id1
418: (x_return_status OUT NOCOPY varchar2,
419: P_SCRV_REC IN SCRV_REC_TYPE)
420: Is
421: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
422: Begin
423: x_return_status := OKC_API.G_RET_STS_SUCCESS;
424:
425: If P_SCRV_REC.SALES_CREDIT_Type_Id1= OKC_API.G_MISS_CHAR OR

Line 423: x_return_status := OKC_API.G_RET_STS_SUCCESS;

419: P_SCRV_REC IN SCRV_REC_TYPE)
420: Is
421: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
422: Begin
423: x_return_status := OKC_API.G_RET_STS_SUCCESS;
424:
425: If P_SCRV_REC.SALES_CREDIT_Type_Id1= OKC_API.G_MISS_CHAR OR
426: P_SCRV_REC.SALES_CREDIT_Type_Id1 IS NULL
427: Then

Line 425: If P_SCRV_REC.SALES_CREDIT_Type_Id1= OKC_API.G_MISS_CHAR OR

421: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
422: Begin
423: x_return_status := OKC_API.G_RET_STS_SUCCESS;
424:
425: If P_SCRV_REC.SALES_CREDIT_Type_Id1= OKC_API.G_MISS_CHAR OR
426: P_SCRV_REC.SALES_CREDIT_Type_Id1 IS NULL
427: Then
428: OKC_API.set_message(G_APP_NAME,G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'SALES_CREDIT_Type_Id1');
429: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 428: OKC_API.set_message(G_APP_NAME,G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'SALES_CREDIT_Type_Id1');

424:
425: If P_SCRV_REC.SALES_CREDIT_Type_Id1= OKC_API.G_MISS_CHAR OR
426: P_SCRV_REC.SALES_CREDIT_Type_Id1 IS NULL
427: Then
428: OKC_API.set_message(G_APP_NAME,G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'SALES_CREDIT_Type_Id1');
429: x_return_status := OKC_API.G_RET_STS_ERROR;
430: RAISE G_EXCEPTION_HALT_VALIDATION;
431: END IF;
432:

Line 429: x_return_status := OKC_API.G_RET_STS_ERROR;

425: If P_SCRV_REC.SALES_CREDIT_Type_Id1= OKC_API.G_MISS_CHAR OR
426: P_SCRV_REC.SALES_CREDIT_Type_Id1 IS NULL
427: Then
428: OKC_API.set_message(G_APP_NAME,G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'SALES_CREDIT_Type_Id1');
429: x_return_status := OKC_API.G_RET_STS_ERROR;
430: RAISE G_EXCEPTION_HALT_VALIDATION;
431: END IF;
432:
433: Exception

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

434: When G_EXCEPTION_HALT_VALIDATION Then
435: NULL;
436: When OTHERS Then
437: -- store SQL error message on message stack for caller
438: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
439: p_msg_name => g_unexpected_error,
440: p_token1 => g_sqlcode_token,
441: p_token1_value => sqlcode,
442: p_token2 => g_sqlerrm_token,

Line 446: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

442: p_token2 => g_sqlerrm_token,
443: p_token2_value => sqlerrm);
444:
445: -- notify caller of an UNEXPECTED error
446: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
447: END validate_SALES_CREDIT_Type_Id1;
448:
449: -----------------------------------------------------
450: -- Validate SALES_CREDIT_Type_Id2

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

452: PROCEDURE validate_SALES_CREDIT_Type_Id2
453: (x_return_status OUT NOCOPY varchar2,
454: P_SCRV_REC IN SCRV_REC_TYPE)
455: Is
456: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
457: Begin
458: x_return_status := OKC_API.G_RET_STS_SUCCESS;
459:
460: If P_SCRV_REC.SALES_CREDIT_Type_Id2= OKC_API.G_MISS_CHAR OR

Line 458: x_return_status := OKC_API.G_RET_STS_SUCCESS;

454: P_SCRV_REC IN SCRV_REC_TYPE)
455: Is
456: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
457: Begin
458: x_return_status := OKC_API.G_RET_STS_SUCCESS;
459:
460: If P_SCRV_REC.SALES_CREDIT_Type_Id2= OKC_API.G_MISS_CHAR OR
461: P_SCRV_REC.SALES_CREDIT_Type_Id2 IS NULL
462: Then

Line 460: If P_SCRV_REC.SALES_CREDIT_Type_Id2= OKC_API.G_MISS_CHAR OR

456: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
457: Begin
458: x_return_status := OKC_API.G_RET_STS_SUCCESS;
459:
460: If P_SCRV_REC.SALES_CREDIT_Type_Id2= OKC_API.G_MISS_CHAR OR
461: P_SCRV_REC.SALES_CREDIT_Type_Id2 IS NULL
462: Then
463: OKC_API.set_message(G_APP_NAME,G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'SALES_CREDIT_Type_Id2');
464: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 463: OKC_API.set_message(G_APP_NAME,G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'SALES_CREDIT_Type_Id2');

459:
460: If P_SCRV_REC.SALES_CREDIT_Type_Id2= OKC_API.G_MISS_CHAR OR
461: P_SCRV_REC.SALES_CREDIT_Type_Id2 IS NULL
462: Then
463: OKC_API.set_message(G_APP_NAME,G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'SALES_CREDIT_Type_Id2');
464: x_return_status := OKC_API.G_RET_STS_ERROR;
465: RAISE G_EXCEPTION_HALT_VALIDATION;
466: END IF;
467:

Line 464: x_return_status := OKC_API.G_RET_STS_ERROR;

460: If P_SCRV_REC.SALES_CREDIT_Type_Id2= OKC_API.G_MISS_CHAR OR
461: P_SCRV_REC.SALES_CREDIT_Type_Id2 IS NULL
462: Then
463: OKC_API.set_message(G_APP_NAME,G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'SALES_CREDIT_Type_Id2');
464: x_return_status := OKC_API.G_RET_STS_ERROR;
465: RAISE G_EXCEPTION_HALT_VALIDATION;
466: END IF;
467:
468: Exception

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

469: When G_EXCEPTION_HALT_VALIDATION Then
470: NULL;
471: When OTHERS Then
472: -- store SQL error message on message stack for caller
473: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
474: p_msg_name => g_unexpected_error,
475: p_token1 => g_sqlcode_token,
476: p_token1_value => sqlcode,
477: p_token2 => g_sqlerrm_token,

Line 481: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

477: p_token2 => g_sqlerrm_token,
478: p_token2_value => sqlerrm);
479:
480: -- notify caller of an UNEXPECTED error
481: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
482: END validate_SALES_CREDIT_Type_Id2;
483:
484:
485: ---------------------------------------------------

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

488: FUNCTION Validate_Attributes (
489: p_scrv_rec IN scrv_rec_type
490: )
491: Return VARCHAR2 Is
492: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
493: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
494:
495: Begin
496: -- call OKC_UTIL.ADD_VIEW to prepare the PL/SQL table to hold columns of view

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

489: p_scrv_rec IN scrv_rec_type
490: )
491: Return VARCHAR2 Is
492: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
493: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
494:
495: Begin
496: -- call OKC_UTIL.ADD_VIEW to prepare the PL/SQL table to hold columns of view
497:

Line 500: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

496: -- call OKC_UTIL.ADD_VIEW to prepare the PL/SQL table to hold columns of view
497:
498: OKC_UTIL.ADD_VIEW('OKS_K_SALES_CREDITS_V',x_return_status);
499:
500: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
501: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
502: -- need to leave
503: l_return_status := x_return_status;
504: RAISE G_EXCEPTION_HALT_VALIDATION;

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

497:
498: OKC_UTIL.ADD_VIEW('OKS_K_SALES_CREDITS_V',x_return_status);
499:
500: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
501: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
502: -- need to leave
503: l_return_status := x_return_status;
504: RAISE G_EXCEPTION_HALT_VALIDATION;
505: ELSE

Line 517: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

513: --ID
514: validate_id(x_return_status, p_scrv_rec);
515:
516: -- store the highest degree of error
517: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
518: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
519: -- need to leave
520: l_return_status := x_return_status;
521: RAISE G_EXCEPTION_HALT_VALIDATION;

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

514: validate_id(x_return_status, p_scrv_rec);
515:
516: -- store the highest degree of error
517: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
518: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
519: -- need to leave
520: l_return_status := x_return_status;
521: RAISE G_EXCEPTION_HALT_VALIDATION;
522: ELSE

Line 532: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

528: --OBJECT_VERSION_NUMBER
529: validate_objvernum(x_return_status, p_scrv_rec);
530:
531: -- store the highest degree of error
532: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
533: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
534: -- need to leave
535: l_return_status := x_return_status;
536: RAISE G_EXCEPTION_HALT_VALIDATION;

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

529: validate_objvernum(x_return_status, p_scrv_rec);
530:
531: -- store the highest degree of error
532: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
533: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
534: -- need to leave
535: l_return_status := x_return_status;
536: RAISE G_EXCEPTION_HALT_VALIDATION;
537: ELSE

Line 545: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

541: END IF;
542: --CHR_ID
543: validate_CHR_ID(x_return_status, p_scrv_rec);
544: -- store the highest degree of error
545: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
546: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
547: -- need to leave
548: l_return_status := x_return_status;
549: RAISE G_EXCEPTION_HALT_VALIDATION;

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

542: --CHR_ID
543: validate_CHR_ID(x_return_status, p_scrv_rec);
544: -- store the highest degree of error
545: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
546: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
547: -- need to leave
548: l_return_status := x_return_status;
549: RAISE G_EXCEPTION_HALT_VALIDATION;
550: ELSE

Line 559: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

555:
556: --Cle_Id
557: validate_Cle_Id(x_return_status, p_scrv_rec);
558: -- store the highest degree of error
559: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
560: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
561: -- need to leave
562: l_return_status := x_return_status;
563: RAISE G_EXCEPTION_HALT_VALIDATION;

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

556: --Cle_Id
557: validate_Cle_Id(x_return_status, p_scrv_rec);
558: -- store the highest degree of error
559: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
560: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
561: -- need to leave
562: l_return_status := x_return_status;
563: RAISE G_EXCEPTION_HALT_VALIDATION;
564: ELSE

Line 574: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

570: --Ctc_Id
571: /*
572: validate_Ctc_Id(x_return_status, p_scrv_rec);
573: -- store the highest degree of error
574: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
575: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
576: -- need to leave
577: l_return_status := x_return_status;
578: RAISE G_EXCEPTION_HALT_VALIDATION;

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

571: /*
572: validate_Ctc_Id(x_return_status, p_scrv_rec);
573: -- store the highest degree of error
574: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
575: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
576: -- need to leave
577: l_return_status := x_return_status;
578: RAISE G_EXCEPTION_HALT_VALIDATION;
579: ELSE

Line 591: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

587:
588: --SALES_CREDIT_Type_Id1
589: validate_SALES_CREDIT_Type_Id1(x_return_status, p_scrv_rec);
590: -- store the highest degree of error
591: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
592: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
593: -- need to leave
594: l_return_status := x_return_status;
595: RAISE G_EXCEPTION_HALT_VALIDATION;

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

588: --SALES_CREDIT_Type_Id1
589: validate_SALES_CREDIT_Type_Id1(x_return_status, p_scrv_rec);
590: -- store the highest degree of error
591: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
592: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
593: -- need to leave
594: l_return_status := x_return_status;
595: RAISE G_EXCEPTION_HALT_VALIDATION;
596: ELSE

Line 604: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

600: END IF;
601: --SALES_CREDIT_Type_Id2
602: validate_SALES_CREDIT_Type_Id2(x_return_status, p_scrv_rec);
603: -- store the highest degree of error
604: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
605: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
606: -- need to leave
607: l_return_status := x_return_status;
608: RAISE G_EXCEPTION_HALT_VALIDATION;

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

601: --SALES_CREDIT_Type_Id2
602: validate_SALES_CREDIT_Type_Id2(x_return_status, p_scrv_rec);
603: -- store the highest degree of error
604: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
605: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
606: -- need to leave
607: l_return_status := x_return_status;
608: RAISE G_EXCEPTION_HALT_VALIDATION;
609: ELSE

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

619: Return (l_return_status);
620:
621: When OTHERS Then
622: -- store SQL error message on message stack for caller
623: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
624: p_msg_name => g_unexpected_error,
625: p_token1 => g_sqlcode_token,
626: p_token1_value => sqlcode,
627: p_token2 => g_sqlerrm_token,

Line 631: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

627: p_token2 => g_sqlerrm_token,
628: p_token2_value => sqlerrm);
629:
630: -- notify caller of an UNEXPECTED error
631: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
632: Return(l_return_status);
633:
634: END validate_attributes;
635:

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

638: -----------------------------------------------
639: FUNCTION Validate_Record (
640: p_scrv_rec IN scrv_rec_type
641: ) RETURN VARCHAR2 IS
642: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
643: BEGIN
644: l_Return_Status:=Validate_Attributes(p_scrv_Rec);
645: RETURN (l_return_status);
646: END Validate_Record;

Line 698: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

694: -- validate_row for:OKS_K_SALES_CREDITS_V --
695: --------------------------------------------
696: PROCEDURE validate_row(
697: p_api_version IN NUMBER,
698: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
699: x_return_status OUT NOCOPY VARCHAR2,
700: x_msg_count OUT NOCOPY NUMBER,
701: x_msg_data OUT NOCOPY VARCHAR2,
702: p_scrv_rec IN scrv_rec_type) IS

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

702: p_scrv_rec IN scrv_rec_type) IS
703:
704: l_api_version CONSTANT NUMBER := 1;
705: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
706: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
707: l_scrv_rec scrv_rec_type := p_scrv_rec;
708: l_scr_rec scr_rec_type;
709: BEGIN
710: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

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

706: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
707: l_scrv_rec scrv_rec_type := p_scrv_rec;
708: l_scr_rec scr_rec_type;
709: BEGIN
710: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
711: G_PKG_NAME,
712: p_init_msg_list,
713: l_api_version,
714: p_api_version,

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

713: l_api_version,
714: p_api_version,
715: '_PVT',
716: x_return_status);
717: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
718: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
719: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
720: RAISE OKC_API.G_EXCEPTION_ERROR;
721: END IF;

Line 718: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

714: p_api_version,
715: '_PVT',
716: x_return_status);
717: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
718: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
719: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
720: RAISE OKC_API.G_EXCEPTION_ERROR;
721: END IF;
722: --- Validate all non-missing attributes (Item Level Validation)

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

715: '_PVT',
716: x_return_status);
717: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
718: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
719: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
720: RAISE OKC_API.G_EXCEPTION_ERROR;
721: END IF;
722: --- Validate all non-missing attributes (Item Level Validation)
723: l_return_status := Validate_Attributes(l_scrv_rec);

Line 720: RAISE OKC_API.G_EXCEPTION_ERROR;

716: x_return_status);
717: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
718: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
719: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
720: RAISE OKC_API.G_EXCEPTION_ERROR;
721: END IF;
722: --- Validate all non-missing attributes (Item Level Validation)
723: l_return_status := Validate_Attributes(l_scrv_rec);
724: --- If any errors happen abort API

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

721: END IF;
722: --- Validate all non-missing attributes (Item Level Validation)
723: l_return_status := Validate_Attributes(l_scrv_rec);
724: --- If any errors happen abort API
725: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
726: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
727: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
728: RAISE OKC_API.G_EXCEPTION_ERROR;
729: END IF;

Line 726: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

722: --- Validate all non-missing attributes (Item Level Validation)
723: l_return_status := Validate_Attributes(l_scrv_rec);
724: --- If any errors happen abort API
725: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
726: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
727: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
728: RAISE OKC_API.G_EXCEPTION_ERROR;
729: END IF;
730: l_return_status := Validate_Record(l_scrv_rec);

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

723: l_return_status := Validate_Attributes(l_scrv_rec);
724: --- If any errors happen abort API
725: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
726: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
727: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
728: RAISE OKC_API.G_EXCEPTION_ERROR;
729: END IF;
730: l_return_status := Validate_Record(l_scrv_rec);
731: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 728: RAISE OKC_API.G_EXCEPTION_ERROR;

724: --- If any errors happen abort API
725: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
726: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
727: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
728: RAISE OKC_API.G_EXCEPTION_ERROR;
729: END IF;
730: l_return_status := Validate_Record(l_scrv_rec);
731: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
732: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

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

727: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
728: RAISE OKC_API.G_EXCEPTION_ERROR;
729: END IF;
730: l_return_status := Validate_Record(l_scrv_rec);
731: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
732: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
733: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
734: RAISE OKC_API.G_EXCEPTION_ERROR;
735: END IF;

Line 732: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

728: RAISE OKC_API.G_EXCEPTION_ERROR;
729: END IF;
730: l_return_status := Validate_Record(l_scrv_rec);
731: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
732: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
733: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
734: RAISE OKC_API.G_EXCEPTION_ERROR;
735: END IF;
736: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

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

729: END IF;
730: l_return_status := Validate_Record(l_scrv_rec);
731: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
732: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
733: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
734: RAISE OKC_API.G_EXCEPTION_ERROR;
735: END IF;
736: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
737: EXCEPTION

Line 734: RAISE OKC_API.G_EXCEPTION_ERROR;

730: l_return_status := Validate_Record(l_scrv_rec);
731: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
732: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
733: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
734: RAISE OKC_API.G_EXCEPTION_ERROR;
735: END IF;
736: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
737: EXCEPTION
738: WHEN OKC_API.G_EXCEPTION_ERROR THEN

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

732: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
733: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
734: RAISE OKC_API.G_EXCEPTION_ERROR;
735: END IF;
736: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
737: EXCEPTION
738: WHEN OKC_API.G_EXCEPTION_ERROR THEN
739: x_return_status := OKC_API.HANDLE_EXCEPTIONS
740: (

Line 738: WHEN OKC_API.G_EXCEPTION_ERROR THEN

734: RAISE OKC_API.G_EXCEPTION_ERROR;
735: END IF;
736: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
737: EXCEPTION
738: WHEN OKC_API.G_EXCEPTION_ERROR THEN
739: x_return_status := OKC_API.HANDLE_EXCEPTIONS
740: (
741: l_api_name,
742: G_PKG_NAME,

Line 739: x_return_status := OKC_API.HANDLE_EXCEPTIONS

735: END IF;
736: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
737: EXCEPTION
738: WHEN OKC_API.G_EXCEPTION_ERROR THEN
739: x_return_status := OKC_API.HANDLE_EXCEPTIONS
740: (
741: l_api_name,
742: G_PKG_NAME,
743: 'OKC_API.G_RET_STS_ERROR',

Line 743: 'OKC_API.G_RET_STS_ERROR',

739: x_return_status := OKC_API.HANDLE_EXCEPTIONS
740: (
741: l_api_name,
742: G_PKG_NAME,
743: 'OKC_API.G_RET_STS_ERROR',
744: x_msg_count,
745: x_msg_data,
746: '_PVT'
747: );

Line 748: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

744: x_msg_count,
745: x_msg_data,
746: '_PVT'
747: );
748: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
749: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
750: (
751: l_api_name,
752: G_PKG_NAME,

Line 749: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

745: x_msg_data,
746: '_PVT'
747: );
748: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
749: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
750: (
751: l_api_name,
752: G_PKG_NAME,
753: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 753: 'OKC_API.G_RET_STS_UNEXP_ERROR',

749: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
750: (
751: l_api_name,
752: G_PKG_NAME,
753: 'OKC_API.G_RET_STS_UNEXP_ERROR',
754: x_msg_count,
755: x_msg_data,
756: '_PVT'
757: );

Line 759: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

755: x_msg_data,
756: '_PVT'
757: );
758: WHEN OTHERS THEN
759: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
760: (
761: l_api_name,
762: G_PKG_NAME,
763: 'OTHERS',

Line 774: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

770: -- PL/SQL TBL validate_row for:OKS_K_SALES_CREDITS_V_TBL --
771: -----------------------------------------------------------
772: PROCEDURE validate_row(
773: p_api_version IN NUMBER,
774: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
775: x_return_status OUT NOCOPY VARCHAR2,
776: x_msg_count OUT NOCOPY NUMBER,
777: x_msg_data OUT NOCOPY VARCHAR2,
778: p_scrv_tbl IN scrv_tbl_type) IS

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

778: p_scrv_tbl IN scrv_tbl_type) IS
779:
780: l_api_version CONSTANT NUMBER := 1;
781: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
782: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
783: i NUMBER := 0;
784: BEGIN
785: OKC_API.init_msg_list(p_init_msg_list);
786: -- Make sure PL/SQL table has records in it before passing

Line 785: OKC_API.init_msg_list(p_init_msg_list);

781: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
782: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
783: i NUMBER := 0;
784: BEGIN
785: OKC_API.init_msg_list(p_init_msg_list);
786: -- Make sure PL/SQL table has records in it before passing
787: IF (p_scrv_tbl.COUNT > 0) THEN
788: i := p_scrv_tbl.FIRST;
789: LOOP

Line 792: p_init_msg_list => OKC_API.G_FALSE,

788: i := p_scrv_tbl.FIRST;
789: LOOP
790: validate_row (
791: p_api_version => p_api_version,
792: p_init_msg_list => OKC_API.G_FALSE,
793: x_return_status => x_return_status,
794: x_msg_count => x_msg_count,
795: x_msg_data => x_msg_data,
796: p_scrv_rec => p_scrv_tbl(i));

Line 802: WHEN OKC_API.G_EXCEPTION_ERROR THEN

798: i := p_scrv_tbl.NEXT(i);
799: END LOOP;
800: END IF;
801: EXCEPTION
802: WHEN OKC_API.G_EXCEPTION_ERROR THEN
803: x_return_status := OKC_API.HANDLE_EXCEPTIONS
804: (
805: l_api_name,
806: G_PKG_NAME,

Line 803: x_return_status := OKC_API.HANDLE_EXCEPTIONS

799: END LOOP;
800: END IF;
801: EXCEPTION
802: WHEN OKC_API.G_EXCEPTION_ERROR THEN
803: x_return_status := OKC_API.HANDLE_EXCEPTIONS
804: (
805: l_api_name,
806: G_PKG_NAME,
807: 'OKC_API.G_RET_STS_ERROR',

Line 807: 'OKC_API.G_RET_STS_ERROR',

803: x_return_status := OKC_API.HANDLE_EXCEPTIONS
804: (
805: l_api_name,
806: G_PKG_NAME,
807: 'OKC_API.G_RET_STS_ERROR',
808: x_msg_count,
809: x_msg_data,
810: '_PVT'
811: );

Line 812: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

808: x_msg_count,
809: x_msg_data,
810: '_PVT'
811: );
812: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
813: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
814: (
815: l_api_name,
816: G_PKG_NAME,

Line 813: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

809: x_msg_data,
810: '_PVT'
811: );
812: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
813: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
814: (
815: l_api_name,
816: G_PKG_NAME,
817: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 817: 'OKC_API.G_RET_STS_UNEXP_ERROR',

813: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
814: (
815: l_api_name,
816: G_PKG_NAME,
817: 'OKC_API.G_RET_STS_UNEXP_ERROR',
818: x_msg_count,
819: x_msg_data,
820: '_PVT'
821: );

Line 823: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

819: x_msg_data,
820: '_PVT'
821: );
822: WHEN OTHERS THEN
823: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
824: (
825: l_api_name,
826: G_PKG_NAME,
827: 'OTHERS',

Line 841: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

837: ----------------------------------------
838: -- insert_row for:OKS_K_SALES_CREDITS --
839: ----------------------------------------
840: PROCEDURE insert_row(
841: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
842: x_return_status OUT NOCOPY VARCHAR2,
843: x_msg_count OUT NOCOPY NUMBER,
844: x_msg_data OUT NOCOPY VARCHAR2,
845: p_scr_rec IN scr_rec_type,

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

846: x_scr_rec OUT NOCOPY scr_rec_type) IS
847:
848: l_api_version CONSTANT NUMBER := 1;
849: l_api_name CONSTANT VARCHAR2(30) := 'CREDITS_insert_row';
850: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
851: l_scr_rec scr_rec_type := p_scr_rec;
852: l_def_scr_rec scr_rec_type;
853: --------------------------------------------
854: -- Set_Attributes for:OKS_K_SALES_CREDITS --

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

856: FUNCTION Set_Attributes (
857: p_scr_rec IN scr_rec_type,
858: x_scr_rec OUT NOCOPY scr_rec_type
859: ) RETURN VARCHAR2 IS
860: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
861: BEGIN
862: x_scr_rec := p_scr_rec;
863: RETURN(l_return_status);
864: END Set_Attributes;

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

862: x_scr_rec := p_scr_rec;
863: RETURN(l_return_status);
864: END Set_Attributes;
865: BEGIN
866: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
867: p_init_msg_list,
868: '_PVT',
869: x_return_status);
870: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

866: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
867: p_init_msg_list,
868: '_PVT',
869: x_return_status);
870: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
871: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
872: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
873: RAISE OKC_API.G_EXCEPTION_ERROR;
874: END IF;

Line 871: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

867: p_init_msg_list,
868: '_PVT',
869: x_return_status);
870: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
871: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
872: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
873: RAISE OKC_API.G_EXCEPTION_ERROR;
874: END IF;
875: --- Setting item attributes

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

868: '_PVT',
869: x_return_status);
870: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
871: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
872: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
873: RAISE OKC_API.G_EXCEPTION_ERROR;
874: END IF;
875: --- Setting item attributes
876: l_return_status := Set_Attributes(

Line 873: RAISE OKC_API.G_EXCEPTION_ERROR;

869: x_return_status);
870: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
871: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
872: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
873: RAISE OKC_API.G_EXCEPTION_ERROR;
874: END IF;
875: --- Setting item attributes
876: l_return_status := Set_Attributes(
877: p_scr_rec, -- IN

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

876: l_return_status := Set_Attributes(
877: p_scr_rec, -- IN
878: l_scr_rec); -- OUT
879: --- If any errors happen abort API
880: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
881: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
882: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
883: RAISE OKC_API.G_EXCEPTION_ERROR;
884: END IF;

Line 881: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

877: p_scr_rec, -- IN
878: l_scr_rec); -- OUT
879: --- If any errors happen abort API
880: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
881: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
882: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
883: RAISE OKC_API.G_EXCEPTION_ERROR;
884: END IF;
885:

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

878: l_scr_rec); -- OUT
879: --- If any errors happen abort API
880: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
881: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
882: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
883: RAISE OKC_API.G_EXCEPTION_ERROR;
884: END IF;
885:
886: -- l_scr_rec.id := get_seq_id;

Line 883: RAISE OKC_API.G_EXCEPTION_ERROR;

879: --- If any errors happen abort API
880: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
881: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
882: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
883: RAISE OKC_API.G_EXCEPTION_ERROR;
884: END IF;
885:
886: -- l_scr_rec.id := get_seq_id;
887:

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

917: l_scr_rec.last_update_date);
918: -- ,l_scr_rec.security_group_id);
919: -- Set OUT values
920: x_scr_rec := l_scr_rec;
921: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
922: EXCEPTION
923: WHEN OKC_API.G_EXCEPTION_ERROR THEN
924: x_return_status := OKC_API.HANDLE_EXCEPTIONS
925: (

Line 923: WHEN OKC_API.G_EXCEPTION_ERROR THEN

919: -- Set OUT values
920: x_scr_rec := l_scr_rec;
921: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
922: EXCEPTION
923: WHEN OKC_API.G_EXCEPTION_ERROR THEN
924: x_return_status := OKC_API.HANDLE_EXCEPTIONS
925: (
926: l_api_name,
927: G_PKG_NAME,

Line 924: x_return_status := OKC_API.HANDLE_EXCEPTIONS

920: x_scr_rec := l_scr_rec;
921: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
922: EXCEPTION
923: WHEN OKC_API.G_EXCEPTION_ERROR THEN
924: x_return_status := OKC_API.HANDLE_EXCEPTIONS
925: (
926: l_api_name,
927: G_PKG_NAME,
928: 'OKC_API.G_RET_STS_ERROR',

Line 928: 'OKC_API.G_RET_STS_ERROR',

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

Line 933: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

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

Line 934: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

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

Line 938: 'OKC_API.G_RET_STS_UNEXP_ERROR',

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

Line 944: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

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

Line 959: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

955: -- insert_row for:OKS_K_SALES_CREDITS_V --
956: ------------------------------------------
957: PROCEDURE insert_row(
958: p_api_version IN NUMBER,
959: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
960: x_return_status OUT NOCOPY VARCHAR2,
961: x_msg_count OUT NOCOPY NUMBER,
962: x_msg_data OUT NOCOPY VARCHAR2,
963: p_scrv_rec IN scrv_rec_type,

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

964: x_scrv_rec OUT NOCOPY scrv_rec_type) IS
965:
966: l_api_version CONSTANT NUMBER := 1;
967: l_api_name CONSTANT VARCHAR2(30) := 'V_insert_row';
968: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
969: l_scrv_rec scrv_rec_type;
970: ldefoksksalescreditsvrec scrv_rec_type;
971: l_scr_rec scr_rec_type;
972: lx_scr_rec scr_rec_type;

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

990: FUNCTION Set_Attributes (
991: p_scrv_rec IN scrv_rec_type,
992: x_scrv_rec OUT NOCOPY scrv_rec_type
993: ) RETURN VARCHAR2 IS
994: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
995: BEGIN
996: x_scrv_rec := p_scrv_rec;
997: x_scrv_rec.OBJECT_VERSION_NUMBER := 1;
998: RETURN(l_return_status);

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

997: x_scrv_rec.OBJECT_VERSION_NUMBER := 1;
998: RETURN(l_return_status);
999: END Set_Attributes;
1000: BEGIN
1001: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1002: G_PKG_NAME,
1003: p_init_msg_list,
1004: l_api_version,
1005: p_api_version,

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

1004: l_api_version,
1005: p_api_version,
1006: '_PVT',
1007: x_return_status);
1008: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1009: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1010: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1011: RAISE OKC_API.G_EXCEPTION_ERROR;
1012: END IF;

Line 1009: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1005: p_api_version,
1006: '_PVT',
1007: x_return_status);
1008: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1009: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1010: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1011: RAISE OKC_API.G_EXCEPTION_ERROR;
1012: END IF;
1013: l_scrv_rec := null_out_defaults(p_scrv_rec);

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

1006: '_PVT',
1007: x_return_status);
1008: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1009: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1010: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1011: RAISE OKC_API.G_EXCEPTION_ERROR;
1012: END IF;
1013: l_scrv_rec := null_out_defaults(p_scrv_rec);
1014: --- Setting item attributes

Line 1011: RAISE OKC_API.G_EXCEPTION_ERROR;

1007: x_return_status);
1008: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1009: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1010: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1011: RAISE OKC_API.G_EXCEPTION_ERROR;
1012: END IF;
1013: l_scrv_rec := null_out_defaults(p_scrv_rec);
1014: --- Setting item attributes
1015: l_return_status := Set_Attributes(

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

1015: l_return_status := Set_Attributes(
1016: l_scrv_rec, -- IN
1017: ldefoksksalescreditsvrec); -- OUT
1018: --- If any errors happen abort API
1019: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1020: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1021: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1022: RAISE OKC_API.G_EXCEPTION_ERROR;
1023: END IF;

Line 1020: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1016: l_scrv_rec, -- IN
1017: ldefoksksalescreditsvrec); -- OUT
1018: --- If any errors happen abort API
1019: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1020: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1021: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1022: RAISE OKC_API.G_EXCEPTION_ERROR;
1023: END IF;
1024: ldefoksksalescreditsvrec := fill_who_columns(ldefoksksalescreditsvrec);

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

1017: ldefoksksalescreditsvrec); -- OUT
1018: --- If any errors happen abort API
1019: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1020: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1021: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1022: RAISE OKC_API.G_EXCEPTION_ERROR;
1023: END IF;
1024: ldefoksksalescreditsvrec := fill_who_columns(ldefoksksalescreditsvrec);
1025: ldefoksksalescreditsvrec.id := get_seq_id ;

Line 1022: RAISE OKC_API.G_EXCEPTION_ERROR;

1018: --- If any errors happen abort API
1019: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1020: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1021: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1022: RAISE OKC_API.G_EXCEPTION_ERROR;
1023: END IF;
1024: ldefoksksalescreditsvrec := fill_who_columns(ldefoksksalescreditsvrec);
1025: ldefoksksalescreditsvrec.id := get_seq_id ;
1026:

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

1027:
1028: --- Validate all non-missing attributes (Item Level Validation)
1029: l_return_status := Validate_Attributes(ldefoksksalescreditsvrec);
1030: --- If any errors happen abort API
1031: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1032: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1033: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1034: RAISE OKC_API.G_EXCEPTION_ERROR;
1035: END IF;

Line 1032: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1028: --- Validate all non-missing attributes (Item Level Validation)
1029: l_return_status := Validate_Attributes(ldefoksksalescreditsvrec);
1030: --- If any errors happen abort API
1031: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1032: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1033: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1034: RAISE OKC_API.G_EXCEPTION_ERROR;
1035: END IF;
1036: l_return_status := Validate_Record(ldefoksksalescreditsvrec);

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

1029: l_return_status := Validate_Attributes(ldefoksksalescreditsvrec);
1030: --- If any errors happen abort API
1031: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1032: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1033: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1034: RAISE OKC_API.G_EXCEPTION_ERROR;
1035: END IF;
1036: l_return_status := Validate_Record(ldefoksksalescreditsvrec);
1037: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1034: RAISE OKC_API.G_EXCEPTION_ERROR;

1030: --- If any errors happen abort API
1031: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1032: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1033: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1034: RAISE OKC_API.G_EXCEPTION_ERROR;
1035: END IF;
1036: l_return_status := Validate_Record(ldefoksksalescreditsvrec);
1037: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1038: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

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

1033: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1034: RAISE OKC_API.G_EXCEPTION_ERROR;
1035: END IF;
1036: l_return_status := Validate_Record(ldefoksksalescreditsvrec);
1037: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1038: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1039: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1040: RAISE OKC_API.G_EXCEPTION_ERROR;
1041: END IF;

Line 1038: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1034: RAISE OKC_API.G_EXCEPTION_ERROR;
1035: END IF;
1036: l_return_status := Validate_Record(ldefoksksalescreditsvrec);
1037: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1038: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1039: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1040: RAISE OKC_API.G_EXCEPTION_ERROR;
1041: END IF;
1042: --------------------------------------

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

1035: END IF;
1036: l_return_status := Validate_Record(ldefoksksalescreditsvrec);
1037: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1038: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1039: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1040: RAISE OKC_API.G_EXCEPTION_ERROR;
1041: END IF;
1042: --------------------------------------
1043: -- Move VIEW record to "Child" records

Line 1040: RAISE OKC_API.G_EXCEPTION_ERROR;

1036: l_return_status := Validate_Record(ldefoksksalescreditsvrec);
1037: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1038: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1039: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1040: RAISE OKC_API.G_EXCEPTION_ERROR;
1041: END IF;
1042: --------------------------------------
1043: -- Move VIEW record to "Child" records
1044: --------------------------------------

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

1053: x_msg_data,
1054: l_scr_rec,
1055: lx_scr_rec
1056: );
1057: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1058: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1059: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1060: RAISE OKC_API.G_EXCEPTION_ERROR;
1061: END IF;

Line 1058: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1054: l_scr_rec,
1055: lx_scr_rec
1056: );
1057: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1058: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1059: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1060: RAISE OKC_API.G_EXCEPTION_ERROR;
1061: END IF;
1062: migrate(lx_scr_rec, ldefoksksalescreditsvrec);

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

1055: lx_scr_rec
1056: );
1057: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1058: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1059: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1060: RAISE OKC_API.G_EXCEPTION_ERROR;
1061: END IF;
1062: migrate(lx_scr_rec, ldefoksksalescreditsvrec);
1063: -- Set OUT values

Line 1060: RAISE OKC_API.G_EXCEPTION_ERROR;

1056: );
1057: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1058: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1059: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1060: RAISE OKC_API.G_EXCEPTION_ERROR;
1061: END IF;
1062: migrate(lx_scr_rec, ldefoksksalescreditsvrec);
1063: -- Set OUT values
1064: x_scrv_rec := ldefoksksalescreditsvrec;

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

1061: END IF;
1062: migrate(lx_scr_rec, ldefoksksalescreditsvrec);
1063: -- Set OUT values
1064: x_scrv_rec := ldefoksksalescreditsvrec;
1065: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1066: EXCEPTION
1067: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1068: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1069: (

Line 1067: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1063: -- Set OUT values
1064: x_scrv_rec := ldefoksksalescreditsvrec;
1065: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1066: EXCEPTION
1067: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1068: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1069: (
1070: l_api_name,
1071: G_PKG_NAME,

Line 1068: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1064: x_scrv_rec := ldefoksksalescreditsvrec;
1065: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1066: EXCEPTION
1067: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1068: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1069: (
1070: l_api_name,
1071: G_PKG_NAME,
1072: 'OKC_API.G_RET_STS_ERROR',

Line 1072: 'OKC_API.G_RET_STS_ERROR',

1068: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1069: (
1070: l_api_name,
1071: G_PKG_NAME,
1072: 'OKC_API.G_RET_STS_ERROR',
1073: x_msg_count,
1074: x_msg_data,
1075: '_PVT'
1076: );

Line 1077: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1073: x_msg_count,
1074: x_msg_data,
1075: '_PVT'
1076: );
1077: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1078: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1079: (
1080: l_api_name,
1081: G_PKG_NAME,

Line 1078: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1074: x_msg_data,
1075: '_PVT'
1076: );
1077: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1078: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1079: (
1080: l_api_name,
1081: G_PKG_NAME,
1082: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1082: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1078: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1079: (
1080: l_api_name,
1081: G_PKG_NAME,
1082: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1083: x_msg_count,
1084: x_msg_data,
1085: '_PVT'
1086: );

Line 1088: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1084: x_msg_data,
1085: '_PVT'
1086: );
1087: WHEN OTHERS THEN
1088: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1089: (
1090: l_api_name,
1091: G_PKG_NAME,
1092: 'OTHERS',

Line 1103: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1099: -- PL/SQL TBL insert_row for:OKS_K_SALES_CREDITS_V_TBL --
1100: ---------------------------------------------------------
1101: PROCEDURE insert_row(
1102: p_api_version IN NUMBER,
1103: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1104: x_return_status OUT NOCOPY VARCHAR2,
1105: x_msg_count OUT NOCOPY NUMBER,
1106: x_msg_data OUT NOCOPY VARCHAR2,
1107: p_scrv_tbl IN scrv_tbl_type,

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

1108: x_scrv_tbl OUT NOCOPY scrv_tbl_type) IS
1109:
1110: l_api_version CONSTANT NUMBER := 1;
1111: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
1112: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1113: i NUMBER := 0;
1114: BEGIN
1115: OKC_API.init_msg_list(p_init_msg_list);
1116: -- Make sure PL/SQL table has records in it before passing

Line 1115: OKC_API.init_msg_list(p_init_msg_list);

1111: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
1112: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1113: i NUMBER := 0;
1114: BEGIN
1115: OKC_API.init_msg_list(p_init_msg_list);
1116: -- Make sure PL/SQL table has records in it before passing
1117: IF (p_scrv_tbl.COUNT > 0) THEN
1118: i := p_scrv_tbl.FIRST;
1119: LOOP

Line 1122: p_init_msg_list => OKC_API.G_FALSE,

1118: i := p_scrv_tbl.FIRST;
1119: LOOP
1120: insert_row (
1121: p_api_version => p_api_version,
1122: p_init_msg_list => OKC_API.G_FALSE,
1123: x_return_status => x_return_status,
1124: x_msg_count => x_msg_count,
1125: x_msg_data => x_msg_data,
1126: p_scrv_rec => p_scrv_tbl(i),

Line 1133: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1129: i := p_scrv_tbl.NEXT(i);
1130: END LOOP;
1131: END IF;
1132: EXCEPTION
1133: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1134: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1135: (
1136: l_api_name,
1137: G_PKG_NAME,

Line 1134: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1130: END LOOP;
1131: END IF;
1132: EXCEPTION
1133: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1134: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1135: (
1136: l_api_name,
1137: G_PKG_NAME,
1138: 'OKC_API.G_RET_STS_ERROR',

Line 1138: 'OKC_API.G_RET_STS_ERROR',

1134: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1135: (
1136: l_api_name,
1137: G_PKG_NAME,
1138: 'OKC_API.G_RET_STS_ERROR',
1139: x_msg_count,
1140: x_msg_data,
1141: '_PVT'
1142: );

Line 1143: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1139: x_msg_count,
1140: x_msg_data,
1141: '_PVT'
1142: );
1143: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1144: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1145: (
1146: l_api_name,
1147: G_PKG_NAME,

Line 1144: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1140: x_msg_data,
1141: '_PVT'
1142: );
1143: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1144: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1145: (
1146: l_api_name,
1147: G_PKG_NAME,
1148: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1148: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1144: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1145: (
1146: l_api_name,
1147: G_PKG_NAME,
1148: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1149: x_msg_count,
1150: x_msg_data,
1151: '_PVT'
1152: );

Line 1154: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1150: x_msg_data,
1151: '_PVT'
1152: );
1153: WHEN OTHERS THEN
1154: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1155: (
1156: l_api_name,
1157: G_PKG_NAME,
1158: 'OTHERS',

Line 1172: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1168: --------------------------------------
1169: -- lock_row for:OKS_K_SALES_CREDITS --
1170: --------------------------------------
1171: PROCEDURE lock_row(
1172: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1173: x_return_status OUT NOCOPY VARCHAR2,
1174: x_msg_count OUT NOCOPY NUMBER,
1175: x_msg_data OUT NOCOPY VARCHAR2,
1176: p_scr_rec IN scr_rec_type) IS

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

1189: FROM OKS_K_SALES_CREDITS
1190: WHERE ID = p_scr_rec.id;
1191: l_api_version CONSTANT NUMBER := 1;
1192: l_api_name CONSTANT VARCHAR2(30) := 'CREDITS_lock_row';
1193: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1194: l_object_version_number OKS_K_SALES_CREDITS.OBJECT_VERSION_NUMBER%TYPE;
1195: lc_object_version_number OKS_K_SALES_CREDITS.OBJECT_VERSION_NUMBER%TYPE;
1196: l_row_notfound BOOLEAN := FALSE;
1197: lc_row_notfound BOOLEAN := FALSE;

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

1195: lc_object_version_number OKS_K_SALES_CREDITS.OBJECT_VERSION_NUMBER%TYPE;
1196: l_row_notfound BOOLEAN := FALSE;
1197: lc_row_notfound BOOLEAN := FALSE;
1198: BEGIN
1199: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1200: p_init_msg_list,
1201: '_PVT',
1202: x_return_status);
1203: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

1199: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1200: p_init_msg_list,
1201: '_PVT',
1202: x_return_status);
1203: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1204: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1205: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1206: RAISE OKC_API.G_EXCEPTION_ERROR;
1207: END IF;

Line 1204: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1200: p_init_msg_list,
1201: '_PVT',
1202: x_return_status);
1203: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1204: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1205: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1206: RAISE OKC_API.G_EXCEPTION_ERROR;
1207: END IF;
1208: BEGIN

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

1201: '_PVT',
1202: x_return_status);
1203: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1204: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1205: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1206: RAISE OKC_API.G_EXCEPTION_ERROR;
1207: END IF;
1208: BEGIN
1209: OPEN lock_csr(p_scr_rec);

Line 1206: RAISE OKC_API.G_EXCEPTION_ERROR;

1202: x_return_status);
1203: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1204: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1205: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1206: RAISE OKC_API.G_EXCEPTION_ERROR;
1207: END IF;
1208: BEGIN
1209: OPEN lock_csr(p_scr_rec);
1210: FETCH lock_csr INTO l_object_version_number;

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

1214: WHEN E_Resource_Busy THEN
1215: IF (lock_csr%ISOPEN) THEN
1216: CLOSE lock_csr;
1217: END IF;
1218: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);
1219: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
1220: END;
1221:
1222: IF ( l_row_notfound ) THEN

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

1225: lc_row_notfound := lchk_csr%NOTFOUND;
1226: CLOSE lchk_csr;
1227: END IF;
1228: IF (lc_row_notfound) THEN
1229: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1230: RAISE OKC_API.G_EXCEPTION_ERROR;
1231: ELSIF lc_object_version_number > p_scr_rec.object_version_number THEN
1232: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1233: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1230: RAISE OKC_API.G_EXCEPTION_ERROR;

1226: CLOSE lchk_csr;
1227: END IF;
1228: IF (lc_row_notfound) THEN
1229: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1230: RAISE OKC_API.G_EXCEPTION_ERROR;
1231: ELSIF lc_object_version_number > p_scr_rec.object_version_number THEN
1232: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1233: RAISE OKC_API.G_EXCEPTION_ERROR;
1234: ELSIF lc_object_version_number <> p_scr_rec.object_version_number THEN

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

1228: IF (lc_row_notfound) THEN
1229: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1230: RAISE OKC_API.G_EXCEPTION_ERROR;
1231: ELSIF lc_object_version_number > p_scr_rec.object_version_number THEN
1232: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1233: RAISE OKC_API.G_EXCEPTION_ERROR;
1234: ELSIF lc_object_version_number <> p_scr_rec.object_version_number THEN
1235: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1236: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1233: RAISE OKC_API.G_EXCEPTION_ERROR;

1229: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1230: RAISE OKC_API.G_EXCEPTION_ERROR;
1231: ELSIF lc_object_version_number > p_scr_rec.object_version_number THEN
1232: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1233: RAISE OKC_API.G_EXCEPTION_ERROR;
1234: ELSIF lc_object_version_number <> p_scr_rec.object_version_number THEN
1235: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1236: RAISE OKC_API.G_EXCEPTION_ERROR;
1237: ELSIF lc_object_version_number = -1 THEN

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

1231: ELSIF lc_object_version_number > p_scr_rec.object_version_number THEN
1232: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1233: RAISE OKC_API.G_EXCEPTION_ERROR;
1234: ELSIF lc_object_version_number <> p_scr_rec.object_version_number THEN
1235: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1236: RAISE OKC_API.G_EXCEPTION_ERROR;
1237: ELSIF lc_object_version_number = -1 THEN
1238: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1239: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1236: RAISE OKC_API.G_EXCEPTION_ERROR;

1232: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1233: RAISE OKC_API.G_EXCEPTION_ERROR;
1234: ELSIF lc_object_version_number <> p_scr_rec.object_version_number THEN
1235: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1236: RAISE OKC_API.G_EXCEPTION_ERROR;
1237: ELSIF lc_object_version_number = -1 THEN
1238: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1239: RAISE OKC_API.G_EXCEPTION_ERROR;
1240: END IF;

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

1234: ELSIF lc_object_version_number <> p_scr_rec.object_version_number THEN
1235: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1236: RAISE OKC_API.G_EXCEPTION_ERROR;
1237: ELSIF lc_object_version_number = -1 THEN
1238: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1239: RAISE OKC_API.G_EXCEPTION_ERROR;
1240: END IF;
1241: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1242: EXCEPTION

Line 1239: RAISE OKC_API.G_EXCEPTION_ERROR;

1235: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1236: RAISE OKC_API.G_EXCEPTION_ERROR;
1237: ELSIF lc_object_version_number = -1 THEN
1238: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1239: RAISE OKC_API.G_EXCEPTION_ERROR;
1240: END IF;
1241: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1242: EXCEPTION
1243: WHEN OKC_API.G_EXCEPTION_ERROR THEN

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

1237: ELSIF lc_object_version_number = -1 THEN
1238: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1239: RAISE OKC_API.G_EXCEPTION_ERROR;
1240: END IF;
1241: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1242: EXCEPTION
1243: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1244: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1245: (

Line 1243: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1239: RAISE OKC_API.G_EXCEPTION_ERROR;
1240: END IF;
1241: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1242: EXCEPTION
1243: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1244: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1245: (
1246: l_api_name,
1247: G_PKG_NAME,

Line 1244: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1240: END IF;
1241: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1242: EXCEPTION
1243: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1244: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1245: (
1246: l_api_name,
1247: G_PKG_NAME,
1248: 'OKC_API.G_RET_STS_ERROR',

Line 1248: 'OKC_API.G_RET_STS_ERROR',

1244: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1245: (
1246: l_api_name,
1247: G_PKG_NAME,
1248: 'OKC_API.G_RET_STS_ERROR',
1249: x_msg_count,
1250: x_msg_data,
1251: '_PVT'
1252: );

Line 1253: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1249: x_msg_count,
1250: x_msg_data,
1251: '_PVT'
1252: );
1253: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1254: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1255: (
1256: l_api_name,
1257: G_PKG_NAME,

Line 1254: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1250: x_msg_data,
1251: '_PVT'
1252: );
1253: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1254: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1255: (
1256: l_api_name,
1257: G_PKG_NAME,
1258: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1258: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1254: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1255: (
1256: l_api_name,
1257: G_PKG_NAME,
1258: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1259: x_msg_count,
1260: x_msg_data,
1261: '_PVT'
1262: );

Line 1264: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

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

Line 1279: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1275: -- lock_row for:OKS_K_SALES_CREDITS_V --
1276: ----------------------------------------
1277: PROCEDURE lock_row(
1278: p_api_version IN NUMBER,
1279: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1280: x_return_status OUT NOCOPY VARCHAR2,
1281: x_msg_count OUT NOCOPY NUMBER,
1282: x_msg_data OUT NOCOPY VARCHAR2,
1283: p_scrv_rec IN scrv_rec_type) IS

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

1283: p_scrv_rec IN scrv_rec_type) IS
1284:
1285: l_api_version CONSTANT NUMBER := 1;
1286: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1287: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1288: l_scr_rec scr_rec_type;
1289: BEGIN
1290: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1291: G_PKG_NAME,

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

1286: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1287: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1288: l_scr_rec scr_rec_type;
1289: BEGIN
1290: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1291: G_PKG_NAME,
1292: p_init_msg_list,
1293: l_api_version,
1294: p_api_version,

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

1293: l_api_version,
1294: p_api_version,
1295: '_PVT',
1296: x_return_status);
1297: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1298: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1299: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1300: RAISE OKC_API.G_EXCEPTION_ERROR;
1301: END IF;

Line 1298: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1294: p_api_version,
1295: '_PVT',
1296: x_return_status);
1297: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1298: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1299: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1300: RAISE OKC_API.G_EXCEPTION_ERROR;
1301: END IF;
1302: --------------------------------------

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

1295: '_PVT',
1296: x_return_status);
1297: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1298: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1299: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1300: RAISE OKC_API.G_EXCEPTION_ERROR;
1301: END IF;
1302: --------------------------------------
1303: -- Move VIEW record to "Child" records

Line 1300: RAISE OKC_API.G_EXCEPTION_ERROR;

1296: x_return_status);
1297: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1298: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1299: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1300: RAISE OKC_API.G_EXCEPTION_ERROR;
1301: END IF;
1302: --------------------------------------
1303: -- Move VIEW record to "Child" records
1304: --------------------------------------

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

1312: x_msg_count,
1313: x_msg_data,
1314: l_scr_rec
1315: );
1316: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1317: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1318: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1319: RAISE OKC_API.G_EXCEPTION_ERROR;
1320: END IF;

Line 1317: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1313: x_msg_data,
1314: l_scr_rec
1315: );
1316: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1317: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1318: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1319: RAISE OKC_API.G_EXCEPTION_ERROR;
1320: END IF;
1321: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

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

1314: l_scr_rec
1315: );
1316: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1317: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1318: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1319: RAISE OKC_API.G_EXCEPTION_ERROR;
1320: END IF;
1321: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1322: EXCEPTION

Line 1319: RAISE OKC_API.G_EXCEPTION_ERROR;

1315: );
1316: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1317: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1318: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1319: RAISE OKC_API.G_EXCEPTION_ERROR;
1320: END IF;
1321: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1322: EXCEPTION
1323: WHEN OKC_API.G_EXCEPTION_ERROR THEN

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

1317: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1318: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1319: RAISE OKC_API.G_EXCEPTION_ERROR;
1320: END IF;
1321: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1322: EXCEPTION
1323: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1324: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1325: (

Line 1323: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1319: RAISE OKC_API.G_EXCEPTION_ERROR;
1320: END IF;
1321: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1322: EXCEPTION
1323: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1324: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1325: (
1326: l_api_name,
1327: G_PKG_NAME,

Line 1324: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1320: END IF;
1321: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1322: EXCEPTION
1323: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1324: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1325: (
1326: l_api_name,
1327: G_PKG_NAME,
1328: 'OKC_API.G_RET_STS_ERROR',

Line 1328: 'OKC_API.G_RET_STS_ERROR',

1324: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1325: (
1326: l_api_name,
1327: G_PKG_NAME,
1328: 'OKC_API.G_RET_STS_ERROR',
1329: x_msg_count,
1330: x_msg_data,
1331: '_PVT'
1332: );

Line 1333: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1329: x_msg_count,
1330: x_msg_data,
1331: '_PVT'
1332: );
1333: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1334: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1335: (
1336: l_api_name,
1337: G_PKG_NAME,

Line 1334: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1330: x_msg_data,
1331: '_PVT'
1332: );
1333: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1334: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1335: (
1336: l_api_name,
1337: G_PKG_NAME,
1338: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1338: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1334: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1335: (
1336: l_api_name,
1337: G_PKG_NAME,
1338: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1339: x_msg_count,
1340: x_msg_data,
1341: '_PVT'
1342: );

Line 1344: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1340: x_msg_data,
1341: '_PVT'
1342: );
1343: WHEN OTHERS THEN
1344: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1345: (
1346: l_api_name,
1347: G_PKG_NAME,
1348: 'OTHERS',

Line 1359: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1355: -- PL/SQL TBL lock_row for:OKS_K_SALES_CREDITS_V_TBL --
1356: -------------------------------------------------------
1357: PROCEDURE lock_row(
1358: p_api_version IN NUMBER,
1359: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1360: x_return_status OUT NOCOPY VARCHAR2,
1361: x_msg_count OUT NOCOPY NUMBER,
1362: x_msg_data OUT NOCOPY VARCHAR2,
1363: p_scrv_tbl IN scrv_tbl_type) IS

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

1363: p_scrv_tbl IN scrv_tbl_type) IS
1364:
1365: l_api_version CONSTANT NUMBER := 1;
1366: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
1367: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1368: i NUMBER := 0;
1369: BEGIN
1370: OKC_API.init_msg_list(p_init_msg_list);
1371: -- Make sure PL/SQL table has records in it before passing

Line 1370: OKC_API.init_msg_list(p_init_msg_list);

1366: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
1367: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1368: i NUMBER := 0;
1369: BEGIN
1370: OKC_API.init_msg_list(p_init_msg_list);
1371: -- Make sure PL/SQL table has records in it before passing
1372: IF (p_scrv_tbl.COUNT > 0) THEN
1373: i := p_scrv_tbl.FIRST;
1374: LOOP

Line 1377: p_init_msg_list => OKC_API.G_FALSE,

1373: i := p_scrv_tbl.FIRST;
1374: LOOP
1375: lock_row (
1376: p_api_version => p_api_version,
1377: p_init_msg_list => OKC_API.G_FALSE,
1378: x_return_status => x_return_status,
1379: x_msg_count => x_msg_count,
1380: x_msg_data => x_msg_data,
1381: p_scrv_rec => p_scrv_tbl(i));

Line 1387: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1383: i := p_scrv_tbl.NEXT(i);
1384: END LOOP;
1385: END IF;
1386: EXCEPTION
1387: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1388: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1389: (
1390: l_api_name,
1391: G_PKG_NAME,

Line 1388: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1384: END LOOP;
1385: END IF;
1386: EXCEPTION
1387: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1388: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1389: (
1390: l_api_name,
1391: G_PKG_NAME,
1392: 'OKC_API.G_RET_STS_ERROR',

Line 1392: 'OKC_API.G_RET_STS_ERROR',

1388: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1389: (
1390: l_api_name,
1391: G_PKG_NAME,
1392: 'OKC_API.G_RET_STS_ERROR',
1393: x_msg_count,
1394: x_msg_data,
1395: '_PVT'
1396: );

Line 1397: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1393: x_msg_count,
1394: x_msg_data,
1395: '_PVT'
1396: );
1397: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1398: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1399: (
1400: l_api_name,
1401: G_PKG_NAME,

Line 1398: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1394: x_msg_data,
1395: '_PVT'
1396: );
1397: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1398: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1399: (
1400: l_api_name,
1401: G_PKG_NAME,
1402: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1402: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1398: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1399: (
1400: l_api_name,
1401: G_PKG_NAME,
1402: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1403: x_msg_count,
1404: x_msg_data,
1405: '_PVT'
1406: );

Line 1408: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1404: x_msg_data,
1405: '_PVT'
1406: );
1407: WHEN OTHERS THEN
1408: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1409: (
1410: l_api_name,
1411: G_PKG_NAME,
1412: 'OTHERS',

Line 1426: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1422: ----------------------------------------
1423: -- update_row for:OKS_K_SALES_CREDITS --
1424: ----------------------------------------
1425: PROCEDURE update_row(
1426: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1427: x_return_status OUT NOCOPY VARCHAR2,
1428: x_msg_count OUT NOCOPY NUMBER,
1429: x_msg_data OUT NOCOPY VARCHAR2,
1430: p_scr_rec IN scr_rec_type,

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

1431: x_scr_rec OUT NOCOPY scr_rec_type) IS
1432:
1433: l_api_version CONSTANT NUMBER := 1;
1434: l_api_name CONSTANT VARCHAR2(30) := 'CREDITS_update_row';
1435: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1436: l_scr_rec scr_rec_type := p_scr_rec;
1437: l_def_scr_rec scr_rec_type;
1438: l_row_notfound BOOLEAN := TRUE;
1439: ----------------------------------

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

1444: x_scr_rec OUT NOCOPY scr_rec_type
1445: ) RETURN VARCHAR2 IS
1446: l_scr_rec scr_rec_type;
1447: l_row_notfound BOOLEAN := TRUE;
1448: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1449: BEGIN
1450: x_scr_rec := p_scr_rec;
1451: -- Get current database values
1452: l_scr_rec := get_rec(p_scr_rec, l_row_notfound);

Line 1454: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1450: x_scr_rec := p_scr_rec;
1451: -- Get current database values
1452: l_scr_rec := get_rec(p_scr_rec, l_row_notfound);
1453: IF (l_row_notfound) THEN
1454: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1455: END IF;
1456: IF (x_scr_rec.id = OKC_API.G_MISS_NUM)
1457: THEN
1458: x_scr_rec.id := l_scr_rec.id;

Line 1456: IF (x_scr_rec.id = OKC_API.G_MISS_NUM)

1452: l_scr_rec := get_rec(p_scr_rec, l_row_notfound);
1453: IF (l_row_notfound) THEN
1454: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1455: END IF;
1456: IF (x_scr_rec.id = OKC_API.G_MISS_NUM)
1457: THEN
1458: x_scr_rec.id := l_scr_rec.id;
1459: END IF;
1460: IF (x_scr_rec.percent = OKC_API.G_MISS_NUM)

Line 1460: IF (x_scr_rec.percent = OKC_API.G_MISS_NUM)

1456: IF (x_scr_rec.id = OKC_API.G_MISS_NUM)
1457: THEN
1458: x_scr_rec.id := l_scr_rec.id;
1459: END IF;
1460: IF (x_scr_rec.percent = OKC_API.G_MISS_NUM)
1461: THEN
1462: x_scr_rec.percent := l_scr_rec.percent;
1463: END IF;
1464: IF (x_scr_rec.sales_group_id = OKC_API.G_MISS_NUM)

Line 1464: IF (x_scr_rec.sales_group_id = OKC_API.G_MISS_NUM)

1460: IF (x_scr_rec.percent = OKC_API.G_MISS_NUM)
1461: THEN
1462: x_scr_rec.percent := l_scr_rec.percent;
1463: END IF;
1464: IF (x_scr_rec.sales_group_id = OKC_API.G_MISS_NUM)
1465: THEN
1466: x_scr_rec.sales_group_id := l_scr_rec.sales_group_id;
1467: END IF;
1468: IF (x_scr_rec.chr_id = OKC_API.G_MISS_NUM)

Line 1468: IF (x_scr_rec.chr_id = OKC_API.G_MISS_NUM)

1464: IF (x_scr_rec.sales_group_id = OKC_API.G_MISS_NUM)
1465: THEN
1466: x_scr_rec.sales_group_id := l_scr_rec.sales_group_id;
1467: END IF;
1468: IF (x_scr_rec.chr_id = OKC_API.G_MISS_NUM)
1469: THEN
1470: x_scr_rec.chr_id := l_scr_rec.chr_id;
1471: END IF;
1472: IF (x_scr_rec.cle_id = OKC_API.G_MISS_NUM)

Line 1472: IF (x_scr_rec.cle_id = OKC_API.G_MISS_NUM)

1468: IF (x_scr_rec.chr_id = OKC_API.G_MISS_NUM)
1469: THEN
1470: x_scr_rec.chr_id := l_scr_rec.chr_id;
1471: END IF;
1472: IF (x_scr_rec.cle_id = OKC_API.G_MISS_NUM)
1473: THEN
1474: x_scr_rec.cle_id := l_scr_rec.cle_id;
1475: END IF;
1476: IF (x_scr_rec.ctc_id = OKC_API.G_MISS_NUM)

Line 1476: IF (x_scr_rec.ctc_id = OKC_API.G_MISS_NUM)

1472: IF (x_scr_rec.cle_id = OKC_API.G_MISS_NUM)
1473: THEN
1474: x_scr_rec.cle_id := l_scr_rec.cle_id;
1475: END IF;
1476: IF (x_scr_rec.ctc_id = OKC_API.G_MISS_NUM)
1477: THEN
1478: x_scr_rec.ctc_id := l_scr_rec.ctc_id;
1479: END IF;
1480: IF (x_scr_rec.sales_credit_type_id1 = OKC_API.G_MISS_CHAR)

Line 1480: IF (x_scr_rec.sales_credit_type_id1 = OKC_API.G_MISS_CHAR)

1476: IF (x_scr_rec.ctc_id = OKC_API.G_MISS_NUM)
1477: THEN
1478: x_scr_rec.ctc_id := l_scr_rec.ctc_id;
1479: END IF;
1480: IF (x_scr_rec.sales_credit_type_id1 = OKC_API.G_MISS_CHAR)
1481: THEN
1482: x_scr_rec.sales_credit_type_id1 := l_scr_rec.sales_credit_type_id1;
1483: END IF;
1484: IF (x_scr_rec.sales_credit_type_id2 = OKC_API.G_MISS_CHAR)

Line 1484: IF (x_scr_rec.sales_credit_type_id2 = OKC_API.G_MISS_CHAR)

1480: IF (x_scr_rec.sales_credit_type_id1 = OKC_API.G_MISS_CHAR)
1481: THEN
1482: x_scr_rec.sales_credit_type_id1 := l_scr_rec.sales_credit_type_id1;
1483: END IF;
1484: IF (x_scr_rec.sales_credit_type_id2 = OKC_API.G_MISS_CHAR)
1485: THEN
1486: x_scr_rec.sales_credit_type_id2 := l_scr_rec.sales_credit_type_id2;
1487: END IF;
1488: IF (x_scr_rec.object_version_number = OKC_API.G_MISS_NUM)

Line 1488: IF (x_scr_rec.object_version_number = OKC_API.G_MISS_NUM)

1484: IF (x_scr_rec.sales_credit_type_id2 = OKC_API.G_MISS_CHAR)
1485: THEN
1486: x_scr_rec.sales_credit_type_id2 := l_scr_rec.sales_credit_type_id2;
1487: END IF;
1488: IF (x_scr_rec.object_version_number = OKC_API.G_MISS_NUM)
1489: THEN
1490: x_scr_rec.object_version_number := l_scr_rec.object_version_number;
1491: END IF;
1492: IF (x_scr_rec.created_by = OKC_API.G_MISS_NUM)

Line 1492: IF (x_scr_rec.created_by = OKC_API.G_MISS_NUM)

1488: IF (x_scr_rec.object_version_number = OKC_API.G_MISS_NUM)
1489: THEN
1490: x_scr_rec.object_version_number := l_scr_rec.object_version_number;
1491: END IF;
1492: IF (x_scr_rec.created_by = OKC_API.G_MISS_NUM)
1493: THEN
1494: x_scr_rec.created_by := l_scr_rec.created_by;
1495: END IF;
1496: IF (x_scr_rec.creation_date = OKC_API.G_MISS_DATE)

Line 1496: IF (x_scr_rec.creation_date = OKC_API.G_MISS_DATE)

1492: IF (x_scr_rec.created_by = OKC_API.G_MISS_NUM)
1493: THEN
1494: x_scr_rec.created_by := l_scr_rec.created_by;
1495: END IF;
1496: IF (x_scr_rec.creation_date = OKC_API.G_MISS_DATE)
1497: THEN
1498: x_scr_rec.creation_date := l_scr_rec.creation_date;
1499: END IF;
1500: IF (x_scr_rec.last_updated_by = OKC_API.G_MISS_NUM)

Line 1500: IF (x_scr_rec.last_updated_by = OKC_API.G_MISS_NUM)

1496: IF (x_scr_rec.creation_date = OKC_API.G_MISS_DATE)
1497: THEN
1498: x_scr_rec.creation_date := l_scr_rec.creation_date;
1499: END IF;
1500: IF (x_scr_rec.last_updated_by = OKC_API.G_MISS_NUM)
1501: THEN
1502: x_scr_rec.last_updated_by := l_scr_rec.last_updated_by;
1503: END IF;
1504: IF (x_scr_rec.last_update_date = OKC_API.G_MISS_DATE)

Line 1504: IF (x_scr_rec.last_update_date = OKC_API.G_MISS_DATE)

1500: IF (x_scr_rec.last_updated_by = OKC_API.G_MISS_NUM)
1501: THEN
1502: x_scr_rec.last_updated_by := l_scr_rec.last_updated_by;
1503: END IF;
1504: IF (x_scr_rec.last_update_date = OKC_API.G_MISS_DATE)
1505: THEN
1506: x_scr_rec.last_update_date := l_scr_rec.last_update_date;
1507: END IF;
1508: /*

Line 1509: IF (x_scr_rec.security_group_id = OKC_API.G_MISS_NUM)

1505: THEN
1506: x_scr_rec.last_update_date := l_scr_rec.last_update_date;
1507: END IF;
1508: /*
1509: IF (x_scr_rec.security_group_id = OKC_API.G_MISS_NUM)
1510: THEN
1511: x_scr_rec.security_group_id := l_scr_rec.security_group_id;
1512: END IF;
1513: */

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

1520: FUNCTION Set_Attributes (
1521: p_scr_rec IN scr_rec_type,
1522: x_scr_rec OUT NOCOPY scr_rec_type
1523: ) RETURN VARCHAR2 IS
1524: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1525: BEGIN
1526: x_scr_rec := p_scr_rec;
1527: RETURN(l_return_status);
1528: END Set_Attributes;

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

1526: x_scr_rec := p_scr_rec;
1527: RETURN(l_return_status);
1528: END Set_Attributes;
1529: BEGIN
1530: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1531: p_init_msg_list,
1532: '_PVT',
1533: x_return_status);
1534: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

1530: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1531: p_init_msg_list,
1532: '_PVT',
1533: x_return_status);
1534: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1535: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1536: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1537: RAISE OKC_API.G_EXCEPTION_ERROR;
1538: END IF;

Line 1535: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1531: p_init_msg_list,
1532: '_PVT',
1533: x_return_status);
1534: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1535: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1536: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1537: RAISE OKC_API.G_EXCEPTION_ERROR;
1538: END IF;
1539: --- Setting item attributes

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

1532: '_PVT',
1533: x_return_status);
1534: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1535: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1536: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1537: RAISE OKC_API.G_EXCEPTION_ERROR;
1538: END IF;
1539: --- Setting item attributes
1540: l_return_status := Set_Attributes(

Line 1537: RAISE OKC_API.G_EXCEPTION_ERROR;

1533: x_return_status);
1534: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1535: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1536: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1537: RAISE OKC_API.G_EXCEPTION_ERROR;
1538: END IF;
1539: --- Setting item attributes
1540: l_return_status := Set_Attributes(
1541: p_scr_rec, -- IN

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

1540: l_return_status := Set_Attributes(
1541: p_scr_rec, -- IN
1542: l_scr_rec); -- OUT
1543: --- If any errors happen abort API
1544: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1545: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1546: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1547: RAISE OKC_API.G_EXCEPTION_ERROR;
1548: END IF;

Line 1545: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1541: p_scr_rec, -- IN
1542: l_scr_rec); -- OUT
1543: --- If any errors happen abort API
1544: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1545: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1546: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1547: RAISE OKC_API.G_EXCEPTION_ERROR;
1548: END IF;
1549: l_return_status := populate_new_record(l_scr_rec, l_def_scr_rec);

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

1542: l_scr_rec); -- OUT
1543: --- If any errors happen abort API
1544: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1545: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1546: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1547: RAISE OKC_API.G_EXCEPTION_ERROR;
1548: END IF;
1549: l_return_status := populate_new_record(l_scr_rec, l_def_scr_rec);
1550: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1547: RAISE OKC_API.G_EXCEPTION_ERROR;

1543: --- If any errors happen abort API
1544: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1545: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1546: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1547: RAISE OKC_API.G_EXCEPTION_ERROR;
1548: END IF;
1549: l_return_status := populate_new_record(l_scr_rec, l_def_scr_rec);
1550: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1551: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

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

1546: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1547: RAISE OKC_API.G_EXCEPTION_ERROR;
1548: END IF;
1549: l_return_status := populate_new_record(l_scr_rec, l_def_scr_rec);
1550: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1551: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1552: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1553: RAISE OKC_API.G_EXCEPTION_ERROR;
1554: END IF;

Line 1551: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1547: RAISE OKC_API.G_EXCEPTION_ERROR;
1548: END IF;
1549: l_return_status := populate_new_record(l_scr_rec, l_def_scr_rec);
1550: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1551: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1552: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1553: RAISE OKC_API.G_EXCEPTION_ERROR;
1554: END IF;
1555: UPDATE OKS_K_SALES_CREDITS

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

1548: END IF;
1549: l_return_status := populate_new_record(l_scr_rec, l_def_scr_rec);
1550: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1551: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1552: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1553: RAISE OKC_API.G_EXCEPTION_ERROR;
1554: END IF;
1555: UPDATE OKS_K_SALES_CREDITS
1556: SET PERCENT = l_def_scr_rec.percent,

Line 1553: RAISE OKC_API.G_EXCEPTION_ERROR;

1549: l_return_status := populate_new_record(l_scr_rec, l_def_scr_rec);
1550: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1551: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1552: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1553: RAISE OKC_API.G_EXCEPTION_ERROR;
1554: END IF;
1555: UPDATE OKS_K_SALES_CREDITS
1556: SET PERCENT = l_def_scr_rec.percent,
1557: SALES_GROUP_ID = l_def_scr_rec.sales_group_id,

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

1568: -- ,SECURITY_GROUP_ID = l_def_scr_rec.security_group_id
1569: WHERE ID = l_def_scr_rec.id;
1570:
1571: x_scr_rec := l_def_scr_rec;
1572: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1573: EXCEPTION
1574: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1575: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1576: (

Line 1574: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1570:
1571: x_scr_rec := l_def_scr_rec;
1572: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1573: EXCEPTION
1574: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1575: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1576: (
1577: l_api_name,
1578: G_PKG_NAME,

Line 1575: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1571: x_scr_rec := l_def_scr_rec;
1572: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1573: EXCEPTION
1574: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1575: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1576: (
1577: l_api_name,
1578: G_PKG_NAME,
1579: 'OKC_API.G_RET_STS_ERROR',

Line 1579: 'OKC_API.G_RET_STS_ERROR',

1575: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1576: (
1577: l_api_name,
1578: G_PKG_NAME,
1579: 'OKC_API.G_RET_STS_ERROR',
1580: x_msg_count,
1581: x_msg_data,
1582: '_PVT'
1583: );

Line 1584: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1580: x_msg_count,
1581: x_msg_data,
1582: '_PVT'
1583: );
1584: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1585: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1586: (
1587: l_api_name,
1588: G_PKG_NAME,

Line 1585: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1581: x_msg_data,
1582: '_PVT'
1583: );
1584: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1585: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1586: (
1587: l_api_name,
1588: G_PKG_NAME,
1589: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1589: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1585: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1586: (
1587: l_api_name,
1588: G_PKG_NAME,
1589: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1590: x_msg_count,
1591: x_msg_data,
1592: '_PVT'
1593: );

Line 1595: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1591: x_msg_data,
1592: '_PVT'
1593: );
1594: WHEN OTHERS THEN
1595: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1596: (
1597: l_api_name,
1598: G_PKG_NAME,
1599: 'OTHERS',

Line 1610: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1606: -- update_row for:OKS_K_SALES_CREDITS_V --
1607: ------------------------------------------
1608: PROCEDURE update_row(
1609: p_api_version IN NUMBER,
1610: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1611: x_return_status OUT NOCOPY VARCHAR2,
1612: x_msg_count OUT NOCOPY NUMBER,
1613: x_msg_data OUT NOCOPY VARCHAR2,
1614: p_scrv_rec IN scrv_rec_type,

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

1615: x_scrv_rec OUT NOCOPY scrv_rec_type) IS
1616:
1617: l_api_version CONSTANT NUMBER := 1;
1618: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
1619: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1620: l_scrv_rec scrv_rec_type := p_scrv_rec;
1621: ldefoksksalescreditsvrec scrv_rec_type;
1622: l_scr_rec scr_rec_type;
1623: lx_scr_rec scr_rec_type;

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

1641: x_scrv_rec OUT NOCOPY scrv_rec_type
1642: ) RETURN VARCHAR2 IS
1643: l_scrv_rec scrv_rec_type;
1644: l_row_notfound BOOLEAN := TRUE;
1645: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1646: BEGIN
1647: x_scrv_rec := p_scrv_rec;
1648: -- Get current database values
1649: l_scrv_rec := get_rec(p_scrv_rec, l_row_notfound);

Line 1651: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1647: x_scrv_rec := p_scrv_rec;
1648: -- Get current database values
1649: l_scrv_rec := get_rec(p_scrv_rec, l_row_notfound);
1650: IF (l_row_notfound) THEN
1651: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1652: END IF;
1653: IF (x_scrv_rec.id = OKC_API.G_MISS_NUM)
1654: THEN
1655: x_scrv_rec.id := l_scrv_rec.id;

Line 1653: IF (x_scrv_rec.id = OKC_API.G_MISS_NUM)

1649: l_scrv_rec := get_rec(p_scrv_rec, l_row_notfound);
1650: IF (l_row_notfound) THEN
1651: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1652: END IF;
1653: IF (x_scrv_rec.id = OKC_API.G_MISS_NUM)
1654: THEN
1655: x_scrv_rec.id := l_scrv_rec.id;
1656: END IF;
1657: IF (x_scrv_rec.percent = OKC_API.G_MISS_NUM)

Line 1657: IF (x_scrv_rec.percent = OKC_API.G_MISS_NUM)

1653: IF (x_scrv_rec.id = OKC_API.G_MISS_NUM)
1654: THEN
1655: x_scrv_rec.id := l_scrv_rec.id;
1656: END IF;
1657: IF (x_scrv_rec.percent = OKC_API.G_MISS_NUM)
1658: THEN
1659: x_scrv_rec.percent := l_scrv_rec.percent;
1660: END IF;
1661: IF (x_scrv_rec.sales_group_id = OKC_API.G_MISS_NUM)

Line 1661: IF (x_scrv_rec.sales_group_id = OKC_API.G_MISS_NUM)

1657: IF (x_scrv_rec.percent = OKC_API.G_MISS_NUM)
1658: THEN
1659: x_scrv_rec.percent := l_scrv_rec.percent;
1660: END IF;
1661: IF (x_scrv_rec.sales_group_id = OKC_API.G_MISS_NUM)
1662: THEN
1663: x_scrv_rec.sales_group_id := l_scrv_rec.sales_group_id;
1664: END IF;
1665: IF (x_scrv_rec.chr_id = OKC_API.G_MISS_NUM)

Line 1665: IF (x_scrv_rec.chr_id = OKC_API.G_MISS_NUM)

1661: IF (x_scrv_rec.sales_group_id = OKC_API.G_MISS_NUM)
1662: THEN
1663: x_scrv_rec.sales_group_id := l_scrv_rec.sales_group_id;
1664: END IF;
1665: IF (x_scrv_rec.chr_id = OKC_API.G_MISS_NUM)
1666: THEN
1667: x_scrv_rec.chr_id := l_scrv_rec.chr_id;
1668: END IF;
1669: IF (x_scrv_rec.cle_id = OKC_API.G_MISS_NUM)

Line 1669: IF (x_scrv_rec.cle_id = OKC_API.G_MISS_NUM)

1665: IF (x_scrv_rec.chr_id = OKC_API.G_MISS_NUM)
1666: THEN
1667: x_scrv_rec.chr_id := l_scrv_rec.chr_id;
1668: END IF;
1669: IF (x_scrv_rec.cle_id = OKC_API.G_MISS_NUM)
1670: THEN
1671: x_scrv_rec.cle_id := l_scrv_rec.cle_id;
1672: END IF;
1673: IF (x_scrv_rec.ctc_id = OKC_API.G_MISS_NUM)

Line 1673: IF (x_scrv_rec.ctc_id = OKC_API.G_MISS_NUM)

1669: IF (x_scrv_rec.cle_id = OKC_API.G_MISS_NUM)
1670: THEN
1671: x_scrv_rec.cle_id := l_scrv_rec.cle_id;
1672: END IF;
1673: IF (x_scrv_rec.ctc_id = OKC_API.G_MISS_NUM)
1674: THEN
1675: x_scrv_rec.ctc_id := l_scrv_rec.ctc_id;
1676: END IF;
1677: IF (x_scrv_rec.sales_credit_type_id1 = OKC_API.G_MISS_CHAR)

Line 1677: IF (x_scrv_rec.sales_credit_type_id1 = OKC_API.G_MISS_CHAR)

1673: IF (x_scrv_rec.ctc_id = OKC_API.G_MISS_NUM)
1674: THEN
1675: x_scrv_rec.ctc_id := l_scrv_rec.ctc_id;
1676: END IF;
1677: IF (x_scrv_rec.sales_credit_type_id1 = OKC_API.G_MISS_CHAR)
1678: THEN
1679: x_scrv_rec.sales_credit_type_id1 := l_scrv_rec.sales_credit_type_id1;
1680: END IF;
1681: IF (x_scrv_rec.sales_credit_type_id2 = OKC_API.G_MISS_CHAR)

Line 1681: IF (x_scrv_rec.sales_credit_type_id2 = OKC_API.G_MISS_CHAR)

1677: IF (x_scrv_rec.sales_credit_type_id1 = OKC_API.G_MISS_CHAR)
1678: THEN
1679: x_scrv_rec.sales_credit_type_id1 := l_scrv_rec.sales_credit_type_id1;
1680: END IF;
1681: IF (x_scrv_rec.sales_credit_type_id2 = OKC_API.G_MISS_CHAR)
1682: THEN
1683: x_scrv_rec.sales_credit_type_id2 := l_scrv_rec.sales_credit_type_id2;
1684: END IF;
1685: IF (x_scrv_rec.object_version_number = OKC_API.G_MISS_NUM)

Line 1685: IF (x_scrv_rec.object_version_number = OKC_API.G_MISS_NUM)

1681: IF (x_scrv_rec.sales_credit_type_id2 = OKC_API.G_MISS_CHAR)
1682: THEN
1683: x_scrv_rec.sales_credit_type_id2 := l_scrv_rec.sales_credit_type_id2;
1684: END IF;
1685: IF (x_scrv_rec.object_version_number = OKC_API.G_MISS_NUM)
1686: THEN
1687: x_scrv_rec.object_version_number := l_scrv_rec.object_version_number;
1688: END IF;
1689: IF (x_scrv_rec.created_by = OKC_API.G_MISS_NUM)

Line 1689: IF (x_scrv_rec.created_by = OKC_API.G_MISS_NUM)

1685: IF (x_scrv_rec.object_version_number = OKC_API.G_MISS_NUM)
1686: THEN
1687: x_scrv_rec.object_version_number := l_scrv_rec.object_version_number;
1688: END IF;
1689: IF (x_scrv_rec.created_by = OKC_API.G_MISS_NUM)
1690: THEN
1691: x_scrv_rec.created_by := l_scrv_rec.created_by;
1692: END IF;
1693: IF (x_scrv_rec.creation_date = OKC_API.G_MISS_DATE)

Line 1693: IF (x_scrv_rec.creation_date = OKC_API.G_MISS_DATE)

1689: IF (x_scrv_rec.created_by = OKC_API.G_MISS_NUM)
1690: THEN
1691: x_scrv_rec.created_by := l_scrv_rec.created_by;
1692: END IF;
1693: IF (x_scrv_rec.creation_date = OKC_API.G_MISS_DATE)
1694: THEN
1695: x_scrv_rec.creation_date := l_scrv_rec.creation_date;
1696: END IF;
1697: IF (x_scrv_rec.last_updated_by = OKC_API.G_MISS_NUM)

Line 1697: IF (x_scrv_rec.last_updated_by = OKC_API.G_MISS_NUM)

1693: IF (x_scrv_rec.creation_date = OKC_API.G_MISS_DATE)
1694: THEN
1695: x_scrv_rec.creation_date := l_scrv_rec.creation_date;
1696: END IF;
1697: IF (x_scrv_rec.last_updated_by = OKC_API.G_MISS_NUM)
1698: THEN
1699: x_scrv_rec.last_updated_by := l_scrv_rec.last_updated_by;
1700: END IF;
1701: IF (x_scrv_rec.last_update_date = OKC_API.G_MISS_DATE)

Line 1701: IF (x_scrv_rec.last_update_date = OKC_API.G_MISS_DATE)

1697: IF (x_scrv_rec.last_updated_by = OKC_API.G_MISS_NUM)
1698: THEN
1699: x_scrv_rec.last_updated_by := l_scrv_rec.last_updated_by;
1700: END IF;
1701: IF (x_scrv_rec.last_update_date = OKC_API.G_MISS_DATE)
1702: THEN
1703: x_scrv_rec.last_update_date := l_scrv_rec.last_update_date;
1704: END IF;
1705: RETURN(l_return_status);

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

1710: FUNCTION Set_Attributes (
1711: p_scrv_rec IN scrv_rec_type,
1712: x_scrv_rec OUT NOCOPY scrv_rec_type
1713: ) RETURN VARCHAR2 IS
1714: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1715: BEGIN
1716: x_scrv_rec := p_scrv_rec;
1717: x_scrv_rec.OBJECT_VERSION_NUMBER := NVL(x_scrv_rec.OBJECT_VERSION_NUMBER, 0) + 1;
1718: RETURN(l_return_status);

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

1717: x_scrv_rec.OBJECT_VERSION_NUMBER := NVL(x_scrv_rec.OBJECT_VERSION_NUMBER, 0) + 1;
1718: RETURN(l_return_status);
1719: END Set_Attributes;
1720: BEGIN
1721: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1722: G_PKG_NAME,
1723: p_init_msg_list,
1724: l_api_version,
1725: p_api_version,

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

1724: l_api_version,
1725: p_api_version,
1726: '_PVT',
1727: x_return_status);
1728: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1729: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1730: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1731: RAISE OKC_API.G_EXCEPTION_ERROR;
1732: END IF;

Line 1729: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1725: p_api_version,
1726: '_PVT',
1727: x_return_status);
1728: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1729: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1730: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1731: RAISE OKC_API.G_EXCEPTION_ERROR;
1732: END IF;
1733: --- Setting item attributes

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

1726: '_PVT',
1727: x_return_status);
1728: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1729: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1730: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1731: RAISE OKC_API.G_EXCEPTION_ERROR;
1732: END IF;
1733: --- Setting item attributes
1734: l_return_status := Set_Attributes(

Line 1731: RAISE OKC_API.G_EXCEPTION_ERROR;

1727: x_return_status);
1728: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1729: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1730: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1731: RAISE OKC_API.G_EXCEPTION_ERROR;
1732: END IF;
1733: --- Setting item attributes
1734: l_return_status := Set_Attributes(
1735: p_scrv_rec, -- IN

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

1734: l_return_status := Set_Attributes(
1735: p_scrv_rec, -- IN
1736: l_scrv_rec); -- OUT
1737: --- If any errors happen abort API
1738: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1739: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1740: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1741: RAISE OKC_API.G_EXCEPTION_ERROR;
1742: END IF;

Line 1739: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1735: p_scrv_rec, -- IN
1736: l_scrv_rec); -- OUT
1737: --- If any errors happen abort API
1738: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1739: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1740: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1741: RAISE OKC_API.G_EXCEPTION_ERROR;
1742: END IF;
1743: l_return_status := populate_new_record(l_scrv_rec, ldefoksksalescreditsvrec);

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

1736: l_scrv_rec); -- OUT
1737: --- If any errors happen abort API
1738: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1739: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1740: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1741: RAISE OKC_API.G_EXCEPTION_ERROR;
1742: END IF;
1743: l_return_status := populate_new_record(l_scrv_rec, ldefoksksalescreditsvrec);
1744: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1741: RAISE OKC_API.G_EXCEPTION_ERROR;

1737: --- If any errors happen abort API
1738: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1739: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1740: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1741: RAISE OKC_API.G_EXCEPTION_ERROR;
1742: END IF;
1743: l_return_status := populate_new_record(l_scrv_rec, ldefoksksalescreditsvrec);
1744: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1745: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

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

1740: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1741: RAISE OKC_API.G_EXCEPTION_ERROR;
1742: END IF;
1743: l_return_status := populate_new_record(l_scrv_rec, ldefoksksalescreditsvrec);
1744: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1745: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1746: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1747: RAISE OKC_API.G_EXCEPTION_ERROR;
1748: END IF;

Line 1745: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1741: RAISE OKC_API.G_EXCEPTION_ERROR;
1742: END IF;
1743: l_return_status := populate_new_record(l_scrv_rec, ldefoksksalescreditsvrec);
1744: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1745: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1746: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1747: RAISE OKC_API.G_EXCEPTION_ERROR;
1748: END IF;
1749: ldefoksksalescreditsvrec := fill_who_columns(ldefoksksalescreditsvrec);

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

1742: END IF;
1743: l_return_status := populate_new_record(l_scrv_rec, ldefoksksalescreditsvrec);
1744: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1745: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1746: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1747: RAISE OKC_API.G_EXCEPTION_ERROR;
1748: END IF;
1749: ldefoksksalescreditsvrec := fill_who_columns(ldefoksksalescreditsvrec);
1750: --- Validate all non-missing attributes (Item Level Validation)

Line 1747: RAISE OKC_API.G_EXCEPTION_ERROR;

1743: l_return_status := populate_new_record(l_scrv_rec, ldefoksksalescreditsvrec);
1744: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1745: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1746: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1747: RAISE OKC_API.G_EXCEPTION_ERROR;
1748: END IF;
1749: ldefoksksalescreditsvrec := fill_who_columns(ldefoksksalescreditsvrec);
1750: --- Validate all non-missing attributes (Item Level Validation)
1751: l_return_status := Validate_Attributes(ldefoksksalescreditsvrec);

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

1749: ldefoksksalescreditsvrec := fill_who_columns(ldefoksksalescreditsvrec);
1750: --- Validate all non-missing attributes (Item Level Validation)
1751: l_return_status := Validate_Attributes(ldefoksksalescreditsvrec);
1752: --- If any errors happen abort API
1753: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1754: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1755: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1756: RAISE OKC_API.G_EXCEPTION_ERROR;
1757: END IF;

Line 1754: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1750: --- Validate all non-missing attributes (Item Level Validation)
1751: l_return_status := Validate_Attributes(ldefoksksalescreditsvrec);
1752: --- If any errors happen abort API
1753: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1754: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1755: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1756: RAISE OKC_API.G_EXCEPTION_ERROR;
1757: END IF;
1758: l_return_status := Validate_Record(ldefoksksalescreditsvrec);

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

1751: l_return_status := Validate_Attributes(ldefoksksalescreditsvrec);
1752: --- If any errors happen abort API
1753: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1754: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1755: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1756: RAISE OKC_API.G_EXCEPTION_ERROR;
1757: END IF;
1758: l_return_status := Validate_Record(ldefoksksalescreditsvrec);
1759: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1756: RAISE OKC_API.G_EXCEPTION_ERROR;

1752: --- If any errors happen abort API
1753: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1754: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1755: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1756: RAISE OKC_API.G_EXCEPTION_ERROR;
1757: END IF;
1758: l_return_status := Validate_Record(ldefoksksalescreditsvrec);
1759: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1760: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

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

1755: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1756: RAISE OKC_API.G_EXCEPTION_ERROR;
1757: END IF;
1758: l_return_status := Validate_Record(ldefoksksalescreditsvrec);
1759: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1760: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1761: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1762: RAISE OKC_API.G_EXCEPTION_ERROR;
1763: END IF;

Line 1760: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1756: RAISE OKC_API.G_EXCEPTION_ERROR;
1757: END IF;
1758: l_return_status := Validate_Record(ldefoksksalescreditsvrec);
1759: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1760: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1761: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1762: RAISE OKC_API.G_EXCEPTION_ERROR;
1763: END IF;
1764:

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

1757: END IF;
1758: l_return_status := Validate_Record(ldefoksksalescreditsvrec);
1759: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1760: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1761: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1762: RAISE OKC_API.G_EXCEPTION_ERROR;
1763: END IF;
1764:
1765: --------------------------------------

Line 1762: RAISE OKC_API.G_EXCEPTION_ERROR;

1758: l_return_status := Validate_Record(ldefoksksalescreditsvrec);
1759: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1760: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1761: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1762: RAISE OKC_API.G_EXCEPTION_ERROR;
1763: END IF;
1764:
1765: --------------------------------------
1766: -- Move VIEW record to "Child" records

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

1776: x_msg_data,
1777: l_scr_rec,
1778: lx_scr_rec
1779: );
1780: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1781: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1782: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1783: RAISE OKC_API.G_EXCEPTION_ERROR;
1784: END IF;

Line 1781: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1777: l_scr_rec,
1778: lx_scr_rec
1779: );
1780: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1781: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1782: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1783: RAISE OKC_API.G_EXCEPTION_ERROR;
1784: END IF;
1785: migrate(lx_scr_rec, ldefoksksalescreditsvrec);

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

1778: lx_scr_rec
1779: );
1780: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1781: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1782: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1783: RAISE OKC_API.G_EXCEPTION_ERROR;
1784: END IF;
1785: migrate(lx_scr_rec, ldefoksksalescreditsvrec);
1786: x_scrv_rec := ldefoksksalescreditsvrec;

Line 1783: RAISE OKC_API.G_EXCEPTION_ERROR;

1779: );
1780: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1781: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1782: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1783: RAISE OKC_API.G_EXCEPTION_ERROR;
1784: END IF;
1785: migrate(lx_scr_rec, ldefoksksalescreditsvrec);
1786: x_scrv_rec := ldefoksksalescreditsvrec;
1787: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

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

1783: RAISE OKC_API.G_EXCEPTION_ERROR;
1784: END IF;
1785: migrate(lx_scr_rec, ldefoksksalescreditsvrec);
1786: x_scrv_rec := ldefoksksalescreditsvrec;
1787: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1788: EXCEPTION
1789: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1790: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1791: (

Line 1789: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1785: migrate(lx_scr_rec, ldefoksksalescreditsvrec);
1786: x_scrv_rec := ldefoksksalescreditsvrec;
1787: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1788: EXCEPTION
1789: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1790: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1791: (
1792: l_api_name,
1793: G_PKG_NAME,

Line 1790: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1786: x_scrv_rec := ldefoksksalescreditsvrec;
1787: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1788: EXCEPTION
1789: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1790: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1791: (
1792: l_api_name,
1793: G_PKG_NAME,
1794: 'OKC_API.G_RET_STS_ERROR',

Line 1794: 'OKC_API.G_RET_STS_ERROR',

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

Line 1799: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1795: x_msg_count,
1796: x_msg_data,
1797: '_PVT'
1798: );
1799: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1800: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1801: (
1802: l_api_name,
1803: G_PKG_NAME,

Line 1800: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

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

Line 1804: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1800: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1801: (
1802: l_api_name,
1803: G_PKG_NAME,
1804: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1805: x_msg_count,
1806: x_msg_data,
1807: '_PVT'
1808: );

Line 1810: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1806: x_msg_data,
1807: '_PVT'
1808: );
1809: WHEN OTHERS THEN
1810: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1811: (
1812: l_api_name,
1813: G_PKG_NAME,
1814: 'OTHERS',

Line 1825: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1821: -- PL/SQL TBL update_row for:OKS_K_SALES_CREDITS_V_TBL --
1822: ---------------------------------------------------------
1823: PROCEDURE update_row(
1824: p_api_version IN NUMBER,
1825: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1826: x_return_status OUT NOCOPY VARCHAR2,
1827: x_msg_count OUT NOCOPY NUMBER,
1828: x_msg_data OUT NOCOPY VARCHAR2,
1829: p_scrv_tbl IN scrv_tbl_type,

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

1830: x_scrv_tbl OUT NOCOPY scrv_tbl_type) IS
1831:
1832: l_api_version CONSTANT NUMBER := 1;
1833: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
1834: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1835: i NUMBER := 0;
1836: BEGIN
1837: OKC_API.init_msg_list(p_init_msg_list);
1838: -- Make sure PL/SQL table has records in it before passing

Line 1837: OKC_API.init_msg_list(p_init_msg_list);

1833: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
1834: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1835: i NUMBER := 0;
1836: BEGIN
1837: OKC_API.init_msg_list(p_init_msg_list);
1838: -- Make sure PL/SQL table has records in it before passing
1839: IF (p_scrv_tbl.COUNT > 0) THEN
1840: i := p_scrv_tbl.FIRST;
1841: LOOP

Line 1844: p_init_msg_list => OKC_API.G_FALSE,

1840: i := p_scrv_tbl.FIRST;
1841: LOOP
1842: update_row (
1843: p_api_version => p_api_version,
1844: p_init_msg_list => OKC_API.G_FALSE,
1845: x_return_status => x_return_status,
1846: x_msg_count => x_msg_count,
1847: x_msg_data => x_msg_data,
1848: p_scrv_rec => p_scrv_tbl(i),

Line 1855: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1851: i := p_scrv_tbl.NEXT(i);
1852: END LOOP;
1853: END IF;
1854: EXCEPTION
1855: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1856: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1857: (
1858: l_api_name,
1859: G_PKG_NAME,

Line 1856: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1852: END LOOP;
1853: END IF;
1854: EXCEPTION
1855: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1856: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1857: (
1858: l_api_name,
1859: G_PKG_NAME,
1860: 'OKC_API.G_RET_STS_ERROR',

Line 1860: 'OKC_API.G_RET_STS_ERROR',

1856: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1857: (
1858: l_api_name,
1859: G_PKG_NAME,
1860: 'OKC_API.G_RET_STS_ERROR',
1861: x_msg_count,
1862: x_msg_data,
1863: '_PVT'
1864: );

Line 1865: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1861: x_msg_count,
1862: x_msg_data,
1863: '_PVT'
1864: );
1865: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1866: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1867: (
1868: l_api_name,
1869: G_PKG_NAME,

Line 1866: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1862: x_msg_data,
1863: '_PVT'
1864: );
1865: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1866: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1867: (
1868: l_api_name,
1869: G_PKG_NAME,
1870: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1870: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1866: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1867: (
1868: l_api_name,
1869: G_PKG_NAME,
1870: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1871: x_msg_count,
1872: x_msg_data,
1873: '_PVT'
1874: );

Line 1876: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1872: x_msg_data,
1873: '_PVT'
1874: );
1875: WHEN OTHERS THEN
1876: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1877: (
1878: l_api_name,
1879: G_PKG_NAME,
1880: 'OTHERS',

Line 1894: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1890: ----------------------------------------
1891: -- delete_row for:OKS_K_SALES_CREDITS --
1892: ----------------------------------------
1893: PROCEDURE delete_row(
1894: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1895: x_return_status OUT NOCOPY VARCHAR2,
1896: x_msg_count OUT NOCOPY NUMBER,
1897: x_msg_data OUT NOCOPY VARCHAR2,
1898: p_scr_rec IN scr_rec_type) IS

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

1898: p_scr_rec IN scr_rec_type) IS
1899:
1900: l_api_version CONSTANT NUMBER := 1;
1901: l_api_name CONSTANT VARCHAR2(30) := 'CREDITS_delete_row';
1902: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1903: l_scr_rec scr_rec_type:= p_scr_rec;
1904: l_row_notfound BOOLEAN := TRUE;
1905: BEGIN
1906: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

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

1902: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1903: l_scr_rec scr_rec_type:= p_scr_rec;
1904: l_row_notfound BOOLEAN := TRUE;
1905: BEGIN
1906: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1907: p_init_msg_list,
1908: '_PVT',
1909: x_return_status);
1910: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

1906: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1907: p_init_msg_list,
1908: '_PVT',
1909: x_return_status);
1910: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1911: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1912: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1913: RAISE OKC_API.G_EXCEPTION_ERROR;
1914: END IF;

Line 1911: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1907: p_init_msg_list,
1908: '_PVT',
1909: x_return_status);
1910: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1911: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1912: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1913: RAISE OKC_API.G_EXCEPTION_ERROR;
1914: END IF;
1915: DELETE FROM OKS_K_SALES_CREDITS

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

1908: '_PVT',
1909: x_return_status);
1910: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1911: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1912: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1913: RAISE OKC_API.G_EXCEPTION_ERROR;
1914: END IF;
1915: DELETE FROM OKS_K_SALES_CREDITS
1916: WHERE ID = l_scr_rec.id;

Line 1913: RAISE OKC_API.G_EXCEPTION_ERROR;

1909: x_return_status);
1910: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1911: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1912: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1913: RAISE OKC_API.G_EXCEPTION_ERROR;
1914: END IF;
1915: DELETE FROM OKS_K_SALES_CREDITS
1916: WHERE ID = l_scr_rec.id;
1917:

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

1914: END IF;
1915: DELETE FROM OKS_K_SALES_CREDITS
1916: WHERE ID = l_scr_rec.id;
1917:
1918: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1919: EXCEPTION
1920: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1921: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1922: (

Line 1920: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1916: WHERE ID = l_scr_rec.id;
1917:
1918: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1919: EXCEPTION
1920: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1921: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1922: (
1923: l_api_name,
1924: G_PKG_NAME,

Line 1921: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1917:
1918: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1919: EXCEPTION
1920: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1921: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1922: (
1923: l_api_name,
1924: G_PKG_NAME,
1925: 'OKC_API.G_RET_STS_ERROR',

Line 1925: 'OKC_API.G_RET_STS_ERROR',

1921: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1922: (
1923: l_api_name,
1924: G_PKG_NAME,
1925: 'OKC_API.G_RET_STS_ERROR',
1926: x_msg_count,
1927: x_msg_data,
1928: '_PVT'
1929: );

Line 1930: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1926: x_msg_count,
1927: x_msg_data,
1928: '_PVT'
1929: );
1930: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1931: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1932: (
1933: l_api_name,
1934: G_PKG_NAME,

Line 1931: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1927: x_msg_data,
1928: '_PVT'
1929: );
1930: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1931: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1932: (
1933: l_api_name,
1934: G_PKG_NAME,
1935: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1935: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1931: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1932: (
1933: l_api_name,
1934: G_PKG_NAME,
1935: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1936: x_msg_count,
1937: x_msg_data,
1938: '_PVT'
1939: );

Line 1941: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1937: x_msg_data,
1938: '_PVT'
1939: );
1940: WHEN OTHERS THEN
1941: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1942: (
1943: l_api_name,
1944: G_PKG_NAME,
1945: 'OTHERS',

Line 1956: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1952: -- delete_row for:OKS_K_SALES_CREDITS_V --
1953: ------------------------------------------
1954: PROCEDURE delete_row(
1955: p_api_version IN NUMBER,
1956: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1957: x_return_status OUT NOCOPY VARCHAR2,
1958: x_msg_count OUT NOCOPY NUMBER,
1959: x_msg_data OUT NOCOPY VARCHAR2,
1960: p_scrv_rec IN scrv_rec_type) IS

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

1960: p_scrv_rec IN scrv_rec_type) IS
1961:
1962: l_api_version CONSTANT NUMBER := 1;
1963: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
1964: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1965: l_scrv_rec scrv_rec_type := p_scrv_rec;
1966: l_scr_rec scr_rec_type;
1967: BEGIN
1968: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

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

1964: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1965: l_scrv_rec scrv_rec_type := p_scrv_rec;
1966: l_scr_rec scr_rec_type;
1967: BEGIN
1968: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1969: G_PKG_NAME,
1970: p_init_msg_list,
1971: l_api_version,
1972: p_api_version,

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

1971: l_api_version,
1972: p_api_version,
1973: '_PVT',
1974: x_return_status);
1975: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1976: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1977: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1978: RAISE OKC_API.G_EXCEPTION_ERROR;
1979: END IF;

Line 1976: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1972: p_api_version,
1973: '_PVT',
1974: x_return_status);
1975: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1976: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1977: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1978: RAISE OKC_API.G_EXCEPTION_ERROR;
1979: END IF;
1980: --------------------------------------

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

1973: '_PVT',
1974: x_return_status);
1975: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1976: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1977: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1978: RAISE OKC_API.G_EXCEPTION_ERROR;
1979: END IF;
1980: --------------------------------------
1981: -- Move VIEW record to "Child" records

Line 1978: RAISE OKC_API.G_EXCEPTION_ERROR;

1974: x_return_status);
1975: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1976: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1977: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1978: RAISE OKC_API.G_EXCEPTION_ERROR;
1979: END IF;
1980: --------------------------------------
1981: -- Move VIEW record to "Child" records
1982: --------------------------------------

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

1990: x_msg_count,
1991: x_msg_data,
1992: l_scr_rec
1993: );
1994: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1995: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1996: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1997: RAISE OKC_API.G_EXCEPTION_ERROR;
1998: END IF;

Line 1995: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1991: x_msg_data,
1992: l_scr_rec
1993: );
1994: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1995: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1996: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1997: RAISE OKC_API.G_EXCEPTION_ERROR;
1998: END IF;
1999: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

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

1992: l_scr_rec
1993: );
1994: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1995: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1996: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1997: RAISE OKC_API.G_EXCEPTION_ERROR;
1998: END IF;
1999: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2000: EXCEPTION

Line 1997: RAISE OKC_API.G_EXCEPTION_ERROR;

1993: );
1994: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1995: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1996: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1997: RAISE OKC_API.G_EXCEPTION_ERROR;
1998: END IF;
1999: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2000: EXCEPTION
2001: WHEN OKC_API.G_EXCEPTION_ERROR THEN

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

1995: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1996: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1997: RAISE OKC_API.G_EXCEPTION_ERROR;
1998: END IF;
1999: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2000: EXCEPTION
2001: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2002: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2003: (

Line 2001: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1997: RAISE OKC_API.G_EXCEPTION_ERROR;
1998: END IF;
1999: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2000: EXCEPTION
2001: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2002: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2003: (
2004: l_api_name,
2005: G_PKG_NAME,

Line 2002: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1998: END IF;
1999: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2000: EXCEPTION
2001: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2002: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2003: (
2004: l_api_name,
2005: G_PKG_NAME,
2006: 'OKC_API.G_RET_STS_ERROR',

Line 2006: 'OKC_API.G_RET_STS_ERROR',

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

Line 2011: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

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

Line 2012: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

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

Line 2016: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2012: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2013: (
2014: l_api_name,
2015: G_PKG_NAME,
2016: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2017: x_msg_count,
2018: x_msg_data,
2019: '_PVT'
2020: );

Line 2022: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2018: x_msg_data,
2019: '_PVT'
2020: );
2021: WHEN OTHERS THEN
2022: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2023: (
2024: l_api_name,
2025: G_PKG_NAME,
2026: 'OTHERS',

Line 2037: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2033: -- PL/SQL TBL delete_row for:OKS_K_SALES_CREDITS_V_TBL --
2034: ---------------------------------------------------------
2035: PROCEDURE delete_row(
2036: p_api_version IN NUMBER,
2037: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2038: x_return_status OUT NOCOPY VARCHAR2,
2039: x_msg_count OUT NOCOPY NUMBER,
2040: x_msg_data OUT NOCOPY VARCHAR2,
2041: p_scrv_tbl IN scrv_tbl_type) IS

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

2041: p_scrv_tbl IN scrv_tbl_type) IS
2042:
2043: l_api_version CONSTANT NUMBER := 1;
2044: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
2045: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2046: i NUMBER := 0;
2047: BEGIN
2048: OKC_API.init_msg_list(p_init_msg_list);
2049: -- Make sure PL/SQL table has records in it before passing

Line 2048: OKC_API.init_msg_list(p_init_msg_list);

2044: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
2045: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2046: i NUMBER := 0;
2047: BEGIN
2048: OKC_API.init_msg_list(p_init_msg_list);
2049: -- Make sure PL/SQL table has records in it before passing
2050: IF (p_scrv_tbl.COUNT > 0) THEN
2051: i := p_scrv_tbl.FIRST;
2052: LOOP

Line 2055: p_init_msg_list => OKC_API.G_FALSE,

2051: i := p_scrv_tbl.FIRST;
2052: LOOP
2053: delete_row (
2054: p_api_version => p_api_version,
2055: p_init_msg_list => OKC_API.G_FALSE,
2056: x_return_status => x_return_status,
2057: x_msg_count => x_msg_count,
2058: x_msg_data => x_msg_data,
2059: p_scrv_rec => p_scrv_tbl(i));

Line 2065: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2061: i := p_scrv_tbl.NEXT(i);
2062: END LOOP;
2063: END IF;
2064: EXCEPTION
2065: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2066: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2067: (
2068: l_api_name,
2069: G_PKG_NAME,

Line 2066: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2062: END LOOP;
2063: END IF;
2064: EXCEPTION
2065: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2066: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2067: (
2068: l_api_name,
2069: G_PKG_NAME,
2070: 'OKC_API.G_RET_STS_ERROR',

Line 2070: 'OKC_API.G_RET_STS_ERROR',

2066: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2067: (
2068: l_api_name,
2069: G_PKG_NAME,
2070: 'OKC_API.G_RET_STS_ERROR',
2071: x_msg_count,
2072: x_msg_data,
2073: '_PVT'
2074: );

Line 2075: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2071: x_msg_count,
2072: x_msg_data,
2073: '_PVT'
2074: );
2075: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2076: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2077: (
2078: l_api_name,
2079: G_PKG_NAME,

Line 2076: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2072: x_msg_data,
2073: '_PVT'
2074: );
2075: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2076: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2077: (
2078: l_api_name,
2079: G_PKG_NAME,
2080: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2080: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2076: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2077: (
2078: l_api_name,
2079: G_PKG_NAME,
2080: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2081: x_msg_count,
2082: x_msg_data,
2083: '_PVT'
2084: );

Line 2086: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2082: x_msg_data,
2083: '_PVT'
2084: );
2085: WHEN OTHERS THEN
2086: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2087: (
2088: l_api_name,
2089: G_PKG_NAME,
2090: 'OTHERS',