98: --
99: ----------------------------------------------------------------
100: --increment table
101: ----------------------------------------------------------------
102: l_index := fnd_number.canonical_to_number(pay_us_1099R_udfs.get_1099R_state_code(p_state));
103: pay_us_1099R_udfs.gt_combined_filer_state_payees(l_index) :=
104: pay_us_1099R_udfs.gt_combined_filer_state_payees(l_index) + 1;
105: --
106: pay_us_1099R_udfs.gt_CFS_control_total_1(l_index) :=
212: IF l_index IS NULL THEN
213: return 0;
214: END IF;
215: IF p_type = 'amount_1' THEN
216: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_1(l_index));
217: ELSIF p_type = 'amount_2' THEN
218: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_2(l_index));
219: ELSIF p_type = 'amount_3' THEN
220: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_3(l_index));
214: END IF;
215: IF p_type = 'amount_1' THEN
216: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_1(l_index));
217: ELSIF p_type = 'amount_2' THEN
218: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_2(l_index));
219: ELSIF p_type = 'amount_3' THEN
220: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_3(l_index));
221: ELSIF p_type = 'amount_4' THEN
222: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_4(l_index));
216: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_1(l_index));
217: ELSIF p_type = 'amount_2' THEN
218: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_2(l_index));
219: ELSIF p_type = 'amount_3' THEN
220: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_3(l_index));
221: ELSIF p_type = 'amount_4' THEN
222: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_4(l_index));
223: ELSIF p_type = 'amount_5' THEN
224: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_5(l_index));
218: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_2(l_index));
219: ELSIF p_type = 'amount_3' THEN
220: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_3(l_index));
221: ELSIF p_type = 'amount_4' THEN
222: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_4(l_index));
223: ELSIF p_type = 'amount_5' THEN
224: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_5(l_index));
225: ELSIF p_type = 'amount_6' THEN
226: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_6(l_index));
220: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_3(l_index));
221: ELSIF p_type = 'amount_4' THEN
222: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_4(l_index));
223: ELSIF p_type = 'amount_5' THEN
224: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_5(l_index));
225: ELSIF p_type = 'amount_6' THEN
226: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_6(l_index));
227: ELSIF p_type = 'amount_8' THEN
228: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_8(l_index));
222: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_4(l_index));
223: ELSIF p_type = 'amount_5' THEN
224: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_5(l_index));
225: ELSIF p_type = 'amount_6' THEN
226: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_6(l_index));
227: ELSIF p_type = 'amount_8' THEN
228: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_8(l_index));
229: ELSIF p_type = 'amount_9' THEN
230: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_9(l_index));
224: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_5(l_index));
225: ELSIF p_type = 'amount_6' THEN
226: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_6(l_index));
227: ELSIF p_type = 'amount_8' THEN
228: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_8(l_index));
229: ELSIF p_type = 'amount_9' THEN
230: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_9(l_index));
231: ELSIF p_type = 'SIT' THEN
232: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_SIT_total(l_index));
226: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_6(l_index));
227: ELSIF p_type = 'amount_8' THEN
228: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_8(l_index));
229: ELSIF p_type = 'amount_9' THEN
230: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_9(l_index));
231: ELSIF p_type = 'SIT' THEN
232: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_SIT_total(l_index));
233: ELSIF p_type = 'LIT' THEN
234: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_LIT_total(l_index));
228: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_8(l_index));
229: ELSIF p_type = 'amount_9' THEN
230: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_9(l_index));
231: ELSIF p_type = 'SIT' THEN
232: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_SIT_total(l_index));
233: ELSIF p_type = 'LIT' THEN
234: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_LIT_total(l_index));
235: END IF;
236:
230: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_control_total_9(l_index));
231: ELSIF p_type = 'SIT' THEN
232: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_SIT_total(l_index));
233: ELSIF p_type = 'LIT' THEN
234: return fnd_number.number_to_canonical(pay_us_1099R_udfs.gt_CFS_LIT_total(l_index));
235: END IF;
236:
237: END get_1099R_state_total;
238: --