DBA Data[Home] [Help]

APPS.OKL_CONTRACT_PARTY_PVT dependencies on OKC_API

Line 16: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,

12: -- Parameters :
13: -- Version : 1.0
14: -- End of comments
15: PROCEDURE create_contact(p_api_version IN NUMBER,
16: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
17: x_return_status OUT NOCOPY VARCHAR2,
18: x_msg_count OUT NOCOPY NUMBER,
19: x_msg_data OUT NOCOPY VARCHAR2,
20: p_ctcv_rec IN ctcv_rec_type,

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

20: p_ctcv_rec IN ctcv_rec_type,
21: x_ctcv_rec OUT NOCOPY ctcv_rec_type) is
22: l_api_name CONSTANT VARCHAR2(30) := 'create_contact';
23: l_api_version CONSTANT NUMBER := 1;
24: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
25:
26: CURSOR cur_ctcv IS
27: SELECT 'x'
28: FROM okc_contacts

Line 68: IF ( (p_ctcv_rec.CPL_ID IS NOT NULL) AND (p_ctcv_rec.CPL_ID <> OKC_API.G_MISS_NUM) )

64: l_return_status :=okl_api.g_ret_sts_error;
65: RAISE OKL_API.G_EXCEPTION_ERROR;
66: END IF;
67:
68: IF ( (p_ctcv_rec.CPL_ID IS NOT NULL) AND (p_ctcv_rec.CPL_ID <> OKC_API.G_MISS_NUM) )
69: AND ( (p_ctcv_rec.CRO_CODE IS NOT NULL) AND (p_ctcv_rec.CRO_CODE <> OKC_API.G_MISS_CHAR) ) THEN
70: OPEN cur_ctcv;
71: FETCH cur_ctcv INTO l_dummy;
72: l_row_found := cur_ctcv%FOUND;

Line 69: AND ( (p_ctcv_rec.CRO_CODE IS NOT NULL) AND (p_ctcv_rec.CRO_CODE <> OKC_API.G_MISS_CHAR) ) THEN

65: RAISE OKL_API.G_EXCEPTION_ERROR;
66: END IF;
67:
68: IF ( (p_ctcv_rec.CPL_ID IS NOT NULL) AND (p_ctcv_rec.CPL_ID <> OKC_API.G_MISS_NUM) )
69: AND ( (p_ctcv_rec.CRO_CODE IS NOT NULL) AND (p_ctcv_rec.CRO_CODE <> OKC_API.G_MISS_CHAR) ) THEN
70: OPEN cur_ctcv;
71: FETCH cur_ctcv INTO l_dummy;
72: l_row_found := cur_ctcv%FOUND;
73: CLOSE cur_ctcv;

Line 123: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,

119: -- Parameters :
120: -- Version : 1.0
121: -- End of comments
122: PROCEDURE create_contact(p_api_version IN NUMBER,
123: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
124: x_return_status OUT NOCOPY VARCHAR2,
125: x_msg_count OUT NOCOPY NUMBER,
126: x_msg_data OUT NOCOPY VARCHAR2,
127: p_ctcv_tbl IN ctcv_tbl_type,

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

126: x_msg_data OUT NOCOPY VARCHAR2,
127: p_ctcv_tbl IN ctcv_tbl_type,
128: x_ctcv_tbl OUT NOCOPY ctcv_tbl_type) IS
129: i NUMBER;
130: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
131: BEGIN
132: OKC_API.init_msg_list(p_init_msg_list);
133: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
134: IF (p_ctcv_tbl.COUNT>0) THEN

Line 132: OKC_API.init_msg_list(p_init_msg_list);

128: x_ctcv_tbl OUT NOCOPY ctcv_tbl_type) IS
129: i NUMBER;
130: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
131: BEGIN
132: OKC_API.init_msg_list(p_init_msg_list);
133: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
134: IF (p_ctcv_tbl.COUNT>0) THEN
135: i := p_ctcv_tbl.FIRST;
136: LOOP

Line 133: x_return_status:= OKC_API.G_RET_STS_SUCCESS;

129: i NUMBER;
130: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
131: BEGIN
132: OKC_API.init_msg_list(p_init_msg_list);
133: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
134: IF (p_ctcv_tbl.COUNT>0) THEN
135: i := p_ctcv_tbl.FIRST;
136: LOOP
137: create_contact(p_api_version=>p_api_version,

Line 138: p_init_msg_list=>OKC_API.G_FALSE,

134: IF (p_ctcv_tbl.COUNT>0) THEN
135: i := p_ctcv_tbl.FIRST;
136: LOOP
137: create_contact(p_api_version=>p_api_version,
138: p_init_msg_list=>OKC_API.G_FALSE,
139: x_return_status=>l_return_status,
140: x_msg_count=>x_msg_count,
141: x_msg_data=>x_msg_data,
142: p_ctcv_rec=>p_ctcv_tbl(i),

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

140: x_msg_count=>x_msg_count,
141: x_msg_data=>x_msg_data,
142: p_ctcv_rec=>p_ctcv_tbl(i),
143: x_ctcv_rec=>x_ctcv_tbl(i));
144: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
145: x_return_status := l_return_status;
146: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
147: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
148: x_return_status := l_return_status;

Line 146: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

142: p_ctcv_rec=>p_ctcv_tbl(i),
143: x_ctcv_rec=>x_ctcv_tbl(i));
144: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
145: x_return_status := l_return_status;
146: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
147: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
148: x_return_status := l_return_status;
149: END IF;
150: EXIT WHEN (i=p_ctcv_tbl.LAST);

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

143: x_ctcv_rec=>x_ctcv_tbl(i));
144: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
145: x_return_status := l_return_status;
146: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
147: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
148: x_return_status := l_return_status;
149: END IF;
150: EXIT WHEN (i=p_ctcv_tbl.LAST);
151: i := p_ctcv_tbl.NEXT(i);

Line 167: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,

163: -- Parameters :
164: -- Version : 1.0
165: -- End of comments
166: PROCEDURE update_contact(p_api_version IN NUMBER,
167: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
168: x_return_status OUT NOCOPY VARCHAR2,
169: x_msg_count OUT NOCOPY NUMBER,
170: x_msg_data OUT NOCOPY VARCHAR2,
171: p_ctcv_rec IN ctcv_rec_type,

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

171: p_ctcv_rec IN ctcv_rec_type,
172: x_ctcv_rec OUT NOCOPY ctcv_rec_type) IS
173: l_api_name CONSTANT VARCHAR2(30) := 'update_contact';
174: l_api_version CONSTANT NUMBER := 1;
175: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
176: BEGIN
177: l_return_status := OKL_API.START_ACTIVITY(p_api_name => l_api_name
178: ,p_init_msg_list => p_init_msg_list
179: ,p_api_type => '_PVT'

Line 231: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,

227: -- Parameters :
228: -- Version : 1.0
229: -- End of comments
230: PROCEDURE update_contact(p_api_version IN NUMBER,
231: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
232: x_return_status OUT NOCOPY VARCHAR2,
233: x_msg_count OUT NOCOPY NUMBER,
234: x_msg_data OUT NOCOPY VARCHAR2,
235: p_ctcv_tbl IN ctcv_tbl_type,

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

234: x_msg_data OUT NOCOPY VARCHAR2,
235: p_ctcv_tbl IN ctcv_tbl_type,
236: x_ctcv_tbl OUT NOCOPY ctcv_tbl_type) IS
237: i NUMBER;
238: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
239: begin
240: OKC_API.init_msg_list(p_init_msg_list);
241: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
242: IF (p_ctcv_tbl.COUNT>0) THEN

Line 240: OKC_API.init_msg_list(p_init_msg_list);

236: x_ctcv_tbl OUT NOCOPY ctcv_tbl_type) IS
237: i NUMBER;
238: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
239: begin
240: OKC_API.init_msg_list(p_init_msg_list);
241: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
242: IF (p_ctcv_tbl.COUNT>0) THEN
243: i := p_ctcv_tbl.FIRST;
244: LOOP

Line 241: x_return_status:= OKC_API.G_RET_STS_SUCCESS;

237: i NUMBER;
238: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
239: begin
240: OKC_API.init_msg_list(p_init_msg_list);
241: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
242: IF (p_ctcv_tbl.COUNT>0) THEN
243: i := p_ctcv_tbl.FIRST;
244: LOOP
245: update_contact(p_api_version=>p_api_version,

Line 246: p_init_msg_list=>OKC_API.G_FALSE,

242: IF (p_ctcv_tbl.COUNT>0) THEN
243: i := p_ctcv_tbl.FIRST;
244: LOOP
245: update_contact(p_api_version=>p_api_version,
246: p_init_msg_list=>OKC_API.G_FALSE,
247: x_return_status=>l_return_status,
248: x_msg_count=>x_msg_count,
249: x_msg_data=>x_msg_data,
250: p_ctcv_rec=>p_ctcv_tbl(i),

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

248: x_msg_count=>x_msg_count,
249: x_msg_data=>x_msg_data,
250: p_ctcv_rec=>p_ctcv_tbl(i),
251: x_ctcv_rec=>x_ctcv_tbl(i));
252: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
253: x_return_status := l_return_status;
254: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
255: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
256: x_return_status := l_return_status;

Line 254: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

250: p_ctcv_rec=>p_ctcv_tbl(i),
251: x_ctcv_rec=>x_ctcv_tbl(i));
252: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
253: x_return_status := l_return_status;
254: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
255: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
256: x_return_status := l_return_status;
257: END IF;
258: EXIT WHEN (i=p_ctcv_tbl.LAST);

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

251: x_ctcv_rec=>x_ctcv_tbl(i));
252: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
253: x_return_status := l_return_status;
254: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
255: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
256: x_return_status := l_return_status;
257: END IF;
258: EXIT WHEN (i=p_ctcv_tbl.LAST);
259: i := p_ctcv_tbl.NEXT(i);

Line 275: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,

271: -- Parameters :
272: -- Version : 1.0
273: -- End of comments
274: PROCEDURE delete_contact(p_api_version IN NUMBER,
275: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
276: x_return_status OUT NOCOPY VARCHAR2,
277: x_msg_count OUT NOCOPY NUMBER,
278: x_msg_data OUT NOCOPY VARCHAR2,
279: p_ctcv_rec IN ctcv_rec_type) IS

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

278: x_msg_data OUT NOCOPY VARCHAR2,
279: p_ctcv_rec IN ctcv_rec_type) IS
280: l_api_name CONSTANT VARCHAR2(30) := 'delete_contact';
281: l_api_version CONSTANT NUMBER := 1;
282: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
283: l_dnz_chr_id OKC_CONTACTS.DNZ_CHR_ID%TYPE;
284:
285: CURSOR cur_get_dnz_chr_id IS
286: SELECT dnz_chr_id

Line 352: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,

348: -- Parameters :
349: -- Version : 1.0
350: -- End of comments
351: PROCEDURE delete_contact(p_api_version IN NUMBER,
352: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
353: x_return_status OUT NOCOPY VARCHAR2,
354: x_msg_count OUT NOCOPY NUMBER,
355: x_msg_data OUT NOCOPY VARCHAR2,
356: p_ctcv_tbl IN ctcv_tbl_type) IS

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

354: x_msg_count OUT NOCOPY NUMBER,
355: x_msg_data OUT NOCOPY VARCHAR2,
356: p_ctcv_tbl IN ctcv_tbl_type) IS
357: i NUMBER;
358: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
359: BEGIN
360: OKC_API.init_msg_list(p_init_msg_list);
361: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
362: IF (p_ctcv_tbl.COUNT>0) THEN

Line 360: OKC_API.init_msg_list(p_init_msg_list);

356: p_ctcv_tbl IN ctcv_tbl_type) IS
357: i NUMBER;
358: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
359: BEGIN
360: OKC_API.init_msg_list(p_init_msg_list);
361: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
362: IF (p_ctcv_tbl.COUNT>0) THEN
363: i := p_ctcv_tbl.FIRST;
364: LOOP

Line 361: x_return_status:= OKC_API.G_RET_STS_SUCCESS;

357: i NUMBER;
358: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
359: BEGIN
360: OKC_API.init_msg_list(p_init_msg_list);
361: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
362: IF (p_ctcv_tbl.COUNT>0) THEN
363: i := p_ctcv_tbl.FIRST;
364: LOOP
365: delete_contact(p_api_version=>p_api_version,

Line 366: p_init_msg_list=>OKC_API.G_FALSE,

362: IF (p_ctcv_tbl.COUNT>0) THEN
363: i := p_ctcv_tbl.FIRST;
364: LOOP
365: delete_contact(p_api_version=>p_api_version,
366: p_init_msg_list=>OKC_API.G_FALSE,
367: x_return_status=>l_return_status,
368: x_msg_count=>x_msg_count,
369: x_msg_data=>x_msg_data,
370: p_ctcv_rec=>p_ctcv_tbl(i));

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

367: x_return_status=>l_return_status,
368: x_msg_count=>x_msg_count,
369: x_msg_data=>x_msg_data,
370: p_ctcv_rec=>p_ctcv_tbl(i));
371: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
372: x_return_status := l_return_status;
373: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
374: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) then
375: x_return_status := l_return_status;

Line 373: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

369: x_msg_data=>x_msg_data,
370: p_ctcv_rec=>p_ctcv_tbl(i));
371: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
372: x_return_status := l_return_status;
373: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
374: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) then
375: x_return_status := l_return_status;
376: END IF;
377: EXIT WHEN (i=p_ctcv_tbl.LAST);

Line 374: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) then

370: p_ctcv_rec=>p_ctcv_tbl(i));
371: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
372: x_return_status := l_return_status;
373: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
374: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) then
375: x_return_status := l_return_status;
376: END IF;
377: EXIT WHEN (i=p_ctcv_tbl.LAST);
378: i := p_ctcv_tbl.NEXT(i);

Line 394: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,

390: -- Parameters :
391: -- Version : 1.0
392: -- End of comments
393: PROCEDURE create_k_party_role(p_api_version IN NUMBER,
394: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
395: x_return_status OUT NOCOPY VARCHAR2,
396: x_msg_count OUT NOCOPY NUMBER,
397: x_msg_data OUT NOCOPY VARCHAR2,
398: p_cplv_rec IN cplv_rec_type,

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

398: p_cplv_rec IN cplv_rec_type,
399: x_cplv_rec OUT NOCOPY cplv_rec_type) is
400: l_api_name CONSTANT VARCHAR2(30) := 'create_k_party_role';
401: l_api_version CONSTANT NUMBER := 1;
402: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
403:
404: CURSOR C1(p_chr_id okc_k_party_roles_b.chr_id%TYPE,
405: p_rle_code okc_k_party_roles_b.rle_code%TYPE,
406: p_jtot_object1_code okc_k_party_roles_b.jtot_object1_code%TYPE,

Line 451: IF p_cplv_rec.chr_id IS NOT NULL AND p_cplv_rec.chr_id <> OKC_API.G_MISS_NUM THEN

447: l_return_status :=okl_api.g_ret_sts_error;
448: RAISE OKL_API.G_EXCEPTION_ERROR;
449: END IF;
450:
451: IF p_cplv_rec.chr_id IS NOT NULL AND p_cplv_rec.chr_id <> OKC_API.G_MISS_NUM THEN
452: OPEN c1(p_cplv_rec.chr_id,
453: p_cplv_rec.rle_code,
454: p_cplv_rec.jtot_object1_code,
455: p_cplv_rec.object1_id1,

Line 523: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,

519: -- Parameters :
520: -- Version : 1.0
521: -- End of comments
522: PROCEDURE create_k_party_role(p_api_version IN NUMBER,
523: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
524: x_return_status OUT NOCOPY VARCHAR2,
525: x_msg_count OUT NOCOPY NUMBER,
526: x_msg_data OUT NOCOPY VARCHAR2,
527: p_cplv_tbl IN cplv_tbl_type,

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

526: x_msg_data OUT NOCOPY VARCHAR2,
527: p_cplv_tbl IN cplv_tbl_type,
528: x_cplv_tbl OUT NOCOPY cplv_tbl_type) IS
529: i NUMBER;
530: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
531: BEGIN
532: OKC_API.init_msg_list(p_init_msg_list);
533: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
534: IF (p_cplv_tbl.COUNT>0) THEN

Line 532: OKC_API.init_msg_list(p_init_msg_list);

528: x_cplv_tbl OUT NOCOPY cplv_tbl_type) IS
529: i NUMBER;
530: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
531: BEGIN
532: OKC_API.init_msg_list(p_init_msg_list);
533: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
534: IF (p_cplv_tbl.COUNT>0) THEN
535: i := p_cplv_tbl.FIRST;
536: LOOP

Line 533: x_return_status:= OKC_API.G_RET_STS_SUCCESS;

529: i NUMBER;
530: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
531: BEGIN
532: OKC_API.init_msg_list(p_init_msg_list);
533: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
534: IF (p_cplv_tbl.COUNT>0) THEN
535: i := p_cplv_tbl.FIRST;
536: LOOP
537: create_k_party_role(p_api_version=>p_api_version,

Line 538: p_init_msg_list=>OKC_API.G_FALSE,

534: IF (p_cplv_tbl.COUNT>0) THEN
535: i := p_cplv_tbl.FIRST;
536: LOOP
537: create_k_party_role(p_api_version=>p_api_version,
538: p_init_msg_list=>OKC_API.G_FALSE,
539: x_return_status=>l_return_status,
540: x_msg_count=>x_msg_count,
541: x_msg_data=>x_msg_data,
542: p_cplv_rec=>p_cplv_tbl(i),

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

540: x_msg_count=>x_msg_count,
541: x_msg_data=>x_msg_data,
542: p_cplv_rec=>p_cplv_tbl(i),
543: x_cplv_rec=>x_cplv_tbl(i));
544: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
545: x_return_status := l_return_status;
546: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
547: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
548: x_return_status := l_return_status;

Line 546: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

542: p_cplv_rec=>p_cplv_tbl(i),
543: x_cplv_rec=>x_cplv_tbl(i));
544: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
545: x_return_status := l_return_status;
546: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
547: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
548: x_return_status := l_return_status;
549: END IF;
550: EXIT WHEN (i=p_cplv_tbl.LAST);

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

543: x_cplv_rec=>x_cplv_tbl(i));
544: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
545: x_return_status := l_return_status;
546: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
547: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
548: x_return_status := l_return_status;
549: END IF;
550: EXIT WHEN (i=p_cplv_tbl.LAST);
551: i := p_cplv_tbl.NEXT(i);

Line 567: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,

563: -- Parameters :
564: -- Version : 1.0
565: -- End of comments
566: PROCEDURE update_k_party_role(p_api_version IN NUMBER,
567: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
568: x_return_status OUT NOCOPY VARCHAR2,
569: x_msg_count OUT NOCOPY NUMBER,
570: x_msg_data OUT NOCOPY VARCHAR2,
571: p_cplv_rec IN cplv_rec_type,

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

571: p_cplv_rec IN cplv_rec_type,
572: x_cplv_rec OUT NOCOPY cplv_rec_type) IS
573: l_api_name CONSTANT VARCHAR2(30) := 'update_k_party_role';
574: l_api_version CONSTANT NUMBER := 1;
575: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
576: BEGIN
577: l_return_status := OKL_API.START_ACTIVITY(p_api_name => l_api_name
578: ,p_init_msg_list => p_init_msg_list
579: ,p_api_type => '_PVT'

Line 633: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,

629: -- Parameters :
630: -- Version : 1.0
631: -- End of comments
632: procedure update_k_party_role(p_api_version IN NUMBER,
633: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
634: x_return_status OUT NOCOPY VARCHAR2,
635: x_msg_count OUT NOCOPY NUMBER,
636: x_msg_data OUT NOCOPY VARCHAR2,
637: p_cplv_tbl IN cplv_tbl_type,

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

636: x_msg_data OUT NOCOPY VARCHAR2,
637: p_cplv_tbl IN cplv_tbl_type,
638: x_cplv_tbl OUT NOCOPY cplv_tbl_type) is
639: i NUMBER;
640: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
641: begin
642: OKC_API.init_msg_list(p_init_msg_list);
643: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
644: IF (p_cplv_tbl.COUNT>0) THEN

Line 642: OKC_API.init_msg_list(p_init_msg_list);

638: x_cplv_tbl OUT NOCOPY cplv_tbl_type) is
639: i NUMBER;
640: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
641: begin
642: OKC_API.init_msg_list(p_init_msg_list);
643: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
644: IF (p_cplv_tbl.COUNT>0) THEN
645: i := p_cplv_tbl.FIRST;
646: LOOP

Line 643: x_return_status:= OKC_API.G_RET_STS_SUCCESS;

639: i NUMBER;
640: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
641: begin
642: OKC_API.init_msg_list(p_init_msg_list);
643: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
644: IF (p_cplv_tbl.COUNT>0) THEN
645: i := p_cplv_tbl.FIRST;
646: LOOP
647: update_k_party_role(p_api_version=>p_api_version,

Line 648: p_init_msg_list=>OKC_API.G_FALSE,

644: IF (p_cplv_tbl.COUNT>0) THEN
645: i := p_cplv_tbl.FIRST;
646: LOOP
647: update_k_party_role(p_api_version=>p_api_version,
648: p_init_msg_list=>OKC_API.G_FALSE,
649: x_return_status=>l_return_status,
650: x_msg_count=>x_msg_count,
651: x_msg_data=>x_msg_data,
652: p_cplv_rec=>p_cplv_tbl(i),

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

650: x_msg_count=>x_msg_count,
651: x_msg_data=>x_msg_data,
652: p_cplv_rec=>p_cplv_tbl(i),
653: x_cplv_rec=>x_cplv_tbl(i));
654: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
655: x_return_status := l_return_status;
656: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
657: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
658: x_return_status := l_return_status;

Line 656: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

652: p_cplv_rec=>p_cplv_tbl(i),
653: x_cplv_rec=>x_cplv_tbl(i));
654: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
655: x_return_status := l_return_status;
656: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
657: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
658: x_return_status := l_return_status;
659: END IF;
660: EXIT WHEN (i=p_cplv_tbl.LAST);

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

653: x_cplv_rec=>x_cplv_tbl(i));
654: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
655: x_return_status := l_return_status;
656: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
657: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
658: x_return_status := l_return_status;
659: END IF;
660: EXIT WHEN (i=p_cplv_tbl.LAST);
661: i := p_cplv_tbl.NEXT(i);

Line 677: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,

673: -- Parameters :
674: -- Version : 1.0
675: -- End of comments
676: PROCEDURE delete_k_party_role(p_api_version IN NUMBER,
677: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
678: x_return_status OUT NOCOPY VARCHAR2,
679: x_msg_count OUT NOCOPY NUMBER,
680: x_msg_data OUT NOCOPY VARCHAR2,
681: p_cplv_rec IN cplv_rec_type) IS

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

681: p_cplv_rec IN cplv_rec_type) IS
682:
683: l_api_name CONSTANT VARCHAR2(30) := 'delete_k_party_role';
684: l_api_version CONSTANT NUMBER := 1;
685: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
686:
687:
688: l_dummy_var VARCHAR2(1) := '?';
689: l_rle_code_var VARCHAR2(30) DEFAULT NULL;

Line 823: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,

819: -- Parameters :
820: -- Version : 1.0
821: -- End of comments
822: PROCEDURE delete_k_party_role(p_api_version IN NUMBER,
823: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
824: x_return_status OUT NOCOPY VARCHAR2,
825: x_msg_count OUT NOCOPY NUMBER,
826: x_msg_data OUT NOCOPY VARCHAR2,
827: p_cplv_tbl IN cplv_tbl_type) IS

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

825: x_msg_count OUT NOCOPY NUMBER,
826: x_msg_data OUT NOCOPY VARCHAR2,
827: p_cplv_tbl IN cplv_tbl_type) IS
828: i NUMBER;
829: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
830: BEGIN
831: OKC_API.init_msg_list(p_init_msg_list);
832: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
833: IF (p_cplv_tbl.COUNT>0) THEN

Line 831: OKC_API.init_msg_list(p_init_msg_list);

827: p_cplv_tbl IN cplv_tbl_type) IS
828: i NUMBER;
829: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
830: BEGIN
831: OKC_API.init_msg_list(p_init_msg_list);
832: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
833: IF (p_cplv_tbl.COUNT>0) THEN
834: i := p_cplv_tbl.FIRST;
835: LOOP

Line 832: x_return_status:= OKC_API.G_RET_STS_SUCCESS;

828: i NUMBER;
829: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
830: BEGIN
831: OKC_API.init_msg_list(p_init_msg_list);
832: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
833: IF (p_cplv_tbl.COUNT>0) THEN
834: i := p_cplv_tbl.FIRST;
835: LOOP
836: delete_k_party_role(p_api_version=>p_api_version,

Line 837: p_init_msg_list=>OKC_API.G_FALSE,

833: IF (p_cplv_tbl.COUNT>0) THEN
834: i := p_cplv_tbl.FIRST;
835: LOOP
836: delete_k_party_role(p_api_version=>p_api_version,
837: p_init_msg_list=>OKC_API.G_FALSE,
838: x_return_status=>l_return_status,
839: x_msg_count=>x_msg_count,
840: x_msg_data=>x_msg_data,
841: p_cplv_rec=>p_cplv_tbl(i));

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

838: x_return_status=>l_return_status,
839: x_msg_count=>x_msg_count,
840: x_msg_data=>x_msg_data,
841: p_cplv_rec=>p_cplv_tbl(i));
842: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
843: x_return_status := l_return_status;
844: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
845: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
846: x_return_status := l_return_status;

Line 844: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

840: x_msg_data=>x_msg_data,
841: p_cplv_rec=>p_cplv_tbl(i));
842: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
843: x_return_status := l_return_status;
844: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
845: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
846: x_return_status := l_return_status;
847: END IF;
848: EXIT WHEN (i=p_cplv_tbl.LAST);

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

841: p_cplv_rec=>p_cplv_tbl(i));
842: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
843: x_return_status := l_return_status;
844: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
845: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
846: x_return_status := l_return_status;
847: END IF;
848: EXIT WHEN (i=p_cplv_tbl.LAST);
849: i := p_cplv_tbl.NEXT(i);