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.OKL_LOAN_BAL_UPDATE_PVT dependencies on FND_FILE

Line 126: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Book classification is not valid or the contract status is not Booked ');

122: -- check if the contract is of Book classification LOAN or REVOLVING-LOAN and is Booked
123: /*OPEN check_contract_loan_bal(p_contract_number);
124: FETCH check_contract_loan_bal INTO l_khr_id;
125: IF check_contract_loan_bal%NOTFOUND THEN
126: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Book classification is not valid or the contract status is not Booked ');
127: FND_FILE.PUT_LINE (FND_FILE.LOG,'Contract Book classification is not valid or the contract status is not Booked ');
128: RAISE OKL_API.G_EXCEPTION_ERROR;
129: END IF;
130: CLOSE check_contract_loan_bal;*/

Line 127: FND_FILE.PUT_LINE (FND_FILE.LOG,'Contract Book classification is not valid or the contract status is not Booked ');

123: /*OPEN check_contract_loan_bal(p_contract_number);
124: FETCH check_contract_loan_bal INTO l_khr_id;
125: IF check_contract_loan_bal%NOTFOUND THEN
126: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Book classification is not valid or the contract status is not Booked ');
127: FND_FILE.PUT_LINE (FND_FILE.LOG,'Contract Book classification is not valid or the contract status is not Booked ');
128: RAISE OKL_API.G_EXCEPTION_ERROR;
129: END IF;
130: CLOSE check_contract_loan_bal;*/
131:

Line 139: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Calculation for Asset Number: '|| l_kle_rec.asset_number);

135: IF (p_khr_rec.deal_type = 'LOAN') THEN
136: FOR l_kle_rec IN get_assets(p_khr_rec.khr_id)
137: LOOP
138: --l_asset_exists := TRUE;
139: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Calculation for Asset Number: '|| l_kle_rec.asset_number);
140: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Calculation for Asset Number: '|| l_kle_rec.asset_number);
141: /********************************************
142: * Calculation FOR Actual Principal Balance *
143: ********************************************/

Line 140: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Calculation for Asset Number: '|| l_kle_rec.asset_number);

136: FOR l_kle_rec IN get_assets(p_khr_rec.khr_id)
137: LOOP
138: --l_asset_exists := TRUE;
139: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Calculation for Asset Number: '|| l_kle_rec.asset_number);
140: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Calculation for Asset Number: '|| l_kle_rec.asset_number);
141: /********************************************
142: * Calculation FOR Actual Principal Balance *
143: ********************************************/
144: FND_FILE.PUT_LINE (FND_FILE.LOG,'Calculation for Actual Principal Balance');

Line 144: FND_FILE.PUT_LINE (FND_FILE.LOG,'Calculation for Actual Principal Balance');

140: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Calculation for Asset Number: '|| l_kle_rec.asset_number);
141: /********************************************
142: * Calculation FOR Actual Principal Balance *
143: ********************************************/
144: FND_FILE.PUT_LINE (FND_FILE.LOG,'Calculation for Actual Principal Balance');
145: -- Get the total principal balance
146: l_kle_prin_bal :=
147: OKL_VARIABLE_INT_UTIL_PVT.get_principal_bal( x_return_status
148: , p_khr_rec.khr_id -- Contract ID

Line 153: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate principal balance for Asset Number: '|| l_kle_rec.asset_number);

149: , l_kle_rec.asset_id -- Asset ID
150: , p_as_of_date );
151:
152: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
153: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate principal balance for Asset Number: '|| l_kle_rec.asset_number);
154: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
155: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate principal balance for Asset Number: '|| l_kle_rec.asset_number);
156: END IF;
157: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Asset Number: '|| l_kle_rec.asset_number || ' Principal Balance : ' || l_kle_prin_bal);

Line 155: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate principal balance for Asset Number: '|| l_kle_rec.asset_number);

151:
152: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
153: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate principal balance for Asset Number: '|| l_kle_rec.asset_number);
154: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
155: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate principal balance for Asset Number: '|| l_kle_rec.asset_number);
156: END IF;
157: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Asset Number: '|| l_kle_rec.asset_number || ' Principal Balance : ' || l_kle_prin_bal);
158: --l_khr_prin_bal := l_khr_prin_bal + l_kle_prin_bal;
159:

Line 157: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Asset Number: '|| l_kle_rec.asset_number || ' Principal Balance : ' || l_kle_prin_bal);

153: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate principal balance for Asset Number: '|| l_kle_rec.asset_number);
154: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
155: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate principal balance for Asset Number: '|| l_kle_rec.asset_number);
156: END IF;
157: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Asset Number: '|| l_kle_rec.asset_number || ' Principal Balance : ' || l_kle_prin_bal);
158: --l_khr_prin_bal := l_khr_prin_bal + l_kle_prin_bal;
159:
160: -- Actual Principal balance = outstanding principal balance
161: --l_actual_prin_bal := l_outstanding_prin_bal;

Line 162: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Actual Principal balance (outstanding principal balance)='||l_actual_prin_bal);

158: --l_khr_prin_bal := l_khr_prin_bal + l_kle_prin_bal;
159:
160: -- Actual Principal balance = outstanding principal balance
161: --l_actual_prin_bal := l_outstanding_prin_bal;
162: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Actual Principal balance (outstanding principal balance)='||l_actual_prin_bal);
163: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Actual Principal balance (outstanding principal balance )='||l_actual_prin_bal);
164:
165: -- Initialize the contract balances record with the values
166: l_cblv_rec.khr_id := p_khr_rec.khr_id;

Line 163: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Actual Principal balance (outstanding principal balance )='||l_actual_prin_bal);

159:
160: -- Actual Principal balance = outstanding principal balance
161: --l_actual_prin_bal := l_outstanding_prin_bal;
162: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Actual Principal balance (outstanding principal balance)='||l_actual_prin_bal);
163: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Actual Principal balance (outstanding principal balance )='||l_actual_prin_bal);
164:
165: -- Initialize the contract balances record with the values
166: l_cblv_rec.khr_id := p_khr_rec.khr_id;
167: l_cblv_rec.kle_id := l_kle_rec.asset_id;

Line 188: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'--------------------------------------------------------------------------');

184: END LOOP; -- end of for loop for Assets
185: END IF;
186:
187:
188: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'--------------------------------------------------------------------------');
189: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Balances for Contract Number: ' ||p_contract_number);
190: --FND_FILE.PUT_LINE (FND_FILE.LOG,'--------------------------------------------------------------------------');
191: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Contract Balances for Contract Number: ' ||p_contract_number);
192:

Line 189: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Balances for Contract Number: ' ||p_contract_number);

185: END IF;
186:
187:
188: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'--------------------------------------------------------------------------');
189: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Balances for Contract Number: ' ||p_contract_number);
190: --FND_FILE.PUT_LINE (FND_FILE.LOG,'--------------------------------------------------------------------------');
191: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Contract Balances for Contract Number: ' ||p_contract_number);
192:
193: -- Re-initialize the principal balance columns

Line 190: --FND_FILE.PUT_LINE (FND_FILE.LOG,'--------------------------------------------------------------------------');

186:
187:
188: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'--------------------------------------------------------------------------');
189: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Balances for Contract Number: ' ||p_contract_number);
190: --FND_FILE.PUT_LINE (FND_FILE.LOG,'--------------------------------------------------------------------------');
191: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Contract Balances for Contract Number: ' ||p_contract_number);
192:
193: -- Re-initialize the principal balance columns
194: l_cblv_rec.actual_principal_balance_amt := null;

Line 191: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Contract Balances for Contract Number: ' ||p_contract_number);

187:
188: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'--------------------------------------------------------------------------');
189: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Balances for Contract Number: ' ||p_contract_number);
190: --FND_FILE.PUT_LINE (FND_FILE.LOG,'--------------------------------------------------------------------------');
191: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Contract Balances for Contract Number: ' ||p_contract_number);
192:
193: -- Re-initialize the principal balance columns
194: l_cblv_rec.actual_principal_balance_amt := null;
195: l_cblv_rec.actual_principal_balance_date := null;

Line 202: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Calculation for Actual Principal Balance');

198: --IF NOT l_asset_exists THEN
199: /********************************************
200: * Calculation FOR Actual Principal Balance *
201: ********************************************/
202: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Calculation for Actual Principal Balance');
203: -- Get the total principal balance
204: l_khr_prin_bal :=
205: OKL_VARIABLE_INT_UTIL_PVT.get_principal_bal( x_return_status
206: , p_khr_rec.khr_id -- Contract ID

Line 210: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate principal balance for Contract Number: '|| p_khr_rec.contract_number);

206: , p_khr_rec.khr_id -- Contract ID
207: , null --Asset id is null for revolving Loan
208: , p_as_of_date );
209: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
210: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate principal balance for Contract Number: '|| p_khr_rec.contract_number);
211: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
212: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate principal balance for Contract Number: '|| p_khr_rec.contract_number);
213: END IF;
214: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Number: '|| p_khr_rec.contract_number || ' Principal Balance : ' || l_khr_prin_bal);

Line 212: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate principal balance for Contract Number: '|| p_khr_rec.contract_number);

208: , p_as_of_date );
209: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
210: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate principal balance for Contract Number: '|| p_khr_rec.contract_number);
211: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
212: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate principal balance for Contract Number: '|| p_khr_rec.contract_number);
213: END IF;
214: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Number: '|| p_khr_rec.contract_number || ' Principal Balance : ' || l_khr_prin_bal);
215:
216: -- Actual Principal balance = outstanding principal balance

Line 214: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Number: '|| p_khr_rec.contract_number || ' Principal Balance : ' || l_khr_prin_bal);

210: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate principal balance for Contract Number: '|| p_khr_rec.contract_number);
211: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
212: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate principal balance for Contract Number: '|| p_khr_rec.contract_number);
213: END IF;
214: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Number: '|| p_khr_rec.contract_number || ' Principal Balance : ' || l_khr_prin_bal);
215:
216: -- Actual Principal balance = outstanding principal balance
217: --l_actual_prin_bal := l_outstanding_prin_bal;
218:

Line 222: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Actual Principal balance (outstanding principal balance)='||l_actual_prin_bal);

218:
219: l_cblv_rec.actual_principal_balance_amt := l_khr_prin_bal;
220: l_cblv_rec.actual_principal_balance_date := p_as_of_date;
221:
222: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Actual Principal balance (outstanding principal balance)='||l_actual_prin_bal);
223: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Actual Principal balance (outstanding principal balance )='||l_actual_prin_bal);
224: --END IF; -- end of check for existence of asset for the contract
225:
226: /*********************************************

Line 223: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Actual Principal balance (outstanding principal balance )='||l_actual_prin_bal);

219: l_cblv_rec.actual_principal_balance_amt := l_khr_prin_bal;
220: l_cblv_rec.actual_principal_balance_date := p_as_of_date;
221:
222: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Actual Principal balance (outstanding principal balance)='||l_actual_prin_bal);
223: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Actual Principal balance (outstanding principal balance )='||l_actual_prin_bal);
224: --END IF; -- end of check for existence of asset for the contract
225:
226: /*********************************************
227: * Calculation FOR Total Interest Amount Due *

Line 229: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Calculation for Total Interest Amount Due');

225:
226: /*********************************************
227: * Calculation FOR Total Interest Amount Due *
228: *********************************************/
229: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Calculation for Total Interest Amount Due');
230: -- Get the total interest amount due
231: l_tot_interest_amt_due :=
232: OKL_VARIABLE_INT_UTIL_PVT.get_interest_due( x_return_status
233: , p_khr_rec.khr_id -- Contract ID

Line 236: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest due for Contract Number: '|| p_khr_rec.contract_number);

232: OKL_VARIABLE_INT_UTIL_PVT.get_interest_due( x_return_status
233: , p_khr_rec.khr_id -- Contract ID
234: , p_as_of_date );
235: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
236: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest due for Contract Number: '|| p_khr_rec.contract_number);
237: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
238: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest due for Contract Number: '|| p_khr_rec.contract_number);
239: END IF;
240: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Number: '|| p_khr_rec.contract_number || ' Interest Due : ' || l_tot_interest_amt_due);

Line 238: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest due for Contract Number: '|| p_khr_rec.contract_number);

234: , p_as_of_date );
235: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
236: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest due for Contract Number: '|| p_khr_rec.contract_number);
237: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
238: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest due for Contract Number: '|| p_khr_rec.contract_number);
239: END IF;
240: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Number: '|| p_khr_rec.contract_number || ' Interest Due : ' || l_tot_interest_amt_due);
241: /************************************************
242: * Calculation FOR Total Interest Amount Billed *

Line 240: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Number: '|| p_khr_rec.contract_number || ' Interest Due : ' || l_tot_interest_amt_due);

236: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest due for Contract Number: '|| p_khr_rec.contract_number);
237: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
238: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest due for Contract Number: '|| p_khr_rec.contract_number);
239: END IF;
240: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Number: '|| p_khr_rec.contract_number || ' Interest Due : ' || l_tot_interest_amt_due);
241: /************************************************
242: * Calculation FOR Total Interest Amount Billed *
243: ************************************************/
244: -- Get the total interest amount billed

Line 251: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest billed for Contract Number: '|| p_khr_rec.contract_number);

247: , p_khr_rec.khr_id -- Contract ID
248: , NULL
249: , p_as_of_date );
250: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
251: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest billed for Contract Number: '|| p_khr_rec.contract_number);
252: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
253: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest billed for Contract Number: '|| p_khr_rec.contract_number);
254: END IF;
255: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Number: '|| p_khr_rec.contract_number || ' Interest Billed : ' || l_tot_interest_amt_billed);

Line 253: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest billed for Contract Number: '|| p_khr_rec.contract_number);

249: , p_as_of_date );
250: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
251: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest billed for Contract Number: '|| p_khr_rec.contract_number);
252: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
253: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest billed for Contract Number: '|| p_khr_rec.contract_number);
254: END IF;
255: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Number: '|| p_khr_rec.contract_number || ' Interest Billed : ' || l_tot_interest_amt_billed);
256: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Total interest amount billed ='|| l_tot_interest_amt_billed );
257: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Total interest amount billed ='|| l_tot_interest_amt_billed );

Line 255: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Number: '|| p_khr_rec.contract_number || ' Interest Billed : ' || l_tot_interest_amt_billed);

251: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest billed for Contract Number: '|| p_khr_rec.contract_number);
252: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
253: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest billed for Contract Number: '|| p_khr_rec.contract_number);
254: END IF;
255: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Number: '|| p_khr_rec.contract_number || ' Interest Billed : ' || l_tot_interest_amt_billed);
256: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Total interest amount billed ='|| l_tot_interest_amt_billed );
257: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Total interest amount billed ='|| l_tot_interest_amt_billed );
258: /**************************************************
259: * Calculation FOR Total Interest Amount Received *

Line 256: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Total interest amount billed ='|| l_tot_interest_amt_billed );

252: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
253: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest billed for Contract Number: '|| p_khr_rec.contract_number);
254: END IF;
255: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Number: '|| p_khr_rec.contract_number || ' Interest Billed : ' || l_tot_interest_amt_billed);
256: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Total interest amount billed ='|| l_tot_interest_amt_billed );
257: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Total interest amount billed ='|| l_tot_interest_amt_billed );
258: /**************************************************
259: * Calculation FOR Total Interest Amount Received *
260: **************************************************/

Line 257: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Total interest amount billed ='|| l_tot_interest_amt_billed );

253: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest billed for Contract Number: '|| p_khr_rec.contract_number);
254: END IF;
255: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Number: '|| p_khr_rec.contract_number || ' Interest Billed : ' || l_tot_interest_amt_billed);
256: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Total interest amount billed ='|| l_tot_interest_amt_billed );
257: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Total interest amount billed ='|| l_tot_interest_amt_billed );
258: /**************************************************
259: * Calculation FOR Total Interest Amount Received *
260: **************************************************/
261: -- Get the total interest amount received

Line 268: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest received for Contract Number: '|| p_khr_rec.contract_number);

264: , p_khr_rec.khr_id -- Contract ID
265: , NULL
266: , p_as_of_date );
267: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
268: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest received for Contract Number: '|| p_khr_rec.contract_number);
269: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
270: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest received for Contract Number: '|| p_khr_rec.contract_number);
271: END IF;
272: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Number: '|| p_khr_rec.contract_number || ' Interest Received : ' || l_tot_interest_amt_received);

Line 270: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest received for Contract Number: '|| p_khr_rec.contract_number);

266: , p_as_of_date );
267: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
268: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest received for Contract Number: '|| p_khr_rec.contract_number);
269: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
270: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest received for Contract Number: '|| p_khr_rec.contract_number);
271: END IF;
272: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Number: '|| p_khr_rec.contract_number || ' Interest Received : ' || l_tot_interest_amt_received);
273: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Total interest amount received ='|| l_tot_interest_amt_received);
274: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Total interest amount received ='|| l_tot_interest_amt_received);

Line 272: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Number: '|| p_khr_rec.contract_number || ' Interest Received : ' || l_tot_interest_amt_received);

268: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest received for Contract Number: '|| p_khr_rec.contract_number);
269: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
270: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest received for Contract Number: '|| p_khr_rec.contract_number);
271: END IF;
272: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Number: '|| p_khr_rec.contract_number || ' Interest Received : ' || l_tot_interest_amt_received);
273: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Total interest amount received ='|| l_tot_interest_amt_received);
274: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Total interest amount received ='|| l_tot_interest_amt_received);
275:
276: -- Initialize the contract balances record with the values

Line 273: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Total interest amount received ='|| l_tot_interest_amt_received);

269: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
270: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest received for Contract Number: '|| p_khr_rec.contract_number);
271: END IF;
272: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Number: '|| p_khr_rec.contract_number || ' Interest Received : ' || l_tot_interest_amt_received);
273: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Total interest amount received ='|| l_tot_interest_amt_received);
274: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Total interest amount received ='|| l_tot_interest_amt_received);
275:
276: -- Initialize the contract balances record with the values
277: l_cblv_rec.khr_id := p_khr_rec.khr_id;

Line 274: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Total interest amount received ='|| l_tot_interest_amt_received);

270: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to calculate interest received for Contract Number: '|| p_khr_rec.contract_number);
271: END IF;
272: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Number: '|| p_khr_rec.contract_number || ' Interest Received : ' || l_tot_interest_amt_received);
273: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Total interest amount received ='|| l_tot_interest_amt_received);
274: --FND_FILE.PUT_LINE (FND_FILE.LOG,'Total interest amount received ='|| l_tot_interest_amt_received);
275:
276: -- Initialize the contract balances record with the values
277: l_cblv_rec.khr_id := p_khr_rec.khr_id;
278: l_cblv_rec.kle_id := NULL;

Line 307: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to create balances for Contract Number: '|| p_khr_rec.contract_number);

303: , x_msg_data => x_msg_data
304: , p_cblv_tbl => l_crt_cblv_tbl
305: , x_cblv_tbl => lx_crt_cblv_tbl);
306: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
307: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to create balances for Contract Number: '|| p_khr_rec.contract_number);
308: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
309: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to create balances for Contract Number: '|| p_khr_rec.contract_number);
310: END IF;
311: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Successfully created balances for Contract Number: '|| p_khr_rec.contract_number);

Line 309: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to create balances for Contract Number: '|| p_khr_rec.contract_number);

305: , x_cblv_tbl => lx_crt_cblv_tbl);
306: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
307: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to create balances for Contract Number: '|| p_khr_rec.contract_number);
308: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
309: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to create balances for Contract Number: '|| p_khr_rec.contract_number);
310: END IF;
311: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Successfully created balances for Contract Number: '|| p_khr_rec.contract_number);
312: END IF;
313:

Line 311: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Successfully created balances for Contract Number: '|| p_khr_rec.contract_number);

307: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to create balances for Contract Number: '|| p_khr_rec.contract_number);
308: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
309: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to create balances for Contract Number: '|| p_khr_rec.contract_number);
310: END IF;
311: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Successfully created balances for Contract Number: '|| p_khr_rec.contract_number);
312: END IF;
313:
314: IF l_upd_cblv_tbl.COUNT > 0 THEN
315: -- Update the table of records in OKL_CONTRACT_BALANCES

Line 325: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to update balances for Contract Number: '|| p_khr_rec.contract_number);

321: , x_msg_data => x_msg_data
322: , p_cblv_tbl => l_upd_cblv_tbl
323: , x_cblv_tbl => lx_upd_cblv_tbl);
324: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
325: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to update balances for Contract Number: '|| p_khr_rec.contract_number);
326: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
327: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to update balances for Contract Number: '|| p_khr_rec.contract_number);
328: END IF;
329: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Successfully updated balances for Contract Number: '|| p_khr_rec.contract_number);

Line 327: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to update balances for Contract Number: '|| p_khr_rec.contract_number);

323: , x_cblv_tbl => lx_upd_cblv_tbl);
324: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
325: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to update balances for Contract Number: '|| p_khr_rec.contract_number);
326: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
327: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to update balances for Contract Number: '|| p_khr_rec.contract_number);
328: END IF;
329: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Successfully updated balances for Contract Number: '|| p_khr_rec.contract_number);
330: END IF;
331: -- commit the savepoint

Line 329: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Successfully updated balances for Contract Number: '|| p_khr_rec.contract_number);

325: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to update balances for Contract Number: '|| p_khr_rec.contract_number);
326: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
327: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Unable to update balances for Contract Number: '|| p_khr_rec.contract_number);
328: END IF;
329: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Successfully updated balances for Contract Number: '|| p_khr_rec.contract_number);
330: END IF;
331: -- commit the savepoint
332: --OKL_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
333:

Line 393: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');

389: IF p_as_of_date IS NOT NULL THEN
390: l_as_of_date := FND_DATE.CANONICAL_TO_DATE(p_as_of_date);
391: END IF;
392:
393: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
394: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'OKL Loan Balances Update for Variable Interest');
395: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
396: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Program Run Date: '||sysdate);
397: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'To Date: '||l_as_of_date);

Line 394: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'OKL Loan Balances Update for Variable Interest');

390: l_as_of_date := FND_DATE.CANONICAL_TO_DATE(p_as_of_date);
391: END IF;
392:
393: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
394: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'OKL Loan Balances Update for Variable Interest');
395: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
396: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Program Run Date: '||sysdate);
397: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'To Date: '||l_as_of_date);
398: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Success or Error Detailed Messages Each Update');

Line 395: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');

391: END IF;
392:
393: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
394: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'OKL Loan Balances Update for Variable Interest');
395: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
396: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Program Run Date: '||sysdate);
397: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'To Date: '||l_as_of_date);
398: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Success or Error Detailed Messages Each Update');
399:

Line 396: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Program Run Date: '||sysdate);

392:
393: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
394: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'OKL Loan Balances Update for Variable Interest');
395: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
396: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Program Run Date: '||sysdate);
397: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'To Date: '||l_as_of_date);
398: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Success or Error Detailed Messages Each Update');
399:
400: FOR cur_khr IN c_khr_csr(p_contract_number) LOOP

Line 397: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'To Date: '||l_as_of_date);

393: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
394: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'OKL Loan Balances Update for Variable Interest');
395: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
396: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Program Run Date: '||sysdate);
397: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'To Date: '||l_as_of_date);
398: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Success or Error Detailed Messages Each Update');
399:
400: FOR cur_khr IN c_khr_csr(p_contract_number) LOOP
401: l_khr_rec := cur_khr;

Line 398: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Success or Error Detailed Messages Each Update');

394: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'OKL Loan Balances Update for Variable Interest');
395: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
396: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Program Run Date: '||sysdate);
397: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'To Date: '||l_as_of_date);
398: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Success or Error Detailed Messages Each Update');
399:
400: FOR cur_khr IN c_khr_csr(p_contract_number) LOOP
401: l_khr_rec := cur_khr;
402: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');

Line 402: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');

398: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Success or Error Detailed Messages Each Update');
399:
400: FOR cur_khr IN c_khr_csr(p_contract_number) LOOP
401: l_khr_rec := cur_khr;
402: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
403: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Processing Contract Number: '|| l_khr_rec.contract_number);
404: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Status: ' || l_khr_rec.status);
405: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Book classification: ' || l_khr_rec.deal_type);
406: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Interest calculation method: ' || l_khr_rec.interest_calculation_basis);

Line 403: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Processing Contract Number: '|| l_khr_rec.contract_number);

399:
400: FOR cur_khr IN c_khr_csr(p_contract_number) LOOP
401: l_khr_rec := cur_khr;
402: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
403: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Processing Contract Number: '|| l_khr_rec.contract_number);
404: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Status: ' || l_khr_rec.status);
405: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Book classification: ' || l_khr_rec.deal_type);
406: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Interest calculation method: ' || l_khr_rec.interest_calculation_basis);
407: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Revenue recognition method: ' || l_khr_rec.revenue_recognition_method);

Line 404: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Status: ' || l_khr_rec.status);

400: FOR cur_khr IN c_khr_csr(p_contract_number) LOOP
401: l_khr_rec := cur_khr;
402: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
403: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Processing Contract Number: '|| l_khr_rec.contract_number);
404: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Status: ' || l_khr_rec.status);
405: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Book classification: ' || l_khr_rec.deal_type);
406: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Interest calculation method: ' || l_khr_rec.interest_calculation_basis);
407: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Revenue recognition method: ' || l_khr_rec.revenue_recognition_method);
408:

Line 405: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Book classification: ' || l_khr_rec.deal_type);

401: l_khr_rec := cur_khr;
402: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
403: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Processing Contract Number: '|| l_khr_rec.contract_number);
404: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Status: ' || l_khr_rec.status);
405: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Book classification: ' || l_khr_rec.deal_type);
406: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Interest calculation method: ' || l_khr_rec.interest_calculation_basis);
407: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Revenue recognition method: ' || l_khr_rec.revenue_recognition_method);
408:
409: get_loan_amounts(

Line 406: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Interest calculation method: ' || l_khr_rec.interest_calculation_basis);

402: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
403: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Processing Contract Number: '|| l_khr_rec.contract_number);
404: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Status: ' || l_khr_rec.status);
405: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Book classification: ' || l_khr_rec.deal_type);
406: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Interest calculation method: ' || l_khr_rec.interest_calculation_basis);
407: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Revenue recognition method: ' || l_khr_rec.revenue_recognition_method);
408:
409: get_loan_amounts(
410: p_api_version => l_api_version,

Line 407: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Revenue recognition method: ' || l_khr_rec.revenue_recognition_method);

403: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Processing Contract Number: '|| l_khr_rec.contract_number);
404: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Status: ' || l_khr_rec.status);
405: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Book classification: ' || l_khr_rec.deal_type);
406: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Interest calculation method: ' || l_khr_rec.interest_calculation_basis);
407: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Revenue recognition method: ' || l_khr_rec.revenue_recognition_method);
408:
409: get_loan_amounts(
410: p_api_version => l_api_version,
411: p_init_msg_list => FND_API.G_FALSE,

Line 419: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Successfully processed contract: ' || l_khr_rec.contract_number);

415: p_khr_rec => l_khr_rec,
416: p_as_of_date => l_as_of_date);
417:
418: IF (lx_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
419: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Successfully processed contract: ' || l_khr_rec.contract_number);
420: Commit;
421: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
422: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Error processing contract: ' || l_khr_rec.contract_number);
423: ELSIF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN

Line 422: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Error processing contract: ' || l_khr_rec.contract_number);

418: IF (lx_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
419: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Successfully processed contract: ' || l_khr_rec.contract_number);
420: Commit;
421: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
422: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Error processing contract: ' || l_khr_rec.contract_number);
423: ELSIF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
424: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Unexpected error processing contract: ' || l_khr_rec.contract_number);
425: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
426: END IF;

Line 424: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Unexpected error processing contract: ' || l_khr_rec.contract_number);

420: Commit;
421: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
422: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Error processing contract: ' || l_khr_rec.contract_number);
423: ELSIF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
424: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Unexpected error processing contract: ' || l_khr_rec.contract_number);
425: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
426: END IF;
427: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
428: END LOOP;

Line 427: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');

423: ELSIF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
424: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Unexpected error processing contract: ' || l_khr_rec.contract_number);
425: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
426: END IF;
427: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
428: END LOOP;
429:
430: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'OKL Loan Balances Update for Variable Interest Completed Successfully');
431: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Program End Date: '||sysdate);

Line 430: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'OKL Loan Balances Update for Variable Interest Completed Successfully');

426: END IF;
427: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
428: END LOOP;
429:
430: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'OKL Loan Balances Update for Variable Interest Completed Successfully');
431: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Program End Date: '||sysdate);
432: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
433:
434: errbuf := lx_msg_data;

Line 431: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Program End Date: '||sysdate);

427: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
428: END LOOP;
429:
430: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'OKL Loan Balances Update for Variable Interest Completed Successfully');
431: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Program End Date: '||sysdate);
432: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
433:
434: errbuf := lx_msg_data;
435: IF lx_msg_count >= 1 THEN

Line 432: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');

428: END LOOP;
429:
430: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'OKL Loan Balances Update for Variable Interest Completed Successfully');
431: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Program End Date: '||sysdate);
432: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
433:
434: errbuf := lx_msg_data;
435: IF lx_msg_count >= 1 THEN
436: FOR i in 1..lx_msg_count LOOP

Line 442: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,to_char(i) || ': ' || lx_msg_data);

438: p_encoded => 'F',
439: p_data => lx_msg_data,
440: p_msg_index_out => l_msg_index_out);
441:
442: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,to_char(i) || ': ' || lx_msg_data);
443: END LOOP; -- end of for loop
444: END IF; -- end of check for message count
445: retcode := 0;
446: EXCEPTION

Line 467: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Error '||SQLCODE||': '||SQLERRM);

463: p_api_type => '_PVT');
464: WHEN OTHERS THEN
465: retcode := 2;
466: errbuf := SQLERRM;
467: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Error '||SQLCODE||': '||SQLERRM);
468: END calculate_loan_amounts;
469:
470: END OKL_LOAN_BAL_UPDATE_PVT; -- end of Body