111: FETCH c_get_open_period_gl_date INTO l_open_period_gl_date;
112: CLOSE c_get_open_period_gl_date;
113:
114: FOR c_xla_event_data IN c_xla_event_info (l_open_period_gl_date) LOOP
115: FND_FILE.PUT_LINE(FND_FILE.LOG, 'c_xla_event_data.event_id: ' ||c_xla_event_data.event_id);
116: FND_FILE.PUT_LINE(FND_FILE.LOG, 'l_open_period_gl_date: '|| l_open_period_gl_date);
117: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Utilization_id/Claim_id ' || l_event_source_info.source_id_int_1);
118:
119: l_event_date := l_open_period_gl_date;
112: CLOSE c_get_open_period_gl_date;
113:
114: FOR c_xla_event_data IN c_xla_event_info (l_open_period_gl_date) LOOP
115: FND_FILE.PUT_LINE(FND_FILE.LOG, 'c_xla_event_data.event_id: ' ||c_xla_event_data.event_id);
116: FND_FILE.PUT_LINE(FND_FILE.LOG, 'l_open_period_gl_date: '|| l_open_period_gl_date);
117: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Utilization_id/Claim_id ' || l_event_source_info.source_id_int_1);
118:
119: l_event_date := l_open_period_gl_date;
120:
113:
114: FOR c_xla_event_data IN c_xla_event_info (l_open_period_gl_date) LOOP
115: FND_FILE.PUT_LINE(FND_FILE.LOG, 'c_xla_event_data.event_id: ' ||c_xla_event_data.event_id);
116: FND_FILE.PUT_LINE(FND_FILE.LOG, 'l_open_period_gl_date: '|| l_open_period_gl_date);
117: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Utilization_id/Claim_id ' || l_event_source_info.source_id_int_1);
118:
119: l_event_date := l_open_period_gl_date;
120:
121: l_event_source_info.legal_entity_id := c_xla_event_data.legal_entity_id;
124: l_event_source_info.ledger_id := c_xla_event_data.ledger_id;
125: l_event_source_info.entity_type_code := c_xla_event_data.entity_code;
126:
127: IF (l_event_source_info.entity_type_code = 'ACCRUAL') THEN
128: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Updating Accrual Record for Utilization_id:' || l_event_source_info.source_id_int_1);
129: OPEN c_get_year_id(l_event_date);
130: FETCH c_get_year_id INTO l_year_id;
131: CLOSE c_get_year_id;
132:
137: last_updated_by = NVL(FND_GLOBAL.user_id,-1)
138: WHERE utilization_id = l_event_source_info.source_id_int_1;
139:
140: ELSIF (l_event_source_info.entity_type_code = 'CLAIM_SETTLEMENT') THEN
141: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Updating Claim Record for claim_id:' || l_event_source_info.source_id_int_1);
142:
143: OPEN c_claim_objverno(l_event_source_info.source_id_int_1);
144: FETCH c_claim_objverno INTO l_obj_version_number;
145: CLOSE c_claim_objverno;
188: EXCEPTION
189: WHEN FND_API.G_EXC_ERROR THEN
190: ROLLBACK TO Update_GL_Date;
191: x_return_status := FND_API.G_RET_STS_ERROR;
192: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Expected Error from UpdateGLDate: '||SQLERRM);
193:
194: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
195: ROLLBACK TO Update_GL_Date;
196: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
193:
194: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
195: ROLLBACK TO Update_GL_Date;
196: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
197: FND_FILE.PUT_LINE(FND_FILE.LOG, 'UnExpected Error from UpdateGLDate:: '||SQLERRM);
198:
199: WHEN OTHERS THEN
200: ROLLBACK TO Update_GL_Date;
201: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
198:
199: WHEN OTHERS THEN
200: ROLLBACK TO Update_GL_Date;
201: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
202: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error from UpdateGLDate:: '||SQLERRM);
203:
204: END Update_GL_Date;
205:
206: ---------------------------------------------------------------------
280: BEGIN
281:
282: SAVEPOINT CREATE_Accounting;
283:
284: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Start ='||G_PKG_NAME);
285: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*--------------------------------Create Accounting Report -----------------------------*');
286: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Starts On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
287: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------*');
288:
281:
282: SAVEPOINT CREATE_Accounting;
283:
284: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Start ='||G_PKG_NAME);
285: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*--------------------------------Create Accounting Report -----------------------------*');
286: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Starts On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
287: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------*');
288:
289: FND_FILE.PUT_LINE(FND_FILE.LOG, 'In Parameters : ');
282: SAVEPOINT CREATE_Accounting;
283:
284: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Start ='||G_PKG_NAME);
285: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*--------------------------------Create Accounting Report -----------------------------*');
286: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Starts On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
287: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------*');
288:
289: FND_FILE.PUT_LINE(FND_FILE.LOG, 'In Parameters : ');
290:
283:
284: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Start ='||G_PKG_NAME);
285: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*--------------------------------Create Accounting Report -----------------------------*');
286: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Starts On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
287: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------*');
288:
289: FND_FILE.PUT_LINE(FND_FILE.LOG, 'In Parameters : ');
290:
291: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_ledger_name : '||p_ledger_name );
285: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*--------------------------------Create Accounting Report -----------------------------*');
286: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Starts On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
287: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------*');
288:
289: FND_FILE.PUT_LINE(FND_FILE.LOG, 'In Parameters : ');
290:
291: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_ledger_name : '||p_ledger_name );
292: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_end_date : '||p_end_date );
293: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_transfer_to_gl_flag : '||p_transfer_to_gl_flag );
287: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------*');
288:
289: FND_FILE.PUT_LINE(FND_FILE.LOG, 'In Parameters : ');
290:
291: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_ledger_name : '||p_ledger_name );
292: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_end_date : '||p_end_date );
293: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_transfer_to_gl_flag : '||p_transfer_to_gl_flag );
294: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_gl_batch_name : '||p_gl_batch_name );
295: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_transfer_to_gl : '||p_transfer_to_gl );
288:
289: FND_FILE.PUT_LINE(FND_FILE.LOG, 'In Parameters : ');
290:
291: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_ledger_name : '||p_ledger_name );
292: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_end_date : '||p_end_date );
293: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_transfer_to_gl_flag : '||p_transfer_to_gl_flag );
294: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_gl_batch_name : '||p_gl_batch_name );
295: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_transfer_to_gl : '||p_transfer_to_gl );
296: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_post_in_gl : '||p_post_in_gl );
289: FND_FILE.PUT_LINE(FND_FILE.LOG, 'In Parameters : ');
290:
291: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_ledger_name : '||p_ledger_name );
292: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_end_date : '||p_end_date );
293: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_transfer_to_gl_flag : '||p_transfer_to_gl_flag );
294: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_gl_batch_name : '||p_gl_batch_name );
295: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_transfer_to_gl : '||p_transfer_to_gl );
296: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_post_in_gl : '||p_post_in_gl );
297: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_ledger_id : '||p_ledger_id );
290:
291: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_ledger_name : '||p_ledger_name );
292: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_end_date : '||p_end_date );
293: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_transfer_to_gl_flag : '||p_transfer_to_gl_flag );
294: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_gl_batch_name : '||p_gl_batch_name );
295: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_transfer_to_gl : '||p_transfer_to_gl );
296: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_post_in_gl : '||p_post_in_gl );
297: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_ledger_id : '||p_ledger_id );
298:
291: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_ledger_name : '||p_ledger_name );
292: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_end_date : '||p_end_date );
293: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_transfer_to_gl_flag : '||p_transfer_to_gl_flag );
294: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_gl_batch_name : '||p_gl_batch_name );
295: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_transfer_to_gl : '||p_transfer_to_gl );
296: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_post_in_gl : '||p_post_in_gl );
297: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_ledger_id : '||p_ledger_id );
298:
299:
292: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_end_date : '||p_end_date );
293: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_transfer_to_gl_flag : '||p_transfer_to_gl_flag );
294: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_gl_batch_name : '||p_gl_batch_name );
295: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_transfer_to_gl : '||p_transfer_to_gl );
296: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_post_in_gl : '||p_post_in_gl );
297: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_ledger_id : '||p_ledger_id );
298:
299:
300: Update_GL_Date(p_api_version => 1.0,
293: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_transfer_to_gl_flag : '||p_transfer_to_gl_flag );
294: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_gl_batch_name : '||p_gl_batch_name );
295: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_transfer_to_gl : '||p_transfer_to_gl );
296: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_post_in_gl : '||p_post_in_gl );
297: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_ledger_id : '||p_ledger_id );
298:
299:
300: Update_GL_Date(p_api_version => 1.0,
301: p_init_msg_list => FND_API.G_FALSE,
302: p_validation_level=> FND_API.G_VALID_LEVEL_FULL,
303: p_ledger_id => p_ledger_id,
304: x_return_status => l_return_status);
305:
306: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Return Status from Update_GL_Date : '|| l_return_status );
307:
308: IF l_return_status = FND_API.g_ret_sts_error THEN
309: RAISE FND_API.G_EXC_ERROR;
310: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
380: p_user_id
381: );
382:
383: IF l_reqid=0 THEN
384: FND_FILE.PUT_LINE(fnd_file.log,'Could not launch Create Accounting Request');
385: retcode:=1;
386: END IF;
387:
388:
393: retcode:=0;
394: END IF;
395: COMMIT;
396:
397: FND_FILE.PUT_LINE(FND_FILE.LOG, 'After calling SLA Accounting Program');
398: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
399: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Status: Successful' );
400: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
401: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
394: END IF;
395: COMMIT;
396:
397: FND_FILE.PUT_LINE(FND_FILE.LOG, 'After calling SLA Accounting Program');
398: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
399: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Status: Successful' );
400: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
401: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
402:
395: COMMIT;
396:
397: FND_FILE.PUT_LINE(FND_FILE.LOG, 'After calling SLA Accounting Program');
398: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
399: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Status: Successful' );
400: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
401: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
402:
403: EXCEPTION
396:
397: FND_FILE.PUT_LINE(FND_FILE.LOG, 'After calling SLA Accounting Program');
398: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
399: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Status: Successful' );
400: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
401: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
402:
403: EXCEPTION
404: WHEN FND_API.G_EXC_ERROR THEN
397: FND_FILE.PUT_LINE(FND_FILE.LOG, 'After calling SLA Accounting Program');
398: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
399: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Status: Successful' );
400: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
401: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
402:
403: EXCEPTION
404: WHEN FND_API.G_EXC_ERROR THEN
405: retcode:=2;
404: WHEN FND_API.G_EXC_ERROR THEN
405: retcode:=2;
406: ROLLBACK TO CREATE_Accounting;
407: errbuf:= FND_API.G_RET_STS_ERROR;
408: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Expected Error: '||SQLERRM);
409: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
410: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Status: Failure (Error:' ||SQLCODE||SQLERRM || ')');
411: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
412: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
405: retcode:=2;
406: ROLLBACK TO CREATE_Accounting;
407: errbuf:= FND_API.G_RET_STS_ERROR;
408: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Expected Error: '||SQLERRM);
409: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
410: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Status: Failure (Error:' ||SQLCODE||SQLERRM || ')');
411: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
412: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
413:
406: ROLLBACK TO CREATE_Accounting;
407: errbuf:= FND_API.G_RET_STS_ERROR;
408: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Expected Error: '||SQLERRM);
409: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
410: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Status: Failure (Error:' ||SQLCODE||SQLERRM || ')');
411: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
412: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
413:
414: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
407: errbuf:= FND_API.G_RET_STS_ERROR;
408: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Expected Error: '||SQLERRM);
409: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
410: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Status: Failure (Error:' ||SQLCODE||SQLERRM || ')');
411: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
412: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
413:
414: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
415: retcode:=2;
408: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Expected Error: '||SQLERRM);
409: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
410: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Status: Failure (Error:' ||SQLCODE||SQLERRM || ')');
411: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
412: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
413:
414: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
415: retcode:=2;
416: ROLLBACK TO CREATE_Accounting;
414: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
415: retcode:=2;
416: ROLLBACK TO CREATE_Accounting;
417: errbuf:= FND_API.G_RET_STS_UNEXP_ERROR;
418: FND_FILE.PUT_LINE(FND_FILE.LOG, 'UnExpected Error: '||SQLERRM);
419: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
420: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Status: Failure (Error:' ||SQLCODE||SQLERRM || ')');
421: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
422: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
415: retcode:=2;
416: ROLLBACK TO CREATE_Accounting;
417: errbuf:= FND_API.G_RET_STS_UNEXP_ERROR;
418: FND_FILE.PUT_LINE(FND_FILE.LOG, 'UnExpected Error: '||SQLERRM);
419: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
420: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Status: Failure (Error:' ||SQLCODE||SQLERRM || ')');
421: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
422: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
423: WHEN OTHERS THEN
416: ROLLBACK TO CREATE_Accounting;
417: errbuf:= FND_API.G_RET_STS_UNEXP_ERROR;
418: FND_FILE.PUT_LINE(FND_FILE.LOG, 'UnExpected Error: '||SQLERRM);
419: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
420: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Status: Failure (Error:' ||SQLCODE||SQLERRM || ')');
421: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
422: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
423: WHEN OTHERS THEN
424: retcode:=2;
417: errbuf:= FND_API.G_RET_STS_UNEXP_ERROR;
418: FND_FILE.PUT_LINE(FND_FILE.LOG, 'UnExpected Error: '||SQLERRM);
419: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
420: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Status: Failure (Error:' ||SQLCODE||SQLERRM || ')');
421: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
422: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
423: WHEN OTHERS THEN
424: retcode:=2;
425: ROLLBACK TO CREATE_Accounting;
418: FND_FILE.PUT_LINE(FND_FILE.LOG, 'UnExpected Error: '||SQLERRM);
419: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
420: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Status: Failure (Error:' ||SQLCODE||SQLERRM || ')');
421: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
422: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
423: WHEN OTHERS THEN
424: retcode:=2;
425: ROLLBACK TO CREATE_Accounting;
426: errbuf:= FND_API.G_RET_STS_UNEXP_ERROR;
423: WHEN OTHERS THEN
424: retcode:=2;
425: ROLLBACK TO CREATE_Accounting;
426: errbuf:= FND_API.G_RET_STS_UNEXP_ERROR;
427: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error: '||SQLERRM);
428: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
429: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Status: Failure (Error:' ||SQLCODE||SQLERRM || ')');
430: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
431: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
424: retcode:=2;
425: ROLLBACK TO CREATE_Accounting;
426: errbuf:= FND_API.G_RET_STS_UNEXP_ERROR;
427: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error: '||SQLERRM);
428: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
429: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Status: Failure (Error:' ||SQLCODE||SQLERRM || ')');
430: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
431: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
432:
425: ROLLBACK TO CREATE_Accounting;
426: errbuf:= FND_API.G_RET_STS_UNEXP_ERROR;
427: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error: '||SQLERRM);
428: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
429: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Status: Failure (Error:' ||SQLCODE||SQLERRM || ')');
430: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
431: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
432:
433: END CreateAccounting;
426: errbuf:= FND_API.G_RET_STS_UNEXP_ERROR;
427: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error: '||SQLERRM);
428: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
429: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Status: Failure (Error:' ||SQLCODE||SQLERRM || ')');
430: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
431: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
432:
433: END CreateAccounting;
434:
427: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error: '||SQLERRM);
428: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
429: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Status: Failure (Error:' ||SQLCODE||SQLERRM || ')');
430: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
431: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
432:
433: END CreateAccounting;
434:
435: END OZF_GL_TRANSFER_PVT;