DBA Data[Home] [Help]

APPS.OKC_CHANGE_CONTRACT_PVT dependencies on OKC_API

Line 6: G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;

2: /* $Header: OKCRCHKB.pls 120.1 2005/11/21 12:06:16 dneetha noship $ */
3:
4: l_debug VARCHAR2(1) := NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N');
5: --
6: G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
7: G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKC_CHANGE_CONTRACT_PVT';
8: G_LEVEL CONSTANT VARCHAR2(4) := '_PVT';
9: l_api_version CONSTANT NUMBER := 1;
10: G_FND_APP CONSTANT VARCHAR2(200) := OKC_API.G_FND_APP;

Line 10: G_FND_APP CONSTANT VARCHAR2(200) := OKC_API.G_FND_APP;

6: G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
7: G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKC_CHANGE_CONTRACT_PVT';
8: G_LEVEL CONSTANT VARCHAR2(4) := '_PVT';
9: l_api_version CONSTANT NUMBER := 1;
10: G_FND_APP CONSTANT VARCHAR2(200) := OKC_API.G_FND_APP;
11: G_FORM_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := OKC_API.G_FORM_UNABLE_TO_RESERVE_REC;
12: --
13: G_PROCESS_NOT_FOR_APPROVAL CONSTANT varchar2(200) := 'OKC_PROCESS_NOT_FOR_APPROVAL';
14: G_WF_NAME_TOKEN CONSTANT varchar2(200) := 'WF_ITEM';

Line 11: G_FORM_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := OKC_API.G_FORM_UNABLE_TO_RESERVE_REC;

7: G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKC_CHANGE_CONTRACT_PVT';
8: G_LEVEL CONSTANT VARCHAR2(4) := '_PVT';
9: l_api_version CONSTANT NUMBER := 1;
10: G_FND_APP CONSTANT VARCHAR2(200) := OKC_API.G_FND_APP;
11: G_FORM_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := OKC_API.G_FORM_UNABLE_TO_RESERVE_REC;
12: --
13: G_PROCESS_NOT_FOR_APPROVAL CONSTANT varchar2(200) := 'OKC_PROCESS_NOT_FOR_APPROVAL';
14: G_WF_NAME_TOKEN CONSTANT varchar2(200) := 'WF_ITEM';
15: G_WF_P_NAME_TOKEN CONSTANT varchar2(200) := 'WF_PROCESS';

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

67: l_chgreq_date OKC_CHANGE_REQUESTS_V.DATETIME_REQUEST%TYPE;
68: --end san
69:
70: l_api_name CONSTANT VARCHAR2(30) := 'change_approval_start';
71: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
72: l1_crtv_rec OKC_CHANGE_REQUEST_PUB.crtv_rec_type;
73: L1_CPSV_REC OKC_CONTRACT_PUB.cpsv_rec_type;
74: L2_CPSV_REC OKC_CONTRACT_PUB.cpsv_rec_type;
75: l_msg_count NUMBER;

Line 105: NVL(C.USER_ID,OKC_API.G_MISS_NUM) AUTH_USER_ID,

101: substr(K.CONTRACT_NUMBER
102: ||K.CONTRACT_NUMBER_MODIFIER
103: ||C.NAME,1,240) KEY,
104: -- NVL(C.USER_ID,fnd_global.user_id) AUTH_USER_ID,
105: NVL(C.USER_ID,OKC_API.G_MISS_NUM) AUTH_USER_ID,
106: U.USER_NAME AUTH_USERNAME,
107: C.AUTHORITY REQUESTOR,
108: C.SIGNATURE_REQUIRED_YN
109: from okc_change_requests_v C,

Line 116: -- and U.USER_ID = NVL(cpr.USER_ID,OKC_API.G_MISS_NUM);

112: fnd_user_view U
113: where C.ID = p_change_request_id
114: and K.ID = C.CHR_ID
115: and cpr.crt_id = C.ID
116: -- and U.USER_ID = NVL(cpr.USER_ID,OKC_API.G_MISS_NUM);
117: and U.USER_ID = NVL(cpr.USER_ID,fnd_global.user_id);
118: --
119: --
120: l_wf_name varchar2(150);

Line 173: l_return_status := OKC_API.START_ACTIVITY(substr(l_api_name,1,26),

169: MO_GLOBAL.INIT('OKS');
170: --
171: -- start activity
172: --
173: l_return_status := OKC_API.START_ACTIVITY(substr(l_api_name,1,26),
174: G_PKG_NAME,
175: p_init_msg_list,
176: l_api_version,
177: p_api_version,

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

176: l_api_version,
177: p_api_version,
178: G_LEVEL,
179: x_return_status);
180: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
181: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
182: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
183: RAISE OKC_API.G_EXCEPTION_ERROR;
184: END IF;

Line 181: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

177: p_api_version,
178: G_LEVEL,
179: x_return_status);
180: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
181: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
182: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
183: RAISE OKC_API.G_EXCEPTION_ERROR;
184: END IF;
185: --

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

178: G_LEVEL,
179: x_return_status);
180: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
181: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
182: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
183: RAISE OKC_API.G_EXCEPTION_ERROR;
184: END IF;
185: --
186: -- get values

Line 183: RAISE OKC_API.G_EXCEPTION_ERROR;

179: x_return_status);
180: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
181: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
182: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
183: RAISE OKC_API.G_EXCEPTION_ERROR;
184: END IF;
185: --
186: -- get values
187: --

Line 206: If l_auth_user_id=OKC_API.G_MISS_NUM then

202: close key_csr;
203:
204: -- No administrator specified
205: --
206: If l_auth_user_id=OKC_API.G_MISS_NUM then
207: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
208: p_msg_name => G_ADMINISTRATOR_REQUIRED);
209: raise OKC_API.G_EXCEPTION_ERROR;
210: end if;

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

203:
204: -- No administrator specified
205: --
206: If l_auth_user_id=OKC_API.G_MISS_NUM then
207: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
208: p_msg_name => G_ADMINISTRATOR_REQUIRED);
209: raise OKC_API.G_EXCEPTION_ERROR;
210: end if;
211: --

Line 209: raise OKC_API.G_EXCEPTION_ERROR;

205: --
206: If l_auth_user_id=OKC_API.G_MISS_NUM then
207: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
208: p_msg_name => G_ADMINISTRATOR_REQUIRED);
209: raise OKC_API.G_EXCEPTION_ERROR;
210: end if;
211: --
212: --
213: -- authorised user has U privilege

Line 219: ) = OKC_API.G_FALSE

215: /* if OKC_CONTRACT_APPROVAL_PUB.k_accesible(
216: p_contract_id => l_contract_id,
217: p_user_id => l_auth_user_id,
218: p_level => 'U'
219: ) = OKC_API.G_FALSE
220: then
221: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
222: p_msg_name => G_A_NO_U_PRIVILEGE,
223: p_token1 => G_USER_NAME,

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

217: p_user_id => l_auth_user_id,
218: p_level => 'U'
219: ) = OKC_API.G_FALSE
220: then
221: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
222: p_msg_name => G_A_NO_U_PRIVILEGE,
223: p_token1 => G_USER_NAME,
224: p_token1_value => l_auth_username);
225: raise OKC_API.G_EXCEPTION_ERROR;

Line 225: raise OKC_API.G_EXCEPTION_ERROR;

221: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
222: p_msg_name => G_A_NO_U_PRIVILEGE,
223: p_token1 => G_USER_NAME,
224: p_token1_value => l_auth_username);
225: raise OKC_API.G_EXCEPTION_ERROR;
226: end if; */
227: --
228: -- try to lock crt (will not be locked if approved or on approval etc.
229: -- message raised inside lock procedure

Line 238: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

234: x_return_status => l_return_status,
235: x_msg_count => l_msg_count,
236: x_msg_data => l_msg_data,
237: p_crtv_rec => l1_crtv_rec);
238: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
239: RAISE OKC_API.G_EXCEPTION_ERROR;
240: END IF;
241: --
242: -- get wf name

Line 239: RAISE OKC_API.G_EXCEPTION_ERROR;

235: x_msg_count => l_msg_count,
236: x_msg_data => l_msg_data,
237: p_crtv_rec => l1_crtv_rec);
238: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
239: RAISE OKC_API.G_EXCEPTION_ERROR;
240: END IF;
241: --
242: -- get wf name
243: --

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

244: open process_def_csr;
245: fetch process_def_csr into l_process_id, L_WF_NAME, L_WF_PROCESS_NAME, L_USAGE;
246: close process_def_csr;
247: if (L_WF_NAME is NULL) then
248: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
249: p_msg_name => G_PROCESS_NOTFOUND);
250: raise OKC_API.G_EXCEPTION_ERROR;
251: end if;
252: if (L_USAGE <> 'CHG_REQ_APPROVE') then

Line 250: raise OKC_API.G_EXCEPTION_ERROR;

246: close process_def_csr;
247: if (L_WF_NAME is NULL) then
248: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
249: p_msg_name => G_PROCESS_NOTFOUND);
250: raise OKC_API.G_EXCEPTION_ERROR;
251: end if;
252: if (L_USAGE <> 'CHG_REQ_APPROVE') then
253: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
254: p_msg_name => G_PROCESS_NOT_FOR_APPROVAL,

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

249: p_msg_name => G_PROCESS_NOTFOUND);
250: raise OKC_API.G_EXCEPTION_ERROR;
251: end if;
252: if (L_USAGE <> 'CHG_REQ_APPROVE') then
253: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
254: p_msg_name => G_PROCESS_NOT_FOR_APPROVAL,
255: p_token1 => G_WF_NAME_TOKEN,
256: p_token1_value => L_WF_NAME,
257: p_token2 => G_WF_P_NAME_TOKEN,

Line 259: raise OKC_API.G_EXCEPTION_ERROR;

255: p_token1 => G_WF_NAME_TOKEN,
256: p_token1_value => L_WF_NAME,
257: p_token2 => G_WF_P_NAME_TOKEN,
258: p_token2_value => L_WF_PROCESS_NAME);
259: raise OKC_API.G_EXCEPTION_ERROR;
260: end if;
261: --
262: -- purge previous item if exists
263: --

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

273: begin
274: wf_purge.totalPerm(l_wf_name,l_key);
275: exception
276: when others then
277: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
278: p_msg_name => G_WF_NOT_PURGED,
279: p_token1 => G_WF_NAME_TOKEN,
280: p_token1_value => L_WF_NAME,
281: p_token2 => G_KEY_TOKEN,

Line 283: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

279: p_token1 => G_WF_NAME_TOKEN,
280: p_token1_value => L_WF_NAME,
281: p_token2 => G_KEY_TOKEN,
282: p_token2_value => L_KEY);
283: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
284: end;
285: end;
286: end if;
287: --

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

294: close k_pid;
295: exception
296: when others then
297: rollback to BECAUSE_OF_BUG_IN_lock;
298: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);
299: raise OKC_API.G_EXCEPTION_ERROR;
300: end;
301: L1_CPSV_REC.PROCESS_ID := L_KEY;
302: OKC_CONTRACT_PUB.update_contract_process(

Line 299: raise OKC_API.G_EXCEPTION_ERROR;

295: exception
296: when others then
297: rollback to BECAUSE_OF_BUG_IN_lock;
298: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);
299: raise OKC_API.G_EXCEPTION_ERROR;
300: end;
301: L1_CPSV_REC.PROCESS_ID := L_KEY;
302: OKC_CONTRACT_PUB.update_contract_process(
303: p_api_version => l_api_version,

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

305: x_msg_count => l_msg_count,
306: x_msg_data => l_msg_data,
307: p_cpsv_rec => L1_CPSV_REC,
308: x_cpsv_rec => L2_CPSV_REC);
309: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
310: rollback to BECAUSE_OF_BUG_IN_lock;
311: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
312: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
313: rollback to BECAUSE_OF_BUG_IN_lock;

Line 311: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

307: p_cpsv_rec => L1_CPSV_REC,
308: x_cpsv_rec => L2_CPSV_REC);
309: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
310: rollback to BECAUSE_OF_BUG_IN_lock;
311: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
312: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
313: rollback to BECAUSE_OF_BUG_IN_lock;
314: RAISE OKC_API.G_EXCEPTION_ERROR;
315: END IF;

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

308: x_cpsv_rec => L2_CPSV_REC);
309: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
310: rollback to BECAUSE_OF_BUG_IN_lock;
311: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
312: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
313: rollback to BECAUSE_OF_BUG_IN_lock;
314: RAISE OKC_API.G_EXCEPTION_ERROR;
315: END IF;
316: wf_engine.CreateProcess( ItemType => L_WF_NAME,

Line 314: RAISE OKC_API.G_EXCEPTION_ERROR;

310: rollback to BECAUSE_OF_BUG_IN_lock;
311: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
312: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
313: rollback to BECAUSE_OF_BUG_IN_lock;
314: RAISE OKC_API.G_EXCEPTION_ERROR;
315: END IF;
316: wf_engine.CreateProcess( ItemType => L_WF_NAME,
317: ItemKey => L_KEY,
318: process => L_WF_PROCESS_NAME);

Line 660: p_init_msg_list => OKC_API.G_FALSE,

656: fetch cur_chg into l_chgreq_date;
657: close cur_chg;
658:
659: OKC_CHG_REQ_ASMBLR_PVT.acn_assemble(p_api_version => 1,
660: p_init_msg_list => OKC_API.G_FALSE,
661: x_return_status => l_return_status,
662: x_msg_count => x_msg_count,
663: x_msg_data => x_msg_data,
664: p_k_id => l_contract_id,

Line 675: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

671: p_chreq_id => p_change_request_id,
672: p_chreq_date => l_chgreq_date
673: );
674:
675: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
676: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
677: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
678: RAISE OKC_API.G_EXCEPTION_ERROR;
679: END IF;

Line 676: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

672: p_chreq_date => l_chgreq_date
673: );
674:
675: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
676: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
677: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
678: RAISE OKC_API.G_EXCEPTION_ERROR;
679: END IF;
680: if (p_do_commit = OKC_API.G_TRUE) then

Line 677: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

673: );
674:
675: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
676: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
677: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
678: RAISE OKC_API.G_EXCEPTION_ERROR;
679: END IF;
680: if (p_do_commit = OKC_API.G_TRUE) then
681: commit;

Line 678: RAISE OKC_API.G_EXCEPTION_ERROR;

674:
675: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
676: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
677: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
678: RAISE OKC_API.G_EXCEPTION_ERROR;
679: END IF;
680: if (p_do_commit = OKC_API.G_TRUE) then
681: commit;
682: end if;

Line 680: if (p_do_commit = OKC_API.G_TRUE) then

676: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
677: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
678: RAISE OKC_API.G_EXCEPTION_ERROR;
679: END IF;
680: if (p_do_commit = OKC_API.G_TRUE) then
681: commit;
682: end if;
683: x_return_status := OKC_API.G_RET_STS_SUCCESS;
684: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 683: x_return_status := OKC_API.G_RET_STS_SUCCESS;

679: END IF;
680: if (p_do_commit = OKC_API.G_TRUE) then
681: commit;
682: end if;
683: x_return_status := OKC_API.G_RET_STS_SUCCESS;
684: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
685: EXCEPTION
686: WHEN OKC_API.G_EXCEPTION_ERROR THEN
687: x_return_status := OKC_API.HANDLE_EXCEPTIONS

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

680: if (p_do_commit = OKC_API.G_TRUE) then
681: commit;
682: end if;
683: x_return_status := OKC_API.G_RET_STS_SUCCESS;
684: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
685: EXCEPTION
686: WHEN OKC_API.G_EXCEPTION_ERROR THEN
687: x_return_status := OKC_API.HANDLE_EXCEPTIONS
688: (substr(l_api_name,1,26),

Line 686: WHEN OKC_API.G_EXCEPTION_ERROR THEN

682: end if;
683: x_return_status := OKC_API.G_RET_STS_SUCCESS;
684: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
685: EXCEPTION
686: WHEN OKC_API.G_EXCEPTION_ERROR THEN
687: x_return_status := OKC_API.HANDLE_EXCEPTIONS
688: (substr(l_api_name,1,26),
689: G_PKG_NAME,
690: 'OKC_API.G_RET_STS_ERROR',

Line 687: x_return_status := OKC_API.HANDLE_EXCEPTIONS

683: x_return_status := OKC_API.G_RET_STS_SUCCESS;
684: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
685: EXCEPTION
686: WHEN OKC_API.G_EXCEPTION_ERROR THEN
687: x_return_status := OKC_API.HANDLE_EXCEPTIONS
688: (substr(l_api_name,1,26),
689: G_PKG_NAME,
690: 'OKC_API.G_RET_STS_ERROR',
691: x_msg_count,

Line 690: 'OKC_API.G_RET_STS_ERROR',

686: WHEN OKC_API.G_EXCEPTION_ERROR THEN
687: x_return_status := OKC_API.HANDLE_EXCEPTIONS
688: (substr(l_api_name,1,26),
689: G_PKG_NAME,
690: 'OKC_API.G_RET_STS_ERROR',
691: x_msg_count,
692: x_msg_data,
693: G_LEVEL);
694: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 694: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

690: 'OKC_API.G_RET_STS_ERROR',
691: x_msg_count,
692: x_msg_data,
693: G_LEVEL);
694: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
695: x_return_status := OKC_API.HANDLE_EXCEPTIONS
696: (substr(l_api_name,1,26),
697: G_PKG_NAME,
698: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 695: x_return_status := OKC_API.HANDLE_EXCEPTIONS

691: x_msg_count,
692: x_msg_data,
693: G_LEVEL);
694: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
695: x_return_status := OKC_API.HANDLE_EXCEPTIONS
696: (substr(l_api_name,1,26),
697: G_PKG_NAME,
698: 'OKC_API.G_RET_STS_UNEXP_ERROR',
699: x_msg_count,

Line 698: 'OKC_API.G_RET_STS_UNEXP_ERROR',

694: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
695: x_return_status := OKC_API.HANDLE_EXCEPTIONS
696: (substr(l_api_name,1,26),
697: G_PKG_NAME,
698: 'OKC_API.G_RET_STS_UNEXP_ERROR',
699: x_msg_count,
700: x_msg_data,
701: G_LEVEL);
702: WHEN OTHERS THEN

Line 703: x_return_status := OKC_API.HANDLE_EXCEPTIONS

699: x_msg_count,
700: x_msg_data,
701: G_LEVEL);
702: WHEN OTHERS THEN
703: x_return_status := OKC_API.HANDLE_EXCEPTIONS
704: (substr(l_api_name,1,26),
705: G_PKG_NAME,
706: 'OTHERS',
707: x_msg_count,

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

803: p_change_request_id IN number,
804: p_do_commit IN VARCHAR2
805: ) is
806: l_api_name CONSTANT VARCHAR2(30) := 'change_approval_stop';
807: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
808: --
809: l_key varchar2(240);
810: l_contract_id number;
811: --

Line 839: l_return_status := OKC_API.START_ACTIVITY(substr(l_api_name,1,26),

835: MO_GLOBAL.INIT('OKS');
836: --
837: -- start activity
838: --
839: l_return_status := OKC_API.START_ACTIVITY(substr(l_api_name,1,26),
840: G_PKG_NAME,
841: p_init_msg_list,
842: l_api_version,
843: p_api_version,

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

842: l_api_version,
843: p_api_version,
844: G_LEVEL,
845: x_return_status);
846: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
847: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
848: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
849: RAISE OKC_API.G_EXCEPTION_ERROR;
850: END IF;

Line 847: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

843: p_api_version,
844: G_LEVEL,
845: x_return_status);
846: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
847: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
848: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
849: RAISE OKC_API.G_EXCEPTION_ERROR;
850: END IF;
851: --

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

844: G_LEVEL,
845: x_return_status);
846: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
847: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
848: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
849: RAISE OKC_API.G_EXCEPTION_ERROR;
850: END IF;
851: --
852: -- get values

Line 849: RAISE OKC_API.G_EXCEPTION_ERROR;

845: x_return_status);
846: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
847: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
848: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
849: RAISE OKC_API.G_EXCEPTION_ERROR;
850: END IF;
851: --
852: -- get values
853: --

Line 864: ) = OKC_API.G_FALSE

860: if OKC_CONTRACT_APPROVAL_PUB.k_accesible(
861: p_contract_id => l_contract_id,
862: p_user_id => fnd_global.user_id,
863: p_level => 'U'
864: ) = OKC_API.G_FALSE
865: then
866: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
867: p_msg_name => G_NO_U_PRIVILEGE);
868: raise OKC_API.G_EXCEPTION_ERROR;

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

862: p_user_id => fnd_global.user_id,
863: p_level => 'U'
864: ) = OKC_API.G_FALSE
865: then
866: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
867: p_msg_name => G_NO_U_PRIVILEGE);
868: raise OKC_API.G_EXCEPTION_ERROR;
869: end if;
870: --

Line 868: raise OKC_API.G_EXCEPTION_ERROR;

864: ) = OKC_API.G_FALSE
865: then
866: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
867: p_msg_name => G_NO_U_PRIVILEGE);
868: raise OKC_API.G_EXCEPTION_ERROR;
869: end if;
870: --
871: -- get active wf_item
872: --

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

874: fetch approval_active_csr into l_wf_name_active;
875: close approval_active_csr;
876: --
877: if l_wf_name_active is NULL then
878: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
879: p_msg_name => G_CRT_NOT_ON_APPROVAL);
880: raise OKC_API.G_EXCEPTION_ERROR;
881: end if;
882: wf_engine.abortprocess(l_wf_name_active,l_key);

Line 880: raise OKC_API.G_EXCEPTION_ERROR;

876: --
877: if l_wf_name_active is NULL then
878: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
879: p_msg_name => G_CRT_NOT_ON_APPROVAL);
880: raise OKC_API.G_EXCEPTION_ERROR;
881: end if;
882: wf_engine.abortprocess(l_wf_name_active,l_key);
883: if (p_do_commit = OKC_API.G_TRUE) then
884: commit;

Line 883: if (p_do_commit = OKC_API.G_TRUE) then

879: p_msg_name => G_CRT_NOT_ON_APPROVAL);
880: raise OKC_API.G_EXCEPTION_ERROR;
881: end if;
882: wf_engine.abortprocess(l_wf_name_active,l_key);
883: if (p_do_commit = OKC_API.G_TRUE) then
884: commit;
885: end if;
886: x_return_status := OKC_API.G_RET_STS_SUCCESS;
887: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 886: x_return_status := OKC_API.G_RET_STS_SUCCESS;

882: wf_engine.abortprocess(l_wf_name_active,l_key);
883: if (p_do_commit = OKC_API.G_TRUE) then
884: commit;
885: end if;
886: x_return_status := OKC_API.G_RET_STS_SUCCESS;
887: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
888: EXCEPTION
889: WHEN OKC_API.G_EXCEPTION_ERROR THEN
890: x_return_status := OKC_API.HANDLE_EXCEPTIONS

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

883: if (p_do_commit = OKC_API.G_TRUE) then
884: commit;
885: end if;
886: x_return_status := OKC_API.G_RET_STS_SUCCESS;
887: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
888: EXCEPTION
889: WHEN OKC_API.G_EXCEPTION_ERROR THEN
890: x_return_status := OKC_API.HANDLE_EXCEPTIONS
891: (substr(l_api_name,1,26),

Line 889: WHEN OKC_API.G_EXCEPTION_ERROR THEN

885: end if;
886: x_return_status := OKC_API.G_RET_STS_SUCCESS;
887: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
888: EXCEPTION
889: WHEN OKC_API.G_EXCEPTION_ERROR THEN
890: x_return_status := OKC_API.HANDLE_EXCEPTIONS
891: (substr(l_api_name,1,26),
892: G_PKG_NAME,
893: 'OKC_API.G_RET_STS_ERROR',

Line 890: x_return_status := OKC_API.HANDLE_EXCEPTIONS

886: x_return_status := OKC_API.G_RET_STS_SUCCESS;
887: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
888: EXCEPTION
889: WHEN OKC_API.G_EXCEPTION_ERROR THEN
890: x_return_status := OKC_API.HANDLE_EXCEPTIONS
891: (substr(l_api_name,1,26),
892: G_PKG_NAME,
893: 'OKC_API.G_RET_STS_ERROR',
894: x_msg_count,

Line 893: 'OKC_API.G_RET_STS_ERROR',

889: WHEN OKC_API.G_EXCEPTION_ERROR THEN
890: x_return_status := OKC_API.HANDLE_EXCEPTIONS
891: (substr(l_api_name,1,26),
892: G_PKG_NAME,
893: 'OKC_API.G_RET_STS_ERROR',
894: x_msg_count,
895: x_msg_data,
896: G_LEVEL);
897: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 897: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

893: 'OKC_API.G_RET_STS_ERROR',
894: x_msg_count,
895: x_msg_data,
896: G_LEVEL);
897: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
898: x_return_status := OKC_API.HANDLE_EXCEPTIONS
899: (substr(l_api_name,1,26),
900: G_PKG_NAME,
901: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 898: x_return_status := OKC_API.HANDLE_EXCEPTIONS

894: x_msg_count,
895: x_msg_data,
896: G_LEVEL);
897: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
898: x_return_status := OKC_API.HANDLE_EXCEPTIONS
899: (substr(l_api_name,1,26),
900: G_PKG_NAME,
901: 'OKC_API.G_RET_STS_UNEXP_ERROR',
902: x_msg_count,

Line 901: 'OKC_API.G_RET_STS_UNEXP_ERROR',

897: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
898: x_return_status := OKC_API.HANDLE_EXCEPTIONS
899: (substr(l_api_name,1,26),
900: G_PKG_NAME,
901: 'OKC_API.G_RET_STS_UNEXP_ERROR',
902: x_msg_count,
903: x_msg_data,
904: G_LEVEL);
905: WHEN OTHERS THEN

Line 906: x_return_status := OKC_API.HANDLE_EXCEPTIONS

902: x_msg_count,
903: x_msg_data,
904: G_LEVEL);
905: WHEN OTHERS THEN
906: x_return_status := OKC_API.HANDLE_EXCEPTIONS
907: (substr(l_api_name,1,26),
908: G_PKG_NAME,
909: 'OTHERS',
910: x_msg_count,

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

930: p_change_request_id IN number,
931: p_do_commit IN VARCHAR2
932: ) is
933: l_api_name CONSTANT VARCHAR2(30) := 'change_get_key';
934: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
935: l_crtv_rec OKC_CHANGE_REQUEST_PUB.crtv_rec_type;
936: l_cpsv_rec OKC_CONTRACT_PUB.cpsv_rec_type;
937: l1_cpsv_rec OKC_CONTRACT_PUB.cpsv_rec_type;
938: l_dummy varchar2(1) := '?';

Line 956: l_return_status := OKC_API.START_ACTIVITY(substr(l_api_name,1,26),

952: cursor process_csr is
953: select id,object_version_number from OKC_K_PROCESSES
954: where crt_id = p_change_request_id;
955: begin
956: l_return_status := OKC_API.START_ACTIVITY(substr(l_api_name,1,26),
957: G_PKG_NAME,
958: p_init_msg_list,
959: l_api_version,
960: p_api_version,

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

959: l_api_version,
960: p_api_version,
961: G_LEVEL,
962: x_return_status);
963: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
964: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
965: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
966: RAISE OKC_API.G_EXCEPTION_ERROR;
967: END IF;

Line 964: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

960: p_api_version,
961: G_LEVEL,
962: x_return_status);
963: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
964: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
965: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
966: RAISE OKC_API.G_EXCEPTION_ERROR;
967: END IF;
968: --

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

961: G_LEVEL,
962: x_return_status);
963: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
964: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
965: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
966: RAISE OKC_API.G_EXCEPTION_ERROR;
967: END IF;
968: --
969: l_crtv_rec.id := p_change_request_id;

Line 966: RAISE OKC_API.G_EXCEPTION_ERROR;

962: x_return_status);
963: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
964: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
965: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
966: RAISE OKC_API.G_EXCEPTION_ERROR;
967: END IF;
968: --
969: l_crtv_rec.id := p_change_request_id;
970: OKC_CHANGE_REQUEST_PUB.lock_change_request(

Line 975: p_restricted => OKC_API.G_FALSE,

971: p_api_version => p_api_version,
972: x_return_status => l_return_status,
973: x_msg_count => x_msg_count,
974: x_msg_data => x_msg_data,
975: p_restricted => OKC_API.G_FALSE,
976: p_crtv_rec => l_crtv_rec);
977: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
978: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
979: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

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

973: x_msg_count => x_msg_count,
974: x_msg_data => x_msg_data,
975: p_restricted => OKC_API.G_FALSE,
976: p_crtv_rec => l_crtv_rec);
977: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
978: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
979: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
980: RAISE OKC_API.G_EXCEPTION_ERROR;
981: END IF;

Line 978: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

974: x_msg_data => x_msg_data,
975: p_restricted => OKC_API.G_FALSE,
976: p_crtv_rec => l_crtv_rec);
977: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
978: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
979: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
980: RAISE OKC_API.G_EXCEPTION_ERROR;
981: END IF;
982: open in_use_csr;

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

975: p_restricted => OKC_API.G_FALSE,
976: p_crtv_rec => l_crtv_rec);
977: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
978: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
979: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
980: RAISE OKC_API.G_EXCEPTION_ERROR;
981: END IF;
982: open in_use_csr;
983: fetch in_use_csr into l_dummy;

Line 980: RAISE OKC_API.G_EXCEPTION_ERROR;

976: p_crtv_rec => l_crtv_rec);
977: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
978: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
979: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
980: RAISE OKC_API.G_EXCEPTION_ERROR;
981: END IF;
982: open in_use_csr;
983: fetch in_use_csr into l_dummy;
984: close in_use_csr;

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

982: open in_use_csr;
983: fetch in_use_csr into l_dummy;
984: close in_use_csr;
985: IF (l_dummy = '!') then
986: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);
987: RAISE OKC_API.G_EXCEPTION_ERROR;
988: END IF;
989: open process_csr;
990: fetch process_csr into l_cpsv_rec.id,l_cpsv_rec.object_version_number;

Line 987: RAISE OKC_API.G_EXCEPTION_ERROR;

983: fetch in_use_csr into l_dummy;
984: close in_use_csr;
985: IF (l_dummy = '!') then
986: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);
987: RAISE OKC_API.G_EXCEPTION_ERROR;
988: END IF;
989: open process_csr;
990: fetch process_csr into l_cpsv_rec.id,l_cpsv_rec.object_version_number;
991: close process_csr;

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

994: x_return_status => l_return_status,
995: x_msg_count => x_msg_count,
996: x_msg_data => x_msg_data,
997: p_cpsv_rec => l_cpsv_rec);
998: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
999: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1000: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1001: RAISE OKC_API.G_EXCEPTION_ERROR;
1002: END IF;

Line 999: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

995: x_msg_count => x_msg_count,
996: x_msg_data => x_msg_data,
997: p_cpsv_rec => l_cpsv_rec);
998: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
999: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1000: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1001: RAISE OKC_API.G_EXCEPTION_ERROR;
1002: END IF;
1003: l_cpsv_rec.in_process_yn := 'Y';

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

996: x_msg_data => x_msg_data,
997: p_cpsv_rec => l_cpsv_rec);
998: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
999: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1000: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1001: RAISE OKC_API.G_EXCEPTION_ERROR;
1002: END IF;
1003: l_cpsv_rec.in_process_yn := 'Y';
1004: l_cpsv_rec.user_id := fnd_global.user_id;

Line 1001: RAISE OKC_API.G_EXCEPTION_ERROR;

997: p_cpsv_rec => l_cpsv_rec);
998: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
999: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1000: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1001: RAISE OKC_API.G_EXCEPTION_ERROR;
1002: END IF;
1003: l_cpsv_rec.in_process_yn := 'Y';
1004: l_cpsv_rec.user_id := fnd_global.user_id;
1005: OKC_CONTRACT_PUB.update_contract_process(

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

1008: x_msg_count => x_msg_count,
1009: x_msg_data => x_msg_data,
1010: p_cpsv_rec => l_cpsv_rec,
1011: x_cpsv_rec => l1_cpsv_rec);
1012: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1013: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1014: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1015: RAISE OKC_API.G_EXCEPTION_ERROR;
1016: END IF;

Line 1013: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1009: x_msg_data => x_msg_data,
1010: p_cpsv_rec => l_cpsv_rec,
1011: x_cpsv_rec => l1_cpsv_rec);
1012: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1013: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1014: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1015: RAISE OKC_API.G_EXCEPTION_ERROR;
1016: END IF;
1017: --

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

1010: p_cpsv_rec => l_cpsv_rec,
1011: x_cpsv_rec => l1_cpsv_rec);
1012: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1013: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1014: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1015: RAISE OKC_API.G_EXCEPTION_ERROR;
1016: END IF;
1017: --
1018: if (p_do_commit = OKC_API.G_TRUE) then

Line 1015: RAISE OKC_API.G_EXCEPTION_ERROR;

1011: x_cpsv_rec => l1_cpsv_rec);
1012: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1013: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1014: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1015: RAISE OKC_API.G_EXCEPTION_ERROR;
1016: END IF;
1017: --
1018: if (p_do_commit = OKC_API.G_TRUE) then
1019: commit;

Line 1018: if (p_do_commit = OKC_API.G_TRUE) then

1014: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1015: RAISE OKC_API.G_EXCEPTION_ERROR;
1016: END IF;
1017: --
1018: if (p_do_commit = OKC_API.G_TRUE) then
1019: commit;
1020: end if;
1021: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1022: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 1021: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1017: --
1018: if (p_do_commit = OKC_API.G_TRUE) then
1019: commit;
1020: end if;
1021: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1022: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1023: EXCEPTION
1024: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1025: x_return_status := OKC_API.HANDLE_EXCEPTIONS

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

1018: if (p_do_commit = OKC_API.G_TRUE) then
1019: commit;
1020: end if;
1021: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1022: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1023: EXCEPTION
1024: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1025: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1026: (substr(l_api_name,1,26),

Line 1024: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1020: end if;
1021: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1022: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1023: EXCEPTION
1024: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1025: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1026: (substr(l_api_name,1,26),
1027: G_PKG_NAME,
1028: 'OKC_API.G_RET_STS_ERROR',

Line 1025: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1021: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1022: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1023: EXCEPTION
1024: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1025: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1026: (substr(l_api_name,1,26),
1027: G_PKG_NAME,
1028: 'OKC_API.G_RET_STS_ERROR',
1029: x_msg_count,

Line 1028: 'OKC_API.G_RET_STS_ERROR',

1024: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1025: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1026: (substr(l_api_name,1,26),
1027: G_PKG_NAME,
1028: 'OKC_API.G_RET_STS_ERROR',
1029: x_msg_count,
1030: x_msg_data,
1031: G_LEVEL);
1032: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1032: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1028: 'OKC_API.G_RET_STS_ERROR',
1029: x_msg_count,
1030: x_msg_data,
1031: G_LEVEL);
1032: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1033: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1034: (substr(l_api_name,1,26),
1035: G_PKG_NAME,
1036: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1033: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1029: x_msg_count,
1030: x_msg_data,
1031: G_LEVEL);
1032: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1033: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1034: (substr(l_api_name,1,26),
1035: G_PKG_NAME,
1036: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1037: x_msg_count,

Line 1036: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1032: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1033: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1034: (substr(l_api_name,1,26),
1035: G_PKG_NAME,
1036: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1037: x_msg_count,
1038: x_msg_data,
1039: G_LEVEL);
1040: WHEN OTHERS THEN

Line 1041: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1037: x_msg_count,
1038: x_msg_data,
1039: G_LEVEL);
1040: WHEN OTHERS THEN
1041: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1042: (substr(l_api_name,1,26),
1043: G_PKG_NAME,
1044: 'OTHERS',
1045: x_msg_count,

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

1067: p_k_version IN VARCHAR2,
1068: p_do_commit IN VARCHAR2
1069: ) is
1070: l_api_name CONSTANT VARCHAR2(30) := 'change_put_key';
1071: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1072: l_crtv_rec OKC_CHANGE_REQUEST_PUB.crtv_rec_type;
1073: l1_crtv_rec OKC_CHANGE_REQUEST_PUB.crtv_rec_type;
1074: l_cpsv_rec OKC_CONTRACT_PUB.cpsv_rec_type;
1075: l1_cpsv_rec OKC_CONTRACT_PUB.cpsv_rec_type;

Line 1081: l_return_status := OKC_API.START_ACTIVITY(substr(l_api_name,1,26),

1077: cursor process_csr is
1078: select id,object_version_number from OKC_K_PROCESSES
1079: where crt_id = p_change_request_id;
1080: begin
1081: l_return_status := OKC_API.START_ACTIVITY(substr(l_api_name,1,26),
1082: G_PKG_NAME,
1083: p_init_msg_list,
1084: l_api_version,
1085: p_api_version,

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

1084: l_api_version,
1085: p_api_version,
1086: G_LEVEL,
1087: x_return_status);
1088: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1089: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1090: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1091: RAISE OKC_API.G_EXCEPTION_ERROR;
1092: END IF;

Line 1089: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1085: p_api_version,
1086: G_LEVEL,
1087: x_return_status);
1088: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1089: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1090: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1091: RAISE OKC_API.G_EXCEPTION_ERROR;
1092: END IF;
1093: --

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

1086: G_LEVEL,
1087: x_return_status);
1088: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1089: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1090: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1091: RAISE OKC_API.G_EXCEPTION_ERROR;
1092: END IF;
1093: --
1094: l_crtv_rec.id := p_change_request_id;

Line 1091: RAISE OKC_API.G_EXCEPTION_ERROR;

1087: x_return_status);
1088: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1089: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1090: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1091: RAISE OKC_API.G_EXCEPTION_ERROR;
1092: END IF;
1093: --
1094: l_crtv_rec.id := p_change_request_id;
1095: OKC_CHANGE_REQUEST_PUB.lock_change_request(

Line 1100: p_restricted => OKC_API.G_FALSE,

1096: p_api_version => p_api_version,
1097: x_return_status => l_return_status,
1098: x_msg_count => x_msg_count,
1099: x_msg_data => x_msg_data,
1100: p_restricted => OKC_API.G_FALSE,
1101: p_crtv_rec => l_crtv_rec);
1102: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1103: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1104: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

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

1098: x_msg_count => x_msg_count,
1099: x_msg_data => x_msg_data,
1100: p_restricted => OKC_API.G_FALSE,
1101: p_crtv_rec => l_crtv_rec);
1102: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1103: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1104: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1105: RAISE OKC_API.G_EXCEPTION_ERROR;
1106: END IF;

Line 1103: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1099: x_msg_data => x_msg_data,
1100: p_restricted => OKC_API.G_FALSE,
1101: p_crtv_rec => l_crtv_rec);
1102: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1103: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1104: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1105: RAISE OKC_API.G_EXCEPTION_ERROR;
1106: END IF;
1107: --

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

1100: p_restricted => OKC_API.G_FALSE,
1101: p_crtv_rec => l_crtv_rec);
1102: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1103: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1104: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1105: RAISE OKC_API.G_EXCEPTION_ERROR;
1106: END IF;
1107: --
1108: open process_csr;

Line 1105: RAISE OKC_API.G_EXCEPTION_ERROR;

1101: p_crtv_rec => l_crtv_rec);
1102: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1103: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1104: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1105: RAISE OKC_API.G_EXCEPTION_ERROR;
1106: END IF;
1107: --
1108: open process_csr;
1109: fetch process_csr into l_cpsv_rec.id,l_cpsv_rec.object_version_number;

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

1113: x_return_status => l_return_status,
1114: x_msg_count => x_msg_count,
1115: x_msg_data => x_msg_data,
1116: p_cpsv_rec => l_cpsv_rec);
1117: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1118: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1119: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1120: RAISE OKC_API.G_EXCEPTION_ERROR;
1121: END IF;

Line 1118: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1114: x_msg_count => x_msg_count,
1115: x_msg_data => x_msg_data,
1116: p_cpsv_rec => l_cpsv_rec);
1117: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1118: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1119: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1120: RAISE OKC_API.G_EXCEPTION_ERROR;
1121: END IF;
1122: --

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

1115: x_msg_data => x_msg_data,
1116: p_cpsv_rec => l_cpsv_rec);
1117: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1118: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1119: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1120: RAISE OKC_API.G_EXCEPTION_ERROR;
1121: END IF;
1122: --
1123: l_cpsv_rec.in_process_yn := 'N';

Line 1120: RAISE OKC_API.G_EXCEPTION_ERROR;

1116: p_cpsv_rec => l_cpsv_rec);
1117: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1118: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1119: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1120: RAISE OKC_API.G_EXCEPTION_ERROR;
1121: END IF;
1122: --
1123: l_cpsv_rec.in_process_yn := 'N';
1124: OKC_CONTRACT_PUB.update_contract_process(

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

1127: x_msg_count => x_msg_count,
1128: x_msg_data => x_msg_data,
1129: p_cpsv_rec => l_cpsv_rec,
1130: x_cpsv_rec => l1_cpsv_rec);
1131: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1132: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1133: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1134: RAISE OKC_API.G_EXCEPTION_ERROR;
1135: END IF;

Line 1132: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1128: x_msg_data => x_msg_data,
1129: p_cpsv_rec => l_cpsv_rec,
1130: x_cpsv_rec => l1_cpsv_rec);
1131: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1132: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1133: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1134: RAISE OKC_API.G_EXCEPTION_ERROR;
1135: END IF;
1136: l_crtv_rec.datetime_applied := p_datetime_applied;

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

1129: p_cpsv_rec => l_cpsv_rec,
1130: x_cpsv_rec => l1_cpsv_rec);
1131: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1132: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1133: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1134: RAISE OKC_API.G_EXCEPTION_ERROR;
1135: END IF;
1136: l_crtv_rec.datetime_applied := p_datetime_applied;
1137: l_crtv_rec.applied_contract_version := p_k_version;

Line 1134: RAISE OKC_API.G_EXCEPTION_ERROR;

1130: x_cpsv_rec => l1_cpsv_rec);
1131: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1132: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1133: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1134: RAISE OKC_API.G_EXCEPTION_ERROR;
1135: END IF;
1136: l_crtv_rec.datetime_applied := p_datetime_applied;
1137: l_crtv_rec.applied_contract_version := p_k_version;
1138: OKC_CHANGE_REQUEST_PUB.update_change_request(

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

1141: x_msg_count => x_msg_count,
1142: x_msg_data => x_msg_data,
1143: p_crtv_rec => l_crtv_rec,
1144: x_crtv_rec => l1_crtv_rec);
1145: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1146: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1147: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1148: RAISE OKC_API.G_EXCEPTION_ERROR;
1149: END IF;

Line 1146: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1142: x_msg_data => x_msg_data,
1143: p_crtv_rec => l_crtv_rec,
1144: x_crtv_rec => l1_crtv_rec);
1145: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1146: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1147: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1148: RAISE OKC_API.G_EXCEPTION_ERROR;
1149: END IF;
1150: --

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

1143: p_crtv_rec => l_crtv_rec,
1144: x_crtv_rec => l1_crtv_rec);
1145: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1146: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1147: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1148: RAISE OKC_API.G_EXCEPTION_ERROR;
1149: END IF;
1150: --
1151: if (p_do_commit = OKC_API.G_TRUE) then

Line 1148: RAISE OKC_API.G_EXCEPTION_ERROR;

1144: x_crtv_rec => l1_crtv_rec);
1145: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1146: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1147: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1148: RAISE OKC_API.G_EXCEPTION_ERROR;
1149: END IF;
1150: --
1151: if (p_do_commit = OKC_API.G_TRUE) then
1152: commit;

Line 1151: if (p_do_commit = OKC_API.G_TRUE) then

1147: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1148: RAISE OKC_API.G_EXCEPTION_ERROR;
1149: END IF;
1150: --
1151: if (p_do_commit = OKC_API.G_TRUE) then
1152: commit;
1153: end if;
1154: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1155: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 1154: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1150: --
1151: if (p_do_commit = OKC_API.G_TRUE) then
1152: commit;
1153: end if;
1154: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1155: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1156: EXCEPTION
1157: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1158: x_return_status := OKC_API.HANDLE_EXCEPTIONS

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

1151: if (p_do_commit = OKC_API.G_TRUE) then
1152: commit;
1153: end if;
1154: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1155: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1156: EXCEPTION
1157: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1158: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1159: (substr(l_api_name,1,26),

Line 1157: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1153: end if;
1154: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1155: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1156: EXCEPTION
1157: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1158: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1159: (substr(l_api_name,1,26),
1160: G_PKG_NAME,
1161: 'OKC_API.G_RET_STS_ERROR',

Line 1158: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1154: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1155: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1156: EXCEPTION
1157: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1158: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1159: (substr(l_api_name,1,26),
1160: G_PKG_NAME,
1161: 'OKC_API.G_RET_STS_ERROR',
1162: x_msg_count,

Line 1161: 'OKC_API.G_RET_STS_ERROR',

1157: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1158: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1159: (substr(l_api_name,1,26),
1160: G_PKG_NAME,
1161: 'OKC_API.G_RET_STS_ERROR',
1162: x_msg_count,
1163: x_msg_data,
1164: G_LEVEL);
1165: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1165: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1161: 'OKC_API.G_RET_STS_ERROR',
1162: x_msg_count,
1163: x_msg_data,
1164: G_LEVEL);
1165: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1166: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1167: (substr(l_api_name,1,26),
1168: G_PKG_NAME,
1169: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1166: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1162: x_msg_count,
1163: x_msg_data,
1164: G_LEVEL);
1165: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1166: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1167: (substr(l_api_name,1,26),
1168: G_PKG_NAME,
1169: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1170: x_msg_count,

Line 1169: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1165: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1166: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1167: (substr(l_api_name,1,26),
1168: G_PKG_NAME,
1169: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1170: x_msg_count,
1171: x_msg_data,
1172: G_LEVEL);
1173: WHEN OTHERS THEN

Line 1174: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1170: x_msg_count,
1171: x_msg_data,
1172: G_LEVEL);
1173: WHEN OTHERS THEN
1174: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1175: (substr(l_api_name,1,26),
1176: G_PKG_NAME,
1177: 'OTHERS',
1178: x_msg_count,

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

1248: x_msg_count => l_msg_count,
1249: x_msg_data => l_msg_data,
1250: p_crtv_rec => l_crtv_rec,
1251: x_crtv_rec => l1_crtv_rec);
1252: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1253: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1254: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1255: RAISE OKC_API.G_EXCEPTION_ERROR;
1256: END IF;

Line 1253: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1249: x_msg_data => l_msg_data,
1250: p_crtv_rec => l_crtv_rec,
1251: x_crtv_rec => l1_crtv_rec);
1252: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1253: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1254: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1255: RAISE OKC_API.G_EXCEPTION_ERROR;
1256: END IF;
1257:

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

1250: p_crtv_rec => l_crtv_rec,
1251: x_crtv_rec => l1_crtv_rec);
1252: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1253: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1254: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1255: RAISE OKC_API.G_EXCEPTION_ERROR;
1256: END IF;
1257:
1258: OPEN cur_header;

Line 1255: RAISE OKC_API.G_EXCEPTION_ERROR;

1251: x_crtv_rec => l1_crtv_rec);
1252: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1253: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1254: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1255: RAISE OKC_API.G_EXCEPTION_ERROR;
1256: END IF;
1257:
1258: OPEN cur_header;
1259: FETCH cur_header into l_chr_id,l_contract_number,l_contract_modifier,l_scs_code,l_cls_code,

Line 1264: p_init_msg_list => OKC_API.G_FALSE,

1260: l_estimated_amount,l_k_status_code;
1261: CLOSE cur_header;
1262:
1263: OKC_CHG_APR_ASMBLR_PVT.acn_assemble(p_api_version => 1,
1264: p_init_msg_list => OKC_API.G_FALSE,
1265: x_return_status => x_return_status,
1266: x_msg_count => l_msg_count,
1267: x_msg_data => l_msg_data,
1268: p_k_class => l_cls_code,

Line 1279: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

1275: p_chapp_date => sysdate,
1276: p_change_id => p_change_request_id
1277: );
1278:
1279: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1280: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1281: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
1282: RAISE OKC_API.G_EXCEPTION_ERROR;
1283: END IF;

Line 1280: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1276: p_change_id => p_change_request_id
1277: );
1278:
1279: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1280: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1281: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
1282: RAISE OKC_API.G_EXCEPTION_ERROR;
1283: END IF;
1284: exception

Line 1281: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN

1277: );
1278:
1279: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1280: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1281: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
1282: RAISE OKC_API.G_EXCEPTION_ERROR;
1283: END IF;
1284: exception
1285: when OKC_API.G_EXCEPTION_ERROR then

Line 1282: RAISE OKC_API.G_EXCEPTION_ERROR;

1278:
1279: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1280: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1281: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
1282: RAISE OKC_API.G_EXCEPTION_ERROR;
1283: END IF;
1284: exception
1285: when OKC_API.G_EXCEPTION_ERROR then
1286: rollback to change_request_approved;

Line 1285: when OKC_API.G_EXCEPTION_ERROR then

1281: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
1282: RAISE OKC_API.G_EXCEPTION_ERROR;
1283: END IF;
1284: exception
1285: when OKC_API.G_EXCEPTION_ERROR then
1286: rollback to change_request_approved;
1287: db_failed('OKC_CH_APPROVE');
1288: x_return_status := OKC_API.G_RET_STS_ERROR;
1289: when others then

Line 1288: x_return_status := OKC_API.G_RET_STS_ERROR;

1284: exception
1285: when OKC_API.G_EXCEPTION_ERROR then
1286: rollback to change_request_approved;
1287: db_failed('OKC_CH_APPROVE');
1288: x_return_status := OKC_API.G_RET_STS_ERROR;
1289: when others then
1290: rollback to change_request_approved;
1291: db_failed('OKC_CH_APPROVE');
1292: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 1292: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1288: x_return_status := OKC_API.G_RET_STS_ERROR;
1289: when others then
1290: rollback to change_request_approved;
1291: db_failed('OKC_CH_APPROVE');
1292: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1293: end change_request_approved;
1294:
1295: -- Start of comments
1296: --

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

1344: x_msg_count => l_msg_count,
1345: x_msg_data => l_msg_data,
1346: p_crtv_rec => l_crtv_rec,
1347: x_crtv_rec => l1_crtv_rec);
1348: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1349: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1350: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1351: RAISE OKC_API.G_EXCEPTION_ERROR;
1352: END IF;

Line 1349: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1345: x_msg_data => l_msg_data,
1346: p_crtv_rec => l_crtv_rec,
1347: x_crtv_rec => l1_crtv_rec);
1348: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1349: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1350: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1351: RAISE OKC_API.G_EXCEPTION_ERROR;
1352: END IF;
1353: OPEN cur_header;

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

1346: p_crtv_rec => l_crtv_rec,
1347: x_crtv_rec => l1_crtv_rec);
1348: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1349: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1350: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1351: RAISE OKC_API.G_EXCEPTION_ERROR;
1352: END IF;
1353: OPEN cur_header;
1354: FETCH cur_header into l_chr_id,l_contract_number,l_contract_modifier,l_scs_code,

Line 1351: RAISE OKC_API.G_EXCEPTION_ERROR;

1347: x_crtv_rec => l1_crtv_rec);
1348: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1349: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1350: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1351: RAISE OKC_API.G_EXCEPTION_ERROR;
1352: END IF;
1353: OPEN cur_header;
1354: FETCH cur_header into l_chr_id,l_contract_number,l_contract_modifier,l_scs_code,
1355: l_cls_code,l_estimated_amount,l_k_status_code;

Line 1358: p_init_msg_list => OKC_API.G_FALSE,

1354: FETCH cur_header into l_chr_id,l_contract_number,l_contract_modifier,l_scs_code,
1355: l_cls_code,l_estimated_amount,l_k_status_code;
1356: CLOSE cur_header;
1357: OKC_CHG_REJ_ASMBLR_PVT.acn_assemble(p_api_version => 1,
1358: p_init_msg_list => OKC_API.G_FALSE,
1359: x_return_status => x_return_status,
1360: x_msg_count => l_msg_count,
1361: x_msg_data => l_msg_data,
1362: p_k_id => l_chr_id,

Line 1373: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

1369: p_k_status_code => l_k_status_code,
1370: p_estimated_amount => l_estimated_amount
1371: );
1372:
1373: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1374: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1375: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
1376: RAISE OKC_API.G_EXCEPTION_ERROR;
1377: END IF;

Line 1374: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1370: p_estimated_amount => l_estimated_amount
1371: );
1372:
1373: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1374: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1375: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
1376: RAISE OKC_API.G_EXCEPTION_ERROR;
1377: END IF;
1378: exception

Line 1375: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN

1371: );
1372:
1373: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1374: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1375: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
1376: RAISE OKC_API.G_EXCEPTION_ERROR;
1377: END IF;
1378: exception
1379: when OKC_API.G_EXCEPTION_ERROR then

Line 1376: RAISE OKC_API.G_EXCEPTION_ERROR;

1372:
1373: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1374: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1375: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
1376: RAISE OKC_API.G_EXCEPTION_ERROR;
1377: END IF;
1378: exception
1379: when OKC_API.G_EXCEPTION_ERROR then
1380: rollback to change_request_rejected;

Line 1379: when OKC_API.G_EXCEPTION_ERROR then

1375: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
1376: RAISE OKC_API.G_EXCEPTION_ERROR;
1377: END IF;
1378: exception
1379: when OKC_API.G_EXCEPTION_ERROR then
1380: rollback to change_request_rejected;
1381: db_failed('OKC_CH_REJECT');
1382: x_return_status := OKC_API.G_RET_STS_ERROR;
1383: when others then

Line 1382: x_return_status := OKC_API.G_RET_STS_ERROR;

1378: exception
1379: when OKC_API.G_EXCEPTION_ERROR then
1380: rollback to change_request_rejected;
1381: db_failed('OKC_CH_REJECT');
1382: x_return_status := OKC_API.G_RET_STS_ERROR;
1383: when others then
1384: rollback to change_request_rejected;
1385: db_failed('OKC_CH_REJECT');
1386: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 1386: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1382: x_return_status := OKC_API.G_RET_STS_ERROR;
1383: when others then
1384: rollback to change_request_rejected;
1385: db_failed('OKC_CH_REJECT');
1386: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1387: end change_request_rejected;
1388:
1389: end OKC_CHANGE_CONTRACT_PVT;