3251: CLOSE csr_function_currency;
3252:
3253:
3254: -- use FND_DSQL package for dynamic sql and bind variables
3255: l_funds_util_csr := DBMS_SQL.open_cursor;
3256: FND_DSQL.set_cursor(l_funds_util_csr);
3257: DBMS_SQL.parse(l_funds_util_csr, l_funds_util_sql, DBMS_SQL.native);
3258: DBMS_SQL.define_column(l_funds_util_csr, 1, l_lu_line_util_id);
3259: DBMS_SQL.define_column(l_funds_util_csr, 2, l_lu_utilization_id);
3253:
3254: -- use FND_DSQL package for dynamic sql and bind variables
3255: l_funds_util_csr := DBMS_SQL.open_cursor;
3256: FND_DSQL.set_cursor(l_funds_util_csr);
3257: DBMS_SQL.parse(l_funds_util_csr, l_funds_util_sql, DBMS_SQL.native);
3258: DBMS_SQL.define_column(l_funds_util_csr, 1, l_lu_line_util_id);
3259: DBMS_SQL.define_column(l_funds_util_csr, 2, l_lu_utilization_id);
3260: DBMS_SQL.define_column(l_funds_util_csr, 3, l_lu_amt);
3261: DBMS_SQL.define_column(l_funds_util_csr, 4, l_lu_scan_unit);
3254: -- use FND_DSQL package for dynamic sql and bind variables
3255: l_funds_util_csr := DBMS_SQL.open_cursor;
3256: FND_DSQL.set_cursor(l_funds_util_csr);
3257: DBMS_SQL.parse(l_funds_util_csr, l_funds_util_sql, DBMS_SQL.native);
3258: DBMS_SQL.define_column(l_funds_util_csr, 1, l_lu_line_util_id);
3259: DBMS_SQL.define_column(l_funds_util_csr, 2, l_lu_utilization_id);
3260: DBMS_SQL.define_column(l_funds_util_csr, 3, l_lu_amt);
3261: DBMS_SQL.define_column(l_funds_util_csr, 4, l_lu_scan_unit);
3262: DBMS_SQL.define_column(l_funds_util_csr, 5, l_lu_currency_code, 15);
3255: l_funds_util_csr := DBMS_SQL.open_cursor;
3256: FND_DSQL.set_cursor(l_funds_util_csr);
3257: DBMS_SQL.parse(l_funds_util_csr, l_funds_util_sql, DBMS_SQL.native);
3258: DBMS_SQL.define_column(l_funds_util_csr, 1, l_lu_line_util_id);
3259: DBMS_SQL.define_column(l_funds_util_csr, 2, l_lu_utilization_id);
3260: DBMS_SQL.define_column(l_funds_util_csr, 3, l_lu_amt);
3261: DBMS_SQL.define_column(l_funds_util_csr, 4, l_lu_scan_unit);
3262: DBMS_SQL.define_column(l_funds_util_csr, 5, l_lu_currency_code, 15);
3263: -- DBMS_SQL.define_column(l_funds_util_csr, 5, l_utiz_amount);
3256: FND_DSQL.set_cursor(l_funds_util_csr);
3257: DBMS_SQL.parse(l_funds_util_csr, l_funds_util_sql, DBMS_SQL.native);
3258: DBMS_SQL.define_column(l_funds_util_csr, 1, l_lu_line_util_id);
3259: DBMS_SQL.define_column(l_funds_util_csr, 2, l_lu_utilization_id);
3260: DBMS_SQL.define_column(l_funds_util_csr, 3, l_lu_amt);
3261: DBMS_SQL.define_column(l_funds_util_csr, 4, l_lu_scan_unit);
3262: DBMS_SQL.define_column(l_funds_util_csr, 5, l_lu_currency_code, 15);
3263: -- DBMS_SQL.define_column(l_funds_util_csr, 5, l_utiz_amount);
3264: FND_DSQL.do_binds;
3257: DBMS_SQL.parse(l_funds_util_csr, l_funds_util_sql, DBMS_SQL.native);
3258: DBMS_SQL.define_column(l_funds_util_csr, 1, l_lu_line_util_id);
3259: DBMS_SQL.define_column(l_funds_util_csr, 2, l_lu_utilization_id);
3260: DBMS_SQL.define_column(l_funds_util_csr, 3, l_lu_amt);
3261: DBMS_SQL.define_column(l_funds_util_csr, 4, l_lu_scan_unit);
3262: DBMS_SQL.define_column(l_funds_util_csr, 5, l_lu_currency_code, 15);
3263: -- DBMS_SQL.define_column(l_funds_util_csr, 5, l_utiz_amount);
3264: FND_DSQL.do_binds;
3265:
3258: DBMS_SQL.define_column(l_funds_util_csr, 1, l_lu_line_util_id);
3259: DBMS_SQL.define_column(l_funds_util_csr, 2, l_lu_utilization_id);
3260: DBMS_SQL.define_column(l_funds_util_csr, 3, l_lu_amt);
3261: DBMS_SQL.define_column(l_funds_util_csr, 4, l_lu_scan_unit);
3262: DBMS_SQL.define_column(l_funds_util_csr, 5, l_lu_currency_code, 15);
3263: -- DBMS_SQL.define_column(l_funds_util_csr, 5, l_utiz_amount);
3264: FND_DSQL.do_binds;
3265:
3266: l_ignore := DBMS_SQL.execute(l_funds_util_csr);
3259: DBMS_SQL.define_column(l_funds_util_csr, 2, l_lu_utilization_id);
3260: DBMS_SQL.define_column(l_funds_util_csr, 3, l_lu_amt);
3261: DBMS_SQL.define_column(l_funds_util_csr, 4, l_lu_scan_unit);
3262: DBMS_SQL.define_column(l_funds_util_csr, 5, l_lu_currency_code, 15);
3263: -- DBMS_SQL.define_column(l_funds_util_csr, 5, l_utiz_amount);
3264: FND_DSQL.do_binds;
3265:
3266: l_ignore := DBMS_SQL.execute(l_funds_util_csr);
3267: LOOP
3262: DBMS_SQL.define_column(l_funds_util_csr, 5, l_lu_currency_code, 15);
3263: -- DBMS_SQL.define_column(l_funds_util_csr, 5, l_utiz_amount);
3264: FND_DSQL.do_binds;
3265:
3266: l_ignore := DBMS_SQL.execute(l_funds_util_csr);
3267: LOOP
3268: IF DBMS_SQL.fetch_rows(l_funds_util_csr) > 0 THEN
3269: DBMS_SQL.column_value(l_funds_util_csr, 1, l_lu_line_util_id);
3270: DBMS_SQL.column_value(l_funds_util_csr, 2, l_lu_utilization_id);
3264: FND_DSQL.do_binds;
3265:
3266: l_ignore := DBMS_SQL.execute(l_funds_util_csr);
3267: LOOP
3268: IF DBMS_SQL.fetch_rows(l_funds_util_csr) > 0 THEN
3269: DBMS_SQL.column_value(l_funds_util_csr, 1, l_lu_line_util_id);
3270: DBMS_SQL.column_value(l_funds_util_csr, 2, l_lu_utilization_id);
3271: DBMS_SQL.column_value(l_funds_util_csr, 3, l_lu_amt);
3272: DBMS_SQL.column_value(l_funds_util_csr, 4, l_lu_scan_unit);
3265:
3266: l_ignore := DBMS_SQL.execute(l_funds_util_csr);
3267: LOOP
3268: IF DBMS_SQL.fetch_rows(l_funds_util_csr) > 0 THEN
3269: DBMS_SQL.column_value(l_funds_util_csr, 1, l_lu_line_util_id);
3270: DBMS_SQL.column_value(l_funds_util_csr, 2, l_lu_utilization_id);
3271: DBMS_SQL.column_value(l_funds_util_csr, 3, l_lu_amt);
3272: DBMS_SQL.column_value(l_funds_util_csr, 4, l_lu_scan_unit);
3273: DBMS_SQL.column_value(l_funds_util_csr, 5, l_lu_currency_code);
3266: l_ignore := DBMS_SQL.execute(l_funds_util_csr);
3267: LOOP
3268: IF DBMS_SQL.fetch_rows(l_funds_util_csr) > 0 THEN
3269: DBMS_SQL.column_value(l_funds_util_csr, 1, l_lu_line_util_id);
3270: DBMS_SQL.column_value(l_funds_util_csr, 2, l_lu_utilization_id);
3271: DBMS_SQL.column_value(l_funds_util_csr, 3, l_lu_amt);
3272: DBMS_SQL.column_value(l_funds_util_csr, 4, l_lu_scan_unit);
3273: DBMS_SQL.column_value(l_funds_util_csr, 5, l_lu_currency_code);
3274: -- DBMS_SQL.define_column(l_funds_util_csr, 5, l_utiz_amount);
3267: LOOP
3268: IF DBMS_SQL.fetch_rows(l_funds_util_csr) > 0 THEN
3269: DBMS_SQL.column_value(l_funds_util_csr, 1, l_lu_line_util_id);
3270: DBMS_SQL.column_value(l_funds_util_csr, 2, l_lu_utilization_id);
3271: DBMS_SQL.column_value(l_funds_util_csr, 3, l_lu_amt);
3272: DBMS_SQL.column_value(l_funds_util_csr, 4, l_lu_scan_unit);
3273: DBMS_SQL.column_value(l_funds_util_csr, 5, l_lu_currency_code);
3274: -- DBMS_SQL.define_column(l_funds_util_csr, 5, l_utiz_amount);
3275:
3268: IF DBMS_SQL.fetch_rows(l_funds_util_csr) > 0 THEN
3269: DBMS_SQL.column_value(l_funds_util_csr, 1, l_lu_line_util_id);
3270: DBMS_SQL.column_value(l_funds_util_csr, 2, l_lu_utilization_id);
3271: DBMS_SQL.column_value(l_funds_util_csr, 3, l_lu_amt);
3272: DBMS_SQL.column_value(l_funds_util_csr, 4, l_lu_scan_unit);
3273: DBMS_SQL.column_value(l_funds_util_csr, 5, l_lu_currency_code);
3274: -- DBMS_SQL.define_column(l_funds_util_csr, 5, l_utiz_amount);
3275:
3276: OPEN csr_util_obj_ver(l_lu_line_util_id);
3269: DBMS_SQL.column_value(l_funds_util_csr, 1, l_lu_line_util_id);
3270: DBMS_SQL.column_value(l_funds_util_csr, 2, l_lu_utilization_id);
3271: DBMS_SQL.column_value(l_funds_util_csr, 3, l_lu_amt);
3272: DBMS_SQL.column_value(l_funds_util_csr, 4, l_lu_scan_unit);
3273: DBMS_SQL.column_value(l_funds_util_csr, 5, l_lu_currency_code);
3274: -- DBMS_SQL.define_column(l_funds_util_csr, 5, l_utiz_amount);
3275:
3276: OPEN csr_util_obj_ver(l_lu_line_util_id);
3277: FETCH csr_util_obj_ver INTO l_object_version_number;
3270: DBMS_SQL.column_value(l_funds_util_csr, 2, l_lu_utilization_id);
3271: DBMS_SQL.column_value(l_funds_util_csr, 3, l_lu_amt);
3272: DBMS_SQL.column_value(l_funds_util_csr, 4, l_lu_scan_unit);
3273: DBMS_SQL.column_value(l_funds_util_csr, 5, l_lu_currency_code);
3274: -- DBMS_SQL.define_column(l_funds_util_csr, 5, l_utiz_amount);
3275:
3276: OPEN csr_util_obj_ver(l_lu_line_util_id);
3277: FETCH csr_util_obj_ver INTO l_object_version_number;
3278: CLOSE csr_util_obj_ver;
3296: ELSE
3297: EXIT;
3298: END IF;
3299: END LOOP;
3300: DBMS_SQL.close_cursor(l_funds_util_csr);
3301:
3302: -- Check for commit
3303: IF FND_API.to_boolean(p_commit) THEN
3304: COMMIT;
4090: OZF_Utility_PVT.debug_message(SUBSTR(l_temp_sql, 509, 254));
4091: OZF_Utility_PVT.debug_message('---------------------------------------');
4092: END IF;
4093:
4094: l_emp_csr := DBMS_SQL.open_cursor;
4095: FND_DSQL.set_cursor(l_emp_csr);
4096: DBMS_SQL.parse(l_emp_csr, FND_DSQL.get_text(FALSE), DBMS_SQL.native);
4097: DBMS_SQL.define_column(l_emp_csr, 1, l_common_quantity);
4098: DBMS_SQL.define_column(l_emp_csr, 2, l_common_amount);
4092: END IF;
4093:
4094: l_emp_csr := DBMS_SQL.open_cursor;
4095: FND_DSQL.set_cursor(l_emp_csr);
4096: DBMS_SQL.parse(l_emp_csr, FND_DSQL.get_text(FALSE), DBMS_SQL.native);
4097: DBMS_SQL.define_column(l_emp_csr, 1, l_common_quantity);
4098: DBMS_SQL.define_column(l_emp_csr, 2, l_common_amount);
4099: DBMS_SQL.define_column(l_emp_csr, 3, l_common_uom_code, 3);
4100: DBMS_SQL.define_column(l_emp_csr, 4, l_common_curr_code, 15);
4093:
4094: l_emp_csr := DBMS_SQL.open_cursor;
4095: FND_DSQL.set_cursor(l_emp_csr);
4096: DBMS_SQL.parse(l_emp_csr, FND_DSQL.get_text(FALSE), DBMS_SQL.native);
4097: DBMS_SQL.define_column(l_emp_csr, 1, l_common_quantity);
4098: DBMS_SQL.define_column(l_emp_csr, 2, l_common_amount);
4099: DBMS_SQL.define_column(l_emp_csr, 3, l_common_uom_code, 3);
4100: DBMS_SQL.define_column(l_emp_csr, 4, l_common_curr_code, 15);
4101: FND_DSQL.do_binds;
4094: l_emp_csr := DBMS_SQL.open_cursor;
4095: FND_DSQL.set_cursor(l_emp_csr);
4096: DBMS_SQL.parse(l_emp_csr, FND_DSQL.get_text(FALSE), DBMS_SQL.native);
4097: DBMS_SQL.define_column(l_emp_csr, 1, l_common_quantity);
4098: DBMS_SQL.define_column(l_emp_csr, 2, l_common_amount);
4099: DBMS_SQL.define_column(l_emp_csr, 3, l_common_uom_code, 3);
4100: DBMS_SQL.define_column(l_emp_csr, 4, l_common_curr_code, 15);
4101: FND_DSQL.do_binds;
4102:
4095: FND_DSQL.set_cursor(l_emp_csr);
4096: DBMS_SQL.parse(l_emp_csr, FND_DSQL.get_text(FALSE), DBMS_SQL.native);
4097: DBMS_SQL.define_column(l_emp_csr, 1, l_common_quantity);
4098: DBMS_SQL.define_column(l_emp_csr, 2, l_common_amount);
4099: DBMS_SQL.define_column(l_emp_csr, 3, l_common_uom_code, 3);
4100: DBMS_SQL.define_column(l_emp_csr, 4, l_common_curr_code, 15);
4101: FND_DSQL.do_binds;
4102:
4103: l_ignore := DBMS_SQL.execute(l_emp_csr);
4096: DBMS_SQL.parse(l_emp_csr, FND_DSQL.get_text(FALSE), DBMS_SQL.native);
4097: DBMS_SQL.define_column(l_emp_csr, 1, l_common_quantity);
4098: DBMS_SQL.define_column(l_emp_csr, 2, l_common_amount);
4099: DBMS_SQL.define_column(l_emp_csr, 3, l_common_uom_code, 3);
4100: DBMS_SQL.define_column(l_emp_csr, 4, l_common_curr_code, 15);
4101: FND_DSQL.do_binds;
4102:
4103: l_ignore := DBMS_SQL.execute(l_emp_csr);
4104: IF DBMS_SQL.fetch_rows(l_emp_csr) > 0 THEN
4099: DBMS_SQL.define_column(l_emp_csr, 3, l_common_uom_code, 3);
4100: DBMS_SQL.define_column(l_emp_csr, 4, l_common_curr_code, 15);
4101: FND_DSQL.do_binds;
4102:
4103: l_ignore := DBMS_SQL.execute(l_emp_csr);
4104: IF DBMS_SQL.fetch_rows(l_emp_csr) > 0 THEN
4105: DBMS_SQL.column_value(l_emp_csr, 1, l_common_quantity);
4106: DBMS_SQL.column_value(l_emp_csr, 2, l_common_amount);
4107: DBMS_SQL.column_value(l_emp_csr, 3, l_common_uom_code);
4100: DBMS_SQL.define_column(l_emp_csr, 4, l_common_curr_code, 15);
4101: FND_DSQL.do_binds;
4102:
4103: l_ignore := DBMS_SQL.execute(l_emp_csr);
4104: IF DBMS_SQL.fetch_rows(l_emp_csr) > 0 THEN
4105: DBMS_SQL.column_value(l_emp_csr, 1, l_common_quantity);
4106: DBMS_SQL.column_value(l_emp_csr, 2, l_common_amount);
4107: DBMS_SQL.column_value(l_emp_csr, 3, l_common_uom_code);
4108: DBMS_SQL.column_value(l_emp_csr, 4, l_common_curr_code);
4101: FND_DSQL.do_binds;
4102:
4103: l_ignore := DBMS_SQL.execute(l_emp_csr);
4104: IF DBMS_SQL.fetch_rows(l_emp_csr) > 0 THEN
4105: DBMS_SQL.column_value(l_emp_csr, 1, l_common_quantity);
4106: DBMS_SQL.column_value(l_emp_csr, 2, l_common_amount);
4107: DBMS_SQL.column_value(l_emp_csr, 3, l_common_uom_code);
4108: DBMS_SQL.column_value(l_emp_csr, 4, l_common_curr_code);
4109:
4102:
4103: l_ignore := DBMS_SQL.execute(l_emp_csr);
4104: IF DBMS_SQL.fetch_rows(l_emp_csr) > 0 THEN
4105: DBMS_SQL.column_value(l_emp_csr, 1, l_common_quantity);
4106: DBMS_SQL.column_value(l_emp_csr, 2, l_common_amount);
4107: DBMS_SQL.column_value(l_emp_csr, 3, l_common_uom_code);
4108: DBMS_SQL.column_value(l_emp_csr, 4, l_common_curr_code);
4109:
4110: IF l_requirement_type = 'VOLUME' THEN
4103: l_ignore := DBMS_SQL.execute(l_emp_csr);
4104: IF DBMS_SQL.fetch_rows(l_emp_csr) > 0 THEN
4105: DBMS_SQL.column_value(l_emp_csr, 1, l_common_quantity);
4106: DBMS_SQL.column_value(l_emp_csr, 2, l_common_amount);
4107: DBMS_SQL.column_value(l_emp_csr, 3, l_common_uom_code);
4108: DBMS_SQL.column_value(l_emp_csr, 4, l_common_curr_code);
4109:
4110: IF l_requirement_type = 'VOLUME' THEN
4111: IF l_uom_code = l_common_uom_code THEN
4104: IF DBMS_SQL.fetch_rows(l_emp_csr) > 0 THEN
4105: DBMS_SQL.column_value(l_emp_csr, 1, l_common_quantity);
4106: DBMS_SQL.column_value(l_emp_csr, 2, l_common_amount);
4107: DBMS_SQL.column_value(l_emp_csr, 3, l_common_uom_code);
4108: DBMS_SQL.column_value(l_emp_csr, 4, l_common_curr_code);
4109:
4110: IF l_requirement_type = 'VOLUME' THEN
4111: IF l_uom_code = l_common_uom_code THEN
4112: IF l_common_quantity < l_requirement_value THEN
4176: OZF_Utility_PVT.debug_message('No sales transactions found');
4177: END IF;
4178: l_performance_flag := FND_API.g_false;
4179: END IF;
4180: DBMS_SQL.close_cursor(l_emp_csr);
4181:
4182: ELSE
4183: /********** Check resale data ***********/
4184: FND_DSQL.init;
4211: OZF_Utility_PVT.debug_message(SUBSTR(l_temp_sql, 509, 254));
4212: OZF_Utility_PVT.debug_message('---------------------------------------');
4213: END IF;
4214:
4215: l_emp_csr := DBMS_SQL.open_cursor;
4216: FND_DSQL.set_cursor(l_emp_csr);
4217: DBMS_SQL.parse(l_emp_csr, FND_DSQL.get_text(FALSE), DBMS_SQL.native);
4218: DBMS_SQL.define_column(l_emp_csr, 1, l_common_quantity);
4219: DBMS_SQL.define_column(l_emp_csr, 2, l_common_amount);
4213: END IF;
4214:
4215: l_emp_csr := DBMS_SQL.open_cursor;
4216: FND_DSQL.set_cursor(l_emp_csr);
4217: DBMS_SQL.parse(l_emp_csr, FND_DSQL.get_text(FALSE), DBMS_SQL.native);
4218: DBMS_SQL.define_column(l_emp_csr, 1, l_common_quantity);
4219: DBMS_SQL.define_column(l_emp_csr, 2, l_common_amount);
4220: DBMS_SQL.define_column(l_emp_csr, 3, l_common_uom_code, 3);
4221: FND_DSQL.do_binds;
4214:
4215: l_emp_csr := DBMS_SQL.open_cursor;
4216: FND_DSQL.set_cursor(l_emp_csr);
4217: DBMS_SQL.parse(l_emp_csr, FND_DSQL.get_text(FALSE), DBMS_SQL.native);
4218: DBMS_SQL.define_column(l_emp_csr, 1, l_common_quantity);
4219: DBMS_SQL.define_column(l_emp_csr, 2, l_common_amount);
4220: DBMS_SQL.define_column(l_emp_csr, 3, l_common_uom_code, 3);
4221: FND_DSQL.do_binds;
4222:
4215: l_emp_csr := DBMS_SQL.open_cursor;
4216: FND_DSQL.set_cursor(l_emp_csr);
4217: DBMS_SQL.parse(l_emp_csr, FND_DSQL.get_text(FALSE), DBMS_SQL.native);
4218: DBMS_SQL.define_column(l_emp_csr, 1, l_common_quantity);
4219: DBMS_SQL.define_column(l_emp_csr, 2, l_common_amount);
4220: DBMS_SQL.define_column(l_emp_csr, 3, l_common_uom_code, 3);
4221: FND_DSQL.do_binds;
4222:
4223: l_ignore := DBMS_SQL.execute(l_emp_csr);
4216: FND_DSQL.set_cursor(l_emp_csr);
4217: DBMS_SQL.parse(l_emp_csr, FND_DSQL.get_text(FALSE), DBMS_SQL.native);
4218: DBMS_SQL.define_column(l_emp_csr, 1, l_common_quantity);
4219: DBMS_SQL.define_column(l_emp_csr, 2, l_common_amount);
4220: DBMS_SQL.define_column(l_emp_csr, 3, l_common_uom_code, 3);
4221: FND_DSQL.do_binds;
4222:
4223: l_ignore := DBMS_SQL.execute(l_emp_csr);
4224: IF DBMS_SQL.fetch_rows(l_emp_csr) > 0 THEN
4219: DBMS_SQL.define_column(l_emp_csr, 2, l_common_amount);
4220: DBMS_SQL.define_column(l_emp_csr, 3, l_common_uom_code, 3);
4221: FND_DSQL.do_binds;
4222:
4223: l_ignore := DBMS_SQL.execute(l_emp_csr);
4224: IF DBMS_SQL.fetch_rows(l_emp_csr) > 0 THEN
4225: DBMS_SQL.column_value(l_emp_csr, 1, l_common_quantity);
4226: DBMS_SQL.column_value(l_emp_csr, 2, l_common_amount);
4227: DBMS_SQL.column_value(l_emp_csr, 3, l_common_uom_code);
4220: DBMS_SQL.define_column(l_emp_csr, 3, l_common_uom_code, 3);
4221: FND_DSQL.do_binds;
4222:
4223: l_ignore := DBMS_SQL.execute(l_emp_csr);
4224: IF DBMS_SQL.fetch_rows(l_emp_csr) > 0 THEN
4225: DBMS_SQL.column_value(l_emp_csr, 1, l_common_quantity);
4226: DBMS_SQL.column_value(l_emp_csr, 2, l_common_amount);
4227: DBMS_SQL.column_value(l_emp_csr, 3, l_common_uom_code);
4228:
4221: FND_DSQL.do_binds;
4222:
4223: l_ignore := DBMS_SQL.execute(l_emp_csr);
4224: IF DBMS_SQL.fetch_rows(l_emp_csr) > 0 THEN
4225: DBMS_SQL.column_value(l_emp_csr, 1, l_common_quantity);
4226: DBMS_SQL.column_value(l_emp_csr, 2, l_common_amount);
4227: DBMS_SQL.column_value(l_emp_csr, 3, l_common_uom_code);
4228:
4229: IF l_requirement_type = 'VOLUME' THEN
4222:
4223: l_ignore := DBMS_SQL.execute(l_emp_csr);
4224: IF DBMS_SQL.fetch_rows(l_emp_csr) > 0 THEN
4225: DBMS_SQL.column_value(l_emp_csr, 1, l_common_quantity);
4226: DBMS_SQL.column_value(l_emp_csr, 2, l_common_amount);
4227: DBMS_SQL.column_value(l_emp_csr, 3, l_common_uom_code);
4228:
4229: IF l_requirement_type = 'VOLUME' THEN
4230: IF l_uom_code = l_common_uom_code THEN
4223: l_ignore := DBMS_SQL.execute(l_emp_csr);
4224: IF DBMS_SQL.fetch_rows(l_emp_csr) > 0 THEN
4225: DBMS_SQL.column_value(l_emp_csr, 1, l_common_quantity);
4226: DBMS_SQL.column_value(l_emp_csr, 2, l_common_amount);
4227: DBMS_SQL.column_value(l_emp_csr, 3, l_common_uom_code);
4228:
4229: IF l_requirement_type = 'VOLUME' THEN
4230: IF l_uom_code = l_common_uom_code THEN
4231: IF l_common_quantity < l_requirement_value THEN
4299: OZF_Utility_PVT.debug_message('No sales transactions found');
4300: END IF;
4301: l_performance_flag := FND_API.g_false;
4302: END IF;
4303: DBMS_SQL.close_cursor(l_emp_csr);
4304:
4305: END IF;
4306:
4307: IF l_performance_flag = 'F' THEN
4572: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4573: RAISE FND_API.g_exc_error;
4574: END IF;
4575:
4576: l_emp_csr := DBMS_SQL.open_cursor;
4577: FND_DSQL.set_cursor(l_emp_csr);
4578: DBMS_SQL.parse(l_emp_csr, l_stmt, DBMS_SQL.native);
4579: DBMS_SQL.define_column(l_emp_csr, 1, l_cust_account_id);
4580: DBMS_SQL.define_column(l_emp_csr, 2, l_plan_type, 30);
4574: END IF;
4575:
4576: l_emp_csr := DBMS_SQL.open_cursor;
4577: FND_DSQL.set_cursor(l_emp_csr);
4578: DBMS_SQL.parse(l_emp_csr, l_stmt, DBMS_SQL.native);
4579: DBMS_SQL.define_column(l_emp_csr, 1, l_cust_account_id);
4580: DBMS_SQL.define_column(l_emp_csr, 2, l_plan_type, 30);
4581: DBMS_SQL.define_column(l_emp_csr, 3, l_plan_id);
4582: DBMS_SQL.define_column(l_emp_csr, 4, l_bill_to_site_id); --R12.1 enhancements
4575:
4576: l_emp_csr := DBMS_SQL.open_cursor;
4577: FND_DSQL.set_cursor(l_emp_csr);
4578: DBMS_SQL.parse(l_emp_csr, l_stmt, DBMS_SQL.native);
4579: DBMS_SQL.define_column(l_emp_csr, 1, l_cust_account_id);
4580: DBMS_SQL.define_column(l_emp_csr, 2, l_plan_type, 30);
4581: DBMS_SQL.define_column(l_emp_csr, 3, l_plan_id);
4582: DBMS_SQL.define_column(l_emp_csr, 4, l_bill_to_site_id); --R12.1 enhancements
4583: DBMS_SQL.define_column(l_emp_csr, 5, l_product_level_type, 30);
4576: l_emp_csr := DBMS_SQL.open_cursor;
4577: FND_DSQL.set_cursor(l_emp_csr);
4578: DBMS_SQL.parse(l_emp_csr, l_stmt, DBMS_SQL.native);
4579: DBMS_SQL.define_column(l_emp_csr, 1, l_cust_account_id);
4580: DBMS_SQL.define_column(l_emp_csr, 2, l_plan_type, 30);
4581: DBMS_SQL.define_column(l_emp_csr, 3, l_plan_id);
4582: DBMS_SQL.define_column(l_emp_csr, 4, l_bill_to_site_id); --R12.1 enhancements
4583: DBMS_SQL.define_column(l_emp_csr, 5, l_product_level_type, 30);
4584: DBMS_SQL.define_column(l_emp_csr, 6, l_product_id);
4577: FND_DSQL.set_cursor(l_emp_csr);
4578: DBMS_SQL.parse(l_emp_csr, l_stmt, DBMS_SQL.native);
4579: DBMS_SQL.define_column(l_emp_csr, 1, l_cust_account_id);
4580: DBMS_SQL.define_column(l_emp_csr, 2, l_plan_type, 30);
4581: DBMS_SQL.define_column(l_emp_csr, 3, l_plan_id);
4582: DBMS_SQL.define_column(l_emp_csr, 4, l_bill_to_site_id); --R12.1 enhancements
4583: DBMS_SQL.define_column(l_emp_csr, 5, l_product_level_type, 30);
4584: DBMS_SQL.define_column(l_emp_csr, 6, l_product_id);
4585: DBMS_SQL.define_column(l_emp_csr, 7, l_amount);
4578: DBMS_SQL.parse(l_emp_csr, l_stmt, DBMS_SQL.native);
4579: DBMS_SQL.define_column(l_emp_csr, 1, l_cust_account_id);
4580: DBMS_SQL.define_column(l_emp_csr, 2, l_plan_type, 30);
4581: DBMS_SQL.define_column(l_emp_csr, 3, l_plan_id);
4582: DBMS_SQL.define_column(l_emp_csr, 4, l_bill_to_site_id); --R12.1 enhancements
4583: DBMS_SQL.define_column(l_emp_csr, 5, l_product_level_type, 30);
4584: DBMS_SQL.define_column(l_emp_csr, 6, l_product_id);
4585: DBMS_SQL.define_column(l_emp_csr, 7, l_amount);
4586: DBMS_SQL.define_column(l_emp_csr, 8, l_currency_code, 15);
4579: DBMS_SQL.define_column(l_emp_csr, 1, l_cust_account_id);
4580: DBMS_SQL.define_column(l_emp_csr, 2, l_plan_type, 30);
4581: DBMS_SQL.define_column(l_emp_csr, 3, l_plan_id);
4582: DBMS_SQL.define_column(l_emp_csr, 4, l_bill_to_site_id); --R12.1 enhancements
4583: DBMS_SQL.define_column(l_emp_csr, 5, l_product_level_type, 30);
4584: DBMS_SQL.define_column(l_emp_csr, 6, l_product_id);
4585: DBMS_SQL.define_column(l_emp_csr, 7, l_amount);
4586: DBMS_SQL.define_column(l_emp_csr, 8, l_currency_code, 15);
4587: FND_DSQL.do_binds;
4580: DBMS_SQL.define_column(l_emp_csr, 2, l_plan_type, 30);
4581: DBMS_SQL.define_column(l_emp_csr, 3, l_plan_id);
4582: DBMS_SQL.define_column(l_emp_csr, 4, l_bill_to_site_id); --R12.1 enhancements
4583: DBMS_SQL.define_column(l_emp_csr, 5, l_product_level_type, 30);
4584: DBMS_SQL.define_column(l_emp_csr, 6, l_product_id);
4585: DBMS_SQL.define_column(l_emp_csr, 7, l_amount);
4586: DBMS_SQL.define_column(l_emp_csr, 8, l_currency_code, 15);
4587: FND_DSQL.do_binds;
4588:
4581: DBMS_SQL.define_column(l_emp_csr, 3, l_plan_id);
4582: DBMS_SQL.define_column(l_emp_csr, 4, l_bill_to_site_id); --R12.1 enhancements
4583: DBMS_SQL.define_column(l_emp_csr, 5, l_product_level_type, 30);
4584: DBMS_SQL.define_column(l_emp_csr, 6, l_product_id);
4585: DBMS_SQL.define_column(l_emp_csr, 7, l_amount);
4586: DBMS_SQL.define_column(l_emp_csr, 8, l_currency_code, 15);
4587: FND_DSQL.do_binds;
4588:
4589: l_ignore := DBMS_SQL.execute(l_emp_csr);
4582: DBMS_SQL.define_column(l_emp_csr, 4, l_bill_to_site_id); --R12.1 enhancements
4583: DBMS_SQL.define_column(l_emp_csr, 5, l_product_level_type, 30);
4584: DBMS_SQL.define_column(l_emp_csr, 6, l_product_id);
4585: DBMS_SQL.define_column(l_emp_csr, 7, l_amount);
4586: DBMS_SQL.define_column(l_emp_csr, 8, l_currency_code, 15);
4587: FND_DSQL.do_binds;
4588:
4589: l_ignore := DBMS_SQL.execute(l_emp_csr);
4590: LOOP
4585: DBMS_SQL.define_column(l_emp_csr, 7, l_amount);
4586: DBMS_SQL.define_column(l_emp_csr, 8, l_currency_code, 15);
4587: FND_DSQL.do_binds;
4588:
4589: l_ignore := DBMS_SQL.execute(l_emp_csr);
4590: LOOP
4591: IF DBMS_SQL.fetch_rows(l_emp_csr) > 0 THEN
4592: DBMS_SQL.column_value(l_emp_csr, 1, l_cust_account_id);
4593: DBMS_SQL.column_value(l_emp_csr, 2, l_plan_type);
4587: FND_DSQL.do_binds;
4588:
4589: l_ignore := DBMS_SQL.execute(l_emp_csr);
4590: LOOP
4591: IF DBMS_SQL.fetch_rows(l_emp_csr) > 0 THEN
4592: DBMS_SQL.column_value(l_emp_csr, 1, l_cust_account_id);
4593: DBMS_SQL.column_value(l_emp_csr, 2, l_plan_type);
4594: DBMS_SQL.column_value(l_emp_csr, 3, l_plan_id);
4595: DBMS_SQL.column_value(l_emp_csr, 4, l_bill_to_site_id); --R12.1 enhancements
4588:
4589: l_ignore := DBMS_SQL.execute(l_emp_csr);
4590: LOOP
4591: IF DBMS_SQL.fetch_rows(l_emp_csr) > 0 THEN
4592: DBMS_SQL.column_value(l_emp_csr, 1, l_cust_account_id);
4593: DBMS_SQL.column_value(l_emp_csr, 2, l_plan_type);
4594: DBMS_SQL.column_value(l_emp_csr, 3, l_plan_id);
4595: DBMS_SQL.column_value(l_emp_csr, 4, l_bill_to_site_id); --R12.1 enhancements
4596: DBMS_SQL.column_value(l_emp_csr, 5, l_product_level_type);
4589: l_ignore := DBMS_SQL.execute(l_emp_csr);
4590: LOOP
4591: IF DBMS_SQL.fetch_rows(l_emp_csr) > 0 THEN
4592: DBMS_SQL.column_value(l_emp_csr, 1, l_cust_account_id);
4593: DBMS_SQL.column_value(l_emp_csr, 2, l_plan_type);
4594: DBMS_SQL.column_value(l_emp_csr, 3, l_plan_id);
4595: DBMS_SQL.column_value(l_emp_csr, 4, l_bill_to_site_id); --R12.1 enhancements
4596: DBMS_SQL.column_value(l_emp_csr, 5, l_product_level_type);
4597: DBMS_SQL.column_value(l_emp_csr, 6, l_product_id);
4590: LOOP
4591: IF DBMS_SQL.fetch_rows(l_emp_csr) > 0 THEN
4592: DBMS_SQL.column_value(l_emp_csr, 1, l_cust_account_id);
4593: DBMS_SQL.column_value(l_emp_csr, 2, l_plan_type);
4594: DBMS_SQL.column_value(l_emp_csr, 3, l_plan_id);
4595: DBMS_SQL.column_value(l_emp_csr, 4, l_bill_to_site_id); --R12.1 enhancements
4596: DBMS_SQL.column_value(l_emp_csr, 5, l_product_level_type);
4597: DBMS_SQL.column_value(l_emp_csr, 6, l_product_id);
4598: DBMS_SQL.column_value(l_emp_csr, 7, l_amount);
4591: IF DBMS_SQL.fetch_rows(l_emp_csr) > 0 THEN
4592: DBMS_SQL.column_value(l_emp_csr, 1, l_cust_account_id);
4593: DBMS_SQL.column_value(l_emp_csr, 2, l_plan_type);
4594: DBMS_SQL.column_value(l_emp_csr, 3, l_plan_id);
4595: DBMS_SQL.column_value(l_emp_csr, 4, l_bill_to_site_id); --R12.1 enhancements
4596: DBMS_SQL.column_value(l_emp_csr, 5, l_product_level_type);
4597: DBMS_SQL.column_value(l_emp_csr, 6, l_product_id);
4598: DBMS_SQL.column_value(l_emp_csr, 7, l_amount);
4599: DBMS_SQL.column_value(l_emp_csr, 8, l_currency_code);
4592: DBMS_SQL.column_value(l_emp_csr, 1, l_cust_account_id);
4593: DBMS_SQL.column_value(l_emp_csr, 2, l_plan_type);
4594: DBMS_SQL.column_value(l_emp_csr, 3, l_plan_id);
4595: DBMS_SQL.column_value(l_emp_csr, 4, l_bill_to_site_id); --R12.1 enhancements
4596: DBMS_SQL.column_value(l_emp_csr, 5, l_product_level_type);
4597: DBMS_SQL.column_value(l_emp_csr, 6, l_product_id);
4598: DBMS_SQL.column_value(l_emp_csr, 7, l_amount);
4599: DBMS_SQL.column_value(l_emp_csr, 8, l_currency_code);
4600:
4593: DBMS_SQL.column_value(l_emp_csr, 2, l_plan_type);
4594: DBMS_SQL.column_value(l_emp_csr, 3, l_plan_id);
4595: DBMS_SQL.column_value(l_emp_csr, 4, l_bill_to_site_id); --R12.1 enhancements
4596: DBMS_SQL.column_value(l_emp_csr, 5, l_product_level_type);
4597: DBMS_SQL.column_value(l_emp_csr, 6, l_product_id);
4598: DBMS_SQL.column_value(l_emp_csr, 7, l_amount);
4599: DBMS_SQL.column_value(l_emp_csr, 8, l_currency_code);
4600:
4601: IF l_currency_code <> l_claim_rec.currency_code THEN
4594: DBMS_SQL.column_value(l_emp_csr, 3, l_plan_id);
4595: DBMS_SQL.column_value(l_emp_csr, 4, l_bill_to_site_id); --R12.1 enhancements
4596: DBMS_SQL.column_value(l_emp_csr, 5, l_product_level_type);
4597: DBMS_SQL.column_value(l_emp_csr, 6, l_product_id);
4598: DBMS_SQL.column_value(l_emp_csr, 7, l_amount);
4599: DBMS_SQL.column_value(l_emp_csr, 8, l_currency_code);
4600:
4601: IF l_currency_code <> l_claim_rec.currency_code THEN
4602: l_amount_ut_curr := l_amount;
4595: DBMS_SQL.column_value(l_emp_csr, 4, l_bill_to_site_id); --R12.1 enhancements
4596: DBMS_SQL.column_value(l_emp_csr, 5, l_product_level_type);
4597: DBMS_SQL.column_value(l_emp_csr, 6, l_product_id);
4598: DBMS_SQL.column_value(l_emp_csr, 7, l_amount);
4599: DBMS_SQL.column_value(l_emp_csr, 8, l_currency_code);
4600:
4601: IF l_currency_code <> l_claim_rec.currency_code THEN
4602: l_amount_ut_curr := l_amount;
4603:
4757: ELSE
4758: EXIT;
4759: END IF;
4760: END LOOP;
4761: DBMS_SQL.close_cursor(l_emp_csr);
4762:
4763: IF l_total_acctd_amount_rem > 0 THEN
4764: l_claim_rec.amount := l_total_acctd_amount_rem;
4765:
5295: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5296: RAISE FND_API.g_exc_error;
5297: END IF;
5298:
5299: l_emp_csr := DBMS_SQL.open_cursor;
5300: FND_DSQL.set_cursor(l_emp_csr);
5301: DBMS_SQL.parse(l_emp_csr, l_stmt, DBMS_SQL.native);
5302: DBMS_SQL.define_column(l_emp_csr, 1, l_cust_account_id);
5303: DBMS_SQL.define_column(l_emp_csr, 2, l_plan_type, 30);
5297: END IF;
5298:
5299: l_emp_csr := DBMS_SQL.open_cursor;
5300: FND_DSQL.set_cursor(l_emp_csr);
5301: DBMS_SQL.parse(l_emp_csr, l_stmt, DBMS_SQL.native);
5302: DBMS_SQL.define_column(l_emp_csr, 1, l_cust_account_id);
5303: DBMS_SQL.define_column(l_emp_csr, 2, l_plan_type, 30);
5304: DBMS_SQL.define_column(l_emp_csr, 3, l_plan_id);
5305: DBMS_SQL.define_column(l_emp_csr, 4, l_bill_to_site_id); --Fix for Bug 7605745
5298:
5299: l_emp_csr := DBMS_SQL.open_cursor;
5300: FND_DSQL.set_cursor(l_emp_csr);
5301: DBMS_SQL.parse(l_emp_csr, l_stmt, DBMS_SQL.native);
5302: DBMS_SQL.define_column(l_emp_csr, 1, l_cust_account_id);
5303: DBMS_SQL.define_column(l_emp_csr, 2, l_plan_type, 30);
5304: DBMS_SQL.define_column(l_emp_csr, 3, l_plan_id);
5305: DBMS_SQL.define_column(l_emp_csr, 4, l_bill_to_site_id); --Fix for Bug 7605745
5306: DBMS_SQL.define_column(l_emp_csr, 5, l_product_level_type, 30);
5299: l_emp_csr := DBMS_SQL.open_cursor;
5300: FND_DSQL.set_cursor(l_emp_csr);
5301: DBMS_SQL.parse(l_emp_csr, l_stmt, DBMS_SQL.native);
5302: DBMS_SQL.define_column(l_emp_csr, 1, l_cust_account_id);
5303: DBMS_SQL.define_column(l_emp_csr, 2, l_plan_type, 30);
5304: DBMS_SQL.define_column(l_emp_csr, 3, l_plan_id);
5305: DBMS_SQL.define_column(l_emp_csr, 4, l_bill_to_site_id); --Fix for Bug 7605745
5306: DBMS_SQL.define_column(l_emp_csr, 5, l_product_level_type, 30);
5307: DBMS_SQL.define_column(l_emp_csr, 6, l_product_id);
5300: FND_DSQL.set_cursor(l_emp_csr);
5301: DBMS_SQL.parse(l_emp_csr, l_stmt, DBMS_SQL.native);
5302: DBMS_SQL.define_column(l_emp_csr, 1, l_cust_account_id);
5303: DBMS_SQL.define_column(l_emp_csr, 2, l_plan_type, 30);
5304: DBMS_SQL.define_column(l_emp_csr, 3, l_plan_id);
5305: DBMS_SQL.define_column(l_emp_csr, 4, l_bill_to_site_id); --Fix for Bug 7605745
5306: DBMS_SQL.define_column(l_emp_csr, 5, l_product_level_type, 30);
5307: DBMS_SQL.define_column(l_emp_csr, 6, l_product_id);
5308: DBMS_SQL.define_column(l_emp_csr, 7, l_amount);
5301: DBMS_SQL.parse(l_emp_csr, l_stmt, DBMS_SQL.native);
5302: DBMS_SQL.define_column(l_emp_csr, 1, l_cust_account_id);
5303: DBMS_SQL.define_column(l_emp_csr, 2, l_plan_type, 30);
5304: DBMS_SQL.define_column(l_emp_csr, 3, l_plan_id);
5305: DBMS_SQL.define_column(l_emp_csr, 4, l_bill_to_site_id); --Fix for Bug 7605745
5306: DBMS_SQL.define_column(l_emp_csr, 5, l_product_level_type, 30);
5307: DBMS_SQL.define_column(l_emp_csr, 6, l_product_id);
5308: DBMS_SQL.define_column(l_emp_csr, 7, l_amount);
5309: DBMS_SQL.define_column(l_emp_csr, 8, l_currency_code, 15);
5302: DBMS_SQL.define_column(l_emp_csr, 1, l_cust_account_id);
5303: DBMS_SQL.define_column(l_emp_csr, 2, l_plan_type, 30);
5304: DBMS_SQL.define_column(l_emp_csr, 3, l_plan_id);
5305: DBMS_SQL.define_column(l_emp_csr, 4, l_bill_to_site_id); --Fix for Bug 7605745
5306: DBMS_SQL.define_column(l_emp_csr, 5, l_product_level_type, 30);
5307: DBMS_SQL.define_column(l_emp_csr, 6, l_product_id);
5308: DBMS_SQL.define_column(l_emp_csr, 7, l_amount);
5309: DBMS_SQL.define_column(l_emp_csr, 8, l_currency_code, 15);
5310: FND_DSQL.do_binds;
5303: DBMS_SQL.define_column(l_emp_csr, 2, l_plan_type, 30);
5304: DBMS_SQL.define_column(l_emp_csr, 3, l_plan_id);
5305: DBMS_SQL.define_column(l_emp_csr, 4, l_bill_to_site_id); --Fix for Bug 7605745
5306: DBMS_SQL.define_column(l_emp_csr, 5, l_product_level_type, 30);
5307: DBMS_SQL.define_column(l_emp_csr, 6, l_product_id);
5308: DBMS_SQL.define_column(l_emp_csr, 7, l_amount);
5309: DBMS_SQL.define_column(l_emp_csr, 8, l_currency_code, 15);
5310: FND_DSQL.do_binds;
5311:
5304: DBMS_SQL.define_column(l_emp_csr, 3, l_plan_id);
5305: DBMS_SQL.define_column(l_emp_csr, 4, l_bill_to_site_id); --Fix for Bug 7605745
5306: DBMS_SQL.define_column(l_emp_csr, 5, l_product_level_type, 30);
5307: DBMS_SQL.define_column(l_emp_csr, 6, l_product_id);
5308: DBMS_SQL.define_column(l_emp_csr, 7, l_amount);
5309: DBMS_SQL.define_column(l_emp_csr, 8, l_currency_code, 15);
5310: FND_DSQL.do_binds;
5311:
5312: l_ignore := DBMS_SQL.execute(l_emp_csr);
5305: DBMS_SQL.define_column(l_emp_csr, 4, l_bill_to_site_id); --Fix for Bug 7605745
5306: DBMS_SQL.define_column(l_emp_csr, 5, l_product_level_type, 30);
5307: DBMS_SQL.define_column(l_emp_csr, 6, l_product_id);
5308: DBMS_SQL.define_column(l_emp_csr, 7, l_amount);
5309: DBMS_SQL.define_column(l_emp_csr, 8, l_currency_code, 15);
5310: FND_DSQL.do_binds;
5311:
5312: l_ignore := DBMS_SQL.execute(l_emp_csr);
5313: LOOP
5308: DBMS_SQL.define_column(l_emp_csr, 7, l_amount);
5309: DBMS_SQL.define_column(l_emp_csr, 8, l_currency_code, 15);
5310: FND_DSQL.do_binds;
5311:
5312: l_ignore := DBMS_SQL.execute(l_emp_csr);
5313: LOOP
5314: IF DBMS_SQL.fetch_rows(l_emp_csr) > 0 AND l_total_amount <> 0 THEN
5315: DBMS_SQL.column_value(l_emp_csr, 1, l_cust_account_id);
5316: DBMS_SQL.column_value(l_emp_csr, 2, l_plan_type);
5310: FND_DSQL.do_binds;
5311:
5312: l_ignore := DBMS_SQL.execute(l_emp_csr);
5313: LOOP
5314: IF DBMS_SQL.fetch_rows(l_emp_csr) > 0 AND l_total_amount <> 0 THEN
5315: DBMS_SQL.column_value(l_emp_csr, 1, l_cust_account_id);
5316: DBMS_SQL.column_value(l_emp_csr, 2, l_plan_type);
5317: DBMS_SQL.column_value(l_emp_csr, 3, l_plan_id);
5318: DBMS_SQL.column_value(l_emp_csr, 4, l_bill_to_site_id); --Fix for Bug 7605745
5311:
5312: l_ignore := DBMS_SQL.execute(l_emp_csr);
5313: LOOP
5314: IF DBMS_SQL.fetch_rows(l_emp_csr) > 0 AND l_total_amount <> 0 THEN
5315: DBMS_SQL.column_value(l_emp_csr, 1, l_cust_account_id);
5316: DBMS_SQL.column_value(l_emp_csr, 2, l_plan_type);
5317: DBMS_SQL.column_value(l_emp_csr, 3, l_plan_id);
5318: DBMS_SQL.column_value(l_emp_csr, 4, l_bill_to_site_id); --Fix for Bug 7605745
5319: DBMS_SQL.column_value(l_emp_csr, 5, l_product_level_type);
5312: l_ignore := DBMS_SQL.execute(l_emp_csr);
5313: LOOP
5314: IF DBMS_SQL.fetch_rows(l_emp_csr) > 0 AND l_total_amount <> 0 THEN
5315: DBMS_SQL.column_value(l_emp_csr, 1, l_cust_account_id);
5316: DBMS_SQL.column_value(l_emp_csr, 2, l_plan_type);
5317: DBMS_SQL.column_value(l_emp_csr, 3, l_plan_id);
5318: DBMS_SQL.column_value(l_emp_csr, 4, l_bill_to_site_id); --Fix for Bug 7605745
5319: DBMS_SQL.column_value(l_emp_csr, 5, l_product_level_type);
5320: DBMS_SQL.column_value(l_emp_csr, 6, l_product_id);
5313: LOOP
5314: IF DBMS_SQL.fetch_rows(l_emp_csr) > 0 AND l_total_amount <> 0 THEN
5315: DBMS_SQL.column_value(l_emp_csr, 1, l_cust_account_id);
5316: DBMS_SQL.column_value(l_emp_csr, 2, l_plan_type);
5317: DBMS_SQL.column_value(l_emp_csr, 3, l_plan_id);
5318: DBMS_SQL.column_value(l_emp_csr, 4, l_bill_to_site_id); --Fix for Bug 7605745
5319: DBMS_SQL.column_value(l_emp_csr, 5, l_product_level_type);
5320: DBMS_SQL.column_value(l_emp_csr, 6, l_product_id);
5321: DBMS_SQL.column_value(l_emp_csr, 7, l_amount);
5314: IF DBMS_SQL.fetch_rows(l_emp_csr) > 0 AND l_total_amount <> 0 THEN
5315: DBMS_SQL.column_value(l_emp_csr, 1, l_cust_account_id);
5316: DBMS_SQL.column_value(l_emp_csr, 2, l_plan_type);
5317: DBMS_SQL.column_value(l_emp_csr, 3, l_plan_id);
5318: DBMS_SQL.column_value(l_emp_csr, 4, l_bill_to_site_id); --Fix for Bug 7605745
5319: DBMS_SQL.column_value(l_emp_csr, 5, l_product_level_type);
5320: DBMS_SQL.column_value(l_emp_csr, 6, l_product_id);
5321: DBMS_SQL.column_value(l_emp_csr, 7, l_amount);
5322: DBMS_SQL.column_value(l_emp_csr, 8, l_currency_code);
5315: DBMS_SQL.column_value(l_emp_csr, 1, l_cust_account_id);
5316: DBMS_SQL.column_value(l_emp_csr, 2, l_plan_type);
5317: DBMS_SQL.column_value(l_emp_csr, 3, l_plan_id);
5318: DBMS_SQL.column_value(l_emp_csr, 4, l_bill_to_site_id); --Fix for Bug 7605745
5319: DBMS_SQL.column_value(l_emp_csr, 5, l_product_level_type);
5320: DBMS_SQL.column_value(l_emp_csr, 6, l_product_id);
5321: DBMS_SQL.column_value(l_emp_csr, 7, l_amount);
5322: DBMS_SQL.column_value(l_emp_csr, 8, l_currency_code);
5323:
5316: DBMS_SQL.column_value(l_emp_csr, 2, l_plan_type);
5317: DBMS_SQL.column_value(l_emp_csr, 3, l_plan_id);
5318: DBMS_SQL.column_value(l_emp_csr, 4, l_bill_to_site_id); --Fix for Bug 7605745
5319: DBMS_SQL.column_value(l_emp_csr, 5, l_product_level_type);
5320: DBMS_SQL.column_value(l_emp_csr, 6, l_product_id);
5321: DBMS_SQL.column_value(l_emp_csr, 7, l_amount);
5322: DBMS_SQL.column_value(l_emp_csr, 8, l_currency_code);
5323:
5324: IF l_amount IS NOT NULL AND l_amount <> 0 THEN
5317: DBMS_SQL.column_value(l_emp_csr, 3, l_plan_id);
5318: DBMS_SQL.column_value(l_emp_csr, 4, l_bill_to_site_id); --Fix for Bug 7605745
5319: DBMS_SQL.column_value(l_emp_csr, 5, l_product_level_type);
5320: DBMS_SQL.column_value(l_emp_csr, 6, l_product_id);
5321: DBMS_SQL.column_value(l_emp_csr, 7, l_amount);
5322: DBMS_SQL.column_value(l_emp_csr, 8, l_currency_code);
5323:
5324: IF l_amount IS NOT NULL AND l_amount <> 0 THEN
5325: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Line ' || l_counter || ': Amount='||l_amount);
5318: DBMS_SQL.column_value(l_emp_csr, 4, l_bill_to_site_id); --Fix for Bug 7605745
5319: DBMS_SQL.column_value(l_emp_csr, 5, l_product_level_type);
5320: DBMS_SQL.column_value(l_emp_csr, 6, l_product_id);
5321: DBMS_SQL.column_value(l_emp_csr, 7, l_amount);
5322: DBMS_SQL.column_value(l_emp_csr, 8, l_currency_code);
5323:
5324: IF l_amount IS NOT NULL AND l_amount <> 0 THEN
5325: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Line ' || l_counter || ': Amount='||l_amount);
5326: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Plan Type : ' || l_plan_type);
5391: ELSE
5392: EXIT;
5393: END IF;
5394: END LOOP;
5395: DBMS_SQL.close_cursor(l_emp_csr);
5396:
5397: -- if earnings are found
5398: IF l_counter > 1 THEN
5399: OZF_CLAIM_LINE_PVT.Create_Claim_Line_Tbl(
7329: RAISE FND_API.g_exc_error;
7330: END IF;
7331:
7332: -- use FND_DSQL package for dynamic sql and bind variables
7333: l_funds_util_csr := DBMS_SQL.open_cursor;
7334: FND_DSQL.set_cursor(l_funds_util_csr);
7335: DBMS_SQL.parse(l_funds_util_csr, l_funds_util_sql, DBMS_SQL.native);
7336: DBMS_SQL.define_column(l_funds_util_csr, 1, l_util_id);
7337: DBMS_SQL.define_column(l_funds_util_csr, 2, l_fu_amt_rem);
7331:
7332: -- use FND_DSQL package for dynamic sql and bind variables
7333: l_funds_util_csr := DBMS_SQL.open_cursor;
7334: FND_DSQL.set_cursor(l_funds_util_csr);
7335: DBMS_SQL.parse(l_funds_util_csr, l_funds_util_sql, DBMS_SQL.native);
7336: DBMS_SQL.define_column(l_funds_util_csr, 1, l_util_id);
7337: DBMS_SQL.define_column(l_funds_util_csr, 2, l_fu_amt_rem);
7338: DBMS_SQL.define_column(l_funds_util_csr, 3, l_fu_scan_unit_rem);
7339: DBMS_SQL.define_column(l_funds_util_csr, 4, l_fu_currency_code, 15);
7332: -- use FND_DSQL package for dynamic sql and bind variables
7333: l_funds_util_csr := DBMS_SQL.open_cursor;
7334: FND_DSQL.set_cursor(l_funds_util_csr);
7335: DBMS_SQL.parse(l_funds_util_csr, l_funds_util_sql, DBMS_SQL.native);
7336: DBMS_SQL.define_column(l_funds_util_csr, 1, l_util_id);
7337: DBMS_SQL.define_column(l_funds_util_csr, 2, l_fu_amt_rem);
7338: DBMS_SQL.define_column(l_funds_util_csr, 3, l_fu_scan_unit_rem);
7339: DBMS_SQL.define_column(l_funds_util_csr, 4, l_fu_currency_code, 15);
7340: FND_DSQL.do_binds;
7333: l_funds_util_csr := DBMS_SQL.open_cursor;
7334: FND_DSQL.set_cursor(l_funds_util_csr);
7335: DBMS_SQL.parse(l_funds_util_csr, l_funds_util_sql, DBMS_SQL.native);
7336: DBMS_SQL.define_column(l_funds_util_csr, 1, l_util_id);
7337: DBMS_SQL.define_column(l_funds_util_csr, 2, l_fu_amt_rem);
7338: DBMS_SQL.define_column(l_funds_util_csr, 3, l_fu_scan_unit_rem);
7339: DBMS_SQL.define_column(l_funds_util_csr, 4, l_fu_currency_code, 15);
7340: FND_DSQL.do_binds;
7341:
7334: FND_DSQL.set_cursor(l_funds_util_csr);
7335: DBMS_SQL.parse(l_funds_util_csr, l_funds_util_sql, DBMS_SQL.native);
7336: DBMS_SQL.define_column(l_funds_util_csr, 1, l_util_id);
7337: DBMS_SQL.define_column(l_funds_util_csr, 2, l_fu_amt_rem);
7338: DBMS_SQL.define_column(l_funds_util_csr, 3, l_fu_scan_unit_rem);
7339: DBMS_SQL.define_column(l_funds_util_csr, 4, l_fu_currency_code, 15);
7340: FND_DSQL.do_binds;
7341:
7342: l_ignore := DBMS_SQL.execute(l_funds_util_csr);
7335: DBMS_SQL.parse(l_funds_util_csr, l_funds_util_sql, DBMS_SQL.native);
7336: DBMS_SQL.define_column(l_funds_util_csr, 1, l_util_id);
7337: DBMS_SQL.define_column(l_funds_util_csr, 2, l_fu_amt_rem);
7338: DBMS_SQL.define_column(l_funds_util_csr, 3, l_fu_scan_unit_rem);
7339: DBMS_SQL.define_column(l_funds_util_csr, 4, l_fu_currency_code, 15);
7340: FND_DSQL.do_binds;
7341:
7342: l_ignore := DBMS_SQL.execute(l_funds_util_csr);
7343: --OPEN l_funds_util_csr FOR l_funds_util_sql;
7338: DBMS_SQL.define_column(l_funds_util_csr, 3, l_fu_scan_unit_rem);
7339: DBMS_SQL.define_column(l_funds_util_csr, 4, l_fu_currency_code, 15);
7340: FND_DSQL.do_binds;
7341:
7342: l_ignore := DBMS_SQL.execute(l_funds_util_csr);
7343: --OPEN l_funds_util_csr FOR l_funds_util_sql;
7344: LOOP
7345: IF DBMS_SQL.fetch_rows(l_funds_util_csr) > 0 THEN
7346: DBMS_SQL.column_value(l_funds_util_csr, 1, l_util_id);
7341:
7342: l_ignore := DBMS_SQL.execute(l_funds_util_csr);
7343: --OPEN l_funds_util_csr FOR l_funds_util_sql;
7344: LOOP
7345: IF DBMS_SQL.fetch_rows(l_funds_util_csr) > 0 THEN
7346: DBMS_SQL.column_value(l_funds_util_csr, 1, l_util_id);
7347: DBMS_SQL.column_value(l_funds_util_csr, 2, l_fu_amt_rem);
7348: DBMS_SQL.column_value(l_funds_util_csr, 3, l_fu_scan_unit_rem);
7349: DBMS_SQL.column_value(l_funds_util_csr, 4, l_fu_currency_code);
7342: l_ignore := DBMS_SQL.execute(l_funds_util_csr);
7343: --OPEN l_funds_util_csr FOR l_funds_util_sql;
7344: LOOP
7345: IF DBMS_SQL.fetch_rows(l_funds_util_csr) > 0 THEN
7346: DBMS_SQL.column_value(l_funds_util_csr, 1, l_util_id);
7347: DBMS_SQL.column_value(l_funds_util_csr, 2, l_fu_amt_rem);
7348: DBMS_SQL.column_value(l_funds_util_csr, 3, l_fu_scan_unit_rem);
7349: DBMS_SQL.column_value(l_funds_util_csr, 4, l_fu_currency_code);
7350:
7343: --OPEN l_funds_util_csr FOR l_funds_util_sql;
7344: LOOP
7345: IF DBMS_SQL.fetch_rows(l_funds_util_csr) > 0 THEN
7346: DBMS_SQL.column_value(l_funds_util_csr, 1, l_util_id);
7347: DBMS_SQL.column_value(l_funds_util_csr, 2, l_fu_amt_rem);
7348: DBMS_SQL.column_value(l_funds_util_csr, 3, l_fu_scan_unit_rem);
7349: DBMS_SQL.column_value(l_funds_util_csr, 4, l_fu_currency_code);
7350:
7351: OPEN csr_funds_used_units(l_funds_util_flt.activity_product_id);
7344: LOOP
7345: IF DBMS_SQL.fetch_rows(l_funds_util_csr) > 0 THEN
7346: DBMS_SQL.column_value(l_funds_util_csr, 1, l_util_id);
7347: DBMS_SQL.column_value(l_funds_util_csr, 2, l_fu_amt_rem);
7348: DBMS_SQL.column_value(l_funds_util_csr, 3, l_fu_scan_unit_rem);
7349: DBMS_SQL.column_value(l_funds_util_csr, 4, l_fu_currency_code);
7350:
7351: OPEN csr_funds_used_units(l_funds_util_flt.activity_product_id);
7352: FETCH csr_funds_used_units INTO l_funds_used_units;
7345: IF DBMS_SQL.fetch_rows(l_funds_util_csr) > 0 THEN
7346: DBMS_SQL.column_value(l_funds_util_csr, 1, l_util_id);
7347: DBMS_SQL.column_value(l_funds_util_csr, 2, l_fu_amt_rem);
7348: DBMS_SQL.column_value(l_funds_util_csr, 3, l_fu_scan_unit_rem);
7349: DBMS_SQL.column_value(l_funds_util_csr, 4, l_fu_currency_code);
7350:
7351: OPEN csr_funds_used_units(l_funds_util_flt.activity_product_id);
7352: FETCH csr_funds_used_units INTO l_funds_used_units;
7353: CLOSE csr_funds_used_units;
7365: ELSE
7366: EXIT;
7367: END IF;
7368: END LOOP;
7369: DBMS_SQL.close_cursor(l_funds_util_csr);
7370: END IF ; -- if pay_over_all flag = 'FALSE'
7371:
7372: IF OZF_DEBUG_HIGH_ON THEN
7373: OZF_Utility_PVT.debug_message(l_full_name||': new associated amount '||l_cre_total_amount);
8258: RAISE FND_API.g_exc_unexpected_error;
8259: END IF;
8260:
8261: -- use FND_DSQL package for dynamic sql and bind variables
8262: l_funds_util_csr := DBMS_SQL.open_cursor;
8263: FND_DSQL.set_cursor(l_funds_util_csr);
8264: DBMS_SQL.parse(l_funds_util_csr, l_funds_util_sql, DBMS_SQL.native);
8265: DBMS_SQL.define_column(l_funds_util_csr, 1, l_lu_line_util_id);
8266: DBMS_SQL.define_column(l_funds_util_csr, 2, l_lu_utilization_id);
8260:
8261: -- use FND_DSQL package for dynamic sql and bind variables
8262: l_funds_util_csr := DBMS_SQL.open_cursor;
8263: FND_DSQL.set_cursor(l_funds_util_csr);
8264: DBMS_SQL.parse(l_funds_util_csr, l_funds_util_sql, DBMS_SQL.native);
8265: DBMS_SQL.define_column(l_funds_util_csr, 1, l_lu_line_util_id);
8266: DBMS_SQL.define_column(l_funds_util_csr, 2, l_lu_utilization_id);
8267: DBMS_SQL.define_column(l_funds_util_csr, 3, l_lu_amt);
8268: DBMS_SQL.define_column(l_funds_util_csr, 4, l_lu_scan_unit);
8261: -- use FND_DSQL package for dynamic sql and bind variables
8262: l_funds_util_csr := DBMS_SQL.open_cursor;
8263: FND_DSQL.set_cursor(l_funds_util_csr);
8264: DBMS_SQL.parse(l_funds_util_csr, l_funds_util_sql, DBMS_SQL.native);
8265: DBMS_SQL.define_column(l_funds_util_csr, 1, l_lu_line_util_id);
8266: DBMS_SQL.define_column(l_funds_util_csr, 2, l_lu_utilization_id);
8267: DBMS_SQL.define_column(l_funds_util_csr, 3, l_lu_amt);
8268: DBMS_SQL.define_column(l_funds_util_csr, 4, l_lu_scan_unit);
8269: DBMS_SQL.define_column(l_funds_util_csr, 5, l_lu_currency_code, 15);
8262: l_funds_util_csr := DBMS_SQL.open_cursor;
8263: FND_DSQL.set_cursor(l_funds_util_csr);
8264: DBMS_SQL.parse(l_funds_util_csr, l_funds_util_sql, DBMS_SQL.native);
8265: DBMS_SQL.define_column(l_funds_util_csr, 1, l_lu_line_util_id);
8266: DBMS_SQL.define_column(l_funds_util_csr, 2, l_lu_utilization_id);
8267: DBMS_SQL.define_column(l_funds_util_csr, 3, l_lu_amt);
8268: DBMS_SQL.define_column(l_funds_util_csr, 4, l_lu_scan_unit);
8269: DBMS_SQL.define_column(l_funds_util_csr, 5, l_lu_currency_code, 15);
8270: -- DBMS_SQL.define_column(l_funds_util_csr, 5, l_utiz_amount);
8263: FND_DSQL.set_cursor(l_funds_util_csr);
8264: DBMS_SQL.parse(l_funds_util_csr, l_funds_util_sql, DBMS_SQL.native);
8265: DBMS_SQL.define_column(l_funds_util_csr, 1, l_lu_line_util_id);
8266: DBMS_SQL.define_column(l_funds_util_csr, 2, l_lu_utilization_id);
8267: DBMS_SQL.define_column(l_funds_util_csr, 3, l_lu_amt);
8268: DBMS_SQL.define_column(l_funds_util_csr, 4, l_lu_scan_unit);
8269: DBMS_SQL.define_column(l_funds_util_csr, 5, l_lu_currency_code, 15);
8270: -- DBMS_SQL.define_column(l_funds_util_csr, 5, l_utiz_amount);
8271: FND_DSQL.do_binds;
8264: DBMS_SQL.parse(l_funds_util_csr, l_funds_util_sql, DBMS_SQL.native);
8265: DBMS_SQL.define_column(l_funds_util_csr, 1, l_lu_line_util_id);
8266: DBMS_SQL.define_column(l_funds_util_csr, 2, l_lu_utilization_id);
8267: DBMS_SQL.define_column(l_funds_util_csr, 3, l_lu_amt);
8268: DBMS_SQL.define_column(l_funds_util_csr, 4, l_lu_scan_unit);
8269: DBMS_SQL.define_column(l_funds_util_csr, 5, l_lu_currency_code, 15);
8270: -- DBMS_SQL.define_column(l_funds_util_csr, 5, l_utiz_amount);
8271: FND_DSQL.do_binds;
8272:
8265: DBMS_SQL.define_column(l_funds_util_csr, 1, l_lu_line_util_id);
8266: DBMS_SQL.define_column(l_funds_util_csr, 2, l_lu_utilization_id);
8267: DBMS_SQL.define_column(l_funds_util_csr, 3, l_lu_amt);
8268: DBMS_SQL.define_column(l_funds_util_csr, 4, l_lu_scan_unit);
8269: DBMS_SQL.define_column(l_funds_util_csr, 5, l_lu_currency_code, 15);
8270: -- DBMS_SQL.define_column(l_funds_util_csr, 5, l_utiz_amount);
8271: FND_DSQL.do_binds;
8272:
8273: l_ignore := DBMS_SQL.execute(l_funds_util_csr);
8266: DBMS_SQL.define_column(l_funds_util_csr, 2, l_lu_utilization_id);
8267: DBMS_SQL.define_column(l_funds_util_csr, 3, l_lu_amt);
8268: DBMS_SQL.define_column(l_funds_util_csr, 4, l_lu_scan_unit);
8269: DBMS_SQL.define_column(l_funds_util_csr, 5, l_lu_currency_code, 15);
8270: -- DBMS_SQL.define_column(l_funds_util_csr, 5, l_utiz_amount);
8271: FND_DSQL.do_binds;
8272:
8273: l_ignore := DBMS_SQL.execute(l_funds_util_csr);
8274: --OPEN l_funds_util_csr FOR l_funds_util_sql;
8269: DBMS_SQL.define_column(l_funds_util_csr, 5, l_lu_currency_code, 15);
8270: -- DBMS_SQL.define_column(l_funds_util_csr, 5, l_utiz_amount);
8271: FND_DSQL.do_binds;
8272:
8273: l_ignore := DBMS_SQL.execute(l_funds_util_csr);
8274: --OPEN l_funds_util_csr FOR l_funds_util_sql;
8275: LOOP
8276: /*
8277: FETCH l_funds_util_csr INTO l_lu_line_util_id
8280: , l_lu_scan_unit;
8281: EXIT WHEN l_funds_util_csr%NOTFOUND;
8282: */
8283:
8284: IF DBMS_SQL.fetch_rows(l_funds_util_csr) > 0 THEN
8285: DBMS_SQL.column_value(l_funds_util_csr, 1, l_lu_line_util_id);
8286: DBMS_SQL.column_value(l_funds_util_csr, 2, l_lu_utilization_id);
8287: DBMS_SQL.column_value(l_funds_util_csr, 3, l_lu_amt);
8288: DBMS_SQL.column_value(l_funds_util_csr, 4, l_lu_scan_unit);
8281: EXIT WHEN l_funds_util_csr%NOTFOUND;
8282: */
8283:
8284: IF DBMS_SQL.fetch_rows(l_funds_util_csr) > 0 THEN
8285: DBMS_SQL.column_value(l_funds_util_csr, 1, l_lu_line_util_id);
8286: DBMS_SQL.column_value(l_funds_util_csr, 2, l_lu_utilization_id);
8287: DBMS_SQL.column_value(l_funds_util_csr, 3, l_lu_amt);
8288: DBMS_SQL.column_value(l_funds_util_csr, 4, l_lu_scan_unit);
8289: DBMS_SQL.column_value(l_funds_util_csr, 5, l_lu_currency_code);
8282: */
8283:
8284: IF DBMS_SQL.fetch_rows(l_funds_util_csr) > 0 THEN
8285: DBMS_SQL.column_value(l_funds_util_csr, 1, l_lu_line_util_id);
8286: DBMS_SQL.column_value(l_funds_util_csr, 2, l_lu_utilization_id);
8287: DBMS_SQL.column_value(l_funds_util_csr, 3, l_lu_amt);
8288: DBMS_SQL.column_value(l_funds_util_csr, 4, l_lu_scan_unit);
8289: DBMS_SQL.column_value(l_funds_util_csr, 5, l_lu_currency_code);
8290: -- DBMS_SQL.define_column(l_funds_util_csr, 5, l_utiz_amount);
8283:
8284: IF DBMS_SQL.fetch_rows(l_funds_util_csr) > 0 THEN
8285: DBMS_SQL.column_value(l_funds_util_csr, 1, l_lu_line_util_id);
8286: DBMS_SQL.column_value(l_funds_util_csr, 2, l_lu_utilization_id);
8287: DBMS_SQL.column_value(l_funds_util_csr, 3, l_lu_amt);
8288: DBMS_SQL.column_value(l_funds_util_csr, 4, l_lu_scan_unit);
8289: DBMS_SQL.column_value(l_funds_util_csr, 5, l_lu_currency_code);
8290: -- DBMS_SQL.define_column(l_funds_util_csr, 5, l_utiz_amount);
8291:
8284: IF DBMS_SQL.fetch_rows(l_funds_util_csr) > 0 THEN
8285: DBMS_SQL.column_value(l_funds_util_csr, 1, l_lu_line_util_id);
8286: DBMS_SQL.column_value(l_funds_util_csr, 2, l_lu_utilization_id);
8287: DBMS_SQL.column_value(l_funds_util_csr, 3, l_lu_amt);
8288: DBMS_SQL.column_value(l_funds_util_csr, 4, l_lu_scan_unit);
8289: DBMS_SQL.column_value(l_funds_util_csr, 5, l_lu_currency_code);
8290: -- DBMS_SQL.define_column(l_funds_util_csr, 5, l_utiz_amount);
8291:
8292: OPEN csr_utiz_amount(l_lu_line_util_id);
8285: DBMS_SQL.column_value(l_funds_util_csr, 1, l_lu_line_util_id);
8286: DBMS_SQL.column_value(l_funds_util_csr, 2, l_lu_utilization_id);
8287: DBMS_SQL.column_value(l_funds_util_csr, 3, l_lu_amt);
8288: DBMS_SQL.column_value(l_funds_util_csr, 4, l_lu_scan_unit);
8289: DBMS_SQL.column_value(l_funds_util_csr, 5, l_lu_currency_code);
8290: -- DBMS_SQL.define_column(l_funds_util_csr, 5, l_utiz_amount);
8291:
8292: OPEN csr_utiz_amount(l_lu_line_util_id);
8293: FETCH csr_utiz_amount INTO l_utiz_amount;
8286: DBMS_SQL.column_value(l_funds_util_csr, 2, l_lu_utilization_id);
8287: DBMS_SQL.column_value(l_funds_util_csr, 3, l_lu_amt);
8288: DBMS_SQL.column_value(l_funds_util_csr, 4, l_lu_scan_unit);
8289: DBMS_SQL.column_value(l_funds_util_csr, 5, l_lu_currency_code);
8290: -- DBMS_SQL.define_column(l_funds_util_csr, 5, l_utiz_amount);
8291:
8292: OPEN csr_utiz_amount(l_lu_line_util_id);
8293: FETCH csr_utiz_amount INTO l_utiz_amount;
8294: CLOSE csr_utiz_amount;
8352: EXIT;
8353: END IF;
8354: END LOOP;
8355: --CLOSE l_funds_util_csr;
8356: DBMS_SQL.close_cursor(l_funds_util_csr);
8357: END IF; -- l_del_total_amount <> 0
8358:
8359: --------------------- 1. delete -----------------------
8360: i := l_line_util_tbl.FIRST;