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.OKS_CHANGE_STATUS_PVT dependencies on FND_LOG

Line 66: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

62: begin
63:
64: OKC_CVM_PVT.clear_g_transaction_id; /*Added for bug6418582*/
65:
66: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
67: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
68: '100: Entered UPDATE_HEADER_STATUS');
69: END IF;
70:

Line 67: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

63:
64: OKC_CVM_PVT.clear_g_transaction_id; /*Added for bug6418582*/
65:
66: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
67: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
68: '100: Entered UPDATE_HEADER_STATUS');
69: END IF;
70:
71: if ((p_new_sts_code is NULL) OR (p_id is null) OR (p_canc_reason_code is NULL)) then

Line 82: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

78:
79: l_new_sts_code := p_new_sts_code;
80: l_old_sts_code := p_old_sts_code;
81:
82: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
83: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
84: '110: Parameter Values ' ||
85: 'contract_id - '|| p_id ||
86: 'new_sts_code - '||l_new_sts_code ||

Line 83: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

79: l_new_sts_code := p_new_sts_code;
80: l_old_sts_code := p_old_sts_code;
81:
82: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
83: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
84: '110: Parameter Values ' ||
85: 'contract_id - '|| p_id ||
86: 'new_sts_code - '||l_new_sts_code ||
87: 'old_sts_code - '||l_old_sts_code );

Line 107: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

103: elsif (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
104: raise FND_API.G_EXC_UNEXPECTED_ERROR;
105: end if;
106:
107: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
108: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
109: '120: Completed check_allowed_status() ');
110: END IF;
111:

Line 108: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

104: raise FND_API.G_EXC_UNEXPECTED_ERROR;
105: end if;
106:
107: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
108: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
109: '120: Completed check_allowed_status() ');
110: END IF;
111:
112: l_chrv_tbl(1).id := p_id;

Line 128: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

124: l_chrv_tbl(1).trn_code := NULL;
125: l_chrv_tbl(1).term_cancel_source := NULL;
126: end if;
127:
128: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
129: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
130: '130: Calling Update_Header_status with chrv_tbl populated');
131: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
132: '140: l_chrv_tbl(1).id '|| l_chrv_tbl(1).id);

Line 129: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

125: l_chrv_tbl(1).term_cancel_source := NULL;
126: end if;
127:
128: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
129: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
130: '130: Calling Update_Header_status with chrv_tbl populated');
131: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
132: '140: l_chrv_tbl(1).id '|| l_chrv_tbl(1).id);
133: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

Line 131: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

127:
128: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
129: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
130: '130: Calling Update_Header_status with chrv_tbl populated');
131: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
132: '140: l_chrv_tbl(1).id '|| l_chrv_tbl(1).id);
133: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
134: '150: l_chrv_tbl(1).old_sts_code '|| l_chrv_tbl(1).old_sts_code);
135: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

Line 133: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

129: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
130: '130: Calling Update_Header_status with chrv_tbl populated');
131: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
132: '140: l_chrv_tbl(1).id '|| l_chrv_tbl(1).id);
133: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
134: '150: l_chrv_tbl(1).old_sts_code '|| l_chrv_tbl(1).old_sts_code);
135: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
136: '160: l_chrv_tbl(1).new_sts_code '|| l_chrv_tbl(1).new_sts_code);
137: END IF;

Line 135: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

131: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
132: '140: l_chrv_tbl(1).id '|| l_chrv_tbl(1).id);
133: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
134: '150: l_chrv_tbl(1).old_sts_code '|| l_chrv_tbl(1).old_sts_code);
135: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
136: '160: l_chrv_tbl(1).new_sts_code '|| l_chrv_tbl(1).new_sts_code);
137: END IF;
138:
139: Update_header_status( x_return_status => x_return_status,

Line 155: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

151: elsif (x_return_status = FND_API.G_RET_STS_ERROR) then
152: raise FND_API.G_EXC_ERROR;
153: end if;
154:
155: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
156: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
157: '170: Completed Update_header_status succesfully');
158: END IF;
159:

Line 156: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

152: raise FND_API.G_EXC_ERROR;
153: end if;
154:
155: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
156: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
157: '170: Completed Update_header_status succesfully');
158: END IF;
159:
160: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 166: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

162: Exception
163: WHEN FND_API.G_EXC_ERROR THEN
164: x_return_status := FND_API.G_RET_STS_ERROR;
165:
166: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
167: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'180: Leaving OKS_CHANGE_STATUS_PVT, one or more mandatory parameters missing :FND_API.G_EXC_ERROR');
168: END IF;
169:
170: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 167: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'180: Leaving OKS_CHANGE_STATUS_PVT, one or more mandatory parameters missing :FND_API.G_EXC_ERROR');

163: WHEN FND_API.G_EXC_ERROR THEN
164: x_return_status := FND_API.G_RET_STS_ERROR;
165:
166: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
167: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'180: Leaving OKS_CHANGE_STATUS_PVT, one or more mandatory parameters missing :FND_API.G_EXC_ERROR');
168: END IF;
169:
170: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
171: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 173: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

169:
170: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
171: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
172:
173: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
174: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'190: Leaving OKS_CHANGE_STATUS_PVT: FND_API.G_EXC_UNEXPECTED_ERROR '|| SQLERRM);
175: END IF;
176:
177: WHEN OTHERS THEN

Line 174: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'190: Leaving OKS_CHANGE_STATUS_PVT: FND_API.G_EXC_UNEXPECTED_ERROR '|| SQLERRM);

170: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
171: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
172:
173: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
174: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'190: Leaving OKS_CHANGE_STATUS_PVT: FND_API.G_EXC_UNEXPECTED_ERROR '|| SQLERRM);
175: END IF;
176:
177: WHEN OTHERS THEN
178: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 180: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

176:
177: WHEN OTHERS THEN
178: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
179:
180: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
181: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'200: Leaving OKS_CHANGE_STATUS_PVT because of EXCEPTION: '||sqlerrm);
182: END IF;
183:
184: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN

Line 181: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'200: Leaving OKS_CHANGE_STATUS_PVT because of EXCEPTION: '||sqlerrm);

177: WHEN OTHERS THEN
178: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
179:
180: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
181: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'200: Leaving OKS_CHANGE_STATUS_PVT because of EXCEPTION: '||sqlerrm);
182: END IF;
183:
184: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
185: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name, SQLERRM );

Line 235: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

231: if (p_init_msg_list = FND_API.G_TRUE) then
232: fnd_msg_pub.initialize();
233: end if;
234:
235: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
236: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
237: '400: Entere Update_Header_Status');
238: END IF;
239:

Line 236: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

232: fnd_msg_pub.initialize();
233: end if;
234:
235: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
236: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
237: '400: Entere Update_Header_Status');
238: END IF;
239:
240: for i in p_chrv_tbl.first .. p_chrv_tbl.last

Line 254: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

250: p_chrv_tbl(i).trn_code := NULL;
251: p_chrv_tbl(i).term_cancel_source := NULL;
252: end if;
253:
254: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
255: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
256: '410: Calling validate_Status p_chrv_tbl(i).id - '||p_chrv_tbl(i).id);
257: END IF;
258:

Line 255: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

251: p_chrv_tbl(i).term_cancel_source := NULL;
252: end if;
253:
254: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
255: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
256: '410: Calling validate_Status p_chrv_tbl(i).id - '||p_chrv_tbl(i).id);
257: END IF;
258:
259: if (p_validate_status = 'Y') then

Line 282: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

278:
279: EXCEPTION
280: WHEN FND_API.G_EXC_ERROR then
281: l_valid_flag := 'N';
282: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
283: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name, FND_MSG_PUB.Get('F', 1));
284: END IF;
285: End;
286: end if; -- p_validate_status

Line 283: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name, FND_MSG_PUB.Get('F', 1));

279: EXCEPTION
280: WHEN FND_API.G_EXC_ERROR then
281: l_valid_flag := 'N';
282: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
283: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name, FND_MSG_PUB.Get('F', 1));
284: END IF;
285: End;
286: end if; -- p_validate_status
287:

Line 288: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

284: END IF;
285: End;
286: end if; -- p_validate_status
287:
288: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
289: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
290: '420: l_valid_flag - '|| l_valid_flag );
291: END IF;
292:

Line 289: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

285: End;
286: end if; -- p_validate_status
287:
288: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
289: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
290: '420: l_valid_flag - '|| l_valid_flag );
291: END IF;
292:
293: if l_valid_flag = 'Y' then

Line 298: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

294: p_control_rec.flag := 'Y';
295: p_control_rec.code := p_canc_reason_code;
296: p_control_rec.comments := p_comments;
297:
298: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
299: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
300: '430: calling okc_contract_pub.update_contract_header');
301: END IF;
302:

Line 299: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

295: p_control_rec.code := p_canc_reason_code;
296: p_control_rec.comments := p_comments;
297:
298: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
299: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
300: '430: calling okc_contract_pub.update_contract_header');
301: END IF;
302:
303: --bug 5710909

Line 339: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

335: elsif (x_return_status = FND_API.G_RET_STS_ERROR) Then
336: RAISE FND_API.G_EXC_ERROR;
337: end if;
338:
339: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
340: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
341: '440: Calling oks_change_status_pvt.update_line_status ');
342: END IF;
343:

Line 340: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

336: RAISE FND_API.G_EXC_ERROR;
337: end if;
338:
339: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
340: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
341: '440: Calling oks_change_status_pvt.update_line_status ');
342: END IF;
343:
344: OKS_CHANGE_STATUS_PVT.update_line_status(

Line 373: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

369: if (p_chrv_tbl(i).old_ste_code = 'ENTERED' and p_chrv_tbl(i).new_ste_code = 'CANCELLED') then
370:
371: -- Check if the contract is a renewed contract
372: IF (Renewed_YN(p_chrv_tbl(i).id)) then
373: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
374: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
375: '450: Calling okc_contract_pvt.clean_ren_links, Entered => Canceled ');
376: END IF;
377:

Line 374: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

370:
371: -- Check if the contract is a renewed contract
372: IF (Renewed_YN(p_chrv_tbl(i).id)) then
373: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
374: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
375: '450: Calling okc_contract_pvt.clean_ren_links, Entered => Canceled ');
376: END IF;
377:
378: OKC_CONTRACT_PVT.CLEAN_REN_LINKS(p_target_chr_id => p_chrv_tbl(i).id,

Line 398: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

394: open csr_k_item_key(p_chrv_tbl(i).id);
395: fetch csr_k_item_key into l_wf_item_key;
396: close csr_k_item_key;
397:
398: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
399: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
400: '460: Calling oks_wf_k_process_pvt.cancel_contract
401: for l_wf_item_key - ' || l_wf_item_key);
402: END IF;

Line 399: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

395: fetch csr_k_item_key into l_wf_item_key;
396: close csr_k_item_key;
397:
398: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
399: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
400: '460: Calling oks_wf_k_process_pvt.cancel_contract
401: for l_wf_item_key - ' || l_wf_item_key);
402: END IF;
403:

Line 430: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

426: elsif (p_chrv_tbl(i).old_ste_code = 'CANCELLED' and p_chrv_tbl(i).new_ste_code = 'ENTERED') then
427:
428: -- Check if the contract is renewed
429: IF (Renewed_YN(p_chrv_tbl(i).id)) then
430: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
431: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
432: '470: okc_contract_pvt.relink_renew, Canceled => Entered ');
433: END IF;
434: -- Reinstantiate the renewal link as the contract is getting into 'Entererd' status

Line 431: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

427:
428: -- Check if the contract is renewed
429: IF (Renewed_YN(p_chrv_tbl(i).id)) then
430: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
431: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
432: '470: okc_contract_pvt.relink_renew, Canceled => Entered ');
433: END IF;
434: -- Reinstantiate the renewal link as the contract is getting into 'Entererd' status
435:

Line 466: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

462: -- l_wf_attr_details.ITEM_KEY := l_chrv_tbl(i).id || to_char(sysdate, 'YYYYMMDDHH24MISS');
463:
464: -- End of Changed by MKS/SKK
465:
466: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
467: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
468: '480: Launching workflow process ');
469: END IF;
470:

Line 467: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

463:
464: -- End of Changed by MKS/SKK
465:
466: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
467: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
468: '480: Launching workflow process ');
469: END IF;
470:
471: OKS_WF_K_PROCESS_PVT.launch_k_process_wf (

Line 489: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

485: end if;
486: end if; -- l_validate_flag
487: end loop;
488:
489: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
490: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
491: '485: exiting Update_header_status ');
492: END IF;
493: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 490: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

486: end if; -- l_validate_flag
487: end loop;
488:
489: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
490: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
491: '485: exiting Update_header_status ');
492: END IF;
493: x_return_status := FND_API.G_RET_STS_SUCCESS;
494:

Line 499: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

495: EXCEPTION
496: WHEN FND_API.G_EXC_ERROR THEN
497: x_return_status := FND_API.G_RET_STS_ERROR ;
498:
499: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
500: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'490: Leaving OKS_CHANGE_STATUS_PVT: FND_API.G_EXC_ERROR');
501: END IF;
502:
503: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 500: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'490: Leaving OKS_CHANGE_STATUS_PVT: FND_API.G_EXC_ERROR');

496: WHEN FND_API.G_EXC_ERROR THEN
497: x_return_status := FND_API.G_RET_STS_ERROR ;
498:
499: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
500: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'490: Leaving OKS_CHANGE_STATUS_PVT: FND_API.G_EXC_ERROR');
501: END IF;
502:
503: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
504: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 506: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

502:
503: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
504: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
505:
506: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
507: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'500: Leaving OKS_CHANGE_STATUS_PVT: FND_API.G_EXC_UNEXPECTED_ERROR '||SQLERRM);
508: END IF;
509:
510: WHEN OTHERS THEN

Line 507: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'500: Leaving OKS_CHANGE_STATUS_PVT: FND_API.G_EXC_UNEXPECTED_ERROR '||SQLERRM);

503: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
504: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
505:
506: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
507: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'500: Leaving OKS_CHANGE_STATUS_PVT: FND_API.G_EXC_UNEXPECTED_ERROR '||SQLERRM);
508: END IF;
509:
510: WHEN OTHERS THEN
511: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 513: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

509:
510: WHEN OTHERS THEN
511: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
512:
513: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
514: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'510: Leaving OKS_CHANGE_STATUS_PVT because of EXCEPTION: '||sqlerrm);
515: END IF;
516:
517: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN

Line 514: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'510: Leaving OKS_CHANGE_STATUS_PVT because of EXCEPTION: '||sqlerrm);

510: WHEN OTHERS THEN
511: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
512:
513: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
514: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'510: Leaving OKS_CHANGE_STATUS_PVT because of EXCEPTION: '||sqlerrm);
515: END IF;
516:
517: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
518: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name, SQLERRM );

Line 618: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

614: ------------------------------
615: EXCEPTION
616: WHEN FND_API.G_EXC_ERROR THEN
617: x_return_status := FND_API.G_RET_STS_ERROR ;
618: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
619: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'300: Leaving OKS_CHANGE_STATUS_PVT : FND_API.G_EXC_ERROR');
620: END IF;
621: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
622:

Line 619: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'300: Leaving OKS_CHANGE_STATUS_PVT : FND_API.G_EXC_ERROR');

615: EXCEPTION
616: WHEN FND_API.G_EXC_ERROR THEN
617: x_return_status := FND_API.G_RET_STS_ERROR ;
618: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
619: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'300: Leaving OKS_CHANGE_STATUS_PVT : FND_API.G_EXC_ERROR');
620: END IF;
621: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
622:
623: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 625: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

621: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
622:
623: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
624: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
625: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
626: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'310: Leaving OKS_CHANGE_STATUS_PVT : FND_API.G_EXC_UNEXPECTED_ERROR '||SQLERRM);
627: END IF;
628: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
629:

Line 626: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'310: Leaving OKS_CHANGE_STATUS_PVT : FND_API.G_EXC_UNEXPECTED_ERROR '||SQLERRM);

622:
623: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
624: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
625: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
626: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'310: Leaving OKS_CHANGE_STATUS_PVT : FND_API.G_EXC_UNEXPECTED_ERROR '||SQLERRM);
627: END IF;
628: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
629:
630: WHEN OKC_API.G_EXC_WARNING THEN

Line 632: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

628: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
629:
630: WHEN OKC_API.G_EXC_WARNING THEN
631: x_return_status := OKC_API.G_RET_STS_WARNING;
632: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
633: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'320: Leaving OKS_CHANGE_STATUS_PVT : OKC_API.G_EXC_WARNING');
634: END IF;
635:
636: WHEN OTHERS THEN

Line 633: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'320: Leaving OKS_CHANGE_STATUS_PVT : OKC_API.G_EXC_WARNING');

629:
630: WHEN OKC_API.G_EXC_WARNING THEN
631: x_return_status := OKC_API.G_RET_STS_WARNING;
632: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
633: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'320: Leaving OKS_CHANGE_STATUS_PVT : OKC_API.G_EXC_WARNING');
634: END IF;
635:
636: WHEN OTHERS THEN
637: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 637: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

633: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'320: Leaving OKS_CHANGE_STATUS_PVT : OKC_API.G_EXC_WARNING');
634: END IF;
635:
636: WHEN OTHERS THEN
637: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
638: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'330: Leaving OKS_CHANGE_STATUS_PVT because of EXCEPTION: '||sqlerrm);
639: END IF;
640:
641: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 638: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'330: Leaving OKS_CHANGE_STATUS_PVT because of EXCEPTION: '||sqlerrm);

634: END IF;
635:
636: WHEN OTHERS THEN
637: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
638: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'330: Leaving OKS_CHANGE_STATUS_PVT because of EXCEPTION: '||sqlerrm);
639: END IF;
640:
641: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
642: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN

Line 1192: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1188: END;
1189:
1190: Begin
1191:
1192: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1193: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1194: '600: Entered UPDATE_LINE_STATUS');
1195: END IF;
1196:

Line 1193: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

1189:
1190: Begin
1191:
1192: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1193: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1194: '600: Entered UPDATE_LINE_STATUS');
1195: END IF;
1196:
1197: if (p_init_msg_list = FND_API.G_TRUE) then

Line 1217: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1213: OPEN c_top_line_chk;
1214: FETCH c_top_line_chk INTO l_top_line;
1215: CLOSE c_top_line_chk;
1216:
1217: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1218: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1219: '610: value of l_type - '|| l_type );
1220: END IF;
1221:

Line 1218: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

1214: FETCH c_top_line_chk INTO l_top_line;
1215: CLOSE c_top_line_chk;
1216:
1217: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1218: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1219: '610: value of l_type - '|| l_type );
1220: END IF;
1221:
1222: If (l_type='ACTIVE') then

Line 1237: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1233:
1234:
1235: if (p_cle_id is null) then
1236:
1237: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1238: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1239: '620: p_cle_id is null');
1240: END IF;
1241: -- Added the following IF ELSE condition and modified the cursor for bug # 6144856 --

Line 1238: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

1234:
1235: if (p_cle_id is null) then
1236:
1237: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1238: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1239: '620: p_cle_id is null');
1240: END IF;
1241: -- Added the following IF ELSE condition and modified the cursor for bug # 6144856 --
1242: IF ( l_type='HOLD' or l_type='CANCELLED') THEN

Line 1275: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1271: -- end of bug# 6144856 --
1272:
1273: else --No need of checking the status here as we know this action is possible only for 'Entered' or 'Cancelled' lines
1274:
1275: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1276: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1277: '630: p_cle_id is NOT null - '||p_cle_id );
1278: END IF;
1279:

Line 1276: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

1272:
1273: else --No need of checking the status here as we know this action is possible only for 'Entered' or 'Cancelled' lines
1274:
1275: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1276: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1277: '630: p_cle_id is NOT null - '||p_cle_id );
1278: END IF;
1279:
1280: -- Added the following IF ELSE condition and modified the cursor for bug # 6144856 --

Line 1348: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1344: l_clev_tbl(x_num).call_action_asmblr := 'N';
1345:
1346: if((p_validate_status = 'Y') and (p_cle_id IS NOT NULL)) then
1347:
1348: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1349: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1350: '640: Calling validate_status ' || l_clev_tbl(x_num).id);
1351: END IF;
1352:

Line 1349: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

1345:
1346: if((p_validate_status = 'Y') and (p_cle_id IS NOT NULL)) then
1347:
1348: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1349: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1350: '640: Calling validate_status ' || l_clev_tbl(x_num).id);
1351: END IF;
1352:
1353: VALIDATE_STATUS( x_return_status,

Line 1373: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1369: Raise OKC_API.G_EXC_WARNING;
1370: end if;
1371: end if; -- l_clev_tbl(x_num).lse_id
1372:
1373: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1374: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1375: '640: Completed validate_status ' || l_clev_tbl(x_num).id);
1376: END IF;
1377:

Line 1374: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

1370: end if;
1371: end if; -- l_clev_tbl(x_num).lse_id
1372:
1373: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1374: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1375: '640: Completed validate_status ' || l_clev_tbl(x_num).id);
1376: END IF;
1377:
1378: l_clev_tbl(x_num).new_ste_code := p_new_ste_code ;

Line 1406: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1402:
1403: END LOOP;
1404: close c_lines;
1405:
1406: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1407: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1408: '650: Calling OKC_CONTRACT_PUB.update_contract_line ');
1409: END IF;
1410:

Line 1407: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

1403: END LOOP;
1404: close c_lines;
1405:
1406: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1407: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1408: '650: Calling OKC_CONTRACT_PUB.update_contract_line ');
1409: END IF;
1410:
1411: --bug 5710909

Line 1446: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1442: elsif (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
1443: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1444: End if;
1445:
1446: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1447: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1448: '660: Succesfully completed OKC_CONTRACT_PUB.update_contract_line ');
1449: END IF;
1450:

Line 1447: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

1443: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1444: End if;
1445:
1446: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1447: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1448: '660: Succesfully completed OKC_CONTRACT_PUB.update_contract_line ');
1449: END IF;
1450:
1451: -- Calling the API to Clean OR Relink the Contract Line if it was

Line 1456: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1452: -- a renewed contract.
1453:
1454: if(p_old_ste_code = 'ENTERED' and p_new_ste_code = 'CANCELLED') then
1455:
1456: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1457: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1458: '670: calling okc_contract_pvt.Line_renewal_links, ENTERED => CANCELLED ');
1459: END IF;
1460:

Line 1457: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

1453:
1454: if(p_old_ste_code = 'ENTERED' and p_new_ste_code = 'CANCELLED') then
1455:
1456: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1457: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1458: '670: calling okc_contract_pvt.Line_renewal_links, ENTERED => CANCELLED ');
1459: END IF;
1460:
1461: OKC_CONTRACT_PVT.Line_Renewal_links (

Line 1478: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1474: End if;
1475:
1476: elsif (p_old_ste_code = 'CANCELLED' and p_new_ste_code = 'ENTERED') then
1477:
1478: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1479: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1480: '680: calling okc_contract_pvt.Line_renewal_links, CANCELLED => ENTERED ');
1481: END IF;
1482:

Line 1479: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

1475:
1476: elsif (p_old_ste_code = 'CANCELLED' and p_new_ste_code = 'ENTERED') then
1477:
1478: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1479: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1480: '680: calling okc_contract_pvt.Line_renewal_links, CANCELLED => ENTERED ');
1481: END IF;
1482:
1483: OKC_CONTRACT_PVT.Line_Renewal_links (

Line 1514: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1510:
1511: IF (l_scs_code IN ('SERVICE', 'SUBSCRIPTION', 'WARRANTY') ) THEN
1512:
1513: if (p_cle_id is NOT NULL) then
1514: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1515: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1516: '690: calling okc_contract_pvt.update_contract_amount, p_cle_id is not null '||p_cle_id);
1517: END IF;
1518:

Line 1515: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

1511: IF (l_scs_code IN ('SERVICE', 'SUBSCRIPTION', 'WARRANTY') ) THEN
1512:
1513: if (p_cle_id is NOT NULL) then
1514: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1515: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1516: '690: calling okc_contract_pvt.update_contract_amount, p_cle_id is not null '||p_cle_id);
1517: END IF;
1518:
1519: OKC_CONTRACT_PVT.Update_contract_amount(

Line 1537: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1533: elsif (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
1534: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1535: End if;
1536:
1537: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1538: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1539: '695: calling update_contract_tax_amount, p_cle_id is not null '||p_cle_id);
1540: END IF;
1541:

Line 1538: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

1534: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1535: End if;
1536:
1537: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1538: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1539: '695: calling update_contract_tax_amount, p_cle_id is not null '||p_cle_id);
1540: END IF;
1541:
1542: UPDATE_CONTRACT_TAX_AMOUNT(

Line 1562: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1558: End if;
1559:
1560: else
1561:
1562: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1563: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1564: '700: calling okc_contract_pvt.update_contract_amount, p_cle_id is null ');
1565: END IF;
1566:

Line 1563: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

1559:
1560: else
1561:
1562: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1563: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1564: '700: calling okc_contract_pvt.update_contract_amount, p_cle_id is null ');
1565: END IF;
1566:
1567: OKC_CONTRACT_PVT.Update_contract_amount(

Line 1585: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1581: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1582: End if;
1583:
1584:
1585: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1586: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1587: '705: calling update_contract_tax_amount, p_cle_id is null');
1588: END IF;
1589:

Line 1586: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

1582: End if;
1583:
1584:
1585: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1586: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1587: '705: calling update_contract_tax_amount, p_cle_id is null');
1588: END IF;
1589:
1590: UPDATE_CONTRACT_TAX_AMOUNT (

Line 1616: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1612: -- is taken on the subline.
1613:
1614: if (p_cle_id is NOT NULL) then
1615:
1616: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1617: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1618: '710: calling oks_bill_sch.sts_change_subline_lvl_rule');
1619: END IF;
1620:

Line 1617: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

1613:
1614: if (p_cle_id is NOT NULL) then
1615:
1616: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1617: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1618: '710: calling oks_bill_sch.sts_change_subline_lvl_rule');
1619: END IF;
1620:
1621: OKS_BILL_SCH.Sts_change_subline_lvl_rule(

Line 1664: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1660: close version_csr;
1661:
1662: l_hstv_rec.contract_version := l_version;
1663:
1664: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1665: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1666: '720: calling okc_k_history_pvt.create_k_history, l_version - '||l_version);
1667: END IF;
1668:

Line 1665: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

1661:
1662: l_hstv_rec.contract_version := l_version;
1663:
1664: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1665: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1666: '720: calling okc_k_history_pvt.create_k_history, l_version - '||l_version);
1667: END IF;
1668:
1669: OKC_K_HISTORY_PVT.create_k_history(

Line 1687: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1683: end if; -- call history API
1684:
1685: x_return_status := FND_API.G_RET_STS_SUCCESS;
1686:
1687: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1688: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1689: '730: succesfully complete update_line_status ');
1690: END IF;
1691:

Line 1688: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

1684:
1685: x_return_status := FND_API.G_RET_STS_SUCCESS;
1686:
1687: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1688: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1689: '730: succesfully complete update_line_status ');
1690: END IF;
1691:
1692: EXCEPTION

Line 1695: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1691:
1692: EXCEPTION
1693: WHEN FND_API.G_EXC_ERROR THEN
1694: x_return_status := FND_API.G_RET_STS_ERROR;
1695: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1696: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'740: Leaving OKS_CHANGE_STATUS_PVT : FND_API.G_EXC_ERROR');
1697: END IF;
1698: if (c_lines%ISOPEN) then
1699: close c_lines;

Line 1696: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'740: Leaving OKS_CHANGE_STATUS_PVT : FND_API.G_EXC_ERROR');

1692: EXCEPTION
1693: WHEN FND_API.G_EXC_ERROR THEN
1694: x_return_status := FND_API.G_RET_STS_ERROR;
1695: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1696: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'740: Leaving OKS_CHANGE_STATUS_PVT : FND_API.G_EXC_ERROR');
1697: END IF;
1698: if (c_lines%ISOPEN) then
1699: close c_lines;
1700: end if;

Line 1705: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1701:
1702: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1704:
1705: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1706: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'750: Leaving OKS_CHANGE_STATUS_PVT : FND_API.G_EXC_UNEXPECTED_ERROR '||SQLERRM);
1707: END IF;
1708:
1709: if (c_lines%ISOPEN) then

Line 1706: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'750: Leaving OKS_CHANGE_STATUS_PVT : FND_API.G_EXC_UNEXPECTED_ERROR '||SQLERRM);

1702: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1704:
1705: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1706: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'750: Leaving OKS_CHANGE_STATUS_PVT : FND_API.G_EXC_UNEXPECTED_ERROR '||SQLERRM);
1707: END IF;
1708:
1709: if (c_lines%ISOPEN) then
1710: close c_lines;

Line 1716: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1712:
1713: WHEN OKC_API.G_EXC_WARNING then
1714: x_return_status := OKC_API.G_RET_STS_WARNING;
1715:
1716: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1717: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'760: Leaving OKS_CHANGE_STATUS_PVT : OKC_API.G_EXC_WARNING');
1718: END IF;
1719:
1720: if(c_lines%ISOPEN) then

Line 1717: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'760: Leaving OKS_CHANGE_STATUS_PVT : OKC_API.G_EXC_WARNING');

1713: WHEN OKC_API.G_EXC_WARNING then
1714: x_return_status := OKC_API.G_RET_STS_WARNING;
1715:
1716: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1717: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'760: Leaving OKS_CHANGE_STATUS_PVT : OKC_API.G_EXC_WARNING');
1718: END IF;
1719:
1720: if(c_lines%ISOPEN) then
1721: close c_lines;

Line 1725: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1721: close c_lines;
1722: end if;
1723:
1724: WHEN OTHERS THEN
1725: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1726: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'770: Leaving OKS_CHANGE_STATUS_PVT because of EXCEPTION: '||sqlerrm);
1727: END IF;
1728:
1729: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 1726: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'770: Leaving OKS_CHANGE_STATUS_PVT because of EXCEPTION: '||sqlerrm);

1722: end if;
1723:
1724: WHEN OTHERS THEN
1725: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1726: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'770: Leaving OKS_CHANGE_STATUS_PVT because of EXCEPTION: '||sqlerrm);
1727: END IF;
1728:
1729: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1730: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN

Line 1864: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1860: exception
1861:
1862: WHEN FND_API.G_EXC_ERROR then
1863: x_return_status := FND_API.G_RET_STS_ERROR;
1864: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1865: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'500: Leaving OKS_CHANGE_STATUS_PVT : FND_API.G_EXC_ERROR');
1866: END IF;
1867:
1868: WHEN NO_DATA_FOUND then

Line 1865: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'500: Leaving OKS_CHANGE_STATUS_PVT : FND_API.G_EXC_ERROR');

1861:
1862: WHEN FND_API.G_EXC_ERROR then
1863: x_return_status := FND_API.G_RET_STS_ERROR;
1864: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1865: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'500: Leaving OKS_CHANGE_STATUS_PVT : FND_API.G_EXC_ERROR');
1866: END IF;
1867:
1868: WHEN NO_DATA_FOUND then
1869: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1873: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1869: x_return_status := FND_API.G_RET_STS_ERROR;
1870: FND_MESSAGE.set_name('OKS','OKS_CHANGE_STAT_NOT_ALLOWED'); -- set the message here
1871: fnd_msg_pub.add;
1872:
1873: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1874: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'510: Leaving OKS_CHANGE_STATUS_PVT : NO_DATA_FOUND');
1875: END IF;
1876:
1877: WHEN OTHERS then

Line 1874: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'510: Leaving OKS_CHANGE_STATUS_PVT : NO_DATA_FOUND');

1870: FND_MESSAGE.set_name('OKS','OKS_CHANGE_STAT_NOT_ALLOWED'); -- set the message here
1871: fnd_msg_pub.add;
1872:
1873: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1874: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'510: Leaving OKS_CHANGE_STATUS_PVT : NO_DATA_FOUND');
1875: END IF;
1876:
1877: WHEN OTHERS then
1878: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1879: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1875: END IF;
1876:
1877: WHEN OTHERS then
1878: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1879: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1880: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'520: Leaving OKS_CHANGE_STATUS_PVT because of EXCEPTION: '||sqlerrm);
1881: END IF;
1882:
1883: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN

Line 1880: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'520: Leaving OKS_CHANGE_STATUS_PVT because of EXCEPTION: '||sqlerrm);

1876:
1877: WHEN OTHERS then
1878: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1879: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1880: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'520: Leaving OKS_CHANGE_STATUS_PVT because of EXCEPTION: '||sqlerrm);
1881: END IF;
1882:
1883: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1884: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name, SQLERRM );

Line 1979: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1975: --
1976:
1977: BEGIN
1978:
1979: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1980: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1981: '800: Entered UPDATE_CONTRACT_TAX_AMOUNT ');
1982: END IF;
1983:

Line 1980: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

1976:
1977: BEGIN
1978:
1979: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1980: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1981: '800: Entered UPDATE_CONTRACT_TAX_AMOUNT ');
1982: END IF;
1983:
1984: IF ((p_from_ste_code is NULL) OR (p_to_ste_code is NULL) OR (p_id is null)) THEN

Line 1988: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1984: IF ((p_from_ste_code is NULL) OR (p_to_ste_code is NULL) OR (p_id is null)) THEN
1985: raise FND_API.G_EXC_ERROR;
1986: END IF;
1987:
1988: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1989: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1990: '810: Parameter Values ' ||
1991: 'p_id - '|| p_id ||
1992: 'p_from_ste_code - '||p_from_ste_code ||

Line 1989: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

1985: raise FND_API.G_EXC_ERROR;
1986: END IF;
1987:
1988: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1989: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1990: '810: Parameter Values ' ||
1991: 'p_id - '|| p_id ||
1992: 'p_from_ste_code - '||p_from_ste_code ||
1993: 'p_to_ste_code - '||p_to_ste_code ||

Line 1999: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1995: END IF;
1996:
1997: IF (p_cle_id is NOT NULL) THEN -- implies line or sub-line level
1998:
1999: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2000: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2001: '900: p_cle_id is not null; Change Status called from line/subline level ');
2002: END IF;
2003:

Line 2000: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

1996:
1997: IF (p_cle_id is NOT NULL) THEN -- implies line or sub-line level
1998:
1999: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2000: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2001: '900: p_cle_id is not null; Change Status called from line/subline level ');
2002: END IF;
2003:
2004: Open get_line_lvl_csr;

Line 2010: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2006: Close get_line_lvl_csr;
2007:
2008: IF (l_cle_id is NOT NULL) THEN --p_cle_id is a subline
2009:
2010: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2011: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2012: '910: Updating tax_amount of topline of the subline due to status change of the subline ');
2013: END IF;
2014:

Line 2011: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

2007:
2008: IF (l_cle_id is NOT NULL) THEN --p_cle_id is a subline
2009:
2010: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2011: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2012: '910: Updating tax_amount of topline of the subline due to status change of the subline ');
2013: END IF;
2014:
2015: Open get_subline_tax_amt_csr(p_cle_id);

Line 2021: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2017: Close get_subline_tax_amt_csr;
2018:
2019: IF ((p_from_ste_code = 'ENTERED' ) AND (p_to_ste_code = 'CANCELLED')) THEN
2020:
2021: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2022: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2023: '920: ENTERED -> CANCELLED; Updating tax_amount of the topline of the subline ');
2024: END IF;
2025:

Line 2022: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

2018:
2019: IF ((p_from_ste_code = 'ENTERED' ) AND (p_to_ste_code = 'CANCELLED')) THEN
2020:
2021: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2022: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2023: '920: ENTERED -> CANCELLED; Updating tax_amount of the topline of the subline ');
2024: END IF;
2025:
2026: -- updating tax_amount for the topline (l_cle_id) of this subline (p_cle_id)

Line 2042: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2038: --Bug:6765336
2039:
2040: ELSIF ((p_from_ste_code = 'CANCELLED' ) AND (p_to_ste_code = 'ENTERED')) THEN
2041:
2042: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2043: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2044: '930: CANCELLED -> ENTERED; Updating tax_amount of the topline of the subline ');
2045: END IF;
2046:

Line 2043: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

2039:
2040: ELSIF ((p_from_ste_code = 'CANCELLED' ) AND (p_to_ste_code = 'ENTERED')) THEN
2041:
2042: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2043: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2044: '930: CANCELLED -> ENTERED; Updating tax_amount of the topline of the subline ');
2045: END IF;
2046:
2047:

Line 2060: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2056:
2057: ELSE --l_cle_id is NULL --p_cle_id is a top line
2058:
2059:
2060: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2061: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2062: '1000: Updating tax_amount of the topline');
2063: END IF;
2064:

Line 2061: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

2057: ELSE --l_cle_id is NULL --p_cle_id is a top line
2058:
2059:
2060: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2061: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2062: '1000: Updating tax_amount of the topline');
2063: END IF;
2064:
2065: IF ((p_from_ste_code = 'ENTERED') AND (p_to_ste_code = 'CANCELLED')) THEN

Line 2067: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2063: END IF;
2064:
2065: IF ((p_from_ste_code = 'ENTERED') AND (p_to_ste_code = 'CANCELLED')) THEN
2066:
2067: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2068: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2069: '1010: ENTERED -> CANCELLED; Updating tax_amount of topline ');
2070: END IF;
2071:

Line 2068: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

2064:
2065: IF ((p_from_ste_code = 'ENTERED') AND (p_to_ste_code = 'CANCELLED')) THEN
2066:
2067: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2068: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2069: '1010: ENTERED -> CANCELLED; Updating tax_amount of topline ');
2070: END IF;
2071:
2072: -- updating tax_amount for the topline (p_cle_id)

Line 2090: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2086: Close get_lse_id_csr;
2087:
2088: IF (l_lse_id = 46 ) THEN --Checking if top line is of SUBSCRIPTION type
2089:
2090: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2091: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2092: '1020: Calling FUNCTION get_tax_for_subs_line: Contract ID ' || p_id || ' Topline ID '|| p_cle_id);
2093: END IF;
2094:

Line 2091: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

2087:
2088: IF (l_lse_id = 46 ) THEN --Checking if top line is of SUBSCRIPTION type
2089:
2090: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2091: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2092: '1020: Calling FUNCTION get_tax_for_subs_line: Contract ID ' || p_id || ' Topline ID '|| p_cle_id);
2093: END IF;
2094:
2095: -- Calling function get_tax_for_subs_line to get tax_amount of this subscription line

Line 2099: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2095: -- Calling function get_tax_for_subs_line to get tax_amount of this subscription line
2096:
2097: l_Tax_Value := get_tax_for_subs_line (p_id, p_cle_id);
2098:
2099: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2100: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2101: '1030: Successfully called FUNCTION get_tax_for_subs_line ');
2102: END IF;
2103:

Line 2100: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

2096:
2097: l_Tax_Value := get_tax_for_subs_line (p_id, p_cle_id);
2098:
2099: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2100: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2101: '1030: Successfully called FUNCTION get_tax_for_subs_line ');
2102: END IF;
2103:
2104:

Line 2105: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2101: '1030: Successfully called FUNCTION get_tax_for_subs_line ');
2102: END IF;
2103:
2104:
2105: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2106: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2107: '1040: CANCELLED -> ENTERED; Updating tax_amount for SUBSCRIPTION topline ');
2108: END IF;
2109:

Line 2106: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

2102: END IF;
2103:
2104:
2105: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2106: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2107: '1040: CANCELLED -> ENTERED; Updating tax_amount for SUBSCRIPTION topline ');
2108: END IF;
2109:
2110: -- updating tax_amount for top line for SUBSCRIPTION line type due to change in the status of top line

Line 2120: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2116:
2117:
2118: ELSE -- top line is not of SUBSCRIPTION type
2119:
2120: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2121: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2122: '1050: CANCELLED -> ENTERED; Updating tax_amount for NON-SUBSCRIPTION topline ');
2123: END IF;
2124:

Line 2121: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

2117:
2118: ELSE -- top line is not of SUBSCRIPTION type
2119:
2120: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2121: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2122: '1050: CANCELLED -> ENTERED; Updating tax_amount for NON-SUBSCRIPTION topline ');
2123: END IF;
2124:
2125: -- updating tax_amount for top line which is not of SUBSCRIPTION type

Line 2150: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2146: END IF; -- l_cle_id is NOT NULL
2147:
2148: ELSE -- p_cle_id is NULL --implies Change Status action is taken at header Level
2149:
2150: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2151: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2152: '1100: Updating Header ');
2153: END IF;
2154:

Line 2151: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

2147:
2148: ELSE -- p_cle_id is NULL --implies Change Status action is taken at header Level
2149:
2150: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2151: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2152: '1100: Updating Header ');
2153: END IF;
2154:
2155: IF ((p_from_ste_code = 'ENTERED') AND (p_to_ste_code = 'CANCELLED')) THEN

Line 2157: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2153: END IF;
2154:
2155: IF ((p_from_ste_code = 'ENTERED') AND (p_to_ste_code = 'CANCELLED')) THEN
2156:
2157: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2158: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2159: '1110: ENTERED -> CANCELLED; Updating tax_amount for all toplines of contract ');
2160: END IF;
2161:

Line 2158: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

2154:
2155: IF ((p_from_ste_code = 'ENTERED') AND (p_to_ste_code = 'CANCELLED')) THEN
2156:
2157: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2158: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2159: '1110: ENTERED -> CANCELLED; Updating tax_amount for all toplines of contract ');
2160: END IF;
2161:
2162: -- updating tax_amount for all the top lines of the contract

Line 2177: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2173: );
2174:
2175: ELSIF ((p_from_ste_code = 'CANCELLED' ) AND (p_to_ste_code = 'ENTERED')) THEN
2176:
2177: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2178: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2179: '1120: CANCELLED -> ENTERED; Updating tax_amount for all toplines of contract ');
2180: END IF;
2181:

Line 2178: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

2174:
2175: ELSIF ((p_from_ste_code = 'CANCELLED' ) AND (p_to_ste_code = 'ENTERED')) THEN
2176:
2177: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2178: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2179: '1120: CANCELLED -> ENTERED; Updating tax_amount for all toplines of contract ');
2180: END IF;
2181:
2182: -- updating tax_amount for all the top lines of the contract which are not of SUBSCRIPTION type

Line 2205: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2201: and okc1.dnz_chr_id = p_id
2202: and okc1.date_cancelled IS NULL -- Bug 5474479.
2203: );
2204:
2205: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2206: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2207: '1130: Calling UPDATE_SUBSCRIPTION_TAX_AMOUNT ' || p_id);
2208: END IF;
2209:

Line 2206: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

2202: and okc1.date_cancelled IS NULL -- Bug 5474479.
2203: );
2204:
2205: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2206: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2207: '1130: Calling UPDATE_SUBSCRIPTION_TAX_AMOUNT ' || p_id);
2208: END IF;
2209:
2210: --Calling procudure to update tax_amount for subscription line type of the contract, if any

Line 2226: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2222: elsif (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2223: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
2224: End if;
2225:
2226: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2227: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2228: '1140: Succesfully completed UPDATE_SUBSCRIPTION_TAX_AMOUNT ');
2229: END IF;
2230:

Line 2227: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

2223: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
2224: End if;
2225:
2226: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2227: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2228: '1140: Succesfully completed UPDATE_SUBSCRIPTION_TAX_AMOUNT ');
2229: END IF;
2230:
2231: END IF; --(p_from_ste_code = 'ENTERED') AND (p_to_ste_code = 'CANCELLED')

Line 2235: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2231: END IF; --(p_from_ste_code = 'ENTERED') AND (p_to_ste_code = 'CANCELLED')
2232:
2233: END IF; --p_cle_id is NULL
2234:
2235: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2236: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2237: '1200: Updating header tax_amount ');
2238: END IF;
2239:

Line 2236: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

2232:
2233: END IF; --p_cle_id is NULL
2234:
2235: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2236: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2237: '1200: Updating header tax_amount ');
2238: END IF;
2239:
2240: -- updating tax_amount for header level of the contract due to change in the status of line/subline/contract

Line 2260: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2256:
2257: WHEN FND_API.G_EXC_ERROR THEN
2258: x_return_status := FND_API.G_RET_STS_ERROR;
2259:
2260: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2261: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1300: Leaving OKS_CHANGE_STATUS_PVT, one or more mandatory parameters missing :FND_API.G_EXC_ERROR');
2262: END IF;
2263:
2264: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2261: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1300: Leaving OKS_CHANGE_STATUS_PVT, one or more mandatory parameters missing :FND_API.G_EXC_ERROR');

2257: WHEN FND_API.G_EXC_ERROR THEN
2258: x_return_status := FND_API.G_RET_STS_ERROR;
2259:
2260: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2261: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1300: Leaving OKS_CHANGE_STATUS_PVT, one or more mandatory parameters missing :FND_API.G_EXC_ERROR');
2262: END IF;
2263:
2264: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2265: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 2267: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2263:
2264: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2265: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2266:
2267: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2268: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1310: Leaving OKS_CHANGE_STATUS_PVT: FND_API.G_EXC_UNEXPECTED_ERROR '|| SQLERRM);
2269: END IF;
2270:
2271: WHEN OTHERS THEN

Line 2268: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1310: Leaving OKS_CHANGE_STATUS_PVT: FND_API.G_EXC_UNEXPECTED_ERROR '|| SQLERRM);

2264: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2265: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2266:
2267: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2268: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1310: Leaving OKS_CHANGE_STATUS_PVT: FND_API.G_EXC_UNEXPECTED_ERROR '|| SQLERRM);
2269: END IF;
2270:
2271: WHEN OTHERS THEN
2272: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 2274: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2270:
2271: WHEN OTHERS THEN
2272: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2273:
2274: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2275: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1320: Leaving OKS_CHANGE_STATUS_PVT because of EXCEPTION: '||sqlerrm);
2276: END IF;
2277:
2278: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN

Line 2275: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1320: Leaving OKS_CHANGE_STATUS_PVT because of EXCEPTION: '||sqlerrm);

2271: WHEN OTHERS THEN
2272: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2273:
2274: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2275: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1320: Leaving OKS_CHANGE_STATUS_PVT because of EXCEPTION: '||sqlerrm);
2276: END IF;
2277:
2278: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2279: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name, SQLERRM );

Line 2315: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2311: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_SUBSCRIPTION_TAX_AMOUNT';
2312: --
2313: BEGIN
2314:
2315: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2316: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2317: '1150: Entered UPDATE_SUBSCRIPTION_TAX_AMOUNT ');
2318: END IF;
2319:

Line 2316: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

2312: --
2313: BEGIN
2314:
2315: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2316: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2317: '1150: Entered UPDATE_SUBSCRIPTION_TAX_AMOUNT ');
2318: END IF;
2319:
2320: Open get_K_subscription_lines;

Line 2337: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2333: FOR i IN l_id_Tbl.FIRST .. l_id_Tbl.LAST
2334:
2335: LOOP
2336:
2337: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2338: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2339: '1155: Callling procedure get_tax_for_subs_line for topline '|| l_id_Tbl(i));
2340: END IF;
2341:

Line 2338: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

2334:
2335: LOOP
2336:
2337: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2338: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2339: '1155: Callling procedure get_tax_for_subs_line for topline '|| l_id_Tbl(i));
2340: END IF;
2341:
2342: l_subs_tax_Tbl(i) := get_tax_for_subs_line (p_id, l_id_Tbl(i));

Line 2357: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2353:
2354: --
2355: IF (l_id_Tbl.COUNT > 0) THEN
2356:
2357: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2358: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2359: '1160: Trying to bulk updat tax_amount of toplines of type subscription of contract '|| p_id);
2360: END IF;
2361:

Line 2358: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

2354: --
2355: IF (l_id_Tbl.COUNT > 0) THEN
2356:
2357: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2358: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2359: '1160: Trying to bulk updat tax_amount of toplines of type subscription of contract '|| p_id);
2360: END IF;
2361:
2362: FORALL I IN l_id_Tbl.FIRST .. l_id_Tbl.LAST

Line 2371: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2367: and cle_id = l_id_Tbl(I);
2368:
2369: END IF;
2370:
2371: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2372: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2373: '1165: Successfully bulk updated tax_amount of toplines of type subscription of contract '|| p_id);
2374: END IF;
2375:

Line 2372: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

2368:
2369: END IF;
2370:
2371: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2372: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
2373: '1165: Successfully bulk updated tax_amount of toplines of type subscription of contract '|| p_id);
2374: END IF;
2375:
2376: ---

Line 2386: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2382:
2383: WHEN FND_API.G_EXC_ERROR THEN
2384: x_return_status := FND_API.G_RET_STS_ERROR;
2385:
2386: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2387: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1170: Leaving OKS_CHANGE_STATUS_PVT, one or more mandatory parameters missing :FND_API.G_EXC_ERROR');
2388: END IF;
2389:
2390: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2387: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1170: Leaving OKS_CHANGE_STATUS_PVT, one or more mandatory parameters missing :FND_API.G_EXC_ERROR');

2383: WHEN FND_API.G_EXC_ERROR THEN
2384: x_return_status := FND_API.G_RET_STS_ERROR;
2385:
2386: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2387: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1170: Leaving OKS_CHANGE_STATUS_PVT, one or more mandatory parameters missing :FND_API.G_EXC_ERROR');
2388: END IF;
2389:
2390: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2391: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 2393: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2389:
2390: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2391: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2392:
2393: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2394: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1180: Leaving OKS_CHANGE_STATUS_PVT: FND_API.G_EXC_UNEXPECTED_ERROR '|| SQLERRM);
2395: END IF;
2396:
2397: WHEN OTHERS THEN

Line 2394: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1180: Leaving OKS_CHANGE_STATUS_PVT: FND_API.G_EXC_UNEXPECTED_ERROR '|| SQLERRM);

2390: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2391: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2392:
2393: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2394: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1180: Leaving OKS_CHANGE_STATUS_PVT: FND_API.G_EXC_UNEXPECTED_ERROR '|| SQLERRM);
2395: END IF;
2396:
2397: WHEN OTHERS THEN
2398: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 2400: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2396:
2397: WHEN OTHERS THEN
2398: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2399:
2400: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2401: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1190: Leaving OKS_CHANGE_STATUS_PVT because of EXCEPTION: '||sqlerrm);
2402: END IF;
2403:
2404: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN

Line 2401: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1190: Leaving OKS_CHANGE_STATUS_PVT because of EXCEPTION: '||sqlerrm);

2397: WHEN OTHERS THEN
2398: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2399:
2400: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2401: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1190: Leaving OKS_CHANGE_STATUS_PVT because of EXCEPTION: '||sqlerrm);
2402: END IF;
2403:
2404: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2405: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name, SQLERRM );