364: arp_standard.debug('application_type = ' || l_ra_rec.application_type);
365: arp_standard.debug('payment_schedule_id = ' || to_char(l_ra_rec.payment_schedule_id));
366: arp_standard.debug('status = ' || l_ra_rec.status);
367: arp_standard.debug('ccid = ' || to_char(l_ra_rec.code_combination_id));
368: arp_standard.debug('sob id = ' || TO_CHAR(arp_global.set_of_books_id));
369: arp_standard.debug('application_rule = ' || TO_CHAR(l_ra_rec.application_rule));
370: arp_standard.debug('confirmed_flag = ' || TO_CHAR(l_ra_rec.confirmed_flag));
371: arp_standard.debug('p_called_from = ' || TO_CHAR(p_called_from));
372: arp_app_pkg.insert_p(l_ra_rec, l_ra_id);
785: /* Bug4726219 */
786: IF NVL(FND_PROFILE.value('AR_DISABLE_REC_ACTIVITY_BALSEG_SUBSTITUTION'),
787: 'N') = 'N' AND l_type <> 'MISCCASH' THEN
788: arp_util.Substitute_Ccid(
789: p_coa_id => arp_global.chart_of_accounts_id,
790: p_original_ccid => l_trx_code_combination_id,
791: p_subs_ccid => l_crh_ccid,
792: p_actual_ccid => l_misc_cash_dist_rec.code_combination_id );
793: ELSE
802: l_misc_cash_dist_rec.amount := p_amount;
803: l_misc_cash_dist_rec.acctd_amount := p_acctd_amount;
804: l_misc_cash_dist_rec.posting_control_id := -3;
805: l_misc_cash_dist_rec.created_from := p_created_from;
806: l_misc_cash_dist_rec.set_of_books_id := arp_global.set_of_books_id;
807: OPEN c_hist;
808: FETCH c_hist INTO l_misc_cash_dist_rec.cash_receipt_history_id;
809: CLOSE c_hist;
810:
823: --
824: IF fnd_flex_keyval.validate_ccid(
825: appl_short_name => 'SQLGL',
826: key_flex_code => 'GL#',
827: structure_number => arp_global.chart_of_accounts_id,
828: combination_id => l_trx_code_combination_id ) THEN
829: -- Secondly, check is the key flex is enabled.
830: -- Fix 1341201, Added rollback
831: IF not fnd_flex_keyval.enabled_flag THEN
1570: * l_min_unit
1571: ) amount,
1572: decode
1573: (
1574: arp_global.base_min_acc_unit, null,
1575: round((p_amount * percent_distribution/100) * nvl(p_exchange_rate,1),
1576: arp_global.base_precision),
1577: round(p_amount * (percent_distribution/100) * nvl(p_exchange_rate,1)
1578: / arp_global.base_precision) * arp_global.base_precision
1572: decode
1573: (
1574: arp_global.base_min_acc_unit, null,
1575: round((p_amount * percent_distribution/100) * nvl(p_exchange_rate,1),
1576: arp_global.base_precision),
1577: round(p_amount * (percent_distribution/100) * nvl(p_exchange_rate,1)
1578: / arp_global.base_precision) * arp_global.base_precision
1579: ) acctd_amount
1580: FROM
1574: arp_global.base_min_acc_unit, null,
1575: round((p_amount * percent_distribution/100) * nvl(p_exchange_rate,1),
1576: arp_global.base_precision),
1577: round(p_amount * (percent_distribution/100) * nvl(p_exchange_rate,1)
1578: / arp_global.base_precision) * arp_global.base_precision
1579: ) acctd_amount
1580: FROM
1581: ar_distribution_set_lines
1582: WHERE
1617: --
1618: IF fnd_flex_keyval.validate_ccid(
1619: appl_short_name => 'SQLGL',
1620: key_flex_code => 'GL#',
1621: structure_number => arp_global.chart_of_accounts_id,
1622: combination_id => dist.dist_code_combination_id) THEN
1623: -- Secondly, check is the key flex is enabled.
1624: --
1625: IF not fnd_flex_keyval.enabled_flag THEN
1660: cash_receipt_history_id)
1661: VALUES
1662: (
1663: l_misc_cash_dist_id,
1664: arp_global.user_id,
1665: arp_global.last_update_date,
1666: arp_global.created_by,
1667: arp_global.creation_date,
1668: p_cash_receipt_id,
1661: VALUES
1662: (
1663: l_misc_cash_dist_id,
1664: arp_global.user_id,
1665: arp_global.last_update_date,
1666: arp_global.created_by,
1667: arp_global.creation_date,
1668: p_cash_receipt_id,
1669: trunc(p_gl_date),
1662: (
1663: l_misc_cash_dist_id,
1664: arp_global.user_id,
1665: arp_global.last_update_date,
1666: arp_global.created_by,
1667: arp_global.creation_date,
1668: p_cash_receipt_id,
1669: trunc(p_gl_date),
1670: p_receipt_date,
1663: l_misc_cash_dist_id,
1664: arp_global.user_id,
1665: arp_global.last_update_date,
1666: arp_global.created_by,
1667: arp_global.creation_date,
1668: p_cash_receipt_id,
1669: trunc(p_gl_date),
1670: p_receipt_date,
1671: dist.dist_code_combination_id,
1670: p_receipt_date,
1671: dist.dist_code_combination_id,
1672: dist.percent,
1673: dist.amount,
1674: arp_global.set_of_books_id,
1675: dist.acctd_amount,
1676: -3,
1677: 'ARRERCT',
1678: p_ussgl_trx_code, arp_standard.sysparm.org_id,
1719: NVL(SUM
1720: (
1721: decode
1722: (
1723: arp_global.base_min_acc_unit, null,
1724: round((p_amount * percent_distribution/100)
1725: * nvl(p_exchange_rate,1),
1726: arp_global.base_precision),
1727: round(p_amount * (percent_distribution/100)
1722: (
1723: arp_global.base_min_acc_unit, null,
1724: round((p_amount * percent_distribution/100)
1725: * nvl(p_exchange_rate,1),
1726: arp_global.base_precision),
1727: round(p_amount * (percent_distribution/100)
1728: * nvl(p_exchange_rate ,1) /
1729: arp_global.base_precision)
1730: * arp_global.base_precision
1725: * nvl(p_exchange_rate,1),
1726: arp_global.base_precision),
1727: round(p_amount * (percent_distribution/100)
1728: * nvl(p_exchange_rate ,1) /
1729: arp_global.base_precision)
1730: * arp_global.base_precision
1731: )
1732: ),0)
1733:
1726: arp_global.base_precision),
1727: round(p_amount * (percent_distribution/100)
1728: * nvl(p_exchange_rate ,1) /
1729: arp_global.base_precision)
1730: * arp_global.base_precision
1731: )
1732: ),0)
1733:
1734: INTO l_rounding_diff,
1852: * l_min_unit
1853: ),
1854: acctd_amount = decode
1855: (
1856: arp_global.base_min_acc_unit, null,
1857: round((p_amount * percent/100) * nvl(p_exchange_rate,1),
1858: arp_global.base_precision),
1859: round(p_amount * (percent/100) * nvl(p_exchange_rate,1)
1860: / arp_global.base_precision) * arp_global.base_precision
1854: acctd_amount = decode
1855: (
1856: arp_global.base_min_acc_unit, null,
1857: round((p_amount * percent/100) * nvl(p_exchange_rate,1),
1858: arp_global.base_precision),
1859: round(p_amount * (percent/100) * nvl(p_exchange_rate,1)
1860: / arp_global.base_precision) * arp_global.base_precision
1861: ),
1862: last_updated_by = arp_global.user_id,
1856: arp_global.base_min_acc_unit, null,
1857: round((p_amount * percent/100) * nvl(p_exchange_rate,1),
1858: arp_global.base_precision),
1859: round(p_amount * (percent/100) * nvl(p_exchange_rate,1)
1860: / arp_global.base_precision) * arp_global.base_precision
1861: ),
1862: last_updated_by = arp_global.user_id,
1863: last_update_date = arp_global.last_update_date
1864: WHERE cash_receipt_id = p_cash_receipt_id
1858: arp_global.base_precision),
1859: round(p_amount * (percent/100) * nvl(p_exchange_rate,1)
1860: / arp_global.base_precision) * arp_global.base_precision
1861: ),
1862: last_updated_by = arp_global.user_id,
1863: last_update_date = arp_global.last_update_date
1864: WHERE cash_receipt_id = p_cash_receipt_id
1865: RETURNING misc_cash_distribution_id
1866: BULK COLLECT INTO l_misc_cash_key_value_list;
1859: round(p_amount * (percent/100) * nvl(p_exchange_rate,1)
1860: / arp_global.base_precision) * arp_global.base_precision
1861: ),
1862: last_updated_by = arp_global.user_id,
1863: last_update_date = arp_global.last_update_date
1864: WHERE cash_receipt_id = p_cash_receipt_id
1865: RETURNING misc_cash_distribution_id
1866: BULK COLLECT INTO l_misc_cash_key_value_list;
1867:
1895: NVL(SUM
1896: (
1897: decode
1898: (
1899: arp_global.base_min_acc_unit, null,
1900: round((p_amount * percent/100)
1901: * nvl(p_exchange_rate,1),
1902: arp_global.base_precision),
1903: round(p_amount * (percent/100)
1898: (
1899: arp_global.base_min_acc_unit, null,
1900: round((p_amount * percent/100)
1901: * nvl(p_exchange_rate,1),
1902: arp_global.base_precision),
1903: round(p_amount * (percent/100)
1904: * nvl(p_exchange_rate ,1) /
1905: arp_global.base_precision)
1906: * arp_global.base_precision
1901: * nvl(p_exchange_rate,1),
1902: arp_global.base_precision),
1903: round(p_amount * (percent/100)
1904: * nvl(p_exchange_rate ,1) /
1905: arp_global.base_precision)
1906: * arp_global.base_precision
1907: )
1908: ),0)
1909:
1902: arp_global.base_precision),
1903: round(p_amount * (percent/100)
1904: * nvl(p_exchange_rate ,1) /
1905: arp_global.base_precision)
1906: * arp_global.base_precision
1907: )
1908: ),0)
1909:
1910: INTO l_rounding_diff,