1088:
1089: g_state := 'Analyzing FII_AR_PMT_SCHEDULES_F table';
1090: FND_STATS.GATHER_TABLE_STATS(g_fii_schema,'FII_AR_PMT_SCHEDULES_F');
1091:
1092: g_state := 'Logging maximum payment schedule id into fii_change_log table';
1093: select nvl(max(payment_schedule_id), -999)
1094: into l_max_pmt_schedule_id
1095: from fii_ar_pmt_schedules_f;
1096:
1093: select nvl(max(payment_schedule_id), -999)
1094: into l_max_pmt_schedule_id
1095: from fii_ar_pmt_schedules_f;
1096:
1097: INSERT INTO fii_change_log
1098: (log_item, item_value, CREATION_DATE, CREATED_BY,
1099: LAST_UPDATE_DATE, LAST_UPDATED_BY, LAST_UPDATE_LOGIN)
1100: (SELECT 'AR_MAX_PAYMENT_SCHEDULE_ID',
1101: l_max_pmt_schedule_id,
1105: g_fii_user_id, --LAST_UPDATED_BY,
1106: g_fii_login_id --LAST_UPDATE_LOGIN
1107: FROM DUAL
1108: WHERE NOT EXISTS
1109: (select 1 from fii_change_log
1110: where log_item = 'AR_MAX_PAYMENT_SCHEDULE_ID'));
1111:
1112: IF (SQL%ROWCOUNT = 0) THEN
1113: UPDATE fii_change_log
1109: (select 1 from fii_change_log
1110: where log_item = 'AR_MAX_PAYMENT_SCHEDULE_ID'));
1111:
1112: IF (SQL%ROWCOUNT = 0) THEN
1113: UPDATE fii_change_log
1114: SET item_value = l_max_pmt_schedule_id,
1115: last_update_date = g_sysdate_time,
1116: last_update_login = g_fii_login_id,
1117: last_updated_by = g_fii_user_id
1866:
1867: g_state := 'Analyzing FII_AR_RECEIPTS_F table';
1868: FND_STATS.GATHER_TABLE_STATS(g_fii_schema,'FII_AR_RECEIPTS_F');
1869:
1870: g_state := 'Logging maximum receivable_application_id into fii_change_log table';
1871: select nvl(max(receivable_application_id), -999)
1872: into l_max_rec_application_id
1873: from fii_ar_receipts_f;
1874:
1871: select nvl(max(receivable_application_id), -999)
1872: into l_max_rec_application_id
1873: from fii_ar_receipts_f;
1874:
1875: INSERT INTO fii_change_log
1876: (log_item, item_value, CREATION_DATE, CREATED_BY,
1877: LAST_UPDATE_DATE, LAST_UPDATED_BY, LAST_UPDATE_LOGIN)
1878: (SELECT 'AR_MAX_RECEIVABLE_APPLICATION_ID',
1879: l_max_rec_application_id,
1883: g_fii_user_id, --LAST_UPDATED_BY,
1884: g_fii_login_id --LAST_UPDATE_LOGIN
1885: FROM DUAL
1886: WHERE NOT EXISTS
1887: (select 1 from fii_change_log
1888: where log_item = 'AR_MAX_RECEIVABLE_APPLICATION_ID'));
1889:
1890: IF (SQL%ROWCOUNT = 0) THEN
1891: UPDATE fii_change_log
1887: (select 1 from fii_change_log
1888: where log_item = 'AR_MAX_RECEIVABLE_APPLICATION_ID'));
1889:
1890: IF (SQL%ROWCOUNT = 0) THEN
1891: UPDATE fii_change_log
1892: SET item_value = l_max_rec_application_id,
1893: last_update_date = g_sysdate_time,
1894: last_update_login = g_fii_login_id,
1895: last_updated_by = g_fii_user_id
4238: FII_UTIL.put_line('');
4239: end if;
4240: POPULATE_DISPUTES_AGING;
4241:
4242: g_state := 'Logging program sysdate as ar_last_update_date in fii_change_log table';
4243:
4244: INSERT INTO fii_change_log
4245: (log_item, item_value, CREATION_DATE, CREATED_BY,
4246: LAST_UPDATE_DATE, LAST_UPDATED_BY, LAST_UPDATE_LOGIN)
4240: POPULATE_DISPUTES_AGING;
4241:
4242: g_state := 'Logging program sysdate as ar_last_update_date in fii_change_log table';
4243:
4244: INSERT INTO fii_change_log
4245: (log_item, item_value, CREATION_DATE, CREATED_BY,
4246: LAST_UPDATE_DATE, LAST_UPDATED_BY, LAST_UPDATE_LOGIN)
4247: (SELECT 'AR_LAST_UPDATE_DATE',
4248: to_char(g_sysdate_time,'MM/DD/YYYY HH24:MI:SS'),
4252: g_fii_user_id, --LAST_UPDATED_BY,
4253: g_fii_login_id --LAST_UPDATE_LOGIN
4254: FROM DUAL
4255: WHERE NOT EXISTS
4256: (select 1 from fii_change_log
4257: where log_item = 'AR_LAST_UPDATE_DATE'));
4258:
4259: IF (SQL%ROWCOUNT = 0) THEN
4260: UPDATE fii_change_log
4256: (select 1 from fii_change_log
4257: where log_item = 'AR_LAST_UPDATE_DATE'));
4258:
4259: IF (SQL%ROWCOUNT = 0) THEN
4260: UPDATE fii_change_log
4261: SET item_value = to_char(g_sysdate_time,'MM/DD/YYYY HH24:MI:SS'),
4262: last_update_date = g_sysdate_time,
4263: last_update_login = g_fii_login_id,
4264: last_updated_by = g_fii_user_id
4302: PROCEDURE Inc_Prepare IS
4303:
4304: BEGIN
4305:
4306: g_state := 'Getting data from fii_change_log';
4307: if g_debug_flag = 'Y' then
4308: FII_UTIL.put_line(g_state);
4309: FII_UTIL.put_line('');
4310: end if;
4309: FII_UTIL.put_line('');
4310: end if;
4311:
4312: select to_date(item_value,'MM/DD/YYYY HH24:MI:SS') into G_LAST_UPDATE_DATE
4313: from fii_change_log
4314: where log_item = 'AR_LAST_UPDATE_DATE';
4315:
4316: select item_value into G_MAX_PAYMENT_SCHEDULE_ID
4317: from fii_change_log
4313: from fii_change_log
4314: where log_item = 'AR_LAST_UPDATE_DATE';
4315:
4316: select item_value into G_MAX_PAYMENT_SCHEDULE_ID
4317: from fii_change_log
4318: where log_item = 'AR_MAX_PAYMENT_SCHEDULE_ID';
4319:
4320: select item_value into G_MAX_RECEIVABLE_APPL_ID
4321: from fii_change_log
4317: from fii_change_log
4318: where log_item = 'AR_MAX_PAYMENT_SCHEDULE_ID';
4319:
4320: select item_value into G_MAX_RECEIVABLE_APPL_ID
4321: from fii_change_log
4322: where log_item = 'AR_MAX_RECEIVABLE_APPLICATION_ID';
4323:
4324: if g_debug_flag = 'Y' then
4325: FII_UTIL.put_line('G_LAST_UPDATE_DATE is ' ||
5232:
5233: g_state := 'Analyzing FII_AR_PMT_SCHEDULES_F table';
5234: FND_STATS.GATHER_TABLE_STATS(g_fii_schema,'FII_AR_PMT_SCHEDULES_F');
5235:
5236: g_state := 'Logging maximum payment schedule id into fii_change_log table';
5237: select nvl(max(payment_schedule_id), -999)
5238: into l_max_pmt_schedule_id
5239: from fii_ar_pmt_schedules_f;
5240:
5237: select nvl(max(payment_schedule_id), -999)
5238: into l_max_pmt_schedule_id
5239: from fii_ar_pmt_schedules_f;
5240:
5241: INSERT INTO fii_change_log
5242: (log_item, item_value, CREATION_DATE, CREATED_BY,
5243: LAST_UPDATE_DATE, LAST_UPDATED_BY, LAST_UPDATE_LOGIN)
5244: (SELECT 'AR_MAX_PAYMENT_SCHEDULE_ID',
5245: l_max_pmt_schedule_id,
5249: g_fii_user_id, --LAST_UPDATED_BY,
5250: g_fii_login_id --LAST_UPDATE_LOGIN
5251: FROM DUAL
5252: WHERE NOT EXISTS
5253: (select 1 from fii_change_log
5254: where log_item = 'AR_MAX_PAYMENT_SCHEDULE_ID'));
5255:
5256: IF (SQL%ROWCOUNT = 0) THEN
5257: UPDATE fii_change_log
5253: (select 1 from fii_change_log
5254: where log_item = 'AR_MAX_PAYMENT_SCHEDULE_ID'));
5255:
5256: IF (SQL%ROWCOUNT = 0) THEN
5257: UPDATE fii_change_log
5258: SET item_value = l_max_pmt_schedule_id,
5259: last_update_date = g_sysdate_time,
5260: last_update_login = g_fii_login_id,
5261: last_updated_by = g_fii_user_id
6665:
6666: g_state := 'Analyzing FII_AR_RECEIPTS_F table';
6667: FND_STATS.GATHER_TABLE_STATS(g_fii_schema,'FII_AR_RECEIPTS_F');
6668:
6669: g_state := 'Logging maximum receivable_application_id into fii_change_log table';
6670: select nvl(max(receivable_application_id), -999)
6671: into l_max_rec_application_id
6672: from fii_ar_receipts_f;
6673:
6670: select nvl(max(receivable_application_id), -999)
6671: into l_max_rec_application_id
6672: from fii_ar_receipts_f;
6673:
6674: INSERT INTO fii_change_log
6675: (log_item, item_value, CREATION_DATE, CREATED_BY,
6676: LAST_UPDATE_DATE, LAST_UPDATED_BY, LAST_UPDATE_LOGIN)
6677: (SELECT 'AR_MAX_RECEIVABLE_APPLICATION_ID',
6678: l_max_rec_application_id,
6682: g_fii_user_id, --LAST_UPDATED_BY,
6683: g_fii_login_id --LAST_UPDATE_LOGIN
6684: FROM DUAL
6685: WHERE NOT EXISTS
6686: (select 1 from fii_change_log
6687: where log_item = 'AR_MAX_RECEIVABLE_APPLICATION_ID'));
6688:
6689: IF (SQL%ROWCOUNT = 0) THEN
6690: UPDATE fii_change_log
6686: (select 1 from fii_change_log
6687: where log_item = 'AR_MAX_RECEIVABLE_APPLICATION_ID'));
6688:
6689: IF (SQL%ROWCOUNT = 0) THEN
6690: UPDATE fii_change_log
6691: SET item_value = l_max_rec_application_id,
6692: last_update_date = g_sysdate_time,
6693: last_update_login = g_fii_login_id,
6694: last_updated_by = g_fii_user_id
9454: end if;
9455: Inc_DISPUTES_AGING;
9456:
9457:
9458: g_state := 'Logging program sysdate as ar_last_update_date in fii_change_log table';
9459:
9460: INSERT INTO fii_change_log
9461: (log_item, item_value, CREATION_DATE, CREATED_BY,
9462: LAST_UPDATE_DATE, LAST_UPDATED_BY, LAST_UPDATE_LOGIN)
9456:
9457:
9458: g_state := 'Logging program sysdate as ar_last_update_date in fii_change_log table';
9459:
9460: INSERT INTO fii_change_log
9461: (log_item, item_value, CREATION_DATE, CREATED_BY,
9462: LAST_UPDATE_DATE, LAST_UPDATED_BY, LAST_UPDATE_LOGIN)
9463: (SELECT 'AR_LAST_UPDATE_DATE',
9464: to_char(g_sysdate_time,'MM/DD/YYYY HH24:MI:SS'),
9468: g_fii_user_id, --LAST_UPDATED_BY,
9469: g_fii_login_id --LAST_UPDATE_LOGIN
9470: FROM DUAL
9471: WHERE NOT EXISTS
9472: (select 1 from fii_change_log
9473: where log_item = 'AR_LAST_UPDATE_DATE'));
9474:
9475: IF (SQL%ROWCOUNT = 0) THEN
9476: UPDATE fii_change_log
9472: (select 1 from fii_change_log
9473: where log_item = 'AR_LAST_UPDATE_DATE'));
9474:
9475: IF (SQL%ROWCOUNT = 0) THEN
9476: UPDATE fii_change_log
9477: SET item_value = to_char(g_sysdate_time,'MM/DD/YYYY HH24:MI:SS'),
9478: last_update_date = g_sysdate_time,
9479: last_update_login = g_fii_login_id,
9480: last_updated_by = g_fii_user_id