[Home] [Help]
8: G_PKG_NAME CONSTANT VARCHAR2(30) := 'ARP_ETAX_SERVICES_PKG';
9:
10: -- for Manual tax lines, store the line information that the user overrides:
11: pg_extended_amount_changed BOOLEAN := FALSE;
12: pg_new_line_rec ra_customer_trx_lines%rowtype;
13: pg_tax_amount_changed BOOLEAN := FALSE;
14: pg_line_changed BOOLEAN := FALSE;
15:
16: pg_use_inv_acctg VARCHAR2(1);
35: TYPE flag_type IS TABLE OF ra_cust_trx_line_gl_dist_all.account_set_flag%TYPE
36: INDEX BY BINARY_INTEGER;
37: TYPE account_id_type IS TABLE OF ra_cust_trx_line_gl_dist_all.code_combination_id%TYPE
38: INDEX BY BINARY_INTEGER;
39: TYPE tax_rate_type IS TABLE OF ra_customer_trx_lines_all.vat_tax_id%TYPE
40: INDEX BY BINARY_INTEGER;
41: TYPE collected_tax_ccid_type IS TABLE OF ra_cust_trx_line_gl_dist_all.collected_tax_ccid%TYPE
42: INDEX BY BINARY_INTEGER;
43: TYPE attr_cat_type IS TABLE OF ra_cust_trx_line_gl_dist_all.attribute_category%type
259: rec_ctlgd.event_id
260: FROM
261: fnd_currencies foreign_fc,
262: ra_customer_trx ct,
263: ra_customer_trx_lines ctl,
264: ra_cust_trx_line_gl_dist ctlgd,
265: ra_cust_trx_line_gl_dist rec_ctlgd, /* cm rec dist */
266: ra_customer_trx prev_ct,
267: ra_customer_trx_lines prev_ctl,
263: ra_customer_trx_lines ctl,
264: ra_cust_trx_line_gl_dist ctlgd,
265: ra_cust_trx_line_gl_dist rec_ctlgd, /* cm rec dist */
266: ra_customer_trx prev_ct,
267: ra_customer_trx_lines prev_ctl,
268: ra_cust_trx_line_gl_dist prev_ctlgd
269: WHERE
270: ct.customer_trx_id = p_customer_trx_id
271: AND ct.customer_trx_id = ctl.customer_trx_id
333: tgl.attribute13,
334: tgl.attribute14,
335: tgl.attribute15,
336: tgl.comments
337: FROM ra_customer_trx_lines tl,
338: ra_cust_trx_line_gl_dist tgl,
339: zx_lines zx
340: WHERE tl.customer_trx_id = p_customer_trx_id
341: AND tl.line_type = 'TAX'
464: AND account_class = 'TAX'
465: AND cust_trx_line_gl_dist_id IN
466: (SELECT tgl.cust_trx_line_gl_dist_id
467: FROM ra_cust_trx_line_gl_dist tgl,
468: ra_customer_trx_lines tl,
469: zx_lines zx
470: WHERE tl.customer_trx_id = t_customer_trx_id(i)
471: AND tl.link_to_cust_trx_line_id =
472: t_customer_trx_line_id(i)
598:
599: arp_util.debug('return status service = ' || l_return_status_service);
600:
601: IF (l_return_status_service = 'S') THEN
602: -- insert Tax records into ra_customer_trx_lines based upon
603: -- customer trx line id
604: arp_util.debug('calling build_ar_tax_lines ...');
605: arp_util.debug('customer trx id = ' || p_customer_trx_id);
606:
658: p_line_level_action IN VARCHAR2,
659: p_tax_amount IN NUMBER DEFAULT NULL,
660: p_called_from IN VARCHAR2 DEFAULT NULL) IS
661:
662: l_line_ship_to_cust_id RA_CUSTOMER_TRX_LINES.ship_to_customer_id%TYPE;
663: l_line_ship_to_su_id RA_CUSTOMER_TRX_LINES.ship_to_site_use_id%TYPE;
664: l_hdr_ship_to_cust_id RA_CUSTOMER_TRX.ship_to_customer_id%TYPE;
665: l_hdr_ship_to_su_id RA_CUSTOMER_TRX.ship_to_site_use_id%TYPE;
666: l_cust_id RA_CUSTOMER_TRX.ship_to_customer_id%TYPE;
659: p_tax_amount IN NUMBER DEFAULT NULL,
660: p_called_from IN VARCHAR2 DEFAULT NULL) IS
661:
662: l_line_ship_to_cust_id RA_CUSTOMER_TRX_LINES.ship_to_customer_id%TYPE;
663: l_line_ship_to_su_id RA_CUSTOMER_TRX_LINES.ship_to_site_use_id%TYPE;
664: l_hdr_ship_to_cust_id RA_CUSTOMER_TRX.ship_to_customer_id%TYPE;
665: l_hdr_ship_to_su_id RA_CUSTOMER_TRX.ship_to_site_use_id%TYPE;
666: l_cust_id RA_CUSTOMER_TRX.ship_to_customer_id%TYPE;
667: l_site_use_id RA_CUSTOMER_TRX.ship_to_site_use_id%TYPE;
664: l_hdr_ship_to_cust_id RA_CUSTOMER_TRX.ship_to_customer_id%TYPE;
665: l_hdr_ship_to_su_id RA_CUSTOMER_TRX.ship_to_site_use_id%TYPE;
666: l_cust_id RA_CUSTOMER_TRX.ship_to_customer_id%TYPE;
667: l_site_use_id RA_CUSTOMER_TRX.ship_to_site_use_id%TYPE;
668: l_memo_line_id RA_CUSTOMER_TRX_LINES.memo_line_id%TYPE; --bug6770861
669:
670: --Variables defined for Bug6126010.
671: p_salesrep_id NUMBER;
672: p_ccid NUMBER;
999: ZX_GLOBAL_STRUCTURES_PKG.TRX_LINE_DIST_TBL.TRX_LINE_DESCRIPTION(1),
1000: l_allow_overapp
1001: FROM
1002: RA_CUSTOMER_TRX TRX,
1003: RA_CUSTOMER_TRX_LINES LINES,
1004: RA_CUST_TRX_LINE_GL_DIST REC,
1005: FND_CURRENCIES CURR,
1006: FND_DOCUMENT_SEQUENCES SEQ,
1007: AR_SYSTEM_PARAMETERS AR,
1014: HZ_PARTY_SITES BILL_PS,
1015: HZ_LOCATIONS BILL_LOC,
1016: RA_CUSTOMER_TRX INV,
1017: RA_CUST_TRX_TYPES INV_TT,
1018: RA_CUSTOMER_TRX_LINES INV_L,
1019: HR_ALL_ORGANIZATION_UNITS HR,
1020: HR_ORGANIZATION_UNITS HRL,
1021: RA_CUSTOMER_TRX REL_T,
1022: RA_CUST_TRX_TYPES REL_TT,
1060:
1061: SELECT ctl.inventory_item_id, ctl.memo_line_id,
1062: ctx.cust_trx_type_id, ctx.primary_salesrep_id
1063: INTO p_inv_item_id, p_memo_line_id, p_trx_type_id, p_salesrep_id
1064: FROM ra_customer_trx_lines ctl, ra_customer_trx ctx
1065: WHERE ctl.customer_trx_id = p_customer_trx_id
1066: AND ctl.customer_trx_line_id = p_customer_trx_line_id
1067: AND ctl.customer_trx_id=ctx.customer_trx_id;
1068:
1276: INTO l_inv_line_remaining,
1277: l_inv_tax_remaining,
1278: l_cm_line_total
1279: FROM ra_customer_trx cm,
1280: ra_customer_trx_lines cml,
1281: ar_payment_schedules invp
1282: WHERE cm.customer_trx_id = p_customer_trx_id
1283: AND cm.customer_trx_id = cml.customer_trx_id
1284: AND cml.line_type = 'LINE'
1349: INTO l_inv_line_remaining,
1350: l_inv_tax_remaining,
1351: l_cm_line_total
1352: FROM ra_customer_trx cm,
1353: ra_customer_trx_lines cml,
1354: ar_payment_schedules invp
1355: WHERE cm.customer_trx_id = p_customer_trx_id
1356: AND cm.customer_trx_id = cml.customer_trx_id
1357: AND cml.line_type = 'LINE'
1425: |
1426: *===========================================================================*/
1427: PROCEDURE set_line_flags(
1428: p_customer_trx_line_id IN NUMBER,
1429: p_line_rec IN ra_customer_trx_lines%rowtype,
1430: p_inventory_item_changed OUT NOCOPY boolean,
1431: p_memo_line_changed OUT NOCOPY boolean,
1432: p_quantity_changed OUT NOCOPY boolean,
1433: p_extended_amount_changed OUT NOCOPY boolean,
1437: p_tax_code_changed OUT NOCOPY boolean,
1438: p_warehouse_flag_changed OUT NOCOPY boolean,
1439: p_ship_to_changed OUT NOCOPY boolean ) IS
1440:
1441: l_old_line_rec ra_customer_trx_lines%rowtype;
1442:
1443: l_inventory_item_changed BOOLEAN;
1444: l_memo_line_changed BOOLEAN;
1445: l_quantity_changed BOOLEAN;
1643: PROCEDURE delete_tax_f_ctl_id( p_customer_trx_line_id IN Number ) IS
1644:
1645: cursor s_tax_lines_for_inv_line( p_customer_trx_line_id in number ) IS
1646: SELECT lines.customer_trx_line_id
1647: FROM ra_customer_trx_lines lines
1648: WHERE link_to_cust_trx_line_id = p_customer_trx_line_id
1649: AND line_type = 'TAX';
1650:
1651: BEGIN
1711: *===========================================================================*/
1712:
1713: PROCEDURE before_update_line(
1714: p_customer_trx_line_id IN Number,
1715: p_line_rec IN ra_customer_trx_lines%rowtype,
1716: p_recalc_tax OUT NOCOPY BOOLEAN ) IS
1717:
1718: l_inventory_item_changed BOOLEAN;
1719: l_memo_line_changed BOOLEAN;
1875: | PROCEDURE Before_Delete_Line
1876: |
1877: | DESCRIPTION
1878: | Called from Invoice Line Entity handler. This procedure will delete
1879: | the tax lines from ra_Customer_Trx_lines and its associated accounting
1880: | and call the etax api's to mark the records for deletion in the ZX tables
1881: |
1882: | PARAMETERS:
1883: | IN : p_customer_trx_line_id
1894: BEGIN
1895:
1896: arp_util.debug('ARP_ETAX_SERVICES_PKG.before_delete_line()+');
1897:
1898: -- delete tax line from ra_customer_Trx_lines and associated accting.
1899:
1900: arp_etax_services_pkg.delete_tax_f_ctl_id(
1901: p_customer_trx_line_id => p_customer_trx_line_id);
1902:
2545: determine if the user is nulling the ship to
2546: out, or it is not changed */
2547: SELECT count(*)
2548: INTO l_llst_exists
2549: FROM ra_customer_trx_lines
2550: WHERE customer_trx_id = p_customer_trx_id
2551: AND line_type = 'LINE'
2552: AND ship_to_customer_id IS NOT NULL
2553: AND ship_to_site_use_id IS NOT NULL;
2737:
2738: arp_util.debug('return status service = ' || x_return_status);
2739:
2740: IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2741: -- insert Tax records into ra_customer_trx_lines based upon
2742: -- customer trx id
2743: arp_util.debug('calling build_ar_tax_lines ...');
2744:
2745: arp_etax_util.build_ar_tax_lines(
2886: |
2887: | DESCRIPTION
2888: | This function will be called at commit time before the table handers
2889: | to determine if data exists for this transaction before current
2890: | actions. IF there is no data in the ra_customer_Trx_lines table
2891: | then by default the tax action is 'CREATE' else it is 'UPDATE'
2892: |
2893: | PARAMETERS
2894: |
2907: arp_util.debug('ARP_ETAX_SERVICES_PKG.Get_Tax_Action(+)');
2908:
2909: select count(customer_trx_id)
2910: INTO l_count
2911: FROM ra_customer_trx_lines
2912: where customer_Trx_id = p_customer_trx_id and
2913: line_type = 'LINE';
2914:
2915: IF (l_count = 0 ) then
3018: x_msg_data => x_msg_data);
3019:
3020: -- update AR with return from tax
3021: IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3022: -- insert Tax records into ra_customer_trx_lines based upon
3023: -- customer trx id
3024: arp_util.debug('calling build_ar_tax_lines ...');
3025:
3026: arp_etax_util.build_ar_tax_lines(
3246: l_ttype, -- 7668830
3247: l_line_count
3248: from ra_customer_trx t,
3249: ra_cust_trx_types tt,
3250: ra_customer_trx_lines ctl
3251: where t.customer_trx_id = p_customer_trx_id
3252: and t.cust_trx_type_id = tt.cust_trx_type_id
3253: and t.org_id = tt.org_id
3254: and t.customer_trx_id = ctl.customer_trx_id