DBA Data[Home] [Help]

APPS.OKL_VENDOR_REFUND_PVT dependencies on FND_API

Line 15: p_encoded => fnd_api.g_false,

11: LOOP
12: fnd_msg_pub.get
13: (p_data => p_all_message(i),
14: p_msg_index_out => l_msg_count,
15: p_encoded => fnd_api.g_false,
16: p_msg_index => fnd_msg_pub.g_next
17: );
18: END LOOP;
19: EXCEPTION

Line 43: l_return_status VARCHAR2(1) :=FND_API.G_RET_STS_SUCCESS;

39: l_camv_tbl OKL_cure_amounts_pub.camv_tbl_type;
40: x_camv_tbl OKL_cure_amounts_pub.camv_tbl_type;
41: l_msg_count NUMBER;
42: l_msg_data VARCHAR2(32627);
43: l_return_status VARCHAR2(1) :=FND_API.G_RET_STS_SUCCESS;
44: next_row INTEGER;
45: l_error_msg_tbl error_message_type;
46:
47: BEGIN

Line 53: x_return_status := FND_API.G_RET_STS_SUCCESS;

49: okl_debug_pub.logmessage('OKL_VENDOR_REFUND_PVT : Update_cure_amounts : p_contract_id : '||p_contract_id);
50:
51: SAVEPOINT UPDATE_CURE_AMOUNTS;
52: FND_MSG_PUB.initialize;
53: x_return_status := FND_API.G_RET_STS_SUCCESS;
54: write_log(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Calling Cure Amount Update Api');
55:
56: --update cure amounts table
57: FOR i in c_get_cure_amts (p_contract_id)

Line 92: IF (l_return_status <> FND_Api.G_RET_STS_SUCCESS )

88: ,x_camv_tbl => x_camv_tbl
89: );
90: okl_debug_pub.logmessage('OKL_VENDOR_REFUND_PVT : Update_cure_amounts : OKL_cure_amounts_pub.update_cure_amounts : '||l_return_status);
91:
92: IF (l_return_status <> FND_Api.G_RET_STS_SUCCESS )
93: THEN
94: RAISE Fnd_Api.G_EXC_ERROR;
95: ELSE
96: write_log(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM,

Line 94: RAISE Fnd_Api.G_EXC_ERROR;

90: okl_debug_pub.logmessage('OKL_VENDOR_REFUND_PVT : Update_cure_amounts : OKL_cure_amounts_pub.update_cure_amounts : '||l_return_status);
91:
92: IF (l_return_status <> FND_Api.G_RET_STS_SUCCESS )
93: THEN
94: RAISE Fnd_Api.G_EXC_ERROR;
95: ELSE
96: write_log(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM,
97: 'Updation of cure amounts is Successful');
98: END IF;

Line 107: WHEN Fnd_Api.G_EXC_ERROR THEN

103:
104: okl_debug_pub.logmessage('OKL_VENDOR_REFUND_PVT : Update_cure_amounts : END ');
105:
106: EXCEPTION
107: WHEN Fnd_Api.G_EXC_ERROR THEN
108: ROLLBACK TO UPDATE_CURE_AMOUNTS;
109: x_return_status := Fnd_Api.G_RET_STS_ERROR;
110: x_msg_count := l_msg_count ;
111: x_msg_data := l_msg_data ;

Line 109: x_return_status := Fnd_Api.G_RET_STS_ERROR;

105:
106: EXCEPTION
107: WHEN Fnd_Api.G_EXC_ERROR THEN
108: ROLLBACK TO UPDATE_CURE_AMOUNTS;
109: x_return_status := Fnd_Api.G_RET_STS_ERROR;
110: x_msg_count := l_msg_count ;
111: x_msg_data := l_msg_data ;
112: Fnd_Msg_Pub.count_and_get(
113: p_count => x_msg_count

Line 115: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

111: x_msg_data := l_msg_data ;
112: Fnd_Msg_Pub.count_and_get(
113: p_count => x_msg_count
114: ,p_data => x_msg_data);
115: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
116: ROLLBACK TO UPDATE_CURE_AMOUNTS;
117: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
118: x_msg_count := l_msg_count ;
119: x_msg_data := l_msg_data ;

Line 117: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

113: p_count => x_msg_count
114: ,p_data => x_msg_data);
115: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
116: ROLLBACK TO UPDATE_CURE_AMOUNTS;
117: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
118: x_msg_count := l_msg_count ;
119: x_msg_data := l_msg_data ;
120: Fnd_Msg_Pub.count_and_get(
121: p_count => x_msg_count

Line 125: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

121: p_count => x_msg_count
122: ,p_data => x_msg_data);
123: WHEN OTHERS THEN
124: ROLLBACK TO UPDATE_CURE_AMOUNTS;
125: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
126: x_msg_count := l_msg_count ;
127: x_msg_data := l_msg_data ;
128: Fnd_Msg_Pub.ADD_EXC_MSG('OKL_VENDOR_REFUND_PVT','UPDATE_CURE_AMOUNTS');
129: Fnd_Msg_Pub.count_and_get(

Line 139: p_init_msg_list IN VARCHAR2 DEFAULT FND_api.G_FALSE,

135: -- PROCEDURE CALC_CURE_REFUND
136: ---------------------------------------------------------------------------
137: PROCEDURE CALC_CURE_REFUND(
138: p_api_version IN NUMBER,
139: p_init_msg_list IN VARCHAR2 DEFAULT FND_api.G_FALSE,
140: p_contract_id IN NUMBER,
141: p_contract_number IN VARCHAR2,
142: p_program_id IN NUMBER,
143: p_rule_group_code IN VARCHAR2,

Line 153: l_return_status VARCHAR2(1) := FND_Api.G_RET_STS_SUCCESS;

149: x_msg_data OUT NOCOPY VARCHAR2
150: )
151: IS
152:
153: l_return_status VARCHAR2(1) := FND_Api.G_RET_STS_SUCCESS;
154: l_repurchase_amount NUMBER := 0;
155: l_cure_amount NUMBER := 0;
156: l_payments_remaining NUMBER := 0;
157: l_effective_date DATE;

Line 219: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

215: x_msg_data =>l_msg_data );
216:
217: okl_debug_pub.logmessage('OKL_VENDOR_REFUND_PVT : CALC_CURE_REFUND : Update_cure_amounts : '||l_return_status);
218:
219: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
220: THEN
221: write_log(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW ,
222: 'Error Updating Cure amounts Table for contract '|| p_contract_number );
223: GET_ERROR_MESSAGE(l_error_msg_tbl);

Line 263: IF (l_return_status <> FND_Api.G_RET_STS_SUCCESS )

259: ,p_crsv_rec => l_crsv_rec
260: ,x_crsv_rec => x_crsv_rec);
261:
262: okl_debug_pub.logmessage('OKL_VENDOR_REFUND_PVT : CALC_CURE_REFUND : OKL_cure_rfnd_stage_pub.insert_cure_refunds : '||l_return_status);
263: IF (l_return_status <> FND_Api.G_RET_STS_SUCCESS )
264: THEN
265: write_log(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM, ' Error Inserting Cure Refunds');
266: RAISE Fnd_Api.G_EXC_ERROR;
267: ELSE

Line 266: RAISE Fnd_Api.G_EXC_ERROR;

262: okl_debug_pub.logmessage('OKL_VENDOR_REFUND_PVT : CALC_CURE_REFUND : OKL_cure_rfnd_stage_pub.insert_cure_refunds : '||l_return_status);
263: IF (l_return_status <> FND_Api.G_RET_STS_SUCCESS )
264: THEN
265: write_log(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM, ' Error Inserting Cure Refunds');
266: RAISE Fnd_Api.G_EXC_ERROR;
267: ELSE
268: write_log(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM,
269: 'Done inserting cure refunds, cure received amount is '||l_received_amount || 'and negotiated amount is'||l_negotiated_amount);
270: x_cure_amount:=l_received_amount; -- bug 6487958

Line 284: WHEN Fnd_Api.G_EXC_ERROR THEN

280:
281: okl_debug_pub.logmessage('OKL_VENDOR_REFUND_PVT : CALC_CURE_REFUND : END ');
282:
283: EXCEPTION
284: WHEN Fnd_Api.G_EXC_ERROR THEN
285: ROLLBACK TO CALC_CURE_REFUND;
286: x_return_status := Fnd_Api.G_RET_STS_ERROR;
287: x_msg_count := l_msg_count ;
288: x_msg_data := l_msg_data ;

Line 286: x_return_status := Fnd_Api.G_RET_STS_ERROR;

282:
283: EXCEPTION
284: WHEN Fnd_Api.G_EXC_ERROR THEN
285: ROLLBACK TO CALC_CURE_REFUND;
286: x_return_status := Fnd_Api.G_RET_STS_ERROR;
287: x_msg_count := l_msg_count ;
288: x_msg_data := l_msg_data ;
289: Fnd_Msg_Pub.count_and_get(
290: p_count => x_msg_count

Line 292: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

288: x_msg_data := l_msg_data ;
289: Fnd_Msg_Pub.count_and_get(
290: p_count => x_msg_count
291: ,p_data => x_msg_data);
292: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
293: ROLLBACK TO CALC_CURE_REFUND;
294: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
295: x_msg_count := l_msg_count ;
296: x_msg_data := l_msg_data ;

Line 294: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

290: p_count => x_msg_count
291: ,p_data => x_msg_data);
292: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
293: ROLLBACK TO CALC_CURE_REFUND;
294: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
295: x_msg_count := l_msg_count ;
296: x_msg_data := l_msg_data ;
297: Fnd_Msg_Pub.count_and_get(
298: p_count => x_msg_count

Line 302: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

298: p_count => x_msg_count
299: ,p_data => x_msg_data);
300: WHEN OTHERS THEN
301: ROLLBACK TO CALC_CURE_REFUND;
302: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
303: x_msg_count := l_msg_count ;
304: x_msg_data := l_msg_data ;
305: Fnd_Msg_Pub.ADD_EXC_MSG('OKL_VENDOR_REFUND_PVT','CALC_CURE_REFUND');
306: Fnd_Msg_Pub.count_and_get(

Line 388: l_return_status VARCHAR2(1):= FND_API.G_RET_STS_SUCCESS;

384: l_id1 VARCHAR2(40);
385: l_id2 VARCHAR2(200);
386: l_rule_value VARCHAR2(2000);
387: l_days_allowed NUMBER :=0;
388: l_return_status VARCHAR2(1):= FND_API.G_RET_STS_SUCCESS;
389: l_idx INTEGER;
390: l_amount_past_due NUMBER :=0;
391: l_non_del NUMBER := null;
392:

Line 450: x_return_status := FND_API.G_RET_STS_SUCCESS;

446: BEGIN
447: okl_debug_pub.logmessage('OKL_VENDOR_REFUND_PVT : check_contract : START ');
448: okl_debug_pub.logmessage('OKL_VENDOR_REFUND_PVT : check_contract : p_contract_id : '||p_contract_id);
449: okl_debug_pub.logmessage('OKL_VENDOR_REFUND_PVT : check_contract : p_program_id : '||p_program_id);
450: x_return_status := FND_API.G_RET_STS_SUCCESS;
451: write_log(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Start of check_contract Procedure' );
452:
453: -- Get Contract allowed value for days past due from rules
454: l_return_status := okl_contract_info.get_rule_value(

Line 465: IF l_return_status =FND_Api.G_RET_STS_SUCCESS

461: ,x_value => l_rule_value);
462:
463: okl_debug_pub.logmessage('OKL_VENDOR_REFUND_PVT : check_contract : okl_contract_info.get_rule_value : '||l_return_status);
464:
465: IF l_return_status =FND_Api.G_RET_STS_SUCCESS
466: THEN
467: l_days_allowed :=nvl(l_rule_value,0);
468: write_log(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
469: 'Days allowed before refund is issued from Rule is ' || l_days_allowed);

Line 486: x_return_status := FND_API.G_RET_STS_ERROR;

482: IF (l_non_del > 0)
483: THEN
484: write_log(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
485: 'Contract'||p_contract_number || ' is not delinquent');
486: x_return_status := FND_API.G_RET_STS_ERROR;
487: END IF;
488:
489: okl_debug_pub.logmessage('OKL_VENDOR_REFUND_PVT : check_contract : END ');
490: END check_contract;

Line 506: l_return_status VARCHAR2(1) := fnd_api.G_RET_STS_SUCCESS;

502: )
503: IS
504: l_api_version CONSTANT NUMBER := 1.0;
505: l_api_name CONSTANT VARCHAR2(30) := 'OKL_VENDOR_REFUND_PVT';
506: l_return_status VARCHAR2(1) := fnd_api.G_RET_STS_SUCCESS;
507: l_msg_count NUMBER ;
508: l_msg_data VARCHAR2(32627);
509: l_init_msg_list VARCHAR2(1) DEFAULT fnd_api.g_false;
510:

Line 509: l_init_msg_list VARCHAR2(1) DEFAULT fnd_api.g_false;

505: l_api_name CONSTANT VARCHAR2(30) := 'OKL_VENDOR_REFUND_PVT';
506: l_return_status VARCHAR2(1) := fnd_api.G_RET_STS_SUCCESS;
507: l_msg_count NUMBER ;
508: l_msg_data VARCHAR2(32627);
509: l_init_msg_list VARCHAR2(1) DEFAULT fnd_api.g_false;
510:
511: l_cure_flag VARCHAR2(1);
512: l_rule_group_code VARCHAR2(30) := 'COCURP';
513: l_rule_code VARCHAR2(30) := 'CORFND';

Line 708: l_return_status :=FND_Api.G_RET_STS_SUCCESS;

704: l_no_of_cures := 0;
705: l_no_of_cures_allowed := 0;
706: l_repurchase_days_past_allowed := 0;
707: l_cure_calc_flag := NULL;
708: l_return_status :=FND_Api.G_RET_STS_SUCCESS;
709: l_days_past :=SYSDATE;
710: l_vendor_id := null;
711: -----------------------------------------------------------------
712: -- CHECK IF THE CONTRACT HAS CURE RULE - WE DO NOT GENERATE CURES

Line 727: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)

723: ,x_id2 => l_id2
724: ,x_value => l_rule_value);
725: okl_debug_pub.logmessage('OKL_VENDOR_REFUND_PVT : GENERATE_VENDOR_REFUND : okl_contract_info.get_rule_value : '||l_return_status);
726:
727: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)
728: THEN
729: write_log(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW ,
730: 'Did not return a value from rule for grace days allowed before cure refund starts');
731:

Line 768: IF l_return_status = FND_API.G_RET_STS_SUCCESS

764: i.contract_number,
765: l_return_status);
766: okl_debug_pub.logmessage('OKL_VENDOR_REFUND_PVT : GENERATE_VENDOR_REFUND : CHECK_CONTRACT : '||l_return_status);
767:
768: IF l_return_status = FND_API.G_RET_STS_SUCCESS
769: THEN
770: write_log(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW ,
771: 'Contract ' || i.contract_number ||'is Delinquent ');
772: --jsanju added this

Line 799: IF (l_return_status <> fnd_api.G_RET_STS_SUCCESS)

795: write_log(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM,
796: 'Result of Cure Refund for contract_number '||
797: i.contract_number || ' is ' ||l_return_status);
798:
799: IF (l_return_status <> fnd_api.G_RET_STS_SUCCESS)
800: THEN
801: GET_ERROR_MESSAGE(l_error_msg_tbl);
802: IF (l_error_msg_tbl.COUNT > 0)
803: THEN