234: END IF;
235:
236: EXCEPTION
237: WHEN OTHERS THEN
238: log_now (p_log_level => FND_FILE.LOG
239: ,p_message => ' Unable to intialize Globals'||SQLERRM
240: );
241: IF (G_DEBUG_LEVEL_EXCEPTION >= G_CURRENT_DEBUG_LEVEL_SET ) THEN
242: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,G_DEBUG_LOG_HEADER||'SetGlobals',' Unable to intialize Globals'||SQLERRM);
353: END IF;
354:
355: EXCEPTION
356: WHEN OTHERS THEN
357: log_now (p_log_level => FND_FILE.LOG
358: ,p_message => ' Unable to set Global Constants '||SQLERRM
359: );
360: RAISE;
361: END SetProcessConstants;
374: -- writing to concurrent log
375: --
376:
377: IF G_REQUEST_ID <> -1 THEN
378: IF p_log_level = FND_FILE.LOG THEN
379: FND_FILE.put_line(which => FND_FILE.LOG
380: ,buff => '['||To_Char(SYSDATE,'DD-MM-YYYY HH24:MI:SS')
381: ||'] '||p_message);
382: ELSE
375: --
376:
377: IF G_REQUEST_ID <> -1 THEN
378: IF p_log_level = FND_FILE.LOG THEN
379: FND_FILE.put_line(which => FND_FILE.LOG
380: ,buff => '['||To_Char(SYSDATE,'DD-MM-YYYY HH24:MI:SS')
381: ||'] '||p_message);
382: ELSE
383: FND_FILE.put_line(which => FND_FILE.OUTPUT
379: FND_FILE.put_line(which => FND_FILE.LOG
380: ,buff => '['||To_Char(SYSDATE,'DD-MM-YYYY HH24:MI:SS')
381: ||'] '||p_message);
382: ELSE
383: FND_FILE.put_line(which => FND_FILE.OUTPUT
384: ,buff => p_message);
385: END IF;
386: END IF;
387:
402: ) IS
403: BEGIN
404:
405: G_PROC_NAME := 'DELETE_SUCCESS_RECORDS';
406: log_now (p_log_level => FND_FILE.LOG
407: ,p_message => G_PROC_NAME||'(+)'
408: );
409: IF (G_DEBUG_LEVEL_PROCEDURE >= G_CURRENT_DEBUG_LEVEL_SET ) THEN
410: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,G_DEBUG_LOG_HEADER||G_PROC_NAME,G_PROC_NAME||'(+)');
445: WHERE request_id = G_REQUEST_ID
446: AND record_status = G_RS_VALID;
447:
448: G_DEBUG_STATEMENT:='Deleted '||SQL%ROWCOUNT||' records from '||G_INTF_PTP_TABLE_NAME;
449: log_now (p_log_level => FND_FILE.LOG
450: ,p_message => G_DEBUG_STATEMENT
451: );
452: IF (G_DEBUG_LEVEL_STATEMENT >= G_CURRENT_DEBUG_LEVEL_SET ) THEN
453: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,G_DEBUG_LOG_HEADER||G_PROC_NAME,G_DEBUG_STATEMENT);
458: WHERE request_id = G_REQUEST_ID
459: AND record_status = G_RS_VALID;
460:
461: G_DEBUG_STATEMENT:='Deleted '||SQL%ROWCOUNT||' records from '||G_INTF_REG_TABLE_NAME;
462: log_now (p_log_level => FND_FILE.LOG
463: ,p_message => G_DEBUG_STATEMENT
464: );
465: IF (G_DEBUG_LEVEL_STATEMENT >= G_CURRENT_DEBUG_LEVEL_SET ) THEN
466: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,G_DEBUG_LOG_HEADER||G_PROC_NAME,G_DEBUG_STATEMENT);
470: WHERE request_id = G_REQUEST_ID
471: AND record_status = G_RS_VALID;
472:
473: G_DEBUG_STATEMENT:='Deleted '||SQL%ROWCOUNT||' records from '||G_INTF_EXE_TABLE_NAME;
474: log_now (p_log_level => FND_FILE.LOG
475: ,p_message => G_DEBUG_STATEMENT
476: );
477: IF (G_DEBUG_LEVEL_STATEMENT >= G_CURRENT_DEBUG_LEVEL_SET ) THEN
478: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,G_DEBUG_LOG_HEADER||G_PROC_NAME,G_DEBUG_STATEMENT);
482: WHERE request_id = G_REQUEST_ID
483: AND record_status = G_RS_VALID;
484:
485: G_DEBUG_STATEMENT:='Deleted '||SQL%ROWCOUNT||' records from '||G_INTF_RCA_TABLE_NAME;
486: log_now (p_log_level => FND_FILE.LOG
487: ,p_message => G_DEBUG_STATEMENT
488: );
489: IF (G_DEBUG_LEVEL_STATEMENT >= G_CURRENT_DEBUG_LEVEL_SET ) THEN
490: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,G_DEBUG_LOG_HEADER||G_PROC_NAME,G_DEBUG_STATEMENT);
493: IF FND_API.TO_BOOLEAN(p_commit) THEN
494: COMMIT WORK;
495: END IF;
496:
497: log_now (p_log_level => FND_FILE.LOG
498: ,p_message => G_PROC_NAME||'(-)'
499: );
500: IF (G_DEBUG_LEVEL_PROCEDURE >= G_CURRENT_DEBUG_LEVEL_SET ) THEN
501: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,G_DEBUG_LOG_HEADER||G_PROC_NAME,G_PROC_NAME||'(-)');
503:
504:
505: EXCEPTION
506: WHEN OTHERS THEN
507: log_now (p_log_level => FND_FILE.LOG
508: ,p_message => G_PROC_NAME||' Exception '|| SQLERRM
509: );
510: IF FND_API.TO_BOOLEAN(p_commit) THEN
511: ROLLBACK TO DEL_SUC_REC_SP;
598: END IF;
599:
600: EXCEPTION
601: WHEN OTHERS THEN
602: log_now (p_log_level => FND_FILE.LOG
603: ,p_message => 'ResetRecStatusForChildTables : '||SQLERRM
604: );
605: END ResetRecStatusForChildTables;
606:
678: EXCEPTION
679: WHEN NO_DATA_FOUND THEN
680: FND_MESSAGE.Set_Name('ZX', 'ZX_BULK_NO_ROWS');
681: FND_MESSAGE.Set_Token('TABLE_NAME', G_INTF_PTP_TABLE_NAME);
682: log_now (p_log_level => FND_FILE.LOG
683: ,p_message => FND_MESSAGE.get()
684: );
685: RAISE NO_ROWS_IN_INTF_TABLE;
686: END;
702: EXCEPTION
703: WHEN NO_DATA_FOUND THEN
704: FND_MESSAGE.Set_Name('ZX', 'ZX_BULK_NO_ROWS');
705: FND_MESSAGE.Set_Token('TABLE_NAME', G_INTF_PTP_TABLE_NAME);
706: log_now (p_log_level => FND_FILE.LOG
707: ,p_message => FND_MESSAGE.get()
708: );
709: RAISE NO_ROWS_IN_INTF_TABLE;
710: END;
775: WHEN NO_DATA_FOUND THEN
776: l_temp_char_30 := NULL;
777: FND_MESSAGE.Set_Name('ZX', 'ZX_BULK_NO_ROWS');
778: FND_MESSAGE.Set_Token('TABLE_NAME', G_INTF_REG_TABLE_NAME);
779: log_now (p_log_level => FND_FILE.LOG
780: ,p_message => fnd_message.get()
781: );
782: END;
783:
839: WHEN NO_DATA_FOUND THEN
840: l_temp_char_30 := NULL;
841: FND_MESSAGE.Set_Name('ZX', 'ZX_BULK_NO_ROWS');
842: FND_MESSAGE.Set_Token('TABLE_NAME', G_INTF_EXE_TABLE_NAME);
843: log_now (p_log_level => FND_FILE.LOG
844: ,p_message => fnd_message.get()
845: );
846: END;
847:
872: WHEN NO_DATA_FOUND THEN
873: l_temp_char_30 := NULL;
874: FND_MESSAGE.Set_Name('ZX', 'ZX_BULK_NO_ROWS');
875: FND_MESSAGE.Set_Token('TABLE_NAME', G_INTF_RCA_TABLE_NAME);
876: log_now (p_log_level => FND_FILE.LOG
877: ,p_message => fnd_message.get()
878: );
879: END;
880:
950: ROLLBACK TO IMPORT_PTP_SP;
951: END IF;
952:
953: WHEN OTHERS THEN
954: log_now (p_log_level => FND_FILE.LOG
955: ,p_message => 'IMPORT_PTP'||' : '||SQLERRM
956: );
957: IF FND_API.TO_BOOLEAN(p_commit) THEN
958: ROLLBACK TO IMPORT_PTP_SP;
1119: AND record_status = G_RS_IN_PROCESS;
1120:
1121: l_date5 := SYSDATE;
1122:
1123: log_now (p_log_level => FND_FILE.LOG
1124: ,p_message => '+--------------------------------------------------------------------'
1125: );
1126: log_now (p_log_level => FND_FILE.LOG
1127: ,p_message => '| PERF METRICS for Processing Party Tax Profile Records '
1122:
1123: log_now (p_log_level => FND_FILE.LOG
1124: ,p_message => '+--------------------------------------------------------------------'
1125: );
1126: log_now (p_log_level => FND_FILE.LOG
1127: ,p_message => '| PERF METRICS for Processing Party Tax Profile Records '
1128: );
1129: log_now (p_log_level => FND_FILE.LOG
1130: ,p_message => '| Time Taken for Value to ID Conversions '||(l_date3-l_date2)*86400||' Secs'
1125: );
1126: log_now (p_log_level => FND_FILE.LOG
1127: ,p_message => '| PERF METRICS for Processing Party Tax Profile Records '
1128: );
1129: log_now (p_log_level => FND_FILE.LOG
1130: ,p_message => '| Time Taken for Value to ID Conversions '||(l_date3-l_date2)*86400||' Secs'
1131: );
1132: log_now (p_log_level => FND_FILE.LOG
1133: ,p_message => '| Time Taken for TRN Validation '||(l_date4-l_date3)*86400||' Secs'
1128: );
1129: log_now (p_log_level => FND_FILE.LOG
1130: ,p_message => '| Time Taken for Value to ID Conversions '||(l_date3-l_date2)*86400||' Secs'
1131: );
1132: log_now (p_log_level => FND_FILE.LOG
1133: ,p_message => '| Time Taken for TRN Validation '||(l_date4-l_date3)*86400||' Secs'
1134: );
1135: log_now (p_log_level => FND_FILE.LOG
1136: ,p_message => '| Total Time Taken for PTP Record Processing '||(l_date5-l_date1)*86400||' Secs'
1131: );
1132: log_now (p_log_level => FND_FILE.LOG
1133: ,p_message => '| Time Taken for TRN Validation '||(l_date4-l_date3)*86400||' Secs'
1134: );
1135: log_now (p_log_level => FND_FILE.LOG
1136: ,p_message => '| Total Time Taken for PTP Record Processing '||(l_date5-l_date1)*86400||' Secs'
1137: );
1138: log_now (p_log_level => FND_FILE.LOG
1139: ,p_message => '+--------------------------------------------------------------------'
1134: );
1135: log_now (p_log_level => FND_FILE.LOG
1136: ,p_message => '| Total Time Taken for PTP Record Processing '||(l_date5-l_date1)*86400||' Secs'
1137: );
1138: log_now (p_log_level => FND_FILE.LOG
1139: ,p_message => '+--------------------------------------------------------------------'
1140: );
1141:
1142: IF (G_DEBUG_LEVEL_PROCEDURE >= G_CURRENT_DEBUG_LEVEL_SET ) THEN
1146: EXCEPTION
1147: WHEN OTHERS THEN
1148: G_RETURN_STATUS := G_CONC_RET_STS_UNEXP_ERROR;
1149: G_MSG_DATA := SQLERRM;
1150: log_now (p_log_level => FND_FILE.LOG
1151: ,p_message => 'ProcessPtyTxProfileRecord'||' : '||SQLERRM
1152: );
1153: RAISE;
1154: END ProcessPtyTxProfileRecord;
1569: EXCEPTION
1570: WHEN OTHERS THEN
1571: G_RETURN_STATUS := G_CONC_RET_STS_UNEXP_ERROR;
1572: G_MSG_DATA := SQLERRM;
1573: log_now (p_log_level => FND_FILE.LOG
1574: ,p_message => 'PtpValueToIdConversion'||' : '||SQLERRM
1575: );
1576: RAISE;
1577: END PtpValueToIdConversion;
2609: END IF;
2610:
2611: EXCEPTION
2612: WHEN OTHERS THEN
2613: log_now (p_log_level => FND_FILE.LOG
2614: ,p_message => l_dynamic_sql
2615: );
2616: log_now (p_log_level => FND_FILE.LOG
2617: ,p_message => 'TRNValidation'||' : '||p_table_name||' : '||p_country_code||' : '||SQLERRM
2612: WHEN OTHERS THEN
2613: log_now (p_log_level => FND_FILE.LOG
2614: ,p_message => l_dynamic_sql
2615: );
2616: log_now (p_log_level => FND_FILE.LOG
2617: ,p_message => 'TRNValidation'||' : '||p_table_name||' : '||p_country_code||' : '||SQLERRM
2618: );
2619: RAISE;
2620: END TRNValidation;
2895:
2896:
2897: l_date5 := SYSDATE;
2898:
2899: log_now (p_log_level => FND_FILE.LOG
2900: ,p_message => '+--------------------------------------------------------------------'
2901: );
2902: log_now (p_log_level => FND_FILE.LOG
2903: ,p_message => '| PERF METRICS for Processing Registrations Records'
2898:
2899: log_now (p_log_level => FND_FILE.LOG
2900: ,p_message => '+--------------------------------------------------------------------'
2901: );
2902: log_now (p_log_level => FND_FILE.LOG
2903: ,p_message => '| PERF METRICS for Processing Registrations Records'
2904: );
2905: log_now (p_log_level => FND_FILE.LOG
2906: ,p_message => '| Time Taken for Value to ID Conversions '||(l_date3-l_date2)*86400||' Secs'
2901: );
2902: log_now (p_log_level => FND_FILE.LOG
2903: ,p_message => '| PERF METRICS for Processing Registrations Records'
2904: );
2905: log_now (p_log_level => FND_FILE.LOG
2906: ,p_message => '| Time Taken for Value to ID Conversions '||(l_date3-l_date2)*86400||' Secs'
2907: );
2908: log_now (p_log_level => FND_FILE.LOG
2909: ,p_message => '| Time Taken for TRN Validation '||(l_date4-l_date3)*86400||' Secs'
2904: );
2905: log_now (p_log_level => FND_FILE.LOG
2906: ,p_message => '| Time Taken for Value to ID Conversions '||(l_date3-l_date2)*86400||' Secs'
2907: );
2908: log_now (p_log_level => FND_FILE.LOG
2909: ,p_message => '| Time Taken for TRN Validation '||(l_date4-l_date3)*86400||' Secs'
2910: );
2911: log_now (p_log_level => FND_FILE.LOG
2912: ,p_message => '| Total Time Taken for REG Record Processing '||(l_date5-l_date1)*86400||' Secs'
2907: );
2908: log_now (p_log_level => FND_FILE.LOG
2909: ,p_message => '| Time Taken for TRN Validation '||(l_date4-l_date3)*86400||' Secs'
2910: );
2911: log_now (p_log_level => FND_FILE.LOG
2912: ,p_message => '| Total Time Taken for REG Record Processing '||(l_date5-l_date1)*86400||' Secs'
2913: );
2914: log_now (p_log_level => FND_FILE.LOG
2915: ,p_message => '+--------------------------------------------------------------------'
2910: );
2911: log_now (p_log_level => FND_FILE.LOG
2912: ,p_message => '| Total Time Taken for REG Record Processing '||(l_date5-l_date1)*86400||' Secs'
2913: );
2914: log_now (p_log_level => FND_FILE.LOG
2915: ,p_message => '+--------------------------------------------------------------------'
2916: );
2917:
2918: IF (G_DEBUG_LEVEL_PROCEDURE >= G_CURRENT_DEBUG_LEVEL_SET ) THEN
2922: EXCEPTION
2923: WHEN OTHERS THEN
2924: G_RETURN_STATUS := G_CONC_RET_STS_UNEXP_ERROR;
2925: G_MSG_DATA := SQLERRM;
2926: log_now (p_log_level => FND_FILE.LOG
2927: ,p_message => 'ProcessRegistrationRecord'||' : '||SQLERRM
2928: );
2929: RAISE;
2930: END ProcessRegistrationRecord;
3610: EXCEPTION
3611: WHEN OTHERS THEN
3612: G_RETURN_STATUS := G_CONC_RET_STS_UNEXP_ERROR;
3613: G_MSG_DATA := SQLERRM;
3614: log_now (p_log_level => FND_FILE.LOG
3615: ,p_message => 'RegValueToIdConversion'||' : '||SQLERRM
3616: );
3617: RAISE;
3618: END RegValueToIdConversion;
3961: EXCEPTION
3962: WHEN OTHERS THEN
3963: G_RETURN_STATUS := G_CONC_RET_STS_UNEXP_ERROR;
3964: G_MSG_DATA := SQLERRM;
3965: log_now (p_log_level => FND_FILE.LOG
3966: ,p_message => 'DupTRNValidation'||' : '||SQLERRM
3967: );
3968: RAISE;
3969: END DupTRNValidation;
4014: EXCEPTION
4015: WHEN OTHERS THEN
4016: G_RETURN_STATUS := G_CONC_RET_STS_UNEXP_ERROR;
4017: G_MSG_DATA := SQLERRM;
4018: log_now (p_log_level => FND_FILE.LOG
4019: ,p_message => 'SyncUpRegNumberToPTP'||' : '||SQLERRM
4020: );
4021: RAISE;
4022: END SyncUpRegNumberToPTP;
4177: END IF;
4178:
4179: l_date6 := SYSDATE;
4180:
4181: log_now (p_log_level => FND_FILE.LOG
4182: ,p_message => '+--------------------------------------------------------------------'
4183: );
4184: log_now (p_log_level => FND_FILE.LOG
4185: ,p_message => '| PERF METRICS for Processing Exemption Records'
4180:
4181: log_now (p_log_level => FND_FILE.LOG
4182: ,p_message => '+--------------------------------------------------------------------'
4183: );
4184: log_now (p_log_level => FND_FILE.LOG
4185: ,p_message => '| PERF METRICS for Processing Exemption Records'
4186: );
4187: log_now (p_log_level => FND_FILE.LOG
4188: ,p_message => '| Time Taken for Value to ID Conversions '||(l_date3-l_date2)*86400||' Secs'
4183: );
4184: log_now (p_log_level => FND_FILE.LOG
4185: ,p_message => '| PERF METRICS for Processing Exemption Records'
4186: );
4187: log_now (p_log_level => FND_FILE.LOG
4188: ,p_message => '| Time Taken for Value to ID Conversions '||(l_date3-l_date2)*86400||' Secs'
4189: );
4190: log_now (p_log_level => FND_FILE.LOG
4191: ,p_message => '| Time Taken for Date Overlap Validation '||(l_date4-l_date3)*86400||' Secs'
4186: );
4187: log_now (p_log_level => FND_FILE.LOG
4188: ,p_message => '| Time Taken for Value to ID Conversions '||(l_date3-l_date2)*86400||' Secs'
4189: );
4190: log_now (p_log_level => FND_FILE.LOG
4191: ,p_message => '| Time Taken for Date Overlap Validation '||(l_date4-l_date3)*86400||' Secs'
4192: );
4193: log_now (p_log_level => FND_FILE.LOG
4194: ,p_message => '| Time Taken for DFF Validation '||(l_date5-l_date4)*86400||' Secs'
4189: );
4190: log_now (p_log_level => FND_FILE.LOG
4191: ,p_message => '| Time Taken for Date Overlap Validation '||(l_date4-l_date3)*86400||' Secs'
4192: );
4193: log_now (p_log_level => FND_FILE.LOG
4194: ,p_message => '| Time Taken for DFF Validation '||(l_date5-l_date4)*86400||' Secs'
4195: );
4196: log_now (p_log_level => FND_FILE.LOG
4197: ,p_message => '| Total Time Taken for EXE Record Processing '||(l_date6-l_date1)*86400||' Secs'
4192: );
4193: log_now (p_log_level => FND_FILE.LOG
4194: ,p_message => '| Time Taken for DFF Validation '||(l_date5-l_date4)*86400||' Secs'
4195: );
4196: log_now (p_log_level => FND_FILE.LOG
4197: ,p_message => '| Total Time Taken for EXE Record Processing '||(l_date6-l_date1)*86400||' Secs'
4198: );
4199: log_now (p_log_level => FND_FILE.LOG
4200: ,p_message => '+--------------------------------------------------------------------'
4195: );
4196: log_now (p_log_level => FND_FILE.LOG
4197: ,p_message => '| Total Time Taken for EXE Record Processing '||(l_date6-l_date1)*86400||' Secs'
4198: );
4199: log_now (p_log_level => FND_FILE.LOG
4200: ,p_message => '+--------------------------------------------------------------------'
4201: );
4202:
4203: IF (G_DEBUG_LEVEL_PROCEDURE >= G_CURRENT_DEBUG_LEVEL_SET ) THEN
4207: EXCEPTION
4208: WHEN OTHERS THEN
4209: G_RETURN_STATUS := G_CONC_RET_STS_UNEXP_ERROR;
4210: G_MSG_DATA := SQLERRM;
4211: log_now (p_log_level => FND_FILE.LOG
4212: ,p_message => 'ProcessExemptionRecord'||' : '||SQLERRM
4213: );
4214: RAISE;
4215: END ProcessExemptionRecord;
5178: EXCEPTION
5179: WHEN OTHERS THEN
5180: G_RETURN_STATUS := G_CONC_RET_STS_UNEXP_ERROR;
5181: G_MSG_DATA := SQLERRM;
5182: log_now (p_log_level => FND_FILE.LOG
5183: ,p_message => 'ExemptValueToIdConversion'||' : '||SQLERRM
5184: );
5185: RAISE;
5186: END ExemptValueToIdConversion;
5219: EXCEPTION
5220: WHEN OTHERS THEN
5221: G_RETURN_STATUS := G_CONC_RET_STS_UNEXP_ERROR;
5222: G_MSG_DATA := SQLERRM;
5223: log_now (p_log_level => FND_FILE.LOG
5224: ,p_message => 'resetDFFFieldUsage : '||SQLERRM
5225: );
5226: RAISE;
5227: END resetDFFFieldUsage;
5283: EXCEPTION
5284: WHEN OTHERS THEN
5285: G_RETURN_STATUS := G_CONC_RET_STS_UNEXP_ERROR;
5286: G_MSG_DATA := SQLERRM;
5287: log_now (p_log_level => FND_FILE.LOG
5288: ,p_message => 'getAttrValue : '||SQLERRM
5289: );
5290: RAISE;
5291: END getAttrValue;
5533: CLOSE c_exempt_records;
5534: END IF;
5535: G_RETURN_STATUS := G_CONC_RET_STS_UNEXP_ERROR;
5536: G_MSG_DATA := SQLERRM;
5537: log_now (p_log_level => FND_FILE.LOG
5538: ,p_message => 'performDFFValidation : '||SQLERRM
5539: );
5540: RAISE;
5541: END performDFFValidation;
5694: END IF;
5695:
5696: l_date5 := SYSDATE;
5697:
5698: log_now (p_log_level => FND_FILE.LOG
5699: ,p_message => '+--------------------------------------------------------------------'
5700: );
5701: log_now (p_log_level => FND_FILE.LOG
5702: ,p_message => '| PERF METRICS for Processing Reporting Code Assoc Records'
5697:
5698: log_now (p_log_level => FND_FILE.LOG
5699: ,p_message => '+--------------------------------------------------------------------'
5700: );
5701: log_now (p_log_level => FND_FILE.LOG
5702: ,p_message => '| PERF METRICS for Processing Reporting Code Assoc Records'
5703: );
5704: log_now (p_log_level => FND_FILE.LOG
5705: ,p_message => '| Time Taken for Value to ID Conversions '||(l_date3-l_date2)*86400||' Secs'
5700: );
5701: log_now (p_log_level => FND_FILE.LOG
5702: ,p_message => '| PERF METRICS for Processing Reporting Code Assoc Records'
5703: );
5704: log_now (p_log_level => FND_FILE.LOG
5705: ,p_message => '| Time Taken for Value to ID Conversions '||(l_date3-l_date2)*86400||' Secs'
5706: );
5707: log_now (p_log_level => FND_FILE.LOG
5708: ,p_message => '| Time Taken for Date Overlap Validation '||(l_date4-l_date3)*86400||' Secs'
5703: );
5704: log_now (p_log_level => FND_FILE.LOG
5705: ,p_message => '| Time Taken for Value to ID Conversions '||(l_date3-l_date2)*86400||' Secs'
5706: );
5707: log_now (p_log_level => FND_FILE.LOG
5708: ,p_message => '| Time Taken for Date Overlap Validation '||(l_date4-l_date3)*86400||' Secs'
5709: );
5710: log_now (p_log_level => FND_FILE.LOG
5711: ,p_message => '| Total Time Taken for RCA Record Processing '||(l_date5-l_date1)*86400||' Secs'
5706: );
5707: log_now (p_log_level => FND_FILE.LOG
5708: ,p_message => '| Time Taken for Date Overlap Validation '||(l_date4-l_date3)*86400||' Secs'
5709: );
5710: log_now (p_log_level => FND_FILE.LOG
5711: ,p_message => '| Total Time Taken for RCA Record Processing '||(l_date5-l_date1)*86400||' Secs'
5712: );
5713: log_now (p_log_level => FND_FILE.LOG
5714: ,p_message => '+--------------------------------------------------------------------'
5709: );
5710: log_now (p_log_level => FND_FILE.LOG
5711: ,p_message => '| Total Time Taken for RCA Record Processing '||(l_date5-l_date1)*86400||' Secs'
5712: );
5713: log_now (p_log_level => FND_FILE.LOG
5714: ,p_message => '+--------------------------------------------------------------------'
5715: );
5716:
5717: IF (G_DEBUG_LEVEL_PROCEDURE >= G_CURRENT_DEBUG_LEVEL_SET ) THEN
5721: EXCEPTION
5722: WHEN OTHERS THEN
5723: G_RETURN_STATUS := G_CONC_RET_STS_UNEXP_ERROR;
5724: G_MSG_DATA := SQLERRM;
5725: log_now (p_log_level => FND_FILE.LOG
5726: ,p_message => 'ProcessRepCodeAssocRecord'||' : '||SQLERRM
5727: );
5728: RAISE;
5729: END ProcessRepCodeAssocRecord;
5948: EXCEPTION
5949: WHEN OTHERS THEN
5950: G_RETURN_STATUS := G_CONC_RET_STS_UNEXP_ERROR;
5951: G_MSG_DATA := SQLERRM;
5952: log_now (p_log_level => FND_FILE.LOG
5953: ,p_message => 'AssocValueToIdConversion'||' : '||SQLERRM
5954: );
5955: RAISE;
5956: END AssocValueToIdConversion;
6161: G_DEBUG_STATEMENT:= 'Inserted '||SQL%ROWCOUNT||' records into zx_party_tax_profile ';
6162: IF (G_DEBUG_LEVEL_STATEMENT >= G_CURRENT_DEBUG_LEVEL_SET ) THEN
6163: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,G_DEBUG_LOG_HEADER||'PopulateProductionTables',G_DEBUG_STATEMENT);
6164: END IF;
6165: log_now (p_log_level => FND_FILE.LOG
6166: ,p_message => G_DEBUG_STATEMENT
6167: );
6168:
6169:
6297: G_DEBUG_STATEMENT:= 'Inserted '||SQL%ROWCOUNT||' records into zx_registrations ';
6298: IF (G_DEBUG_LEVEL_STATEMENT >= G_CURRENT_DEBUG_LEVEL_SET ) THEN
6299: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,G_DEBUG_LOG_HEADER||'PopulateProductionTables',G_DEBUG_STATEMENT);
6300: END IF;
6301: log_now (p_log_level => FND_FILE.LOG
6302: ,p_message => G_DEBUG_STATEMENT
6303: );
6304:
6305: INSERT INTO zx_exemptions(
6413: G_DEBUG_STATEMENT:= 'Inserted '||SQL%ROWCOUNT||' records into zx_exemptions ';
6414: IF (G_DEBUG_LEVEL_STATEMENT >= G_CURRENT_DEBUG_LEVEL_SET ) THEN
6415: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,G_DEBUG_LOG_HEADER||'PopulateProductionTables',G_DEBUG_STATEMENT);
6416: END IF;
6417: log_now (p_log_level => FND_FILE.LOG
6418: ,p_message => G_DEBUG_STATEMENT
6419: );
6420:
6421: INSERT INTO zx_report_codes_assoc(
6464: G_DEBUG_STATEMENT:= 'Inserted '||SQL%ROWCOUNT||' records into zx_report_codes_assoc ';
6465: IF (G_DEBUG_LEVEL_STATEMENT >= G_CURRENT_DEBUG_LEVEL_SET ) THEN
6466: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,G_DEBUG_LOG_HEADER||'PopulateProductionTables',G_DEBUG_STATEMENT);
6467: END IF;
6468: log_now (p_log_level => FND_FILE.LOG
6469: ,p_message => G_DEBUG_STATEMENT
6470: );
6471:
6472: IF (G_DEBUG_LEVEL_PROCEDURE >= G_CURRENT_DEBUG_LEVEL_SET ) THEN
6476: EXCEPTION
6477: WHEN OTHERS THEN
6478: G_RETURN_STATUS := G_CONC_RET_STS_UNEXP_ERROR;
6479: G_MSG_DATA := SQLERRM;
6480: log_now (p_log_level => FND_FILE.LOG
6481: ,p_message => 'PopulateProductionTables'||' : '||SQLERRM
6482: );
6483: RAISE;
6484: END PopulateProductionTables;
7554: END IF;
7555: IF c_rca_errors%ISOPEN THEN
7556: CLOSE c_rca_errors;
7557: END IF;
7558: log_now (p_log_level => FND_FILE.LOG
7559: ,p_message => 'LogErrorToTable'||' : '||SQLERRM
7560: );
7561: RAISE;
7562: END LogErrorToTable;
7602:
7603: BEGIN
7604:
7605: G_PROC_NAME:= 'IMPORT_WRAPPER';
7606: log_now (p_log_level => FND_FILE.LOG
7607: ,p_message => G_PROC_NAME||'(+)'
7608: );
7609: IF (G_DEBUG_LEVEL_PROCEDURE >= G_CURRENT_DEBUG_LEVEL_SET ) THEN
7610: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,G_DEBUG_LOG_HEADER||'IMPORT_WRAPPER','IMPORT_WRAPPER(+)');
7742: EXECUTE IMMEDIATE l_dynamic_sql USING IN G_BATCH_ID;
7743:
7744: EXCEPTION
7745: WHEN OTHERS THEN
7746: log_now (p_log_level => FND_FILE.LOG
7747: ,p_message => 'Error Executing below Populate PTP Intf SQL :'||SQLERRM
7748: );
7749: log_now (p_log_level => FND_FILE.LOG
7750: ,p_message => l_dynamic_sql
7745: WHEN OTHERS THEN
7746: log_now (p_log_level => FND_FILE.LOG
7747: ,p_message => 'Error Executing below Populate PTP Intf SQL :'||SQLERRM
7748: );
7749: log_now (p_log_level => FND_FILE.LOG
7750: ,p_message => l_dynamic_sql
7751: );
7752: G_DEBUG_STATEMENT:= 'error executing Populate PTP Intf SQL :'||SQLERRM;
7753: IF (G_DEBUG_LEVEL_EXCEPTION >= G_CURRENT_DEBUG_LEVEL_SET ) THEN
7825: || ' SET party_id = hz_int.party_id';
7826: EXECUTE IMMEDIATE l_dynamic_sql;
7827: EXCEPTION
7828: WHEN OTHERS THEN
7829: log_now (p_log_level => FND_FILE.LOG
7830: ,p_message => 'Error Executing below Party ID SQL :'||SQLERRM
7831: );
7832: log_now (p_log_level => FND_FILE.LOG
7833: ,p_message => l_dynamic_sql
7828: WHEN OTHERS THEN
7829: log_now (p_log_level => FND_FILE.LOG
7830: ,p_message => 'Error Executing below Party ID SQL :'||SQLERRM
7831: );
7832: log_now (p_log_level => FND_FILE.LOG
7833: ,p_message => l_dynamic_sql
7834: );
7835: G_DEBUG_STATEMENT:= 'Error Executing below Party ID SQL :'||SQLERRM;
7836: IF (G_DEBUG_LEVEL_EXCEPTION >= G_CURRENT_DEBUG_LEVEL_SET ) THEN
7887: EXECUTE IMMEDIATE l_dynamic_sql
7888: USING IN G_REQUEST_ID,
7889: OUT x_return_status,
7890: OUT x_msg_data;
7891: log_now (p_log_level => FND_FILE.LOG
7892: ,p_message => 'Returned HZ API with status '||x_return_status||' x_msg_data'||x_msg_data
7893: );
7894: IF x_return_status <> G_CONC_RET_STS_SUCCESS THEN
7895: RETURN;
7897: END IF;
7898: EXCEPTION
7899: WHEN OTHERS THEN
7900: IF sqlerrm LIKE '%PLS-00302%' THEN
7901: log_now (p_log_level => FND_FILE.LOG
7902: ,p_message => 'HZ_CUSTOMER_INT.sync_tax_reference not defined.'
7903: );
7904: ELSE
7905: log_now (p_log_level => FND_FILE.LOG
7901: log_now (p_log_level => FND_FILE.LOG
7902: ,p_message => 'HZ_CUSTOMER_INT.sync_tax_reference not defined.'
7903: );
7904: ELSE
7905: log_now (p_log_level => FND_FILE.LOG
7906: ,p_message => 'Error Executing hz_customer_int.sync_tax_reference API :'||SQLERRM
7907: );
7908: log_now (p_log_level => FND_FILE.LOG
7909: ,p_message => l_dynamic_sql
7904: ELSE
7905: log_now (p_log_level => FND_FILE.LOG
7906: ,p_message => 'Error Executing hz_customer_int.sync_tax_reference API :'||SQLERRM
7907: );
7908: log_now (p_log_level => FND_FILE.LOG
7909: ,p_message => l_dynamic_sql
7910: );
7911: G_DEBUG_STATEMENT:= 'Error Executing hz_customer_int.sync_tax_reference API :'||SQLERRM;
7912: IF (G_DEBUG_LEVEL_EXCEPTION >= G_CURRENT_DEBUG_LEVEL_SET ) THEN
7946: EXECUTE IMMEDIATE l_dynamic_sql
7947: USING G_SYSDATE, G_SYSDATE;
7948: EXCEPTION
7949: WHEN OTHERS THEN
7950: log_now (p_log_level => FND_FILE.LOG
7951: ,p_message => 'Error Executing below Populate PTP Table SQL :'||SQLERRM
7952: );
7953: log_now (p_log_level => FND_FILE.LOG
7954: ,p_message => l_dynamic_sql
7949: WHEN OTHERS THEN
7950: log_now (p_log_level => FND_FILE.LOG
7951: ,p_message => 'Error Executing below Populate PTP Table SQL :'||SQLERRM
7952: );
7953: log_now (p_log_level => FND_FILE.LOG
7954: ,p_message => l_dynamic_sql
7955: );
7956: G_DEBUG_STATEMENT:= 'Error Executing below Populate PTP Table SQL :'||SQLERRM;
7957: IF (G_DEBUG_LEVEL_EXCEPTION >= G_CURRENT_DEBUG_LEVEL_SET ) THEN
7968:
7969: END IF; -- end p_insert_only
7970: l_date12 := SYSDATE;
7971:
7972: log_now (p_log_level => FND_FILE.LOG
7973: ,p_message => '+--------------------------------------------------------------------'
7974: );
7975: log_now (p_log_level => FND_FILE.LOG
7976: ,p_message => '| PERF METRICS FOR IMPORT_WRAPPER '
7971:
7972: log_now (p_log_level => FND_FILE.LOG
7973: ,p_message => '+--------------------------------------------------------------------'
7974: );
7975: log_now (p_log_level => FND_FILE.LOG
7976: ,p_message => '| PERF METRICS FOR IMPORT_WRAPPER '
7977: );
7978: IF FND_API.TO_BOOLEAN(p_validate_only) THEN
7979: log_now (p_log_level => FND_FILE.LOG
7975: log_now (p_log_level => FND_FILE.LOG
7976: ,p_message => '| PERF METRICS FOR IMPORT_WRAPPER '
7977: );
7978: IF FND_API.TO_BOOLEAN(p_validate_only) THEN
7979: log_now (p_log_level => FND_FILE.LOG
7980: ,p_message => '| Time Taken to Populate PTP Table '||(l_date3-l_date2)*86400||' Secs'
7981: );
7982: log_now (p_log_level => FND_FILE.LOG
7983: ,p_message => '| Time Taken for IMPORT_PTP API '||(l_date4-l_date3)*86400||' Secs'
7978: IF FND_API.TO_BOOLEAN(p_validate_only) THEN
7979: log_now (p_log_level => FND_FILE.LOG
7980: ,p_message => '| Time Taken to Populate PTP Table '||(l_date3-l_date2)*86400||' Secs'
7981: );
7982: log_now (p_log_level => FND_FILE.LOG
7983: ,p_message => '| Time Taken for IMPORT_PTP API '||(l_date4-l_date3)*86400||' Secs'
7984: );
7985: END IF;
7986: IF FND_API.TO_BOOLEAN(p_insert_only) THEN
7983: ,p_message => '| Time Taken for IMPORT_PTP API '||(l_date4-l_date3)*86400||' Secs'
7984: );
7985: END IF;
7986: IF FND_API.TO_BOOLEAN(p_insert_only) THEN
7987: log_now (p_log_level => FND_FILE.LOG
7988: ,p_message => '| Time Taken to Populate Party Id '||(l_date7-l_date6)*86400||' Secs'
7989: );
7990: log_now (p_log_level => FND_FILE.LOG
7991: ,p_message => '| Time Taken to Sync Tax Reference '||(l_date10-l_date9)*86400||' Secs'
7986: IF FND_API.TO_BOOLEAN(p_insert_only) THEN
7987: log_now (p_log_level => FND_FILE.LOG
7988: ,p_message => '| Time Taken to Populate Party Id '||(l_date7-l_date6)*86400||' Secs'
7989: );
7990: log_now (p_log_level => FND_FILE.LOG
7991: ,p_message => '| Time Taken to Sync Tax Reference '||(l_date10-l_date9)*86400||' Secs'
7992: );
7993: log_now (p_log_level => FND_FILE.LOG
7994: ,p_message => '| Time Taken to Populate PTP Table '||(l_date11-l_date10)*86400||' Secs'
7989: );
7990: log_now (p_log_level => FND_FILE.LOG
7991: ,p_message => '| Time Taken to Sync Tax Reference '||(l_date10-l_date9)*86400||' Secs'
7992: );
7993: log_now (p_log_level => FND_FILE.LOG
7994: ,p_message => '| Time Taken to Populate PTP Table '||(l_date11-l_date10)*86400||' Secs'
7995: );
7996: log_now (p_log_level => FND_FILE.LOG
7997: ,p_message => '| Time Taken for IMPORT_PTP API '||(l_date9-l_date8)*86400||' Secs'
7992: );
7993: log_now (p_log_level => FND_FILE.LOG
7994: ,p_message => '| Time Taken to Populate PTP Table '||(l_date11-l_date10)*86400||' Secs'
7995: );
7996: log_now (p_log_level => FND_FILE.LOG
7997: ,p_message => '| Time Taken for IMPORT_PTP API '||(l_date9-l_date8)*86400||' Secs'
7998: );
7999: END IF;
8000: log_now (p_log_level => FND_FILE.LOG
7996: log_now (p_log_level => FND_FILE.LOG
7997: ,p_message => '| Time Taken for IMPORT_PTP API '||(l_date9-l_date8)*86400||' Secs'
7998: );
7999: END IF;
8000: log_now (p_log_level => FND_FILE.LOG
8001: ,p_message => '| Total Time Taken for Validation Mode '||(l_date5-l_date1)*86400||' Secs'
8002: );
8003: log_now (p_log_level => FND_FILE.LOG
8004: ,p_message => '| Total Time Taken for Insert Mode '||(l_date12-l_date5)*86400||' Secs'
7999: END IF;
8000: log_now (p_log_level => FND_FILE.LOG
8001: ,p_message => '| Total Time Taken for Validation Mode '||(l_date5-l_date1)*86400||' Secs'
8002: );
8003: log_now (p_log_level => FND_FILE.LOG
8004: ,p_message => '| Total Time Taken for Insert Mode '||(l_date12-l_date5)*86400||' Secs'
8005: );
8006: log_now (p_log_level => FND_FILE.LOG
8007: ,p_message => '| Time Taken by Import Wrapper '||(l_date12-l_date1)*86400||' Secs'
8002: );
8003: log_now (p_log_level => FND_FILE.LOG
8004: ,p_message => '| Total Time Taken for Insert Mode '||(l_date12-l_date5)*86400||' Secs'
8005: );
8006: log_now (p_log_level => FND_FILE.LOG
8007: ,p_message => '| Time Taken by Import Wrapper '||(l_date12-l_date1)*86400||' Secs'
8008: );
8009: log_now (p_log_level => FND_FILE.LOG
8010: ,p_message => '+--------------------------------------------------------------------'
8005: );
8006: log_now (p_log_level => FND_FILE.LOG
8007: ,p_message => '| Time Taken by Import Wrapper '||(l_date12-l_date1)*86400||' Secs'
8008: );
8009: log_now (p_log_level => FND_FILE.LOG
8010: ,p_message => '+--------------------------------------------------------------------'
8011: );
8012:
8013: END IF; -- end p_interface_table_name
8011: );
8012:
8013: END IF; -- end p_interface_table_name
8014:
8015: log_now (p_log_level => FND_FILE.LOG
8016: ,p_message => G_PROC_NAME||'(-)'
8017: );
8018: IF (G_DEBUG_LEVEL_PROCEDURE >= G_CURRENT_DEBUG_LEVEL_SET ) THEN
8019: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,G_DEBUG_LOG_HEADER||'IMPORT_WRAPPER','IMPORT_WRAPPER(-)');
8022: EXCEPTION
8023: WHEN OTHERS THEN
8024: x_return_status := G_CONC_RET_STS_UNEXP_ERROR;
8025: x_msg_data := SQLERRM;
8026: log_now (p_log_level => FND_FILE.LOG
8027: ,p_message => G_PROC_NAME||' : '||SQLERRM
8028: );
8029: END IMPORT_WRAPPER;
8030:
8087:
8088: BEGIN
8089:
8090: G_PROC_NAME := 'MESSAGE_WRAPPER';
8091: log_now (p_log_level => FND_FILE.LOG
8092: ,p_message => G_PROC_NAME||'(+)'
8093: );
8094: IF (G_DEBUG_LEVEL_PROCEDURE >= G_CURRENT_DEBUG_LEVEL_SET ) THEN
8095: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,G_DEBUG_LOG_HEADER||'MESSAGE_WRAPPER','MESSAGE_WRAPPER(+)');
8146: l_exe_records_msg := fnd_message.get();
8147: --
8148: -- start print the summary for party tax profile
8149: --
8150: log_now (p_log_level => FND_FILE.OUTPUT
8151: ,p_message => G_INTF_PTP_TABLE_NAME
8152: );
8153: log_now (p_log_level => FND_FILE.OUTPUT
8154: ,p_message => l_std_underscore
8149: --
8150: log_now (p_log_level => FND_FILE.OUTPUT
8151: ,p_message => G_INTF_PTP_TABLE_NAME
8152: );
8153: log_now (p_log_level => FND_FILE.OUTPUT
8154: ,p_message => l_std_underscore
8155: );
8156: log_now (p_log_level => FND_FILE.OUTPUT
8157: ,p_message => l_tot_records_msg||' '||l_count_success_records
8152: );
8153: log_now (p_log_level => FND_FILE.OUTPUT
8154: ,p_message => l_std_underscore
8155: );
8156: log_now (p_log_level => FND_FILE.OUTPUT
8157: ,p_message => l_tot_records_msg||' '||l_count_success_records
8158: );
8159: log_now (p_log_level => FND_FILE.OUTPUT
8160: ,p_message => l_exe_records_msg||' '||l_count_exception_records
8155: );
8156: log_now (p_log_level => FND_FILE.OUTPUT
8157: ,p_message => l_tot_records_msg||' '||l_count_success_records
8158: );
8159: log_now (p_log_level => FND_FILE.OUTPUT
8160: ,p_message => l_exe_records_msg||' '||l_count_exception_records
8161: );
8162: log_now (p_log_level => FND_FILE.OUTPUT
8163: ,p_message => ''
8158: );
8159: log_now (p_log_level => FND_FILE.OUTPUT
8160: ,p_message => l_exe_records_msg||' '||l_count_exception_records
8161: );
8162: log_now (p_log_level => FND_FILE.OUTPUT
8163: ,p_message => ''
8164: );
8165: --
8166: -- end print the summary for party tax profile
8174: || l_std_underscore;
8175: --
8176: -- start print the summary for the child records
8177: --
8178: log_now (p_log_level => FND_FILE.OUTPUT
8179: ,p_message => l_message_line1
8180: );
8181: log_now (p_log_level => FND_FILE.OUTPUT
8182: ,p_message => l_message_line2
8177: --
8178: log_now (p_log_level => FND_FILE.OUTPUT
8179: ,p_message => l_message_line1
8180: );
8181: log_now (p_log_level => FND_FILE.OUTPUT
8182: ,p_message => l_message_line2
8183: );
8184:
8185: SELECT NVL(SUM(DECODE(record_status,G_RS_ERROR,1,0)),0), NVL(SUM(1),0)
8210: || l_tot_records_msg||' '||l_count_success_records;
8211: l_message_line2 := l_message_line2
8212: || l_exe_records_msg||' '||l_count_exception_records;
8213:
8214: log_now (p_log_level => FND_FILE.OUTPUT
8215: ,p_message => l_message_line1
8216: );
8217: log_now (p_log_level => FND_FILE.OUTPUT
8218: ,p_message => l_message_line2
8213:
8214: log_now (p_log_level => FND_FILE.OUTPUT
8215: ,p_message => l_message_line1
8216: );
8217: log_now (p_log_level => FND_FILE.OUTPUT
8218: ,p_message => l_message_line2
8219: );
8220: log_now (p_log_level => FND_FILE.OUTPUT
8221: ,p_message => ''
8216: );
8217: log_now (p_log_level => FND_FILE.OUTPUT
8218: ,p_message => l_message_line2
8219: );
8220: log_now (p_log_level => FND_FILE.OUTPUT
8221: ,p_message => ''
8222: );
8223: log_now (p_log_level => FND_FILE.LOG
8224: ,p_message => '+--------------------------------------------------------------------'
8219: );
8220: log_now (p_log_level => FND_FILE.OUTPUT
8221: ,p_message => ''
8222: );
8223: log_now (p_log_level => FND_FILE.LOG
8224: ,p_message => '+--------------------------------------------------------------------'
8225: );
8226: log_now (p_log_level => FND_FILE.LOG
8227: ,p_message => '| PERF METRICS FOR MESSAGE_WRAPPER TO DISPLAY STATISTICS '
8222: );
8223: log_now (p_log_level => FND_FILE.LOG
8224: ,p_message => '+--------------------------------------------------------------------'
8225: );
8226: log_now (p_log_level => FND_FILE.LOG
8227: ,p_message => '| PERF METRICS FOR MESSAGE_WRAPPER TO DISPLAY STATISTICS '
8228: );
8229: log_now (p_log_level => FND_FILE.LOG
8230: ,p_message => '| Time Taken by Message API to display Stats '||(SYSDATE-l_date1)*86400||' Secs'
8225: );
8226: log_now (p_log_level => FND_FILE.LOG
8227: ,p_message => '| PERF METRICS FOR MESSAGE_WRAPPER TO DISPLAY STATISTICS '
8228: );
8229: log_now (p_log_level => FND_FILE.LOG
8230: ,p_message => '| Time Taken by Message API to display Stats '||(SYSDATE-l_date1)*86400||' Secs'
8231: );
8232: log_now (p_log_level => FND_FILE.LOG
8233: ,p_message => '+--------------------------------------------------------------------'
8228: );
8229: log_now (p_log_level => FND_FILE.LOG
8230: ,p_message => '| Time Taken by Message API to display Stats '||(SYSDATE-l_date1)*86400||' Secs'
8231: );
8232: log_now (p_log_level => FND_FILE.LOG
8233: ,p_message => '+--------------------------------------------------------------------'
8234: );
8235: --
8236: -- end print the summary for the child records
8265: fnd_message.set_name('ZX','ZX_PTP_ERROR_HEADER');
8266: fnd_message.set_token('TABLE_NAME', G_INTF_PTP_TABLE_NAME);
8267: l_message_line1 := fnd_message.get();
8268:
8269: log_now (p_log_level => FND_FILE.OUTPUT
8270: ,p_message => l_message_line1
8271: );
8272: log_now (p_log_level => FND_FILE.OUTPUT
8273: ,p_message => ''
8268:
8269: log_now (p_log_level => FND_FILE.OUTPUT
8270: ,p_message => l_message_line1
8271: );
8272: log_now (p_log_level => FND_FILE.OUTPUT
8273: ,p_message => ''
8274: );
8275: log_now (p_log_level => FND_FILE.OUTPUT
8276: ,p_message => p_message_header_string_1
8271: );
8272: log_now (p_log_level => FND_FILE.OUTPUT
8273: ,p_message => ''
8274: );
8275: log_now (p_log_level => FND_FILE.OUTPUT
8276: ,p_message => p_message_header_string_1
8277: );
8278: log_now (p_log_level => FND_FILE.OUTPUT
8279: ,p_message => p_message_header_string_2
8274: );
8275: log_now (p_log_level => FND_FILE.OUTPUT
8276: ,p_message => p_message_header_string_1
8277: );
8278: log_now (p_log_level => FND_FILE.OUTPUT
8279: ,p_message => p_message_header_string_2
8280: );
8281:
8282: fnd_message.set_name('ZX','ZX_PTP_ERR_CATEGORY_NAME');
8318:
8319: WHILE LENGTH(l_message_line2) > 60 LOOP
8320: l_message_line1 := l_message_line1||SUBSTR(l_message_line2,1,60);
8321:
8322: log_now (p_log_level => FND_FILE.OUTPUT
8323: ,p_message => l_message_line1
8324: );
8325: l_message_line2 := SUBSTR(l_message_line2,61);
8326: l_message_line1 := l_filler_space_msg_line;
8324: );
8325: l_message_line2 := SUBSTR(l_message_line2,61);
8326: l_message_line1 := l_filler_space_msg_line;
8327: END LOOP;
8328: log_now (p_log_level => FND_FILE.OUTPUT
8329: ,p_message => l_message_line1||l_message_line2
8330: );
8331: log_now (p_log_level => FND_FILE.OUTPUT
8332: ,p_message => ' '
8327: END LOOP;
8328: log_now (p_log_level => FND_FILE.OUTPUT
8329: ,p_message => l_message_line1||l_message_line2
8330: );
8331: log_now (p_log_level => FND_FILE.OUTPUT
8332: ,p_message => ' '
8333: );
8334: END LOOP;
8335:
8332: ,p_message => ' '
8333: );
8334: END LOOP;
8335:
8336: log_now (p_log_level => FND_FILE.LOG
8337: ,p_message => '+--------------------------------------------------------------------'
8338: );
8339: log_now (p_log_level => FND_FILE.LOG
8340: ,p_message => '| PERF METRICS FOR MESSAGE_WRAPPER TO DISPLAY ERRORS '
8335:
8336: log_now (p_log_level => FND_FILE.LOG
8337: ,p_message => '+--------------------------------------------------------------------'
8338: );
8339: log_now (p_log_level => FND_FILE.LOG
8340: ,p_message => '| PERF METRICS FOR MESSAGE_WRAPPER TO DISPLAY ERRORS '
8341: );
8342: log_now (p_log_level => FND_FILE.LOG
8343: ,p_message => '| Time Taken by Message API to display Errors '||(SYSDATE-l_date1)*86400||' Secs'
8338: );
8339: log_now (p_log_level => FND_FILE.LOG
8340: ,p_message => '| PERF METRICS FOR MESSAGE_WRAPPER TO DISPLAY ERRORS '
8341: );
8342: log_now (p_log_level => FND_FILE.LOG
8343: ,p_message => '| Time Taken by Message API to display Errors '||(SYSDATE-l_date1)*86400||' Secs'
8344: );
8345: log_now (p_log_level => FND_FILE.LOG
8346: ,p_message => '+--------------------------------------------------------------------'
8341: );
8342: log_now (p_log_level => FND_FILE.LOG
8343: ,p_message => '| Time Taken by Message API to display Errors '||(SYSDATE-l_date1)*86400||' Secs'
8344: );
8345: log_now (p_log_level => FND_FILE.LOG
8346: ,p_message => '+--------------------------------------------------------------------'
8347: );
8348: END IF; -- p_interface_table_name = G_CUST_INTF_TABLE
8349: END IF; -- lnum1
8349: END IF; -- lnum1
8350: END IF; -- p_display_messages
8351:
8352:
8353: log_now (p_log_level => FND_FILE.LOG
8354: ,p_message => G_PROC_NAME||'(-)'
8355: );
8356: IF (G_DEBUG_LEVEL_PROCEDURE >= G_CURRENT_DEBUG_LEVEL_SET ) THEN
8357: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,G_DEBUG_LOG_HEADER||'MESSAGE_WRAPPER','MESSAGE_WRAPPER(-)');
8363: CLOSE c_error_records_cust;
8364: END IF;
8365: x_return_status := G_CONC_RET_STS_UNEXP_ERROR;
8366: x_msg_data := SQLERRM;
8367: log_now (p_log_level => FND_FILE.LOG
8368: ,p_message => G_PROC_NAME||' : '||SQLERRM
8369: );
8370: END MESSAGE_WRAPPER;
8371: