eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.OKE_CONTRACT_APPROVAL_PVT dependencies on OKE_API

Line 42: p_init_msg_list IN VARCHAR2 default OKE_API.G_FALSE,

38: -- End of comments
39:
40: procedure k_approval_start(
41: p_api_version IN NUMBER,
42: p_init_msg_list IN VARCHAR2 default OKE_API.G_FALSE,
43: x_return_status OUT NOCOPY VARCHAR2,
44: x_msg_count OUT NOCOPY NUMBER,
45: x_msg_data OUT NOCOPY VARCHAR2,
46: p_contract_id IN number,

Line 48: p_do_commit IN VARCHAR2 default OKE_API.G_TRUE

44: x_msg_count OUT NOCOPY NUMBER,
45: x_msg_data OUT NOCOPY VARCHAR2,
46: p_contract_id IN number,
47: p_process_id IN number,
48: p_do_commit IN VARCHAR2 default OKE_API.G_TRUE
49: ) is
50: l_api_name CONSTANT VARCHAR2(30) := 'k_approval_start';
51: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
52: --

Line 51: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;

47: p_process_id IN number,
48: p_do_commit IN VARCHAR2 default OKE_API.G_TRUE
49: ) is
50: l_api_name CONSTANT VARCHAR2(30) := 'k_approval_start';
51: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
52: --
53: l_key varchar2(240);
54: l_contract_number varchar2(120);
55: l_contract_number_modifier varchar2(120);

Line 128: l_return_status := OKE_API.START_ACTIVITY(substr(l_api_name,1,26),

124: from OKC_PROCESS_DEF_PARAMETERS_V
125: where PDF_ID = p_process_id;
126: --
127: begin
128: l_return_status := OKE_API.START_ACTIVITY(substr(l_api_name,1,26),
129: G_PKG_NAME,
130: p_init_msg_list,
131: l_api_version,
132: p_api_version,

Line 135: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN

131: l_api_version,
132: p_api_version,
133: G_LEVEL,
134: x_return_status);
135: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
136: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
137: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
138: RAISE OKE_API.G_EXCEPTION_ERROR;
139: END IF;

Line 136: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;

132: p_api_version,
133: G_LEVEL,
134: x_return_status);
135: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
136: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
137: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
138: RAISE OKE_API.G_EXCEPTION_ERROR;
139: END IF;
140: --

Line 137: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN

133: G_LEVEL,
134: x_return_status);
135: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
136: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
137: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
138: RAISE OKE_API.G_EXCEPTION_ERROR;
139: END IF;
140: --
141: /* if k_accesible( p_contract_id => p_contract_id,

Line 138: RAISE OKE_API.G_EXCEPTION_ERROR;

134: x_return_status);
135: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
136: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
137: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
138: RAISE OKE_API.G_EXCEPTION_ERROR;
139: END IF;
140: --
141: /* if k_accesible( p_contract_id => p_contract_id,
142: p_user_id => fnd_global.user_id,

Line 144: ) = OKE_API.G_FALSE

140: --
141: /* if k_accesible( p_contract_id => p_contract_id,
142: p_user_id => fnd_global.user_id,
143: p_level => 'U'
144: ) = OKE_API.G_FALSE
145: then
146: OKE_API.SET_MESSAGE(p_app_name => g_app_name,
147: p_msg_name => G_NO_U_PRIVILEGE);
148: raise OKE_API.G_EXCEPTION_ERROR;

Line 146: OKE_API.SET_MESSAGE(p_app_name => g_app_name,

142: p_user_id => fnd_global.user_id,
143: p_level => 'U'
144: ) = OKE_API.G_FALSE
145: then
146: OKE_API.SET_MESSAGE(p_app_name => g_app_name,
147: p_msg_name => G_NO_U_PRIVILEGE);
148: raise OKE_API.G_EXCEPTION_ERROR;
149: end if; */
150: open k_header_csr;

Line 148: raise OKE_API.G_EXCEPTION_ERROR;

144: ) = OKE_API.G_FALSE
145: then
146: OKE_API.SET_MESSAGE(p_app_name => g_app_name,
147: p_msg_name => G_NO_U_PRIVILEGE);
148: raise OKE_API.G_EXCEPTION_ERROR;
149: end if; */
150: open k_header_csr;
151: fetch k_header_csr
152: into L_CONTRACT_NUMBER, L_CONTRACT_NUMBER_MODIFIER, L_DATE_APPROVED, L_STATUS, L_STATUS_TYPE;

Line 155: OKE_API.SET_MESSAGE(p_app_name => g_app_name,

151: fetch k_header_csr
152: into L_CONTRACT_NUMBER, L_CONTRACT_NUMBER_MODIFIER, L_DATE_APPROVED, L_STATUS, L_STATUS_TYPE;
153: close k_header_csr;
154: if (L_DATE_APPROVED is not NULL) then
155: OKE_API.SET_MESSAGE(p_app_name => g_app_name,
156: p_msg_name => G_K_WAS_APPROVED);
157: raise OKE_API.G_EXCEPTION_ERROR;
158: end if;
159: if (L_STATUS_TYPE <> 'ENTERED') then

Line 157: raise OKE_API.G_EXCEPTION_ERROR;

153: close k_header_csr;
154: if (L_DATE_APPROVED is not NULL) then
155: OKE_API.SET_MESSAGE(p_app_name => g_app_name,
156: p_msg_name => G_K_WAS_APPROVED);
157: raise OKE_API.G_EXCEPTION_ERROR;
158: end if;
159: if (L_STATUS_TYPE <> 'ENTERED') then
160: OKE_API.SET_MESSAGE(p_app_name => g_app_name,
161: p_msg_name => 'OKC_INVALID_K_STATUS',

Line 160: OKE_API.SET_MESSAGE(p_app_name => g_app_name,

156: p_msg_name => G_K_WAS_APPROVED);
157: raise OKE_API.G_EXCEPTION_ERROR;
158: end if;
159: if (L_STATUS_TYPE <> 'ENTERED') then
160: OKE_API.SET_MESSAGE(p_app_name => g_app_name,
161: p_msg_name => 'OKC_INVALID_K_STATUS',
162: p_token1 => 'NUMBER',
163: p_token1_value => L_CONTRACT_NUMBER||'-'||L_CONTRACT_NUMBER_MODIFIER,
164: p_token2 => 'STATUS',

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

169: open process_def_csr;
170: fetch process_def_csr into L_WF_NAME, L_WF_PROCESS_NAME, L_USAGE;
171: close process_def_csr;
172: if (L_WF_NAME is NULL) then
173: OKE_API.SET_MESSAGE(p_app_name => g_app_name,
174: p_msg_name => G_PROCESS_NOTFOUND);
175: raise OKE_API.G_EXCEPTION_ERROR;
176: end if;
177: if (L_USAGE <> 'APPROVE') then

Line 175: raise OKE_API.G_EXCEPTION_ERROR;

171: close process_def_csr;
172: if (L_WF_NAME is NULL) then
173: OKE_API.SET_MESSAGE(p_app_name => g_app_name,
174: p_msg_name => G_PROCESS_NOTFOUND);
175: raise OKE_API.G_EXCEPTION_ERROR;
176: end if;
177: if (L_USAGE <> 'APPROVE') then
178: OKE_API.SET_MESSAGE(p_app_name => g_app_name,
179: p_msg_name => G_PROCESS_NOT_FOR_APPROVAL,

Line 178: OKE_API.SET_MESSAGE(p_app_name => g_app_name,

174: p_msg_name => G_PROCESS_NOTFOUND);
175: raise OKE_API.G_EXCEPTION_ERROR;
176: end if;
177: if (L_USAGE <> 'APPROVE') then
178: OKE_API.SET_MESSAGE(p_app_name => g_app_name,
179: p_msg_name => G_PROCESS_NOT_FOR_APPROVAL,
180: p_token1 => G_WF_NAME_TOKEN,
181: p_token1_value => L_WF_NAME,
182: p_token2 => G_WF_P_NAME_TOKEN,

Line 184: raise OKE_API.G_EXCEPTION_ERROR;

180: p_token1 => G_WF_NAME_TOKEN,
181: p_token1_value => L_WF_NAME,
182: p_token2 => G_WF_P_NAME_TOKEN,
183: p_token2_value => L_WF_PROCESS_NAME);
184: raise OKE_API.G_EXCEPTION_ERROR;
185: end if;
186: --
187: L_KEY := L_CONTRACT_NUMBER||L_CONTRACT_NUMBER_MODIFIER;
188: open approval_active_csr;

Line 192: OKE_API.SET_MESSAGE(p_app_name => g_app_name,

188: open approval_active_csr;
189: fetch approval_active_csr into L_WF_NAME_ACTIVE;
190: close approval_active_csr;
191: if (L_WF_NAME_ACTIVE is not NULL) then
192: OKE_API.SET_MESSAGE(p_app_name => g_app_name,
193: p_msg_name => G_K_ON_APPROVAL,
194: p_token1 => G_WF_NAME_TOKEN,
195: p_token1_value => L_WF_NAME_ACTIVE,
196: p_token2 => G_KEY_TOKEN,

Line 198: raise OKE_API.G_EXCEPTION_ERROR;

194: p_token1 => G_WF_NAME_TOKEN,
195: p_token1_value => L_WF_NAME_ACTIVE,
196: p_token2 => G_KEY_TOKEN,
197: p_token2_value => L_KEY);
198: raise OKE_API.G_EXCEPTION_ERROR;
199: end if;
200: --
201: L_Q:='?';
202: open for_purge_csr;

Line 214: OKE_API.SET_MESSAGE(p_app_name => g_app_name,

210: begin
211: wf_purge.totalPerm(l_wf_name,l_key);
212: exception
213: when others then
214: OKE_API.SET_MESSAGE(p_app_name => g_app_name,
215: p_msg_name => G_WF_NOT_PURGED,
216: p_token1 => G_WF_NAME_TOKEN,
217: p_token1_value => L_WF_NAME,
218: p_token2 => G_KEY_TOKEN,

Line 220: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;

216: p_token1 => G_WF_NAME_TOKEN,
217: p_token1_value => L_WF_NAME,
218: p_token2 => G_KEY_TOKEN,
219: p_token2_value => L_KEY);
220: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
221: end;
222: end;
223: end if;
224: --

Line 234: RAISE OKE_API.G_EXCEPTION_ERROR;

230: p_cpsv_rec => L1_CPSV_REC);
231: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
232: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
233: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
234: RAISE OKE_API.G_EXCEPTION_ERROR;
235: END IF;
236: */
237: begin
238: savepoint BECAUSE_OF_BUG_IN_lock;

Line 245: OKE_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);

241: close k_pid;
242: exception
243: when others then
244: rollback to BECAUSE_OF_BUG_IN_lock;
245: OKE_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);
246: RAISE OKE_API.G_EXCEPTION_ERROR;
247: end;
248: L1_CPSV_REC.PROCESS_ID := L_KEY;
249: OKC_CONTRACT_PUB.update_contract_process(

Line 246: RAISE OKE_API.G_EXCEPTION_ERROR;

242: exception
243: when others then
244: rollback to BECAUSE_OF_BUG_IN_lock;
245: OKE_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);
246: RAISE OKE_API.G_EXCEPTION_ERROR;
247: end;
248: L1_CPSV_REC.PROCESS_ID := L_KEY;
249: OKC_CONTRACT_PUB.update_contract_process(
250: p_api_version => l_api_version,

Line 256: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN

252: x_msg_count => l_msg_count,
253: x_msg_data => l_msg_data,
254: p_cpsv_rec => L1_CPSV_REC,
255: x_cpsv_rec => L2_CPSV_REC);
256: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
257: rollback to BECAUSE_OF_BUG_IN_lock;
258: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
259: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
260: rollback to BECAUSE_OF_BUG_IN_lock;

Line 258: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;

254: p_cpsv_rec => L1_CPSV_REC,
255: x_cpsv_rec => L2_CPSV_REC);
256: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
257: rollback to BECAUSE_OF_BUG_IN_lock;
258: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
259: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
260: rollback to BECAUSE_OF_BUG_IN_lock;
261: RAISE OKE_API.G_EXCEPTION_ERROR;
262: END IF;

Line 259: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN

255: x_cpsv_rec => L2_CPSV_REC);
256: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
257: rollback to BECAUSE_OF_BUG_IN_lock;
258: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
259: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
260: rollback to BECAUSE_OF_BUG_IN_lock;
261: RAISE OKE_API.G_EXCEPTION_ERROR;
262: END IF;
263: wf_engine.CreateProcess( ItemType => L_WF_NAME,

Line 261: RAISE OKE_API.G_EXCEPTION_ERROR;

257: rollback to BECAUSE_OF_BUG_IN_lock;
258: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
259: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
260: rollback to BECAUSE_OF_BUG_IN_lock;
261: RAISE OKE_API.G_EXCEPTION_ERROR;
262: END IF;
263: wf_engine.CreateProcess( ItemType => L_WF_NAME,
264: ItemKey => L_KEY,
265: process => L_WF_PROCESS_NAME);

Line 529: if (p_do_commit = OKE_API.G_TRUE) then

525: itemkey => L_KEY,
526: owner => fnd_global.user_name);
527: wf_engine.StartProcess( itemtype => L_WF_NAME,
528: itemkey => L_KEY);
529: if (p_do_commit = OKE_API.G_TRUE) then
530: commit;
531: end if;
532: x_return_status := OKE_API.G_RET_STS_SUCCESS;
533: OKE_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 532: x_return_status := OKE_API.G_RET_STS_SUCCESS;

528: itemkey => L_KEY);
529: if (p_do_commit = OKE_API.G_TRUE) then
530: commit;
531: end if;
532: x_return_status := OKE_API.G_RET_STS_SUCCESS;
533: OKE_API.END_ACTIVITY(x_msg_count, x_msg_data);
534: EXCEPTION
535: WHEN OKE_API.G_EXCEPTION_ERROR THEN
536: x_return_status := OKE_API.HANDLE_EXCEPTIONS

Line 533: OKE_API.END_ACTIVITY(x_msg_count, x_msg_data);

529: if (p_do_commit = OKE_API.G_TRUE) then
530: commit;
531: end if;
532: x_return_status := OKE_API.G_RET_STS_SUCCESS;
533: OKE_API.END_ACTIVITY(x_msg_count, x_msg_data);
534: EXCEPTION
535: WHEN OKE_API.G_EXCEPTION_ERROR THEN
536: x_return_status := OKE_API.HANDLE_EXCEPTIONS
537: (substr(l_api_name,1,26),

Line 535: WHEN OKE_API.G_EXCEPTION_ERROR THEN

531: end if;
532: x_return_status := OKE_API.G_RET_STS_SUCCESS;
533: OKE_API.END_ACTIVITY(x_msg_count, x_msg_data);
534: EXCEPTION
535: WHEN OKE_API.G_EXCEPTION_ERROR THEN
536: x_return_status := OKE_API.HANDLE_EXCEPTIONS
537: (substr(l_api_name,1,26),
538: G_PKG_NAME,
539: 'OKE_API.G_RET_STS_ERROR',

Line 536: x_return_status := OKE_API.HANDLE_EXCEPTIONS

532: x_return_status := OKE_API.G_RET_STS_SUCCESS;
533: OKE_API.END_ACTIVITY(x_msg_count, x_msg_data);
534: EXCEPTION
535: WHEN OKE_API.G_EXCEPTION_ERROR THEN
536: x_return_status := OKE_API.HANDLE_EXCEPTIONS
537: (substr(l_api_name,1,26),
538: G_PKG_NAME,
539: 'OKE_API.G_RET_STS_ERROR',
540: x_msg_count,

Line 539: 'OKE_API.G_RET_STS_ERROR',

535: WHEN OKE_API.G_EXCEPTION_ERROR THEN
536: x_return_status := OKE_API.HANDLE_EXCEPTIONS
537: (substr(l_api_name,1,26),
538: G_PKG_NAME,
539: 'OKE_API.G_RET_STS_ERROR',
540: x_msg_count,
541: x_msg_data,
542: G_LEVEL);
543: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 543: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

539: 'OKE_API.G_RET_STS_ERROR',
540: x_msg_count,
541: x_msg_data,
542: G_LEVEL);
543: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
544: x_return_status := OKE_API.HANDLE_EXCEPTIONS
545: (substr(l_api_name,1,26),
546: G_PKG_NAME,
547: 'OKE_API.G_RET_STS_UNEXP_ERROR',

Line 544: x_return_status := OKE_API.HANDLE_EXCEPTIONS

540: x_msg_count,
541: x_msg_data,
542: G_LEVEL);
543: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
544: x_return_status := OKE_API.HANDLE_EXCEPTIONS
545: (substr(l_api_name,1,26),
546: G_PKG_NAME,
547: 'OKE_API.G_RET_STS_UNEXP_ERROR',
548: x_msg_count,

Line 547: 'OKE_API.G_RET_STS_UNEXP_ERROR',

543: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
544: x_return_status := OKE_API.HANDLE_EXCEPTIONS
545: (substr(l_api_name,1,26),
546: G_PKG_NAME,
547: 'OKE_API.G_RET_STS_UNEXP_ERROR',
548: x_msg_count,
549: x_msg_data,
550: G_LEVEL);
551: WHEN OTHERS THEN

Line 552: x_return_status := OKE_API.HANDLE_EXCEPTIONS

548: x_msg_count,
549: x_msg_data,
550: G_LEVEL);
551: WHEN OTHERS THEN
552: x_return_status := OKE_API.HANDLE_EXCEPTIONS
553: (substr(l_api_name,1,26),
554: G_PKG_NAME,
555: 'OTHERS',
556: x_msg_count,

Line 635: p_init_msg_list IN VARCHAR2 default OKE_API.G_FALSE,

631: -- End of comments
632:
633: procedure k_approval_stop(
634: p_api_version IN NUMBER,
635: p_init_msg_list IN VARCHAR2 default OKE_API.G_FALSE,
636: x_return_status OUT NOCOPY VARCHAR2,
637: x_msg_count OUT NOCOPY NUMBER,
638: x_msg_data OUT NOCOPY VARCHAR2,
639: p_contract_id number,

Line 640: p_do_commit IN VARCHAR2 default OKE_API.G_TRUE

636: x_return_status OUT NOCOPY VARCHAR2,
637: x_msg_count OUT NOCOPY NUMBER,
638: x_msg_data OUT NOCOPY VARCHAR2,
639: p_contract_id number,
640: p_do_commit IN VARCHAR2 default OKE_API.G_TRUE
641: ) is
642: l_api_name CONSTANT VARCHAR2(30) := 'k_approval_stop';
643: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
644: --

Line 643: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;

639: p_contract_id number,
640: p_do_commit IN VARCHAR2 default OKE_API.G_TRUE
641: ) is
642: l_api_name CONSTANT VARCHAR2(30) := 'k_approval_stop';
643: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
644: --
645: l_q varchar2(1);
646: l_key varchar2(240);
647: l_wf_name_active varchar2(150);

Line 703: l_return_status := OKE_API.START_ACTIVITY(substr(l_api_name,1,26),

699: L_FINAL_APPROVER_UNAME varchar2(100);
700: L_INITIATOR_DISPLAY_NAME varchar2(200);
701: --
702: begin
703: l_return_status := OKE_API.START_ACTIVITY(substr(l_api_name,1,26),
704: G_PKG_NAME,
705: p_init_msg_list,
706: l_api_version,
707: p_api_version,

Line 710: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN

706: l_api_version,
707: p_api_version,
708: G_LEVEL,
709: x_return_status);
710: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
711: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
712: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
713: RAISE OKE_API.G_EXCEPTION_ERROR;
714: END IF;

Line 711: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;

707: p_api_version,
708: G_LEVEL,
709: x_return_status);
710: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
711: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
712: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
713: RAISE OKE_API.G_EXCEPTION_ERROR;
714: END IF;
715: --

Line 712: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN

708: G_LEVEL,
709: x_return_status);
710: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
711: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
712: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
713: RAISE OKE_API.G_EXCEPTION_ERROR;
714: END IF;
715: --
716: /* if k_accesible( p_contract_id => p_contract_id,

Line 713: RAISE OKE_API.G_EXCEPTION_ERROR;

709: x_return_status);
710: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
711: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
712: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
713: RAISE OKE_API.G_EXCEPTION_ERROR;
714: END IF;
715: --
716: /* if k_accesible( p_contract_id => p_contract_id,
717: p_user_id => fnd_global.user_id,

Line 719: ) = OKE_API.G_FALSE

715: --
716: /* if k_accesible( p_contract_id => p_contract_id,
717: p_user_id => fnd_global.user_id,
718: p_level => 'U'
719: ) = OKE_API.G_FALSE
720: then
721: OKE_API.SET_MESSAGE(p_app_name => g_app_name,
722: p_msg_name => G_NO_U_PRIVILEGE);
723: raise OKE_API.G_EXCEPTION_ERROR;

Line 721: OKE_API.SET_MESSAGE(p_app_name => g_app_name,

717: p_user_id => fnd_global.user_id,
718: p_level => 'U'
719: ) = OKE_API.G_FALSE
720: then
721: OKE_API.SET_MESSAGE(p_app_name => g_app_name,
722: p_msg_name => G_NO_U_PRIVILEGE);
723: raise OKE_API.G_EXCEPTION_ERROR;
724: end if; */
725: --

Line 723: raise OKE_API.G_EXCEPTION_ERROR;

719: ) = OKE_API.G_FALSE
720: then
721: OKE_API.SET_MESSAGE(p_app_name => g_app_name,
722: p_msg_name => G_NO_U_PRIVILEGE);
723: raise OKE_API.G_EXCEPTION_ERROR;
724: end if; */
725: --
726: open wf_key_csr;
727: fetch wf_key_csr into L_KEY,l_contract_number,l_contract_number_modifier,L_K_SHORT_DESCRIPTION;

Line 735: OKE_API.SET_MESSAGE(p_app_name => g_app_name,

731: fetch approval_active_csr into l_wf_name_active;
732: close approval_active_csr;
733: --
734: if l_wf_name_active is NULL then
735: OKE_API.SET_MESSAGE(p_app_name => g_app_name,
736: p_msg_name => G_K_NOT_ON_APPROVAL);
737: raise OKE_API.G_EXCEPTION_ERROR;
738: end if;
739: wf_engine.abortprocess(l_wf_name_active,l_key);

Line 737: raise OKE_API.G_EXCEPTION_ERROR;

733: --
734: if l_wf_name_active is NULL then
735: OKE_API.SET_MESSAGE(p_app_name => g_app_name,
736: p_msg_name => G_K_NOT_ON_APPROVAL);
737: raise OKE_API.G_EXCEPTION_ERROR;
738: end if;
739: wf_engine.abortprocess(l_wf_name_active,l_key);
740: k_erase_approved(
741: p_contract_id => p_contract_id,

Line 744: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN

740: k_erase_approved(
741: p_contract_id => p_contract_id,
742: x_return_status => l_return_status
743: );
744: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
745: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
746: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
747: RAISE OKE_API.G_EXCEPTION_ERROR;
748: END IF;

Line 745: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;

741: p_contract_id => p_contract_id,
742: x_return_status => l_return_status
743: );
744: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
745: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
746: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
747: RAISE OKE_API.G_EXCEPTION_ERROR;
748: END IF;
749: --+

Line 746: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN

742: x_return_status => l_return_status
743: );
744: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
745: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
746: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
747: RAISE OKE_API.G_EXCEPTION_ERROR;
748: END IF;
749: --+
750: L_Q:='?';

Line 747: RAISE OKE_API.G_EXCEPTION_ERROR;

743: );
744: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
745: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
746: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
747: RAISE OKE_API.G_EXCEPTION_ERROR;
748: END IF;
749: --+
750: L_Q:='?';
751: open abort_csr;

Line 776: OKE_API.SET_MESSAGE(p_app_name => g_app_name,

772: begin
773: wf_purge.totalPerm(l_wf_name_active,l_key);
774: exception
775: when others then
776: OKE_API.SET_MESSAGE(p_app_name => g_app_name,
777: p_msg_name => G_WF_NOT_PURGED,
778: p_token1 => G_WF_NAME_TOKEN,
779: p_token1_value => l_wf_name_active,
780: p_token2 => G_KEY_TOKEN,

Line 782: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;

778: p_token1 => G_WF_NAME_TOKEN,
779: p_token1_value => l_wf_name_active,
780: p_token2 => G_KEY_TOKEN,
781: p_token2_value => L_KEY);
782: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
783: end;
784: end;
785: wf_engine.CreateProcess( ItemType => l_wf_name_active,
786: ItemKey => L_KEY,

Line 1051: if (p_do_commit = OKE_API.G_TRUE) then

1047: itemkey => L_KEY);
1048:
1049: end if;--+ abort process exists
1050: --
1051: if (p_do_commit = OKE_API.G_TRUE) then
1052: commit;
1053: end if;
1054: x_return_status := OKE_API.G_RET_STS_SUCCESS;
1055: OKE_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 1054: x_return_status := OKE_API.G_RET_STS_SUCCESS;

1050: --
1051: if (p_do_commit = OKE_API.G_TRUE) then
1052: commit;
1053: end if;
1054: x_return_status := OKE_API.G_RET_STS_SUCCESS;
1055: OKE_API.END_ACTIVITY(x_msg_count, x_msg_data);
1056: EXCEPTION
1057: WHEN OKE_API.G_EXCEPTION_ERROR THEN
1058: x_return_status := OKE_API.HANDLE_EXCEPTIONS

Line 1055: OKE_API.END_ACTIVITY(x_msg_count, x_msg_data);

1051: if (p_do_commit = OKE_API.G_TRUE) then
1052: commit;
1053: end if;
1054: x_return_status := OKE_API.G_RET_STS_SUCCESS;
1055: OKE_API.END_ACTIVITY(x_msg_count, x_msg_data);
1056: EXCEPTION
1057: WHEN OKE_API.G_EXCEPTION_ERROR THEN
1058: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1059: (substr(l_api_name,1,26),

Line 1057: WHEN OKE_API.G_EXCEPTION_ERROR THEN

1053: end if;
1054: x_return_status := OKE_API.G_RET_STS_SUCCESS;
1055: OKE_API.END_ACTIVITY(x_msg_count, x_msg_data);
1056: EXCEPTION
1057: WHEN OKE_API.G_EXCEPTION_ERROR THEN
1058: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1059: (substr(l_api_name,1,26),
1060: G_PKG_NAME,
1061: 'OKE_API.G_RET_STS_ERROR',

Line 1058: x_return_status := OKE_API.HANDLE_EXCEPTIONS

1054: x_return_status := OKE_API.G_RET_STS_SUCCESS;
1055: OKE_API.END_ACTIVITY(x_msg_count, x_msg_data);
1056: EXCEPTION
1057: WHEN OKE_API.G_EXCEPTION_ERROR THEN
1058: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1059: (substr(l_api_name,1,26),
1060: G_PKG_NAME,
1061: 'OKE_API.G_RET_STS_ERROR',
1062: x_msg_count,

Line 1061: 'OKE_API.G_RET_STS_ERROR',

1057: WHEN OKE_API.G_EXCEPTION_ERROR THEN
1058: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1059: (substr(l_api_name,1,26),
1060: G_PKG_NAME,
1061: 'OKE_API.G_RET_STS_ERROR',
1062: x_msg_count,
1063: x_msg_data,
1064: G_LEVEL);
1065: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1065: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1061: 'OKE_API.G_RET_STS_ERROR',
1062: x_msg_count,
1063: x_msg_data,
1064: G_LEVEL);
1065: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1066: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1067: (substr(l_api_name,1,26),
1068: G_PKG_NAME,
1069: 'OKE_API.G_RET_STS_UNEXP_ERROR',

Line 1066: x_return_status := OKE_API.HANDLE_EXCEPTIONS

1062: x_msg_count,
1063: x_msg_data,
1064: G_LEVEL);
1065: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1066: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1067: (substr(l_api_name,1,26),
1068: G_PKG_NAME,
1069: 'OKE_API.G_RET_STS_UNEXP_ERROR',
1070: x_msg_count,

Line 1069: 'OKE_API.G_RET_STS_UNEXP_ERROR',

1065: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1066: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1067: (substr(l_api_name,1,26),
1068: G_PKG_NAME,
1069: 'OKE_API.G_RET_STS_UNEXP_ERROR',
1070: x_msg_count,
1071: x_msg_data,
1072: G_LEVEL);
1073: WHEN OTHERS THEN

Line 1074: x_return_status := OKE_API.HANDLE_EXCEPTIONS

1070: x_msg_count,
1071: x_msg_data,
1072: G_LEVEL);
1073: WHEN OTHERS THEN
1074: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1075: (substr(l_api_name,1,26),
1076: G_PKG_NAME,
1077: 'OTHERS',
1078: x_msg_count,

Line 1245: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;

1241: from okc_k_headers_b
1242: where ID = p
1243: ;
1244: l_api_name CONSTANT VARCHAR2(30) := 'k_approved';
1245: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
1246: l_msg_count NUMBER;
1247: l_msg_data varchar2(2000);
1248: begin
1249:

Line 1251: l_return_status := OKE_API.START_ACTIVITY(substr(l_api_name,1,26),

1247: l_msg_data varchar2(2000);
1248: begin
1249:
1250: --start
1251: l_return_status := OKE_API.START_ACTIVITY(substr(l_api_name,1,26),
1252: G_PKG_NAME,
1253: OKE_API.G_TRUE,
1254: l_api_version,
1255: l_api_version,

Line 1253: OKE_API.G_TRUE,

1249:
1250: --start
1251: l_return_status := OKE_API.START_ACTIVITY(substr(l_api_name,1,26),
1252: G_PKG_NAME,
1253: OKE_API.G_TRUE,
1254: l_api_version,
1255: l_api_version,
1256: G_LEVEL,
1257: x_return_status);

Line 1258: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN

1254: l_api_version,
1255: l_api_version,
1256: G_LEVEL,
1257: x_return_status);
1258: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1259: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1260: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1261: RAISE OKE_API.G_EXCEPTION_ERROR;
1262: END IF;

Line 1259: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;

1255: l_api_version,
1256: G_LEVEL,
1257: x_return_status);
1258: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1259: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1260: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1261: RAISE OKE_API.G_EXCEPTION_ERROR;
1262: END IF;
1263:

Line 1260: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN

1256: G_LEVEL,
1257: x_return_status);
1258: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1259: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1260: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1261: RAISE OKE_API.G_EXCEPTION_ERROR;
1262: END IF;
1263:
1264: --lock

Line 1261: RAISE OKE_API.G_EXCEPTION_ERROR;

1257: x_return_status);
1258: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1259: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1260: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1261: RAISE OKE_API.G_EXCEPTION_ERROR;
1262: END IF;
1263:
1264: --lock
1265: L1_header_rec.id := p_contract_id;

Line 1275: IF (x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN

1271: x_return_status => x_return_status,
1272: x_msg_count => l_msg_count,
1273: x_msg_data => l_msg_data,
1274: p_chrv_rec => L1_header_rec);
1275: IF (x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1276: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1277: ELSIF (x_return_status = OKE_API.G_RET_STS_ERROR) THEN
1278: RAISE OKE_API.G_EXCEPTION_ERROR;
1279: END IF;

Line 1276: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;

1272: x_msg_count => l_msg_count,
1273: x_msg_data => l_msg_data,
1274: p_chrv_rec => L1_header_rec);
1275: IF (x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1276: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1277: ELSIF (x_return_status = OKE_API.G_RET_STS_ERROR) THEN
1278: RAISE OKE_API.G_EXCEPTION_ERROR;
1279: END IF;
1280:

Line 1277: ELSIF (x_return_status = OKE_API.G_RET_STS_ERROR) THEN

1273: x_msg_data => l_msg_data,
1274: p_chrv_rec => L1_header_rec);
1275: IF (x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1276: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1277: ELSIF (x_return_status = OKE_API.G_RET_STS_ERROR) THEN
1278: RAISE OKE_API.G_EXCEPTION_ERROR;
1279: END IF;
1280:
1281: --update

Line 1278: RAISE OKE_API.G_EXCEPTION_ERROR;

1274: p_chrv_rec => L1_header_rec);
1275: IF (x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1276: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1277: ELSIF (x_return_status = OKE_API.G_RET_STS_ERROR) THEN
1278: RAISE OKE_API.G_EXCEPTION_ERROR;
1279: END IF;
1280:
1281: --update
1282: L1_header_rec.date_approved := p_date_approved;

Line 1286: p_init_msg_list => OKE_API.G_TRUE,

1282: L1_header_rec.date_approved := p_date_approved;
1283: OKC_CONTRACT_PUB.update_contract_header(
1284: p_api_version => l_api_version,
1285: x_return_status => x_return_status,
1286: p_init_msg_list => OKE_API.G_TRUE,
1287: x_msg_count => l_msg_count,
1288: x_msg_data => l_msg_data,
1289: p_restricted_update => OKE_API.G_TRUE,
1290: p_chrv_rec => L1_header_rec,

Line 1289: p_restricted_update => OKE_API.G_TRUE,

1285: x_return_status => x_return_status,
1286: p_init_msg_list => OKE_API.G_TRUE,
1287: x_msg_count => l_msg_count,
1288: x_msg_data => l_msg_data,
1289: p_restricted_update => OKE_API.G_TRUE,
1290: p_chrv_rec => L1_header_rec,
1291: x_chrv_rec => L2_header_rec);
1292: IF (x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1293: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1292: IF (x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN

1288: x_msg_data => l_msg_data,
1289: p_restricted_update => OKE_API.G_TRUE,
1290: p_chrv_rec => L1_header_rec,
1291: x_chrv_rec => L2_header_rec);
1292: IF (x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1293: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1294: ELSIF (x_return_status = OKE_API.G_RET_STS_ERROR) THEN
1295: RAISE OKE_API.G_EXCEPTION_ERROR;
1296: END IF;

Line 1293: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;

1289: p_restricted_update => OKE_API.G_TRUE,
1290: p_chrv_rec => L1_header_rec,
1291: x_chrv_rec => L2_header_rec);
1292: IF (x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1293: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1294: ELSIF (x_return_status = OKE_API.G_RET_STS_ERROR) THEN
1295: RAISE OKE_API.G_EXCEPTION_ERROR;
1296: END IF;
1297:

Line 1294: ELSIF (x_return_status = OKE_API.G_RET_STS_ERROR) THEN

1290: p_chrv_rec => L1_header_rec,
1291: x_chrv_rec => L2_header_rec);
1292: IF (x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1293: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1294: ELSIF (x_return_status = OKE_API.G_RET_STS_ERROR) THEN
1295: RAISE OKE_API.G_EXCEPTION_ERROR;
1296: END IF;
1297:
1298: --end

Line 1295: RAISE OKE_API.G_EXCEPTION_ERROR;

1291: x_chrv_rec => L2_header_rec);
1292: IF (x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1293: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1294: ELSIF (x_return_status = OKE_API.G_RET_STS_ERROR) THEN
1295: RAISE OKE_API.G_EXCEPTION_ERROR;
1296: END IF;
1297:
1298: --end
1299: OKE_API.END_ACTIVITY(l_msg_count, l_msg_data);

Line 1299: OKE_API.END_ACTIVITY(l_msg_count, l_msg_data);

1295: RAISE OKE_API.G_EXCEPTION_ERROR;
1296: END IF;
1297:
1298: --end
1299: OKE_API.END_ACTIVITY(l_msg_count, l_msg_data);
1300: EXCEPTION
1301: WHEN OKE_API.G_EXCEPTION_ERROR THEN
1302: db_failed('OKC_APPROVE');
1303: x_return_status := OKE_API.HANDLE_EXCEPTIONS

Line 1301: WHEN OKE_API.G_EXCEPTION_ERROR THEN

1297:
1298: --end
1299: OKE_API.END_ACTIVITY(l_msg_count, l_msg_data);
1300: EXCEPTION
1301: WHEN OKE_API.G_EXCEPTION_ERROR THEN
1302: db_failed('OKC_APPROVE');
1303: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1304: (substr(l_api_name,1,26),
1305: G_PKG_NAME,

Line 1303: x_return_status := OKE_API.HANDLE_EXCEPTIONS

1299: OKE_API.END_ACTIVITY(l_msg_count, l_msg_data);
1300: EXCEPTION
1301: WHEN OKE_API.G_EXCEPTION_ERROR THEN
1302: db_failed('OKC_APPROVE');
1303: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1304: (substr(l_api_name,1,26),
1305: G_PKG_NAME,
1306: 'OKE_API.G_RET_STS_ERROR',
1307: l_msg_count,

Line 1306: 'OKE_API.G_RET_STS_ERROR',

1302: db_failed('OKC_APPROVE');
1303: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1304: (substr(l_api_name,1,26),
1305: G_PKG_NAME,
1306: 'OKE_API.G_RET_STS_ERROR',
1307: l_msg_count,
1308: l_msg_data,
1309: G_LEVEL);
1310: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1310: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1306: 'OKE_API.G_RET_STS_ERROR',
1307: l_msg_count,
1308: l_msg_data,
1309: G_LEVEL);
1310: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1311: db_failed('OKC_APPROVE');
1312: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1313: (substr(l_api_name,1,26),
1314: G_PKG_NAME,