DBA Data[Home] [Help]

APPS.FII_BUDGET_FORECAST_C dependencies on FII_CHANGE_LOG

Line 18: -- flag and profile option setting in FII_CHANGE_LOG.

14: -- Purge_All
15: -- Purpose
16: -- This routine will purge all records for the given plan type
17: -- from FII_BUDGET_BASE. Then it will reset the truncation
18: -- flag and profile option setting in FII_CHANGE_LOG.
19: -- History
20: -- 06-20-02 S Kung Created
21: -- Arguments
22: -- None

Line 62: -- update FII_CHANGE_LOG to reflect latest profile setting

58: v2 => 'FII_BUDGET_BASE');
59: END IF;
60:
61: -- Reset truncation indicator back to normal and
62: -- update FII_CHANGE_LOG to reflect latest profile setting
63: IF (FIIBUUP_DEBUG) THEN
64: FII_MESSAGE.Write_Log
65: (msg_name => 'FII_ROUTINE',
66: token_num => 2,

Line 70: v2 => 'Resetting FII_CHANGE_LOG...');

66: token_num => 2,
67: t1 => 'ROUTINE',
68: v1 => 'Purge_All()',
69: t2 => 'ACTION',
70: v2 => 'Resetting FII_CHANGE_LOG...');
71: END IF;
72:
73: g_phase := 'Update FII_CHANGE_LOG';
74: IF (FIIBUUP_PURGE_PLAN_TYPE = 'B') THEN

Line 73: g_phase := 'Update FII_CHANGE_LOG';

69: t2 => 'ACTION',
70: v2 => 'Resetting FII_CHANGE_LOG...');
71: END IF;
72:
73: g_phase := 'Update FII_CHANGE_LOG';
74: IF (FIIBUUP_PURGE_PLAN_TYPE = 'B') THEN
75: UPDATE FII_CHANGE_LOG
76: SET item_value = 'N',
77: last_update_date = SYSDATE,

Line 75: UPDATE FII_CHANGE_LOG

71: END IF;
72:
73: g_phase := 'Update FII_CHANGE_LOG';
74: IF (FIIBUUP_PURGE_PLAN_TYPE = 'B') THEN
75: UPDATE FII_CHANGE_LOG
76: SET item_value = 'N',
77: last_update_date = SYSDATE,
78: last_updated_by = FIIBUUP_USER_ID,
79: last_update_login = FIIBUUP_LOGIN_ID

Line 89: v2 => 'FII_CHANGE_LOG');

85: token_num => 2,
86: t1 => 'NUM',
87: v1 => TO_CHAR(NVL(SQL%ROWCOUNT, 0)),
88: t2 => 'TABLE',
89: v2 => 'FII_CHANGE_LOG');
90: END IF;
91:
92: UPDATE FII_CHANGE_LOG
93: SET item_value = FIIBUUP_BUDGET_TIME_UNIT,

Line 92: UPDATE FII_CHANGE_LOG

88: t2 => 'TABLE',
89: v2 => 'FII_CHANGE_LOG');
90: END IF;
91:
92: UPDATE FII_CHANGE_LOG
93: SET item_value = FIIBUUP_BUDGET_TIME_UNIT,
94: last_update_date = SYSDATE,
95: last_updated_by = FIIBUUP_USER_ID,
96: last_update_login = FIIBUUP_LOGIN_ID

Line 106: v2 => 'FII_CHANGE_LOG');

102: token_num => 2,
103: t1 => 'NUM',
104: v1 => TO_CHAR(NVL(SQL%ROWCOUNT, 0)),
105: t2 => 'TABLE',
106: v2 => 'FII_CHANGE_LOG');
107: END IF;
108:
109: ELSIF (FIIBUUP_PURGE_PLAN_TYPE = 'F') THEN
110: UPDATE FII_CHANGE_LOG

Line 110: UPDATE FII_CHANGE_LOG

106: v2 => 'FII_CHANGE_LOG');
107: END IF;
108:
109: ELSIF (FIIBUUP_PURGE_PLAN_TYPE = 'F') THEN
110: UPDATE FII_CHANGE_LOG
111: SET item_value = 'N',
112: last_update_date = SYSDATE,
113: last_updated_by = FIIBUUP_USER_ID,
114: last_update_login = FIIBUUP_LOGIN_ID

Line 124: v2 => 'FII_CHANGE_LOG');

120: token_num => 2,
121: t1 => 'NUM',
122: v1 => TO_CHAR(NVL(SQL%ROWCOUNT, 0)),
123: t2 => 'TABLE',
124: v2 => 'FII_CHANGE_LOG');
125: END IF;
126:
127: UPDATE FII_CHANGE_LOG
128: SET item_value = FIIBUUP_FORECAST_TIME_UNIT,

Line 127: UPDATE FII_CHANGE_LOG

123: t2 => 'TABLE',
124: v2 => 'FII_CHANGE_LOG');
125: END IF;
126:
127: UPDATE FII_CHANGE_LOG
128: SET item_value = FIIBUUP_FORECAST_TIME_UNIT,
129: last_update_date = SYSDATE,
130: last_updated_by = FIIBUUP_USER_ID,
131: last_update_login = FIIBUUP_LOGIN_ID

Line 141: v2 => 'FII_CHANGE_LOG');

137: token_num => 2,
138: t1 => 'NUM',
139: v1 => TO_CHAR(NVL(SQL%ROWCOUNT, 0)),
140: t2 => 'TABLE',
141: v2 => 'FII_CHANGE_LOG');
142: END IF;
143:
144: END IF;
145:

Line 589: -- update FII_CHANGE_LOG to reflect latest profile setting

585: v2 => 'FII_BUDGET_BASE');
586: END IF;
587:
588: -- Reset truncation indicator back to normal and
589: -- update FII_CHANGE_LOG to reflect latest profile setting
590: IF (FIIBUUP_DEBUG) THEN
591: FII_MESSAGE.Write_Log
592: (msg_name => 'FII_ROUTINE',
593: token_num => 2,

Line 597: v2 => 'Resetting FII_CHANGE_LOG...');

593: token_num => 2,
594: t1 => 'ROUTINE',
595: v1 => 'Purge_Eff_Date()',
596: t2 => 'ACTION',
597: v2 => 'Resetting FII_CHANGE_LOG...');
598: END IF;
599:
600: g_phase := 'Update FII_CHANGE_LOG';
601: IF (FIIBUUP_PURGE_PLAN_TYPE = 'B') THEN

Line 600: g_phase := 'Update FII_CHANGE_LOG';

596: t2 => 'ACTION',
597: v2 => 'Resetting FII_CHANGE_LOG...');
598: END IF;
599:
600: g_phase := 'Update FII_CHANGE_LOG';
601: IF (FIIBUUP_PURGE_PLAN_TYPE = 'B') THEN
602: UPDATE FII_CHANGE_LOG
603: SET item_value = 'N',
604: last_update_date = SYSDATE,

Line 602: UPDATE FII_CHANGE_LOG

598: END IF;
599:
600: g_phase := 'Update FII_CHANGE_LOG';
601: IF (FIIBUUP_PURGE_PLAN_TYPE = 'B') THEN
602: UPDATE FII_CHANGE_LOG
603: SET item_value = 'N',
604: last_update_date = SYSDATE,
605: last_updated_by = FIIBUUP_USER_ID,
606: last_update_login = FIIBUUP_LOGIN_ID

Line 616: v2 => 'FII_CHANGE_LOG');

612: token_num => 2,
613: t1 => 'NUM',
614: v1 => TO_CHAR(NVL(SQL%ROWCOUNT, 0)),
615: t2 => 'TABLE',
616: v2 => 'FII_CHANGE_LOG');
617: END IF;
618:
619: UPDATE FII_CHANGE_LOG
620: SET item_value = FIIBUUP_BUDGET_TIME_UNIT,

Line 619: UPDATE FII_CHANGE_LOG

615: t2 => 'TABLE',
616: v2 => 'FII_CHANGE_LOG');
617: END IF;
618:
619: UPDATE FII_CHANGE_LOG
620: SET item_value = FIIBUUP_BUDGET_TIME_UNIT,
621: last_update_date = SYSDATE,
622: last_updated_by = FIIBUUP_USER_ID,
623: last_update_login = FIIBUUP_LOGIN_ID

Line 633: v2 => 'FII_CHANGE_LOG');

629: token_num => 2,
630: t1 => 'NUM',
631: v1 => TO_CHAR(NVL(SQL%ROWCOUNT, 0)),
632: t2 => 'TABLE',
633: v2 => 'FII_CHANGE_LOG');
634: END IF;
635:
636: ELSIF (FIIBUUP_PURGE_PLAN_TYPE = 'F') THEN
637: UPDATE FII_CHANGE_LOG

Line 637: UPDATE FII_CHANGE_LOG

633: v2 => 'FII_CHANGE_LOG');
634: END IF;
635:
636: ELSIF (FIIBUUP_PURGE_PLAN_TYPE = 'F') THEN
637: UPDATE FII_CHANGE_LOG
638: SET item_value = 'N',
639: last_update_date = SYSDATE,
640: last_updated_by = FIIBUUP_USER_ID,
641: last_update_login = FIIBUUP_LOGIN_ID

Line 651: v2 => 'FII_CHANGE_LOG');

647: token_num => 2,
648: t1 => 'NUM',
649: v1 => TO_CHAR(NVL(SQL%ROWCOUNT, 0)),
650: t2 => 'TABLE',
651: v2 => 'FII_CHANGE_LOG');
652: END IF;
653:
654: UPDATE FII_CHANGE_LOG
655: SET item_value = FIIBUUP_FORECAST_TIME_UNIT,

Line 654: UPDATE FII_CHANGE_LOG

650: t2 => 'TABLE',
651: v2 => 'FII_CHANGE_LOG');
652: END IF;
653:
654: UPDATE FII_CHANGE_LOG
655: SET item_value = FIIBUUP_FORECAST_TIME_UNIT,
656: last_update_date = SYSDATE,
657: last_updated_by = FIIBUUP_USER_ID,
658: last_update_login = FIIBUUP_LOGIN_ID

Line 668: v2 => 'FII_CHANGE_LOG');

664: token_num => 2,
665: t1 => 'NUM',
666: v1 => TO_CHAR(NVL(SQL%ROWCOUNT, 0)),
667: t2 => 'TABLE',
668: v2 => 'FII_CHANGE_LOG');
669: END IF;
670:
671: END IF;
672:

Line 6970: -- Then, get prior time unit setting from FII_CHANGE_LOG

6966: v3 => FIIBUUP_FORECAST_TIME_UNIT);
6967:
6968: END IF;
6969:
6970: -- Then, get prior time unit setting from FII_CHANGE_LOG
6971: IF (FIIBUUP_DEBUG) THEN
6972: FII_MESSAGE.Write_Log
6973: (msg_name => 'FII_ROUTINE',
6974: token_num => 2,

Line 7026: g_phase := 'Get prior time unit setting from FII_CHANGE_LOG';

7022: RETURN;
7023: END IF;
7024: END IF;
7025:
7026: g_phase := 'Get prior time unit setting from FII_CHANGE_LOG';
7027: BEGIN
7028: SELECT l.item_value
7029: INTO l_prev_bud_time_unit
7030: FROM FII_CHANGE_LOG l

Line 7030: FROM FII_CHANGE_LOG l

7026: g_phase := 'Get prior time unit setting from FII_CHANGE_LOG';
7027: BEGIN
7028: SELECT l.item_value
7029: INTO l_prev_bud_time_unit
7030: FROM FII_CHANGE_LOG l
7031: WHERE l.log_item = 'BUDGET_TIME_UNIT';
7032: EXCEPTION
7033: WHEN NO_DATA_FOUND THEN
7034: INSERT INTO FII_CHANGE_LOG

Line 7034: INSERT INTO FII_CHANGE_LOG

7030: FROM FII_CHANGE_LOG l
7031: WHERE l.log_item = 'BUDGET_TIME_UNIT';
7032: EXCEPTION
7033: WHEN NO_DATA_FOUND THEN
7034: INSERT INTO FII_CHANGE_LOG
7035: (log_item, item_value, creation_date, created_by,
7036: last_update_date, last_updated_by, last_update_login)
7037: VALUES
7038: ('BUDGET_TIME_UNIT', FIIBUUP_BUDGET_TIME_UNIT, SYSDATE,

Line 7047: FROM FII_CHANGE_LOG l

7043:
7044: BEGIN
7045: SELECT l.item_value
7046: INTO l_prev_fc_time_unit
7047: FROM FII_CHANGE_LOG l
7048: WHERE l.log_item = 'FORECAST_TIME_UNIT';
7049: EXCEPTION
7050: WHEN NO_DATA_FOUND THEN
7051: INSERT INTO FII_CHANGE_LOG

Line 7051: INSERT INTO FII_CHANGE_LOG

7047: FROM FII_CHANGE_LOG l
7048: WHERE l.log_item = 'FORECAST_TIME_UNIT';
7049: EXCEPTION
7050: WHEN NO_DATA_FOUND THEN
7051: INSERT INTO FII_CHANGE_LOG
7052: (log_item, item_value, creation_date, created_by,
7053: last_update_date, last_updated_by, last_update_login)
7054: VALUES
7055: ('FORECAST_TIME_UNIT', FIIBUUP_FORECAST_TIME_UNIT, SYSDATE,

Line 7061: -- Print FII_CHANGE_LOG information

7057:
7058: l_prev_fc_time_unit := FIIBUUP_FORECAST_TIME_UNIT;
7059: END;
7060:
7061: -- Print FII_CHANGE_LOG information
7062: IF (FIIBUUP_DEBUG) THEN
7063: FII_MESSAGE.Write_Log
7064: (msg_name => 'FII_ROUTINE_VAL',
7065: token_num => 3 ,

Line 7084: g_phase := 'Check FII_CHANGE_LOG and see if truncation is needed';

7080: t3 => 'VALUE',
7081: v3 => l_prev_fc_time_unit);
7082: END IF;
7083:
7084: g_phase := 'Check FII_CHANGE_LOG and see if truncation is needed';
7085: IF (X_Mode = 'U') THEN
7086:
7087: -- First, get from the FII_CHANGE_LOG and see if truncation is
7088: -- needed

Line 7087: -- First, get from the FII_CHANGE_LOG and see if truncation is

7083:
7084: g_phase := 'Check FII_CHANGE_LOG and see if truncation is needed';
7085: IF (X_Mode = 'U') THEN
7086:
7087: -- First, get from the FII_CHANGE_LOG and see if truncation is
7088: -- needed
7089: IF (FIIBUUP_DEBUG) THEN
7090: FII_MESSAGE.Write_Log
7091: (msg_name => 'FII_ROUTINE',

Line 7102: FROM FII_CHANGE_LOG l1

7098:
7099: BEGIN
7100: SELECT l1.item_value
7101: INTO l_drop_bud_data
7102: FROM FII_CHANGE_LOG l1
7103: WHERE l1.log_item = 'TRUNCATE_BUDGET';
7104: EXCEPTION
7105: WHEN NO_DATA_FOUND THEN
7106: NULL;

Line 7112: FROM FII_CHANGE_LOG l1

7108:
7109: BEGIN
7110: SELECT l1.item_value
7111: INTO l_drop_fc_data
7112: FROM FII_CHANGE_LOG l1
7113: WHERE l1.log_item = 'TRUNCATE_FORECAST';
7114: EXCEPTION
7115: WHEN NO_DATA_FOUND THEN
7116: NULL;

Line 7140: 'Budget time unit has changed, set FII_CHANGE_LOG...');

7136: t1 => 'ROUTINE',
7137: v1 => 'Main()',
7138: t2 => 'ACTION',
7139: v2 =>
7140: 'Budget time unit has changed, set FII_CHANGE_LOG...');
7141: END IF;
7142:
7143: g_phase := 'Indicate in FII_CHANGE_LOG - budget needs to be dropped';
7144:

Line 7143: g_phase := 'Indicate in FII_CHANGE_LOG - budget needs to be dropped';

7139: v2 =>
7140: 'Budget time unit has changed, set FII_CHANGE_LOG...');
7141: END IF;
7142:
7143: g_phase := 'Indicate in FII_CHANGE_LOG - budget needs to be dropped';
7144:
7145: MERGE INTO FII_CHANGE_LOG l1
7146: USING
7147: (SELECT 'TRUNCATE_BUDGET' log_item from DUAL) l2

Line 7145: MERGE INTO FII_CHANGE_LOG l1

7141: END IF;
7142:
7143: g_phase := 'Indicate in FII_CHANGE_LOG - budget needs to be dropped';
7144:
7145: MERGE INTO FII_CHANGE_LOG l1
7146: USING
7147: (SELECT 'TRUNCATE_BUDGET' log_item from DUAL) l2
7148: ON (l1.log_item = l2.log_item)
7149: WHEN MATCHED THEN UPDATE SET

Line 7170: v2 => 'FII_CHANGE_LOG');

7166: token_num => 2,
7167: t1 => 'NUM',
7168: v1 => TO_CHAR(NVL(SQL%ROWCOUNT, 0)),
7169: t2 => 'TABLE',
7170: v2 => 'FII_CHANGE_LOG');
7171:
7172: FII_MESSAGE.Write_Log
7173: (msg_name => 'FII_INV_BUD_TIM_UNIT',
7174: token_num => 0);

Line 7183: UPDATE FII_CHANGE_LOG

7179:
7180: IF (l_drop_bud_data = 'Y') THEN
7181: g_phase := 'Since prior and current time unit setting is identical, reset truncation flag to N';
7182:
7183: UPDATE FII_CHANGE_LOG
7184: SET item_value = 'N',
7185: last_update_date = SYSDATE,
7186: last_updated_by = FIIBUUP_USER_ID,
7187: last_update_login = FIIBUUP_LOGIN_ID

Line 7197: v2 => 'FII_CHANGE_LOG');

7193: token_num => 2,
7194: t1 => 'NUM',
7195: v1 => TO_CHAR(NVL(SQL%ROWCOUNT, 0)),
7196: t2 => 'TABLE',
7197: v2 => 'FII_CHANGE_LOG');
7198: END IF;
7199:
7200: END IF;
7201:

Line 7205: g_phase := 'Indicate in FII_CHANGE_LOG that forecast needs to be dropped';

7201:
7202: IF (NVL(l_prev_fc_time_unit, FIIBUUP_FORECAST_TIME_UNIT) <>
7203: FIIBUUP_FORECAST_TIME_UNIT) THEN
7204:
7205: g_phase := 'Indicate in FII_CHANGE_LOG that forecast needs to be dropped';
7206:
7207: IF (FIIBUUP_DEBUG) THEN
7208: FII_MESSAGE.Write_Log
7209: (msg_name => 'FII_ROUTINE',

Line 7215: 'Forecast time unit has changed, set FII_CHANGE_LOG...');

7211: t1 => 'ROUTINE',
7212: v1 => 'Main()',
7213: t2 => 'ACTION',
7214: v2 =>
7215: 'Forecast time unit has changed, set FII_CHANGE_LOG...');
7216: END IF;
7217:
7218: MERGE INTO FII_CHANGE_LOG l1
7219: USING

Line 7218: MERGE INTO FII_CHANGE_LOG l1

7214: v2 =>
7215: 'Forecast time unit has changed, set FII_CHANGE_LOG...');
7216: END IF;
7217:
7218: MERGE INTO FII_CHANGE_LOG l1
7219: USING
7220: (SELECT 'TRUNCATE_FORECAST' log_item from DUAL) l2
7221: ON (l1.log_item = l2.log_item)
7222: WHEN MATCHED THEN UPDATE SET

Line 7243: v2 => 'FII_CHANGE_LOG');

7239: token_num => 2,
7240: t1 => 'NUM',
7241: v1 => TO_CHAR(NVL(SQL%ROWCOUNT, 0)),
7242: t2 => 'TABLE',
7243: v2 => 'FII_CHANGE_LOG');
7244:
7245: FII_MESSAGE.Write_Log
7246: (msg_name => 'FII_INV_FRC_TIM_UNIT',
7247: token_num => 0);

Line 7256: UPDATE FII_CHANGE_LOG

7252:
7253: IF (l_drop_fc_data = 'Y') THEN
7254: g_phase := 'Prior and current time unit setting are identical, reset truncation flag to N';
7255:
7256: UPDATE FII_CHANGE_LOG
7257: SET item_value = 'N',
7258: last_update_date = SYSDATE,
7259: last_updated_by = FIIBUUP_USER_ID,
7260: last_update_login = FIIBUUP_LOGIN_ID

Line 7270: v2 => 'FII_CHANGE_LOG');

7266: token_num => 2,
7267: t1 => 'NUM',
7268: v1 => TO_CHAR(NVL(SQL%ROWCOUNT, 0)),
7269: t2 => 'TABLE',
7270: v2 => 'FII_CHANGE_LOG');
7271: END IF;
7272:
7273: END IF;
7274: