[Home] [Help]
79: --------------------------------------------------------------------- */
80: PROCEDURE Set_History IS
81: CURSOR cCol IS SELECT forecast_column_id, column_number, days_from, days_to
82: FROM ce_forecast_columns
83: WHERE forecast_header_id = CE_CASH_FCST.G_rp_forecast_header_id;
84:
85: error_msg FND_NEW_MESSAGES.message_text%TYPE;
86:
87: min_col NUMBER;
92: days_to NUMBER;
93: history_date DATE;
94: history_period VARCHAR2(30);
95: BEGIN
96: cep_standard.debug('>>CE_CASH_FCST.Set_History');
97:
98: cep_standard.debug('G_roll_forward_type: ' || CE_CASH_FCST.G_roll_forward_type);
99: cep_standard.debug('G_roll_forward_period : ' || CE_CASH_FCST.G_roll_forward_period);
100: cep_standard.debug('G_start_period: ' || CE_CASH_FCST.G_rp_forecast_start_period);
94: history_period VARCHAR2(30);
95: BEGIN
96: cep_standard.debug('>>CE_CASH_FCST.Set_History');
97:
98: cep_standard.debug('G_roll_forward_type: ' || CE_CASH_FCST.G_roll_forward_type);
99: cep_standard.debug('G_roll_forward_period : ' || CE_CASH_FCST.G_roll_forward_period);
100: cep_standard.debug('G_start_period: ' || CE_CASH_FCST.G_rp_forecast_start_period);
101: cep_standard.debug('period_set_name: ' || CEFC_VIEW_CONST.get_period_set_name);
102:
95: BEGIN
96: cep_standard.debug('>>CE_CASH_FCST.Set_History');
97:
98: cep_standard.debug('G_roll_forward_type: ' || CE_CASH_FCST.G_roll_forward_type);
99: cep_standard.debug('G_roll_forward_period : ' || CE_CASH_FCST.G_roll_forward_period);
100: cep_standard.debug('G_start_period: ' || CE_CASH_FCST.G_rp_forecast_start_period);
101: cep_standard.debug('period_set_name: ' || CEFC_VIEW_CONST.get_period_set_name);
102:
103: IF (CE_CASH_FCST.G_roll_forward_type = 'D') THEN
96: cep_standard.debug('>>CE_CASH_FCST.Set_History');
97:
98: cep_standard.debug('G_roll_forward_type: ' || CE_CASH_FCST.G_roll_forward_type);
99: cep_standard.debug('G_roll_forward_period : ' || CE_CASH_FCST.G_roll_forward_period);
100: cep_standard.debug('G_start_period: ' || CE_CASH_FCST.G_rp_forecast_start_period);
101: cep_standard.debug('period_set_name: ' || CEFC_VIEW_CONST.get_period_set_name);
102:
103: IF (CE_CASH_FCST.G_roll_forward_type = 'D') THEN
104: CEFC_VIEW_CONST.set_start_date(CE_CASH_FCST.G_rp_forecast_start_date - CE_CASH_FCST.G_roll_forward_period);
99: cep_standard.debug('G_roll_forward_period : ' || CE_CASH_FCST.G_roll_forward_period);
100: cep_standard.debug('G_start_period: ' || CE_CASH_FCST.G_rp_forecast_start_period);
101: cep_standard.debug('period_set_name: ' || CEFC_VIEW_CONST.get_period_set_name);
102:
103: IF (CE_CASH_FCST.G_roll_forward_type = 'D') THEN
104: CEFC_VIEW_CONST.set_start_date(CE_CASH_FCST.G_rp_forecast_start_date - CE_CASH_FCST.G_roll_forward_period);
105: CEFC_VIEW_CONST.set_min_col(nvl(CE_CASH_FCST.G_min_col,0) + CE_CASH_FCST.G_roll_forward_period);
106: CEFC_VIEW_CONST.set_max_col(nvl(CE_CASH_FCST.G_max_col,0) + CE_CASH_FCST.G_roll_forward_period);
107:
100: cep_standard.debug('G_start_period: ' || CE_CASH_FCST.G_rp_forecast_start_period);
101: cep_standard.debug('period_set_name: ' || CEFC_VIEW_CONST.get_period_set_name);
102:
103: IF (CE_CASH_FCST.G_roll_forward_type = 'D') THEN
104: CEFC_VIEW_CONST.set_start_date(CE_CASH_FCST.G_rp_forecast_start_date - CE_CASH_FCST.G_roll_forward_period);
105: CEFC_VIEW_CONST.set_min_col(nvl(CE_CASH_FCST.G_min_col,0) + CE_CASH_FCST.G_roll_forward_period);
106: CEFC_VIEW_CONST.set_max_col(nvl(CE_CASH_FCST.G_max_col,0) + CE_CASH_FCST.G_roll_forward_period);
107:
108: ELSIF (CE_CASH_FCST.G_roll_forward_type = 'M') THEN
101: cep_standard.debug('period_set_name: ' || CEFC_VIEW_CONST.get_period_set_name);
102:
103: IF (CE_CASH_FCST.G_roll_forward_type = 'D') THEN
104: CEFC_VIEW_CONST.set_start_date(CE_CASH_FCST.G_rp_forecast_start_date - CE_CASH_FCST.G_roll_forward_period);
105: CEFC_VIEW_CONST.set_min_col(nvl(CE_CASH_FCST.G_min_col,0) + CE_CASH_FCST.G_roll_forward_period);
106: CEFC_VIEW_CONST.set_max_col(nvl(CE_CASH_FCST.G_max_col,0) + CE_CASH_FCST.G_roll_forward_period);
107:
108: ELSIF (CE_CASH_FCST.G_roll_forward_type = 'M') THEN
109: history_date:= ADD_MONTHS(CE_CASH_FCST.G_rp_forecast_start_date,- CE_CASH_FCST.G_roll_forward_period);
102:
103: IF (CE_CASH_FCST.G_roll_forward_type = 'D') THEN
104: CEFC_VIEW_CONST.set_start_date(CE_CASH_FCST.G_rp_forecast_start_date - CE_CASH_FCST.G_roll_forward_period);
105: CEFC_VIEW_CONST.set_min_col(nvl(CE_CASH_FCST.G_min_col,0) + CE_CASH_FCST.G_roll_forward_period);
106: CEFC_VIEW_CONST.set_max_col(nvl(CE_CASH_FCST.G_max_col,0) + CE_CASH_FCST.G_roll_forward_period);
107:
108: ELSIF (CE_CASH_FCST.G_roll_forward_type = 'M') THEN
109: history_date:= ADD_MONTHS(CE_CASH_FCST.G_rp_forecast_start_date,- CE_CASH_FCST.G_roll_forward_period);
110: CEFC_VIEW_CONST.set_start_date(history_date);
104: CEFC_VIEW_CONST.set_start_date(CE_CASH_FCST.G_rp_forecast_start_date - CE_CASH_FCST.G_roll_forward_period);
105: CEFC_VIEW_CONST.set_min_col(nvl(CE_CASH_FCST.G_min_col,0) + CE_CASH_FCST.G_roll_forward_period);
106: CEFC_VIEW_CONST.set_max_col(nvl(CE_CASH_FCST.G_max_col,0) + CE_CASH_FCST.G_roll_forward_period);
107:
108: ELSIF (CE_CASH_FCST.G_roll_forward_type = 'M') THEN
109: history_date:= ADD_MONTHS(CE_CASH_FCST.G_rp_forecast_start_date,- CE_CASH_FCST.G_roll_forward_period);
110: CEFC_VIEW_CONST.set_start_date(history_date);
111: CEFC_VIEW_CONST.set_min_col(nvl(CE_CASH_FCST.G_min_col,0) + CE_CASH_FCST.G_roll_forward_period*30);
112: CEFC_VIEW_CONST.set_max_col(nvl(CE_CASH_FCST.G_max_col,0) + CE_CASH_FCST.G_roll_forward_period*30);
105: CEFC_VIEW_CONST.set_min_col(nvl(CE_CASH_FCST.G_min_col,0) + CE_CASH_FCST.G_roll_forward_period);
106: CEFC_VIEW_CONST.set_max_col(nvl(CE_CASH_FCST.G_max_col,0) + CE_CASH_FCST.G_roll_forward_period);
107:
108: ELSIF (CE_CASH_FCST.G_roll_forward_type = 'M') THEN
109: history_date:= ADD_MONTHS(CE_CASH_FCST.G_rp_forecast_start_date,- CE_CASH_FCST.G_roll_forward_period);
110: CEFC_VIEW_CONST.set_start_date(history_date);
111: CEFC_VIEW_CONST.set_min_col(nvl(CE_CASH_FCST.G_min_col,0) + CE_CASH_FCST.G_roll_forward_period*30);
112: CEFC_VIEW_CONST.set_max_col(nvl(CE_CASH_FCST.G_max_col,0) + CE_CASH_FCST.G_roll_forward_period*30);
113:
107:
108: ELSIF (CE_CASH_FCST.G_roll_forward_type = 'M') THEN
109: history_date:= ADD_MONTHS(CE_CASH_FCST.G_rp_forecast_start_date,- CE_CASH_FCST.G_roll_forward_period);
110: CEFC_VIEW_CONST.set_start_date(history_date);
111: CEFC_VIEW_CONST.set_min_col(nvl(CE_CASH_FCST.G_min_col,0) + CE_CASH_FCST.G_roll_forward_period*30);
112: CEFC_VIEW_CONST.set_max_col(nvl(CE_CASH_FCST.G_max_col,0) + CE_CASH_FCST.G_roll_forward_period*30);
113:
114: ELSIF (CE_CASH_FCST.G_roll_forward_type = 'A') THEN
115: BEGIN
108: ELSIF (CE_CASH_FCST.G_roll_forward_type = 'M') THEN
109: history_date:= ADD_MONTHS(CE_CASH_FCST.G_rp_forecast_start_date,- CE_CASH_FCST.G_roll_forward_period);
110: CEFC_VIEW_CONST.set_start_date(history_date);
111: CEFC_VIEW_CONST.set_min_col(nvl(CE_CASH_FCST.G_min_col,0) + CE_CASH_FCST.G_roll_forward_period*30);
112: CEFC_VIEW_CONST.set_max_col(nvl(CE_CASH_FCST.G_max_col,0) + CE_CASH_FCST.G_roll_forward_period*30);
113:
114: ELSIF (CE_CASH_FCST.G_roll_forward_type = 'A') THEN
115: BEGIN
116: SELECT gps.period_name
110: CEFC_VIEW_CONST.set_start_date(history_date);
111: CEFC_VIEW_CONST.set_min_col(nvl(CE_CASH_FCST.G_min_col,0) + CE_CASH_FCST.G_roll_forward_period*30);
112: CEFC_VIEW_CONST.set_max_col(nvl(CE_CASH_FCST.G_max_col,0) + CE_CASH_FCST.G_roll_forward_period*30);
113:
114: ELSIF (CE_CASH_FCST.G_roll_forward_type = 'A') THEN
115: BEGIN
116: SELECT gps.period_name
117: INTO history_period
118: FROM gl_periods gps,
117: INTO history_period
118: FROM gl_periods gps,
119: gl_periods gp,
120: gl_period_types gpt
121: WHERE gps.period_num =DECODE(LEAST(gp.period_num-CE_CASH_FCST.G_roll_forward_period,1),
122: 1,gp.period_num - CE_CASH_FCST.G_roll_forward_period,
123: gpt.number_per_fiscal_year +
124: mod(gp.period_num-CE_CASH_FCST.G_roll_forward_period,gpt.number_per_fiscal_year))
125: AND gps.period_year = gp.period_year +
118: FROM gl_periods gps,
119: gl_periods gp,
120: gl_period_types gpt
121: WHERE gps.period_num =DECODE(LEAST(gp.period_num-CE_CASH_FCST.G_roll_forward_period,1),
122: 1,gp.period_num - CE_CASH_FCST.G_roll_forward_period,
123: gpt.number_per_fiscal_year +
124: mod(gp.period_num-CE_CASH_FCST.G_roll_forward_period,gpt.number_per_fiscal_year))
125: AND gps.period_year = gp.period_year +
126: DECODE(LEAST(gp.period_num-CE_CASH_FCST.G_roll_forward_period,1),1,0,
120: gl_period_types gpt
121: WHERE gps.period_num =DECODE(LEAST(gp.period_num-CE_CASH_FCST.G_roll_forward_period,1),
122: 1,gp.period_num - CE_CASH_FCST.G_roll_forward_period,
123: gpt.number_per_fiscal_year +
124: mod(gp.period_num-CE_CASH_FCST.G_roll_forward_period,gpt.number_per_fiscal_year))
125: AND gps.period_year = gp.period_year +
126: DECODE(LEAST(gp.period_num-CE_CASH_FCST.G_roll_forward_period,1),1,0,
127: DECODE(mod(gp.period_num-CE_CASH_FCST.G_roll_forward_period,gpt.number_per_fiscal_year),0,
128: FLOOR((gp.period_num -CE_CASH_FCST.G_roll_forward_period)/gpt.number_per_fiscal_year)-1,
122: 1,gp.period_num - CE_CASH_FCST.G_roll_forward_period,
123: gpt.number_per_fiscal_year +
124: mod(gp.period_num-CE_CASH_FCST.G_roll_forward_period,gpt.number_per_fiscal_year))
125: AND gps.period_year = gp.period_year +
126: DECODE(LEAST(gp.period_num-CE_CASH_FCST.G_roll_forward_period,1),1,0,
127: DECODE(mod(gp.period_num-CE_CASH_FCST.G_roll_forward_period,gpt.number_per_fiscal_year),0,
128: FLOOR((gp.period_num -CE_CASH_FCST.G_roll_forward_period)/gpt.number_per_fiscal_year)-1,
129: FLOOR((gp.period_num -CE_CASH_FCST.G_roll_forward_period)/gpt.number_per_fiscal_year)))
130: AND gp.period_set_name = gps.period_set_name
123: gpt.number_per_fiscal_year +
124: mod(gp.period_num-CE_CASH_FCST.G_roll_forward_period,gpt.number_per_fiscal_year))
125: AND gps.period_year = gp.period_year +
126: DECODE(LEAST(gp.period_num-CE_CASH_FCST.G_roll_forward_period,1),1,0,
127: DECODE(mod(gp.period_num-CE_CASH_FCST.G_roll_forward_period,gpt.number_per_fiscal_year),0,
128: FLOOR((gp.period_num -CE_CASH_FCST.G_roll_forward_period)/gpt.number_per_fiscal_year)-1,
129: FLOOR((gp.period_num -CE_CASH_FCST.G_roll_forward_period)/gpt.number_per_fiscal_year)))
130: AND gp.period_set_name = gps.period_set_name
131: AND gps.period_type = gp.period_type
124: mod(gp.period_num-CE_CASH_FCST.G_roll_forward_period,gpt.number_per_fiscal_year))
125: AND gps.period_year = gp.period_year +
126: DECODE(LEAST(gp.period_num-CE_CASH_FCST.G_roll_forward_period,1),1,0,
127: DECODE(mod(gp.period_num-CE_CASH_FCST.G_roll_forward_period,gpt.number_per_fiscal_year),0,
128: FLOOR((gp.period_num -CE_CASH_FCST.G_roll_forward_period)/gpt.number_per_fiscal_year)-1,
129: FLOOR((gp.period_num -CE_CASH_FCST.G_roll_forward_period)/gpt.number_per_fiscal_year)))
130: AND gp.period_set_name = gps.period_set_name
131: AND gps.period_type = gp.period_type
132: AND gpt.period_type = gp.period_type
125: AND gps.period_year = gp.period_year +
126: DECODE(LEAST(gp.period_num-CE_CASH_FCST.G_roll_forward_period,1),1,0,
127: DECODE(mod(gp.period_num-CE_CASH_FCST.G_roll_forward_period,gpt.number_per_fiscal_year),0,
128: FLOOR((gp.period_num -CE_CASH_FCST.G_roll_forward_period)/gpt.number_per_fiscal_year)-1,
129: FLOOR((gp.period_num -CE_CASH_FCST.G_roll_forward_period)/gpt.number_per_fiscal_year)))
130: AND gp.period_set_name = gps.period_set_name
131: AND gps.period_type = gp.period_type
132: AND gpt.period_type = gp.period_type
133: AND gp.period_name = CE_CASH_FCST.G_rp_forecast_start_period
129: FLOOR((gp.period_num -CE_CASH_FCST.G_roll_forward_period)/gpt.number_per_fiscal_year)))
130: AND gp.period_set_name = gps.period_set_name
131: AND gps.period_type = gp.period_type
132: AND gpt.period_type = gp.period_type
133: AND gp.period_name = CE_CASH_FCST.G_rp_forecast_start_period
134: AND gp.period_set_name = CEFC_VIEW_CONST.get_period_set_name;
135:
136: CEFC_VIEW_CONST.set_start_period_name(history_period);
137: CEFC_VIEW_CONST.set_min_col(nvl(CE_CASH_FCST.G_min_col,0) + CE_CASH_FCST.G_roll_forward_period);
133: AND gp.period_name = CE_CASH_FCST.G_rp_forecast_start_period
134: AND gp.period_set_name = CEFC_VIEW_CONST.get_period_set_name;
135:
136: CEFC_VIEW_CONST.set_start_period_name(history_period);
137: CEFC_VIEW_CONST.set_min_col(nvl(CE_CASH_FCST.G_min_col,0) + CE_CASH_FCST.G_roll_forward_period);
138: CEFC_VIEW_CONST.set_max_col(nvl(CE_CASH_FCST.G_max_col,0) + CE_CASH_FCST.G_roll_forward_period);
139: EXCEPTION
140: WHEN NO_DATA_FOUND THEN
141: cep_standard.debug('NO DATA FOUND FOR HISTORY PERIOD');
134: AND gp.period_set_name = CEFC_VIEW_CONST.get_period_set_name;
135:
136: CEFC_VIEW_CONST.set_start_period_name(history_period);
137: CEFC_VIEW_CONST.set_min_col(nvl(CE_CASH_FCST.G_min_col,0) + CE_CASH_FCST.G_roll_forward_period);
138: CEFC_VIEW_CONST.set_max_col(nvl(CE_CASH_FCST.G_max_col,0) + CE_CASH_FCST.G_roll_forward_period);
139: EXCEPTION
140: WHEN NO_DATA_FOUND THEN
141: cep_standard.debug('NO DATA FOUND FOR HISTORY PERIOD');
142: RAISE;
147: END IF;
148:
149: min_col := CEFC_VIEW_CONST.get_min_col;
150: max_col := CEFC_VIEW_CONST.get_max_col;
151: CE_CASH_FCST.G_invalid_overdue_row := FALSE;
152:
153: OPEN cCol;
154: FETCH cCol INTO cid, col_num, days_from, days_to;
155: LOOP
162:
163: FND_MESSAGE.set_name ('CE','CE_FC_COLUMN_NOT_IN_RANGE');
164: FND_MESSAGE.set_token('COLUMN', col_num);
165: error_msg := FND_MESSAGE.GET;
166: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id,CE_CASH_FCST.G_rp_forecast_header_id,
167: CE_CASH_FCST.G_forecast_row_id,'CE_FC_COLUMN_NOT_IN_RANGE', error_msg);
168: END IF;
169:
170: IF( col_num = 0 AND days_to < min_col ) THEN
163: FND_MESSAGE.set_name ('CE','CE_FC_COLUMN_NOT_IN_RANGE');
164: FND_MESSAGE.set_token('COLUMN', col_num);
165: error_msg := FND_MESSAGE.GET;
166: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id,CE_CASH_FCST.G_rp_forecast_header_id,
167: CE_CASH_FCST.G_forecast_row_id,'CE_FC_COLUMN_NOT_IN_RANGE', error_msg);
168: END IF;
169:
170: IF( col_num = 0 AND days_to < min_col ) THEN
171: CE_CASH_FCST.G_invalid_overdue_row := TRUE;
167: CE_CASH_FCST.G_forecast_row_id,'CE_FC_COLUMN_NOT_IN_RANGE', error_msg);
168: END IF;
169:
170: IF( col_num = 0 AND days_to < min_col ) THEN
171: CE_CASH_FCST.G_invalid_overdue_row := TRUE;
172: END IF;
173:
174: FETCH cCol INTO cid, col_num, days_from, days_to;
175: END LOOP;
173:
174: FETCH cCol INTO cid, col_num, days_from, days_to;
175: END LOOP;
176:
177: cep_standard.debug('<
179: WHEN OTHERS THEN
180: IF(cCol%ISOPEN)THEN CLOSE cCol; END IF;
181: RAISE;
214:
215: new_start_date := NULL;
216: new_end_date := NULL;
217:
218: IF(CE_CASH_FCST.G_transaction_calendar_id IS NOT NULL)THEN
219: IF(start_date <= G_calendar_start OR
220: start_date-1 > G_calendar_end) THEN
221: new_start_date := start_date;
222: ELSE
223: BEGIN
224: select max(transaction_date)+1
225: into new_start_date
226: from gl_transaction_dates
227: where transaction_calendar_id = CE_CASH_FCST.G_transaction_calendar_id
228: and transaction_date < start_date
229: and business_day_flag = 'Y';
230:
231: IF (new_start_date IS NULL) THEN
245: BEGIN
246: select max(transaction_date)
247: into new_end_date
248: from gl_transaction_dates
249: where transaction_calendar_id = CE_CASH_FCST.G_transaction_calendar_id
250: and transaction_date <= end_date
251: and business_day_flag = 'Y';
252:
253: IF (new_end_date IS NULL) THEN
269: new_end_date := to_date(to_char(new_end_date, 'DD-MM-RR') || ' 23:59:59', 'DD-MM-RR HH24:MI:SS');
270:
271: INSERT INTO CE_FORECAST_EXT_TEMP (context_value, forecast_request_id, start_date, end_date,
272: forecast_column_id, conversion_rate)
273: VALUES ('A', CE_CASH_FCST.G_forecast_id, new_start_date, new_end_date, fid, CE_CASH_FCST.G_forecast_row_id);
274:
275: FETCH C1 INTO fid, start_date, end_date;
276: END LOOP;
277: CLOSE C1;
287: PROCEDURE clear_aging_buckets IS
288: BEGIN
289: delete from ce_forecast_ext_temp
290: where context_value = 'A' and
291: forecast_request_id = CE_CASH_FCST.G_forecast_id and
292: conversion_rate = CE_CASH_FCST.G_forecast_row_id;
293: cep_standard.debug('<
295: WHEN OTHERS THEN
288: BEGIN
289: delete from ce_forecast_ext_temp
290: where context_value = 'A' and
291: forecast_request_id = CE_CASH_FCST.G_forecast_id and
292: conversion_rate = CE_CASH_FCST.G_forecast_row_id;
293: cep_standard.debug('<
295: WHEN OTHERS THEN
296: CEP_STANDARD.DEBUG('EXCEPTION:clear_aging_buckets');
318: clause_string VARCHAR2(200);
319: BEGIN
320: amount_string := 'nvl(src.amount,0)*';
321: trx_amount_string := 'src.amount';
322: IF (CE_CASH_FCST.G_trx_type IN ('API','APP','APX','OIO','PAY','POP',
323: 'POR','PAT','PAO','UDO')) THEN
324: amount_string := 'nvl(-src.amount,0)*';
325: trx_amount_string := '-src.amount';
326: END IF;
324: amount_string := 'nvl(-src.amount,0)*';
325: trx_amount_string := '-src.amount';
326: END IF;
327:
328: IF (CE_CASH_FCST.G_trx_type IN ('APP','ARR','PAY','XTI','XTO')) THEN
329: IF(CE_CASH_FCST.G_rp_exchange_type = 'User') THEN
330: clause_string := 'src.bank_account_id,
331: ccid.asset_code_combination_id,
332: round('||amount_string
325: trx_amount_string := '-src.amount';
326: END IF;
327:
328: IF (CE_CASH_FCST.G_trx_type IN ('APP','ARR','PAY','XTI','XTO')) THEN
329: IF(CE_CASH_FCST.G_rp_exchange_type = 'User') THEN
330: clause_string := 'src.bank_account_id,
331: ccid.asset_code_combination_id,
332: round('||amount_string
333: ||CE_CASH_FCST.G_rp_exchange_rate
329: IF(CE_CASH_FCST.G_rp_exchange_type = 'User') THEN
330: clause_string := 'src.bank_account_id,
331: ccid.asset_code_combination_id,
332: round('||amount_string
333: ||CE_CASH_FCST.G_rp_exchange_rate
334: ||','
335: ||CE_CASH_FCST.G_precision||')';
336: ELSE
337: clause_string := 'src.bank_account_id,
331: ccid.asset_code_combination_id,
332: round('||amount_string
333: ||CE_CASH_FCST.G_rp_exchange_rate
334: ||','
335: ||CE_CASH_FCST.G_precision||')';
336: ELSE
337: clause_string := 'src.bank_account_id,
338: ccid.asset_code_combination_id,
339: round('||amount_string||'curr.exchange_rate,'
336: ELSE
337: clause_string := 'src.bank_account_id,
338: ccid.asset_code_combination_id,
339: round('||amount_string||'curr.exchange_rate,'
340: ||CE_CASH_FCST.G_precision||')';
341: END IF;
342: ELSE
343: IF(CE_CASH_FCST.G_rp_exchange_type = 'User') THEN
344: clause_string := 'null,
339: round('||amount_string||'curr.exchange_rate,'
340: ||CE_CASH_FCST.G_precision||')';
341: END IF;
342: ELSE
343: IF(CE_CASH_FCST.G_rp_exchange_type = 'User') THEN
344: clause_string := 'null,
345: null,
346: round('||amount_string
347: ||CE_CASH_FCST.G_rp_exchange_rate
343: IF(CE_CASH_FCST.G_rp_exchange_type = 'User') THEN
344: clause_string := 'null,
345: null,
346: round('||amount_string
347: ||CE_CASH_FCST.G_rp_exchange_rate
348: ||','
349: ||CE_CASH_FCST.G_precision||')';
350: ELSE
351: clause_string := 'null,
345: null,
346: round('||amount_string
347: ||CE_CASH_FCST.G_rp_exchange_rate
348: ||','
349: ||CE_CASH_FCST.G_precision||')';
350: ELSE
351: clause_string := 'null,
352: null,
353: round('||amount_string||'curr.exchange_rate,'
350: ELSE
351: clause_string := 'null,
352: null,
353: round('||amount_string||'curr.exchange_rate,'
354: ||CE_CASH_FCST.G_precision||')';
355: END IF;
356: END IF;
357:
358: -- 5609517: Remove ORDERED hint as suggested by apps perf team
359: -- select_clause := '
360: -- SELECT /*+ ORDERED USE_MERGE(src)*/
361: select_clause := '
362: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
363: '||CE_CASH_FCST.G_forecast_id||',
364: '||CE_CASH_FCST.G_rp_forecast_header_id||',
365: '||CE_CASH_FCST.G_forecast_row_id||',
366: ''Y'',
367: nvl(fnd_global.user_id,-1),
360: -- SELECT /*+ ORDERED USE_MERGE(src)*/
361: select_clause := '
362: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
363: '||CE_CASH_FCST.G_forecast_id||',
364: '||CE_CASH_FCST.G_rp_forecast_header_id||',
365: '||CE_CASH_FCST.G_forecast_row_id||',
366: ''Y'',
367: nvl(fnd_global.user_id,-1),
368: sysdate,
361: select_clause := '
362: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
363: '||CE_CASH_FCST.G_forecast_id||',
364: '||CE_CASH_FCST.G_rp_forecast_header_id||',
365: '||CE_CASH_FCST.G_forecast_row_id||',
366: ''Y'',
367: nvl(fnd_global.user_id,-1),
368: sysdate,
369: nvl(fnd_global.user_id,-1),
373: src.reference_id,
374: src.currency_code,
375: to_number(hr_ou.ORGANIZATION_ID),
376: src.trx_date +'
377: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
378: '||clause_string||',
379: '||trx_amount_string;
380:
381: return select_clause;
401: from_clause := '
402: FROM '||view_name ||' src,
403: ce_forecast_ext_temp cab ';
404:
405: IF( CE_CASH_FCST.G_rp_exchange_type IS NULL OR
406: CE_CASH_FCST.G_rp_exchange_type <> 'User')THEN
407: from_clause := from_clause || ' ,
408: ce_currency_rates_temp curr ';
409: END IF;
402: FROM '||view_name ||' src,
403: ce_forecast_ext_temp cab ';
404:
405: IF( CE_CASH_FCST.G_rp_exchange_type IS NULL OR
406: CE_CASH_FCST.G_rp_exchange_type <> 'User')THEN
407: from_clause := from_clause || ' ,
408: ce_currency_rates_temp curr ';
409: END IF;
410:
407: from_clause := from_clause || ' ,
408: ce_currency_rates_temp curr ';
409: END IF;
410:
411: IF (CE_CASH_FCST.G_trx_type IN ('APP','ARR','PAY','XTI','XTO','XTR')) THEN
412: from_clause := from_clause || ' ,
413: ce_gl_accounts_ccid ccid, ce_bank_acct_uses_all bau, ce_bank_accounts ba';
414: END IF;
415:
412: from_clause := from_clause || ' ,
413: ce_gl_accounts_ccid ccid, ce_bank_acct_uses_all bau, ce_bank_accounts ba';
414: END IF;
415:
416: IF (CE_CASH_FCST.G_trx_type not in ('XTI','XTO','XTR')) THEN
417: from_clause := from_clause || ' ,
418: hr_organization_information o3'||',
419: hr_organization_information hr_ou';
420: END IF;
418: hr_organization_information o3'||',
419: hr_organization_information hr_ou';
420: END IF;
421:
422: IF(CE_CASH_FCST.G_rp_src_curr_type = 'F')THEN
423: IF(CE_CASH_FCST.G_app_short_name = 'AP')THEN
424: from_clause := from_clause || ' ,
425: ce_forecast_ap_orgs_v org ';
426: ELSIF(CE_CASH_FCST.G_app_short_name = 'AR')THEN
419: hr_organization_information hr_ou';
420: END IF;
421:
422: IF(CE_CASH_FCST.G_rp_src_curr_type = 'F')THEN
423: IF(CE_CASH_FCST.G_app_short_name = 'AP')THEN
424: from_clause := from_clause || ' ,
425: ce_forecast_ap_orgs_v org ';
426: ELSIF(CE_CASH_FCST.G_app_short_name = 'AR')THEN
427: from_clause := from_clause || ' ,
422: IF(CE_CASH_FCST.G_rp_src_curr_type = 'F')THEN
423: IF(CE_CASH_FCST.G_app_short_name = 'AP')THEN
424: from_clause := from_clause || ' ,
425: ce_forecast_ap_orgs_v org ';
426: ELSIF(CE_CASH_FCST.G_app_short_name = 'AR')THEN
427: from_clause := from_clause || ' ,
428: ce_forecast_ar_orgs_v org ';
429: ELSIF(CE_CASH_FCST.G_app_short_name = 'AS')THEN
430: from_clause := from_clause || ' ,
425: ce_forecast_ap_orgs_v org ';
426: ELSIF(CE_CASH_FCST.G_app_short_name = 'AR')THEN
427: from_clause := from_clause || ' ,
428: ce_forecast_ar_orgs_v org ';
429: ELSIF(CE_CASH_FCST.G_app_short_name = 'AS')THEN
430: from_clause := from_clause || ' ,
431: ce_forecast_as_orgs_v org ';
432: ELSIF(CE_CASH_FCST.G_app_short_name = 'PAY')THEN
433: from_clause := from_clause || ' ,
428: ce_forecast_ar_orgs_v org ';
429: ELSIF(CE_CASH_FCST.G_app_short_name = 'AS')THEN
430: from_clause := from_clause || ' ,
431: ce_forecast_as_orgs_v org ';
432: ELSIF(CE_CASH_FCST.G_app_short_name = 'PAY')THEN
433: from_clause := from_clause || ' ,
434: ce_forecast_pay_orgs_v org ';
435: ELSIF(CE_CASH_FCST.G_app_short_name = 'PO')THEN
436: from_clause := from_clause || ' ,
431: ce_forecast_as_orgs_v org ';
432: ELSIF(CE_CASH_FCST.G_app_short_name = 'PAY')THEN
433: from_clause := from_clause || ' ,
434: ce_forecast_pay_orgs_v org ';
435: ELSIF(CE_CASH_FCST.G_app_short_name = 'PO')THEN
436: from_clause := from_clause || ' ,
437: ce_forecast_po_orgs_v org ';
438: ELSIF(CE_CASH_FCST.G_app_short_name = 'OE')THEN
439: from_clause := from_clause || ' ,
434: ce_forecast_pay_orgs_v org ';
435: ELSIF(CE_CASH_FCST.G_app_short_name = 'PO')THEN
436: from_clause := from_clause || ' ,
437: ce_forecast_po_orgs_v org ';
438: ELSIF(CE_CASH_FCST.G_app_short_name = 'OE')THEN
439: from_clause := from_clause || ' ,
440: ce_forecast_oe_orgs_v org ';
441: ELSIF(CE_CASH_FCST.G_app_short_name = 'XTR')THEN
442: from_clause := from_clause || ' ,
437: ce_forecast_po_orgs_v org ';
438: ELSIF(CE_CASH_FCST.G_app_short_name = 'OE')THEN
439: from_clause := from_clause || ' ,
440: ce_forecast_oe_orgs_v org ';
441: ELSIF(CE_CASH_FCST.G_app_short_name = 'XTR')THEN
442: from_clause := from_clause || ' ,
443: gl_sets_of_books org ';
444: END IF;
445: END IF;
447: --
448: -- Special case for OE, need to join to ce_currency_rates_temp to figure out
449: -- the functional value of the transaction amount
450: --
451: IF(CE_CASH_FCST.G_rp_amount_threshold IS NOT NULL AND
452: CE_CASH_FCST.G_rp_src_curr_type = 'F' AND
453: CE_CASH_FCST.G_trx_type IN ('OEO','XTR'))THEN
454: from_clause := from_clause || ' ,
455: ce_currency_rates_temp curr2 ';
448: -- Special case for OE, need to join to ce_currency_rates_temp to figure out
449: -- the functional value of the transaction amount
450: --
451: IF(CE_CASH_FCST.G_rp_amount_threshold IS NOT NULL AND
452: CE_CASH_FCST.G_rp_src_curr_type = 'F' AND
453: CE_CASH_FCST.G_trx_type IN ('OEO','XTR'))THEN
454: from_clause := from_clause || ' ,
455: ce_currency_rates_temp curr2 ';
456: END IF;
449: -- the functional value of the transaction amount
450: --
451: IF(CE_CASH_FCST.G_rp_amount_threshold IS NOT NULL AND
452: CE_CASH_FCST.G_rp_src_curr_type = 'F' AND
453: CE_CASH_FCST.G_trx_type IN ('OEO','XTR'))THEN
454: from_clause := from_clause || ' ,
455: ce_currency_rates_temp curr2 ';
456: END IF;
457:
475: FUNCTION Add_Where(criteria VARCHAR2) RETURN VARCHAR2 IS
476: l_pay_group VARCHAR2(25);
477: BEGIN
478: IF(criteria = 'SRC_CURR_TYPE')THEN
479: IF(CE_CASH_FCST.G_rp_src_curr_type = 'E')THEN
480: return ('
481: AND src.currency_code = '''||CE_CASH_FCST.G_rp_src_currency||''' ');
482: ELSIF(CE_CASH_FCST.G_rp_src_curr_type = 'F')THEN
483: IF(CE_CASH_FCST.G_app_short_name = 'PA')THEN
477: BEGIN
478: IF(criteria = 'SRC_CURR_TYPE')THEN
479: IF(CE_CASH_FCST.G_rp_src_curr_type = 'E')THEN
480: return ('
481: AND src.currency_code = '''||CE_CASH_FCST.G_rp_src_currency||''' ');
482: ELSIF(CE_CASH_FCST.G_rp_src_curr_type = 'F')THEN
483: IF(CE_CASH_FCST.G_app_short_name = 'PA')THEN
484: return ('
485: AND src.functional_currency_code = '''||CE_CASH_FCST.G_rp_src_currency||''' ');
478: IF(criteria = 'SRC_CURR_TYPE')THEN
479: IF(CE_CASH_FCST.G_rp_src_curr_type = 'E')THEN
480: return ('
481: AND src.currency_code = '''||CE_CASH_FCST.G_rp_src_currency||''' ');
482: ELSIF(CE_CASH_FCST.G_rp_src_curr_type = 'F')THEN
483: IF(CE_CASH_FCST.G_app_short_name = 'PA')THEN
484: return ('
485: AND src.functional_currency_code = '''||CE_CASH_FCST.G_rp_src_currency||''' ');
486: ELSIF(CE_CASH_FCST.G_app_short_name = 'XTR')THEN
479: IF(CE_CASH_FCST.G_rp_src_curr_type = 'E')THEN
480: return ('
481: AND src.currency_code = '''||CE_CASH_FCST.G_rp_src_currency||''' ');
482: ELSIF(CE_CASH_FCST.G_rp_src_curr_type = 'F')THEN
483: IF(CE_CASH_FCST.G_app_short_name = 'PA')THEN
484: return ('
485: AND src.functional_currency_code = '''||CE_CASH_FCST.G_rp_src_currency||''' ');
486: ELSIF(CE_CASH_FCST.G_app_short_name = 'XTR')THEN
487: return ('
481: AND src.currency_code = '''||CE_CASH_FCST.G_rp_src_currency||''' ');
482: ELSIF(CE_CASH_FCST.G_rp_src_curr_type = 'F')THEN
483: IF(CE_CASH_FCST.G_app_short_name = 'PA')THEN
484: return ('
485: AND src.functional_currency_code = '''||CE_CASH_FCST.G_rp_src_currency||''' ');
486: ELSIF(CE_CASH_FCST.G_app_short_name = 'XTR')THEN
487: return ('
488: AND org.currency_code = '''||CE_CASH_FCST.G_rp_src_currency||'''
489: AND (org.set_of_books_id = src.set_of_books_id or org.set_of_books_id IS NULL) ');
482: ELSIF(CE_CASH_FCST.G_rp_src_curr_type = 'F')THEN
483: IF(CE_CASH_FCST.G_app_short_name = 'PA')THEN
484: return ('
485: AND src.functional_currency_code = '''||CE_CASH_FCST.G_rp_src_currency||''' ');
486: ELSIF(CE_CASH_FCST.G_app_short_name = 'XTR')THEN
487: return ('
488: AND org.currency_code = '''||CE_CASH_FCST.G_rp_src_currency||'''
489: AND (org.set_of_books_id = src.set_of_books_id or org.set_of_books_id IS NULL) ');
490: ELSE
484: return ('
485: AND src.functional_currency_code = '''||CE_CASH_FCST.G_rp_src_currency||''' ');
486: ELSIF(CE_CASH_FCST.G_app_short_name = 'XTR')THEN
487: return ('
488: AND org.currency_code = '''||CE_CASH_FCST.G_rp_src_currency||'''
489: AND (org.set_of_books_id = src.set_of_books_id or org.set_of_books_id IS NULL) ');
490: ELSE
491: return ('
492: AND org.currency_code = '''||CE_CASH_FCST.G_rp_src_currency||'''
488: AND org.currency_code = '''||CE_CASH_FCST.G_rp_src_currency||'''
489: AND (org.set_of_books_id = src.set_of_books_id or org.set_of_books_id IS NULL) ');
490: ELSE
491: return ('
492: AND org.currency_code = '''||CE_CASH_FCST.G_rp_src_currency||'''
493: AND (org.org_id = src.org_id or org.org_id IS NULL) ');
494: END IF;
495: END IF;
496:
494: END IF;
495: END IF;
496:
497: ELSIF(criteria = 'EXCHANGE_TYPE')THEN
498: IF(CE_CASH_FCST.G_rp_exchange_type IS NULL OR
499: CE_CASH_FCST.G_rp_exchange_type <> 'User')THEN
500: return ('
501: AND curr.forecast_request_id = cab.forecast_request_id
502: AND curr.to_currency = '''||CE_CASH_FCST.G_rp_forecast_currency||'''
495: END IF;
496:
497: ELSIF(criteria = 'EXCHANGE_TYPE')THEN
498: IF(CE_CASH_FCST.G_rp_exchange_type IS NULL OR
499: CE_CASH_FCST.G_rp_exchange_type <> 'User')THEN
500: return ('
501: AND curr.forecast_request_id = cab.forecast_request_id
502: AND curr.to_currency = '''||CE_CASH_FCST.G_rp_forecast_currency||'''
503: AND curr.currency_code = src.currency_code ');
498: IF(CE_CASH_FCST.G_rp_exchange_type IS NULL OR
499: CE_CASH_FCST.G_rp_exchange_type <> 'User')THEN
500: return ('
501: AND curr.forecast_request_id = cab.forecast_request_id
502: AND curr.to_currency = '''||CE_CASH_FCST.G_rp_forecast_currency||'''
503: AND curr.currency_code = src.currency_code ');
504: END IF;
505:
506: ELSIF(criteria = 'VENDOR_TYPE')THEN
503: AND curr.currency_code = src.currency_code ');
504: END IF;
505:
506: ELSIF(criteria = 'VENDOR_TYPE')THEN
507: IF(CE_CASH_FCST.G_vendor_type IS NOT NULL)THEN
508: return ('
509: AND src.vendor_type = '''||CE_CASH_FCST.G_vendor_type||''' ');
510: END IF;
511:
505:
506: ELSIF(criteria = 'VENDOR_TYPE')THEN
507: IF(CE_CASH_FCST.G_vendor_type IS NOT NULL)THEN
508: return ('
509: AND src.vendor_type = '''||CE_CASH_FCST.G_vendor_type||''' ');
510: END IF;
511:
512: ELSIF(criteria = 'PAY_GROUP')THEN
513: IF(CE_CASH_FCST.G_pay_group IS NOT NULL)THEN
509: AND src.vendor_type = '''||CE_CASH_FCST.G_vendor_type||''' ');
510: END IF;
511:
512: ELSIF(criteria = 'PAY_GROUP')THEN
513: IF(CE_CASH_FCST.G_pay_group IS NOT NULL)THEN
514: l_pay_group := replace(CE_CASH_FCST.G_pay_group, '''', '''''');
515: return ('
516: AND src.paygroup = '''||l_pay_group||''' ');
517: END IF;
510: END IF;
511:
512: ELSIF(criteria = 'PAY_GROUP')THEN
513: IF(CE_CASH_FCST.G_pay_group IS NOT NULL)THEN
514: l_pay_group := replace(CE_CASH_FCST.G_pay_group, '''', '''''');
515: return ('
516: AND src.paygroup = '''||l_pay_group||''' ');
517: END IF;
518:
516: AND src.paygroup = '''||l_pay_group||''' ');
517: END IF;
518:
519: ELSIF(criteria = 'PAYMENT_PRIORITY')THEN
520: IF(CE_CASH_FCST.G_payment_priority IS NOT NULL)THEN
521: return ('
522: AND src.payment_priority <= '||to_char(CE_CASH_FCST.G_payment_priority));
523: END IF;
524:
518:
519: ELSIF(criteria = 'PAYMENT_PRIORITY')THEN
520: IF(CE_CASH_FCST.G_payment_priority IS NOT NULL)THEN
521: return ('
522: AND src.payment_priority <= '||to_char(CE_CASH_FCST.G_payment_priority));
523: END IF;
524:
525: ELSIF(criteria = 'BANK_ACCOUNT_ID')THEN
526: IF(CE_CASH_FCST.G_bank_account_id IS NOT NULL)THEN
522: AND src.payment_priority <= '||to_char(CE_CASH_FCST.G_payment_priority));
523: END IF;
524:
525: ELSIF(criteria = 'BANK_ACCOUNT_ID')THEN
526: IF(CE_CASH_FCST.G_bank_account_id IS NOT NULL)THEN
527: return ('
528: AND src.bank_account_id = '||TO_CHAR(CE_CASH_FCST.G_bank_account_id));
529: END IF;
530:
524:
525: ELSIF(criteria = 'BANK_ACCOUNT_ID')THEN
526: IF(CE_CASH_FCST.G_bank_account_id IS NOT NULL)THEN
527: return ('
528: AND src.bank_account_id = '||TO_CHAR(CE_CASH_FCST.G_bank_account_id));
529: END IF;
530:
531: ELSIF(criteria = 'RECEIPT_METHOD_ID')THEN
532: IF(CE_CASH_FCST.G_receipt_method_id IS NOT NULL)THEN
528: AND src.bank_account_id = '||TO_CHAR(CE_CASH_FCST.G_bank_account_id));
529: END IF;
530:
531: ELSIF(criteria = 'RECEIPT_METHOD_ID')THEN
532: IF(CE_CASH_FCST.G_receipt_method_id IS NOT NULL)THEN
533: return ('
534: AND src.receipt_method_id = '||TO_CHAR(CE_CASH_FCST.G_receipt_method_id));
535: END IF;
536:
530:
531: ELSIF(criteria = 'RECEIPT_METHOD_ID')THEN
532: IF(CE_CASH_FCST.G_receipt_method_id IS NOT NULL)THEN
533: return ('
534: AND src.receipt_method_id = '||TO_CHAR(CE_CASH_FCST.G_receipt_method_id));
535: END IF;
536:
537: ELSIF(criteria = 'CUSTOMER_PROFILE_CLASS_ID')THEN
538: IF(CE_CASH_FCST.G_customer_profile_class_id IS NOT NULL)THEN
534: AND src.receipt_method_id = '||TO_CHAR(CE_CASH_FCST.G_receipt_method_id));
535: END IF;
536:
537: ELSIF(criteria = 'CUSTOMER_PROFILE_CLASS_ID')THEN
538: IF(CE_CASH_FCST.G_customer_profile_class_id IS NOT NULL)THEN
539: return ('
540: AND src.profile_class_id = '||to_char(CE_CASH_FCST.G_customer_profile_class_id));
541: END IF;
542:
536:
537: ELSIF(criteria = 'CUSTOMER_PROFILE_CLASS_ID')THEN
538: IF(CE_CASH_FCST.G_customer_profile_class_id IS NOT NULL)THEN
539: return ('
540: AND src.profile_class_id = '||to_char(CE_CASH_FCST.G_customer_profile_class_id));
541: END IF;
542:
543: ELSIF(criteria = 'AUTHORIZATION_STATUS')THEN
544: IF(CE_CASH_FCST.G_authorization_status IS NOT NULL)THEN
540: AND src.profile_class_id = '||to_char(CE_CASH_FCST.G_customer_profile_class_id));
541: END IF;
542:
543: ELSIF(criteria = 'AUTHORIZATION_STATUS')THEN
544: IF(CE_CASH_FCST.G_authorization_status IS NOT NULL)THEN
545: return ('
546: AND src.status = '''||CE_CASH_FCST.G_authorization_status ||''' ');
547: END IF;
548:
542:
543: ELSIF(criteria = 'AUTHORIZATION_STATUS')THEN
544: IF(CE_CASH_FCST.G_authorization_status IS NOT NULL)THEN
545: return ('
546: AND src.status = '''||CE_CASH_FCST.G_authorization_status ||''' ');
547: END IF;
548:
549: ELSIF(criteria = 'PAYMENT_METHOD')THEN
550: IF(CE_CASH_FCST.G_payment_method IS NOT NULL)THEN
546: AND src.status = '''||CE_CASH_FCST.G_authorization_status ||''' ');
547: END IF;
548:
549: ELSIF(criteria = 'PAYMENT_METHOD')THEN
550: IF(CE_CASH_FCST.G_payment_method IS NOT NULL)THEN
551: return ('
552: AND src.payment_method = '''||CE_CASH_FCST.G_payment_method||''' ');
553: END IF;
554:
548:
549: ELSIF(criteria = 'PAYMENT_METHOD')THEN
550: IF(CE_CASH_FCST.G_payment_method IS NOT NULL)THEN
551: return ('
552: AND src.payment_method = '''||CE_CASH_FCST.G_payment_method||''' ');
553: END IF;
554:
555: ELSIF(criteria = 'ORG_PAYMENT_METHOD_ID')THEN
556: IF(CE_CASH_FCST.G_org_payment_method_id IS NOT NULL)THEN
552: AND src.payment_method = '''||CE_CASH_FCST.G_payment_method||''' ');
553: END IF;
554:
555: ELSIF(criteria = 'ORG_PAYMENT_METHOD_ID')THEN
556: IF(CE_CASH_FCST.G_org_payment_method_id IS NOT NULL)THEN
557: return ('
558: AND src.org_payment_method_id = '||to_char(CE_CASH_FCST.G_org_payment_method_id));
559: END IF;
560:
554:
555: ELSIF(criteria = 'ORG_PAYMENT_METHOD_ID')THEN
556: IF(CE_CASH_FCST.G_org_payment_method_id IS NOT NULL)THEN
557: return ('
558: AND src.org_payment_method_id = '||to_char(CE_CASH_FCST.G_org_payment_method_id));
559: END IF;
560:
561: ELSIF(criteria = 'PAYROLL_ID')THEN
562: IF( CE_CASH_FCST.G_payroll_id IS NOT NULL )THEN
558: AND src.org_payment_method_id = '||to_char(CE_CASH_FCST.G_org_payment_method_id));
559: END IF;
560:
561: ELSIF(criteria = 'PAYROLL_ID')THEN
562: IF( CE_CASH_FCST.G_payroll_id IS NOT NULL )THEN
563: return ('
564: AND src.payroll_id = '||to_char(CE_CASH_FCST.G_payroll_id));
565: END IF;
566:
560:
561: ELSIF(criteria = 'PAYROLL_ID')THEN
562: IF( CE_CASH_FCST.G_payroll_id IS NOT NULL )THEN
563: return ('
564: AND src.payroll_id = '||to_char(CE_CASH_FCST.G_payroll_id));
565: END IF;
566:
567: ELSIF(criteria = 'CHANNEL_CODE')THEN
568: IF( CE_CASH_FCST.G_channel_code IS NOT NULL )THEN
564: AND src.payroll_id = '||to_char(CE_CASH_FCST.G_payroll_id));
565: END IF;
566:
567: ELSIF(criteria = 'CHANNEL_CODE')THEN
568: IF( CE_CASH_FCST.G_channel_code IS NOT NULL )THEN
569: return ('
570: AND src.channel_code = '''||CE_CASH_FCST.G_channel_code||''' ');
571: END IF;
572:
566:
567: ELSIF(criteria = 'CHANNEL_CODE')THEN
568: IF( CE_CASH_FCST.G_channel_code IS NOT NULL )THEN
569: return ('
570: AND src.channel_code = '''||CE_CASH_FCST.G_channel_code||''' ');
571: END IF;
572:
573: ELSIF(criteria = 'SALES_STAGE_ID')THEN
574: IF( CE_CASH_FCST.G_sales_stage_id IS NOT NULL )THEN
570: AND src.channel_code = '''||CE_CASH_FCST.G_channel_code||''' ');
571: END IF;
572:
573: ELSIF(criteria = 'SALES_STAGE_ID')THEN
574: IF( CE_CASH_FCST.G_sales_stage_id IS NOT NULL )THEN
575: return ('
576: AND src.sales_stage_id = '||to_char(CE_CASH_FCST.G_sales_stage_id));
577: END IF;
578:
572:
573: ELSIF(criteria = 'SALES_STAGE_ID')THEN
574: IF( CE_CASH_FCST.G_sales_stage_id IS NOT NULL )THEN
575: return ('
576: AND src.sales_stage_id = '||to_char(CE_CASH_FCST.G_sales_stage_id));
577: END IF;
578:
579: ELSIF(criteria = 'SALES_FORECAST_STATUS')THEN
580: IF( CE_CASH_FCST.G_sales_forecast_status IS NOT NULL )THEN
576: AND src.sales_stage_id = '||to_char(CE_CASH_FCST.G_sales_stage_id));
577: END IF;
578:
579: ELSIF(criteria = 'SALES_FORECAST_STATUS')THEN
580: IF( CE_CASH_FCST.G_sales_forecast_status IS NOT NULL )THEN
581: return ('
582: AND src.status_code = '''|| CE_CASH_FCST.G_sales_forecast_status ||''' ');
583: END IF;
584:
578:
579: ELSIF(criteria = 'SALES_FORECAST_STATUS')THEN
580: IF( CE_CASH_FCST.G_sales_forecast_status IS NOT NULL )THEN
581: return ('
582: AND src.status_code = '''|| CE_CASH_FCST.G_sales_forecast_status ||''' ');
583: END IF;
584:
585: ELSIF(criteria = 'PROJECT_ID')THEN
586: IF( CE_CASH_FCST.G_rp_project_id IS NOT NULL )THEN
582: AND src.status_code = '''|| CE_CASH_FCST.G_sales_forecast_status ||''' ');
583: END IF;
584:
585: ELSIF(criteria = 'PROJECT_ID')THEN
586: IF( CE_CASH_FCST.G_rp_project_id IS NOT NULL )THEN
587: return ('
588: AND src.project_id = '||to_char(CE_CASH_FCST.G_rp_project_id));
589: END IF;
590:
584:
585: ELSIF(criteria = 'PROJECT_ID')THEN
586: IF( CE_CASH_FCST.G_rp_project_id IS NOT NULL )THEN
587: return ('
588: AND src.project_id = '||to_char(CE_CASH_FCST.G_rp_project_id));
589: END IF;
590:
591: ELSIF(criteria = 'TYPE')THEN
592: IF( CE_CASH_FCST.G_type IS NOT NULL )THEN
588: AND src.project_id = '||to_char(CE_CASH_FCST.G_rp_project_id));
589: END IF;
590:
591: ELSIF(criteria = 'TYPE')THEN
592: IF( CE_CASH_FCST.G_type IS NOT NULL )THEN
593: return ('
594: AND src.type = '''|| CE_CASH_FCST.G_type ||''' ');
595: END IF;
596:
590:
591: ELSIF(criteria = 'TYPE')THEN
592: IF( CE_CASH_FCST.G_type IS NOT NULL )THEN
593: return ('
594: AND src.type = '''|| CE_CASH_FCST.G_type ||''' ');
595: END IF;
596:
597: ELSIF(criteria = 'BUDGET_TYPE')THEN
598: IF( CE_CASH_FCST.G_budget_type IS NOT NULL )THEN
594: AND src.type = '''|| CE_CASH_FCST.G_type ||''' ');
595: END IF;
596:
597: ELSIF(criteria = 'BUDGET_TYPE')THEN
598: IF( CE_CASH_FCST.G_budget_type IS NOT NULL )THEN
599: return ('
600: AND src.budget_type = '''|| CE_CASH_FCST.G_budget_type ||''' ');
601: END IF;
602:
596:
597: ELSIF(criteria = 'BUDGET_TYPE')THEN
598: IF( CE_CASH_FCST.G_budget_type IS NOT NULL )THEN
599: return ('
600: AND src.budget_type = '''|| CE_CASH_FCST.G_budget_type ||''' ');
601: END IF;
602:
603: ELSIF(criteria = 'BUDGET_VERSION')THEN
604: IF( CE_CASH_FCST.G_budget_version IS NOT NULL )THEN
600: AND src.budget_type = '''|| CE_CASH_FCST.G_budget_type ||''' ');
601: END IF;
602:
603: ELSIF(criteria = 'BUDGET_VERSION')THEN
604: IF( CE_CASH_FCST.G_budget_version IS NOT NULL )THEN
605: return ('
606: AND src.version = '''|| CE_CASH_FCST.G_budget_version ||''' ');
607: END IF;
608:
602:
603: ELSIF(criteria = 'BUDGET_VERSION')THEN
604: IF( CE_CASH_FCST.G_budget_version IS NOT NULL )THEN
605: return ('
606: AND src.version = '''|| CE_CASH_FCST.G_budget_version ||''' ');
607: END IF;
608:
609: ELSIF(criteria = 'INCLUDE_HOLD_FLAG')THEN
610: IF( CE_CASH_FCST.G_include_hold_flag <> 'Y' ) THEN
606: AND src.version = '''|| CE_CASH_FCST.G_budget_version ||''' ');
607: END IF;
608:
609: ELSIF(criteria = 'INCLUDE_HOLD_FLAG')THEN
610: IF( CE_CASH_FCST.G_include_hold_flag <> 'Y' ) THEN
611: return ('
612: AND src.on_hold = '''||CE_CASH_FCST.G_include_hold_flag ||''' ');
613: END IF;
614: ELSIF(criteria = 'EXCLUDE_INDIC_EXP')THEN
608:
609: ELSIF(criteria = 'INCLUDE_HOLD_FLAG')THEN
610: IF( CE_CASH_FCST.G_include_hold_flag <> 'Y' ) THEN
611: return ('
612: AND src.on_hold = '''||CE_CASH_FCST.G_include_hold_flag ||''' ');
613: END IF;
614: ELSIF(criteria = 'EXCLUDE_INDIC_EXP')THEN
615: IF( CE_CASH_FCST.G_exclude_indic_exp = 'Y' )THEN
616: return ('
611: return ('
612: AND src.on_hold = '''||CE_CASH_FCST.G_include_hold_flag ||''' ');
613: END IF;
614: ELSIF(criteria = 'EXCLUDE_INDIC_EXP')THEN
615: IF( CE_CASH_FCST.G_exclude_indic_exp = 'Y' )THEN
616: return ('
617: AND src.dda_deal_subtype <> ''INDIC'' ');
618: END IF;
619:
617: AND src.dda_deal_subtype <> ''INDIC'' ');
618: END IF;
619:
620: ELSIF(criteria = 'XTR_BANK_ACCOUNT')THEN
621: IF( CE_CASH_FCST.G_xtr_bank_account IS NOT NULL )THEN
622: return ('
623: AND src.company_account = '''|| CE_CASH_FCST.G_xtr_bank_account ||''' ');
624: END IF;
625:
619:
620: ELSIF(criteria = 'XTR_BANK_ACCOUNT')THEN
621: IF( CE_CASH_FCST.G_xtr_bank_account IS NOT NULL )THEN
622: return ('
623: AND src.company_account = '''|| CE_CASH_FCST.G_xtr_bank_account ||''' ');
624: END IF;
625:
626: ELSIF(criteria = 'XTR_TYPE')THEN
627: IF( CE_CASH_FCST.G_type IS NOT NULL )THEN
623: AND src.company_account = '''|| CE_CASH_FCST.G_xtr_bank_account ||''' ');
624: END IF;
625:
626: ELSIF(criteria = 'XTR_TYPE')THEN
627: IF( CE_CASH_FCST.G_type IS NOT NULL )THEN
628: return ('
629: AND src.category = '''|| CE_CASH_FCST.G_type ||''' ');
630: END IF;
631:
625:
626: ELSIF(criteria = 'XTR_TYPE')THEN
627: IF( CE_CASH_FCST.G_type IS NOT NULL )THEN
628: return ('
629: AND src.category = '''|| CE_CASH_FCST.G_type ||''' ');
630: END IF;
631:
632: ELSIF(criteria = 'ORDER_TYPE_ID')THEN
633: IF(CE_CASH_FCST.G_order_type_id IS NOT NULL)THEN
629: AND src.category = '''|| CE_CASH_FCST.G_type ||''' ');
630: END IF;
631:
632: ELSIF(criteria = 'ORDER_TYPE_ID')THEN
633: IF(CE_CASH_FCST.G_order_type_id IS NOT NULL)THEN
634: return ('
635: AND src.order_type_id = '||to_char(CE_CASH_FCST.G_order_type_id));
636: END IF;
637:
631:
632: ELSIF(criteria = 'ORDER_TYPE_ID')THEN
633: IF(CE_CASH_FCST.G_order_type_id IS NOT NULL)THEN
634: return ('
635: AND src.order_type_id = '||to_char(CE_CASH_FCST.G_order_type_id));
636: END IF;
637:
638: ELSE
639: cep_standard.debug('ERROR - Add_Where got invalid criteria!');
659: FUNCTION Get_Where_Clause RETURN VARCHAR2 IS
660: where_clause VARCHAR2(1500);
661:
662: BEGIN
663: cep_standard.debug('>>CE_CASH_FCST.Get_Where_Clause');
664:
665: where_clause := '
666: WHERE cab.context_value = ''A''
667: AND cab.forecast_request_id = '||to_char(CE_CASH_FCST.G_forecast_id) ||'
663: cep_standard.debug('>>CE_CASH_FCST.Get_Where_Clause');
664:
665: where_clause := '
666: WHERE cab.context_value = ''A''
667: AND cab.forecast_request_id = '||to_char(CE_CASH_FCST.G_forecast_id) ||'
668: AND cab.conversion_rate = '||to_char(CE_CASH_FCST.G_forecast_row_id) ||
669: Add_Where('EXCHANGE_TYPE') || Add_Where('SRC_CURR_TYPE');
670:
671: IF (CE_CASH_FCST.G_trx_type IN ('APP','ARR','PAY','XTI','XTO')) THEN
664:
665: where_clause := '
666: WHERE cab.context_value = ''A''
667: AND cab.forecast_request_id = '||to_char(CE_CASH_FCST.G_forecast_id) ||'
668: AND cab.conversion_rate = '||to_char(CE_CASH_FCST.G_forecast_row_id) ||
669: Add_Where('EXCHANGE_TYPE') || Add_Where('SRC_CURR_TYPE');
670:
671: IF (CE_CASH_FCST.G_trx_type IN ('APP','ARR','PAY','XTI','XTO')) THEN
672: --bug5702686, Added line 'AND bau.org_id = src.org_id'
667: AND cab.forecast_request_id = '||to_char(CE_CASH_FCST.G_forecast_id) ||'
668: AND cab.conversion_rate = '||to_char(CE_CASH_FCST.G_forecast_row_id) ||
669: Add_Where('EXCHANGE_TYPE') || Add_Where('SRC_CURR_TYPE');
670:
671: IF (CE_CASH_FCST.G_trx_type IN ('APP','ARR','PAY','XTI','XTO')) THEN
672: --bug5702686, Added line 'AND bau.org_id = src.org_id'
673: where_clause := where_clause ||'
674: AND ba.bank_account_id(+) = src.bank_account_id
675: AND bau.bank_account_id(+) = ba.bank_account_id
676: AND (bau.org_id = src.org_id or bau.LEGAL_ENTITY_ID = src.org_id)'||'
677: AND ccid.bank_acct_use_id(+) = bau.bank_acct_use_id';
678: -- for bug 6343915 modified line ' AND (bau.org_id = src.org_id or bau.LEGAL_ENTITY_ID = src.org_id)'
679: --bug5358376
680: IF (CE_CASH_FCST.G_trx_type = 'APP') THEN
681: where_clause := where_clause ||'
682: AND bau.ap_use_enable_flag = ''Y''';
683: ELSIF (CE_CASH_FCST.G_trx_type = 'ARR') THEN
684: where_clause := where_clause ||'
679: --bug5358376
680: IF (CE_CASH_FCST.G_trx_type = 'APP') THEN
681: where_clause := where_clause ||'
682: AND bau.ap_use_enable_flag = ''Y''';
683: ELSIF (CE_CASH_FCST.G_trx_type = 'ARR') THEN
684: where_clause := where_clause ||'
685: AND bau.ar_use_enable_flag = ''Y''';
686: ELSIF (CE_CASH_FCST.G_trx_type = 'PAY') THEN
687: where_clause := where_clause ||'
682: AND bau.ap_use_enable_flag = ''Y''';
683: ELSIF (CE_CASH_FCST.G_trx_type = 'ARR') THEN
684: where_clause := where_clause ||'
685: AND bau.ar_use_enable_flag = ''Y''';
686: ELSIF (CE_CASH_FCST.G_trx_type = 'PAY') THEN
687: where_clause := where_clause ||'
688: AND bau.pay_use_enable_flag = ''Y''';
689: ELSE
690: where_clause := where_clause ||'
692: END IF;
693: --bug5358376
694: END IF;
695:
696: IF (CE_CASH_FCST.G_trx_type not in ('XTI','XTO','XTR')) THEN
697: IF (CE_CASH_FCST.G_org_id <> -1 AND CE_CASH_FCST.G_org_id <> -99) THEN
698: where_clause := where_clause ||'
699: AND (hr_ou.organization_id = src.org_id)'||'
700: AND hr_ou.ORG_INFORMATION_CONTEXT||'''' = ''CLASS'''||'
693: --bug5358376
694: END IF;
695:
696: IF (CE_CASH_FCST.G_trx_type not in ('XTI','XTO','XTR')) THEN
697: IF (CE_CASH_FCST.G_org_id <> -1 AND CE_CASH_FCST.G_org_id <> -99) THEN
698: where_clause := where_clause ||'
699: AND (hr_ou.organization_id = src.org_id)'||'
700: AND hr_ou.ORG_INFORMATION_CONTEXT||'''' = ''CLASS'''||'
701: AND hr_ou.ORG_INFORMATION1 = ''OPERATING_UNIT'''||'
712: AND hr_ou.ORG_INFORMATION2 = ''Y''';
713: END IF;
714: END IF;
715:
716: IF( CE_CASH_FCST.G_app_short_name = 'XTR' ) THEN
717: IF( CE_CASH_FCST.G_company_code IS NOT NULL )THEN
718: where_clause := where_clause ||'
719: AND (src.company_code = '''|| CE_CASH_FCST.G_company_code ||''') ';
720: ELSIF( CE_CASH_FCST.G_set_of_books_id IS NOT NULL AND
713: END IF;
714: END IF;
715:
716: IF( CE_CASH_FCST.G_app_short_name = 'XTR' ) THEN
717: IF( CE_CASH_FCST.G_company_code IS NOT NULL )THEN
718: where_clause := where_clause ||'
719: AND (src.company_code = '''|| CE_CASH_FCST.G_company_code ||''') ';
720: ELSIF( CE_CASH_FCST.G_set_of_books_id IS NOT NULL AND
721: CE_CASH_FCST.G_set_of_books_id <> -1) THEN
715:
716: IF( CE_CASH_FCST.G_app_short_name = 'XTR' ) THEN
717: IF( CE_CASH_FCST.G_company_code IS NOT NULL )THEN
718: where_clause := where_clause ||'
719: AND (src.company_code = '''|| CE_CASH_FCST.G_company_code ||''') ';
720: ELSIF( CE_CASH_FCST.G_set_of_books_id IS NOT NULL AND
721: CE_CASH_FCST.G_set_of_books_id <> -1) THEN
722: where_clause := where_clause ||'
723: AND (src.set_of_books_id IN (SELECT DISTINCT(set_of_books_id)
716: IF( CE_CASH_FCST.G_app_short_name = 'XTR' ) THEN
717: IF( CE_CASH_FCST.G_company_code IS NOT NULL )THEN
718: where_clause := where_clause ||'
719: AND (src.company_code = '''|| CE_CASH_FCST.G_company_code ||''') ';
720: ELSIF( CE_CASH_FCST.G_set_of_books_id IS NOT NULL AND
721: CE_CASH_FCST.G_set_of_books_id <> -1) THEN
722: where_clause := where_clause ||'
723: AND (src.set_of_books_id IN (SELECT DISTINCT(set_of_books_id)
724: FROM GL_SETS_OF_BOOKS
717: IF( CE_CASH_FCST.G_company_code IS NOT NULL )THEN
718: where_clause := where_clause ||'
719: AND (src.company_code = '''|| CE_CASH_FCST.G_company_code ||''') ';
720: ELSIF( CE_CASH_FCST.G_set_of_books_id IS NOT NULL AND
721: CE_CASH_FCST.G_set_of_books_id <> -1) THEN
722: where_clause := where_clause ||'
723: AND (src.set_of_books_id IN (SELECT DISTINCT(set_of_books_id)
724: FROM GL_SETS_OF_BOOKS
725: WHERE set_of_books_id = '||to_char(CE_CASH_FCST.G_set_of_books_id)||' )) ';
721: CE_CASH_FCST.G_set_of_books_id <> -1) THEN
722: where_clause := where_clause ||'
723: AND (src.set_of_books_id IN (SELECT DISTINCT(set_of_books_id)
724: FROM GL_SETS_OF_BOOKS
725: WHERE set_of_books_id = '||to_char(CE_CASH_FCST.G_set_of_books_id)||' )) ';
726: END IF;
727: ELSE
728: IF( CE_CASH_FCST.G_org_id <> -1 AND CE_CASH_FCST.G_org_id <> -99 )THEN
729: where_clause := where_clause ||'
724: FROM GL_SETS_OF_BOOKS
725: WHERE set_of_books_id = '||to_char(CE_CASH_FCST.G_set_of_books_id)||' )) ';
726: END IF;
727: ELSE
728: IF( CE_CASH_FCST.G_org_id <> -1 AND CE_CASH_FCST.G_org_id <> -99 )THEN
729: where_clause := where_clause ||'
730: AND (src.org_id = '||to_char( CE_CASH_FCST.G_org_id)||' OR src.org_id IS NULL) ';
731: ELSIF ( CE_CASH_FCST.G_set_of_books_id IS NOT NULL AND
732: CE_CASH_FCST.G_set_of_books_id <> -1) THEN
726: END IF;
727: ELSE
728: IF( CE_CASH_FCST.G_org_id <> -1 AND CE_CASH_FCST.G_org_id <> -99 )THEN
729: where_clause := where_clause ||'
730: AND (src.org_id = '||to_char( CE_CASH_FCST.G_org_id)||' OR src.org_id IS NULL) ';
731: ELSIF ( CE_CASH_FCST.G_set_of_books_id IS NOT NULL AND
732: CE_CASH_FCST.G_set_of_books_id <> -1) THEN
733: where_clause := where_clause ||'
734: AND (src.org_id IS NULL OR src.org_id IN (SELECT DISTINCT(org_id)
727: ELSE
728: IF( CE_CASH_FCST.G_org_id <> -1 AND CE_CASH_FCST.G_org_id <> -99 )THEN
729: where_clause := where_clause ||'
730: AND (src.org_id = '||to_char( CE_CASH_FCST.G_org_id)||' OR src.org_id IS NULL) ';
731: ELSIF ( CE_CASH_FCST.G_set_of_books_id IS NOT NULL AND
732: CE_CASH_FCST.G_set_of_books_id <> -1) THEN
733: where_clause := where_clause ||'
734: AND (src.org_id IS NULL OR src.org_id IN (SELECT DISTINCT(org_id)
735: FROM CE_FORECAST_ORGS_V
728: IF( CE_CASH_FCST.G_org_id <> -1 AND CE_CASH_FCST.G_org_id <> -99 )THEN
729: where_clause := where_clause ||'
730: AND (src.org_id = '||to_char( CE_CASH_FCST.G_org_id)||' OR src.org_id IS NULL) ';
731: ELSIF ( CE_CASH_FCST.G_set_of_books_id IS NOT NULL AND
732: CE_CASH_FCST.G_set_of_books_id <> -1) THEN
733: where_clause := where_clause ||'
734: AND (src.org_id IS NULL OR src.org_id IN (SELECT DISTINCT(org_id)
735: FROM CE_FORECAST_ORGS_V
736: WHERE set_of_books_id = '||to_char(CE_CASH_FCST.G_set_of_books_id)||' )) ';
732: CE_CASH_FCST.G_set_of_books_id <> -1) THEN
733: where_clause := where_clause ||'
734: AND (src.org_id IS NULL OR src.org_id IN (SELECT DISTINCT(org_id)
735: FROM CE_FORECAST_ORGS_V
736: WHERE set_of_books_id = '||to_char(CE_CASH_FCST.G_set_of_books_id)||' )) ';
737: END IF;
738: END IF;
739:
740: IF(CE_CASH_FCST.G_rp_amount_threshold IS NOT NULL) THEN
736: WHERE set_of_books_id = '||to_char(CE_CASH_FCST.G_set_of_books_id)||' )) ';
737: END IF;
738: END IF;
739:
740: IF(CE_CASH_FCST.G_rp_amount_threshold IS NOT NULL) THEN
741: IF(CE_CASH_FCST.G_rp_src_curr_type = 'E')THEN
742: where_clause := where_clause || '
743: AND abs(nvl(src.amount,0)) > ' ||to_char(fnd_number.number_to_canonical(CE_CASH_FCST.G_rp_amount_threshold));
744: ELSIF(CE_CASH_FCST.G_rp_src_curr_type = 'F')THEN
737: END IF;
738: END IF;
739:
740: IF(CE_CASH_FCST.G_rp_amount_threshold IS NOT NULL) THEN
741: IF(CE_CASH_FCST.G_rp_src_curr_type = 'E')THEN
742: where_clause := where_clause || '
743: AND abs(nvl(src.amount,0)) > ' ||to_char(fnd_number.number_to_canonical(CE_CASH_FCST.G_rp_amount_threshold));
744: ELSIF(CE_CASH_FCST.G_rp_src_curr_type = 'F')THEN
745: --
739:
740: IF(CE_CASH_FCST.G_rp_amount_threshold IS NOT NULL) THEN
741: IF(CE_CASH_FCST.G_rp_src_curr_type = 'E')THEN
742: where_clause := where_clause || '
743: AND abs(nvl(src.amount,0)) > ' ||to_char(fnd_number.number_to_canonical(CE_CASH_FCST.G_rp_amount_threshold));
744: ELSIF(CE_CASH_FCST.G_rp_src_curr_type = 'F')THEN
745: --
746: -- Special case for OE, need to join to ce_currency_rates_temp to figure out
747: -- the functional value of the transaction amount
740: IF(CE_CASH_FCST.G_rp_amount_threshold IS NOT NULL) THEN
741: IF(CE_CASH_FCST.G_rp_src_curr_type = 'E')THEN
742: where_clause := where_clause || '
743: AND abs(nvl(src.amount,0)) > ' ||to_char(fnd_number.number_to_canonical(CE_CASH_FCST.G_rp_amount_threshold));
744: ELSIF(CE_CASH_FCST.G_rp_src_curr_type = 'F')THEN
745: --
746: -- Special case for OE, need to join to ce_currency_rates_temp to figure out
747: -- the functional value of the transaction amount
748: --
746: -- Special case for OE, need to join to ce_currency_rates_temp to figure out
747: -- the functional value of the transaction amount
748: --
749: -- bug4345353 added the function fnd_number.number_to_canonical
750: IF(CE_CASH_FCST.G_trx_type <> 'OEO')THEN
751: IF(CE_CASH_FCST.G_trx_type = 'XTR')THEN
752: where_clause := where_clause || '
753: AND abs(nvl(src.amount,0)*curr2.exchange_rate) > ' ||to_char(fnd_number.number_to_canonical(CE_CASH_FCST.G_rp_amount_threshold)) ||'
754: AND curr2.currency_code = src.currency_code
747: -- the functional value of the transaction amount
748: --
749: -- bug4345353 added the function fnd_number.number_to_canonical
750: IF(CE_CASH_FCST.G_trx_type <> 'OEO')THEN
751: IF(CE_CASH_FCST.G_trx_type = 'XTR')THEN
752: where_clause := where_clause || '
753: AND abs(nvl(src.amount,0)*curr2.exchange_rate) > ' ||to_char(fnd_number.number_to_canonical(CE_CASH_FCST.G_rp_amount_threshold)) ||'
754: AND curr2.currency_code = src.currency_code
755: AND curr2.to_currency = org.currency_code
749: -- bug4345353 added the function fnd_number.number_to_canonical
750: IF(CE_CASH_FCST.G_trx_type <> 'OEO')THEN
751: IF(CE_CASH_FCST.G_trx_type = 'XTR')THEN
752: where_clause := where_clause || '
753: AND abs(nvl(src.amount,0)*curr2.exchange_rate) > ' ||to_char(fnd_number.number_to_canonical(CE_CASH_FCST.G_rp_amount_threshold)) ||'
754: AND curr2.currency_code = src.currency_code
755: AND curr2.to_currency = org.currency_code
756: AND org.set_of_books_id = src.set_of_books_id
757: AND curr2.forecast_request_id = '||to_char(CE_CASH_FCST.G_forecast_id);
753: AND abs(nvl(src.amount,0)*curr2.exchange_rate) > ' ||to_char(fnd_number.number_to_canonical(CE_CASH_FCST.G_rp_amount_threshold)) ||'
754: AND curr2.currency_code = src.currency_code
755: AND curr2.to_currency = org.currency_code
756: AND org.set_of_books_id = src.set_of_books_id
757: AND curr2.forecast_request_id = '||to_char(CE_CASH_FCST.G_forecast_id);
758: ELSE
759: -- bug4345353 added the function fnd_number.number_to_canonical
760: where_clause := where_clause || '
761: AND abs(src.base_amount) > ' ||to_char(fnd_number.number_to_canonical(CE_CASH_FCST.G_rp_amount_threshold));
757: AND curr2.forecast_request_id = '||to_char(CE_CASH_FCST.G_forecast_id);
758: ELSE
759: -- bug4345353 added the function fnd_number.number_to_canonical
760: where_clause := where_clause || '
761: AND abs(src.base_amount) > ' ||to_char(fnd_number.number_to_canonical(CE_CASH_FCST.G_rp_amount_threshold));
762: END IF;
763: ELSE
764: -- bug4345353 added the function fnd_number.number_to_canonical
765: where_clause := where_clause || '
762: END IF;
763: ELSE
764: -- bug4345353 added the function fnd_number.number_to_canonical
765: where_clause := where_clause || '
766: AND abs(nvl(src.amount,0)*curr2.exchange_rate) > ' ||to_char(fnd_number.number_to_canonical(CE_CASH_FCST.G_rp_amount_threshold)) ||'
767: AND curr2.currency_code = src.currency_code
768: AND curr2.to_currency = org.currency_code
769: AND org.org_id = src.org_id
770: AND curr2.forecast_request_id = '||to_char(CE_CASH_FCST.G_forecast_id);
766: AND abs(nvl(src.amount,0)*curr2.exchange_rate) > ' ||to_char(fnd_number.number_to_canonical(CE_CASH_FCST.G_rp_amount_threshold)) ||'
767: AND curr2.currency_code = src.currency_code
768: AND curr2.to_currency = org.currency_code
769: AND org.org_id = src.org_id
770: AND curr2.forecast_request_id = '||to_char(CE_CASH_FCST.G_forecast_id);
771: END IF;
772: END IF;
773: END IF;
774:
771: END IF;
772: END IF;
773: END IF;
774:
775: cep_standard.debug('<
777: END Get_Where_Clause;
778:
779: /* ---------------------------------------------------------------------
813:
814: CE_FORECAST_TRX_CELLS_PKG.insert_row(
815: X_rowid =>forecast_rowid,
816: X_FORECAST_CELL_ID =>forecast_cell_id,
817: X_FORECAST_ID =>CE_CASH_FCST.G_forecast_id,
818: X_FORECAST_HEADER_ID =>CE_CASH_FCST.G_rp_forecast_header_id,
819: X_FORECAST_ROW_ID =>CE_CASH_FCST.G_forecast_row_id,
820: X_FORECAST_COLUMN_ID =>p_forecast_column_id,
821: X_AMOUNT =>round(NVL(p_forecast_amount,0), CE_CASH_FCST.G_precision),
814: CE_FORECAST_TRX_CELLS_PKG.insert_row(
815: X_rowid =>forecast_rowid,
816: X_FORECAST_CELL_ID =>forecast_cell_id,
817: X_FORECAST_ID =>CE_CASH_FCST.G_forecast_id,
818: X_FORECAST_HEADER_ID =>CE_CASH_FCST.G_rp_forecast_header_id,
819: X_FORECAST_ROW_ID =>CE_CASH_FCST.G_forecast_row_id,
820: X_FORECAST_COLUMN_ID =>p_forecast_column_id,
821: X_AMOUNT =>round(NVL(p_forecast_amount,0), CE_CASH_FCST.G_precision),
822: X_TRX_AMOUNT =>p_trx_amount,
815: X_rowid =>forecast_rowid,
816: X_FORECAST_CELL_ID =>forecast_cell_id,
817: X_FORECAST_ID =>CE_CASH_FCST.G_forecast_id,
818: X_FORECAST_HEADER_ID =>CE_CASH_FCST.G_rp_forecast_header_id,
819: X_FORECAST_ROW_ID =>CE_CASH_FCST.G_forecast_row_id,
820: X_FORECAST_COLUMN_ID =>p_forecast_column_id,
821: X_AMOUNT =>round(NVL(p_forecast_amount,0), CE_CASH_FCST.G_precision),
822: X_TRX_AMOUNT =>p_trx_amount,
823: X_REFERENCE_ID =>p_reference_id,
817: X_FORECAST_ID =>CE_CASH_FCST.G_forecast_id,
818: X_FORECAST_HEADER_ID =>CE_CASH_FCST.G_rp_forecast_header_id,
819: X_FORECAST_ROW_ID =>CE_CASH_FCST.G_forecast_row_id,
820: X_FORECAST_COLUMN_ID =>p_forecast_column_id,
821: X_AMOUNT =>round(NVL(p_forecast_amount,0), CE_CASH_FCST.G_precision),
822: X_TRX_AMOUNT =>p_trx_amount,
823: X_REFERENCE_ID =>p_reference_id,
824: X_CURRENCY_CODE =>p_currency_code,
825: X_ORG_ID =>p_org_id,
856: column_id CE_FORECAST_COLUMNS.forecast_column_id%TYPE;
857:
858: CURSOR zero_fill_c IS SELECT cfc.forecast_column_id
859: FROM ce_forecast_columns cfc
860: WHERE cfc.forecast_header_id = CE_CASH_FCST.G_rp_forecast_header_id;
861:
862: BEGIN
863: cep_standard.debug('>>CE_CASH_FCST_POP.Zero_Fill_Cells');
864: OPEN zero_fill_c;
859: FROM ce_forecast_columns cfc
860: WHERE cfc.forecast_header_id = CE_CASH_FCST.G_rp_forecast_header_id;
861:
862: BEGIN
863: cep_standard.debug('>>CE_CASH_FCST_POP.Zero_Fill_Cells');
864: OPEN zero_fill_c;
865: LOOP
866: FETCH zero_fill_c into column_id;
867: EXIT WHEN zero_fill_C%NOTFOUND OR zero_fill_C%NOTFOUND IS NULL;
870: END LOOP;
871:
872: CLOSE zero_fill_c;
873:
874: cep_standard.debug('<
876: WHEN OTHERS THEN
877: IF zero_fill_C%ISOPEN THEN close zero_fill_C; END IF;
878: cep_standard.debug('EXCEPTION-OTHERS: Zero_fill_Cells');
954: exec_id := DBMS_SQL.execute(cursor_id);
955:
956: DBMS_SQL.CLOSE_CURSOR(cursor_id);
957:
958: IF(CE_CASH_FCST.G_trx_type IN ('GLB', 'GLE', 'GLA', 'PAY')) THEN
959: DELETE from ce_forecast_trx_cells
960: WHERE forecast_id = CE_CASH_FCST.G_forecast_id
961: AND forecast_row_id = CE_CASH_FCST.G_forecast_row_id
962: AND forecast_column_id = CE_CASH_FCST.G_overdue_column_id;
956: DBMS_SQL.CLOSE_CURSOR(cursor_id);
957:
958: IF(CE_CASH_FCST.G_trx_type IN ('GLB', 'GLE', 'GLA', 'PAY')) THEN
959: DELETE from ce_forecast_trx_cells
960: WHERE forecast_id = CE_CASH_FCST.G_forecast_id
961: AND forecast_row_id = CE_CASH_FCST.G_forecast_row_id
962: AND forecast_column_id = CE_CASH_FCST.G_overdue_column_id;
963: END IF;
964:
957:
958: IF(CE_CASH_FCST.G_trx_type IN ('GLB', 'GLE', 'GLA', 'PAY')) THEN
959: DELETE from ce_forecast_trx_cells
960: WHERE forecast_id = CE_CASH_FCST.G_forecast_id
961: AND forecast_row_id = CE_CASH_FCST.G_forecast_row_id
962: AND forecast_column_id = CE_CASH_FCST.G_overdue_column_id;
963: END IF;
964:
965: IF(CE_CASH_FCST.G_trx_type IN ('APP', 'ARR') AND
958: IF(CE_CASH_FCST.G_trx_type IN ('GLB', 'GLE', 'GLA', 'PAY')) THEN
959: DELETE from ce_forecast_trx_cells
960: WHERE forecast_id = CE_CASH_FCST.G_forecast_id
961: AND forecast_row_id = CE_CASH_FCST.G_forecast_row_id
962: AND forecast_column_id = CE_CASH_FCST.G_overdue_column_id;
963: END IF;
964:
965: IF(CE_CASH_FCST.G_trx_type IN ('APP', 'ARR') AND
966: CE_CASH_FCST.G_forecast_method = 'P') THEN
961: AND forecast_row_id = CE_CASH_FCST.G_forecast_row_id
962: AND forecast_column_id = CE_CASH_FCST.G_overdue_column_id;
963: END IF;
964:
965: IF(CE_CASH_FCST.G_trx_type IN ('APP', 'ARR') AND
966: CE_CASH_FCST.G_forecast_method = 'P') THEN
967: DELETE from ce_forecast_trx_cells
968: WHERE forecast_id = CE_CASH_FCST.G_forecast_id
969: AND forecast_row_id = CE_CASH_FCST.G_forecast_row_id
962: AND forecast_column_id = CE_CASH_FCST.G_overdue_column_id;
963: END IF;
964:
965: IF(CE_CASH_FCST.G_trx_type IN ('APP', 'ARR') AND
966: CE_CASH_FCST.G_forecast_method = 'P') THEN
967: DELETE from ce_forecast_trx_cells
968: WHERE forecast_id = CE_CASH_FCST.G_forecast_id
969: AND forecast_row_id = CE_CASH_FCST.G_forecast_row_id
970: AND forecast_column_id = CE_CASH_FCST.G_overdue_column_id;
964:
965: IF(CE_CASH_FCST.G_trx_type IN ('APP', 'ARR') AND
966: CE_CASH_FCST.G_forecast_method = 'P') THEN
967: DELETE from ce_forecast_trx_cells
968: WHERE forecast_id = CE_CASH_FCST.G_forecast_id
969: AND forecast_row_id = CE_CASH_FCST.G_forecast_row_id
970: AND forecast_column_id = CE_CASH_FCST.G_overdue_column_id;
971: END IF;
972:
965: IF(CE_CASH_FCST.G_trx_type IN ('APP', 'ARR') AND
966: CE_CASH_FCST.G_forecast_method = 'P') THEN
967: DELETE from ce_forecast_trx_cells
968: WHERE forecast_id = CE_CASH_FCST.G_forecast_id
969: AND forecast_row_id = CE_CASH_FCST.G_forecast_row_id
970: AND forecast_column_id = CE_CASH_FCST.G_overdue_column_id;
971: END IF;
972:
973: IF(CE_CASH_FCST.G_invalid_overdue_row) THEN
966: CE_CASH_FCST.G_forecast_method = 'P') THEN
967: DELETE from ce_forecast_trx_cells
968: WHERE forecast_id = CE_CASH_FCST.G_forecast_id
969: AND forecast_row_id = CE_CASH_FCST.G_forecast_row_id
970: AND forecast_column_id = CE_CASH_FCST.G_overdue_column_id;
971: END IF;
972:
973: IF(CE_CASH_FCST.G_invalid_overdue_row) THEN
974: DELETE from ce_forecast_trx_cells
969: AND forecast_row_id = CE_CASH_FCST.G_forecast_row_id
970: AND forecast_column_id = CE_CASH_FCST.G_overdue_column_id;
971: END IF;
972:
973: IF(CE_CASH_FCST.G_invalid_overdue_row) THEN
974: DELETE from ce_forecast_trx_cells
975: WHERE forecast_id = CE_CASH_FCST.G_forecast_id
976: AND forecast_row_id = CE_CASH_FCST.G_forecast_row_id
977: AND forecast_column_id = CE_CASH_FCST.G_overdue_column_id;
971: END IF;
972:
973: IF(CE_CASH_FCST.G_invalid_overdue_row) THEN
974: DELETE from ce_forecast_trx_cells
975: WHERE forecast_id = CE_CASH_FCST.G_forecast_id
976: AND forecast_row_id = CE_CASH_FCST.G_forecast_row_id
977: AND forecast_column_id = CE_CASH_FCST.G_overdue_column_id;
978: END IF;
979:
972:
973: IF(CE_CASH_FCST.G_invalid_overdue_row) THEN
974: DELETE from ce_forecast_trx_cells
975: WHERE forecast_id = CE_CASH_FCST.G_forecast_id
976: AND forecast_row_id = CE_CASH_FCST.G_forecast_row_id
977: AND forecast_column_id = CE_CASH_FCST.G_overdue_column_id;
978: END IF;
979:
980: -- Populate CE_FORECAST_OPENING_BAL
973: IF(CE_CASH_FCST.G_invalid_overdue_row) THEN
974: DELETE from ce_forecast_trx_cells
975: WHERE forecast_id = CE_CASH_FCST.G_forecast_id
976: AND forecast_row_id = CE_CASH_FCST.G_forecast_row_id
977: AND forecast_column_id = CE_CASH_FCST.G_overdue_column_id;
978: END IF;
979:
980: -- Populate CE_FORECAST_OPENING_BAL
981: Populate_Opening_Bal;
1002: | DESCRIPTION |
1003: | Calculates the initial cash position for the forecast start |
1004: | date using the average balance Processing |
1005: | CALLED BY |
1006: | CE_CASH_FCST_POP.Calc_Initial_Cash_Position |
1007: | REQUIRES |
1008: | |
1009: | HISTORY |
1010: | 19-MAR-1997 Created Bidemi Carrol |
1019: -- Get number of days from start of the period
1020: --
1021: BEGIN
1022: SELECT period_name,
1023: (CE_CASH_FCST.G_rp_forecast_start_date - start_date +1)
1024: INTO l_period_name,
1025: l_ptd_range
1026: FROM gl_periods
1027: WHERE CE_CASH_FCST.G_rp_forecast_start_date BETWEEN start_date and end_date
1023: (CE_CASH_FCST.G_rp_forecast_start_date - start_date +1)
1024: INTO l_period_name,
1025: l_ptd_range
1026: FROM gl_periods
1027: WHERE CE_CASH_FCST.G_rp_forecast_start_date BETWEEN start_date and end_date
1028: AND period_set_name = CE_CASH_FCST.G_rp_calendar_name;
1029:
1030: EXCEPTION
1031: WHEN NO_DATA_FOUND THEN
1024: INTO l_period_name,
1025: l_ptd_range
1026: FROM gl_periods
1027: WHERE CE_CASH_FCST.G_rp_forecast_start_date BETWEEN start_date and end_date
1028: AND period_set_name = CE_CASH_FCST.G_rp_calendar_name;
1029:
1030: EXCEPTION
1031: WHEN NO_DATA_FOUND THEN
1032: return 0;
1076: 32, NVL(PERIOD_AGGREGATE32,0)-NVL(PERIOD_AGGREGATE31,0),
1077: 33, NVL(PERIOD_AGGREGATE33,0)-NVL(PERIOD_AGGREGATE32,0),
1078: 34, NVL(PERIOD_AGGREGATE34,0)-NVL(PERIOD_AGGREGATE33,0),
1079: 35, NVL(PERIOD_AGGREGATE35,0)-NVL(PERIOD_AGGREGATE34,0),0)*
1080: DECODE(CE_CASH_FCST.G_rp_exchange_type,'User',CE_CASH_FCST.G_rp_exchange_rate,curr.exchange_rate))
1081: INTO l_end_of_day
1082: FROM gl_daily_balances gdb,
1083: gl_sets_of_books org,
1084: gl_code_combinations glcc,
1082: FROM gl_daily_balances gdb,
1083: gl_sets_of_books org,
1084: gl_code_combinations glcc,
1085: ce_currency_rates_temp curr
1086: WHERE curr.forecast_request_id = CE_CASH_FCST.G_forecast_id
1087: AND curr.currency_code = gdb.currency_code
1088: AND gdb.period_name = l_period_name
1089: AND gdb.currency_code = org.currency_code
1090: AND gdb.currency_type = DECODE(CE_CASH_FCST.G_rp_src_curr_type, 'A', 'U',
1086: WHERE curr.forecast_request_id = CE_CASH_FCST.G_forecast_id
1087: AND curr.currency_code = gdb.currency_code
1088: AND gdb.period_name = l_period_name
1089: AND gdb.currency_code = org.currency_code
1090: AND gdb.currency_type = DECODE(CE_CASH_FCST.G_rp_src_curr_type, 'A', 'U',
1091: 'E','C',
1092: 'F','U')
1093: AND gdb.code_combination_id = glcc.code_combination_id
1094: AND gdb.actual_flag = 'A'
1118: | DESCRIPTION |
1119: | Calculates the initial cash position for the forecast start |
1120: | date |
1121: | CALLED BY |
1122: | CE_CASH_FCST_POP.Cash_Forecast |
1123: | REQUIRES |
1124: | |
1125: | HISTORY |
1126: | 19-AUG-1996 Created Bidemi Carrol |
1133: avg_bal VARCHAR2(1);
1134: avg_bal_init_cash_pos NUMBER;
1135: BEGIN
1136: cep_standard.debug('>>Calc_Initial_Cash_Position ');
1137: IF (CE_CASH_FCST.G_aging_type = 'D') THEN
1138: --
1139: -- Check to see if average daily balances are used;
1140: --
1141: avg_bal_init_cash_pos := Use_Avg_Bal_Pos(p_ccid);
1146: cep_standard.debug('Avg bal init cash pos: ' || avg_bal_init_cash_pos);
1147: BEGIN
1148: SELECT src.period_name,
1149: nvl(SUM((nvl(src.begin_balance_dr,0)-nvl(src.begin_balance_cr,0))*
1150: DECODE(CE_CASH_FCST.G_rp_exchange_type, 'User', CE_CASH_FCST.G_rp_exchange_rate, curr.exchange_rate)),0)
1151: INTO begin_period,
1152: begin_cash_bal
1153: FROM gl_balances src,
1154: gl_sets_of_books org,
1154: gl_sets_of_books org,
1155: gl_periods gp,
1156: gl_code_combinations glcc,
1157: ce_currency_rates_temp curr
1158: WHERE curr.forecast_request_id = CE_CASH_FCST.G_forecast_id
1159: AND curr.currency_code = src.currency_code
1160: AND src.period_name = gp.period_name
1161: AND src.currency_code = DECODE(CE_CASH_FCST.G_rp_src_curr_type,
1162: 'A',src.currency_code,
1157: ce_currency_rates_temp curr
1158: WHERE curr.forecast_request_id = CE_CASH_FCST.G_forecast_id
1159: AND curr.currency_code = src.currency_code
1160: AND src.period_name = gp.period_name
1161: AND src.currency_code = DECODE(CE_CASH_FCST.G_rp_src_curr_type,
1162: 'A',src.currency_code,
1163: 'E',CE_CASH_FCST.G_rp_src_currency,
1164: org.currency_code)
1165: AND NVL(src.translated_flag,'R') = 'R'
1159: AND curr.currency_code = src.currency_code
1160: AND src.period_name = gp.period_name
1161: AND src.currency_code = DECODE(CE_CASH_FCST.G_rp_src_curr_type,
1162: 'A',src.currency_code,
1163: 'E',CE_CASH_FCST.G_rp_src_currency,
1164: org.currency_code)
1165: AND NVL(src.translated_flag,'R') = 'R'
1166: AND src.ledger_id = org.set_of_books_id
1167: AND src.actual_flag = 'A'
1168: AND glcc.template_id is NULL
1169: AND glcc.summary_flag = 'N'
1170: AND src.code_combination_id = glcc.code_combination_id
1171: AND glcc.code_combination_id = p_ccid
1172: AND CE_CASH_FCST.G_rp_forecast_start_date BETWEEN gp.start_date AND gp.end_date
1173: AND gp.period_set_name = org.period_set_name
1174: AND gp.period_set_name = CE_CASH_FCST.G_rp_calendar_name
1175: AND nvl(org.enable_average_balances_flag,'N') = 'N'
1176: GROUP BY src.period_name;
1170: AND src.code_combination_id = glcc.code_combination_id
1171: AND glcc.code_combination_id = p_ccid
1172: AND CE_CASH_FCST.G_rp_forecast_start_date BETWEEN gp.start_date AND gp.end_date
1173: AND gp.period_set_name = org.period_set_name
1174: AND gp.period_set_name = CE_CASH_FCST.G_rp_calendar_name
1175: AND nvl(org.enable_average_balances_flag,'N') = 'N'
1176: GROUP BY src.period_name;
1177: cep_standard.debug('INITIAL BALANCE FOR: '|| begin_period || ' is : '|| begin_Cash_bal);
1178: EXCEPTION
1188:
1189: cep_standard.debug('INITIAL PERIOD BALANCE FOR: '|| begin_period || ' is : '|| begin_Cash_bal);
1190: BEGIN
1191: SELECT nvl(SUM((nvl(jl.entered_dr,0) - nvl(jl.entered_cr,0))*
1192: DECODE(CE_CASH_FCST.G_rp_exchange_type, 'User', CE_CASH_FCST.G_rp_exchange_rate, curr.exchange_rate)),0)
1193: INTO bal_to_date
1194: FROM gl_je_lines jl,
1195: gl_je_headers jh,
1196: gl_sets_of_books org,
1195: gl_je_headers jh,
1196: gl_sets_of_books org,
1197: gl_code_combinations glcc,
1198: ce_currency_rates_temp curr
1199: WHERE curr.forecast_request_id = CE_CASH_FCST.G_forecast_id
1200: AND curr.currency_code = jh.currency_code
1201: AND jl.effective_date <= CE_CASH_FCST.G_rp_forecast_start_date
1202: AND jl.status = 'P'
1203: AND jl.period_name = begin_period
1197: gl_code_combinations glcc,
1198: ce_currency_rates_temp curr
1199: WHERE curr.forecast_request_id = CE_CASH_FCST.G_forecast_id
1200: AND curr.currency_code = jh.currency_code
1201: AND jl.effective_date <= CE_CASH_FCST.G_rp_forecast_start_date
1202: AND jl.status = 'P'
1203: AND jl.period_name = begin_period
1204: AND jh.currency_code = DECODE(CE_CASH_FCST.G_rp_src_curr_type,'E',CE_CASH_FCST.G_rp_src_currency,
1205: jh.currency_code)
1200: AND curr.currency_code = jh.currency_code
1201: AND jl.effective_date <= CE_CASH_FCST.G_rp_forecast_start_date
1202: AND jl.status = 'P'
1203: AND jl.period_name = begin_period
1204: AND jh.currency_code = DECODE(CE_CASH_FCST.G_rp_src_curr_type,'E',CE_CASH_FCST.G_rp_src_currency,
1205: jh.currency_code)
1206: AND jl.ledger_id = org.set_of_books_id
1207: AND jl.je_header_id = jh.je_header_id
1208: AND glcc.template_id is NULL
1226: RAISE;
1227: END;
1228: ELSE
1229: SELECT SUM((nvl(src.begin_balance_dr,0)-nvl(src.begin_balance_cr,0))*
1230: DECODE(CE_CASH_FCST.G_rp_exchange_type, 'User', CE_CASH_FCST.G_rp_exchange_rate, curr.exchange_rate))
1231: INTO initial_cash_pos
1232: FROM gl_balances src,
1233: gl_sets_of_books org,
1234: gl_code_combinations glcc,
1232: FROM gl_balances src,
1233: gl_sets_of_books org,
1234: gl_code_combinations glcc,
1235: ce_currency_rates_temp curr
1236: WHERE curr.forecast_request_id = CE_CASH_FCST.G_forecast_id
1237: AND curr.currency_code = src.currency_code
1238: AND src.period_name = CE_CASH_FCST.G_rp_forecast_start_period
1239: AND org.period_set_name = CE_CASH_FCST.G_rp_calendar_name
1240: AND src.actual_flag = 'A'
1234: gl_code_combinations glcc,
1235: ce_currency_rates_temp curr
1236: WHERE curr.forecast_request_id = CE_CASH_FCST.G_forecast_id
1237: AND curr.currency_code = src.currency_code
1238: AND src.period_name = CE_CASH_FCST.G_rp_forecast_start_period
1239: AND org.period_set_name = CE_CASH_FCST.G_rp_calendar_name
1240: AND src.actual_flag = 'A'
1241: AND src.currency_code = DECODE(CE_CASH_FCST.G_rp_src_curr_type,
1242: 'A',src.currency_code,
1235: ce_currency_rates_temp curr
1236: WHERE curr.forecast_request_id = CE_CASH_FCST.G_forecast_id
1237: AND curr.currency_code = src.currency_code
1238: AND src.period_name = CE_CASH_FCST.G_rp_forecast_start_period
1239: AND org.period_set_name = CE_CASH_FCST.G_rp_calendar_name
1240: AND src.actual_flag = 'A'
1241: AND src.currency_code = DECODE(CE_CASH_FCST.G_rp_src_curr_type,
1242: 'A',src.currency_code,
1243: 'E',CE_CASH_FCST.G_rp_src_currency,
1237: AND curr.currency_code = src.currency_code
1238: AND src.period_name = CE_CASH_FCST.G_rp_forecast_start_period
1239: AND org.period_set_name = CE_CASH_FCST.G_rp_calendar_name
1240: AND src.actual_flag = 'A'
1241: AND src.currency_code = DECODE(CE_CASH_FCST.G_rp_src_curr_type,
1242: 'A',src.currency_code,
1243: 'E',CE_CASH_FCST.G_rp_src_currency,
1244: org.currency_code)
1245: AND NVL(src.translated_flag,'R') = 'R'
1239: AND org.period_set_name = CE_CASH_FCST.G_rp_calendar_name
1240: AND src.actual_flag = 'A'
1241: AND src.currency_code = DECODE(CE_CASH_FCST.G_rp_src_curr_type,
1242: 'A',src.currency_code,
1243: 'E',CE_CASH_FCST.G_rp_src_currency,
1244: org.currency_code)
1245: AND NVL(src.translated_flag,'R') = 'R'
1246: AND src.ledger_id = org.set_of_books_id
1247: AND glcc.template_id IS NULL
1288:
1289: CURSOR C_bank is SELECT DISTINCT bank_account_id
1290: FROM ce_forecast_trx_cells
1291: WHERE bank_account_id is not null
1292: AND forecast_id = CE_CASH_FCST.G_forecast_id
1293: AND forecast_row_id = CE_CASH_FCST.G_forecast_row_id;
1294:
1295: CURSOR C_glcp is SELECT DISTINCT code_combination_id
1296: FROM ce_forecast_trx_cells
1289: CURSOR C_bank is SELECT DISTINCT bank_account_id
1290: FROM ce_forecast_trx_cells
1291: WHERE bank_account_id is not null
1292: AND forecast_id = CE_CASH_FCST.G_forecast_id
1293: AND forecast_row_id = CE_CASH_FCST.G_forecast_row_id;
1294:
1295: CURSOR C_glcp is SELECT DISTINCT code_combination_id
1296: FROM ce_forecast_trx_cells
1297: WHERE code_combination_id is not null
1294:
1295: CURSOR C_glcp is SELECT DISTINCT code_combination_id
1296: FROM ce_forecast_trx_cells
1297: WHERE code_combination_id is not null
1298: AND forecast_id = CE_CASH_FCST.G_forecast_id
1299: AND forecast_row_id = CE_CASH_FCST.G_forecast_row_id;
1300:
1301: CURSOR C_sub_acct(p_fc_start_date DATE,
1302: p_le_id NUMBER) is
1295: CURSOR C_glcp is SELECT DISTINCT code_combination_id
1296: FROM ce_forecast_trx_cells
1297: WHERE code_combination_id is not null
1298: AND forecast_id = CE_CASH_FCST.G_forecast_id
1299: AND forecast_row_id = CE_CASH_FCST.G_forecast_row_id;
1300:
1301: CURSOR C_sub_acct(p_fc_start_date DATE,
1302: p_le_id NUMBER) is
1303: SELECT nvl(ledger_balance,0) ledger_balance,
1339:
1340: BEGIN
1341: cep_standard.debug('>>CE_CSH_FCST_POP.Populate_Opening_Bal');
1342:
1343: IF (CE_CASH_FCST.G_rp_view_by in ('BANK','ALL')) THEN
1344: IF (CE_CASH_FCST.G_aging_type = 'D') THEN
1345: l_fc_start_date := trunc(CE_CASH_FCST.G_rp_forecast_start_date);
1346: ELSE
1347: select trunc(start_date)
1340: BEGIN
1341: cep_standard.debug('>>CE_CSH_FCST_POP.Populate_Opening_Bal');
1342:
1343: IF (CE_CASH_FCST.G_rp_view_by in ('BANK','ALL')) THEN
1344: IF (CE_CASH_FCST.G_aging_type = 'D') THEN
1345: l_fc_start_date := trunc(CE_CASH_FCST.G_rp_forecast_start_date);
1346: ELSE
1347: select trunc(start_date)
1348: into l_fc_start_date
1341: cep_standard.debug('>>CE_CSH_FCST_POP.Populate_Opening_Bal');
1342:
1343: IF (CE_CASH_FCST.G_rp_view_by in ('BANK','ALL')) THEN
1344: IF (CE_CASH_FCST.G_aging_type = 'D') THEN
1345: l_fc_start_date := trunc(CE_CASH_FCST.G_rp_forecast_start_date);
1346: ELSE
1347: select trunc(start_date)
1348: into l_fc_start_date
1349: from gl_periods
1346: ELSE
1347: select trunc(start_date)
1348: into l_fc_start_date
1349: from gl_periods
1350: where period_set_name = CE_CASH_FCST.G_rp_calendar_name
1351: and period_name = CE_CASH_FCST.G_rp_forecast_start_period;
1352: END IF;
1353:
1354: IF (CE_CASH_FCST.G_trx_type IN ('APP','ARR','PAY','XTI','XTO')) THEN
1347: select trunc(start_date)
1348: into l_fc_start_date
1349: from gl_periods
1350: where period_set_name = CE_CASH_FCST.G_rp_calendar_name
1351: and period_name = CE_CASH_FCST.G_rp_forecast_start_period;
1352: END IF;
1353:
1354: IF (CE_CASH_FCST.G_trx_type IN ('APP','ARR','PAY','XTI','XTO')) THEN
1355: FOR p_bank in C_bank LOOP
1350: where period_set_name = CE_CASH_FCST.G_rp_calendar_name
1351: and period_name = CE_CASH_FCST.G_rp_forecast_start_period;
1352: END IF;
1353:
1354: IF (CE_CASH_FCST.G_trx_type IN ('APP','ARR','PAY','XTI','XTO')) THEN
1355: FOR p_bank in C_bank LOOP
1356: SELECT count(1)
1357: INTO counter
1358: FROM ce_forecast_opening_bal
1355: FOR p_bank in C_bank LOOP
1356: SELECT count(1)
1357: INTO counter
1358: FROM ce_forecast_opening_bal
1359: WHERE forecast_id = CE_CASH_FCST.G_forecast_id
1360: AND bank_account_id = p_bank.bank_account_id;
1361:
1362: IF counter = 0 THEN
1363: SELECT bank_account_name,
1392: WHERE bank_account_id = p_bank.bank_account_id
1393: AND trunc(statement_date) < l_fc_start_date
1394: AND trunc(next_stmt_date) >= l_fc_start_date;
1395:
1396: IF CE_CASH_FCST.G_rp_bank_balance_type = 'L' THEN
1397: l_opening_balance := l_stmt_balance;
1398: ELSIF CE_CASH_FCST.G_rp_bank_balance_type = 'C' THEN
1399: l_opening_balance := l_cflow_balance;
1400: ELSE
1394: AND trunc(next_stmt_date) >= l_fc_start_date;
1395:
1396: IF CE_CASH_FCST.G_rp_bank_balance_type = 'L' THEN
1397: l_opening_balance := l_stmt_balance;
1398: ELSIF CE_CASH_FCST.G_rp_bank_balance_type = 'C' THEN
1399: l_opening_balance := l_cflow_balance;
1400: ELSE
1401: l_opening_balance := l_int_calc_balance;
1402: END IF;
1400: ELSE
1401: l_opening_balance := l_int_calc_balance;
1402: END IF;
1403:
1404: IF CE_CASH_FCST.G_rp_float_type = 'ADD1' THEN
1405: l_opening_balance := l_opening_balance + l_one_day_float;
1406: ELSIF CE_CASH_FCST.G_rp_float_type = 'ADD2' THEN
1407: l_opening_balance := l_opening_balance + l_two_day_float;
1408: ELSIF CE_CASH_FCST.G_rp_float_type = 'SUB1' THEN
1402: END IF;
1403:
1404: IF CE_CASH_FCST.G_rp_float_type = 'ADD1' THEN
1405: l_opening_balance := l_opening_balance + l_one_day_float;
1406: ELSIF CE_CASH_FCST.G_rp_float_type = 'ADD2' THEN
1407: l_opening_balance := l_opening_balance + l_two_day_float;
1408: ELSIF CE_CASH_FCST.G_rp_float_type = 'SUB1' THEN
1409: l_opening_balance := l_opening_balance - l_one_day_float;
1410: ELSIF CE_CASH_FCST.G_rp_float_type = 'SUB2' THEN
1404: IF CE_CASH_FCST.G_rp_float_type = 'ADD1' THEN
1405: l_opening_balance := l_opening_balance + l_one_day_float;
1406: ELSIF CE_CASH_FCST.G_rp_float_type = 'ADD2' THEN
1407: l_opening_balance := l_opening_balance + l_two_day_float;
1408: ELSIF CE_CASH_FCST.G_rp_float_type = 'SUB1' THEN
1409: l_opening_balance := l_opening_balance - l_one_day_float;
1410: ELSIF CE_CASH_FCST.G_rp_float_type = 'SUB2' THEN
1411: l_opening_balance := l_opening_balance - l_two_day_float;
1412: END IF;
1406: ELSIF CE_CASH_FCST.G_rp_float_type = 'ADD2' THEN
1407: l_opening_balance := l_opening_balance + l_two_day_float;
1408: ELSIF CE_CASH_FCST.G_rp_float_type = 'SUB1' THEN
1409: l_opening_balance := l_opening_balance - l_one_day_float;
1410: ELSIF CE_CASH_FCST.G_rp_float_type = 'SUB2' THEN
1411: l_opening_balance := l_opening_balance - l_two_day_float;
1412: END IF;
1413:
1414: IF (l_bank_acc_curr <> CE_CASH_FCST.G_rp_forecast_currency) THEN
1410: ELSIF CE_CASH_FCST.G_rp_float_type = 'SUB2' THEN
1411: l_opening_balance := l_opening_balance - l_two_day_float;
1412: END IF;
1413:
1414: IF (l_bank_acc_curr <> CE_CASH_FCST.G_rp_forecast_currency) THEN
1415: IF (CE_CASH_FCST.G_rp_exchange_type = 'User') THEN
1416: l_opening_balance := l_opening_balance * CE_CASH_FCST.G_rp_exchange_rate;
1417: ELSE
1418: BEGIN
1411: l_opening_balance := l_opening_balance - l_two_day_float;
1412: END IF;
1413:
1414: IF (l_bank_acc_curr <> CE_CASH_FCST.G_rp_forecast_currency) THEN
1415: IF (CE_CASH_FCST.G_rp_exchange_type = 'User') THEN
1416: l_opening_balance := l_opening_balance * CE_CASH_FCST.G_rp_exchange_rate;
1417: ELSE
1418: BEGIN
1419: cep_standard.debug('>>Bank Account currency conversion');
1412: END IF;
1413:
1414: IF (l_bank_acc_curr <> CE_CASH_FCST.G_rp_forecast_currency) THEN
1415: IF (CE_CASH_FCST.G_rp_exchange_type = 'User') THEN
1416: l_opening_balance := l_opening_balance * CE_CASH_FCST.G_rp_exchange_rate;
1417: ELSE
1418: BEGIN
1419: cep_standard.debug('>>Bank Account currency conversion');
1420:
1421: select exchange_rate
1422: into l_exchange_rate
1423: from ce_currency_rates_temp
1424: where currency_code = l_bank_acc_curr
1425: and to_currency = CE_CASH_FCST.G_rp_forecast_currency
1426: and forecast_request_id = CE_CASH_FCST.G_forecast_id;
1427:
1428: l_opening_balance := l_opening_balance * l_exchange_rate;
1429:
1422: into l_exchange_rate
1423: from ce_currency_rates_temp
1424: where currency_code = l_bank_acc_curr
1425: and to_currency = CE_CASH_FCST.G_rp_forecast_currency
1426: and forecast_request_id = CE_CASH_FCST.G_forecast_id;
1427:
1428: l_opening_balance := l_opening_balance * l_exchange_rate;
1429:
1430: cep_standard.debug('<
1431: EXCEPTION
1432: WHEN NO_DATA_FOUND THEN
1433: UPDATE ce_forecasts
1434: SET error_status = 'X'
1435: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
1436:
1437: FND_MESSAGE.set_name('CE', 'CE_FC_NO_BANK_EXCH_RATE');
1438: FND_MESSAGE.set_token('FROM_CURR', l_bank_acc_curr);
1439: FND_MESSAGE.set_token('TO_CURR', CE_CASH_FCST.G_rp_forecast_currency);
1435: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
1436:
1437: FND_MESSAGE.set_name('CE', 'CE_FC_NO_BANK_EXCH_RATE');
1438: FND_MESSAGE.set_token('FROM_CURR', l_bank_acc_curr);
1439: FND_MESSAGE.set_token('TO_CURR', CE_CASH_FCST.G_rp_forecast_currency);
1440: FND_MESSAGE.set_token('BANK_ACCOUNT_NAME', l_bank_acc_name);
1441: error_msg := FND_MESSAGE.get;
1442: CE_FORECAST_ERRORS_PKG.insert_row(
1443: CE_CASH_FCST.G_forecast_id,
1439: FND_MESSAGE.set_token('TO_CURR', CE_CASH_FCST.G_rp_forecast_currency);
1440: FND_MESSAGE.set_token('BANK_ACCOUNT_NAME', l_bank_acc_name);
1441: error_msg := FND_MESSAGE.get;
1442: CE_FORECAST_ERRORS_PKG.insert_row(
1443: CE_CASH_FCST.G_forecast_id,
1444: CE_CASH_FCST.G_rp_forecast_header_id,
1445: CE_CASH_FCST.G_forecast_row_id,
1446: 'CE_FC_NO_BANK_EXCH_RATE',
1447: error_msg);
1440: FND_MESSAGE.set_token('BANK_ACCOUNT_NAME', l_bank_acc_name);
1441: error_msg := FND_MESSAGE.get;
1442: CE_FORECAST_ERRORS_PKG.insert_row(
1443: CE_CASH_FCST.G_forecast_id,
1444: CE_CASH_FCST.G_rp_forecast_header_id,
1445: CE_CASH_FCST.G_forecast_row_id,
1446: 'CE_FC_NO_BANK_EXCH_RATE',
1447: error_msg);
1448: cep_standard.debug('EXCEPTION: Populate_Opening_Bal - No exchange rate found');
1441: error_msg := FND_MESSAGE.get;
1442: CE_FORECAST_ERRORS_PKG.insert_row(
1443: CE_CASH_FCST.G_forecast_id,
1444: CE_CASH_FCST.G_rp_forecast_header_id,
1445: CE_CASH_FCST.G_forecast_row_id,
1446: 'CE_FC_NO_BANK_EXCH_RATE',
1447: error_msg);
1448: cep_standard.debug('EXCEPTION: Populate_Opening_Bal - No exchange rate found');
1449:
1454: END;
1455: END IF;
1456: END IF;
1457:
1458: l_opening_balance := round(l_opening_balance,CE_CASH_FCST.G_precision);
1459:
1460: -- If overdue and prior-day overlap, issue warning
1461: IF (l_balance_date < l_fc_start_date AND
1462: CE_CASH_FCST.G_overdue_transactions = 'INCLUDE') THEN
1458: l_opening_balance := round(l_opening_balance,CE_CASH_FCST.G_precision);
1459:
1460: -- If overdue and prior-day overlap, issue warning
1461: IF (l_balance_date < l_fc_start_date AND
1462: CE_CASH_FCST.G_overdue_transactions = 'INCLUDE') THEN
1463: UPDATE ce_forecasts
1464: SET error_status = 'X'
1465: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
1466:
1461: IF (l_balance_date < l_fc_start_date AND
1462: CE_CASH_FCST.G_overdue_transactions = 'INCLUDE') THEN
1463: UPDATE ce_forecasts
1464: SET error_status = 'X'
1465: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
1466:
1467: FND_MESSAGE.set_name('CE', 'CE_FC_PD_OD_OVERLAP');
1468: FND_MESSAGE.set_token('BANK_ACCOUNT_NAME', l_bank_acc_name);
1469: error_msg := FND_MESSAGE.get;
1467: FND_MESSAGE.set_name('CE', 'CE_FC_PD_OD_OVERLAP');
1468: FND_MESSAGE.set_token('BANK_ACCOUNT_NAME', l_bank_acc_name);
1469: error_msg := FND_MESSAGE.get;
1470: CE_FORECAST_ERRORS_PKG.insert_row(
1471: CE_CASH_FCST.G_forecast_id,
1472: CE_CASH_FCST.G_rp_forecast_header_id,
1473: CE_CASH_FCST.G_forecast_row_id,
1474: 'CE_FC_PD_OD_OVERLAP',
1475: error_msg);
1468: FND_MESSAGE.set_token('BANK_ACCOUNT_NAME', l_bank_acc_name);
1469: error_msg := FND_MESSAGE.get;
1470: CE_FORECAST_ERRORS_PKG.insert_row(
1471: CE_CASH_FCST.G_forecast_id,
1472: CE_CASH_FCST.G_rp_forecast_header_id,
1473: CE_CASH_FCST.G_forecast_row_id,
1474: 'CE_FC_PD_OD_OVERLAP',
1475: error_msg);
1476: END IF;
1469: error_msg := FND_MESSAGE.get;
1470: CE_FORECAST_ERRORS_PKG.insert_row(
1471: CE_CASH_FCST.G_forecast_id,
1472: CE_CASH_FCST.G_rp_forecast_header_id,
1473: CE_CASH_FCST.G_forecast_row_id,
1474: 'CE_FC_PD_OD_OVERLAP',
1475: error_msg);
1476: END IF;
1477:
1475: error_msg);
1476: END IF;
1477:
1478: -- Calculate Prior-day Cashflow
1479: IF(CE_CASH_FCST.G_rp_exchange_type = 'User') THEN
1480: SELECT SUM(amount*CE_CASH_FCST.G_rp_exchange_rate)
1481: INTO l_app_cflow
1482: FROM ce_ap_fc_payments_v
1483: WHERE bank_account_id = p_bank.bank_account_id
1476: END IF;
1477:
1478: -- Calculate Prior-day Cashflow
1479: IF(CE_CASH_FCST.G_rp_exchange_type = 'User') THEN
1480: SELECT SUM(amount*CE_CASH_FCST.G_rp_exchange_rate)
1481: INTO l_app_cflow
1482: FROM ce_ap_fc_payments_v
1483: WHERE bank_account_id = p_bank.bank_account_id
1484: AND payment_date >= l_balance_date
1483: WHERE bank_account_id = p_bank.bank_account_id
1484: AND payment_date >= l_balance_date
1485: AND payment_date < l_fc_start_date;
1486:
1487: SELECT SUM(amount*CE_CASH_FCST.G_rp_exchange_rate)
1488: INTO l_arr_cflow
1489: FROM ce_ar_fc_receipts_v
1490: WHERE bank_account_id = p_bank.bank_account_id
1491: AND cash_activity_date >= l_balance_date
1490: WHERE bank_account_id = p_bank.bank_account_id
1491: AND cash_activity_date >= l_balance_date
1492: AND cash_activity_date < l_fc_start_date;
1493:
1494: SELECT SUM(amount*CE_CASH_FCST.G_rp_exchange_rate)
1495: INTO l_xtr_cflow
1496: FROM ce_xtr_cashflows_v
1497: WHERE bank_account_id = p_bank.bank_account_id
1498: AND trx_date >= l_balance_date
1511: ce_currency_rates_temp curr
1512: WHERE src.bank_account_id = p_bank.bank_account_id
1513: AND src.payment_date >= l_balance_date
1514: AND src.payment_date < l_fc_start_date
1515: AND curr.forecast_request_id = CE_CASH_FCST.G_forecast_id
1516: AND curr.to_currency = CE_CASH_FCST.G_rp_forecast_currency
1517: AND curr.currency_code = src.currency_code;
1518:
1519: SELECT SUM(src.amount*curr.exchange_rate)
1512: WHERE src.bank_account_id = p_bank.bank_account_id
1513: AND src.payment_date >= l_balance_date
1514: AND src.payment_date < l_fc_start_date
1515: AND curr.forecast_request_id = CE_CASH_FCST.G_forecast_id
1516: AND curr.to_currency = CE_CASH_FCST.G_rp_forecast_currency
1517: AND curr.currency_code = src.currency_code;
1518:
1519: SELECT SUM(src.amount*curr.exchange_rate)
1520: INTO l_arr_cflow
1522: ce_currency_rates_temp curr
1523: WHERE src.bank_account_id = p_bank.bank_account_id
1524: AND src.cash_activity_date >= l_balance_date
1525: AND src.cash_activity_date < l_fc_start_date
1526: AND curr.forecast_request_id = CE_CASH_FCST.G_forecast_id
1527: AND curr.to_currency = CE_CASH_FCST.G_rp_forecast_currency
1528: AND curr.currency_code = src.currency_code;
1529:
1530: SELECT SUM(src.amount*curr.exchange_rate)
1523: WHERE src.bank_account_id = p_bank.bank_account_id
1524: AND src.cash_activity_date >= l_balance_date
1525: AND src.cash_activity_date < l_fc_start_date
1526: AND curr.forecast_request_id = CE_CASH_FCST.G_forecast_id
1527: AND curr.to_currency = CE_CASH_FCST.G_rp_forecast_currency
1528: AND curr.currency_code = src.currency_code;
1529:
1530: SELECT SUM(src.amount*curr.exchange_rate)
1531: INTO l_xtr_cflow
1533: ce_currency_rates_temp curr
1534: WHERE src.bank_account_id = p_bank.bank_account_id
1535: AND src.trx_date >= l_balance_date
1536: AND src.trx_date < l_fc_start_date
1537: AND curr.forecast_request_id = CE_CASH_FCST.G_forecast_id
1538: AND curr.to_currency = CE_CASH_FCST.G_rp_forecast_currency
1539: AND curr.currency_code = src.currency_code;
1540:
1541: SELECT SUM(src.amount*curr.exchange_rate)
1534: WHERE src.bank_account_id = p_bank.bank_account_id
1535: AND src.trx_date >= l_balance_date
1536: AND src.trx_date < l_fc_start_date
1537: AND curr.forecast_request_id = CE_CASH_FCST.G_forecast_id
1538: AND curr.to_currency = CE_CASH_FCST.G_rp_forecast_currency
1539: AND curr.currency_code = src.currency_code;
1540:
1541: SELECT SUM(src.amount*curr.exchange_rate)
1542: INTO l_pay_cflow
1544: ce_currency_rates_temp curr
1545: WHERE src.bank_account_id = p_bank.bank_account_id
1546: AND src.trx_date >= l_balance_date
1547: AND src.trx_date < l_fc_start_date
1548: AND curr.forecast_request_id = CE_CASH_FCST.G_forecast_id
1549: AND curr.to_currency = CE_CASH_FCST.G_rp_forecast_currency
1550: AND curr.currency_code = src.currency_code;
1551: END IF;
1552:
1545: WHERE src.bank_account_id = p_bank.bank_account_id
1546: AND src.trx_date >= l_balance_date
1547: AND src.trx_date < l_fc_start_date
1548: AND curr.forecast_request_id = CE_CASH_FCST.G_forecast_id
1549: AND curr.to_currency = CE_CASH_FCST.G_rp_forecast_currency
1550: AND curr.currency_code = src.currency_code;
1551: END IF;
1552:
1553: l_prior_day_cflow := round(nvl(l_arr_cflow,0) - nvl(l_app_cflow,0)
1550: AND curr.currency_code = src.currency_code;
1551: END IF;
1552:
1553: l_prior_day_cflow := round(nvl(l_arr_cflow,0) - nvl(l_app_cflow,0)
1554: + nvl(l_xtr_cflow,0) - nvl(l_pay_cflow,0),CE_CASH_FCST.G_precision);
1555:
1556:
1557: ELSE -- no bank balances available before forecast start date
1558: l_opening_balance := 0;
1560: l_balance_date := null;
1561:
1562: UPDATE ce_forecasts
1563: SET error_status = 'X'
1564: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
1565:
1566: FND_MESSAGE.set_name('CE', 'CE_FC_NO_BANK_BALANCE');
1567: FND_MESSAGE.set_token('BANK_ACCOUNT_NAME', l_bank_acc_name);
1568: error_msg := FND_MESSAGE.get;
1566: FND_MESSAGE.set_name('CE', 'CE_FC_NO_BANK_BALANCE');
1567: FND_MESSAGE.set_token('BANK_ACCOUNT_NAME', l_bank_acc_name);
1568: error_msg := FND_MESSAGE.get;
1569: CE_FORECAST_ERRORS_PKG.insert_row(
1570: CE_CASH_FCST.G_forecast_id,
1571: CE_CASH_FCST.G_rp_forecast_header_id,
1572: CE_CASH_FCST.G_forecast_row_id,
1573: 'CE_FC_NO_BANK_BALANCE',
1574: error_msg);
1567: FND_MESSAGE.set_token('BANK_ACCOUNT_NAME', l_bank_acc_name);
1568: error_msg := FND_MESSAGE.get;
1569: CE_FORECAST_ERRORS_PKG.insert_row(
1570: CE_CASH_FCST.G_forecast_id,
1571: CE_CASH_FCST.G_rp_forecast_header_id,
1572: CE_CASH_FCST.G_forecast_row_id,
1573: 'CE_FC_NO_BANK_BALANCE',
1574: error_msg);
1575: END IF;
1568: error_msg := FND_MESSAGE.get;
1569: CE_FORECAST_ERRORS_PKG.insert_row(
1570: CE_CASH_FCST.G_forecast_id,
1571: CE_CASH_FCST.G_rp_forecast_header_id,
1572: CE_CASH_FCST.G_forecast_row_id,
1573: 'CE_FC_NO_BANK_BALANCE',
1574: error_msg);
1575: END IF;
1576:
1590: last_update_date,
1591: last_update_login)
1592: VALUES
1593: (CE_FORECAST_OPENING_BAL_S.nextval,
1594: CE_CASH_FCST.G_forecast_id,
1595: 'BANK',
1596: p_bank.bank_account_id,
1597: null,
1598: l_opening_balance,
1611:
1612: l_opening_balance := 0;
1613:
1614: -- Insert subsidiary bank balances as well
1615: IF (nvl(CE_CASH_FCST.G_rp_include_sub_account,'N') = 'Y') THEN
1616: IF (nvl(G_sub_accounts_complete,'N') = 'N') THEN
1617: IF (CE_CASH_FCST.G_legal_entity_id is null) THEN
1618: G_sub_accounts_complete := 'Y';
1619: END IF;
1613:
1614: -- Insert subsidiary bank balances as well
1615: IF (nvl(CE_CASH_FCST.G_rp_include_sub_account,'N') = 'Y') THEN
1616: IF (nvl(G_sub_accounts_complete,'N') = 'N') THEN
1617: IF (CE_CASH_FCST.G_legal_entity_id is null) THEN
1618: G_sub_accounts_complete := 'Y';
1619: END IF;
1620:
1621: -- Check if we have already processed this legal entity
1621: -- Check if we have already processed this legal entity
1622: SELECT count(1)
1623: INTO counter
1624: FROM ce_forecast_opening_bal
1625: WHERE forecast_id = CE_CASH_FCST.G_forecast_id
1626: AND bank_account_id = -2
1627: AND legal_entity_id = nvl(CE_CASH_FCST.G_legal_entity_id,-1);
1628:
1629: IF counter = 0 THEN
1623: INTO counter
1624: FROM ce_forecast_opening_bal
1625: WHERE forecast_id = CE_CASH_FCST.G_forecast_id
1626: AND bank_account_id = -2
1627: AND legal_entity_id = nvl(CE_CASH_FCST.G_legal_entity_id,-1);
1628:
1629: IF counter = 0 THEN
1630: FOR p_sub_acct in C_sub_acct(l_fc_start_date,CE_CASH_FCST.G_legal_entity_id) LOOP
1631: IF CE_CASH_FCST.G_rp_bank_balance_type = 'L' THEN
1626: AND bank_account_id = -2
1627: AND legal_entity_id = nvl(CE_CASH_FCST.G_legal_entity_id,-1);
1628:
1629: IF counter = 0 THEN
1630: FOR p_sub_acct in C_sub_acct(l_fc_start_date,CE_CASH_FCST.G_legal_entity_id) LOOP
1631: IF CE_CASH_FCST.G_rp_bank_balance_type = 'L' THEN
1632: l_opening_balance := p_sub_acct.ledger_balance;
1633: ELSIF CE_CASH_FCST.G_rp_bank_balance_type = 'C' THEN
1634: l_opening_balance := p_sub_acct.cashflow_balance;
1627: AND legal_entity_id = nvl(CE_CASH_FCST.G_legal_entity_id,-1);
1628:
1629: IF counter = 0 THEN
1630: FOR p_sub_acct in C_sub_acct(l_fc_start_date,CE_CASH_FCST.G_legal_entity_id) LOOP
1631: IF CE_CASH_FCST.G_rp_bank_balance_type = 'L' THEN
1632: l_opening_balance := p_sub_acct.ledger_balance;
1633: ELSIF CE_CASH_FCST.G_rp_bank_balance_type = 'C' THEN
1634: l_opening_balance := p_sub_acct.cashflow_balance;
1635: ELSE
1629: IF counter = 0 THEN
1630: FOR p_sub_acct in C_sub_acct(l_fc_start_date,CE_CASH_FCST.G_legal_entity_id) LOOP
1631: IF CE_CASH_FCST.G_rp_bank_balance_type = 'L' THEN
1632: l_opening_balance := p_sub_acct.ledger_balance;
1633: ELSIF CE_CASH_FCST.G_rp_bank_balance_type = 'C' THEN
1634: l_opening_balance := p_sub_acct.cashflow_balance;
1635: ELSE
1636: l_opening_balance := p_sub_acct.int_calc_balance;
1637: END IF;
1635: ELSE
1636: l_opening_balance := p_sub_acct.int_calc_balance;
1637: END IF;
1638:
1639: IF CE_CASH_FCST.G_rp_float_type = 'ADD1' THEN
1640: l_opening_balance := l_opening_balance + p_sub_acct.one_day_float;
1641: ELSIF CE_CASH_FCST.G_rp_float_type = 'ADD2' THEN
1642: l_opening_balance := l_opening_balance + p_sub_acct.two_day_float;
1643: ELSIF CE_CASH_FCST.G_rp_float_type = 'SUB1' THEN
1637: END IF;
1638:
1639: IF CE_CASH_FCST.G_rp_float_type = 'ADD1' THEN
1640: l_opening_balance := l_opening_balance + p_sub_acct.one_day_float;
1641: ELSIF CE_CASH_FCST.G_rp_float_type = 'ADD2' THEN
1642: l_opening_balance := l_opening_balance + p_sub_acct.two_day_float;
1643: ELSIF CE_CASH_FCST.G_rp_float_type = 'SUB1' THEN
1644: l_opening_balance := l_opening_balance - p_sub_acct.one_day_float;
1645: ELSIF CE_CASH_FCST.G_rp_float_type = 'SUB2' THEN
1639: IF CE_CASH_FCST.G_rp_float_type = 'ADD1' THEN
1640: l_opening_balance := l_opening_balance + p_sub_acct.one_day_float;
1641: ELSIF CE_CASH_FCST.G_rp_float_type = 'ADD2' THEN
1642: l_opening_balance := l_opening_balance + p_sub_acct.two_day_float;
1643: ELSIF CE_CASH_FCST.G_rp_float_type = 'SUB1' THEN
1644: l_opening_balance := l_opening_balance - p_sub_acct.one_day_float;
1645: ELSIF CE_CASH_FCST.G_rp_float_type = 'SUB2' THEN
1646: l_opening_balance := l_opening_balance - p_sub_acct.two_day_float;
1647: END IF;
1641: ELSIF CE_CASH_FCST.G_rp_float_type = 'ADD2' THEN
1642: l_opening_balance := l_opening_balance + p_sub_acct.two_day_float;
1643: ELSIF CE_CASH_FCST.G_rp_float_type = 'SUB1' THEN
1644: l_opening_balance := l_opening_balance - p_sub_acct.one_day_float;
1645: ELSIF CE_CASH_FCST.G_rp_float_type = 'SUB2' THEN
1646: l_opening_balance := l_opening_balance - p_sub_acct.two_day_float;
1647: END IF;
1648:
1649: IF (p_sub_acct.currency_code <> CE_CASH_FCST.G_rp_forecast_currency) THEN
1645: ELSIF CE_CASH_FCST.G_rp_float_type = 'SUB2' THEN
1646: l_opening_balance := l_opening_balance - p_sub_acct.two_day_float;
1647: END IF;
1648:
1649: IF (p_sub_acct.currency_code <> CE_CASH_FCST.G_rp_forecast_currency) THEN
1650: IF (CE_CASH_FCST.G_rp_exchange_type = 'User') THEN
1651: l_opening_balance := l_opening_balance * CE_CASH_FCST.G_rp_exchange_rate;
1652: ELSE
1653: BEGIN
1646: l_opening_balance := l_opening_balance - p_sub_acct.two_day_float;
1647: END IF;
1648:
1649: IF (p_sub_acct.currency_code <> CE_CASH_FCST.G_rp_forecast_currency) THEN
1650: IF (CE_CASH_FCST.G_rp_exchange_type = 'User') THEN
1651: l_opening_balance := l_opening_balance * CE_CASH_FCST.G_rp_exchange_rate;
1652: ELSE
1653: BEGIN
1654: cep_standard.debug('>>Subsidiary Bank Account currency conversion');
1647: END IF;
1648:
1649: IF (p_sub_acct.currency_code <> CE_CASH_FCST.G_rp_forecast_currency) THEN
1650: IF (CE_CASH_FCST.G_rp_exchange_type = 'User') THEN
1651: l_opening_balance := l_opening_balance * CE_CASH_FCST.G_rp_exchange_rate;
1652: ELSE
1653: BEGIN
1654: cep_standard.debug('>>Subsidiary Bank Account currency conversion');
1655:
1656: select exchange_rate
1657: into l_exchange_rate
1658: from ce_currency_rates_temp
1659: where currency_code = p_sub_acct.currency_code
1660: and to_currency = CE_CASH_FCST.G_rp_forecast_currency
1661: and forecast_request_id = CE_CASH_FCST.G_forecast_id;
1662:
1663: l_opening_balance := l_opening_balance * l_exchange_rate;
1664:
1657: into l_exchange_rate
1658: from ce_currency_rates_temp
1659: where currency_code = p_sub_acct.currency_code
1660: and to_currency = CE_CASH_FCST.G_rp_forecast_currency
1661: and forecast_request_id = CE_CASH_FCST.G_forecast_id;
1662:
1663: l_opening_balance := l_opening_balance * l_exchange_rate;
1664:
1665: cep_standard.debug('<
1666: EXCEPTION
1667: WHEN NO_DATA_FOUND THEN
1668: UPDATE ce_forecasts
1669: SET error_status = 'X'
1670: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
1671:
1672: FND_MESSAGE.set_name('CE', 'CE_FC_NO_SUB_EXCH_RATE');
1673: FND_MESSAGE.set_token('FROM_CURR', p_sub_acct.currency_code);
1674: FND_MESSAGE.set_token('TO_CURR', CE_CASH_FCST.G_rp_forecast_currency);
1670: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
1671:
1672: FND_MESSAGE.set_name('CE', 'CE_FC_NO_SUB_EXCH_RATE');
1673: FND_MESSAGE.set_token('FROM_CURR', p_sub_acct.currency_code);
1674: FND_MESSAGE.set_token('TO_CURR', CE_CASH_FCST.G_rp_forecast_currency);
1675: FND_MESSAGE.set_token('ACCOUNT_NUMBER', p_sub_acct.account_number);
1676: error_msg := FND_MESSAGE.get;
1677: CE_FORECAST_ERRORS_PKG.insert_row(
1678: CE_CASH_FCST.G_forecast_id,
1674: FND_MESSAGE.set_token('TO_CURR', CE_CASH_FCST.G_rp_forecast_currency);
1675: FND_MESSAGE.set_token('ACCOUNT_NUMBER', p_sub_acct.account_number);
1676: error_msg := FND_MESSAGE.get;
1677: CE_FORECAST_ERRORS_PKG.insert_row(
1678: CE_CASH_FCST.G_forecast_id,
1679: CE_CASH_FCST.G_rp_forecast_header_id,
1680: CE_CASH_FCST.G_forecast_row_id,
1681: 'CE_FC_NO_SUB_EXCH_RATE',
1682: error_msg);
1675: FND_MESSAGE.set_token('ACCOUNT_NUMBER', p_sub_acct.account_number);
1676: error_msg := FND_MESSAGE.get;
1677: CE_FORECAST_ERRORS_PKG.insert_row(
1678: CE_CASH_FCST.G_forecast_id,
1679: CE_CASH_FCST.G_rp_forecast_header_id,
1680: CE_CASH_FCST.G_forecast_row_id,
1681: 'CE_FC_NO_SUB_EXCH_RATE',
1682: error_msg);
1683: cep_standard.debug('EXCEPTION: Populate_Opening_Bal - Subsidiary - No exchange rate found');
1676: error_msg := FND_MESSAGE.get;
1677: CE_FORECAST_ERRORS_PKG.insert_row(
1678: CE_CASH_FCST.G_forecast_id,
1679: CE_CASH_FCST.G_rp_forecast_header_id,
1680: CE_CASH_FCST.G_forecast_row_id,
1681: 'CE_FC_NO_SUB_EXCH_RATE',
1682: error_msg);
1683: cep_standard.debug('EXCEPTION: Populate_Opening_Bal - Subsidiary - No exchange rate found');
1684:
1689: END;
1690: END IF;
1691: END IF;
1692:
1693: l_opening_balance := round(l_opening_balance,CE_CASH_FCST.G_precision);
1694:
1695: INSERT INTO ce_forecast_opening_bal
1696: (balance_id,
1697: forecast_id,
1708: last_update_date,
1709: last_update_login)
1710: VALUES
1711: (CE_FORECAST_OPENING_BAL_S.nextval,
1712: CE_CASH_FCST.G_forecast_id,
1713: 'BANK',
1714: -2,
1715: null,
1716: l_opening_balance,
1728: END IF;
1729: END IF;
1730: END IF;
1731: END IF;
1732: IF (CE_CASH_FCST.G_rp_view_by in ('GLCP','ALL')) THEN
1733: IF (CE_CASH_FCST.G_trx_type IN ('APP','ARR','PAY','XTI','XTO')) THEN
1734: FOR p_glcp in C_glcp LOOP
1735: SELECT count(1)
1736: INTO counter
1729: END IF;
1730: END IF;
1731: END IF;
1732: IF (CE_CASH_FCST.G_rp_view_by in ('GLCP','ALL')) THEN
1733: IF (CE_CASH_FCST.G_trx_type IN ('APP','ARR','PAY','XTI','XTO')) THEN
1734: FOR p_glcp in C_glcp LOOP
1735: SELECT count(1)
1736: INTO counter
1737: FROM ce_forecast_opening_bal
1734: FOR p_glcp in C_glcp LOOP
1735: SELECT count(1)
1736: INTO counter
1737: FROM ce_forecast_opening_bal
1738: WHERE forecast_id = CE_CASH_FCST.G_forecast_id
1739: AND code_combination_id = p_glcp.code_combination_id;
1740: IF (counter = 0) THEN
1741: l_opening_balance := Calc_Initial_Cash_Position(p_glcp.code_combination_id);
1742: l_opening_balance := round(l_opening_balance,CE_CASH_FCST.G_precision);
1738: WHERE forecast_id = CE_CASH_FCST.G_forecast_id
1739: AND code_combination_id = p_glcp.code_combination_id;
1740: IF (counter = 0) THEN
1741: l_opening_balance := Calc_Initial_Cash_Position(p_glcp.code_combination_id);
1742: l_opening_balance := round(l_opening_balance,CE_CASH_FCST.G_precision);
1743:
1744: INSERT INTO ce_forecast_opening_bal
1745: (balance_id,
1746: forecast_id,
1755: last_update_date,
1756: last_update_login)
1757: VALUES
1758: (CE_FORECAST_OPENING_BAL_S.nextval,
1759: CE_CASH_FCST.G_forecast_id,
1760: 'GLCP',
1761: null,
1762: p_glcp.code_combination_id,
1763: l_opening_balance,
1811: cep_standard.debug('Built From Clause');
1812:
1813: where_clause := Get_Where_Clause || Add_Where('PAYMENT_METHOD') || Add_Where('BANK_ACCOUNT_ID');
1814:
1815: IF (NVL(CE_CASH_FCST.G_forecast_method,'F') = 'P') THEN
1816:
1817: BEGIN
1818: Set_History;
1819:
1818: Set_History;
1819:
1820: EXCEPTION
1821: When NO_DATA_FOUND Then
1822: cep_standard.debug('row_id = ' || to_char(CE_CASH_FCST.G_forecast_row_id));
1823:
1824: UPDATE ce_forecasts
1825: SET error_status = 'E'
1826: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
1822: cep_standard.debug('row_id = ' || to_char(CE_CASH_FCST.G_forecast_row_id));
1823:
1824: UPDATE ce_forecasts
1825: SET error_status = 'E'
1826: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
1827:
1828: FND_MESSAGE.set_name('CE', 'CE_NO_HIST_START_PERIOD');
1829: error_msg := FND_MESSAGE.get;
1830: CE_FORECAST_ERRORS_PKG.insert_row(
1827:
1828: FND_MESSAGE.set_name('CE', 'CE_NO_HIST_START_PERIOD');
1829: error_msg := FND_MESSAGE.get;
1830: CE_FORECAST_ERRORS_PKG.insert_row(
1831: CE_CASH_FCST.G_forecast_id,
1832: CE_CASH_FCST.G_rp_forecast_header_id,
1833: CE_CASH_FCST.G_forecast_row_id,
1834: 'CE_NO_HIST_START_PERIOD',
1835: error_msg);
1828: FND_MESSAGE.set_name('CE', 'CE_NO_HIST_START_PERIOD');
1829: error_msg := FND_MESSAGE.get;
1830: CE_FORECAST_ERRORS_PKG.insert_row(
1831: CE_CASH_FCST.G_forecast_id,
1832: CE_CASH_FCST.G_rp_forecast_header_id,
1833: CE_CASH_FCST.G_forecast_row_id,
1834: 'CE_NO_HIST_START_PERIOD',
1835: error_msg);
1836: zero_fill_cells;
1829: error_msg := FND_MESSAGE.get;
1830: CE_FORECAST_ERRORS_PKG.insert_row(
1831: CE_CASH_FCST.G_forecast_id,
1832: CE_CASH_FCST.G_rp_forecast_header_id,
1833: CE_CASH_FCST.G_forecast_row_id,
1834: 'CE_NO_HIST_START_PERIOD',
1835: error_msg);
1836: zero_fill_cells;
1837: cep_standard.debug('EXCEPTION: No history data found for APP');
1839: When OTHERS Then
1840: cep_standard.debug('EXCEPTION: Build APP query - Set History');
1841: raise;
1842: END;
1843: IF (CE_CASH_FCST.G_order_date_type = 'V') THEN
1844: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
1845: select_clause := '
1846: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
1847: '||CE_CASH_FCST.G_forecast_id||',
1840: cep_standard.debug('EXCEPTION: Build APP query - Set History');
1841: raise;
1842: END;
1843: IF (CE_CASH_FCST.G_order_date_type = 'V') THEN
1844: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
1845: select_clause := '
1846: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
1847: '||CE_CASH_FCST.G_forecast_id||',
1848: '||CE_CASH_FCST.G_rp_forecast_header_id||',
1843: IF (CE_CASH_FCST.G_order_date_type = 'V') THEN
1844: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
1845: select_clause := '
1846: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
1847: '||CE_CASH_FCST.G_forecast_id||',
1848: '||CE_CASH_FCST.G_rp_forecast_header_id||',
1849: '||CE_CASH_FCST.G_forecast_row_id||',
1850: ''Y'',
1851: nvl(fnd_global.user_id,-1),
1844: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
1845: select_clause := '
1846: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
1847: '||CE_CASH_FCST.G_forecast_id||',
1848: '||CE_CASH_FCST.G_rp_forecast_header_id||',
1849: '||CE_CASH_FCST.G_forecast_row_id||',
1850: ''Y'',
1851: nvl(fnd_global.user_id,-1),
1852: sysdate,
1845: select_clause := '
1846: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
1847: '||CE_CASH_FCST.G_forecast_id||',
1848: '||CE_CASH_FCST.G_rp_forecast_header_id||',
1849: '||CE_CASH_FCST.G_forecast_row_id||',
1850: ''Y'',
1851: nvl(fnd_global.user_id,-1),
1852: sysdate,
1853: nvl(fnd_global.user_id,-1),
1860: NVL(src.actual_value_date, src.cleared_date),
1861: src.bank_account_id,
1862: ccid.asset_code_combination_id,
1863: round(nvl(-src.amount,0)*'
1864: ||CE_CASH_FCST.G_rp_exchange_rate
1865: ||','||CE_CASH_FCST.G_precision||'),
1866: -src.amount';
1867: ELSE
1868: select_clause := '
1861: src.bank_account_id,
1862: ccid.asset_code_combination_id,
1863: round(nvl(-src.amount,0)*'
1864: ||CE_CASH_FCST.G_rp_exchange_rate
1865: ||','||CE_CASH_FCST.G_precision||'),
1866: -src.amount';
1867: ELSE
1868: select_clause := '
1869: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
1866: -src.amount';
1867: ELSE
1868: select_clause := '
1869: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
1870: '||CE_CASH_FCST.G_forecast_id||',
1871: '||CE_CASH_FCST.G_rp_forecast_header_id||',
1872: '||CE_CASH_FCST.G_forecast_row_id||',
1873: ''Y'',
1874: nvl(fnd_global.user_id,-1),
1867: ELSE
1868: select_clause := '
1869: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
1870: '||CE_CASH_FCST.G_forecast_id||',
1871: '||CE_CASH_FCST.G_rp_forecast_header_id||',
1872: '||CE_CASH_FCST.G_forecast_row_id||',
1873: ''Y'',
1874: nvl(fnd_global.user_id,-1),
1875: sysdate,
1868: select_clause := '
1869: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
1870: '||CE_CASH_FCST.G_forecast_id||',
1871: '||CE_CASH_FCST.G_rp_forecast_header_id||',
1872: '||CE_CASH_FCST.G_forecast_row_id||',
1873: ''Y'',
1874: nvl(fnd_global.user_id,-1),
1875: sysdate,
1876: nvl(fnd_global.user_id,-1),
1883: NVL(src.actual_value_date, src.cleared_date),
1884: src.bank_account_id,
1885: ccid.asset_code_combination_id,
1886: round(nvl(-src.amount,0)*curr.exchange_rate'
1887: ||','||CE_CASH_FCST.G_precision||'),
1888: -src.amount';
1889: END IF;
1890: cep_standard.debug('Built Select Clause');
1891:
1892: where_clause := where_clause || '
1893: AND NVL(src.actual_value_date, src.cleared_date) BETWEEN cab.start_date and cab.end_date
1894: AND src.status <> ''NEGOTIABLE'' ';
1895: ELSE
1896: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
1897: select_clause := '
1898: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
1899: '||CE_CASH_FCST.G_forecast_id||',
1900: '||CE_CASH_FCST.G_rp_forecast_header_id||',
1895: ELSE
1896: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
1897: select_clause := '
1898: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
1899: '||CE_CASH_FCST.G_forecast_id||',
1900: '||CE_CASH_FCST.G_rp_forecast_header_id||',
1901: '||CE_CASH_FCST.G_forecast_row_id||',
1902: ''Y'',
1903: nvl(fnd_global.user_id,-1),
1896: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
1897: select_clause := '
1898: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
1899: '||CE_CASH_FCST.G_forecast_id||',
1900: '||CE_CASH_FCST.G_rp_forecast_header_id||',
1901: '||CE_CASH_FCST.G_forecast_row_id||',
1902: ''Y'',
1903: nvl(fnd_global.user_id,-1),
1904: sysdate,
1897: select_clause := '
1898: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
1899: '||CE_CASH_FCST.G_forecast_id||',
1900: '||CE_CASH_FCST.G_rp_forecast_header_id||',
1901: '||CE_CASH_FCST.G_forecast_row_id||',
1902: ''Y'',
1903: nvl(fnd_global.user_id,-1),
1904: sysdate,
1905: nvl(fnd_global.user_id,-1),
1912: src.cleared_date,
1913: src.bank_account_id,
1914: ccid.asset_code_combination_id,
1915: round(nvl(-src.amount,0)*'
1916: ||CE_CASH_FCST.G_rp_exchange_rate
1917: ||','||CE_CASH_FCST.G_precision||'),
1918: -src.amount';
1919: ELSE
1920: select_clause := '
1913: src.bank_account_id,
1914: ccid.asset_code_combination_id,
1915: round(nvl(-src.amount,0)*'
1916: ||CE_CASH_FCST.G_rp_exchange_rate
1917: ||','||CE_CASH_FCST.G_precision||'),
1918: -src.amount';
1919: ELSE
1920: select_clause := '
1921: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
1918: -src.amount';
1919: ELSE
1920: select_clause := '
1921: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
1922: '||CE_CASH_FCST.G_forecast_id||',
1923: '||CE_CASH_FCST.G_rp_forecast_header_id||',
1924: '||CE_CASH_FCST.G_forecast_row_id||',
1925: ''Y'',
1926: nvl(fnd_global.user_id,-1),
1919: ELSE
1920: select_clause := '
1921: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
1922: '||CE_CASH_FCST.G_forecast_id||',
1923: '||CE_CASH_FCST.G_rp_forecast_header_id||',
1924: '||CE_CASH_FCST.G_forecast_row_id||',
1925: ''Y'',
1926: nvl(fnd_global.user_id,-1),
1927: sysdate,
1920: select_clause := '
1921: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
1922: '||CE_CASH_FCST.G_forecast_id||',
1923: '||CE_CASH_FCST.G_rp_forecast_header_id||',
1924: '||CE_CASH_FCST.G_forecast_row_id||',
1925: ''Y'',
1926: nvl(fnd_global.user_id,-1),
1927: sysdate,
1928: nvl(fnd_global.user_id,-1),
1935: src.cleared_date,
1936: src.bank_account_id,
1937: ccid.asset_code_combination_id,
1938: round(nvl(-src.amount,0)*curr.exchange_rate'
1939: ||','||CE_CASH_FCST.G_precision||'),
1940: -src.amount';
1941: END IF;
1942: cep_standard.debug('Built Select Clause');
1943:
1945: AND src.cleared_date BETWEEN cab.start_date and cab.end_date
1946: AND src.status <> ''NEGOTIABLE'' ';
1947: END IF;
1948: ELSE
1949: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
1950: select_clause := '
1951: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
1952: '||CE_CASH_FCST.G_forecast_id||',
1953: '||CE_CASH_FCST.G_rp_forecast_header_id||',
1948: ELSE
1949: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
1950: select_clause := '
1951: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
1952: '||CE_CASH_FCST.G_forecast_id||',
1953: '||CE_CASH_FCST.G_rp_forecast_header_id||',
1954: '||CE_CASH_FCST.G_forecast_row_id||',
1955: ''Y'',
1956: nvl(fnd_global.user_id,-1),
1949: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
1950: select_clause := '
1951: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
1952: '||CE_CASH_FCST.G_forecast_id||',
1953: '||CE_CASH_FCST.G_rp_forecast_header_id||',
1954: '||CE_CASH_FCST.G_forecast_row_id||',
1955: ''Y'',
1956: nvl(fnd_global.user_id,-1),
1957: sysdate,
1950: select_clause := '
1951: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
1952: '||CE_CASH_FCST.G_forecast_id||',
1953: '||CE_CASH_FCST.G_rp_forecast_header_id||',
1954: '||CE_CASH_FCST.G_forecast_row_id||',
1955: ''Y'',
1956: nvl(fnd_global.user_id,-1),
1957: sysdate,
1958: nvl(fnd_global.user_id,-1),
1962: src.reference_id,
1963: src.currency_code,
1964: to_number(hr_ou.ORGANIZATION_ID),
1965: NVL(src.actual_value_date,NVL(src.anticipated_value_date,NVL(src.maturity_date,src.payment_date))) +'
1966: ||to_char(CE_CASH_FCST.G_lead_time) || ',
1967: src.bank_account_id,
1968: ccid.asset_code_combination_id,
1969: round(nvl(-src.amount,0)*'||CE_CASH_FCST.G_rp_exchange_rate
1970: ||','||CE_CASH_FCST.G_precision||'),
1965: NVL(src.actual_value_date,NVL(src.anticipated_value_date,NVL(src.maturity_date,src.payment_date))) +'
1966: ||to_char(CE_CASH_FCST.G_lead_time) || ',
1967: src.bank_account_id,
1968: ccid.asset_code_combination_id,
1969: round(nvl(-src.amount,0)*'||CE_CASH_FCST.G_rp_exchange_rate
1970: ||','||CE_CASH_FCST.G_precision||'),
1971: -src.amount';
1972: ELSE
1973: select_clause := '
1966: ||to_char(CE_CASH_FCST.G_lead_time) || ',
1967: src.bank_account_id,
1968: ccid.asset_code_combination_id,
1969: round(nvl(-src.amount,0)*'||CE_CASH_FCST.G_rp_exchange_rate
1970: ||','||CE_CASH_FCST.G_precision||'),
1971: -src.amount';
1972: ELSE
1973: select_clause := '
1974: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
1971: -src.amount';
1972: ELSE
1973: select_clause := '
1974: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
1975: '||CE_CASH_FCST.G_forecast_id||',
1976: '||CE_CASH_FCST.G_rp_forecast_header_id||',
1977: '||CE_CASH_FCST.G_forecast_row_id||',
1978: ''Y'',
1979: nvl(fnd_global.user_id,-1),
1972: ELSE
1973: select_clause := '
1974: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
1975: '||CE_CASH_FCST.G_forecast_id||',
1976: '||CE_CASH_FCST.G_rp_forecast_header_id||',
1977: '||CE_CASH_FCST.G_forecast_row_id||',
1978: ''Y'',
1979: nvl(fnd_global.user_id,-1),
1980: sysdate,
1973: select_clause := '
1974: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
1975: '||CE_CASH_FCST.G_forecast_id||',
1976: '||CE_CASH_FCST.G_rp_forecast_header_id||',
1977: '||CE_CASH_FCST.G_forecast_row_id||',
1978: ''Y'',
1979: nvl(fnd_global.user_id,-1),
1980: sysdate,
1981: nvl(fnd_global.user_id,-1),
1985: src.reference_id,
1986: src.currency_code,
1987: to_number(hr_ou.ORGANIZATION_ID),
1988: NVL(src.actual_value_date,NVL(src.anticipated_value_date,NVL(src.maturity_date,src.payment_date))) +'
1989: ||to_char(CE_CASH_FCST.G_lead_time) || ',
1990: src.bank_account_id,
1991: ccid.asset_code_combination_id,
1992: round(nvl(-src.amount,0)*curr.exchange_rate'
1993: ||','||CE_CASH_FCST.G_precision||'),
1989: ||to_char(CE_CASH_FCST.G_lead_time) || ',
1990: src.bank_account_id,
1991: ccid.asset_code_combination_id,
1992: round(nvl(-src.amount,0)*curr.exchange_rate'
1993: ||','||CE_CASH_FCST.G_precision||'),
1994: -src.amount';
1995: END IF;
1996: cep_standard.debug('Built Select Clause');
1997:
1996: cep_standard.debug('Built Select Clause');
1997:
1998: where_clause := where_clause || '
1999: AND NVL(src.actual_value_date,NVL(src.anticipated_value_date,NVL(src.maturity_date,src.payment_date))) BETWEEN cab.start_date - '
2000: ||to_char(CE_CASH_FCST.G_lead_time)||
2001: ' and cab.end_date - '
2002: ||to_char(CE_CASH_FCST.G_lead_time)||
2003: ' AND src.status in (''NEGOTIABLE'',''ISSUED'') ';
2004: END IF;
1998: where_clause := where_clause || '
1999: AND NVL(src.actual_value_date,NVL(src.anticipated_value_date,NVL(src.maturity_date,src.payment_date))) BETWEEN cab.start_date - '
2000: ||to_char(CE_CASH_FCST.G_lead_time)||
2001: ' and cab.end_date - '
2002: ||to_char(CE_CASH_FCST.G_lead_time)||
2003: ' AND src.status in (''NEGOTIABLE'',''ISSUED'') ';
2004: END IF;
2005: cep_standard.debug('Built Where Clause');
2006:
2044:
2045: select_clause := Get_Select_Clause;
2046: cep_standard.debug('Built Select Clause');
2047:
2048: IF (NVL(CE_CASH_FCST.G_discount_option,'N') = 'N') THEN
2049: cep_standard.debug('Discount NOT taken');
2050: from_clause := Get_From_Clause('ce_due_project_inv_v');
2051: ELSE cep_standard.debug('Discount taken');
2052: from_clause := Get_From_Clause('ce_disc_project_inv_v');
2054: cep_standard.debug('Built From Clause');
2055:
2056: where_clause := Get_Where_Clause || '
2057: AND src.trx_date BETWEEN cab.start_date - '
2058: ||to_char(CE_CASH_FCST.G_lead_time)||
2059: ' and cab.end_date - '
2060: ||to_char(CE_CASH_FCST.G_lead_time)||
2061: Add_Where('PROJECT_ID') ||
2062: Add_Where('PAYMENT_PRIORITY') || Add_Where('PAY_GROUP') || Add_Where('VENDOR_TYPE') ||
2056: where_clause := Get_Where_Clause || '
2057: AND src.trx_date BETWEEN cab.start_date - '
2058: ||to_char(CE_CASH_FCST.G_lead_time)||
2059: ' and cab.end_date - '
2060: ||to_char(CE_CASH_FCST.G_lead_time)||
2061: Add_Where('PROJECT_ID') ||
2062: Add_Where('PAYMENT_PRIORITY') || Add_Where('PAY_GROUP') || Add_Where('VENDOR_TYPE') ||
2063: Add_Where('INCLUDE_HOLD_FLAG');
2064:
2104:
2105: select_clause := Get_Select_Clause;
2106: cep_standard.debug('Built Select Clause');
2107:
2108: IF (NVL(CE_CASH_FCST.G_discount_option,'N') = 'N') THEN
2109: cep_standard.debug('Discount NOT taken');
2110: from_clause := Get_From_Clause('ce_ap_fc_due_invoices_v');
2111: ELSE
2112: cep_standard.debug('Discount taken');
2115: cep_standard.debug('Built From Clause');
2116:
2117: where_clause := Get_Where_Clause || '
2118: AND src.trx_date BETWEEN cab.start_date - '
2119: ||to_char(CE_CASH_FCST.G_lead_time)||
2120: ' and cab.end_date - '
2121: ||to_char(CE_CASH_FCST.G_lead_time)||
2122: Add_Where('PROJECT_ID') ||
2123: Add_Where('PAYMENT_PRIORITY') || Add_Where('PAY_GROUP') || Add_Where('VENDOR_TYPE') ||
2117: where_clause := Get_Where_Clause || '
2118: AND src.trx_date BETWEEN cab.start_date - '
2119: ||to_char(CE_CASH_FCST.G_lead_time)||
2120: ' and cab.end_date - '
2121: ||to_char(CE_CASH_FCST.G_lead_time)||
2122: Add_Where('PROJECT_ID') ||
2123: Add_Where('PAYMENT_PRIORITY') || Add_Where('PAY_GROUP') || Add_Where('VENDOR_TYPE') ||
2124: Add_Where('INCLUDE_HOLD_FLAG');
2125:
2122: Add_Where('PROJECT_ID') ||
2123: Add_Where('PAYMENT_PRIORITY') || Add_Where('PAY_GROUP') || Add_Where('VENDOR_TYPE') ||
2124: Add_Where('INCLUDE_HOLD_FLAG');
2125:
2126: IF (CE_CASH_FCST.G_rp_project_id IS NOT NULL) THEN
2127: where_clause := where_clause || '
2128: AND src.invoice_id NOT IN ( select invoice_id
2129: from ap_invoice_distributions_all
2130: where project_id = ' || to_char(CE_CASH_FCST.G_rp_project_id) || ')';
2126: IF (CE_CASH_FCST.G_rp_project_id IS NOT NULL) THEN
2127: where_clause := where_clause || '
2128: AND src.invoice_id NOT IN ( select invoice_id
2129: from ap_invoice_distributions_all
2130: where project_id = ' || to_char(CE_CASH_FCST.G_rp_project_id) || ')';
2131:
2132: END IF;
2133:
2134: cep_standard.debug('Built Where Clause');
2136: main_query := select_clause || from_clause || where_clause;
2137:
2138: Execute_Main_Query (main_query);
2139:
2140: IF (CE_CASH_FCST.G_rp_project_id IS NOT NULL) THEN
2141: Build_AP_Project_Inv_Query;
2142: END IF;
2143:
2144: cep_standard.debug('<
2168: where_clause varchar2(1500);
2169: select_clause varchar2(1500);
2170: main_query varchar2(3500) := null;
2171: BEGIN
2172: CE_CASH_FCST.G_app_short_name := 'PA';
2173:
2174: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
2175: select_clause := '
2176: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2170: main_query varchar2(3500) := null;
2171: BEGIN
2172: CE_CASH_FCST.G_app_short_name := 'PA';
2173:
2174: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
2175: select_clause := '
2176: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2177: '||CE_CASH_FCST.G_forecast_id||',
2178: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2173:
2174: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
2175: select_clause := '
2176: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2177: '||CE_CASH_FCST.G_forecast_id||',
2178: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2179: '||CE_CASH_FCST.G_forecast_row_id||',
2180: ''Y'',
2181: nvl(fnd_global.user_id,-1),
2174: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
2175: select_clause := '
2176: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2177: '||CE_CASH_FCST.G_forecast_id||',
2178: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2179: '||CE_CASH_FCST.G_forecast_row_id||',
2180: ''Y'',
2181: nvl(fnd_global.user_id,-1),
2182: sysdate,
2175: select_clause := '
2176: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2177: '||CE_CASH_FCST.G_forecast_id||',
2178: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2179: '||CE_CASH_FCST.G_forecast_row_id||',
2180: ''Y'',
2181: nvl(fnd_global.user_id,-1),
2182: sysdate,
2183: nvl(fnd_global.user_id,-1),
2191: src.trx_date,
2192: null,
2193: null,
2194: round(nvl(src.amount,0)*'
2195: ||CE_CASH_FCST.G_rp_exchange_rate
2196: ||','||CE_CASH_FCST.G_precision||'),
2197: src.amount';
2198: ELSE
2199: select_clause := '
2192: null,
2193: null,
2194: round(nvl(src.amount,0)*'
2195: ||CE_CASH_FCST.G_rp_exchange_rate
2196: ||','||CE_CASH_FCST.G_precision||'),
2197: src.amount';
2198: ELSE
2199: select_clause := '
2200: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2197: src.amount';
2198: ELSE
2199: select_clause := '
2200: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2201: '||CE_CASH_FCST.G_forecast_id||',
2202: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2203: '||CE_CASH_FCST.G_forecast_row_id||',
2204: ''Y'',
2205: nvl(fnd_global.user_id,-1),
2198: ELSE
2199: select_clause := '
2200: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2201: '||CE_CASH_FCST.G_forecast_id||',
2202: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2203: '||CE_CASH_FCST.G_forecast_row_id||',
2204: ''Y'',
2205: nvl(fnd_global.user_id,-1),
2206: sysdate,
2199: select_clause := '
2200: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2201: '||CE_CASH_FCST.G_forecast_id||',
2202: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2203: '||CE_CASH_FCST.G_forecast_row_id||',
2204: ''Y'',
2205: nvl(fnd_global.user_id,-1),
2206: sysdate,
2207: nvl(fnd_global.user_id,-1),
2215: src.trx_date,
2216: null,
2217: null,
2218: round(nvl(src.amount,0)*curr.exchange_rate'
2219: ||','||CE_CASH_FCST.G_precision||'),
2220: src.amount';
2221: END IF;
2222:
2223: from_clause := Get_From_Clause ('pa_ce_invoices_v');
2222:
2223: from_clause := Get_From_Clause ('pa_ce_invoices_v');
2224: where_clause := Get_Where_Clause || '
2225: AND src.trx_date BETWEEN cab.start_date - '
2226: ||to_char(CE_CASH_FCST.G_lead_time)||
2227: ' and cab.end_date - '
2228: ||to_char(CE_CASH_FCST.G_lead_time)||
2229: Add_Where('PROJECT_ID') || Add_Where('CUSTOMER_PROFILE_CLASS_ID');
2230:
2224: where_clause := Get_Where_Clause || '
2225: AND src.trx_date BETWEEN cab.start_date - '
2226: ||to_char(CE_CASH_FCST.G_lead_time)||
2227: ' and cab.end_date - '
2228: ||to_char(CE_CASH_FCST.G_lead_time)||
2229: Add_Where('PROJECT_ID') || Add_Where('CUSTOMER_PROFILE_CLASS_ID');
2230:
2231: main_query := select_clause || from_clause || where_clause;
2232:
2263: main_query varchar2(3500) := null;
2264: BEGIN
2265: cep_standard.debug('>>Build_AR_Invoice_Query');
2266:
2267: IF (CE_CASH_FCST.G_include_dispute_flag = 'N') THEN
2268: IF( CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
2269: select_clause := ' SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2270: '||CE_CASH_FCST.G_forecast_id||',
2271: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2264: BEGIN
2265: cep_standard.debug('>>Build_AR_Invoice_Query');
2266:
2267: IF (CE_CASH_FCST.G_include_dispute_flag = 'N') THEN
2268: IF( CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
2269: select_clause := ' SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2270: '||CE_CASH_FCST.G_forecast_id||',
2271: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2272: '||CE_CASH_FCST.G_forecast_row_id||',
2266:
2267: IF (CE_CASH_FCST.G_include_dispute_flag = 'N') THEN
2268: IF( CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
2269: select_clause := ' SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2270: '||CE_CASH_FCST.G_forecast_id||',
2271: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2272: '||CE_CASH_FCST.G_forecast_row_id||',
2273: ''Y'',
2274: nvl(fnd_global.user_id,-1),
2267: IF (CE_CASH_FCST.G_include_dispute_flag = 'N') THEN
2268: IF( CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
2269: select_clause := ' SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2270: '||CE_CASH_FCST.G_forecast_id||',
2271: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2272: '||CE_CASH_FCST.G_forecast_row_id||',
2273: ''Y'',
2274: nvl(fnd_global.user_id,-1),
2275: sysdate,
2268: IF( CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
2269: select_clause := ' SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2270: '||CE_CASH_FCST.G_forecast_id||',
2271: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2272: '||CE_CASH_FCST.G_forecast_row_id||',
2273: ''Y'',
2274: nvl(fnd_global.user_id,-1),
2275: sysdate,
2276: nvl(fnd_global.user_id,-1),
2280: src.reference_id,
2281: src.currency_code,
2282: to_number(hr_ou.ORGANIZATION_ID),
2283: src.trx_date +'
2284: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
2285: null,
2286: null,
2287: round((nvl(src.amount,0)-nvl(src.dispute_amount,0))*'
2288: ||CE_CASH_FCST.G_rp_exchange_rate
2284: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
2285: null,
2286: null,
2287: round((nvl(src.amount,0)-nvl(src.dispute_amount,0))*'
2288: ||CE_CASH_FCST.G_rp_exchange_rate
2289: ||','||CE_CASH_FCST.G_precision||'),
2290: src.amount-src.dispute_amount';
2291: ELSE
2292: select_clause := ' SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2285: null,
2286: null,
2287: round((nvl(src.amount,0)-nvl(src.dispute_amount,0))*'
2288: ||CE_CASH_FCST.G_rp_exchange_rate
2289: ||','||CE_CASH_FCST.G_precision||'),
2290: src.amount-src.dispute_amount';
2291: ELSE
2292: select_clause := ' SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2293: '||CE_CASH_FCST.G_forecast_id||',
2289: ||','||CE_CASH_FCST.G_precision||'),
2290: src.amount-src.dispute_amount';
2291: ELSE
2292: select_clause := ' SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2293: '||CE_CASH_FCST.G_forecast_id||',
2294: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2295: '||CE_CASH_FCST.G_forecast_row_id||',
2296: ''Y'',
2297: nvl(fnd_global.user_id,-1),
2290: src.amount-src.dispute_amount';
2291: ELSE
2292: select_clause := ' SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2293: '||CE_CASH_FCST.G_forecast_id||',
2294: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2295: '||CE_CASH_FCST.G_forecast_row_id||',
2296: ''Y'',
2297: nvl(fnd_global.user_id,-1),
2298: sysdate,
2291: ELSE
2292: select_clause := ' SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2293: '||CE_CASH_FCST.G_forecast_id||',
2294: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2295: '||CE_CASH_FCST.G_forecast_row_id||',
2296: ''Y'',
2297: nvl(fnd_global.user_id,-1),
2298: sysdate,
2299: nvl(fnd_global.user_id,-1),
2303: src.reference_id,
2304: src.currency_code,
2305: to_number(hr_ou.ORGANIZATION_ID),
2306: src.trx_date +'
2307: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
2308: null,
2309: null,
2310: round((nvl(src.amount,0)-nvl(src.dispute_amount,0))*curr.exchange_rate'
2311: ||','||CE_CASH_FCST.G_precision||'),
2307: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
2308: null,
2309: null,
2310: round((nvl(src.amount,0)-nvl(src.dispute_amount,0))*curr.exchange_rate'
2311: ||','||CE_CASH_FCST.G_precision||'),
2312: src.amount-src.dispute_amount';
2313: END IF;
2314: ELSE
2315: select_clause := Get_Select_Clause;
2319:
2320: from_clause := Get_From_Clause ('ce_ar_fc_invoices_v');
2321: cep_standard.debug('Built From Clause');
2322:
2323: IF (CE_CASH_FCST.G_use_average_payment_days = 'Y') THEN
2324: where_clause := Get_Where_Clause || ' AND
2325: nvl(src.invoice_date, src.trx_date) + decode(src.invoice_date, null, '
2326: || to_char(CE_CASH_FCST.G_lead_time)
2327: || ', nvl( CE_CSH_FCST_POP.Get_Average_Payment_Days (src.customer_id, src.site_use_id, '
2322:
2323: IF (CE_CASH_FCST.G_use_average_payment_days = 'Y') THEN
2324: where_clause := Get_Where_Clause || ' AND
2325: nvl(src.invoice_date, src.trx_date) + decode(src.invoice_date, null, '
2326: || to_char(CE_CASH_FCST.G_lead_time)
2327: || ', nvl( CE_CSH_FCST_POP.Get_Average_Payment_Days (src.customer_id, src.site_use_id, '
2328: || ' src.currency_code, '
2329: || to_char(CE_CASH_FCST.G_apd_period)
2330: || '), (src.trx_date - src.invoice_date + '
2325: nvl(src.invoice_date, src.trx_date) + decode(src.invoice_date, null, '
2326: || to_char(CE_CASH_FCST.G_lead_time)
2327: || ', nvl( CE_CSH_FCST_POP.Get_Average_Payment_Days (src.customer_id, src.site_use_id, '
2328: || ' src.currency_code, '
2329: || to_char(CE_CASH_FCST.G_apd_period)
2330: || '), (src.trx_date - src.invoice_date + '
2331: || to_char(CE_CASH_FCST.G_lead_time)
2332: || ') '
2333: || ' ) ) BETWEEN cab.start_date and cab.end_date '||
2327: || ', nvl( CE_CSH_FCST_POP.Get_Average_Payment_Days (src.customer_id, src.site_use_id, '
2328: || ' src.currency_code, '
2329: || to_char(CE_CASH_FCST.G_apd_period)
2330: || '), (src.trx_date - src.invoice_date + '
2331: || to_char(CE_CASH_FCST.G_lead_time)
2332: || ') '
2333: || ' ) ) BETWEEN cab.start_date and cab.end_date '||
2334: Add_Where('CUSTOMER_PROFILE_CLASS_ID');
2335: ELSE
2334: Add_Where('CUSTOMER_PROFILE_CLASS_ID');
2335: ELSE
2336: where_clause := Get_Where_Clause || '
2337: AND src.trx_date BETWEEN cab.start_date - '
2338: ||to_char(CE_CASH_FCST.G_lead_time)||
2339: ' and cab.end_date - '
2340: ||to_char(CE_CASH_FCST.G_lead_time)||
2341: Add_Where('CUSTOMER_PROFILE_CLASS_ID');
2342: END IF;
2336: where_clause := Get_Where_Clause || '
2337: AND src.trx_date BETWEEN cab.start_date - '
2338: ||to_char(CE_CASH_FCST.G_lead_time)||
2339: ' and cab.end_date - '
2340: ||to_char(CE_CASH_FCST.G_lead_time)||
2341: Add_Where('CUSTOMER_PROFILE_CLASS_ID');
2342: END IF;
2343:
2344: IF (CE_CASH_FCST.G_rp_project_id IS NOT NULL) THEN
2340: ||to_char(CE_CASH_FCST.G_lead_time)||
2341: Add_Where('CUSTOMER_PROFILE_CLASS_ID');
2342: END IF;
2343:
2344: IF (CE_CASH_FCST.G_rp_project_id IS NOT NULL) THEN
2345: where_clause := where_clause || '
2346: AND src.customer_trx_id IN (select ctl.customer_trx_id
2347: from ra_customer_trx_lines_all ctl,
2348: pa_projects_all pa
2346: AND src.customer_trx_id IN (select ctl.customer_trx_id
2347: from ra_customer_trx_lines_all ctl,
2348: pa_projects_all pa
2349: where ctl.interface_line_attribute1 = pa.segment1
2350: and pa.project_id = ' || to_char(CE_CASH_FCST.G_rp_project_id) || ')';
2351:
2352: END IF;
2353:
2354: cep_standard.debug('Built Where Clause');
2356: main_query := select_clause || from_clause || where_clause;
2357:
2358: Execute_Main_Query (main_query);
2359:
2360: IF (CE_CASH_FCST.G_rp_project_id IS NOT NULL) THEN
2361: Build_PA_Invoice_Query;
2362: END IF;
2363:
2364: cep_standard.debug('<
2401: cep_standard.debug('Built From Clause');
2402:
2403: where_clause := Get_Where_Clause || Add_Where('BANK_ACCOUNT_ID') || Add_Where('RECEIPT_METHOD_ID');
2404:
2405: IF (NVL(CE_CASH_FCST.G_forecast_method,'F') = 'P') THEN
2406: BEGIN
2407: Set_History;
2408:
2409: EXCEPTION
2407: Set_History;
2408:
2409: EXCEPTION
2410: When NO_DATA_FOUND Then
2411: cep_standard.debug('row_id = ' || to_char(CE_CASH_FCST.G_forecast_row_id));
2412:
2413: UPDATE ce_forecasts
2414: SET error_status = 'E'
2415: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
2411: cep_standard.debug('row_id = ' || to_char(CE_CASH_FCST.G_forecast_row_id));
2412:
2413: UPDATE ce_forecasts
2414: SET error_status = 'E'
2415: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
2416:
2417: FND_MESSAGE.set_name('CE', 'CE_NO_HIST_START_PERIOD');
2418: error_msg := FND_MESSAGE.get;
2419: CE_FORECAST_ERRORS_PKG.insert_row(
2416:
2417: FND_MESSAGE.set_name('CE', 'CE_NO_HIST_START_PERIOD');
2418: error_msg := FND_MESSAGE.get;
2419: CE_FORECAST_ERRORS_PKG.insert_row(
2420: CE_CASH_FCST.G_forecast_id,
2421: CE_CASH_FCST.G_rp_forecast_header_id,
2422: CE_CASH_FCST.G_forecast_row_id,
2423: 'CE_NO_HIST_START_PERIOD',
2424: error_msg);
2417: FND_MESSAGE.set_name('CE', 'CE_NO_HIST_START_PERIOD');
2418: error_msg := FND_MESSAGE.get;
2419: CE_FORECAST_ERRORS_PKG.insert_row(
2420: CE_CASH_FCST.G_forecast_id,
2421: CE_CASH_FCST.G_rp_forecast_header_id,
2422: CE_CASH_FCST.G_forecast_row_id,
2423: 'CE_NO_HIST_START_PERIOD',
2424: error_msg);
2425: zero_fill_cells;
2418: error_msg := FND_MESSAGE.get;
2419: CE_FORECAST_ERRORS_PKG.insert_row(
2420: CE_CASH_FCST.G_forecast_id,
2421: CE_CASH_FCST.G_rp_forecast_header_id,
2422: CE_CASH_FCST.G_forecast_row_id,
2423: 'CE_NO_HIST_START_PERIOD',
2424: error_msg);
2425: zero_fill_cells;
2426: cep_standard.debug('EXCEPTION: No history data found for ARR');
2428: When OTHERS Then
2429: cep_standard.debug('EXCEPTION: Build ARR query - Set History');
2430: raise;
2431: END;
2432: IF (CE_CASH_FCST.G_order_date_type = 'V') THEN
2433: where_clause := where_clause || '
2434: AND NVL(src.actual_value_date,src.trx_date) BETWEEN cab.start_date and cab.end_date
2435: AND src.status in (''CLEARED'',''RISK_ELIMINATED'') ';
2436: trx_date_clause := 'NVL(src.actual_value_date,src.trx_date)';
2442: END IF;
2443: ELSE -- if Forecast Method is Future
2444: where_clause := where_clause || '
2445: AND src.cash_activity_date BETWEEN cab.start_date - '
2446: ||to_char(CE_CASH_FCST.G_lead_time)||
2447: ' and cab.end_date - '
2448: ||to_char(CE_CASH_FCST.G_lead_time)||
2449: ' AND src.status not in (''CLEARED'',''RISK_ELIMINATED'') ';
2450: trx_date_clause := 'src.cash_activity_date';
2444: where_clause := where_clause || '
2445: AND src.cash_activity_date BETWEEN cab.start_date - '
2446: ||to_char(CE_CASH_FCST.G_lead_time)||
2447: ' and cab.end_date - '
2448: ||to_char(CE_CASH_FCST.G_lead_time)||
2449: ' AND src.status not in (''CLEARED'',''RISK_ELIMINATED'') ';
2450: trx_date_clause := 'src.cash_activity_date';
2451: END IF;
2452:
2451: END IF;
2452:
2453: cep_standard.debug('Built Where Clause');
2454:
2455: IF(CE_CASH_FCST.G_rp_exchange_type = 'User') THEN
2456: select_clause := 'SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2457: '||CE_CASH_FCST.G_forecast_id||',
2458: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2459: '||CE_CASH_FCST.G_forecast_row_id||',
2453: cep_standard.debug('Built Where Clause');
2454:
2455: IF(CE_CASH_FCST.G_rp_exchange_type = 'User') THEN
2456: select_clause := 'SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2457: '||CE_CASH_FCST.G_forecast_id||',
2458: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2459: '||CE_CASH_FCST.G_forecast_row_id||',
2460: ''Y'',
2461: nvl(fnd_global.user_id,-1),
2454:
2455: IF(CE_CASH_FCST.G_rp_exchange_type = 'User') THEN
2456: select_clause := 'SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2457: '||CE_CASH_FCST.G_forecast_id||',
2458: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2459: '||CE_CASH_FCST.G_forecast_row_id||',
2460: ''Y'',
2461: nvl(fnd_global.user_id,-1),
2462: sysdate,
2455: IF(CE_CASH_FCST.G_rp_exchange_type = 'User') THEN
2456: select_clause := 'SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2457: '||CE_CASH_FCST.G_forecast_id||',
2458: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2459: '||CE_CASH_FCST.G_forecast_row_id||',
2460: ''Y'',
2461: nvl(fnd_global.user_id,-1),
2462: sysdate,
2463: nvl(fnd_global.user_id,-1),
2467: src.reference_id,
2468: src.currency_code,
2469: to_number(hr_ou.ORGANIZATION_ID),
2470: '||trx_date_clause||'+'
2471: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
2472: src.bank_account_id,
2473: ccid.asset_code_combination_id,
2474: round(nvl(src.amount,0)*'
2475: ||CE_CASH_FCST.G_rp_exchange_rate
2471: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
2472: src.bank_account_id,
2473: ccid.asset_code_combination_id,
2474: round(nvl(src.amount,0)*'
2475: ||CE_CASH_FCST.G_rp_exchange_rate
2476: ||','
2477: ||CE_CASH_FCST.G_precision||'),
2478: src.amount';
2479: ELSE
2473: ccid.asset_code_combination_id,
2474: round(nvl(src.amount,0)*'
2475: ||CE_CASH_FCST.G_rp_exchange_rate
2476: ||','
2477: ||CE_CASH_FCST.G_precision||'),
2478: src.amount';
2479: ELSE
2480: select_clause := 'SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2481: '||CE_CASH_FCST.G_forecast_id||',
2477: ||CE_CASH_FCST.G_precision||'),
2478: src.amount';
2479: ELSE
2480: select_clause := 'SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2481: '||CE_CASH_FCST.G_forecast_id||',
2482: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2483: '||CE_CASH_FCST.G_forecast_row_id||',
2484: ''Y'',
2485: nvl(fnd_global.user_id,-1),
2478: src.amount';
2479: ELSE
2480: select_clause := 'SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2481: '||CE_CASH_FCST.G_forecast_id||',
2482: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2483: '||CE_CASH_FCST.G_forecast_row_id||',
2484: ''Y'',
2485: nvl(fnd_global.user_id,-1),
2486: sysdate,
2479: ELSE
2480: select_clause := 'SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2481: '||CE_CASH_FCST.G_forecast_id||',
2482: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2483: '||CE_CASH_FCST.G_forecast_row_id||',
2484: ''Y'',
2485: nvl(fnd_global.user_id,-1),
2486: sysdate,
2487: nvl(fnd_global.user_id,-1),
2491: src.reference_id,
2492: src.currency_code,
2493: to_number(hr_ou.ORGANIZATION_ID),
2494: '||trx_date_clause||'+'
2495: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
2496: src.bank_account_id,
2497: ccid.asset_code_combination_id,
2498: round(nvl(src.amount,0)*curr.exchange_rate,'
2499: ||CE_CASH_FCST.G_precision||'),
2495: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
2496: src.bank_account_id,
2497: ccid.asset_code_combination_id,
2498: round(nvl(src.amount,0)*curr.exchange_rate,'
2499: ||CE_CASH_FCST.G_precision||'),
2500: src.amount';
2501: END IF;
2502: cep_standard.debug('Built Select Clause');
2503:
2520: | |
2521: | DESCRIPTION |
2522: | |
2523: | CALLED BY |
2524: | CE_CASH_FCST_POP.Build_GL_XXX_Query |
2525: | REQUIRES |
2526: | |
2527: | HISTORY |
2528: | 19-AUG-1996 Created Bidemi Carrol |
2530: FUNCTION Get_GL_General_Query RETURN VARCHAR2 IS
2531: main_query varchar2(2000) := null;
2532: BEGIN
2533: cep_standard.debug('>>Get_GL_General_Query');
2534: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
2535: main_query := ' SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2536: '||CE_CASH_FCST.G_forecast_id||',
2537: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2538: '||CE_CASH_FCST.G_forecast_row_id||',
2532: BEGIN
2533: cep_standard.debug('>>Get_GL_General_Query');
2534: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
2535: main_query := ' SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2536: '||CE_CASH_FCST.G_forecast_id||',
2537: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2538: '||CE_CASH_FCST.G_forecast_row_id||',
2539: ''Y'',
2540: nvl(fnd_global.user_id,-1),
2533: cep_standard.debug('>>Get_GL_General_Query');
2534: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
2535: main_query := ' SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2536: '||CE_CASH_FCST.G_forecast_id||',
2537: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2538: '||CE_CASH_FCST.G_forecast_row_id||',
2539: ''Y'',
2540: nvl(fnd_global.user_id,-1),
2541: sysdate,
2534: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
2535: main_query := ' SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2536: '||CE_CASH_FCST.G_forecast_id||',
2537: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2538: '||CE_CASH_FCST.G_forecast_row_id||',
2539: ''Y'',
2540: nvl(fnd_global.user_id,-1),
2541: sysdate,
2542: nvl(fnd_global.user_id,-1),
2548: null,
2549: gp.start_date,
2550: null,
2551: null,
2552: round((nvl(src.period_net_dr,0)-nvl(src.period_net_cr,0))*'||CE_CASH_FCST.G_rp_exchange_rate
2553: ||','||CE_CASH_FCST.G_precision||'),
2554: (nvl(src.period_net_dr,0)-nvl(src.period_net_cr,0))'; --bug4495616
2555: ELSE
2556: main_query := ' SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2549: gp.start_date,
2550: null,
2551: null,
2552: round((nvl(src.period_net_dr,0)-nvl(src.period_net_cr,0))*'||CE_CASH_FCST.G_rp_exchange_rate
2553: ||','||CE_CASH_FCST.G_precision||'),
2554: (nvl(src.period_net_dr,0)-nvl(src.period_net_cr,0))'; --bug4495616
2555: ELSE
2556: main_query := ' SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2557: '||CE_CASH_FCST.G_forecast_id||',
2553: ||','||CE_CASH_FCST.G_precision||'),
2554: (nvl(src.period_net_dr,0)-nvl(src.period_net_cr,0))'; --bug4495616
2555: ELSE
2556: main_query := ' SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2557: '||CE_CASH_FCST.G_forecast_id||',
2558: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2559: '||CE_CASH_FCST.G_forecast_row_id||',
2560: ''Y'',
2561: nvl(fnd_global.user_id,-1),
2554: (nvl(src.period_net_dr,0)-nvl(src.period_net_cr,0))'; --bug4495616
2555: ELSE
2556: main_query := ' SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2557: '||CE_CASH_FCST.G_forecast_id||',
2558: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2559: '||CE_CASH_FCST.G_forecast_row_id||',
2560: ''Y'',
2561: nvl(fnd_global.user_id,-1),
2562: sysdate,
2555: ELSE
2556: main_query := ' SELECT CE_FORECAST_TRX_CELLS_S.nextval,
2557: '||CE_CASH_FCST.G_forecast_id||',
2558: '||CE_CASH_FCST.G_rp_forecast_header_id||',
2559: '||CE_CASH_FCST.G_forecast_row_id||',
2560: ''Y'',
2561: nvl(fnd_global.user_id,-1),
2562: sysdate,
2563: nvl(fnd_global.user_id,-1),
2570: gp.start_date,
2571: null,
2572: null,
2573: round((nvl(src.period_net_dr,0)-nvl(src.period_net_cr,0))*curr.exchange_rate '
2574: ||','||CE_CASH_FCST.G_precision||'),
2575: (nvl(src.period_net_dr,0)-nvl(src.period_net_cr,0))'; --bug4495616
2576: END IF;
2577:
2578: main_query := main_query || '
2579: FROM gl_balances src,
2580: gl_periods gp,
2581: ce_forecast_ext_temp cab ';
2582:
2583: IF( CE_CASH_FCST.G_rp_exchange_type <> 'User' OR
2584: CE_CASH_FCST.G_rp_exchange_type IS NULL)THEN
2585: main_query := main_query || ',
2586: ce_currency_rates_temp curr ';
2587: END IF;
2580: gl_periods gp,
2581: ce_forecast_ext_temp cab ';
2582:
2583: IF( CE_CASH_FCST.G_rp_exchange_type <> 'User' OR
2584: CE_CASH_FCST.G_rp_exchange_type IS NULL)THEN
2585: main_query := main_query || ',
2586: ce_currency_rates_temp curr ';
2587: END IF;
2588:
2590: WHERE gp.start_date(+) = cab.start_date
2591: AND gp.period_name = src.period_name
2592: AND gp.period_type = src.period_type
2593: AND gp.period_year = src.period_year
2594: AND gp.period_set_name = '''||CE_CASH_FCST.G_rp_calendar_name||'''
2595: AND src.ledger_id = '||CE_CASH_FCST.G_set_of_books_id||'
2596: AND src.code_combination_id = '||CE_CASH_FCST.G_code_combination_id ||
2597: Add_Where('EXCHANGE_TYPE');
2598:
2591: AND gp.period_name = src.period_name
2592: AND gp.period_type = src.period_type
2593: AND gp.period_year = src.period_year
2594: AND gp.period_set_name = '''||CE_CASH_FCST.G_rp_calendar_name||'''
2595: AND src.ledger_id = '||CE_CASH_FCST.G_set_of_books_id||'
2596: AND src.code_combination_id = '||CE_CASH_FCST.G_code_combination_id ||
2597: Add_Where('EXCHANGE_TYPE');
2598:
2599: IF(CE_CASH_FCST.G_rp_src_curr_type = 'E')THEN
2592: AND gp.period_type = src.period_type
2593: AND gp.period_year = src.period_year
2594: AND gp.period_set_name = '''||CE_CASH_FCST.G_rp_calendar_name||'''
2595: AND src.ledger_id = '||CE_CASH_FCST.G_set_of_books_id||'
2596: AND src.code_combination_id = '||CE_CASH_FCST.G_code_combination_id ||
2597: Add_Where('EXCHANGE_TYPE');
2598:
2599: IF(CE_CASH_FCST.G_rp_src_curr_type = 'E')THEN
2600: main_query := main_query || '
2595: AND src.ledger_id = '||CE_CASH_FCST.G_set_of_books_id||'
2596: AND src.code_combination_id = '||CE_CASH_FCST.G_code_combination_id ||
2597: Add_Where('EXCHANGE_TYPE');
2598:
2599: IF(CE_CASH_FCST.G_rp_src_curr_type = 'E')THEN
2600: main_query := main_query || '
2601: AND src.currency_code = '''||CE_CASH_FCST.G_rp_src_currency||''' ';
2602: ELSIF(CE_CASH_FCST.G_rp_src_curr_type = 'F')THEN
2603: main_query := main_query || '
2597: Add_Where('EXCHANGE_TYPE');
2598:
2599: IF(CE_CASH_FCST.G_rp_src_curr_type = 'E')THEN
2600: main_query := main_query || '
2601: AND src.currency_code = '''||CE_CASH_FCST.G_rp_src_currency||''' ';
2602: ELSIF(CE_CASH_FCST.G_rp_src_curr_type = 'F')THEN
2603: main_query := main_query || '
2604: AND src.currency_code = DECODE('''||CE_CASH_FCST.G_sob_currency_code||''', '''||CE_CASH_FCST.G_rp_src_currency||''',src.currency_code, ''-1'')';
2605: END IF;
2598:
2599: IF(CE_CASH_FCST.G_rp_src_curr_type = 'E')THEN
2600: main_query := main_query || '
2601: AND src.currency_code = '''||CE_CASH_FCST.G_rp_src_currency||''' ';
2602: ELSIF(CE_CASH_FCST.G_rp_src_curr_type = 'F')THEN
2603: main_query := main_query || '
2604: AND src.currency_code = DECODE('''||CE_CASH_FCST.G_sob_currency_code||''', '''||CE_CASH_FCST.G_rp_src_currency||''',src.currency_code, ''-1'')';
2605: END IF;
2606:
2600: main_query := main_query || '
2601: AND src.currency_code = '''||CE_CASH_FCST.G_rp_src_currency||''' ';
2602: ELSIF(CE_CASH_FCST.G_rp_src_curr_type = 'F')THEN
2603: main_query := main_query || '
2604: AND src.currency_code = DECODE('''||CE_CASH_FCST.G_sob_currency_code||''', '''||CE_CASH_FCST.G_rp_src_currency||''',src.currency_code, ''-1'')';
2605: END IF;
2606:
2607: return (main_query);
2608: EXCEPTION
2619: | |
2620: | DESCRIPTION |
2621: | |
2622: | CALLED BY |
2623: | CE_CASH_FCST_POP.Cash_Forecast |
2624: | REQUIRES |
2625: | |
2626: | HISTORY |
2627: | 19-AUG-1996 Created Bidemi Carrol |
2631:
2632: BEGIN
2633: cep_standard.debug('>>Build_GL_Budget_Query');
2634: main_query := Get_GL_General_Query || '
2635: AND src.budget_version_id = '||CE_CASH_FCST.G_budget_version_id||'
2636: AND src.actual_flag = ''B'' ';
2637:
2638: Execute_Main_Query (main_query);
2639:
2652: | DESCRIPTION |
2653: | Calculates the GL encumbrances over specified periods, for a |
2654: | given code_combination_id |
2655: | CALLED BY |
2656: | CE_CASH_FCST_POP.Cash_Forecast |
2657: | REQUIRES |
2658: | |
2659: | HISTORY |
2660: | 19-AUG-1996 Created Bidemi Carrol |
2663: main_query varchar2(2000) := null;
2664: BEGIN
2665: cep_standard.debug('>>Build_GL_Encumb_Query');
2666: main_query := Get_GL_General_Query || '
2667: AND src.encumbrance_type_id = '||CE_CASH_FCST.G_encumbrance_type_id||'
2668: AND src.actual_flag = ''E'' ';
2669:
2670: Execute_Main_Query (main_query);
2671:
2684: | |
2685: | DESCRIPTION |
2686: | |
2687: | CALLED BY |
2688: | CE_CASH_FCST_POP.Cash_Forecast |
2689: | REQUIRES |
2690: | |
2691: | HISTORY |
2692: | 19-AUG-1996 Created Bidemi Carrol |
2742: where_clause := Get_Where_Clause || '
2743: AND src.effective_date BETWEEN cab.start_date and cab.end_date ' ||
2744: Add_Where('ORG_PAYMENT_METHOD_ID') || Add_Where('BANK_ACCOUNT_ID') || Add_Where('PAYROLL_ID');
2745:
2746: IF(CE_CASH_FCST.G_rp_src_curr_type = 'F')THEN
2747: IF(CE_CASH_FCST.G_set_of_books_id IS NULL)THEN
2748: where_clause := where_clause || '
2749: AND org.set_of_books_id IS NULL ';
2750: ELSE
2743: AND src.effective_date BETWEEN cab.start_date and cab.end_date ' ||
2744: Add_Where('ORG_PAYMENT_METHOD_ID') || Add_Where('BANK_ACCOUNT_ID') || Add_Where('PAYROLL_ID');
2745:
2746: IF(CE_CASH_FCST.G_rp_src_curr_type = 'F')THEN
2747: IF(CE_CASH_FCST.G_set_of_books_id IS NULL)THEN
2748: where_clause := where_clause || '
2749: AND org.set_of_books_id IS NULL ';
2750: ELSE
2751: where_clause := where_clause || '
2748: where_clause := where_clause || '
2749: AND org.set_of_books_id IS NULL ';
2750: ELSE
2751: where_clause := where_clause || '
2752: AND org.set_of_books_id = '||to_char(CE_CASH_FCST.G_set_of_books_id);
2753: END IF;
2754: END IF;
2755:
2756:
2758: Set_History;
2759:
2760: EXCEPTION
2761: When NO_DATA_FOUND Then
2762: cep_standard.debug('row_id = ' || to_char(CE_CASH_FCST.G_forecast_row_id));
2763:
2764: UPDATE ce_forecasts
2765: SET error_status = 'E'
2766: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
2762: cep_standard.debug('row_id = ' || to_char(CE_CASH_FCST.G_forecast_row_id));
2763:
2764: UPDATE ce_forecasts
2765: SET error_status = 'E'
2766: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
2767:
2768: FND_MESSAGE.set_name('CE', 'CE_NO_HIST_START_PERIOD');
2769: error_msg := FND_MESSAGE.get;
2770: CE_FORECAST_ERRORS_PKG.insert_row(
2767:
2768: FND_MESSAGE.set_name('CE', 'CE_NO_HIST_START_PERIOD');
2769: error_msg := FND_MESSAGE.get;
2770: CE_FORECAST_ERRORS_PKG.insert_row(
2771: CE_CASH_FCST.G_forecast_id,
2772: CE_CASH_FCST.G_rp_forecast_header_id,
2773: CE_CASH_FCST.G_forecast_row_id,
2774: 'CE_NO_HIST_START_PERIOD',
2775: error_msg);
2768: FND_MESSAGE.set_name('CE', 'CE_NO_HIST_START_PERIOD');
2769: error_msg := FND_MESSAGE.get;
2770: CE_FORECAST_ERRORS_PKG.insert_row(
2771: CE_CASH_FCST.G_forecast_id,
2772: CE_CASH_FCST.G_rp_forecast_header_id,
2773: CE_CASH_FCST.G_forecast_row_id,
2774: 'CE_NO_HIST_START_PERIOD',
2775: error_msg);
2776: zero_fill_cells;
2769: error_msg := FND_MESSAGE.get;
2770: CE_FORECAST_ERRORS_PKG.insert_row(
2771: CE_CASH_FCST.G_forecast_id,
2772: CE_CASH_FCST.G_rp_forecast_header_id,
2773: CE_CASH_FCST.G_forecast_row_id,
2774: 'CE_NO_HIST_START_PERIOD',
2775: error_msg);
2776: zero_fill_cells;
2777: cep_standard.debug('EXCEPTION: No Payroll historical data found');
2837: end_date,
2838: forecast_column_id
2839: FROM ce_forecast_ext_temp
2840: WHERE context_value = 'A'
2841: AND forecast_request_id = CE_CASH_FCST.G_forecast_id
2842: AND conversion_rate = CE_CASH_FCST.G_forecast_row_id;
2843:
2844: CURSOR C_sob(p_org_id NUMBER) IS
2845: SELECT 1
2838: forecast_column_id
2839: FROM ce_forecast_ext_temp
2840: WHERE context_value = 'A'
2841: AND forecast_request_id = CE_CASH_FCST.G_forecast_id
2842: AND conversion_rate = CE_CASH_FCST.G_forecast_row_id;
2843:
2844: CURSOR C_sob(p_org_id NUMBER) IS
2845: SELECT 1
2846: FROM CE_FORECAST_ORGS_V
2843:
2844: CURSOR C_sob(p_org_id NUMBER) IS
2845: SELECT 1
2846: FROM CE_FORECAST_ORGS_V
2847: WHERE set_of_books_id = CE_CASH_FCST.G_set_of_books_id
2848: AND org_id = p_org_id;
2849:
2850: CURSOR C_rate(p_currency_code VARCHAR2) IS
2851: SELECT exchange_rate
2849:
2850: CURSOR C_rate(p_currency_code VARCHAR2) IS
2851: SELECT exchange_rate
2852: FROM ce_currency_rates_temp
2853: WHERE forecast_request_id = CE_CASH_FCST.G_forecast_id
2854: AND to_currency = CE_CASH_FCST.G_rp_forecast_currency
2855: AND currency_code = p_currency_code;
2856:
2857: -- CE_CASH_FCST.G_rp_project_id IS NULL
2850: CURSOR C_rate(p_currency_code VARCHAR2) IS
2851: SELECT exchange_rate
2852: FROM ce_currency_rates_temp
2853: WHERE forecast_request_id = CE_CASH_FCST.G_forecast_id
2854: AND to_currency = CE_CASH_FCST.G_rp_forecast_currency
2855: AND currency_code = p_currency_code;
2856:
2857: -- CE_CASH_FCST.G_rp_project_id IS NULL
2858: -- CE_CASH_FCST.G_use_payment_terms = 'Y'
2853: WHERE forecast_request_id = CE_CASH_FCST.G_forecast_id
2854: AND to_currency = CE_CASH_FCST.G_rp_forecast_currency
2855: AND currency_code = p_currency_code;
2856:
2857: -- CE_CASH_FCST.G_rp_project_id IS NULL
2858: -- CE_CASH_FCST.G_use_payment_terms = 'Y'
2859: CURSOR C_orders_terms(p_start_date DATE, p_end_date DATE) IS
2860: (SELECT reference_id,
2861: currency_code,
2854: AND to_currency = CE_CASH_FCST.G_rp_forecast_currency
2855: AND currency_code = p_currency_code;
2856:
2857: -- CE_CASH_FCST.G_rp_project_id IS NULL
2858: -- CE_CASH_FCST.G_use_payment_terms = 'Y'
2859: CURSOR C_orders_terms(p_start_date DATE, p_end_date DATE) IS
2860: (SELECT reference_id,
2861: currency_code,
2862: org_id,
2903: WHERE start_date <= p_end_date
2904: AND (end_date >= p_start_date
2905: OR end_date is NULL));
2906:
2907: -- CE_CASH_FCST.G_rp_project_id IS NULL
2908: -- CE_CASH_FCST.G_use_payment_terms = 'N'
2909: CURSOR C_orders(p_start_date DATE, p_end_date DATE) IS
2910: SELECT reference_id,
2911: currency_code,
2904: AND (end_date >= p_start_date
2905: OR end_date is NULL));
2906:
2907: -- CE_CASH_FCST.G_rp_project_id IS NULL
2908: -- CE_CASH_FCST.G_use_payment_terms = 'N'
2909: CURSOR C_orders(p_start_date DATE, p_end_date DATE) IS
2910: SELECT reference_id,
2911: currency_code,
2912: org_id,
2923: WHERE start_date <= p_end_date
2924: AND (end_date >= p_start_date
2925: OR end_date is NULL);
2926:
2927: -- CE_CASH_FCST.G_rp_project_id IS NOT NULL
2928: -- CE_CASH_FCST.G_use_payment_terms = 'Y'
2929: CURSOR C_orders_terms_proj(p_start_date DATE, p_end_date DATE) IS
2930: (SELECT reference_id,
2931: currency_code,
2924: AND (end_date >= p_start_date
2925: OR end_date is NULL);
2926:
2927: -- CE_CASH_FCST.G_rp_project_id IS NOT NULL
2928: -- CE_CASH_FCST.G_use_payment_terms = 'Y'
2929: CURSOR C_orders_terms_proj(p_start_date DATE, p_end_date DATE) IS
2930: (SELECT reference_id,
2931: currency_code,
2932: org_id,
2951: FROM ce_po_fc_orders_terms_temp_v src
2952: WHERE start_date <= p_end_date
2953: AND (end_date >= p_start_date
2954: OR end_date is NULL)
2955: AND project_id = CE_CASH_FCST.G_rp_project_id
2956: UNION ALL
2957: SELECT reference_id,
2958: currency_code,
2959: org_id,
2973: FROM ce_po_fc_no_terms_temp_v
2974: WHERE start_date <= p_end_date
2975: AND (end_date >= p_start_date
2976: OR end_date is NULL)
2977: AND project_id = CE_CASH_FCST.G_rp_project_id);
2978:
2979:
2980: -- CE_CASH_FCST.G_rp_project_id IS NOT NULL
2981: -- CE_CASH_FCST.G_use_payment_terms = 'Y'
2976: OR end_date is NULL)
2977: AND project_id = CE_CASH_FCST.G_rp_project_id);
2978:
2979:
2980: -- CE_CASH_FCST.G_rp_project_id IS NOT NULL
2981: -- CE_CASH_FCST.G_use_payment_terms = 'Y'
2982: CURSOR C_orders_proj(p_start_date DATE, p_end_date DATE) IS
2983: SELECT reference_id,
2984: currency_code,
2977: AND project_id = CE_CASH_FCST.G_rp_project_id);
2978:
2979:
2980: -- CE_CASH_FCST.G_rp_project_id IS NOT NULL
2981: -- CE_CASH_FCST.G_use_payment_terms = 'Y'
2982: CURSOR C_orders_proj(p_start_date DATE, p_end_date DATE) IS
2983: SELECT reference_id,
2984: currency_code,
2985: org_id,
2995: FROM ce_po_fc_orders_temp_v
2996: WHERE start_date <= p_end_date
2997: AND (end_date >= p_start_date
2998: OR end_date is NULL)
2999: AND project_id = CE_CASH_FCST.G_rp_project_id;
3000:
3001: BEGIN
3002:
3003: cep_standard.debug('>>CE_CSH_FCAST_POP.Build_PO_Orders_Query');
3005: where_clause := Get_Where_Clause||
3006: Add_Where('AUTHORIZATION_STATUS') || Add_Where('PAYMENT_PRIORITY') ||
3007: Add_Where('PAY_GROUP') || Add_Where('VENDOR_TYPE') || Add_Where('PROJECT_ID');
3008:
3009: IF (CE_CASH_FCST.G_use_payment_terms = 'Y') THEN
3010: IF (CE_CASH_FCST.G_rp_exchange_type = 'User') THEN
3011: -- 5609517: Remove ORDERED hint as suggested by apps perf team
3012: -- select_clause_2 := 'SELECT /*+ ORDERED USE_MERGE(src)*/ CE_FORECAST_TRX_CELLS_S.nextval,
3013: select_clause_2 := 'SELECT CE_FORECAST_TRX_CELLS_S.nextval,
3006: Add_Where('AUTHORIZATION_STATUS') || Add_Where('PAYMENT_PRIORITY') ||
3007: Add_Where('PAY_GROUP') || Add_Where('VENDOR_TYPE') || Add_Where('PROJECT_ID');
3008:
3009: IF (CE_CASH_FCST.G_use_payment_terms = 'Y') THEN
3010: IF (CE_CASH_FCST.G_rp_exchange_type = 'User') THEN
3011: -- 5609517: Remove ORDERED hint as suggested by apps perf team
3012: -- select_clause_2 := 'SELECT /*+ ORDERED USE_MERGE(src)*/ CE_FORECAST_TRX_CELLS_S.nextval,
3013: select_clause_2 := 'SELECT CE_FORECAST_TRX_CELLS_S.nextval,
3014: '||CE_CASH_FCST.G_forecast_id||',
3010: IF (CE_CASH_FCST.G_rp_exchange_type = 'User') THEN
3011: -- 5609517: Remove ORDERED hint as suggested by apps perf team
3012: -- select_clause_2 := 'SELECT /*+ ORDERED USE_MERGE(src)*/ CE_FORECAST_TRX_CELLS_S.nextval,
3013: select_clause_2 := 'SELECT CE_FORECAST_TRX_CELLS_S.nextval,
3014: '||CE_CASH_FCST.G_forecast_id||',
3015: '||CE_CASH_FCST.G_rp_forecast_header_id||',
3016: '||CE_CASH_FCST.G_forecast_row_id||',
3017: ''Y'',
3018: nvl(fnd_global.user_id,-1),
3011: -- 5609517: Remove ORDERED hint as suggested by apps perf team
3012: -- select_clause_2 := 'SELECT /*+ ORDERED USE_MERGE(src)*/ CE_FORECAST_TRX_CELLS_S.nextval,
3013: select_clause_2 := 'SELECT CE_FORECAST_TRX_CELLS_S.nextval,
3014: '||CE_CASH_FCST.G_forecast_id||',
3015: '||CE_CASH_FCST.G_rp_forecast_header_id||',
3016: '||CE_CASH_FCST.G_forecast_row_id||',
3017: ''Y'',
3018: nvl(fnd_global.user_id,-1),
3019: sysdate,
3012: -- select_clause_2 := 'SELECT /*+ ORDERED USE_MERGE(src)*/ CE_FORECAST_TRX_CELLS_S.nextval,
3013: select_clause_2 := 'SELECT CE_FORECAST_TRX_CELLS_S.nextval,
3014: '||CE_CASH_FCST.G_forecast_id||',
3015: '||CE_CASH_FCST.G_rp_forecast_header_id||',
3016: '||CE_CASH_FCST.G_forecast_row_id||',
3017: ''Y'',
3018: nvl(fnd_global.user_id,-1),
3019: sysdate,
3020: nvl(fnd_global.user_id,-1),
3031: ''MONTH'')
3032: + src.due_day_of_month - 1)),
3033: src.trx_date + src.due_days),
3034: src.fixed_due_date) + '
3035: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
3036: null,
3037: null,
3038: round(-(nvl(decode(src.due_amount, 0,
3039: (select nvl(src.amount,0) - sum(t.due_amount) from ap_terms_lines t where t.term_id = src.term_id),
3036: null,
3037: null,
3038: round(-(nvl(decode(src.due_amount, 0,
3039: (select nvl(src.amount,0) - sum(t.due_amount) from ap_terms_lines t where t.term_id = src.term_id),
3040: src.due_amount),(nvl(src.amount,0) * (nvl(src.due_percent,100)/100)))) * ' || CE_CASH_FCST.G_rp_exchange_rate
3041: ||','||CE_CASH_FCST.G_precision||'),
3042: -(nvl(decode(src.due_amount, 0,
3043: (select nvl(src.amount,0) - sum(t.due_amount) from ap_terms_lines t where t.term_id = src.term_id),
3044: src.due_amount),(nvl(src.amount,0) * (nvl(src.due_percent,100)/100))))';
3037: null,
3038: round(-(nvl(decode(src.due_amount, 0,
3039: (select nvl(src.amount,0) - sum(t.due_amount) from ap_terms_lines t where t.term_id = src.term_id),
3040: src.due_amount),(nvl(src.amount,0) * (nvl(src.due_percent,100)/100)))) * ' || CE_CASH_FCST.G_rp_exchange_rate
3041: ||','||CE_CASH_FCST.G_precision||'),
3042: -(nvl(decode(src.due_amount, 0,
3043: (select nvl(src.amount,0) - sum(t.due_amount) from ap_terms_lines t where t.term_id = src.term_id),
3044: src.due_amount),(nvl(src.amount,0) * (nvl(src.due_percent,100)/100))))';
3045: ELSE
3045: ELSE
3046: -- 5609517: Remove ORDERED hint as suggested by apps perf team
3047: -- select_clause_2 := 'SELECT /*+ ORDERED USE_MERGE(src)*/ CE_FORECAST_TRX_CELLS_S.nextval,
3048: select_clause_2 := 'SELECT CE_FORECAST_TRX_CELLS_S.nextval,
3049: '||CE_CASH_FCST.G_forecast_id||',
3050: '||CE_CASH_FCST.G_rp_forecast_header_id||',
3051: '||CE_CASH_FCST.G_forecast_row_id||',
3052: ''Y'',
3053: nvl(fnd_global.user_id,-1),
3046: -- 5609517: Remove ORDERED hint as suggested by apps perf team
3047: -- select_clause_2 := 'SELECT /*+ ORDERED USE_MERGE(src)*/ CE_FORECAST_TRX_CELLS_S.nextval,
3048: select_clause_2 := 'SELECT CE_FORECAST_TRX_CELLS_S.nextval,
3049: '||CE_CASH_FCST.G_forecast_id||',
3050: '||CE_CASH_FCST.G_rp_forecast_header_id||',
3051: '||CE_CASH_FCST.G_forecast_row_id||',
3052: ''Y'',
3053: nvl(fnd_global.user_id,-1),
3054: sysdate,
3047: -- select_clause_2 := 'SELECT /*+ ORDERED USE_MERGE(src)*/ CE_FORECAST_TRX_CELLS_S.nextval,
3048: select_clause_2 := 'SELECT CE_FORECAST_TRX_CELLS_S.nextval,
3049: '||CE_CASH_FCST.G_forecast_id||',
3050: '||CE_CASH_FCST.G_rp_forecast_header_id||',
3051: '||CE_CASH_FCST.G_forecast_row_id||',
3052: ''Y'',
3053: nvl(fnd_global.user_id,-1),
3054: sysdate,
3055: nvl(fnd_global.user_id,-1),
3066: ''MONTH'')
3067: + src.due_day_of_month - 1)),
3068: src.trx_date + src.due_days),
3069: src.fixed_due_date) + '
3070: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
3071: null,
3072: null,
3073: round(-(nvl(decode(src.due_amount, 0,
3074: (select nvl(src.amount,0) - sum(t.due_amount) from ap_terms_lines t where t.term_id = src.term_id),
3072: null,
3073: round(-(nvl(decode(src.due_amount, 0,
3074: (select nvl(src.amount,0) - sum(t.due_amount) from ap_terms_lines t where t.term_id = src.term_id),
3075: src.due_amount),(nvl(src.amount,0) * (nvl(src.due_percent,100)/100))) * curr.exchange_rate)'
3076: ||','||CE_CASH_FCST.G_precision||'),
3077: -(nvl(decode(src.due_amount, 0,
3078: (select nvl(src.amount,0) - sum(t.due_amount) from ap_terms_lines t where t.term_id = src.term_id),
3079: src.due_amount),(nvl(src.amount,0) * (nvl(src.due_percent,100)/100))))';
3080: END IF;
3091: (TRUNC(ADD_MONTHS(src.trx_date, src.due_months_forward), ''MONTH'')
3092: + src.due_day_of_month - 1)),
3093: src.trx_date + src.due_days),
3094: src.fixed_due_date) BETWEEN cab.start_date - '
3095: ||to_char(CE_CASH_FCST.G_lead_time)||
3096: ' and cab.end_date - '
3097: ||to_char(CE_CASH_FCST.G_lead_time)||
3098: ' AND nvl(src.amount,0) <> 0';
3099:
3093: src.trx_date + src.due_days),
3094: src.fixed_due_date) BETWEEN cab.start_date - '
3095: ||to_char(CE_CASH_FCST.G_lead_time)||
3096: ' and cab.end_date - '
3097: ||to_char(CE_CASH_FCST.G_lead_time)||
3098: ' AND nvl(src.amount,0) <> 0';
3099:
3100: where_clause_3 := where_clause || '
3101: AND src.trx_date BETWEEN cab.start_date - '
3098: ' AND nvl(src.amount,0) <> 0';
3099:
3100: where_clause_3 := where_clause || '
3101: AND src.trx_date BETWEEN cab.start_date - '
3102: ||to_char(CE_CASH_FCST.G_lead_time)||
3103: ' and cab.end_date - '
3104: ||to_char(CE_CASH_FCST.G_lead_time);
3105:
3106: main_query_2 := select_clause_2 || from_clause_2 || where_clause_2;
3100: where_clause_3 := where_clause || '
3101: AND src.trx_date BETWEEN cab.start_date - '
3102: ||to_char(CE_CASH_FCST.G_lead_time)||
3103: ' and cab.end_date - '
3104: ||to_char(CE_CASH_FCST.G_lead_time);
3105:
3106: main_query_2 := select_clause_2 || from_clause_2 || where_clause_2;
3107: main_query_3 := select_clause_3 || from_clause_3 || where_clause_3;
3108:
3114: from_clause_1 := Get_From_Clause('ce_po_fc_orders_v');
3115:
3116: where_clause_1 := where_clause || '
3117: AND src.trx_date BETWEEN cab.start_date - '
3118: ||to_char(CE_CASH_FCST.G_lead_time)||
3119: ' and cab.end_date - '
3120: ||to_char(CE_CASH_FCST.G_lead_time);
3121:
3122: main_query_1 := select_clause_1 || from_clause_1 || where_clause_1;
3116: where_clause_1 := where_clause || '
3117: AND src.trx_date BETWEEN cab.start_date - '
3118: ||to_char(CE_CASH_FCST.G_lead_time)||
3119: ' and cab.end_date - '
3120: ||to_char(CE_CASH_FCST.G_lead_time);
3121:
3122: main_query_1 := select_clause_1 || from_clause_1 || where_clause_1;
3123:
3124: Execute_Main_Query (main_query_1);
3123:
3124: Execute_Main_Query (main_query_1);
3125: END IF;
3126:
3127: IF (CE_CASH_FCST.G_include_temp_labor_flag = 'Y') THEN
3128:
3129: populate_aging_buckets;
3130:
3131: SELECT max(end_date)
3131: SELECT max(end_date)
3132: INTO l_max_end_date
3133: FROM ce_forecast_ext_temp
3134: WHERE context_value = 'A'
3135: AND forecast_request_id = CE_CASH_FCST.G_forecast_id
3136: AND conversion_rate = CE_CASH_FCST.G_forecast_row_id;
3137: cep_standard.debug('l_max_end_date = ' || to_char(l_max_end_date, 'DD-MON-YYYY'));
3138:
3139: IF (CE_CASH_FCST.G_rp_project_id IS NULL) THEN
3132: INTO l_max_end_date
3133: FROM ce_forecast_ext_temp
3134: WHERE context_value = 'A'
3135: AND forecast_request_id = CE_CASH_FCST.G_forecast_id
3136: AND conversion_rate = CE_CASH_FCST.G_forecast_row_id;
3137: cep_standard.debug('l_max_end_date = ' || to_char(l_max_end_date, 'DD-MON-YYYY'));
3138:
3139: IF (CE_CASH_FCST.G_rp_project_id IS NULL) THEN
3140:
3135: AND forecast_request_id = CE_CASH_FCST.G_forecast_id
3136: AND conversion_rate = CE_CASH_FCST.G_forecast_row_id;
3137: cep_standard.debug('l_max_end_date = ' || to_char(l_max_end_date, 'DD-MON-YYYY'));
3138:
3139: IF (CE_CASH_FCST.G_rp_project_id IS NULL) THEN
3140:
3141: IF (CE_CASH_FCST.G_use_payment_terms = 'Y') THEN
3142:
3143: cep_standard.debug('PROJECT_ID IS NULL');
3137: cep_standard.debug('l_max_end_date = ' || to_char(l_max_end_date, 'DD-MON-YYYY'));
3138:
3139: IF (CE_CASH_FCST.G_rp_project_id IS NULL) THEN
3140:
3141: IF (CE_CASH_FCST.G_use_payment_terms = 'Y') THEN
3142:
3143: cep_standard.debug('PROJECT_ID IS NULL');
3144: cep_standard.debug('USE_PAYMENT_TERMS IS Y');
3145:
3187:
3188: cep_standard.debug('per_day_amount = ' || to_char(C_req_rec.per_day_amount));
3189: cep_standard.debug('l_amount = ' || to_char(l_amount));
3190:
3191: IF(CE_CASH_FCST.G_rp_src_curr_type in ('E','F') AND
3192: C_req_rec.currency_code <> CE_CASH_FCST.G_rp_src_currency) THEN
3193: l_amount := 0;
3194: END IF;
3195: cep_standard.debug('currency_code');
3188: cep_standard.debug('per_day_amount = ' || to_char(C_req_rec.per_day_amount));
3189: cep_standard.debug('l_amount = ' || to_char(l_amount));
3190:
3191: IF(CE_CASH_FCST.G_rp_src_curr_type in ('E','F') AND
3192: C_req_rec.currency_code <> CE_CASH_FCST.G_rp_src_currency) THEN
3193: l_amount := 0;
3194: END IF;
3195: cep_standard.debug('currency_code');
3196:
3194: END IF;
3195: cep_standard.debug('currency_code');
3196:
3197:
3198: IF(CE_CASH_FCST.G_authorization_status IS NOT NULL AND
3199: C_req_rec.status <> CE_CASH_FCST.G_authorization_status) THEN
3200: l_amount := 0;
3201: END IF;
3202: cep_standard.debug('authorization_status');
3195: cep_standard.debug('currency_code');
3196:
3197:
3198: IF(CE_CASH_FCST.G_authorization_status IS NOT NULL AND
3199: C_req_rec.status <> CE_CASH_FCST.G_authorization_status) THEN
3200: l_amount := 0;
3201: END IF;
3202: cep_standard.debug('authorization_status');
3203:
3201: END IF;
3202: cep_standard.debug('authorization_status');
3203:
3204:
3205: IF(CE_CASH_FCST.G_payment_priority IS NOT NULL AND
3206: C_req_rec.payment_priority <> CE_CASH_FCST.G_payment_priority ) THEN
3207: l_amount := 0;
3208: END IF;
3209: cep_standard.debug('payment_priority ');
3202: cep_standard.debug('authorization_status');
3203:
3204:
3205: IF(CE_CASH_FCST.G_payment_priority IS NOT NULL AND
3206: C_req_rec.payment_priority <> CE_CASH_FCST.G_payment_priority ) THEN
3207: l_amount := 0;
3208: END IF;
3209: cep_standard.debug('payment_priority ');
3210:
3208: END IF;
3209: cep_standard.debug('payment_priority ');
3210:
3211:
3212: IF(CE_CASH_FCST.G_pay_group IS NOT NULL AND
3213: C_req_rec.paygroup <> CE_CASH_FCST.G_pay_group) THEN
3214: l_amount := 0;
3215: END IF;
3216: cep_standard.debug('paygroup');
3209: cep_standard.debug('payment_priority ');
3210:
3211:
3212: IF(CE_CASH_FCST.G_pay_group IS NOT NULL AND
3213: C_req_rec.paygroup <> CE_CASH_FCST.G_pay_group) THEN
3214: l_amount := 0;
3215: END IF;
3216: cep_standard.debug('paygroup');
3217:
3215: END IF;
3216: cep_standard.debug('paygroup');
3217:
3218:
3219: IF(CE_CASH_FCST.G_vendor_type IS NOT NULL AND
3220: C_req_rec.vendor_type <> CE_CASH_FCST.G_vendor_type) THEN
3221: l_amount := 0;
3222: END IF;
3223: cep_standard.debug('vendor_type');
3216: cep_standard.debug('paygroup');
3217:
3218:
3219: IF(CE_CASH_FCST.G_vendor_type IS NOT NULL AND
3220: C_req_rec.vendor_type <> CE_CASH_FCST.G_vendor_type) THEN
3221: l_amount := 0;
3222: END IF;
3223: cep_standard.debug('vendor_type');
3224:
3228: WHERE organization_id = C_req_rec.org_id;
3229: cep_standard.debug('legal_entity_id');
3230:
3231:
3232: IF( (CE_CASH_FCST.G_org_id <> -1 AND CE_CASH_FCST.G_org_id <> -99) AND
3233: (nvl(C_req_rec.org_id,CE_CASH_FCST.G_org_id) <> CE_CASH_FCST.G_org_id) ) THEN
3234: l_amount := 0;
3235: END IF;
3236: cep_standard.debug('org_id');
3229: cep_standard.debug('legal_entity_id');
3230:
3231:
3232: IF( (CE_CASH_FCST.G_org_id <> -1 AND CE_CASH_FCST.G_org_id <> -99) AND
3233: (nvl(C_req_rec.org_id,CE_CASH_FCST.G_org_id) <> CE_CASH_FCST.G_org_id) ) THEN
3234: l_amount := 0;
3235: END IF;
3236: cep_standard.debug('org_id');
3237:
3235: END IF;
3236: cep_standard.debug('org_id');
3237:
3238:
3239: IF( CE_CASH_FCST.G_set_of_books_id IS NOT NULL AND
3240: CE_CASH_FCST.G_set_of_books_id <> -1) THEN
3241: OPEN C_sob(C_req_rec.org_id);
3242: FETCH C_sob INTO l_dummy;
3243: IF C_sob%NOTFOUND THEN
3236: cep_standard.debug('org_id');
3237:
3238:
3239: IF( CE_CASH_FCST.G_set_of_books_id IS NOT NULL AND
3240: CE_CASH_FCST.G_set_of_books_id <> -1) THEN
3241: OPEN C_sob(C_req_rec.org_id);
3242: FETCH C_sob INTO l_dummy;
3243: IF C_sob%NOTFOUND THEN
3244: CLOSE C_sob;
3247: CLOSE C_sob;
3248: END IF;
3249: cep_standard.debug('set_of_books_id');
3250:
3251: IF( CE_CASH_FCST.G_rp_exchange_type IS NULL OR
3252: CE_CASH_FCST.G_rp_exchange_type <> 'User')THEN
3253: OPEN C_rate(C_req_rec.currency_code);
3254: FETCH C_rate INTO l_rate;
3255: IF C_rate%NOTFOUND THEN
3248: END IF;
3249: cep_standard.debug('set_of_books_id');
3250:
3251: IF( CE_CASH_FCST.G_rp_exchange_type IS NULL OR
3252: CE_CASH_FCST.G_rp_exchange_type <> 'User')THEN
3253: OPEN C_rate(C_req_rec.currency_code);
3254: FETCH C_rate INTO l_rate;
3255: IF C_rate%NOTFOUND THEN
3256: l_rate := 1;
3255: IF C_rate%NOTFOUND THEN
3256: l_rate := 1;
3257: END IF;
3258: CLOSE C_rate;
3259: ELSIF (CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
3260: l_rate := CE_CASH_FCST.G_rp_exchange_rate;
3261: ELSE
3262: l_rate := 1;
3263: END IF;
3256: l_rate := 1;
3257: END IF;
3258: CLOSE C_rate;
3259: ELSIF (CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
3260: l_rate := CE_CASH_FCST.G_rp_exchange_rate;
3261: ELSE
3262: l_rate := 1;
3263: END IF;
3264: cep_standard.debug('exchange_rate');
3263: END IF;
3264: cep_standard.debug('exchange_rate');
3265:
3266:
3267: IF(CE_CASH_FCST.G_rp_amount_threshold IS NOT NULL) THEN
3268: IF (abs(l_amount) <= CE_CASH_FCST.G_rp_amount_threshold) THEN
3269: l_amount := 0;
3270: END IF;
3271: END IF;
3264: cep_standard.debug('exchange_rate');
3265:
3266:
3267: IF(CE_CASH_FCST.G_rp_amount_threshold IS NOT NULL) THEN
3268: IF (abs(l_amount) <= CE_CASH_FCST.G_rp_amount_threshold) THEN
3269: l_amount := 0;
3270: END IF;
3271: END IF;
3272: cep_standard.debug('amount_threshold');
3270: END IF;
3271: END IF;
3272: cep_standard.debug('amount_threshold');
3273:
3274: IF(C_rec.forecast_column_id = CE_CASH_FCST.G_overdue_column_id AND
3275: CE_CASH_FCST.G_invalid_overdue_row)THEN
3276: l_amount := 0;
3277: END IF;
3278: cep_standard.debug('OVERDUE_COLUMN');
3271: END IF;
3272: cep_standard.debug('amount_threshold');
3273:
3274: IF(C_rec.forecast_column_id = CE_CASH_FCST.G_overdue_column_id AND
3275: CE_CASH_FCST.G_invalid_overdue_row)THEN
3276: l_amount := 0;
3277: END IF;
3278: cep_standard.debug('OVERDUE_COLUMN');
3279:
3281: IF (C_req_rec.trx_end_date IS NULL and error_flag = FALSE) THEN
3282:
3283: UPDATE ce_forecasts
3284: SET error_status = 'X'
3285: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
3286:
3287: FND_MESSAGE.set_name('CE', 'CE_FC_POP_NO_END_DATE');
3288: error_msg := FND_MESSAGE.get;
3289: CE_FORECAST_ERRORS_PKG.insert_row(
3286:
3287: FND_MESSAGE.set_name('CE', 'CE_FC_POP_NO_END_DATE');
3288: error_msg := FND_MESSAGE.get;
3289: CE_FORECAST_ERRORS_PKG.insert_row(
3290: CE_CASH_FCST.G_forecast_id,
3291: CE_CASH_FCST.G_rp_forecast_header_id,
3292: CE_CASH_FCST.G_forecast_row_id,
3293: 'CE_FC_POP_NO_END_DATE',
3294: error_msg);
3287: FND_MESSAGE.set_name('CE', 'CE_FC_POP_NO_END_DATE');
3288: error_msg := FND_MESSAGE.get;
3289: CE_FORECAST_ERRORS_PKG.insert_row(
3290: CE_CASH_FCST.G_forecast_id,
3291: CE_CASH_FCST.G_rp_forecast_header_id,
3292: CE_CASH_FCST.G_forecast_row_id,
3293: 'CE_FC_POP_NO_END_DATE',
3294: error_msg);
3295: error_flag := TRUE;
3288: error_msg := FND_MESSAGE.get;
3289: CE_FORECAST_ERRORS_PKG.insert_row(
3290: CE_CASH_FCST.G_forecast_id,
3291: CE_CASH_FCST.G_rp_forecast_header_id,
3292: CE_CASH_FCST.G_forecast_row_id,
3293: 'CE_FC_POP_NO_END_DATE',
3294: error_msg);
3295: error_flag := TRUE;
3296: END IF;
3334:
3335: cep_standard.debug('per_day_amount = ' || to_char(C_req_rec.per_day_amount));
3336: cep_standard.debug('l_amount = ' || to_char(l_amount));
3337:
3338: IF(CE_CASH_FCST.G_rp_src_curr_type in ('E','F') AND
3339: C_req_rec.currency_code <> CE_CASH_FCST.G_rp_src_currency) THEN
3340: l_amount := 0;
3341: END IF;
3342: cep_standard.debug('currency_code');
3335: cep_standard.debug('per_day_amount = ' || to_char(C_req_rec.per_day_amount));
3336: cep_standard.debug('l_amount = ' || to_char(l_amount));
3337:
3338: IF(CE_CASH_FCST.G_rp_src_curr_type in ('E','F') AND
3339: C_req_rec.currency_code <> CE_CASH_FCST.G_rp_src_currency) THEN
3340: l_amount := 0;
3341: END IF;
3342: cep_standard.debug('currency_code');
3343:
3341: END IF;
3342: cep_standard.debug('currency_code');
3343:
3344:
3345: IF(CE_CASH_FCST.G_authorization_status IS NOT NULL AND
3346: C_req_rec.status <> CE_CASH_FCST.G_authorization_status) THEN
3347: l_amount := 0;
3348: END IF;
3349: cep_standard.debug('authorization_status');
3342: cep_standard.debug('currency_code');
3343:
3344:
3345: IF(CE_CASH_FCST.G_authorization_status IS NOT NULL AND
3346: C_req_rec.status <> CE_CASH_FCST.G_authorization_status) THEN
3347: l_amount := 0;
3348: END IF;
3349: cep_standard.debug('authorization_status');
3350:
3348: END IF;
3349: cep_standard.debug('authorization_status');
3350:
3351:
3352: IF(CE_CASH_FCST.G_payment_priority IS NOT NULL AND
3353: C_req_rec.payment_priority <> CE_CASH_FCST.G_payment_priority ) THEN
3354: l_amount := 0;
3355: END IF;
3356: cep_standard.debug('payment_priority ');
3349: cep_standard.debug('authorization_status');
3350:
3351:
3352: IF(CE_CASH_FCST.G_payment_priority IS NOT NULL AND
3353: C_req_rec.payment_priority <> CE_CASH_FCST.G_payment_priority ) THEN
3354: l_amount := 0;
3355: END IF;
3356: cep_standard.debug('payment_priority ');
3357:
3355: END IF;
3356: cep_standard.debug('payment_priority ');
3357:
3358:
3359: IF(CE_CASH_FCST.G_pay_group IS NOT NULL AND
3360: C_req_rec.paygroup <> CE_CASH_FCST.G_pay_group) THEN
3361: l_amount := 0;
3362: END IF;
3363: cep_standard.debug('paygroup');
3356: cep_standard.debug('payment_priority ');
3357:
3358:
3359: IF(CE_CASH_FCST.G_pay_group IS NOT NULL AND
3360: C_req_rec.paygroup <> CE_CASH_FCST.G_pay_group) THEN
3361: l_amount := 0;
3362: END IF;
3363: cep_standard.debug('paygroup');
3364:
3362: END IF;
3363: cep_standard.debug('paygroup');
3364:
3365:
3366: IF(CE_CASH_FCST.G_vendor_type IS NOT NULL AND
3367: C_req_rec.vendor_type <> CE_CASH_FCST.G_vendor_type) THEN
3368: l_amount := 0;
3369: END IF;
3370: cep_standard.debug('vendor_type');
3363: cep_standard.debug('paygroup');
3364:
3365:
3366: IF(CE_CASH_FCST.G_vendor_type IS NOT NULL AND
3367: C_req_rec.vendor_type <> CE_CASH_FCST.G_vendor_type) THEN
3368: l_amount := 0;
3369: END IF;
3370: cep_standard.debug('vendor_type');
3371:
3375: WHERE organization_id = C_req_rec.org_id;
3376: cep_standard.debug('legal_entity_id');
3377:
3378:
3379: IF( (CE_CASH_FCST.G_org_id <> -1 AND CE_CASH_FCST.G_org_id <> -99) AND
3380: (nvl(C_req_rec.org_id,CE_CASH_FCST.G_org_id) <> CE_CASH_FCST.G_org_id) ) THEN
3381: l_amount := 0;
3382: END IF;
3383: cep_standard.debug('org_id');
3376: cep_standard.debug('legal_entity_id');
3377:
3378:
3379: IF( (CE_CASH_FCST.G_org_id <> -1 AND CE_CASH_FCST.G_org_id <> -99) AND
3380: (nvl(C_req_rec.org_id,CE_CASH_FCST.G_org_id) <> CE_CASH_FCST.G_org_id) ) THEN
3381: l_amount := 0;
3382: END IF;
3383: cep_standard.debug('org_id');
3384:
3382: END IF;
3383: cep_standard.debug('org_id');
3384:
3385:
3386: IF( CE_CASH_FCST.G_set_of_books_id IS NOT NULL AND
3387: CE_CASH_FCST.G_set_of_books_id <> -1) THEN
3388: OPEN C_sob(C_req_rec.org_id);
3389: FETCH C_sob INTO l_dummy;
3390: IF C_sob%NOTFOUND THEN
3383: cep_standard.debug('org_id');
3384:
3385:
3386: IF( CE_CASH_FCST.G_set_of_books_id IS NOT NULL AND
3387: CE_CASH_FCST.G_set_of_books_id <> -1) THEN
3388: OPEN C_sob(C_req_rec.org_id);
3389: FETCH C_sob INTO l_dummy;
3390: IF C_sob%NOTFOUND THEN
3391: CLOSE C_sob;
3394: CLOSE C_sob;
3395: END IF;
3396: cep_standard.debug('set_of_books_id');
3397:
3398: IF( CE_CASH_FCST.G_rp_exchange_type IS NULL OR
3399: CE_CASH_FCST.G_rp_exchange_type <> 'User')THEN
3400: OPEN C_rate(C_req_rec.currency_code);
3401: FETCH C_rate INTO l_rate;
3402: IF C_rate%NOTFOUND THEN
3395: END IF;
3396: cep_standard.debug('set_of_books_id');
3397:
3398: IF( CE_CASH_FCST.G_rp_exchange_type IS NULL OR
3399: CE_CASH_FCST.G_rp_exchange_type <> 'User')THEN
3400: OPEN C_rate(C_req_rec.currency_code);
3401: FETCH C_rate INTO l_rate;
3402: IF C_rate%NOTFOUND THEN
3403: l_rate := 1;
3402: IF C_rate%NOTFOUND THEN
3403: l_rate := 1;
3404: END IF;
3405: CLOSE C_rate;
3406: ELSIF (CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
3407: l_rate := CE_CASH_FCST.G_rp_exchange_rate;
3408: ELSE
3409: l_rate := 1;
3410: END IF;
3403: l_rate := 1;
3404: END IF;
3405: CLOSE C_rate;
3406: ELSIF (CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
3407: l_rate := CE_CASH_FCST.G_rp_exchange_rate;
3408: ELSE
3409: l_rate := 1;
3410: END IF;
3411: cep_standard.debug('exchange_rate');
3409: l_rate := 1;
3410: END IF;
3411: cep_standard.debug('exchange_rate');
3412:
3413: IF(CE_CASH_FCST.G_rp_amount_threshold IS NOT NULL) THEN
3414: IF (abs(l_amount) <= CE_CASH_FCST.G_rp_amount_threshold) THEN
3415: l_amount := 0;
3416: END IF;
3417: END IF;
3410: END IF;
3411: cep_standard.debug('exchange_rate');
3412:
3413: IF(CE_CASH_FCST.G_rp_amount_threshold IS NOT NULL) THEN
3414: IF (abs(l_amount) <= CE_CASH_FCST.G_rp_amount_threshold) THEN
3415: l_amount := 0;
3416: END IF;
3417: END IF;
3418: cep_standard.debug('amount_threshold');
3416: END IF;
3417: END IF;
3418: cep_standard.debug('amount_threshold');
3419:
3420: IF(C_rec.forecast_column_id = CE_CASH_FCST.G_overdue_column_id AND
3421: CE_CASH_FCST.G_invalid_overdue_row)THEN
3422: l_amount := 0;
3423: END IF;
3424: cep_standard.debug('OVERDUE_COLUMN');
3417: END IF;
3418: cep_standard.debug('amount_threshold');
3419:
3420: IF(C_rec.forecast_column_id = CE_CASH_FCST.G_overdue_column_id AND
3421: CE_CASH_FCST.G_invalid_overdue_row)THEN
3422: l_amount := 0;
3423: END IF;
3424: cep_standard.debug('OVERDUE_COLUMN');
3425:
3427: IF (C_req_rec.trx_end_date IS NULL and error_flag = FALSE) THEN
3428:
3429: UPDATE ce_forecasts
3430: SET error_status = 'X'
3431: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
3432:
3433: FND_MESSAGE.set_name('CE', 'CE_FC_POP_NO_END_DATE');
3434: error_msg := FND_MESSAGE.get;
3435: CE_FORECAST_ERRORS_PKG.insert_row(
3432:
3433: FND_MESSAGE.set_name('CE', 'CE_FC_POP_NO_END_DATE');
3434: error_msg := FND_MESSAGE.get;
3435: CE_FORECAST_ERRORS_PKG.insert_row(
3436: CE_CASH_FCST.G_forecast_id,
3437: CE_CASH_FCST.G_rp_forecast_header_id,
3438: CE_CASH_FCST.G_forecast_row_id,
3439: 'CE_FC_POP_NO_END_DATE',
3440: error_msg);
3433: FND_MESSAGE.set_name('CE', 'CE_FC_POP_NO_END_DATE');
3434: error_msg := FND_MESSAGE.get;
3435: CE_FORECAST_ERRORS_PKG.insert_row(
3436: CE_CASH_FCST.G_forecast_id,
3437: CE_CASH_FCST.G_rp_forecast_header_id,
3438: CE_CASH_FCST.G_forecast_row_id,
3439: 'CE_FC_POP_NO_END_DATE',
3440: error_msg);
3441: error_flag := TRUE;
3434: error_msg := FND_MESSAGE.get;
3435: CE_FORECAST_ERRORS_PKG.insert_row(
3436: CE_CASH_FCST.G_forecast_id,
3437: CE_CASH_FCST.G_rp_forecast_header_id,
3438: CE_CASH_FCST.G_forecast_row_id,
3439: 'CE_FC_POP_NO_END_DATE',
3440: error_msg);
3441: error_flag := TRUE;
3442: END IF;
3449: clear_aging_buckets;
3450: zero_fill_cells;
3451: END IF;
3452: ELSE
3453: IF (CE_CASH_FCST.G_use_payment_terms = 'Y') THEN
3454:
3455: cep_standard.debug('PROJECT_ID IS NOT NULL');
3456: cep_standard.debug('USE_PAYMENT_TERMS IS Y');
3457:
3498:
3499: cep_standard.debug('per_day_amount_proj = ' || to_char(C_req_rec.per_day_amount));
3500: cep_standard.debug('l_amount_proj = ' || to_char(l_amount));
3501:
3502: IF(CE_CASH_FCST.G_rp_src_curr_type in ('E','F') AND
3503: C_req_rec.currency_code <> CE_CASH_FCST.G_rp_src_currency) THEN
3504: l_amount := 0;
3505: END IF;
3506: cep_standard.debug('currency_code_proj');
3499: cep_standard.debug('per_day_amount_proj = ' || to_char(C_req_rec.per_day_amount));
3500: cep_standard.debug('l_amount_proj = ' || to_char(l_amount));
3501:
3502: IF(CE_CASH_FCST.G_rp_src_curr_type in ('E','F') AND
3503: C_req_rec.currency_code <> CE_CASH_FCST.G_rp_src_currency) THEN
3504: l_amount := 0;
3505: END IF;
3506: cep_standard.debug('currency_code_proj');
3507:
3505: END IF;
3506: cep_standard.debug('currency_code_proj');
3507:
3508:
3509: IF(CE_CASH_FCST.G_authorization_status IS NOT NULL AND
3510: C_req_rec.status <> CE_CASH_FCST.G_authorization_status) THEN
3511: l_amount := 0;
3512: END IF;
3513: cep_standard.debug('authorization_status_proj');
3506: cep_standard.debug('currency_code_proj');
3507:
3508:
3509: IF(CE_CASH_FCST.G_authorization_status IS NOT NULL AND
3510: C_req_rec.status <> CE_CASH_FCST.G_authorization_status) THEN
3511: l_amount := 0;
3512: END IF;
3513: cep_standard.debug('authorization_status_proj');
3514:
3512: END IF;
3513: cep_standard.debug('authorization_status_proj');
3514:
3515:
3516: IF(CE_CASH_FCST.G_payment_priority IS NOT NULL AND
3517: C_req_rec.payment_priority <> CE_CASH_FCST.G_payment_priority ) THEN
3518: l_amount := 0;
3519: END IF;
3520: cep_standard.debug('payment_priority_proj');
3513: cep_standard.debug('authorization_status_proj');
3514:
3515:
3516: IF(CE_CASH_FCST.G_payment_priority IS NOT NULL AND
3517: C_req_rec.payment_priority <> CE_CASH_FCST.G_payment_priority ) THEN
3518: l_amount := 0;
3519: END IF;
3520: cep_standard.debug('payment_priority_proj');
3521:
3519: END IF;
3520: cep_standard.debug('payment_priority_proj');
3521:
3522:
3523: IF(CE_CASH_FCST.G_pay_group IS NOT NULL AND
3524: C_req_rec.paygroup <> CE_CASH_FCST.G_pay_group) THEN
3525: l_amount := 0;
3526: END IF;
3527: cep_standard.debug('paygroup_proj');
3520: cep_standard.debug('payment_priority_proj');
3521:
3522:
3523: IF(CE_CASH_FCST.G_pay_group IS NOT NULL AND
3524: C_req_rec.paygroup <> CE_CASH_FCST.G_pay_group) THEN
3525: l_amount := 0;
3526: END IF;
3527: cep_standard.debug('paygroup_proj');
3528:
3526: END IF;
3527: cep_standard.debug('paygroup_proj');
3528:
3529:
3530: IF(CE_CASH_FCST.G_vendor_type IS NOT NULL AND
3531: C_req_rec.vendor_type <> CE_CASH_FCST.G_vendor_type) THEN
3532: l_amount := 0;
3533: END IF;
3534: cep_standard.debug('vendor_type_proj');
3527: cep_standard.debug('paygroup_proj');
3528:
3529:
3530: IF(CE_CASH_FCST.G_vendor_type IS NOT NULL AND
3531: C_req_rec.vendor_type <> CE_CASH_FCST.G_vendor_type) THEN
3532: l_amount := 0;
3533: END IF;
3534: cep_standard.debug('vendor_type_proj');
3535:
3539: WHERE organization_id = C_req_rec.org_id;
3540: cep_standard.debug('legal_entity_id_proj');
3541:
3542:
3543: IF( (CE_CASH_FCST.G_org_id <> -1 AND CE_CASH_FCST.G_org_id <> -99) AND
3544: (nvl(C_req_rec.org_id,CE_CASH_FCST.G_org_id) <> CE_CASH_FCST.G_org_id) ) THEN
3545: l_amount := 0;
3546: END IF;
3547: cep_standard.debug('org_id_proj');
3540: cep_standard.debug('legal_entity_id_proj');
3541:
3542:
3543: IF( (CE_CASH_FCST.G_org_id <> -1 AND CE_CASH_FCST.G_org_id <> -99) AND
3544: (nvl(C_req_rec.org_id,CE_CASH_FCST.G_org_id) <> CE_CASH_FCST.G_org_id) ) THEN
3545: l_amount := 0;
3546: END IF;
3547: cep_standard.debug('org_id_proj');
3548:
3545: l_amount := 0;
3546: END IF;
3547: cep_standard.debug('org_id_proj');
3548:
3549: IF( CE_CASH_FCST.G_set_of_books_id IS NOT NULL AND
3550: CE_CASH_FCST.G_set_of_books_id <> -1) THEN
3551: OPEN C_sob(C_req_rec.org_id);
3552: FETCH C_sob INTO l_dummy;
3553: IF C_sob%NOTFOUND THEN
3546: END IF;
3547: cep_standard.debug('org_id_proj');
3548:
3549: IF( CE_CASH_FCST.G_set_of_books_id IS NOT NULL AND
3550: CE_CASH_FCST.G_set_of_books_id <> -1) THEN
3551: OPEN C_sob(C_req_rec.org_id);
3552: FETCH C_sob INTO l_dummy;
3553: IF C_sob%NOTFOUND THEN
3554: CLOSE C_sob;
3557: CLOSE C_sob;
3558: END IF;
3559: cep_standard.debug('set_of_books_id_proj');
3560:
3561: IF( CE_CASH_FCST.G_rp_exchange_type IS NULL OR
3562: CE_CASH_FCST.G_rp_exchange_type <> 'User')THEN
3563: OPEN C_rate(C_req_rec.currency_code);
3564: FETCH C_rate INTO l_rate;
3565: IF C_rate%NOTFOUND THEN
3558: END IF;
3559: cep_standard.debug('set_of_books_id_proj');
3560:
3561: IF( CE_CASH_FCST.G_rp_exchange_type IS NULL OR
3562: CE_CASH_FCST.G_rp_exchange_type <> 'User')THEN
3563: OPEN C_rate(C_req_rec.currency_code);
3564: FETCH C_rate INTO l_rate;
3565: IF C_rate%NOTFOUND THEN
3566: l_rate := 1;
3565: IF C_rate%NOTFOUND THEN
3566: l_rate := 1;
3567: END IF;
3568: CLOSE C_rate;
3569: ELSIF (CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
3570: l_rate := CE_CASH_FCST.G_rp_exchange_rate;
3571: ELSE
3572: l_rate := 1;
3573: END IF;
3566: l_rate := 1;
3567: END IF;
3568: CLOSE C_rate;
3569: ELSIF (CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
3570: l_rate := CE_CASH_FCST.G_rp_exchange_rate;
3571: ELSE
3572: l_rate := 1;
3573: END IF;
3574: cep_standard.debug('exchange_rate_proj');
3572: l_rate := 1;
3573: END IF;
3574: cep_standard.debug('exchange_rate_proj');
3575:
3576: IF(CE_CASH_FCST.G_rp_amount_threshold IS NOT NULL) THEN
3577: IF (abs(l_amount) <= CE_CASH_FCST.G_rp_amount_threshold) THEN
3578: l_amount := 0;
3579: END IF;
3580: END IF;
3573: END IF;
3574: cep_standard.debug('exchange_rate_proj');
3575:
3576: IF(CE_CASH_FCST.G_rp_amount_threshold IS NOT NULL) THEN
3577: IF (abs(l_amount) <= CE_CASH_FCST.G_rp_amount_threshold) THEN
3578: l_amount := 0;
3579: END IF;
3580: END IF;
3581: cep_standard.debug('amount_threshold_proj');
3579: END IF;
3580: END IF;
3581: cep_standard.debug('amount_threshold_proj');
3582:
3583: IF(C_rec.forecast_column_id = CE_CASH_FCST.G_overdue_column_id AND
3584: CE_CASH_FCST.G_invalid_overdue_row)THEN
3585: l_amount := 0;
3586: END IF;
3587: cep_standard.debug('OVERDUE_COLUMN_proj');
3580: END IF;
3581: cep_standard.debug('amount_threshold_proj');
3582:
3583: IF(C_rec.forecast_column_id = CE_CASH_FCST.G_overdue_column_id AND
3584: CE_CASH_FCST.G_invalid_overdue_row)THEN
3585: l_amount := 0;
3586: END IF;
3587: cep_standard.debug('OVERDUE_COLUMN_proj');
3588:
3590: IF (C_req_rec.trx_end_date IS NULL and error_flag = FALSE) THEN
3591:
3592: UPDATE ce_forecasts
3593: SET error_status = 'X'
3594: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
3595:
3596: FND_MESSAGE.set_name('CE', 'CE_FC_POP_NO_END_DATE');
3597: error_msg := FND_MESSAGE.get;
3598: CE_FORECAST_ERRORS_PKG.insert_row(
3595:
3596: FND_MESSAGE.set_name('CE', 'CE_FC_POP_NO_END_DATE');
3597: error_msg := FND_MESSAGE.get;
3598: CE_FORECAST_ERRORS_PKG.insert_row(
3599: CE_CASH_FCST.G_forecast_id,
3600: CE_CASH_FCST.G_rp_forecast_header_id,
3601: CE_CASH_FCST.G_forecast_row_id,
3602: 'CE_FC_POP_NO_END_DATE',
3603: error_msg);
3596: FND_MESSAGE.set_name('CE', 'CE_FC_POP_NO_END_DATE');
3597: error_msg := FND_MESSAGE.get;
3598: CE_FORECAST_ERRORS_PKG.insert_row(
3599: CE_CASH_FCST.G_forecast_id,
3600: CE_CASH_FCST.G_rp_forecast_header_id,
3601: CE_CASH_FCST.G_forecast_row_id,
3602: 'CE_FC_POP_NO_END_DATE',
3603: error_msg);
3604: error_flag := TRUE;
3597: error_msg := FND_MESSAGE.get;
3598: CE_FORECAST_ERRORS_PKG.insert_row(
3599: CE_CASH_FCST.G_forecast_id,
3600: CE_CASH_FCST.G_rp_forecast_header_id,
3601: CE_CASH_FCST.G_forecast_row_id,
3602: 'CE_FC_POP_NO_END_DATE',
3603: error_msg);
3604: error_flag := TRUE;
3605: END IF;
3642:
3643: cep_standard.debug('per_day_amount_proj = ' || to_char(C_req_rec.per_day_amount));
3644: cep_standard.debug('l_amount_proj = ' || to_char(l_amount));
3645:
3646: IF(CE_CASH_FCST.G_rp_src_curr_type in ('E','F') AND
3647: C_req_rec.currency_code <> CE_CASH_FCST.G_rp_src_currency) THEN
3648: l_amount := 0;
3649: END IF;
3650: cep_standard.debug('currency_code_proj');
3643: cep_standard.debug('per_day_amount_proj = ' || to_char(C_req_rec.per_day_amount));
3644: cep_standard.debug('l_amount_proj = ' || to_char(l_amount));
3645:
3646: IF(CE_CASH_FCST.G_rp_src_curr_type in ('E','F') AND
3647: C_req_rec.currency_code <> CE_CASH_FCST.G_rp_src_currency) THEN
3648: l_amount := 0;
3649: END IF;
3650: cep_standard.debug('currency_code_proj');
3651:
3649: END IF;
3650: cep_standard.debug('currency_code_proj');
3651:
3652:
3653: IF(CE_CASH_FCST.G_authorization_status IS NOT NULL AND
3654: C_req_rec.status <> CE_CASH_FCST.G_authorization_status) THEN
3655: l_amount := 0;
3656: END IF;
3657: cep_standard.debug('authorization_status_proj');
3650: cep_standard.debug('currency_code_proj');
3651:
3652:
3653: IF(CE_CASH_FCST.G_authorization_status IS NOT NULL AND
3654: C_req_rec.status <> CE_CASH_FCST.G_authorization_status) THEN
3655: l_amount := 0;
3656: END IF;
3657: cep_standard.debug('authorization_status_proj');
3658:
3656: END IF;
3657: cep_standard.debug('authorization_status_proj');
3658:
3659:
3660: IF(CE_CASH_FCST.G_payment_priority IS NOT NULL AND
3661: C_req_rec.payment_priority <> CE_CASH_FCST.G_payment_priority ) THEN
3662: l_amount := 0;
3663: END IF;
3664: cep_standard.debug('payment_priority_proj');
3657: cep_standard.debug('authorization_status_proj');
3658:
3659:
3660: IF(CE_CASH_FCST.G_payment_priority IS NOT NULL AND
3661: C_req_rec.payment_priority <> CE_CASH_FCST.G_payment_priority ) THEN
3662: l_amount := 0;
3663: END IF;
3664: cep_standard.debug('payment_priority_proj');
3665:
3663: END IF;
3664: cep_standard.debug('payment_priority_proj');
3665:
3666:
3667: IF(CE_CASH_FCST.G_pay_group IS NOT NULL AND
3668: C_req_rec.paygroup <> CE_CASH_FCST.G_pay_group) THEN
3669: l_amount := 0;
3670: END IF;
3671: cep_standard.debug('paygroup_proj');
3664: cep_standard.debug('payment_priority_proj');
3665:
3666:
3667: IF(CE_CASH_FCST.G_pay_group IS NOT NULL AND
3668: C_req_rec.paygroup <> CE_CASH_FCST.G_pay_group) THEN
3669: l_amount := 0;
3670: END IF;
3671: cep_standard.debug('paygroup_proj');
3672:
3670: END IF;
3671: cep_standard.debug('paygroup_proj');
3672:
3673:
3674: IF(CE_CASH_FCST.G_vendor_type IS NOT NULL AND
3675: C_req_rec.vendor_type <> CE_CASH_FCST.G_vendor_type) THEN
3676: l_amount := 0;
3677: END IF;
3678: cep_standard.debug('vendor_type_proj');
3671: cep_standard.debug('paygroup_proj');
3672:
3673:
3674: IF(CE_CASH_FCST.G_vendor_type IS NOT NULL AND
3675: C_req_rec.vendor_type <> CE_CASH_FCST.G_vendor_type) THEN
3676: l_amount := 0;
3677: END IF;
3678: cep_standard.debug('vendor_type_proj');
3679:
3682: FROM hr_operating_units
3683: WHERE organization_id = C_req_rec.org_id;
3684: cep_standard.debug('legal_entity_id_proj');
3685:
3686: IF( (CE_CASH_FCST.G_org_id <> -1 AND CE_CASH_FCST.G_org_id <> -99) AND
3687: (nvl(C_req_rec.org_id,CE_CASH_FCST.G_org_id) <> CE_CASH_FCST.G_org_id) ) THEN
3688: l_amount := 0;
3689: END IF;
3690: cep_standard.debug('org_id_proj');
3683: WHERE organization_id = C_req_rec.org_id;
3684: cep_standard.debug('legal_entity_id_proj');
3685:
3686: IF( (CE_CASH_FCST.G_org_id <> -1 AND CE_CASH_FCST.G_org_id <> -99) AND
3687: (nvl(C_req_rec.org_id,CE_CASH_FCST.G_org_id) <> CE_CASH_FCST.G_org_id) ) THEN
3688: l_amount := 0;
3689: END IF;
3690: cep_standard.debug('org_id_proj');
3691:
3688: l_amount := 0;
3689: END IF;
3690: cep_standard.debug('org_id_proj');
3691:
3692: IF( CE_CASH_FCST.G_set_of_books_id IS NOT NULL AND
3693: CE_CASH_FCST.G_set_of_books_id <> -1) THEN
3694: OPEN C_sob(C_req_rec.org_id);
3695: FETCH C_sob INTO l_dummy;
3696: IF C_sob%NOTFOUND THEN
3689: END IF;
3690: cep_standard.debug('org_id_proj');
3691:
3692: IF( CE_CASH_FCST.G_set_of_books_id IS NOT NULL AND
3693: CE_CASH_FCST.G_set_of_books_id <> -1) THEN
3694: OPEN C_sob(C_req_rec.org_id);
3695: FETCH C_sob INTO l_dummy;
3696: IF C_sob%NOTFOUND THEN
3697: CLOSE C_sob;
3700: CLOSE C_sob;
3701: END IF;
3702: cep_standard.debug('set_of_books_id_proj');
3703:
3704: IF( CE_CASH_FCST.G_rp_exchange_type IS NULL OR
3705: CE_CASH_FCST.G_rp_exchange_type <> 'User')THEN
3706: OPEN C_rate(C_req_rec.currency_code);
3707: FETCH C_rate INTO l_rate;
3708: IF C_rate%NOTFOUND THEN
3701: END IF;
3702: cep_standard.debug('set_of_books_id_proj');
3703:
3704: IF( CE_CASH_FCST.G_rp_exchange_type IS NULL OR
3705: CE_CASH_FCST.G_rp_exchange_type <> 'User')THEN
3706: OPEN C_rate(C_req_rec.currency_code);
3707: FETCH C_rate INTO l_rate;
3708: IF C_rate%NOTFOUND THEN
3709: l_rate := 1;
3708: IF C_rate%NOTFOUND THEN
3709: l_rate := 1;
3710: END IF;
3711: CLOSE C_rate;
3712: ELSIF (CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
3713: l_rate := CE_CASH_FCST.G_rp_exchange_rate;
3714: ELSE
3715: l_rate := 1;
3716: END IF;
3709: l_rate := 1;
3710: END IF;
3711: CLOSE C_rate;
3712: ELSIF (CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
3713: l_rate := CE_CASH_FCST.G_rp_exchange_rate;
3714: ELSE
3715: l_rate := 1;
3716: END IF;
3717: cep_standard.debug('exchange_rate_proj');
3715: l_rate := 1;
3716: END IF;
3717: cep_standard.debug('exchange_rate_proj');
3718:
3719: IF(CE_CASH_FCST.G_rp_amount_threshold IS NOT NULL) THEN
3720: IF (abs(l_amount) <= CE_CASH_FCST.G_rp_amount_threshold) THEN
3721: l_amount := 0;
3722: END IF;
3723: END IF;
3716: END IF;
3717: cep_standard.debug('exchange_rate_proj');
3718:
3719: IF(CE_CASH_FCST.G_rp_amount_threshold IS NOT NULL) THEN
3720: IF (abs(l_amount) <= CE_CASH_FCST.G_rp_amount_threshold) THEN
3721: l_amount := 0;
3722: END IF;
3723: END IF;
3724: cep_standard.debug('amount_threshold_proj');
3722: END IF;
3723: END IF;
3724: cep_standard.debug('amount_threshold_proj');
3725:
3726: IF(C_rec.forecast_column_id = CE_CASH_FCST.G_overdue_column_id AND
3727: CE_CASH_FCST.G_invalid_overdue_row)THEN
3728: l_amount := 0;
3729: END IF;
3730: cep_standard.debug('OVERDUE_COLUMN_proj');
3723: END IF;
3724: cep_standard.debug('amount_threshold_proj');
3725:
3726: IF(C_rec.forecast_column_id = CE_CASH_FCST.G_overdue_column_id AND
3727: CE_CASH_FCST.G_invalid_overdue_row)THEN
3728: l_amount := 0;
3729: END IF;
3730: cep_standard.debug('OVERDUE_COLUMN_proj');
3731:
3733: IF (C_req_rec.trx_end_date IS NULL and error_flag = FALSE) THEN
3734:
3735: UPDATE ce_forecasts
3736: SET error_status = 'X'
3737: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
3738:
3739: FND_MESSAGE.set_name('CE', 'CE_FC_POP_NO_END_DATE');
3740: error_msg := FND_MESSAGE.get;
3741: CE_FORECAST_ERRORS_PKG.insert_row(
3738:
3739: FND_MESSAGE.set_name('CE', 'CE_FC_POP_NO_END_DATE');
3740: error_msg := FND_MESSAGE.get;
3741: CE_FORECAST_ERRORS_PKG.insert_row(
3742: CE_CASH_FCST.G_forecast_id,
3743: CE_CASH_FCST.G_rp_forecast_header_id,
3744: CE_CASH_FCST.G_forecast_row_id,
3745: 'CE_FC_POP_NO_END_DATE',
3746: error_msg);
3739: FND_MESSAGE.set_name('CE', 'CE_FC_POP_NO_END_DATE');
3740: error_msg := FND_MESSAGE.get;
3741: CE_FORECAST_ERRORS_PKG.insert_row(
3742: CE_CASH_FCST.G_forecast_id,
3743: CE_CASH_FCST.G_rp_forecast_header_id,
3744: CE_CASH_FCST.G_forecast_row_id,
3745: 'CE_FC_POP_NO_END_DATE',
3746: error_msg);
3747: error_flag := TRUE;
3740: error_msg := FND_MESSAGE.get;
3741: CE_FORECAST_ERRORS_PKG.insert_row(
3742: CE_CASH_FCST.G_forecast_id,
3743: CE_CASH_FCST.G_rp_forecast_header_id,
3744: CE_CASH_FCST.G_forecast_row_id,
3745: 'CE_FC_POP_NO_END_DATE',
3746: error_msg);
3747: error_flag := TRUE;
3748: END IF;
3801: end_date,
3802: forecast_column_id
3803: FROM ce_forecast_ext_temp
3804: WHERE context_value = 'A'
3805: AND forecast_request_id = CE_CASH_FCST.G_forecast_id
3806: AND conversion_rate = CE_CASH_FCST.G_forecast_row_id;
3807:
3808:
3809: CURSOR C_sob(p_org_id NUMBER) IS
3802: forecast_column_id
3803: FROM ce_forecast_ext_temp
3804: WHERE context_value = 'A'
3805: AND forecast_request_id = CE_CASH_FCST.G_forecast_id
3806: AND conversion_rate = CE_CASH_FCST.G_forecast_row_id;
3807:
3808:
3809: CURSOR C_sob(p_org_id NUMBER) IS
3810: SELECT 1
3808:
3809: CURSOR C_sob(p_org_id NUMBER) IS
3810: SELECT 1
3811: FROM CE_FORECAST_ORGS_V
3812: WHERE set_of_books_id = CE_CASH_FCST.G_set_of_books_id
3813: AND org_id = p_org_id;
3814:
3815: CURSOR C_rate(p_currency_code VARCHAR2) IS
3816: SELECT exchange_rate
3814:
3815: CURSOR C_rate(p_currency_code VARCHAR2) IS
3816: SELECT exchange_rate
3817: FROM ce_currency_rates_temp
3818: WHERE forecast_request_id = CE_CASH_FCST.G_forecast_id
3819: AND to_currency = CE_CASH_FCST.G_rp_forecast_currency
3820: AND currency_code = p_currency_code;
3821:
3822: CURSOR C_requisitions(p_start_date DATE, p_end_date DATE) IS
3815: CURSOR C_rate(p_currency_code VARCHAR2) IS
3816: SELECT exchange_rate
3817: FROM ce_currency_rates_temp
3818: WHERE forecast_request_id = CE_CASH_FCST.G_forecast_id
3819: AND to_currency = CE_CASH_FCST.G_rp_forecast_currency
3820: AND currency_code = p_currency_code;
3821:
3822: CURSOR C_requisitions(p_start_date DATE, p_end_date DATE) IS
3823: SELECT reference_id,
3848: FROM ce_po_fc_requisitions_temp_v
3849: WHERE start_date <= p_end_date
3850: AND (end_date >= p_start_date
3851: OR end_date is NULL)
3852: AND project_id = CE_CASH_FCST.G_rp_project_id;
3853:
3854:
3855:
3856: BEGIN
3864: cep_standard.debug('Built From Clause');
3865:
3866: where_clause := Get_Where_Clause || '
3867: AND src.trx_date BETWEEN cab.start_date - '
3868: ||to_char(CE_CASH_FCST.G_lead_time)||
3869: ' and cab.end_date - '
3870: ||to_char(CE_CASH_FCST.G_lead_time)||
3871: Add_Where('AUTHORIZATION_STATUS') || Add_Where('PROJECT_ID');
3872:
3866: where_clause := Get_Where_Clause || '
3867: AND src.trx_date BETWEEN cab.start_date - '
3868: ||to_char(CE_CASH_FCST.G_lead_time)||
3869: ' and cab.end_date - '
3870: ||to_char(CE_CASH_FCST.G_lead_time)||
3871: Add_Where('AUTHORIZATION_STATUS') || Add_Where('PROJECT_ID');
3872:
3873:
3874: cep_standard.debug('Built Where Clause');
3878: Execute_Main_Query (main_query);
3879:
3880: cep_standard.debug('Execute_Main_Query');
3881:
3882: IF (CE_CASH_FCST.G_include_temp_labor_flag = 'Y') THEN
3883:
3884: populate_aging_buckets;
3885:
3886: SELECT trunc(max(end_date))
3886: SELECT trunc(max(end_date))
3887: INTO l_max_end_date
3888: FROM ce_forecast_ext_temp
3889: WHERE context_value = 'A'
3890: AND forecast_request_id = CE_CASH_FCST.G_forecast_id
3891: AND conversion_rate = CE_CASH_FCST.G_forecast_row_id;
3892: cep_standard.debug('l_max_end_date = ' || to_char(l_max_end_date, 'DD-MON-YYYY'));
3893:
3894: IF (CE_CASH_FCST.G_rp_project_id IS NULL) THEN
3887: INTO l_max_end_date
3888: FROM ce_forecast_ext_temp
3889: WHERE context_value = 'A'
3890: AND forecast_request_id = CE_CASH_FCST.G_forecast_id
3891: AND conversion_rate = CE_CASH_FCST.G_forecast_row_id;
3892: cep_standard.debug('l_max_end_date = ' || to_char(l_max_end_date, 'DD-MON-YYYY'));
3893:
3894: IF (CE_CASH_FCST.G_rp_project_id IS NULL) THEN
3895: cep_standard.debug('PROJECT_ID IS NULL');
3890: AND forecast_request_id = CE_CASH_FCST.G_forecast_id
3891: AND conversion_rate = CE_CASH_FCST.G_forecast_row_id;
3892: cep_standard.debug('l_max_end_date = ' || to_char(l_max_end_date, 'DD-MON-YYYY'));
3893:
3894: IF (CE_CASH_FCST.G_rp_project_id IS NULL) THEN
3895: cep_standard.debug('PROJECT_ID IS NULL');
3896:
3897: FOR C_rec IN C_period LOOP
3898: FOR C_req_rec in C_requisitions(C_rec.start_date, C_rec.end_date) LOOP
3920:
3921: cep_standard.debug('per_day_amount = ' || to_char(C_req_rec.per_day_amount));
3922: cep_standard.debug('l_amount = ' || to_char(l_amount));
3923:
3924: IF(CE_CASH_FCST.G_rp_src_curr_type in ('E','F') AND
3925: C_req_rec.currency_code <> CE_CASH_FCST.G_rp_src_currency) THEN
3926: l_amount := 0;
3927: END IF;
3928: cep_standard.debug('currency_code');
3921: cep_standard.debug('per_day_amount = ' || to_char(C_req_rec.per_day_amount));
3922: cep_standard.debug('l_amount = ' || to_char(l_amount));
3923:
3924: IF(CE_CASH_FCST.G_rp_src_curr_type in ('E','F') AND
3925: C_req_rec.currency_code <> CE_CASH_FCST.G_rp_src_currency) THEN
3926: l_amount := 0;
3927: END IF;
3928: cep_standard.debug('currency_code');
3929:
3926: l_amount := 0;
3927: END IF;
3928: cep_standard.debug('currency_code');
3929:
3930: IF(CE_CASH_FCST.G_authorization_status IS NOT NULL AND
3931: C_req_rec.status <> CE_CASH_FCST.G_authorization_status) THEN
3932: l_amount := 0;
3933: END IF;
3934: cep_standard.debug('authorization_status');
3927: END IF;
3928: cep_standard.debug('currency_code');
3929:
3930: IF(CE_CASH_FCST.G_authorization_status IS NOT NULL AND
3931: C_req_rec.status <> CE_CASH_FCST.G_authorization_status) THEN
3932: l_amount := 0;
3933: END IF;
3934: cep_standard.debug('authorization_status');
3935:
3938: FROM hr_operating_units
3939: WHERE organization_id = C_req_rec.org_id;
3940: cep_standard.debug('legal_entity_id');
3941:
3942: IF( (CE_CASH_FCST.G_org_id <> -1 AND CE_CASH_FCST.G_org_id <> -99) AND
3943: (nvl(C_req_rec.org_id, CE_CASH_FCST.G_org_id) <> CE_CASH_FCST.G_org_id) ) THEN
3944: l_amount := 0;
3945: END IF;
3946: cep_standard.debug('org_id');
3939: WHERE organization_id = C_req_rec.org_id;
3940: cep_standard.debug('legal_entity_id');
3941:
3942: IF( (CE_CASH_FCST.G_org_id <> -1 AND CE_CASH_FCST.G_org_id <> -99) AND
3943: (nvl(C_req_rec.org_id, CE_CASH_FCST.G_org_id) <> CE_CASH_FCST.G_org_id) ) THEN
3944: l_amount := 0;
3945: END IF;
3946: cep_standard.debug('org_id');
3947:
3944: l_amount := 0;
3945: END IF;
3946: cep_standard.debug('org_id');
3947:
3948: IF( CE_CASH_FCST.G_set_of_books_id IS NOT NULL AND
3949: CE_CASH_FCST.G_set_of_books_id <> -1) THEN
3950: OPEN C_sob(C_req_rec.org_id);
3951: FETCH C_sob INTO l_dummy;
3952: IF C_sob%NOTFOUND THEN
3945: END IF;
3946: cep_standard.debug('org_id');
3947:
3948: IF( CE_CASH_FCST.G_set_of_books_id IS NOT NULL AND
3949: CE_CASH_FCST.G_set_of_books_id <> -1) THEN
3950: OPEN C_sob(C_req_rec.org_id);
3951: FETCH C_sob INTO l_dummy;
3952: IF C_sob%NOTFOUND THEN
3953: CLOSE C_sob;
3956: CLOSE C_sob;
3957: END IF;
3958: cep_standard.debug('set_of_books_id');
3959:
3960: IF( CE_CASH_FCST.G_rp_exchange_type IS NULL OR
3961: CE_CASH_FCST.G_rp_exchange_type <> 'User')THEN
3962: OPEN C_rate(C_req_rec.currency_code);
3963: FETCH C_rate INTO l_rate;
3964: IF C_rate%NOTFOUND THEN
3957: END IF;
3958: cep_standard.debug('set_of_books_id');
3959:
3960: IF( CE_CASH_FCST.G_rp_exchange_type IS NULL OR
3961: CE_CASH_FCST.G_rp_exchange_type <> 'User')THEN
3962: OPEN C_rate(C_req_rec.currency_code);
3963: FETCH C_rate INTO l_rate;
3964: IF C_rate%NOTFOUND THEN
3965: l_rate := 1;
3964: IF C_rate%NOTFOUND THEN
3965: l_rate := 1;
3966: END IF;
3967: CLOSE C_rate;
3968: ELSIF( CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
3969: l_rate := CE_CASH_FCST.G_rp_exchange_rate;
3970: ELSE
3971: l_rate := 1;
3972: END IF;
3965: l_rate := 1;
3966: END IF;
3967: CLOSE C_rate;
3968: ELSIF( CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
3969: l_rate := CE_CASH_FCST.G_rp_exchange_rate;
3970: ELSE
3971: l_rate := 1;
3972: END IF;
3973: cep_standard.debug('exchange_rate');
3971: l_rate := 1;
3972: END IF;
3973: cep_standard.debug('exchange_rate');
3974:
3975: IF(CE_CASH_FCST.G_rp_amount_threshold IS NOT NULL) THEN
3976: IF (abs(l_amount) <= CE_CASH_FCST.G_rp_amount_threshold) THEN
3977: l_amount := 0;
3978: END IF;
3979: END IF;
3972: END IF;
3973: cep_standard.debug('exchange_rate');
3974:
3975: IF(CE_CASH_FCST.G_rp_amount_threshold IS NOT NULL) THEN
3976: IF (abs(l_amount) <= CE_CASH_FCST.G_rp_amount_threshold) THEN
3977: l_amount := 0;
3978: END IF;
3979: END IF;
3980: cep_standard.debug('amount_threshold');
3978: END IF;
3979: END IF;
3980: cep_standard.debug('amount_threshold');
3981:
3982: IF(C_rec.forecast_column_id = CE_CASH_FCST.G_overdue_column_id AND
3983: CE_CASH_FCST.G_invalid_overdue_row)THEN
3984: l_amount := 0;
3985: END IF;
3986: cep_standard.debug('OVERDUE_COLUMN');
3979: END IF;
3980: cep_standard.debug('amount_threshold');
3981:
3982: IF(C_rec.forecast_column_id = CE_CASH_FCST.G_overdue_column_id AND
3983: CE_CASH_FCST.G_invalid_overdue_row)THEN
3984: l_amount := 0;
3985: END IF;
3986: cep_standard.debug('OVERDUE_COLUMN');
3987:
3989: IF (C_req_rec.trx_end_date IS NULL and error_flag = FALSE) THEN
3990:
3991: UPDATE ce_forecasts
3992: SET error_status = 'X'
3993: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
3994:
3995: FND_MESSAGE.set_name('CE', 'CE_FC_POR_NO_END_DATE');
3996: error_msg := FND_MESSAGE.get;
3997: CE_FORECAST_ERRORS_PKG.insert_row(
3994:
3995: FND_MESSAGE.set_name('CE', 'CE_FC_POR_NO_END_DATE');
3996: error_msg := FND_MESSAGE.get;
3997: CE_FORECAST_ERRORS_PKG.insert_row(
3998: CE_CASH_FCST.G_forecast_id,
3999: CE_CASH_FCST.G_rp_forecast_header_id,
4000: CE_CASH_FCST.G_forecast_row_id,
4001: 'CE_FC_POR_NO_END_DATE',
4002: error_msg);
3995: FND_MESSAGE.set_name('CE', 'CE_FC_POR_NO_END_DATE');
3996: error_msg := FND_MESSAGE.get;
3997: CE_FORECAST_ERRORS_PKG.insert_row(
3998: CE_CASH_FCST.G_forecast_id,
3999: CE_CASH_FCST.G_rp_forecast_header_id,
4000: CE_CASH_FCST.G_forecast_row_id,
4001: 'CE_FC_POR_NO_END_DATE',
4002: error_msg);
4003: error_flag := TRUE;
3996: error_msg := FND_MESSAGE.get;
3997: CE_FORECAST_ERRORS_PKG.insert_row(
3998: CE_CASH_FCST.G_forecast_id,
3999: CE_CASH_FCST.G_rp_forecast_header_id,
4000: CE_CASH_FCST.G_forecast_row_id,
4001: 'CE_FC_POR_NO_END_DATE',
4002: error_msg);
4003: error_flag := TRUE;
4004: END IF;
4044:
4045: cep_standard.debug('per_day_amount_proj = ' || to_char(C_req_rec.per_day_amount));
4046: cep_standard.debug('l_amount_proj = ' || to_char(l_amount));
4047:
4048: IF(CE_CASH_FCST.G_rp_src_curr_type in ('E','F') AND
4049: C_req_rec.currency_code <> CE_CASH_FCST.G_rp_src_currency) THEN
4050: l_amount := 0;
4051: END IF;
4052: cep_standard.debug('currency_code_proj');
4045: cep_standard.debug('per_day_amount_proj = ' || to_char(C_req_rec.per_day_amount));
4046: cep_standard.debug('l_amount_proj = ' || to_char(l_amount));
4047:
4048: IF(CE_CASH_FCST.G_rp_src_curr_type in ('E','F') AND
4049: C_req_rec.currency_code <> CE_CASH_FCST.G_rp_src_currency) THEN
4050: l_amount := 0;
4051: END IF;
4052: cep_standard.debug('currency_code_proj');
4053:
4050: l_amount := 0;
4051: END IF;
4052: cep_standard.debug('currency_code_proj');
4053:
4054: IF(CE_CASH_FCST.G_authorization_status IS NOT NULL AND
4055: C_req_rec.status <> CE_CASH_FCST.G_authorization_status) THEN
4056: l_amount := 0;
4057: END IF;
4058: cep_standard.debug('authorization_status_proj');
4051: END IF;
4052: cep_standard.debug('currency_code_proj');
4053:
4054: IF(CE_CASH_FCST.G_authorization_status IS NOT NULL AND
4055: C_req_rec.status <> CE_CASH_FCST.G_authorization_status) THEN
4056: l_amount := 0;
4057: END IF;
4058: cep_standard.debug('authorization_status_proj');
4059:
4062: FROM hr_operating_units
4063: WHERE organization_id = C_req_rec.org_id;
4064: cep_standard.debug('legal_entity_id_proj');
4065:
4066: IF( (CE_CASH_FCST.G_org_id <> -1 AND CE_CASH_FCST.G_org_id <> -99) AND
4067: (nvl(C_req_rec.org_id, CE_CASH_FCST.G_org_id) <> CE_CASH_FCST.G_org_id) ) THEN
4068: l_amount := 0;
4069: END IF;
4070: cep_standard.debug('org_id_proj');
4063: WHERE organization_id = C_req_rec.org_id;
4064: cep_standard.debug('legal_entity_id_proj');
4065:
4066: IF( (CE_CASH_FCST.G_org_id <> -1 AND CE_CASH_FCST.G_org_id <> -99) AND
4067: (nvl(C_req_rec.org_id, CE_CASH_FCST.G_org_id) <> CE_CASH_FCST.G_org_id) ) THEN
4068: l_amount := 0;
4069: END IF;
4070: cep_standard.debug('org_id_proj');
4071:
4068: l_amount := 0;
4069: END IF;
4070: cep_standard.debug('org_id_proj');
4071:
4072: IF( CE_CASH_FCST.G_set_of_books_id IS NOT NULL AND
4073: CE_CASH_FCST.G_set_of_books_id <> -1) THEN
4074: OPEN C_sob(C_req_rec.org_id);
4075: FETCH C_sob INTO l_dummy;
4076: IF C_sob%NOTFOUND THEN
4069: END IF;
4070: cep_standard.debug('org_id_proj');
4071:
4072: IF( CE_CASH_FCST.G_set_of_books_id IS NOT NULL AND
4073: CE_CASH_FCST.G_set_of_books_id <> -1) THEN
4074: OPEN C_sob(C_req_rec.org_id);
4075: FETCH C_sob INTO l_dummy;
4076: IF C_sob%NOTFOUND THEN
4077: CLOSE C_sob;
4080: CLOSE C_sob;
4081: END IF;
4082: cep_standard.debug('set_of_books_id_proj');
4083:
4084: IF( CE_CASH_FCST.G_rp_exchange_type IS NULL OR
4085: CE_CASH_FCST.G_rp_exchange_type <> 'User')THEN
4086: OPEN C_rate(C_req_rec.currency_code);
4087: FETCH C_rate INTO l_rate;
4088: IF C_rate%NOTFOUND THEN
4081: END IF;
4082: cep_standard.debug('set_of_books_id_proj');
4083:
4084: IF( CE_CASH_FCST.G_rp_exchange_type IS NULL OR
4085: CE_CASH_FCST.G_rp_exchange_type <> 'User')THEN
4086: OPEN C_rate(C_req_rec.currency_code);
4087: FETCH C_rate INTO l_rate;
4088: IF C_rate%NOTFOUND THEN
4089: l_rate := 1;
4088: IF C_rate%NOTFOUND THEN
4089: l_rate := 1;
4090: END IF;
4091: CLOSE C_rate;
4092: ELSIF( CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4093: l_rate := CE_CASH_FCST.G_rp_exchange_rate;
4094: ELSE
4095: l_rate := 1;
4096: END IF;
4089: l_rate := 1;
4090: END IF;
4091: CLOSE C_rate;
4092: ELSIF( CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4093: l_rate := CE_CASH_FCST.G_rp_exchange_rate;
4094: ELSE
4095: l_rate := 1;
4096: END IF;
4097: cep_standard.debug('exchange_rate_proj');
4095: l_rate := 1;
4096: END IF;
4097: cep_standard.debug('exchange_rate_proj');
4098:
4099: IF(CE_CASH_FCST.G_rp_amount_threshold IS NOT NULL) THEN
4100: IF (abs(l_amount) <= CE_CASH_FCST.G_rp_amount_threshold) THEN
4101: l_amount := 0;
4102: END IF;
4103: END IF;
4096: END IF;
4097: cep_standard.debug('exchange_rate_proj');
4098:
4099: IF(CE_CASH_FCST.G_rp_amount_threshold IS NOT NULL) THEN
4100: IF (abs(l_amount) <= CE_CASH_FCST.G_rp_amount_threshold) THEN
4101: l_amount := 0;
4102: END IF;
4103: END IF;
4104: cep_standard.debug('amount_threshold_proj');
4102: END IF;
4103: END IF;
4104: cep_standard.debug('amount_threshold_proj');
4105:
4106: IF(C_rec.forecast_column_id = CE_CASH_FCST.G_overdue_column_id AND
4107: CE_CASH_FCST.G_invalid_overdue_row)THEN
4108: l_amount := 0;
4109: END IF;
4110: cep_standard.debug('OVERDUE_COLUMN_proj');
4103: END IF;
4104: cep_standard.debug('amount_threshold_proj');
4105:
4106: IF(C_rec.forecast_column_id = CE_CASH_FCST.G_overdue_column_id AND
4107: CE_CASH_FCST.G_invalid_overdue_row)THEN
4108: l_amount := 0;
4109: END IF;
4110: cep_standard.debug('OVERDUE_COLUMN_proj');
4111:
4113: IF (C_req_rec.trx_end_date IS NULL and error_flag = FALSE) THEN
4114:
4115: UPDATE ce_forecasts
4116: SET error_status = 'X'
4117: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
4118:
4119: FND_MESSAGE.set_name('CE', 'CE_FC_POR_NO_END_DATE');
4120: error_msg := FND_MESSAGE.get;
4121: CE_FORECAST_ERRORS_PKG.insert_row(
4118:
4119: FND_MESSAGE.set_name('CE', 'CE_FC_POR_NO_END_DATE');
4120: error_msg := FND_MESSAGE.get;
4121: CE_FORECAST_ERRORS_PKG.insert_row(
4122: CE_CASH_FCST.G_forecast_id,
4123: CE_CASH_FCST.G_rp_forecast_header_id,
4124: CE_CASH_FCST.G_forecast_row_id,
4125: 'CE_FC_POR_NO_END_DATE',
4126: error_msg);
4119: FND_MESSAGE.set_name('CE', 'CE_FC_POR_NO_END_DATE');
4120: error_msg := FND_MESSAGE.get;
4121: CE_FORECAST_ERRORS_PKG.insert_row(
4122: CE_CASH_FCST.G_forecast_id,
4123: CE_CASH_FCST.G_rp_forecast_header_id,
4124: CE_CASH_FCST.G_forecast_row_id,
4125: 'CE_FC_POR_NO_END_DATE',
4126: error_msg);
4127: error_flag := TRUE;
4120: error_msg := FND_MESSAGE.get;
4121: CE_FORECAST_ERRORS_PKG.insert_row(
4122: CE_CASH_FCST.G_forecast_id,
4123: CE_CASH_FCST.G_rp_forecast_header_id,
4124: CE_CASH_FCST.G_forecast_row_id,
4125: 'CE_FC_POR_NO_END_DATE',
4126: error_msg);
4127: error_flag := TRUE;
4128: END IF;
4177: cep_standard.debug('Built From Clause');
4178:
4179: where_clause := Get_Where_Clause || '
4180: AND src.trx_date BETWEEN cab.start_date - '
4181: ||to_char(CE_CASH_FCST.G_lead_time)||
4182: ' and cab.end_date - '
4183: ||to_char(CE_CASH_FCST.G_lead_time)||
4184: ' AND NVL(src.win_probability, 0) >= ' ||to_char(CE_CASH_FCST.G_win_probability)||
4185: Add_Where('CHANNEL_CODE') || Add_Where('SALES_STAGE_ID') || Add_Where('SALES_FORECAST_STATUS');
4179: where_clause := Get_Where_Clause || '
4180: AND src.trx_date BETWEEN cab.start_date - '
4181: ||to_char(CE_CASH_FCST.G_lead_time)||
4182: ' and cab.end_date - '
4183: ||to_char(CE_CASH_FCST.G_lead_time)||
4184: ' AND NVL(src.win_probability, 0) >= ' ||to_char(CE_CASH_FCST.G_win_probability)||
4185: Add_Where('CHANNEL_CODE') || Add_Where('SALES_STAGE_ID') || Add_Where('SALES_FORECAST_STATUS');
4186:
4187: cep_standard.debug('Built Where Clause');
4180: AND src.trx_date BETWEEN cab.start_date - '
4181: ||to_char(CE_CASH_FCST.G_lead_time)||
4182: ' and cab.end_date - '
4183: ||to_char(CE_CASH_FCST.G_lead_time)||
4184: ' AND NVL(src.win_probability, 0) >= ' ||to_char(CE_CASH_FCST.G_win_probability)||
4185: Add_Where('CHANNEL_CODE') || Add_Where('SALES_STAGE_ID') || Add_Where('SALES_FORECAST_STATUS');
4186:
4187: cep_standard.debug('Built Where Clause');
4188:
4239: where_clause := Get_Where_Clause ||
4240: Add_Where('CUSTOMER_PROFILE_CLASS_ID') || Add_Where('PROJECT_ID')
4241: || Add_Where('ORDER_TYPE_ID');
4242:
4243: IF( nvl(CE_CASH_FCST.G_order_status,'A') = 'O') THEN
4244: where_clause := where_clause || '
4245: AND NVL(src.booked_flag, ''N'') = ''N'' ';
4246: ELSIF( nvl(CE_CASH_FCST.G_order_status,'A') = 'B')THEN
4247: where_clause := where_clause || '
4242:
4243: IF( nvl(CE_CASH_FCST.G_order_status,'A') = 'O') THEN
4244: where_clause := where_clause || '
4245: AND NVL(src.booked_flag, ''N'') = ''N'' ';
4246: ELSIF( nvl(CE_CASH_FCST.G_order_status,'A') = 'B')THEN
4247: where_clause := where_clause || '
4248: AND NVL(src.booked_flag, ''N'') = ''Y'' ';
4249: END IF;
4250:
4247: where_clause := where_clause || '
4248: AND NVL(src.booked_flag, ''N'') = ''Y'' ';
4249: END IF;
4250:
4251: IF (CE_CASH_FCST.G_use_payment_terms = 'Y') THEN
4252: IF(CE_CASH_FCST.G_order_date_type = 'R')THEN
4253: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4254: select_clause_2 := '
4255: SELECT /*+ USE_MERGE(o3,hr_ou) +*/ CE_FORECAST_TRX_CELLS_S.nextval,
4248: AND NVL(src.booked_flag, ''N'') = ''Y'' ';
4249: END IF;
4250:
4251: IF (CE_CASH_FCST.G_use_payment_terms = 'Y') THEN
4252: IF(CE_CASH_FCST.G_order_date_type = 'R')THEN
4253: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4254: select_clause_2 := '
4255: SELECT /*+ USE_MERGE(o3,hr_ou) +*/ CE_FORECAST_TRX_CELLS_S.nextval,
4256: '||CE_CASH_FCST.G_forecast_id||',
4249: END IF;
4250:
4251: IF (CE_CASH_FCST.G_use_payment_terms = 'Y') THEN
4252: IF(CE_CASH_FCST.G_order_date_type = 'R')THEN
4253: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4254: select_clause_2 := '
4255: SELECT /*+ USE_MERGE(o3,hr_ou) +*/ CE_FORECAST_TRX_CELLS_S.nextval,
4256: '||CE_CASH_FCST.G_forecast_id||',
4257: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4252: IF(CE_CASH_FCST.G_order_date_type = 'R')THEN
4253: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4254: select_clause_2 := '
4255: SELECT /*+ USE_MERGE(o3,hr_ou) +*/ CE_FORECAST_TRX_CELLS_S.nextval,
4256: '||CE_CASH_FCST.G_forecast_id||',
4257: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4258: '||CE_CASH_FCST.G_forecast_row_id||',
4259: ''Y'',
4260: nvl(fnd_global.user_id,-1),
4253: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4254: select_clause_2 := '
4255: SELECT /*+ USE_MERGE(o3,hr_ou) +*/ CE_FORECAST_TRX_CELLS_S.nextval,
4256: '||CE_CASH_FCST.G_forecast_id||',
4257: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4258: '||CE_CASH_FCST.G_forecast_row_id||',
4259: ''Y'',
4260: nvl(fnd_global.user_id,-1),
4261: sysdate,
4254: select_clause_2 := '
4255: SELECT /*+ USE_MERGE(o3,hr_ou) +*/ CE_FORECAST_TRX_CELLS_S.nextval,
4256: '||CE_CASH_FCST.G_forecast_id||',
4257: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4258: '||CE_CASH_FCST.G_forecast_row_id||',
4259: ''Y'',
4260: nvl(fnd_global.user_id,-1),
4261: sysdate,
4262: nvl(fnd_global.user_id,-1),
4272: (TRUNC(ADD_MONTHS(src.date_requested, src.term_due_months_forward),
4273: ''MONTH'')+ src.term_due_day_of_month - 1)),
4274: src.date_requested + src.term_due_days),
4275: src.term_due_date) + '
4276: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4277: null,
4278: null,
4279: round(nvl(src.amount,0) * (nvl(src.relative_amount,100)/100)
4280: *'||CE_CASH_FCST.G_rp_exchange_rate
4276: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4277: null,
4278: null,
4279: round(nvl(src.amount,0) * (nvl(src.relative_amount,100)/100)
4280: *'||CE_CASH_FCST.G_rp_exchange_rate
4281: ||','||CE_CASH_FCST.G_precision||'),
4282: nvl(src.amount,0) * (nvl(src.relative_amount,100)/100)';
4283: ELSE
4284: select_clause_2 := '
4277: null,
4278: null,
4279: round(nvl(src.amount,0) * (nvl(src.relative_amount,100)/100)
4280: *'||CE_CASH_FCST.G_rp_exchange_rate
4281: ||','||CE_CASH_FCST.G_precision||'),
4282: nvl(src.amount,0) * (nvl(src.relative_amount,100)/100)';
4283: ELSE
4284: select_clause_2 := '
4285: SELECT /*+ USE_MERGE(o3,hr_ou) +*/ CE_FORECAST_TRX_CELLS_S.nextval,
4282: nvl(src.amount,0) * (nvl(src.relative_amount,100)/100)';
4283: ELSE
4284: select_clause_2 := '
4285: SELECT /*+ USE_MERGE(o3,hr_ou) +*/ CE_FORECAST_TRX_CELLS_S.nextval,
4286: '||CE_CASH_FCST.G_forecast_id||',
4287: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4288: '||CE_CASH_FCST.G_forecast_row_id||',
4289: ''Y'',
4290: nvl(fnd_global.user_id,-1),
4283: ELSE
4284: select_clause_2 := '
4285: SELECT /*+ USE_MERGE(o3,hr_ou) +*/ CE_FORECAST_TRX_CELLS_S.nextval,
4286: '||CE_CASH_FCST.G_forecast_id||',
4287: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4288: '||CE_CASH_FCST.G_forecast_row_id||',
4289: ''Y'',
4290: nvl(fnd_global.user_id,-1),
4291: sysdate,
4284: select_clause_2 := '
4285: SELECT /*+ USE_MERGE(o3,hr_ou) +*/ CE_FORECAST_TRX_CELLS_S.nextval,
4286: '||CE_CASH_FCST.G_forecast_id||',
4287: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4288: '||CE_CASH_FCST.G_forecast_row_id||',
4289: ''Y'',
4290: nvl(fnd_global.user_id,-1),
4291: sysdate,
4292: nvl(fnd_global.user_id,-1),
4302: (TRUNC(ADD_MONTHS(src.date_requested, src.term_due_months_forward),
4303: ''MONTH'')+ src.term_due_day_of_month - 1)),
4304: src.date_requested + src.term_due_days),
4305: src.term_due_date) + '
4306: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4307: null,
4308: null,
4309: round(nvl(src.amount,0) * (nvl(src.relative_amount,100)/100) * curr.exchange_rate'
4310: ||','||CE_CASH_FCST.G_precision||'),
4306: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4307: null,
4308: null,
4309: round(nvl(src.amount,0) * (nvl(src.relative_amount,100)/100) * curr.exchange_rate'
4310: ||','||CE_CASH_FCST.G_precision||'),
4311: nvl(src.amount,0) * (nvl(src.relative_amount,100)/100)';
4312: END IF;
4313:
4314: where_clause_2 := where_clause || ' AND
4318: (TRUNC(ADD_MONTHS(src.date_requested, src.term_due_months_forward),
4319: ''MONTH'')+ src.term_due_day_of_month - 1)),
4320: src.date_requested + src.term_due_days),
4321: src.term_due_date) BETWEEN cab.start_date - '
4322: ||to_char(CE_CASH_FCST.G_lead_time)||
4323: ' and cab.end_date - '
4324: ||to_char(CE_CASH_FCST.G_lead_time);
4325: ELSE
4326: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4320: src.date_requested + src.term_due_days),
4321: src.term_due_date) BETWEEN cab.start_date - '
4322: ||to_char(CE_CASH_FCST.G_lead_time)||
4323: ' and cab.end_date - '
4324: ||to_char(CE_CASH_FCST.G_lead_time);
4325: ELSE
4326: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4327: select_clause_2 := '
4328: SELECT /*+ USE_MERGE(o3,hr_ou) +*/ CE_FORECAST_TRX_CELLS_S.nextval,
4322: ||to_char(CE_CASH_FCST.G_lead_time)||
4323: ' and cab.end_date - '
4324: ||to_char(CE_CASH_FCST.G_lead_time);
4325: ELSE
4326: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4327: select_clause_2 := '
4328: SELECT /*+ USE_MERGE(o3,hr_ou) +*/ CE_FORECAST_TRX_CELLS_S.nextval,
4329: '||CE_CASH_FCST.G_forecast_id||',
4330: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4325: ELSE
4326: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4327: select_clause_2 := '
4328: SELECT /*+ USE_MERGE(o3,hr_ou) +*/ CE_FORECAST_TRX_CELLS_S.nextval,
4329: '||CE_CASH_FCST.G_forecast_id||',
4330: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4331: '||CE_CASH_FCST.G_forecast_row_id||',
4332: ''Y'',
4333: nvl(fnd_global.user_id,-1),
4326: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4327: select_clause_2 := '
4328: SELECT /*+ USE_MERGE(o3,hr_ou) +*/ CE_FORECAST_TRX_CELLS_S.nextval,
4329: '||CE_CASH_FCST.G_forecast_id||',
4330: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4331: '||CE_CASH_FCST.G_forecast_row_id||',
4332: ''Y'',
4333: nvl(fnd_global.user_id,-1),
4334: sysdate,
4327: select_clause_2 := '
4328: SELECT /*+ USE_MERGE(o3,hr_ou) +*/ CE_FORECAST_TRX_CELLS_S.nextval,
4329: '||CE_CASH_FCST.G_forecast_id||',
4330: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4331: '||CE_CASH_FCST.G_forecast_row_id||',
4332: ''Y'',
4333: nvl(fnd_global.user_id,-1),
4334: sysdate,
4335: nvl(fnd_global.user_id,-1),
4345: TRUNC(ADD_MONTHS(src.date_ordered, src.term_due_months_forward),
4346: ''MONTH'')+ src.term_due_day_of_month - 1),
4347: src.date_ordered + src.term_due_days),
4348: src.term_due_date) + '
4349: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4350: null,
4351: null,
4352: round(nvl(src.amount,0)*(nvl(src.relative_amount,100)/100)*'
4353: ||CE_CASH_FCST.G_rp_exchange_rate
4349: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4350: null,
4351: null,
4352: round(nvl(src.amount,0)*(nvl(src.relative_amount,100)/100)*'
4353: ||CE_CASH_FCST.G_rp_exchange_rate
4354: ||','||CE_CASH_FCST.G_precision||'),
4355: nvl(src.amount,0) * (nvl(src.relative_amount,100)/100)';
4356: ELSE
4357: select_clause_2 := '
4350: null,
4351: null,
4352: round(nvl(src.amount,0)*(nvl(src.relative_amount,100)/100)*'
4353: ||CE_CASH_FCST.G_rp_exchange_rate
4354: ||','||CE_CASH_FCST.G_precision||'),
4355: nvl(src.amount,0) * (nvl(src.relative_amount,100)/100)';
4356: ELSE
4357: select_clause_2 := '
4358: SELECT /*+ USE_MERGE(o3,hr_ou) +*/ CE_FORECAST_TRX_CELLS_S.nextval,
4355: nvl(src.amount,0) * (nvl(src.relative_amount,100)/100)';
4356: ELSE
4357: select_clause_2 := '
4358: SELECT /*+ USE_MERGE(o3,hr_ou) +*/ CE_FORECAST_TRX_CELLS_S.nextval,
4359: '||CE_CASH_FCST.G_forecast_id||',
4360: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4361: '||CE_CASH_FCST.G_forecast_row_id||',
4362: ''Y'',
4363: nvl(fnd_global.user_id,-1),
4356: ELSE
4357: select_clause_2 := '
4358: SELECT /*+ USE_MERGE(o3,hr_ou) +*/ CE_FORECAST_TRX_CELLS_S.nextval,
4359: '||CE_CASH_FCST.G_forecast_id||',
4360: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4361: '||CE_CASH_FCST.G_forecast_row_id||',
4362: ''Y'',
4363: nvl(fnd_global.user_id,-1),
4364: sysdate,
4357: select_clause_2 := '
4358: SELECT /*+ USE_MERGE(o3,hr_ou) +*/ CE_FORECAST_TRX_CELLS_S.nextval,
4359: '||CE_CASH_FCST.G_forecast_id||',
4360: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4361: '||CE_CASH_FCST.G_forecast_row_id||',
4362: ''Y'',
4363: nvl(fnd_global.user_id,-1),
4364: sysdate,
4365: nvl(fnd_global.user_id,-1),
4375: TRUNC(ADD_MONTHS(src.date_ordered, src.term_due_months_forward),
4376: ''MONTH'')+ src.term_due_day_of_month - 1),
4377: src.date_ordered + src.term_due_days),
4378: src.term_due_date) + '
4379: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4380: null,
4381: null,
4382: round(nvl(src.amount,0)*(nvl(src.relative_amount,100)/100)*curr.exchange_rate'
4383: ||','||CE_CASH_FCST.G_precision||'),
4379: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4380: null,
4381: null,
4382: round(nvl(src.amount,0)*(nvl(src.relative_amount,100)/100)*curr.exchange_rate'
4383: ||','||CE_CASH_FCST.G_precision||'),
4384: nvl(src.amount,0) * (nvl(src.relative_amount,100)/100)';
4385: END IF;
4386: where_clause_2 := where_clause || ' AND
4387: decode(src.term_due_date, null,
4390: TRUNC(ADD_MONTHS(src.date_ordered, src.term_due_months_forward),
4391: ''MONTH'')+ src.term_due_day_of_month - 1),
4392: src.date_ordered + src.term_due_days),
4393: src.term_due_date) BETWEEN cab.start_date - '
4394: ||to_char(CE_CASH_FCST.G_lead_time)||
4395: ' and cab.end_date - '
4396: ||to_char(CE_CASH_FCST.G_lead_time);
4397: END IF;
4398: ELSE -- payment_term = 'N'
4392: src.date_ordered + src.term_due_days),
4393: src.term_due_date) BETWEEN cab.start_date - '
4394: ||to_char(CE_CASH_FCST.G_lead_time)||
4395: ' and cab.end_date - '
4396: ||to_char(CE_CASH_FCST.G_lead_time);
4397: END IF;
4398: ELSE -- payment_term = 'N'
4399: IF(CE_CASH_FCST.G_order_date_type = 'R')THEN
4400: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4395: ' and cab.end_date - '
4396: ||to_char(CE_CASH_FCST.G_lead_time);
4397: END IF;
4398: ELSE -- payment_term = 'N'
4399: IF(CE_CASH_FCST.G_order_date_type = 'R')THEN
4400: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4401: select_clause_1 := '
4402: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4403: '||CE_CASH_FCST.G_forecast_id||',
4396: ||to_char(CE_CASH_FCST.G_lead_time);
4397: END IF;
4398: ELSE -- payment_term = 'N'
4399: IF(CE_CASH_FCST.G_order_date_type = 'R')THEN
4400: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4401: select_clause_1 := '
4402: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4403: '||CE_CASH_FCST.G_forecast_id||',
4404: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4399: IF(CE_CASH_FCST.G_order_date_type = 'R')THEN
4400: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4401: select_clause_1 := '
4402: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4403: '||CE_CASH_FCST.G_forecast_id||',
4404: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4405: '||CE_CASH_FCST.G_forecast_row_id||',
4406: ''Y'',
4407: nvl(fnd_global.user_id,-1),
4400: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4401: select_clause_1 := '
4402: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4403: '||CE_CASH_FCST.G_forecast_id||',
4404: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4405: '||CE_CASH_FCST.G_forecast_row_id||',
4406: ''Y'',
4407: nvl(fnd_global.user_id,-1),
4408: sysdate,
4401: select_clause_1 := '
4402: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4403: '||CE_CASH_FCST.G_forecast_id||',
4404: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4405: '||CE_CASH_FCST.G_forecast_row_id||',
4406: ''Y'',
4407: nvl(fnd_global.user_id,-1),
4408: sysdate,
4409: nvl(fnd_global.user_id,-1),
4413: src.reference_id,
4414: src.currency_code,
4415: to_number(hr_ou.ORGANIZATION_ID),
4416: src.date_requested +'
4417: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4418: null,
4419: null,
4420: round(nvl(src.amount,0)*'||CE_CASH_FCST.G_rp_exchange_rate
4421: ||','||CE_CASH_FCST.G_precision||'),
4416: src.date_requested +'
4417: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4418: null,
4419: null,
4420: round(nvl(src.amount,0)*'||CE_CASH_FCST.G_rp_exchange_rate
4421: ||','||CE_CASH_FCST.G_precision||'),
4422: src.amount';
4423: ELSE
4424: select_clause_1 := '
4417: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4418: null,
4419: null,
4420: round(nvl(src.amount,0)*'||CE_CASH_FCST.G_rp_exchange_rate
4421: ||','||CE_CASH_FCST.G_precision||'),
4422: src.amount';
4423: ELSE
4424: select_clause_1 := '
4425: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4422: src.amount';
4423: ELSE
4424: select_clause_1 := '
4425: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4426: '||CE_CASH_FCST.G_forecast_id||',
4427: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4428: '||CE_CASH_FCST.G_forecast_row_id||',
4429: ''Y'',
4430: nvl(fnd_global.user_id,-1),
4423: ELSE
4424: select_clause_1 := '
4425: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4426: '||CE_CASH_FCST.G_forecast_id||',
4427: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4428: '||CE_CASH_FCST.G_forecast_row_id||',
4429: ''Y'',
4430: nvl(fnd_global.user_id,-1),
4431: sysdate,
4424: select_clause_1 := '
4425: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4426: '||CE_CASH_FCST.G_forecast_id||',
4427: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4428: '||CE_CASH_FCST.G_forecast_row_id||',
4429: ''Y'',
4430: nvl(fnd_global.user_id,-1),
4431: sysdate,
4432: nvl(fnd_global.user_id,-1),
4436: src.reference_id,
4437: src.currency_code,
4438: to_number(hr_ou.ORGANIZATION_ID),
4439: src.date_requested +'
4440: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4441: null,
4442: null,
4443: round(nvl(src.amount,0)*curr.exchange_rate'
4444: ||','||CE_CASH_FCST.G_precision||'),
4440: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4441: null,
4442: null,
4443: round(nvl(src.amount,0)*curr.exchange_rate'
4444: ||','||CE_CASH_FCST.G_precision||'),
4445: src.amount';
4446: END IF;
4447: where_clause_1 := where_clause || '
4448: AND src.date_requested BETWEEN cab.start_date - '
4445: src.amount';
4446: END IF;
4447: where_clause_1 := where_clause || '
4448: AND src.date_requested BETWEEN cab.start_date - '
4449: ||to_char(CE_CASH_FCST.G_lead_time)||
4450: ' and cab.end_date - '
4451: ||to_char(CE_CASH_FCST.G_lead_time);
4452: ELSE
4453: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4447: where_clause_1 := where_clause || '
4448: AND src.date_requested BETWEEN cab.start_date - '
4449: ||to_char(CE_CASH_FCST.G_lead_time)||
4450: ' and cab.end_date - '
4451: ||to_char(CE_CASH_FCST.G_lead_time);
4452: ELSE
4453: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4454: select_clause_1 := '
4455: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4449: ||to_char(CE_CASH_FCST.G_lead_time)||
4450: ' and cab.end_date - '
4451: ||to_char(CE_CASH_FCST.G_lead_time);
4452: ELSE
4453: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4454: select_clause_1 := '
4455: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4456: '||CE_CASH_FCST.G_forecast_id||',
4457: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4452: ELSE
4453: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4454: select_clause_1 := '
4455: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4456: '||CE_CASH_FCST.G_forecast_id||',
4457: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4458: '||CE_CASH_FCST.G_forecast_row_id||',
4459: ''Y'',
4460: nvl(fnd_global.user_id,-1),
4453: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4454: select_clause_1 := '
4455: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4456: '||CE_CASH_FCST.G_forecast_id||',
4457: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4458: '||CE_CASH_FCST.G_forecast_row_id||',
4459: ''Y'',
4460: nvl(fnd_global.user_id,-1),
4461: sysdate,
4454: select_clause_1 := '
4455: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4456: '||CE_CASH_FCST.G_forecast_id||',
4457: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4458: '||CE_CASH_FCST.G_forecast_row_id||',
4459: ''Y'',
4460: nvl(fnd_global.user_id,-1),
4461: sysdate,
4462: nvl(fnd_global.user_id,-1),
4466: src.reference_id,
4467: src.currency_code,
4468: to_number(hr_ou.ORGANIZATION_ID),
4469: src.date_ordered +'
4470: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4471: null,
4472: null,
4473: round(nvl(src.amount,0)*'||CE_CASH_FCST.G_rp_exchange_rate
4474: ||','||CE_CASH_FCST.G_precision||'),
4469: src.date_ordered +'
4470: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4471: null,
4472: null,
4473: round(nvl(src.amount,0)*'||CE_CASH_FCST.G_rp_exchange_rate
4474: ||','||CE_CASH_FCST.G_precision||'),
4475: src.amount';
4476: ELSE
4477: select_clause_1 := '
4470: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4471: null,
4472: null,
4473: round(nvl(src.amount,0)*'||CE_CASH_FCST.G_rp_exchange_rate
4474: ||','||CE_CASH_FCST.G_precision||'),
4475: src.amount';
4476: ELSE
4477: select_clause_1 := '
4478: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4475: src.amount';
4476: ELSE
4477: select_clause_1 := '
4478: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4479: '||CE_CASH_FCST.G_forecast_id||',
4480: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4481: '||CE_CASH_FCST.G_forecast_row_id||',
4482: ''Y'',
4483: nvl(fnd_global.user_id,-1),
4476: ELSE
4477: select_clause_1 := '
4478: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4479: '||CE_CASH_FCST.G_forecast_id||',
4480: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4481: '||CE_CASH_FCST.G_forecast_row_id||',
4482: ''Y'',
4483: nvl(fnd_global.user_id,-1),
4484: sysdate,
4477: select_clause_1 := '
4478: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4479: '||CE_CASH_FCST.G_forecast_id||',
4480: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4481: '||CE_CASH_FCST.G_forecast_row_id||',
4482: ''Y'',
4483: nvl(fnd_global.user_id,-1),
4484: sysdate,
4485: nvl(fnd_global.user_id,-1),
4489: src.reference_id,
4490: src.currency_code,
4491: to_number(hr_ou.ORGANIZATION_ID),
4492: src.date_ordered +'
4493: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4494: null,
4495: null,
4496: round(nvl(src.amount,0)*curr.exchange_rate'
4497: ||','||CE_CASH_FCST.G_precision||'),
4493: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4494: null,
4495: null,
4496: round(nvl(src.amount,0)*curr.exchange_rate'
4497: ||','||CE_CASH_FCST.G_precision||'),
4498: src.amount';
4499: END IF;
4500: where_clause_1 := where_clause || '
4501: AND src.date_ordered BETWEEN cab.start_date - '
4498: src.amount';
4499: END IF;
4500: where_clause_1 := where_clause || '
4501: AND src.date_ordered BETWEEN cab.start_date - '
4502: ||to_char(CE_CASH_FCST.G_lead_time)||
4503: ' and cab.end_date - '
4504: ||to_char(CE_CASH_FCST.G_lead_time);
4505: END IF;
4506: END IF;
4500: where_clause_1 := where_clause || '
4501: AND src.date_ordered BETWEEN cab.start_date - '
4502: ||to_char(CE_CASH_FCST.G_lead_time)||
4503: ' and cab.end_date - '
4504: ||to_char(CE_CASH_FCST.G_lead_time);
4505: END IF;
4506: END IF;
4507:
4508: IF(CE_CASH_FCST.G_order_date_type = 'R')THEN
4504: ||to_char(CE_CASH_FCST.G_lead_time);
4505: END IF;
4506: END IF;
4507:
4508: IF(CE_CASH_FCST.G_order_date_type = 'R')THEN
4509: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4510: select_clause_3 := '
4511: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4512: '||CE_CASH_FCST.G_forecast_id||',
4505: END IF;
4506: END IF;
4507:
4508: IF(CE_CASH_FCST.G_order_date_type = 'R')THEN
4509: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4510: select_clause_3 := '
4511: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4512: '||CE_CASH_FCST.G_forecast_id||',
4513: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4508: IF(CE_CASH_FCST.G_order_date_type = 'R')THEN
4509: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4510: select_clause_3 := '
4511: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4512: '||CE_CASH_FCST.G_forecast_id||',
4513: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4514: '||CE_CASH_FCST.G_forecast_row_id||',
4515: ''Y'',
4516: nvl(fnd_global.user_id,-1),
4509: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4510: select_clause_3 := '
4511: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4512: '||CE_CASH_FCST.G_forecast_id||',
4513: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4514: '||CE_CASH_FCST.G_forecast_row_id||',
4515: ''Y'',
4516: nvl(fnd_global.user_id,-1),
4517: sysdate,
4510: select_clause_3 := '
4511: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4512: '||CE_CASH_FCST.G_forecast_id||',
4513: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4514: '||CE_CASH_FCST.G_forecast_row_id||',
4515: ''Y'',
4516: nvl(fnd_global.user_id,-1),
4517: sysdate,
4518: nvl(fnd_global.user_id,-1),
4522: src.reference_id,
4523: src.currency_code,
4524: to_number(hr_ou.ORGANIZATION_ID),
4525: src.date_requested +'
4526: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4527: null,
4528: null,
4529: round(nvl(src.amount,0)*'||CE_CASH_FCST.G_rp_exchange_rate
4530: ||','||CE_CASH_FCST.G_precision||'),
4525: src.date_requested +'
4526: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4527: null,
4528: null,
4529: round(nvl(src.amount,0)*'||CE_CASH_FCST.G_rp_exchange_rate
4530: ||','||CE_CASH_FCST.G_precision||'),
4531: src.amount';
4532: ELSE
4533: select_clause_3 := '
4526: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4527: null,
4528: null,
4529: round(nvl(src.amount,0)*'||CE_CASH_FCST.G_rp_exchange_rate
4530: ||','||CE_CASH_FCST.G_precision||'),
4531: src.amount';
4532: ELSE
4533: select_clause_3 := '
4534: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4531: src.amount';
4532: ELSE
4533: select_clause_3 := '
4534: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4535: '||CE_CASH_FCST.G_forecast_id||',
4536: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4537: '||CE_CASH_FCST.G_forecast_row_id||',
4538: ''Y'',
4539: nvl(fnd_global.user_id,-1),
4532: ELSE
4533: select_clause_3 := '
4534: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4535: '||CE_CASH_FCST.G_forecast_id||',
4536: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4537: '||CE_CASH_FCST.G_forecast_row_id||',
4538: ''Y'',
4539: nvl(fnd_global.user_id,-1),
4540: sysdate,
4533: select_clause_3 := '
4534: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4535: '||CE_CASH_FCST.G_forecast_id||',
4536: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4537: '||CE_CASH_FCST.G_forecast_row_id||',
4538: ''Y'',
4539: nvl(fnd_global.user_id,-1),
4540: sysdate,
4541: nvl(fnd_global.user_id,-1),
4545: src.reference_id,
4546: src.currency_code,
4547: to_number(hr_ou.ORGANIZATION_ID),
4548: src.date_requested +'
4549: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4550: null,
4551: null,
4552: round(nvl(src.amount,0)*curr.exchange_rate'
4553: ||','||CE_CASH_FCST.G_precision||'),
4549: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4550: null,
4551: null,
4552: round(nvl(src.amount,0)*curr.exchange_rate'
4553: ||','||CE_CASH_FCST.G_precision||'),
4554: src.amount';
4555: END IF;
4556: where_clause_3 := where_clause || '
4557: AND src.date_requested BETWEEN cab.start_date - '
4554: src.amount';
4555: END IF;
4556: where_clause_3 := where_clause || '
4557: AND src.date_requested BETWEEN cab.start_date - '
4558: ||to_char(CE_CASH_FCST.G_lead_time)||
4559: ' and cab.end_date - '
4560: ||to_char(CE_CASH_FCST.G_lead_time);
4561: ELSE
4562: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4556: where_clause_3 := where_clause || '
4557: AND src.date_requested BETWEEN cab.start_date - '
4558: ||to_char(CE_CASH_FCST.G_lead_time)||
4559: ' and cab.end_date - '
4560: ||to_char(CE_CASH_FCST.G_lead_time);
4561: ELSE
4562: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4563: select_clause_3 := '
4564: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4558: ||to_char(CE_CASH_FCST.G_lead_time)||
4559: ' and cab.end_date - '
4560: ||to_char(CE_CASH_FCST.G_lead_time);
4561: ELSE
4562: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4563: select_clause_3 := '
4564: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4565: '||CE_CASH_FCST.G_forecast_id||',
4566: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4561: ELSE
4562: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4563: select_clause_3 := '
4564: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4565: '||CE_CASH_FCST.G_forecast_id||',
4566: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4567: '||CE_CASH_FCST.G_forecast_row_id||',
4568: ''Y'',
4569: nvl(fnd_global.user_id,-1),
4562: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4563: select_clause_3 := '
4564: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4565: '||CE_CASH_FCST.G_forecast_id||',
4566: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4567: '||CE_CASH_FCST.G_forecast_row_id||',
4568: ''Y'',
4569: nvl(fnd_global.user_id,-1),
4570: sysdate,
4563: select_clause_3 := '
4564: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4565: '||CE_CASH_FCST.G_forecast_id||',
4566: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4567: '||CE_CASH_FCST.G_forecast_row_id||',
4568: ''Y'',
4569: nvl(fnd_global.user_id,-1),
4570: sysdate,
4571: nvl(fnd_global.user_id,-1),
4575: src.reference_id,
4576: src.currency_code,
4577: to_number(hr_ou.ORGANIZATION_ID),
4578: src.date_ordered +'
4579: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4580: null,
4581: null,
4582: round(nvl(src.amount,0)*'||CE_CASH_FCST.G_rp_exchange_rate
4583: ||','||CE_CASH_FCST.G_precision||'),
4578: src.date_ordered +'
4579: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4580: null,
4581: null,
4582: round(nvl(src.amount,0)*'||CE_CASH_FCST.G_rp_exchange_rate
4583: ||','||CE_CASH_FCST.G_precision||'),
4584: src.amount';
4585: ELSE
4586: select_clause_3 := '
4579: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4580: null,
4581: null,
4582: round(nvl(src.amount,0)*'||CE_CASH_FCST.G_rp_exchange_rate
4583: ||','||CE_CASH_FCST.G_precision||'),
4584: src.amount';
4585: ELSE
4586: select_clause_3 := '
4587: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4584: src.amount';
4585: ELSE
4586: select_clause_3 := '
4587: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4588: '||CE_CASH_FCST.G_forecast_id||',
4589: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4590: '||CE_CASH_FCST.G_forecast_row_id||',
4591: ''Y'',
4592: nvl(fnd_global.user_id,-1),
4585: ELSE
4586: select_clause_3 := '
4587: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4588: '||CE_CASH_FCST.G_forecast_id||',
4589: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4590: '||CE_CASH_FCST.G_forecast_row_id||',
4591: ''Y'',
4592: nvl(fnd_global.user_id,-1),
4593: sysdate,
4586: select_clause_3 := '
4587: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4588: '||CE_CASH_FCST.G_forecast_id||',
4589: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4590: '||CE_CASH_FCST.G_forecast_row_id||',
4591: ''Y'',
4592: nvl(fnd_global.user_id,-1),
4593: sysdate,
4594: nvl(fnd_global.user_id,-1),
4598: src.reference_id,
4599: src.currency_code,
4600: to_number(hr_ou.ORGANIZATION_ID),
4601: src.date_ordered +'
4602: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4603: null,
4604: null,
4605: round(nvl(src.amount,0)*curr.exchange_rate'
4606: ||','||CE_CASH_FCST.G_precision||'),
4602: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
4603: null,
4604: null,
4605: round(nvl(src.amount,0)*curr.exchange_rate'
4606: ||','||CE_CASH_FCST.G_precision||'),
4607: src.amount';
4608: END IF;
4609: where_clause_3 := where_clause || '
4610: AND src.date_ordered BETWEEN cab.start_date - '
4607: src.amount';
4608: END IF;
4609: where_clause_3 := where_clause || '
4610: AND src.date_ordered BETWEEN cab.start_date - '
4611: ||to_char(CE_CASH_FCST.G_lead_time)||
4612: ' and cab.end_date - '
4613: ||to_char(CE_CASH_FCST.G_lead_time);
4614: END IF;
4615:
4609: where_clause_3 := where_clause || '
4610: AND src.date_ordered BETWEEN cab.start_date - '
4611: ||to_char(CE_CASH_FCST.G_lead_time)||
4612: ' and cab.end_date - '
4613: ||to_char(CE_CASH_FCST.G_lead_time);
4614: END IF;
4615:
4616: cep_standard.debug('Built Select Clause');
4617: cep_standard.debug('Built Where Clause');
4620: main_query_1 := select_clause_1 || from_clause_1 || where_clause_1;
4621: main_query_2 := select_clause_2 || from_clause_2 || where_clause_2;
4622: main_query_3 := select_clause_3 || from_clause_3 || where_clause_3;
4623:
4624: IF (CE_CASH_FCST.G_use_payment_terms = 'Y') THEN
4625: Execute_Main_Query (main_query_2);
4626: Execute_Main_Query (main_query_3);
4627: ELSE
4628: Execute_Main_Query (main_query_1);
4657: where_clause varchar2(1500);
4658: select_clause varchar2(1500);
4659: main_query varchar2(3500) := null;
4660: BEGIN
4661: CE_CASH_FCST.G_app_short_name := 'PA';
4662:
4663: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4664: select_clause := '
4665: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4659: main_query varchar2(3500) := null;
4660: BEGIN
4661: CE_CASH_FCST.G_app_short_name := 'PA';
4662:
4663: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4664: select_clause := '
4665: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4666: '||CE_CASH_FCST.G_forecast_id||',
4667: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4662:
4663: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4664: select_clause := '
4665: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4666: '||CE_CASH_FCST.G_forecast_id||',
4667: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4668: '||CE_CASH_FCST.G_forecast_row_id||',
4669: ''Y'',
4670: nvl(fnd_global.user_id,-1),
4663: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4664: select_clause := '
4665: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4666: '||CE_CASH_FCST.G_forecast_id||',
4667: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4668: '||CE_CASH_FCST.G_forecast_row_id||',
4669: ''Y'',
4670: nvl(fnd_global.user_id,-1),
4671: sysdate,
4664: select_clause := '
4665: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4666: '||CE_CASH_FCST.G_forecast_id||',
4667: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4668: '||CE_CASH_FCST.G_forecast_row_id||',
4669: ''Y'',
4670: nvl(fnd_global.user_id,-1),
4671: sysdate,
4672: nvl(fnd_global.user_id,-1),
4679: src.trx_date,
4680: null,
4681: null,
4682: round(nvl(-src.amount,0)*'
4683: ||CE_CASH_FCST.G_rp_exchange_rate
4684: ||','||CE_CASH_FCST.G_precision||'),
4685: -src.amount';
4686: ELSE
4687: select_clause := '
4680: null,
4681: null,
4682: round(nvl(-src.amount,0)*'
4683: ||CE_CASH_FCST.G_rp_exchange_rate
4684: ||','||CE_CASH_FCST.G_precision||'),
4685: -src.amount';
4686: ELSE
4687: select_clause := '
4688: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4685: -src.amount';
4686: ELSE
4687: select_clause := '
4688: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4689: '||CE_CASH_FCST.G_forecast_id||',
4690: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4691: '||CE_CASH_FCST.G_forecast_row_id||',
4692: ''Y'',
4693: nvl(fnd_global.user_id,-1),
4686: ELSE
4687: select_clause := '
4688: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4689: '||CE_CASH_FCST.G_forecast_id||',
4690: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4691: '||CE_CASH_FCST.G_forecast_row_id||',
4692: ''Y'',
4693: nvl(fnd_global.user_id,-1),
4694: sysdate,
4687: select_clause := '
4688: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4689: '||CE_CASH_FCST.G_forecast_id||',
4690: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4691: '||CE_CASH_FCST.G_forecast_row_id||',
4692: ''Y'',
4693: nvl(fnd_global.user_id,-1),
4694: sysdate,
4695: nvl(fnd_global.user_id,-1),
4702: src.trx_date,
4703: null,
4704: null,
4705: round(nvl(-src.amount,0)*curr.exchange_rate'
4706: ||','||CE_CASH_FCST.G_precision||'),
4707: -src.amount';
4708: END IF;
4709:
4710: from_clause := Get_From_Clause ('pa_ce_exp_reports_v');
4709:
4710: from_clause := Get_From_Clause ('pa_ce_exp_reports_v');
4711: where_clause := Get_Where_Clause || '
4712: AND src.trx_date BETWEEN cab.start_date - '
4713: ||to_char(CE_CASH_FCST.G_lead_time)||
4714: ' and cab.end_date - '
4715: ||to_char(CE_CASH_FCST.G_lead_time)||
4716: Add_Where('PROJECT_ID');
4717:
4711: where_clause := Get_Where_Clause || '
4712: AND src.trx_date BETWEEN cab.start_date - '
4713: ||to_char(CE_CASH_FCST.G_lead_time)||
4714: ' and cab.end_date - '
4715: ||to_char(CE_CASH_FCST.G_lead_time)||
4716: Add_Where('PROJECT_ID');
4717:
4718: main_query := select_clause || from_clause || where_clause;
4719:
4748: select_clause := Get_Select_Clause;
4749: from_clause := Get_From_Clause ('ce_ap_fc_exp_reports_v');
4750: where_clause := Get_Where_Clause || '
4751: AND src.trx_date BETWEEN cab.start_date - '
4752: ||to_char(CE_CASH_FCST.G_lead_time)||
4753: ' and cab.end_date - '
4754: ||to_char(CE_CASH_FCST.G_lead_time)||
4755: ' AND src.source <> ''NonValidatedWebExpense'' '||
4756: Add_Where('PROJECT_ID') || Add_Where('INCLUDE_HOLD_FLAG');
4750: where_clause := Get_Where_Clause || '
4751: AND src.trx_date BETWEEN cab.start_date - '
4752: ||to_char(CE_CASH_FCST.G_lead_time)||
4753: ' and cab.end_date - '
4754: ||to_char(CE_CASH_FCST.G_lead_time)||
4755: ' AND src.source <> ''NonValidatedWebExpense'' '||
4756: Add_Where('PROJECT_ID') || Add_Where('INCLUDE_HOLD_FLAG');
4757:
4758: main_query := select_clause || from_clause || where_clause;
4758: main_query := select_clause || from_clause || where_clause;
4759:
4760: Execute_Main_Query (main_query);
4761:
4762: IF (CE_CASH_FCST.G_rp_project_id IS NOT NULL) THEN
4763: Build_PA_Exp_Report_Query;
4764: END IF;
4765: EXCEPTION
4766: WHEN OTHERS THEN
4793: select_clause := Get_Select_Clause;
4794: from_clause := Get_From_Clause ('pa_ce_transactions_v');
4795: where_clause := Get_Where_Clause || '
4796: AND src.trx_date BETWEEN cab.start_date - '
4797: ||to_char(CE_CASH_FCST.G_lead_time)||
4798: ' and cab.end_date - '
4799: ||to_char(CE_CASH_FCST.G_lead_time)||
4800: Add_Where('PROJECT_ID') || Add_Where('TYPE');
4801:
4795: where_clause := Get_Where_Clause || '
4796: AND src.trx_date BETWEEN cab.start_date - '
4797: ||to_char(CE_CASH_FCST.G_lead_time)||
4798: ' and cab.end_date - '
4799: ||to_char(CE_CASH_FCST.G_lead_time)||
4800: Add_Where('PROJECT_ID') || Add_Where('TYPE');
4801:
4802: main_query := select_clause || from_clause || where_clause;
4803:
4830: select_clause varchar2(1500);
4831: main_query varchar2(3500) := null;
4832: BEGIN
4833:
4834: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4835: select_clause := '
4836: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4837: '||CE_CASH_FCST.G_forecast_id||',
4838: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4833:
4834: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4835: select_clause := '
4836: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4837: '||CE_CASH_FCST.G_forecast_id||',
4838: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4839: '||CE_CASH_FCST.G_forecast_row_id||',
4840: ''Y'',
4841: nvl(fnd_global.user_id,-1),
4834: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
4835: select_clause := '
4836: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4837: '||CE_CASH_FCST.G_forecast_id||',
4838: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4839: '||CE_CASH_FCST.G_forecast_row_id||',
4840: ''Y'',
4841: nvl(fnd_global.user_id,-1),
4842: sysdate,
4835: select_clause := '
4836: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4837: '||CE_CASH_FCST.G_forecast_id||',
4838: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4839: '||CE_CASH_FCST.G_forecast_row_id||',
4840: ''Y'',
4841: nvl(fnd_global.user_id,-1),
4842: sysdate,
4843: nvl(fnd_global.user_id,-1),
4850: src.trx_date,
4851: null,
4852: null,
4853: round(nvl(src.amount,0)*'
4854: ||CE_CASH_FCST.G_rp_exchange_rate
4855: ||','||CE_CASH_FCST.G_precision||'),
4856: src.amount';
4857: ELSE
4858: select_clause := '
4851: null,
4852: null,
4853: round(nvl(src.amount,0)*'
4854: ||CE_CASH_FCST.G_rp_exchange_rate
4855: ||','||CE_CASH_FCST.G_precision||'),
4856: src.amount';
4857: ELSE
4858: select_clause := '
4859: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4856: src.amount';
4857: ELSE
4858: select_clause := '
4859: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4860: '||CE_CASH_FCST.G_forecast_id||',
4861: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4862: '||CE_CASH_FCST.G_forecast_row_id||',
4863: ''Y'',
4864: nvl(fnd_global.user_id,-1),
4857: ELSE
4858: select_clause := '
4859: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4860: '||CE_CASH_FCST.G_forecast_id||',
4861: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4862: '||CE_CASH_FCST.G_forecast_row_id||',
4863: ''Y'',
4864: nvl(fnd_global.user_id,-1),
4865: sysdate,
4858: select_clause := '
4859: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
4860: '||CE_CASH_FCST.G_forecast_id||',
4861: '||CE_CASH_FCST.G_rp_forecast_header_id||',
4862: '||CE_CASH_FCST.G_forecast_row_id||',
4863: ''Y'',
4864: nvl(fnd_global.user_id,-1),
4865: sysdate,
4866: nvl(fnd_global.user_id,-1),
4873: src.trx_date,
4874: null,
4875: null,
4876: round(nvl(src.amount,0)*curr.exchange_rate'
4877: ||','||CE_CASH_FCST.G_precision||'),
4878: src.amount';
4879: END IF;
4880:
4881: from_clause := Get_From_Clause ('pa_ce_billing_events_v');
4880:
4881: from_clause := Get_From_Clause ('pa_ce_billing_events_v');
4882: where_clause := Get_Where_Clause || '
4883: AND src.trx_date BETWEEN cab.start_date - '
4884: ||to_char(CE_CASH_FCST.G_lead_time)||
4885: ' and cab.end_date - '
4886: ||to_char(CE_CASH_FCST.G_lead_time)||
4887: Add_Where('PROJECT_ID');
4888:
4882: where_clause := Get_Where_Clause || '
4883: AND src.trx_date BETWEEN cab.start_date - '
4884: ||to_char(CE_CASH_FCST.G_lead_time)||
4885: ' and cab.end_date - '
4886: ||to_char(CE_CASH_FCST.G_lead_time)||
4887: Add_Where('PROJECT_ID');
4888:
4889: main_query := select_clause || from_clause || where_clause;
4890: Execute_Main_Query (main_query);
4927: end_date,
4928: forecast_column_id
4929: FROM ce_forecast_ext_temp
4930: WHERE context_value = 'A'
4931: AND forecast_request_id = CE_CASH_FCST.G_forecast_id
4932: AND conversion_rate = CE_CASH_FCST.G_forecast_row_id;
4933:
4934: CURSOR C_sob(p_org_id NUMBER) IS
4935: SELECT 1
4928: forecast_column_id
4929: FROM ce_forecast_ext_temp
4930: WHERE context_value = 'A'
4931: AND forecast_request_id = CE_CASH_FCST.G_forecast_id
4932: AND conversion_rate = CE_CASH_FCST.G_forecast_row_id;
4933:
4934: CURSOR C_sob(p_org_id NUMBER) IS
4935: SELECT 1
4936: FROM CE_FORECAST_ORGS_V
4933:
4934: CURSOR C_sob(p_org_id NUMBER) IS
4935: SELECT 1
4936: FROM CE_FORECAST_ORGS_V
4937: WHERE set_of_books_id = CE_CASH_FCST.G_set_of_books_id
4938: AND org_id = p_org_id;
4939:
4940: CURSOR C_rate(p_currency_code VARCHAR2) IS
4941: SELECT exchange_rate
4939:
4940: CURSOR C_rate(p_currency_code VARCHAR2) IS
4941: SELECT exchange_rate
4942: FROM ce_currency_rates_temp
4943: WHERE forecast_request_id = CE_CASH_FCST.G_forecast_id
4944: AND to_currency = CE_CASH_FCST.G_rp_forecast_currency
4945: AND currency_code = p_currency_code;
4946:
4947: CURSOR C_budgets(p_start_date DATE, p_end_date DATE) IS
4940: CURSOR C_rate(p_currency_code VARCHAR2) IS
4941: SELECT exchange_rate
4942: FROM ce_currency_rates_temp
4943: WHERE forecast_request_id = CE_CASH_FCST.G_forecast_id
4944: AND to_currency = CE_CASH_FCST.G_rp_forecast_currency
4945: AND currency_code = p_currency_code;
4946:
4947: CURSOR C_budgets(p_start_date DATE, p_end_date DATE) IS
4948: SELECT trim(resource_assignment_id||'X'||to_char(start_date,'DD-MON-YY')) reference_id, --bug 7345336
4952: nvl(revenue,0)/(trunc(end_date)-trunc(start_date)+1) per_day_revenue,
4953: start_date,
4954: end_date
4955: FROM pa_ce_integration_budgets_v
4956: WHERE decode(CE_CASH_FCST.G_budget_version,'C',current_flag,
4957: 'O',current_original_flag) = 'Y'
4958: AND end_date >= p_start_date
4959: AND start_date <= p_end_date
4960: AND project_id = CE_CASH_FCST.G_rp_project_id
4956: WHERE decode(CE_CASH_FCST.G_budget_version,'C',current_flag,
4957: 'O',current_original_flag) = 'Y'
4958: AND end_date >= p_start_date
4959: AND start_date <= p_end_date
4960: AND project_id = CE_CASH_FCST.G_rp_project_id
4961: AND budget_type_code = CE_CASH_FCST.G_budget_type;
4962:
4963: BEGIN
4964: populate_aging_buckets;
4957: 'O',current_original_flag) = 'Y'
4958: AND end_date >= p_start_date
4959: AND start_date <= p_end_date
4960: AND project_id = CE_CASH_FCST.G_rp_project_id
4961: AND budget_type_code = CE_CASH_FCST.G_budget_type;
4962:
4963: BEGIN
4964: populate_aging_buckets;
4965:
4965:
4966: SELECT org_id
4967: INTO l_org_id
4968: FROM pa_projects_all
4969: WHERE project_id = CE_CASH_FCST.G_rp_project_id;
4970:
4971: SELECT to_number(ORGANIZATION_ID)
4972: INTO l_legal_entity_id
4973: FROM hr_operating_units
4998: (l_end_date - l_start_date + 1);
4999: l_revenue_amount := C_budget_rec.per_day_revenue *
5000: (l_end_date - l_start_date + 1);
5001:
5002: IF(CE_CASH_FCST.G_rp_src_curr_type in ('E','F') AND
5003: C_budget_rec.projfunc_currency_code <> CE_CASH_FCST.G_rp_src_currency) THEN
5004: l_revenue_amount := 0;
5005: l_cost_amount := 0;
5006: END IF;
4999: l_revenue_amount := C_budget_rec.per_day_revenue *
5000: (l_end_date - l_start_date + 1);
5001:
5002: IF(CE_CASH_FCST.G_rp_src_curr_type in ('E','F') AND
5003: C_budget_rec.projfunc_currency_code <> CE_CASH_FCST.G_rp_src_currency) THEN
5004: l_revenue_amount := 0;
5005: l_cost_amount := 0;
5006: END IF;
5007:
5004: l_revenue_amount := 0;
5005: l_cost_amount := 0;
5006: END IF;
5007:
5008: IF( (CE_CASH_FCST.G_org_id <> -1 AND CE_CASH_FCST.G_org_id <> -99) AND
5009: (nvl(l_org_id,CE_CASH_FCST.G_org_id) <> CE_CASH_FCST.G_org_id) ) THEN
5010: l_revenue_amount := 0;
5011: l_cost_amount := 0;
5012: END IF;
5005: l_cost_amount := 0;
5006: END IF;
5007:
5008: IF( (CE_CASH_FCST.G_org_id <> -1 AND CE_CASH_FCST.G_org_id <> -99) AND
5009: (nvl(l_org_id,CE_CASH_FCST.G_org_id) <> CE_CASH_FCST.G_org_id) ) THEN
5010: l_revenue_amount := 0;
5011: l_cost_amount := 0;
5012: END IF;
5013:
5010: l_revenue_amount := 0;
5011: l_cost_amount := 0;
5012: END IF;
5013:
5014: IF( CE_CASH_FCST.G_set_of_books_id IS NOT NULL AND
5015: CE_CASH_FCST.G_set_of_books_id <> -1) THEN
5016: OPEN C_sob(l_org_id);
5017: FETCH C_sob INTO l_dummy;
5018: IF C_sob%NOTFOUND THEN
5011: l_cost_amount := 0;
5012: END IF;
5013:
5014: IF( CE_CASH_FCST.G_set_of_books_id IS NOT NULL AND
5015: CE_CASH_FCST.G_set_of_books_id <> -1) THEN
5016: OPEN C_sob(l_org_id);
5017: FETCH C_sob INTO l_dummy;
5018: IF C_sob%NOTFOUND THEN
5019: CLOSE C_sob;
5022: END IF;
5023: CLOSE C_sob;
5024: END IF;
5025:
5026: IF( CE_CASH_FCST.G_rp_exchange_type IS NULL OR
5027: CE_CASH_FCST.G_rp_exchange_type <> 'User')THEN
5028: OPEN C_rate(C_budget_rec.projfunc_currency_code);
5029: FETCH C_rate INTO l_rate;
5030: IF C_rate%NOTFOUND THEN
5023: CLOSE C_sob;
5024: END IF;
5025:
5026: IF( CE_CASH_FCST.G_rp_exchange_type IS NULL OR
5027: CE_CASH_FCST.G_rp_exchange_type <> 'User')THEN
5028: OPEN C_rate(C_budget_rec.projfunc_currency_code);
5029: FETCH C_rate INTO l_rate;
5030: IF C_rate%NOTFOUND THEN
5031: l_rate := 1;
5030: IF C_rate%NOTFOUND THEN
5031: l_rate := 1;
5032: END IF;
5033: CLOSE C_rate;
5034: ELSIF( CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
5035: l_rate := CE_CASH_FCST.G_rp_exchange_rate;
5036: ELSE
5037: l_rate := 1;
5038: END IF;
5031: l_rate := 1;
5032: END IF;
5033: CLOSE C_rate;
5034: ELSIF( CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
5035: l_rate := CE_CASH_FCST.G_rp_exchange_rate;
5036: ELSE
5037: l_rate := 1;
5038: END IF;
5039:
5036: ELSE
5037: l_rate := 1;
5038: END IF;
5039:
5040: IF(CE_CASH_FCST.G_rp_amount_threshold IS NOT NULL) THEN
5041: IF (CE_CASH_FCST.G_trx_type = 'PAI') THEN
5042: IF (abs(l_revenue_amount) <= CE_CASH_FCST.G_rp_amount_threshold) THEN
5043: l_revenue_amount := 0;
5044: END IF;
5037: l_rate := 1;
5038: END IF;
5039:
5040: IF(CE_CASH_FCST.G_rp_amount_threshold IS NOT NULL) THEN
5041: IF (CE_CASH_FCST.G_trx_type = 'PAI') THEN
5042: IF (abs(l_revenue_amount) <= CE_CASH_FCST.G_rp_amount_threshold) THEN
5043: l_revenue_amount := 0;
5044: END IF;
5045: ELSE
5038: END IF;
5039:
5040: IF(CE_CASH_FCST.G_rp_amount_threshold IS NOT NULL) THEN
5041: IF (CE_CASH_FCST.G_trx_type = 'PAI') THEN
5042: IF (abs(l_revenue_amount) <= CE_CASH_FCST.G_rp_amount_threshold) THEN
5043: l_revenue_amount := 0;
5044: END IF;
5045: ELSE
5046: IF (abs(l_cost_amount) <= CE_CASH_FCST.G_rp_amount_threshold) THEN
5042: IF (abs(l_revenue_amount) <= CE_CASH_FCST.G_rp_amount_threshold) THEN
5043: l_revenue_amount := 0;
5044: END IF;
5045: ELSE
5046: IF (abs(l_cost_amount) <= CE_CASH_FCST.G_rp_amount_threshold) THEN
5047: l_cost_amount := 0;
5048: END IF;
5049: END IF;
5050: END IF;
5048: END IF;
5049: END IF;
5050: END IF;
5051:
5052: IF(C_rec.forecast_column_id = CE_CASH_FCST.G_overdue_column_id AND
5053: CE_CASH_FCST.G_invalid_overdue_row)THEN
5054: l_revenue_amount := 0;
5055: l_cost_amount := 0;
5056: END IF;
5049: END IF;
5050: END IF;
5051:
5052: IF(C_rec.forecast_column_id = CE_CASH_FCST.G_overdue_column_id AND
5053: CE_CASH_FCST.G_invalid_overdue_row)THEN
5054: l_revenue_amount := 0;
5055: l_cost_amount := 0;
5056: END IF;
5057:
5054: l_revenue_amount := 0;
5055: l_cost_amount := 0;
5056: END IF;
5057:
5058: IF (CE_CASH_FCST.G_trx_type = 'PAI') THEN
5059: IF (l_revenue_amount <> 0) THEN
5060: Insert_Fcast_Cell(C_budget_rec.reference_id, C_budget_rec.projfunc_currency_code, l_legal_entity_id, null, null, l_revenue_amount*l_rate, l_revenue_amount, C_rec.forecast_column_id);
5061: END IF;
5062: ELSE
5096: where_clause varchar2(1500);
5097: select_clause varchar2(1500);
5098: main_query varchar2(3500) := null;
5099: BEGIN
5100: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
5101: select_clause := '
5102: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
5103: '||CE_CASH_FCST.G_forecast_id||',
5104: '||CE_CASH_FCST.G_rp_forecast_header_id||',
5099: BEGIN
5100: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
5101: select_clause := '
5102: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
5103: '||CE_CASH_FCST.G_forecast_id||',
5104: '||CE_CASH_FCST.G_rp_forecast_header_id||',
5105: '||CE_CASH_FCST.G_forecast_row_id||',
5106: ''Y'',
5107: nvl(fnd_global.user_id,-1),
5100: IF(CE_CASH_FCST.G_rp_exchange_type = 'User')THEN
5101: select_clause := '
5102: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
5103: '||CE_CASH_FCST.G_forecast_id||',
5104: '||CE_CASH_FCST.G_rp_forecast_header_id||',
5105: '||CE_CASH_FCST.G_forecast_row_id||',
5106: ''Y'',
5107: nvl(fnd_global.user_id,-1),
5108: sysdate,
5101: select_clause := '
5102: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
5103: '||CE_CASH_FCST.G_forecast_id||',
5104: '||CE_CASH_FCST.G_rp_forecast_header_id||',
5105: '||CE_CASH_FCST.G_forecast_row_id||',
5106: ''Y'',
5107: nvl(fnd_global.user_id,-1),
5108: sysdate,
5109: nvl(fnd_global.user_id,-1),
5113: src.reference_id,
5114: src.currency_code,
5115: src.org_id,
5116: src.trx_date +'
5117: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
5118: src.bank_account_id,
5119: ccid.asset_code_combination_id,
5120: round(nvl(src.amount,0)*'||CE_CASH_FCST.G_rp_exchange_rate
5121: ||','||CE_CASH_FCST.G_precision||'),
5116: src.trx_date +'
5117: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
5118: src.bank_account_id,
5119: ccid.asset_code_combination_id,
5120: round(nvl(src.amount,0)*'||CE_CASH_FCST.G_rp_exchange_rate
5121: ||','||CE_CASH_FCST.G_precision||'),
5122: src.amount';
5123: ELSE
5124: select_clause := '
5117: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
5118: src.bank_account_id,
5119: ccid.asset_code_combination_id,
5120: round(nvl(src.amount,0)*'||CE_CASH_FCST.G_rp_exchange_rate
5121: ||','||CE_CASH_FCST.G_precision||'),
5122: src.amount';
5123: ELSE
5124: select_clause := '
5125: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
5122: src.amount';
5123: ELSE
5124: select_clause := '
5125: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
5126: '||CE_CASH_FCST.G_forecast_id||',
5127: '||CE_CASH_FCST.G_rp_forecast_header_id||',
5128: '||CE_CASH_FCST.G_forecast_row_id||',
5129: ''Y'',
5130: nvl(fnd_global.user_id,-1),
5123: ELSE
5124: select_clause := '
5125: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
5126: '||CE_CASH_FCST.G_forecast_id||',
5127: '||CE_CASH_FCST.G_rp_forecast_header_id||',
5128: '||CE_CASH_FCST.G_forecast_row_id||',
5129: ''Y'',
5130: nvl(fnd_global.user_id,-1),
5131: sysdate,
5124: select_clause := '
5125: SELECT CE_FORECAST_TRX_CELLS_S.nextval,
5126: '||CE_CASH_FCST.G_forecast_id||',
5127: '||CE_CASH_FCST.G_rp_forecast_header_id||',
5128: '||CE_CASH_FCST.G_forecast_row_id||',
5129: ''Y'',
5130: nvl(fnd_global.user_id,-1),
5131: sysdate,
5132: nvl(fnd_global.user_id,-1),
5136: src.reference_id,
5137: src.currency_code,
5138: src.org_id,
5139: src.trx_date +'
5140: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
5141: src.bank_account_id,
5142: ccid.asset_code_combination_id,
5143: round(nvl(src.amount,0)*curr.exchange_rate'
5144: ||','||CE_CASH_FCST.G_precision||'),
5140: ||to_char(CE_CASH_FCST.G_lead_time)|| ',
5141: src.bank_account_id,
5142: ccid.asset_code_combination_id,
5143: round(nvl(src.amount,0)*curr.exchange_rate'
5144: ||','||CE_CASH_FCST.G_precision||'),
5145: src.amount';
5146: END IF;
5147: from_clause := Get_From_Clause('ce_xtr_cashflows_v');
5148: where_clause := Get_Where_Clause || '
5148: where_clause := Get_Where_Clause || '
5149: AND src.trx_date BETWEEN cab.start_date and cab.end_date '||
5150: Add_Where('XTR_TYPE') || Add_Where('XTR_BANK_ACCOUNT') || Add_Where('EXCLUDE_INDIC_EXP');
5151:
5152: IF (CE_CASH_FCST.G_trx_type = 'XTO') THEN
5153: where_clause := where_clause || ' AND src.amount < 0';
5154: ELSE
5155: where_clause := where_clause || ' AND src.amount > 0';
5156: END IF;
5154: ELSE
5155: where_clause := where_clause || ' AND src.amount > 0';
5156: END IF;
5157:
5158: IF CE_CASH_FCST.G_overdue_transactions = 'INCLUDE' THEN
5159: where_clause := where_clause ||
5160: ' AND decode(cab.forecast_column_id,'||CE_CASH_FCST.G_overdue_column_id
5161: ||',src.reconciled_reference,null) is null';
5162: END IF;
5156: END IF;
5157:
5158: IF CE_CASH_FCST.G_overdue_transactions = 'INCLUDE' THEN
5159: where_clause := where_clause ||
5160: ' AND decode(cab.forecast_column_id,'||CE_CASH_FCST.G_overdue_column_id
5161: ||',src.reconciled_reference,null) is null';
5162: END IF;
5163: main_query := select_clause || from_clause || where_clause;
5164: Execute_Main_Query (main_query);
5193: cep_standard.debug('>>CE_CSH_FCAST_POP.Build_Remote_Query');
5194: --
5195: -- Get view and db information from the external source type
5196: --
5197: cep_standard.debug('Get database information for database: '||CE_CASH_FCST.G_external_source_type);
5198: BEGIN
5199:
5200: SELECT external_source_view, db_link_name
5201: INTO source_view, db_link
5199:
5200: SELECT external_source_view, db_link_name
5201: INTO source_view, db_link
5202: FROM ce_forecast_ext_views
5203: WHERE external_source_type = CE_CASH_FCST.G_external_source_type;
5204:
5205: EXCEPTION
5206: WHEN NO_DATA_FOUND THEN
5207: cep_standard.debug('EXCEPTION:Build_Remote_Query - View def not found');
5205: EXCEPTION
5206: WHEN NO_DATA_FOUND THEN
5207: cep_standard.debug('EXCEPTION:Build_Remote_Query - View def not found');
5208: FND_MESSAGE.set_name('CE','CE_FC_EXT_SOURCE_UNDEFINED');
5209: FND_MESSAGE.set_token('EXT_TYPE', CE_CASH_FCST.G_external_source_type);
5210: error_msg := FND_MESSAGE.get;
5211: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id, CE_CASH_FCST.G_rp_forecast_header_id,
5212: CE_CASH_FCST.G_forecast_row_id, 'CE_FC_EXT_SOURCE_UNDEFINED', error_msg);
5213: RETURN;
5207: cep_standard.debug('EXCEPTION:Build_Remote_Query - View def not found');
5208: FND_MESSAGE.set_name('CE','CE_FC_EXT_SOURCE_UNDEFINED');
5209: FND_MESSAGE.set_token('EXT_TYPE', CE_CASH_FCST.G_external_source_type);
5210: error_msg := FND_MESSAGE.get;
5211: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id, CE_CASH_FCST.G_rp_forecast_header_id,
5212: CE_CASH_FCST.G_forecast_row_id, 'CE_FC_EXT_SOURCE_UNDEFINED', error_msg);
5213: RETURN;
5214: END;
5215:
5208: FND_MESSAGE.set_name('CE','CE_FC_EXT_SOURCE_UNDEFINED');
5209: FND_MESSAGE.set_token('EXT_TYPE', CE_CASH_FCST.G_external_source_type);
5210: error_msg := FND_MESSAGE.get;
5211: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id, CE_CASH_FCST.G_rp_forecast_header_id,
5212: CE_CASH_FCST.G_forecast_row_id, 'CE_FC_EXT_SOURCE_UNDEFINED', error_msg);
5213: RETURN;
5214: END;
5215:
5216: populate_aging_buckets;
5230: amount_table CE_FORECAST_REMOTE_SOURCES.AmountTab'||db_link||';
5231:
5232: CURSOR conversion_cursor IS SELECT currency_code, exchange_rate
5233: FROM ce_currency_rates_temp
5234: WHERE forecast_request_id = CE_CASH_FCST.G_forecast_id; ';
5235:
5236: IF( db_link IS NOT NULL )THEN
5237: main_query := main_query ||'
5238: CURSOR aging_cursor IS SELECT forecast_column_id, start_date, end_date
5237: main_query := main_query ||'
5238: CURSOR aging_cursor IS SELECT forecast_column_id, start_date, end_date
5239: FROM ce_forecast_ext_temp
5240: WHERE context_value = ''A'' and
5241: forecast_request_id = CE_CASH_FCST.G_forecast_id and
5242: conversion_rate = CE_CASH_FCST.G_forecast_row_id; ';
5243: END IF;
5244:
5245: main_query := main_query ||'
5238: CURSOR aging_cursor IS SELECT forecast_column_id, start_date, end_date
5239: FROM ce_forecast_ext_temp
5240: WHERE context_value = ''A'' and
5241: forecast_request_id = CE_CASH_FCST.G_forecast_id and
5242: conversion_rate = CE_CASH_FCST.G_forecast_row_id; ';
5243: END IF;
5244:
5245: main_query := main_query ||'
5246: begin ';
5296: main_query := main_query||db_link;
5297: END IF;
5298:
5299: main_query := main_query ||'(
5300: CE_CASH_FCST.G_forecast_id,
5301: '''||source_view||''',
5302: '''||db_link||''',
5303: CE_CASH_FCST.G_forecast_row_id,
5304: aging_table,
5299: main_query := main_query ||'(
5300: CE_CASH_FCST.G_forecast_id,
5301: '''||source_view||''',
5302: '''||db_link||''',
5303: CE_CASH_FCST.G_forecast_row_id,
5304: aging_table,
5305: conversion_table,
5306: CE_CASH_FCST.G_rp_forecast_currency,
5307: CE_CASH_FCST.G_rp_exchange_date,
5302: '''||db_link||''',
5303: CE_CASH_FCST.G_forecast_row_id,
5304: aging_table,
5305: conversion_table,
5306: CE_CASH_FCST.G_rp_forecast_currency,
5307: CE_CASH_FCST.G_rp_exchange_date,
5308: CE_CASH_FCST.G_rp_exchange_type,
5309: CE_CASH_FCST.G_rp_exchange_rate,
5310: CE_CASH_FCST.G_rp_src_curr_type,
5303: CE_CASH_FCST.G_forecast_row_id,
5304: aging_table,
5305: conversion_table,
5306: CE_CASH_FCST.G_rp_forecast_currency,
5307: CE_CASH_FCST.G_rp_exchange_date,
5308: CE_CASH_FCST.G_rp_exchange_type,
5309: CE_CASH_FCST.G_rp_exchange_rate,
5310: CE_CASH_FCST.G_rp_src_curr_type,
5311: CE_CASH_FCST.G_rp_src_currency,
5304: aging_table,
5305: conversion_table,
5306: CE_CASH_FCST.G_rp_forecast_currency,
5307: CE_CASH_FCST.G_rp_exchange_date,
5308: CE_CASH_FCST.G_rp_exchange_type,
5309: CE_CASH_FCST.G_rp_exchange_rate,
5310: CE_CASH_FCST.G_rp_src_curr_type,
5311: CE_CASH_FCST.G_rp_src_currency,
5312: CE_CASH_FCST.G_rp_amount_threshold,
5305: conversion_table,
5306: CE_CASH_FCST.G_rp_forecast_currency,
5307: CE_CASH_FCST.G_rp_exchange_date,
5308: CE_CASH_FCST.G_rp_exchange_type,
5309: CE_CASH_FCST.G_rp_exchange_rate,
5310: CE_CASH_FCST.G_rp_src_curr_type,
5311: CE_CASH_FCST.G_rp_src_currency,
5312: CE_CASH_FCST.G_rp_amount_threshold,
5313: CE_CASH_FCST.G_lead_time,
5306: CE_CASH_FCST.G_rp_forecast_currency,
5307: CE_CASH_FCST.G_rp_exchange_date,
5308: CE_CASH_FCST.G_rp_exchange_type,
5309: CE_CASH_FCST.G_rp_exchange_rate,
5310: CE_CASH_FCST.G_rp_src_curr_type,
5311: CE_CASH_FCST.G_rp_src_currency,
5312: CE_CASH_FCST.G_rp_amount_threshold,
5313: CE_CASH_FCST.G_lead_time,
5314: CE_CASH_FCST.G_criteria1,
5307: CE_CASH_FCST.G_rp_exchange_date,
5308: CE_CASH_FCST.G_rp_exchange_type,
5309: CE_CASH_FCST.G_rp_exchange_rate,
5310: CE_CASH_FCST.G_rp_src_curr_type,
5311: CE_CASH_FCST.G_rp_src_currency,
5312: CE_CASH_FCST.G_rp_amount_threshold,
5313: CE_CASH_FCST.G_lead_time,
5314: CE_CASH_FCST.G_criteria1,
5315: CE_CASH_FCST.G_criteria2,
5308: CE_CASH_FCST.G_rp_exchange_type,
5309: CE_CASH_FCST.G_rp_exchange_rate,
5310: CE_CASH_FCST.G_rp_src_curr_type,
5311: CE_CASH_FCST.G_rp_src_currency,
5312: CE_CASH_FCST.G_rp_amount_threshold,
5313: CE_CASH_FCST.G_lead_time,
5314: CE_CASH_FCST.G_criteria1,
5315: CE_CASH_FCST.G_criteria2,
5316: CE_CASH_FCST.G_criteria3,
5309: CE_CASH_FCST.G_rp_exchange_rate,
5310: CE_CASH_FCST.G_rp_src_curr_type,
5311: CE_CASH_FCST.G_rp_src_currency,
5312: CE_CASH_FCST.G_rp_amount_threshold,
5313: CE_CASH_FCST.G_lead_time,
5314: CE_CASH_FCST.G_criteria1,
5315: CE_CASH_FCST.G_criteria2,
5316: CE_CASH_FCST.G_criteria3,
5317: CE_CASH_FCST.G_criteria4,
5310: CE_CASH_FCST.G_rp_src_curr_type,
5311: CE_CASH_FCST.G_rp_src_currency,
5312: CE_CASH_FCST.G_rp_amount_threshold,
5313: CE_CASH_FCST.G_lead_time,
5314: CE_CASH_FCST.G_criteria1,
5315: CE_CASH_FCST.G_criteria2,
5316: CE_CASH_FCST.G_criteria3,
5317: CE_CASH_FCST.G_criteria4,
5318: CE_CASH_FCST.G_criteria5,
5311: CE_CASH_FCST.G_rp_src_currency,
5312: CE_CASH_FCST.G_rp_amount_threshold,
5313: CE_CASH_FCST.G_lead_time,
5314: CE_CASH_FCST.G_criteria1,
5315: CE_CASH_FCST.G_criteria2,
5316: CE_CASH_FCST.G_criteria3,
5317: CE_CASH_FCST.G_criteria4,
5318: CE_CASH_FCST.G_criteria5,
5319: CE_CASH_FCST.G_criteria6,
5312: CE_CASH_FCST.G_rp_amount_threshold,
5313: CE_CASH_FCST.G_lead_time,
5314: CE_CASH_FCST.G_criteria1,
5315: CE_CASH_FCST.G_criteria2,
5316: CE_CASH_FCST.G_criteria3,
5317: CE_CASH_FCST.G_criteria4,
5318: CE_CASH_FCST.G_criteria5,
5319: CE_CASH_FCST.G_criteria6,
5320: CE_CASH_FCST.G_criteria7,
5313: CE_CASH_FCST.G_lead_time,
5314: CE_CASH_FCST.G_criteria1,
5315: CE_CASH_FCST.G_criteria2,
5316: CE_CASH_FCST.G_criteria3,
5317: CE_CASH_FCST.G_criteria4,
5318: CE_CASH_FCST.G_criteria5,
5319: CE_CASH_FCST.G_criteria6,
5320: CE_CASH_FCST.G_criteria7,
5321: CE_CASH_FCST.G_criteria8,
5314: CE_CASH_FCST.G_criteria1,
5315: CE_CASH_FCST.G_criteria2,
5316: CE_CASH_FCST.G_criteria3,
5317: CE_CASH_FCST.G_criteria4,
5318: CE_CASH_FCST.G_criteria5,
5319: CE_CASH_FCST.G_criteria6,
5320: CE_CASH_FCST.G_criteria7,
5321: CE_CASH_FCST.G_criteria8,
5322: CE_CASH_FCST.G_criteria9,
5315: CE_CASH_FCST.G_criteria2,
5316: CE_CASH_FCST.G_criteria3,
5317: CE_CASH_FCST.G_criteria4,
5318: CE_CASH_FCST.G_criteria5,
5319: CE_CASH_FCST.G_criteria6,
5320: CE_CASH_FCST.G_criteria7,
5321: CE_CASH_FCST.G_criteria8,
5322: CE_CASH_FCST.G_criteria9,
5323: CE_CASH_FCST.G_criteria10,
5316: CE_CASH_FCST.G_criteria3,
5317: CE_CASH_FCST.G_criteria4,
5318: CE_CASH_FCST.G_criteria5,
5319: CE_CASH_FCST.G_criteria6,
5320: CE_CASH_FCST.G_criteria7,
5321: CE_CASH_FCST.G_criteria8,
5322: CE_CASH_FCST.G_criteria9,
5323: CE_CASH_FCST.G_criteria10,
5324: CE_CASH_FCST.G_criteria11,
5317: CE_CASH_FCST.G_criteria4,
5318: CE_CASH_FCST.G_criteria5,
5319: CE_CASH_FCST.G_criteria6,
5320: CE_CASH_FCST.G_criteria7,
5321: CE_CASH_FCST.G_criteria8,
5322: CE_CASH_FCST.G_criteria9,
5323: CE_CASH_FCST.G_criteria10,
5324: CE_CASH_FCST.G_criteria11,
5325: CE_CASH_FCST.G_criteria12,
5318: CE_CASH_FCST.G_criteria5,
5319: CE_CASH_FCST.G_criteria6,
5320: CE_CASH_FCST.G_criteria7,
5321: CE_CASH_FCST.G_criteria8,
5322: CE_CASH_FCST.G_criteria9,
5323: CE_CASH_FCST.G_criteria10,
5324: CE_CASH_FCST.G_criteria11,
5325: CE_CASH_FCST.G_criteria12,
5326: CE_CASH_FCST.G_criteria13,
5319: CE_CASH_FCST.G_criteria6,
5320: CE_CASH_FCST.G_criteria7,
5321: CE_CASH_FCST.G_criteria8,
5322: CE_CASH_FCST.G_criteria9,
5323: CE_CASH_FCST.G_criteria10,
5324: CE_CASH_FCST.G_criteria11,
5325: CE_CASH_FCST.G_criteria12,
5326: CE_CASH_FCST.G_criteria13,
5327: CE_CASH_FCST.G_criteria14,
5320: CE_CASH_FCST.G_criteria7,
5321: CE_CASH_FCST.G_criteria8,
5322: CE_CASH_FCST.G_criteria9,
5323: CE_CASH_FCST.G_criteria10,
5324: CE_CASH_FCST.G_criteria11,
5325: CE_CASH_FCST.G_criteria12,
5326: CE_CASH_FCST.G_criteria13,
5327: CE_CASH_FCST.G_criteria14,
5328: CE_CASH_FCST.G_criteria15,
5321: CE_CASH_FCST.G_criteria8,
5322: CE_CASH_FCST.G_criteria9,
5323: CE_CASH_FCST.G_criteria10,
5324: CE_CASH_FCST.G_criteria11,
5325: CE_CASH_FCST.G_criteria12,
5326: CE_CASH_FCST.G_criteria13,
5327: CE_CASH_FCST.G_criteria14,
5328: CE_CASH_FCST.G_criteria15,
5329: amount_table);
5322: CE_CASH_FCST.G_criteria9,
5323: CE_CASH_FCST.G_criteria10,
5324: CE_CASH_FCST.G_criteria11,
5325: CE_CASH_FCST.G_criteria12,
5326: CE_CASH_FCST.G_criteria13,
5327: CE_CASH_FCST.G_criteria14,
5328: CE_CASH_FCST.G_criteria15,
5329: amount_table);
5330: IF( error_code = 0 )THEN
5323: CE_CASH_FCST.G_criteria10,
5324: CE_CASH_FCST.G_criteria11,
5325: CE_CASH_FCST.G_criteria12,
5326: CE_CASH_FCST.G_criteria13,
5327: CE_CASH_FCST.G_criteria14,
5328: CE_CASH_FCST.G_criteria15,
5329: amount_table);
5330: IF( error_code = 0 )THEN
5331: --
5324: CE_CASH_FCST.G_criteria11,
5325: CE_CASH_FCST.G_criteria12,
5326: CE_CASH_FCST.G_criteria13,
5327: CE_CASH_FCST.G_criteria14,
5328: CE_CASH_FCST.G_criteria15,
5329: amount_table);
5330: IF( error_code = 0 )THEN
5331: --
5332: -- For the amount calculated from the remote database, insert it to
5332: -- For the amount calculated from the remote database, insert it to
5333: -- the cell table
5334: --
5335: FOR i IN 1 .. amount_table.count LOOP
5336: IF (CE_CASH_FCST.G_trx_type = ''OII'') THEN
5337: cep_standard.debug(''insert column_id = ''||to_char(amount_table(i).forecast_column_id)||'' with amount ''||
5338: to_char(amount_table(i).forecast_amount));
5339: CE_CSH_FCST_POP.Insert_Fcast_Cell(null, amount_table(i).currency_code, null, amount_table(i).trx_date, amount_table(i).bank_account_id, amount_table(i).forecast_amount, amount_table(i).trx_amount, amount_table(i).forecast_column_id);
5340: ELSE
5347: ELSIF( error_code = -1 )THEN
5348: cep_standard.debug(''Remote error: missing view'');
5349: FND_MESSAGE.set_name(''CE'', ''CE_FC_RMT_MISSING_VIEW_EXPT'');
5350: error_msg := FND_MESSAGE.get;
5351: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id, CE_CASH_FCST.G_rp_forecast_header_id,
5352: CE_CASH_FCST.G_forecast_row_id, ''CE_FC_RMT_MISSING_VIEW_EXPT'', error_msg);
5353: return;
5354: ELSIF( error_code = -2 )THEN
5355: cep_standard.debug(''Remote error: invalid view'');
5348: cep_standard.debug(''Remote error: missing view'');
5349: FND_MESSAGE.set_name(''CE'', ''CE_FC_RMT_MISSING_VIEW_EXPT'');
5350: error_msg := FND_MESSAGE.get;
5351: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id, CE_CASH_FCST.G_rp_forecast_header_id,
5352: CE_CASH_FCST.G_forecast_row_id, ''CE_FC_RMT_MISSING_VIEW_EXPT'', error_msg);
5353: return;
5354: ELSIF( error_code = -2 )THEN
5355: cep_standard.debug(''Remote error: invalid view'');
5356: FND_MESSAGE.set_name(''CE'', ''CE_FC_RMT_INVALID_VIEW_EXPT'');
5354: ELSIF( error_code = -2 )THEN
5355: cep_standard.debug(''Remote error: invalid view'');
5356: FND_MESSAGE.set_name(''CE'', ''CE_FC_RMT_INVALID_VIEW_EXPT'');
5357: error_msg := FND_MESSAGE.get;
5358: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id, CE_CASH_FCST.G_rp_forecast_header_id,
5359: CE_CASH_FCST.G_forecast_row_id, ''CE_FC_RMT_INVALID_VIEW_EXPT'', error_msg);
5360: return;
5361: ELSIF( error_code = -3 )THEN
5362: cep_standard.debug(''Remote error: others'');
5355: cep_standard.debug(''Remote error: invalid view'');
5356: FND_MESSAGE.set_name(''CE'', ''CE_FC_RMT_INVALID_VIEW_EXPT'');
5357: error_msg := FND_MESSAGE.get;
5358: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id, CE_CASH_FCST.G_rp_forecast_header_id,
5359: CE_CASH_FCST.G_forecast_row_id, ''CE_FC_RMT_INVALID_VIEW_EXPT'', error_msg);
5360: return;
5361: ELSIF( error_code = -3 )THEN
5362: cep_standard.debug(''Remote error: others'');
5363: FND_MESSAGE.set_name(''CE'', ''CE_FC_RMT_EXCEPTION'');
5361: ELSIF( error_code = -3 )THEN
5362: cep_standard.debug(''Remote error: others'');
5363: FND_MESSAGE.set_name(''CE'', ''CE_FC_RMT_EXCEPTION'');
5364: error_msg := FND_MESSAGE.get;
5365: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id, CE_CASH_FCST.G_rp_forecast_header_id,
5366: CE_CASH_FCST.G_forecast_row_id, ''CE_FC_RMT_EXCEPTION'', error_msg);
5367: return;
5368: END IF;
5369: end; ';
5362: cep_standard.debug(''Remote error: others'');
5363: FND_MESSAGE.set_name(''CE'', ''CE_FC_RMT_EXCEPTION'');
5364: error_msg := FND_MESSAGE.get;
5365: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id, CE_CASH_FCST.G_rp_forecast_header_id,
5366: CE_CASH_FCST.G_forecast_row_id, ''CE_FC_RMT_EXCEPTION'', error_msg);
5367: return;
5368: END IF;
5369: end; ';
5370:
5380: DBMS_SQL.close_cursor(cursor_id);
5381: END IF;
5382: FND_MESSAGE.set_name('CE', 'CE_FC_RMT_DB_EXCEPTION');
5383: error_msg := FND_MESSAGE.get;
5384: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id, CE_CASH_FCST.G_rp_forecast_header_id,
5385: CE_CASH_FCST.G_forecast_row_id, 'CE_FC_RMT_DB_EXCEPTION', error_msg);
5386: return;
5387: END;
5388:
5381: END IF;
5382: FND_MESSAGE.set_name('CE', 'CE_FC_RMT_DB_EXCEPTION');
5383: error_msg := FND_MESSAGE.get;
5384: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id, CE_CASH_FCST.G_rp_forecast_header_id,
5385: CE_CASH_FCST.G_forecast_row_id, 'CE_FC_RMT_DB_EXCEPTION', error_msg);
5386: return;
5387: END;
5388:
5389: clear_aging_buckets;
5394: clear_aging_buckets;
5395: cep_standard.debug('EXCEPTION:Build_Remote_Query');
5396: FND_MESSAGE.set_name('CE', 'CE_FC_RMT_EXCEPTION');
5397: error_msg := FND_MESSAGE.get;
5398: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id, CE_CASH_FCST.G_rp_forecast_header_id,
5399: CE_CASH_FCST.G_forecast_row_id, 'CE_FC_RMT_EXCEPTION', error_msg);
5400: END Build_Remote_Query;
5401:
5402:
5395: cep_standard.debug('EXCEPTION:Build_Remote_Query');
5396: FND_MESSAGE.set_name('CE', 'CE_FC_RMT_EXCEPTION');
5397: error_msg := FND_MESSAGE.get;
5398: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id, CE_CASH_FCST.G_rp_forecast_header_id,
5399: CE_CASH_FCST.G_forecast_row_id, 'CE_FC_RMT_EXCEPTION', error_msg);
5400: END Build_Remote_Query;
5401:
5402:
5403:
5425: -- to build the queries dynamically
5426: --
5427:
5428: cep_standard.debug('>>CE_CSH_FCST_POP.Populate_Cells');
5429: IF (CE_CASH_FCST.G_trx_type = 'API') THEN
5430: Build_AP_Invoice_Query;
5431: ELSIF (CE_CASH_FCST.G_trx_type = 'APP' AND CE_CASH_FCST.G_rp_project_id IS NULL) THEN
5432: Build_AP_Pay_Query;
5433: ELSIF (CE_CASH_FCST.G_trx_type = 'ARI') THEN
5427:
5428: cep_standard.debug('>>CE_CSH_FCST_POP.Populate_Cells');
5429: IF (CE_CASH_FCST.G_trx_type = 'API') THEN
5430: Build_AP_Invoice_Query;
5431: ELSIF (CE_CASH_FCST.G_trx_type = 'APP' AND CE_CASH_FCST.G_rp_project_id IS NULL) THEN
5432: Build_AP_Pay_Query;
5433: ELSIF (CE_CASH_FCST.G_trx_type = 'ARI') THEN
5434: Build_AR_Invoice_Query;
5435: ELSIF (CE_CASH_FCST.G_trx_type = 'ARR' AND CE_CASH_FCST.G_rp_project_id IS NULL) THEN
5429: IF (CE_CASH_FCST.G_trx_type = 'API') THEN
5430: Build_AP_Invoice_Query;
5431: ELSIF (CE_CASH_FCST.G_trx_type = 'APP' AND CE_CASH_FCST.G_rp_project_id IS NULL) THEN
5432: Build_AP_Pay_Query;
5433: ELSIF (CE_CASH_FCST.G_trx_type = 'ARI') THEN
5434: Build_AR_Invoice_Query;
5435: ELSIF (CE_CASH_FCST.G_trx_type = 'ARR' AND CE_CASH_FCST.G_rp_project_id IS NULL) THEN
5436: Build_AR_Receipt_Query;
5437: ELSIF (CE_CASH_FCST.G_trx_type = 'GLB') THEN
5431: ELSIF (CE_CASH_FCST.G_trx_type = 'APP' AND CE_CASH_FCST.G_rp_project_id IS NULL) THEN
5432: Build_AP_Pay_Query;
5433: ELSIF (CE_CASH_FCST.G_trx_type = 'ARI') THEN
5434: Build_AR_Invoice_Query;
5435: ELSIF (CE_CASH_FCST.G_trx_type = 'ARR' AND CE_CASH_FCST.G_rp_project_id IS NULL) THEN
5436: Build_AR_Receipt_Query;
5437: ELSIF (CE_CASH_FCST.G_trx_type = 'GLB') THEN
5438: Build_GL_Budget_Query;
5439: ELSIF (CE_CASH_FCST.G_trx_type = 'GLE') THEN
5433: ELSIF (CE_CASH_FCST.G_trx_type = 'ARI') THEN
5434: Build_AR_Invoice_Query;
5435: ELSIF (CE_CASH_FCST.G_trx_type = 'ARR' AND CE_CASH_FCST.G_rp_project_id IS NULL) THEN
5436: Build_AR_Receipt_Query;
5437: ELSIF (CE_CASH_FCST.G_trx_type = 'GLB') THEN
5438: Build_GL_Budget_Query;
5439: ELSIF (CE_CASH_FCST.G_trx_type = 'GLE') THEN
5440: Build_GL_Encumb_Query;
5441: ELSIF (CE_CASH_FCST.G_trx_type = 'GLA') THEN
5435: ELSIF (CE_CASH_FCST.G_trx_type = 'ARR' AND CE_CASH_FCST.G_rp_project_id IS NULL) THEN
5436: Build_AR_Receipt_Query;
5437: ELSIF (CE_CASH_FCST.G_trx_type = 'GLB') THEN
5438: Build_GL_Budget_Query;
5439: ELSIF (CE_CASH_FCST.G_trx_type = 'GLE') THEN
5440: Build_GL_Encumb_Query;
5441: ELSIF (CE_CASH_FCST.G_trx_type = 'GLA') THEN
5442: Build_GL_Actuals_Query;
5443: ELSIF (CE_CASH_FCST.G_trx_type = 'OII') THEN
5437: ELSIF (CE_CASH_FCST.G_trx_type = 'GLB') THEN
5438: Build_GL_Budget_Query;
5439: ELSIF (CE_CASH_FCST.G_trx_type = 'GLE') THEN
5440: Build_GL_Encumb_Query;
5441: ELSIF (CE_CASH_FCST.G_trx_type = 'GLA') THEN
5442: Build_GL_Actuals_Query;
5443: ELSIF (CE_CASH_FCST.G_trx_type = 'OII') THEN
5444: Build_Remote_Query;
5445: ELSIF (CE_CASH_FCST.G_trx_type = 'OIO') THEN
5439: ELSIF (CE_CASH_FCST.G_trx_type = 'GLE') THEN
5440: Build_GL_Encumb_Query;
5441: ELSIF (CE_CASH_FCST.G_trx_type = 'GLA') THEN
5442: Build_GL_Actuals_Query;
5443: ELSIF (CE_CASH_FCST.G_trx_type = 'OII') THEN
5444: Build_Remote_Query;
5445: ELSIF (CE_CASH_FCST.G_trx_type = 'OIO') THEN
5446: Build_Remote_Query;
5447: ELSIF (CE_CASH_FCST.G_trx_type = 'PAY' AND CE_CASH_FCST.G_rp_project_id IS NULL) THEN
5441: ELSIF (CE_CASH_FCST.G_trx_type = 'GLA') THEN
5442: Build_GL_Actuals_Query;
5443: ELSIF (CE_CASH_FCST.G_trx_type = 'OII') THEN
5444: Build_Remote_Query;
5445: ELSIF (CE_CASH_FCST.G_trx_type = 'OIO') THEN
5446: Build_Remote_Query;
5447: ELSIF (CE_CASH_FCST.G_trx_type = 'PAY' AND CE_CASH_FCST.G_rp_project_id IS NULL) THEN
5448: Build_Pay_Exp_Query;
5449: ELSIF (CE_CASH_FCST.G_trx_type = 'POP') THEN
5443: ELSIF (CE_CASH_FCST.G_trx_type = 'OII') THEN
5444: Build_Remote_Query;
5445: ELSIF (CE_CASH_FCST.G_trx_type = 'OIO') THEN
5446: Build_Remote_Query;
5447: ELSIF (CE_CASH_FCST.G_trx_type = 'PAY' AND CE_CASH_FCST.G_rp_project_id IS NULL) THEN
5448: Build_Pay_Exp_Query;
5449: ELSIF (CE_CASH_FCST.G_trx_type = 'POP') THEN
5450: Build_PO_Orders_Query;
5451: ELSIF (CE_CASH_FCST.G_trx_type = 'POR') THEN
5445: ELSIF (CE_CASH_FCST.G_trx_type = 'OIO') THEN
5446: Build_Remote_Query;
5447: ELSIF (CE_CASH_FCST.G_trx_type = 'PAY' AND CE_CASH_FCST.G_rp_project_id IS NULL) THEN
5448: Build_Pay_Exp_Query;
5449: ELSIF (CE_CASH_FCST.G_trx_type = 'POP') THEN
5450: Build_PO_Orders_Query;
5451: ELSIF (CE_CASH_FCST.G_trx_type = 'POR') THEN
5452: Build_PO_Req_Query;
5453: ELSIF (CE_CASH_FCST.G_trx_type = 'ASF' AND CE_CASH_FCST.G_rp_project_id IS NULL) THEN
5447: ELSIF (CE_CASH_FCST.G_trx_type = 'PAY' AND CE_CASH_FCST.G_rp_project_id IS NULL) THEN
5448: Build_Pay_Exp_Query;
5449: ELSIF (CE_CASH_FCST.G_trx_type = 'POP') THEN
5450: Build_PO_Orders_Query;
5451: ELSIF (CE_CASH_FCST.G_trx_type = 'POR') THEN
5452: Build_PO_Req_Query;
5453: ELSIF (CE_CASH_FCST.G_trx_type = 'ASF' AND CE_CASH_FCST.G_rp_project_id IS NULL) THEN
5454: Build_Sales_Fcst_Query;
5455: ELSIF (CE_CASH_FCST.G_trx_type = 'APX') THEN
5449: ELSIF (CE_CASH_FCST.G_trx_type = 'POP') THEN
5450: Build_PO_Orders_Query;
5451: ELSIF (CE_CASH_FCST.G_trx_type = 'POR') THEN
5452: Build_PO_Req_Query;
5453: ELSIF (CE_CASH_FCST.G_trx_type = 'ASF' AND CE_CASH_FCST.G_rp_project_id IS NULL) THEN
5454: Build_Sales_Fcst_Query;
5455: ELSIF (CE_CASH_FCST.G_trx_type = 'APX') THEN
5456: Build_Exp_Report_Query;
5457: ELSIF (CE_CASH_FCST.G_trx_type = 'PAT') THEN
5451: ELSIF (CE_CASH_FCST.G_trx_type = 'POR') THEN
5452: Build_PO_Req_Query;
5453: ELSIF (CE_CASH_FCST.G_trx_type = 'ASF' AND CE_CASH_FCST.G_rp_project_id IS NULL) THEN
5454: Build_Sales_Fcst_Query;
5455: ELSIF (CE_CASH_FCST.G_trx_type = 'APX') THEN
5456: Build_Exp_Report_Query;
5457: ELSIF (CE_CASH_FCST.G_trx_type = 'PAT') THEN
5458: IF (CE_CASH_FCST.G_rp_project_id IS NOT NULL) THEN
5459: Build_PA_Trx_Query;
5453: ELSIF (CE_CASH_FCST.G_trx_type = 'ASF' AND CE_CASH_FCST.G_rp_project_id IS NULL) THEN
5454: Build_Sales_Fcst_Query;
5455: ELSIF (CE_CASH_FCST.G_trx_type = 'APX') THEN
5456: Build_Exp_Report_Query;
5457: ELSIF (CE_CASH_FCST.G_trx_type = 'PAT') THEN
5458: IF (CE_CASH_FCST.G_rp_project_id IS NOT NULL) THEN
5459: Build_PA_Trx_Query;
5460: ELSE
5461: UPDATE ce_forecasts
5454: Build_Sales_Fcst_Query;
5455: ELSIF (CE_CASH_FCST.G_trx_type = 'APX') THEN
5456: Build_Exp_Report_Query;
5457: ELSIF (CE_CASH_FCST.G_trx_type = 'PAT') THEN
5458: IF (CE_CASH_FCST.G_rp_project_id IS NOT NULL) THEN
5459: Build_PA_Trx_Query;
5460: ELSE
5461: UPDATE ce_forecasts
5462: SET error_status = 'X'
5459: Build_PA_Trx_Query;
5460: ELSE
5461: UPDATE ce_forecasts
5462: SET error_status = 'X'
5463: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
5464: FND_MESSAGE.set_name ('CE','CE_FC_NO_PROJECT_RANGE');
5465: error_msg := FND_MESSAGE.GET;
5466: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id,
5467: CE_CASH_FCST.G_rp_forecast_header_id,
5462: SET error_status = 'X'
5463: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
5464: FND_MESSAGE.set_name ('CE','CE_FC_NO_PROJECT_RANGE');
5465: error_msg := FND_MESSAGE.GET;
5466: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id,
5467: CE_CASH_FCST.G_rp_forecast_header_id,
5468: CE_CASH_FCST.G_forecast_row_id,
5469: 'CE_FC_NO_PROJECT_RANGE', error_msg);
5470: END IF;
5463: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
5464: FND_MESSAGE.set_name ('CE','CE_FC_NO_PROJECT_RANGE');
5465: error_msg := FND_MESSAGE.GET;
5466: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id,
5467: CE_CASH_FCST.G_rp_forecast_header_id,
5468: CE_CASH_FCST.G_forecast_row_id,
5469: 'CE_FC_NO_PROJECT_RANGE', error_msg);
5470: END IF;
5471: ELSIF (CE_CASH_FCST.G_trx_type in ('PAI', 'PAO')) THEN
5464: FND_MESSAGE.set_name ('CE','CE_FC_NO_PROJECT_RANGE');
5465: error_msg := FND_MESSAGE.GET;
5466: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id,
5467: CE_CASH_FCST.G_rp_forecast_header_id,
5468: CE_CASH_FCST.G_forecast_row_id,
5469: 'CE_FC_NO_PROJECT_RANGE', error_msg);
5470: END IF;
5471: ELSIF (CE_CASH_FCST.G_trx_type in ('PAI', 'PAO')) THEN
5472: IF (CE_CASH_FCST.G_rp_project_id IS NOT NULL) THEN
5467: CE_CASH_FCST.G_rp_forecast_header_id,
5468: CE_CASH_FCST.G_forecast_row_id,
5469: 'CE_FC_NO_PROJECT_RANGE', error_msg);
5470: END IF;
5471: ELSIF (CE_CASH_FCST.G_trx_type in ('PAI', 'PAO')) THEN
5472: IF (CE_CASH_FCST.G_rp_project_id IS NOT NULL) THEN
5473: Build_PA_Budget_Query;
5474: ELSE
5475: UPDATE ce_forecasts
5468: CE_CASH_FCST.G_forecast_row_id,
5469: 'CE_FC_NO_PROJECT_RANGE', error_msg);
5470: END IF;
5471: ELSIF (CE_CASH_FCST.G_trx_type in ('PAI', 'PAO')) THEN
5472: IF (CE_CASH_FCST.G_rp_project_id IS NOT NULL) THEN
5473: Build_PA_Budget_Query;
5474: ELSE
5475: UPDATE ce_forecasts
5476: SET error_status = 'X'
5473: Build_PA_Budget_Query;
5474: ELSE
5475: UPDATE ce_forecasts
5476: SET error_status = 'X'
5477: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
5478: FND_MESSAGE.set_name ('CE','CE_FC_NO_PROJECT_RANGE');
5479: error_msg := FND_MESSAGE.GET;
5480: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id,
5481: CE_CASH_FCST.G_rp_forecast_header_id,
5476: SET error_status = 'X'
5477: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
5478: FND_MESSAGE.set_name ('CE','CE_FC_NO_PROJECT_RANGE');
5479: error_msg := FND_MESSAGE.GET;
5480: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id,
5481: CE_CASH_FCST.G_rp_forecast_header_id,
5482: CE_CASH_FCST.G_forecast_row_id,
5483: 'CE_FC_NO_PROJECT_RANGE', error_msg);
5484: END IF;
5477: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
5478: FND_MESSAGE.set_name ('CE','CE_FC_NO_PROJECT_RANGE');
5479: error_msg := FND_MESSAGE.GET;
5480: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id,
5481: CE_CASH_FCST.G_rp_forecast_header_id,
5482: CE_CASH_FCST.G_forecast_row_id,
5483: 'CE_FC_NO_PROJECT_RANGE', error_msg);
5484: END IF;
5485: ELSIF (CE_CASH_FCST.G_trx_type = 'PAB') THEN
5478: FND_MESSAGE.set_name ('CE','CE_FC_NO_PROJECT_RANGE');
5479: error_msg := FND_MESSAGE.GET;
5480: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id,
5481: CE_CASH_FCST.G_rp_forecast_header_id,
5482: CE_CASH_FCST.G_forecast_row_id,
5483: 'CE_FC_NO_PROJECT_RANGE', error_msg);
5484: END IF;
5485: ELSIF (CE_CASH_FCST.G_trx_type = 'PAB') THEN
5486: IF (CE_CASH_FCST.G_rp_project_id IS NOT NULL) THEN
5481: CE_CASH_FCST.G_rp_forecast_header_id,
5482: CE_CASH_FCST.G_forecast_row_id,
5483: 'CE_FC_NO_PROJECT_RANGE', error_msg);
5484: END IF;
5485: ELSIF (CE_CASH_FCST.G_trx_type = 'PAB') THEN
5486: IF (CE_CASH_FCST.G_rp_project_id IS NOT NULL) THEN
5487: Build_PA_Billing_Query;
5488: ELSE
5489: UPDATE ce_forecasts
5482: CE_CASH_FCST.G_forecast_row_id,
5483: 'CE_FC_NO_PROJECT_RANGE', error_msg);
5484: END IF;
5485: ELSIF (CE_CASH_FCST.G_trx_type = 'PAB') THEN
5486: IF (CE_CASH_FCST.G_rp_project_id IS NOT NULL) THEN
5487: Build_PA_Billing_Query;
5488: ELSE
5489: UPDATE ce_forecasts
5490: SET error_status = 'X'
5487: Build_PA_Billing_Query;
5488: ELSE
5489: UPDATE ce_forecasts
5490: SET error_status = 'X'
5491: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
5492: FND_MESSAGE.set_name ('CE','CE_FC_NO_PROJECT_RANGE');
5493: error_msg := FND_MESSAGE.GET;
5494: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id,
5495: CE_CASH_FCST.G_rp_forecast_header_id,
5490: SET error_status = 'X'
5491: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
5492: FND_MESSAGE.set_name ('CE','CE_FC_NO_PROJECT_RANGE');
5493: error_msg := FND_MESSAGE.GET;
5494: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id,
5495: CE_CASH_FCST.G_rp_forecast_header_id,
5496: CE_CASH_FCST.G_forecast_row_id,
5497: 'CE_FC_NO_PROJECT_RANGE', error_msg);
5498: END IF;
5491: WHERE forecast_id = CE_CASH_FCST.G_forecast_id;
5492: FND_MESSAGE.set_name ('CE','CE_FC_NO_PROJECT_RANGE');
5493: error_msg := FND_MESSAGE.GET;
5494: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id,
5495: CE_CASH_FCST.G_rp_forecast_header_id,
5496: CE_CASH_FCST.G_forecast_row_id,
5497: 'CE_FC_NO_PROJECT_RANGE', error_msg);
5498: END IF;
5499: ELSIF (CE_CASH_FCST.G_trx_type = 'OEO') THEN
5492: FND_MESSAGE.set_name ('CE','CE_FC_NO_PROJECT_RANGE');
5493: error_msg := FND_MESSAGE.GET;
5494: CE_FORECAST_ERRORS_PKG.insert_row(CE_CASH_FCST.G_forecast_id,
5495: CE_CASH_FCST.G_rp_forecast_header_id,
5496: CE_CASH_FCST.G_forecast_row_id,
5497: 'CE_FC_NO_PROJECT_RANGE', error_msg);
5498: END IF;
5499: ELSIF (CE_CASH_FCST.G_trx_type = 'OEO') THEN
5500: Build_Sales_Order_Query;
5495: CE_CASH_FCST.G_rp_forecast_header_id,
5496: CE_CASH_FCST.G_forecast_row_id,
5497: 'CE_FC_NO_PROJECT_RANGE', error_msg);
5498: END IF;
5499: ELSIF (CE_CASH_FCST.G_trx_type = 'OEO') THEN
5500: Build_Sales_Order_Query;
5501: ELSIF (CE_CASH_FCST.G_trx_type in ('XTR','XTI','XTO') AND CE_CASH_FCST.G_rp_project_id IS NULL) THEN
5502: Build_Treasury_Query;
5503: ELSIF (CE_CASH_FCST.G_trx_type = 'UDI') THEN
5497: 'CE_FC_NO_PROJECT_RANGE', error_msg);
5498: END IF;
5499: ELSIF (CE_CASH_FCST.G_trx_type = 'OEO') THEN
5500: Build_Sales_Order_Query;
5501: ELSIF (CE_CASH_FCST.G_trx_type in ('XTR','XTI','XTO') AND CE_CASH_FCST.G_rp_project_id IS NULL) THEN
5502: Build_Treasury_Query;
5503: ELSIF (CE_CASH_FCST.G_trx_type = 'UDI') THEN
5504: Zero_Fill_Cells;
5505: ELSIF (CE_CASH_FCST.G_trx_type = 'UDO') THEN
5499: ELSIF (CE_CASH_FCST.G_trx_type = 'OEO') THEN
5500: Build_Sales_Order_Query;
5501: ELSIF (CE_CASH_FCST.G_trx_type in ('XTR','XTI','XTO') AND CE_CASH_FCST.G_rp_project_id IS NULL) THEN
5502: Build_Treasury_Query;
5503: ELSIF (CE_CASH_FCST.G_trx_type = 'UDI') THEN
5504: Zero_Fill_Cells;
5505: ELSIF (CE_CASH_FCST.G_trx_type = 'UDO') THEN
5506: Zero_Fill_Cells;
5507: END IF;
5501: ELSIF (CE_CASH_FCST.G_trx_type in ('XTR','XTI','XTO') AND CE_CASH_FCST.G_rp_project_id IS NULL) THEN
5502: Build_Treasury_Query;
5503: ELSIF (CE_CASH_FCST.G_trx_type = 'UDI') THEN
5504: Zero_Fill_Cells;
5505: ELSIF (CE_CASH_FCST.G_trx_type = 'UDO') THEN
5506: Zero_Fill_Cells;
5507: END IF;
5508:
5509: cep_standard.debug('<