48: --
49: -- Notes : AutoAccounting used for both debits and credits
50: --
51: -----------------------------------------------------------------------
52: PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
53:
54: PROCEDURE Unearn_Revenue
55: ( p_api_version IN NUMBER
56: ,p_init_msg_list IN VARCHAR2
2564: arp_util.debug(' p_line_amount = ' || p_line_amount);
2565: arp_util.debug(' p_line_amount_acctd = ' || p_line_amount_acctd);
2566: END IF;
2567:
2568: FND_PROFILE.get('USER_ID',l_user_id);
2569: IF l_user_id IS NULL
2570: THEN
2571: l_user_id := 0;
2572: ELSE
3166: arp_util.debug(' p_salesrep_id = ' || p_salesrep_id);
3167: arp_util.debug(' p_revenue_amount = ' || p_revenue_amount);
3168: arp_util.debug(' p_adjustment_id = ' || p_adjustment_id);
3169: END IF;
3170: FND_PROFILE.get('USER_ID',l_user_id);
3171: IF l_user_id IS NULL
3172: THEN
3173: l_user_id := 0;
3174: ELSE
3595: arp_util.debug(' p_salesrep_id = ' || p_salesrep_id);
3596: arp_util.debug(' p_revenue_amount = ' || p_revenue_amount);
3597: arp_util.debug(' p_adjustment_id = ' || p_adjustment_id);
3598: END IF;
3599: FND_PROFILE.get('USER_ID',l_user_id);
3600: IF l_user_id IS NULL
3601: THEN
3602: l_user_id := 0;
3603: ELSE
3917: BEGIN
3918: IF PG_DEBUG in ('Y', 'C') THEN
3919: arp_util.debug('AR_Revenue_Adjustment_PVT.no_rule_debit_credit_no_sr()+');
3920: END IF;
3921: FND_PROFILE.get('USER_ID',l_user_id);
3922: IF l_user_id IS NULL
3923: THEN
3924: l_user_id := 0;
3925: ELSE
5002: BEGIN
5003: IF PG_DEBUG in ('Y', 'C') THEN
5004: arp_util.debug('AR_Revenue_Adjustment_PVT.cr_target_line_unearned()+');
5005: END IF;
5006: FND_PROFILE.get('USER_ID',l_user_id);
5007: IF l_user_id IS NULL
5008: THEN
5009: l_user_id := 0;
5010: ELSE
5192: arp_util.debug(' g_update_db_flag = ' || g_update_db_flag);
5193: arp_util.debug(' p_rounding_flag = ' || p_rounding_flag);
5194: END IF;
5195:
5196: FND_PROFILE.get('USER_ID',l_user_id);
5197: IF l_user_id IS NULL
5198: THEN
5199: l_user_id := 0;
5200: ELSE
5363: OPEN get_salesrep_line_id;
5364: FETCH get_salesrep_line_id INTO p_sales_credit_id;
5365: CLOSE get_salesrep_line_id;
5366:
5367: FND_PROFILE.get('USER_ID',l_user_id);
5368: IF l_user_id IS NULL
5369: THEN
5370: l_user_id := 0;
5371: ELSE