72: THEN
73: pg_use_inv_acctg := 'N';
74: END IF;
75:
76: arp_util.debug(' pg_use_inv_acctg = ' || pg_use_inv_acctg);
77: END IF;
78:
79: IF pg_use_inv_acctg = 'Y'
80: THEN
92: l_rows NUMBER := 0;
93: BEGIN
94: IF PG_DEBUG in ('Y','C')
95: THEN
96: arp_util.debug('arp_etax_services_pkg.copy_inv_tax_dists()+');
97: END IF;
98:
99: /* Get base precision and minimum accountable unit */
100: base_min_acc_unit := arp_trx_global.system_info.base_min_acc_unit;
263: l_rows := SQL%ROWCOUNT;
264:
265: IF PG_DEBUG in ('Y','C')
266: THEN
267: arp_util.debug(' tax dists inserted = ' || l_rows);
268: arp_util.debug('arp_etax_services_pkg.copy_inv_tax_dists()-');
269: END IF;
270: END copy_inv_tax_dists;
271:
264:
265: IF PG_DEBUG in ('Y','C')
266: THEN
267: arp_util.debug(' tax dists inserted = ' || l_rows);
268: arp_util.debug('arp_etax_services_pkg.copy_inv_tax_dists()-');
269: END IF;
270: END copy_inv_tax_dists;
271:
272: /* Records tax accounting prior to deletion in global plsql tables.
451: l_event_type_code VARCHAR2(80);
452: l_success BOOLEAN;
453: l_rows NUMBER;
454: BEGIN
455: arp_util.debug('ARP_ETAX_SERVICES_PKG.Calculate(+)');
456: /* get event class code */
457: l_success := arp_etax_util.get_event_information(
458: p_customer_trx_id => p_customer_trx_id,
459: p_action => p_action,
459: p_action => p_action,
460: p_event_class_code => l_event_class_code,
461: p_event_type_code => l_event_type_code);
462:
463: arp_util.debug('customer trx id = ' || p_customer_trx_id);
464: arp_util.debug('action = ' || p_action);
465: arp_util.debug('event class code = ' || l_event_class_code);
466: arp_util.debug('event type code = ' || l_event_type_code);
467:
460: p_event_class_code => l_event_class_code,
461: p_event_type_code => l_event_type_code);
462:
463: arp_util.debug('customer trx id = ' || p_customer_trx_id);
464: arp_util.debug('action = ' || p_action);
465: arp_util.debug('event class code = ' || l_event_class_code);
466: arp_util.debug('event type code = ' || l_event_type_code);
467:
468: IF (l_success) THEN
461: p_event_type_code => l_event_type_code);
462:
463: arp_util.debug('customer trx id = ' || p_customer_trx_id);
464: arp_util.debug('action = ' || p_action);
465: arp_util.debug('event class code = ' || l_event_class_code);
466: arp_util.debug('event type code = ' || l_event_type_code);
467:
468: IF (l_success) THEN
469: /* populate transaction rec type */
462:
463: arp_util.debug('customer trx id = ' || p_customer_trx_id);
464: arp_util.debug('action = ' || p_action);
465: arp_util.debug('event class code = ' || l_event_class_code);
466: arp_util.debug('event type code = ' || l_event_type_code);
467:
468: IF (l_success) THEN
469: /* populate transaction rec type */
470: l_transaction_rec.internal_organization_id := arp_global.sysparam.org_id;
478: ZX_GLOBAL_STRUCTURES_PKG.INIT_TRX_LINE_DIST_TBL(1); */
479:
480: /* insert data into ebt plsql tables
481:
482: arp_util.debug('calling populate_ebt_plsql_tables ');
483: populate_ebt_plsql_tables(
484: p_customer_trx_id => p_customer_trx_id,
485: p_customer_trx_line_id => p_cust_trx_line_id,
486: p_event_type_code => l_event_type_code,
491: /* 5152340 - Remove AR tax lines before calculating tax */
492: arp_etax_util.delete_Tax_lines_from_ar(p_customer_trx_id);
493:
494: /* call Tax */
495: arp_util.debug('calling ZX api to calculate tax');
496: arp_util.debug('ORG ID = ' || l_transaction_rec.internal_organization_id);
497:
498: zx_api_pub.calculate_tax(
499: p_api_version => 1.0,
492: arp_etax_util.delete_Tax_lines_from_ar(p_customer_trx_id);
493:
494: /* call Tax */
495: arp_util.debug('calling ZX api to calculate tax');
496: arp_util.debug('ORG ID = ' || l_transaction_rec.internal_organization_id);
497:
498: zx_api_pub.calculate_tax(
499: p_api_version => 1.0,
500: p_init_msg_list => FND_API.G_TRUE,
507: x_msg_count => l_msg_count,
508: x_msg_data => l_msg_data,
509: x_doc_level_recalc_flag => l_doc_level_recalc_flag );
510:
511: arp_util.debug('return status service = ' || l_return_status_service);
512:
513: IF (l_return_status_service = 'S') THEN
514: -- insert Tax records into ra_customer_trx_lines based upon
515: -- customer trx line id
512:
513: IF (l_return_status_service = 'S') THEN
514: -- insert Tax records into ra_customer_trx_lines based upon
515: -- customer trx line id
516: arp_util.debug('calling build_ar_tax_lines ...');
517: arp_util.debug('customer trx id = ' || p_customer_trx_id);
518:
519: arp_etax_util.build_ar_tax_lines(
520: p_customer_trx_id => p_customer_trx_id,
513: IF (l_return_status_service = 'S') THEN
514: -- insert Tax records into ra_customer_trx_lines based upon
515: -- customer trx line id
516: arp_util.debug('calling build_ar_tax_lines ...');
517: arp_util.debug('customer trx id = ' || p_customer_trx_id);
518:
519: arp_etax_util.build_ar_tax_lines(
520: p_customer_trx_id => p_customer_trx_id,
521: p_rows_inserted => l_rows);
520: p_customer_trx_id => p_customer_trx_id,
521: p_rows_inserted => l_rows);
522:
523: ELSE
524: arp_util.debug('Calculate returned error');
525: IF ( l_msg_count = 1 ) THEN
526: -- then there is only 1 message raised by the API, and
527: -- it has been sent out in the parameter x_msg_data.
528: l_msg_data_out := l_msg_data;
525: IF ( l_msg_count = 1 ) THEN
526: -- then there is only 1 message raised by the API, and
527: -- it has been sent out in the parameter x_msg_data.
528: l_msg_data_out := l_msg_data;
529: arp_util.debug('API failed with : ' || l_msg_data_out);
530: l_mesg := l_msg_data_out;
531:
532: ELSIF (l_msg_count > 1) THEN
533: -- the messages are on the stack and there is more then
537: FND_API.G_FALSE);
538: if (l_mesg IS NULL) THEN
539: EXIT;
540: end if;
541: arp_util.debug('API failed with : ' || l_mesg);
542: end loop;
543: END IF;
544:
545: -- raise error
589: p_memo_line_id NUMBER;
590: l_trx_date DATE;
591: BEGIN
592: IF PG_DEBUG in ('Y','C') THEN
593: arp_util.debug('populate_ebt_plsql_tables(+)');
594: END IF;
595:
596: /* Set pg_so_org_id any time it is not set or
597: any time the OU changes. This supports cases where
936: LINES.memo_line_id = ML.memo_line_id (+) and
937: LINES.org_id = ML.org_id(+);
938:
939: IF PG_DEBUG in ('Y','C') THEN
940: arp_util.debug('Changed code by Arnab');
941: END IF;
942:
943: --bug6770861, Passing product category to ZX structure.
944: -- 6874006 - merged memo line/product category into main insert
944: -- 6874006 - merged memo line/product category into main insert
945: --Bug6126010 begin, removed the existing query to find revenue CCID and added new query to retrieve CCID for REV account and passing it for tax calculation.
946:
947: IF PG_DEBUG in ('Y','C') THEN
948: arp_util.debug('Fetching values of primary_salesrep_id, memo_line_id, inventory_item_id and cust_trx_type_id to use it for calculating CCID of REV account.');
949: END IF;
950:
951: SELECT ctl.inventory_item_id, ctl.memo_line_id,
952: ctx.cust_trx_type_id, ctx.primary_salesrep_id
956: AND ctl.customer_trx_line_id = p_customer_trx_line_id
957: AND ctl.customer_trx_id=ctx.customer_trx_id;
958:
959: IF PG_DEBUG in ('Y','C') THEN
960: arp_util.debug('Calling ARP_Auto_Accounting');
961: arp_util.debug('customer_trx_id : '||p_customer_trx_id);
962: arp_util.debug('customer_trx__line_id : '||p_customer_trx_line_id);
963: arp_util.debug('trx_type_id : '||p_trx_type_id);
964: arp_util.debug('primary_salesrep_id : '||p_salesrep_id);
957: AND ctl.customer_trx_id=ctx.customer_trx_id;
958:
959: IF PG_DEBUG in ('Y','C') THEN
960: arp_util.debug('Calling ARP_Auto_Accounting');
961: arp_util.debug('customer_trx_id : '||p_customer_trx_id);
962: arp_util.debug('customer_trx__line_id : '||p_customer_trx_line_id);
963: arp_util.debug('trx_type_id : '||p_trx_type_id);
964: arp_util.debug('primary_salesrep_id : '||p_salesrep_id);
965: arp_util.debug('inventory_item_id : '||p_inv_item_id);
958:
959: IF PG_DEBUG in ('Y','C') THEN
960: arp_util.debug('Calling ARP_Auto_Accounting');
961: arp_util.debug('customer_trx_id : '||p_customer_trx_id);
962: arp_util.debug('customer_trx__line_id : '||p_customer_trx_line_id);
963: arp_util.debug('trx_type_id : '||p_trx_type_id);
964: arp_util.debug('primary_salesrep_id : '||p_salesrep_id);
965: arp_util.debug('inventory_item_id : '||p_inv_item_id);
966: arp_util.debug('Memo_line_id : '||p_memo_line_id);
959: IF PG_DEBUG in ('Y','C') THEN
960: arp_util.debug('Calling ARP_Auto_Accounting');
961: arp_util.debug('customer_trx_id : '||p_customer_trx_id);
962: arp_util.debug('customer_trx__line_id : '||p_customer_trx_line_id);
963: arp_util.debug('trx_type_id : '||p_trx_type_id);
964: arp_util.debug('primary_salesrep_id : '||p_salesrep_id);
965: arp_util.debug('inventory_item_id : '||p_inv_item_id);
966: arp_util.debug('Memo_line_id : '||p_memo_line_id);
967: END IF;
960: arp_util.debug('Calling ARP_Auto_Accounting');
961: arp_util.debug('customer_trx_id : '||p_customer_trx_id);
962: arp_util.debug('customer_trx__line_id : '||p_customer_trx_line_id);
963: arp_util.debug('trx_type_id : '||p_trx_type_id);
964: arp_util.debug('primary_salesrep_id : '||p_salesrep_id);
965: arp_util.debug('inventory_item_id : '||p_inv_item_id);
966: arp_util.debug('Memo_line_id : '||p_memo_line_id);
967: END IF;
968:
961: arp_util.debug('customer_trx_id : '||p_customer_trx_id);
962: arp_util.debug('customer_trx__line_id : '||p_customer_trx_line_id);
963: arp_util.debug('trx_type_id : '||p_trx_type_id);
964: arp_util.debug('primary_salesrep_id : '||p_salesrep_id);
965: arp_util.debug('inventory_item_id : '||p_inv_item_id);
966: arp_util.debug('Memo_line_id : '||p_memo_line_id);
967: END IF;
968:
969: IF (ARP_Auto_Accounting.do_autoaccounting(
962: arp_util.debug('customer_trx__line_id : '||p_customer_trx_line_id);
963: arp_util.debug('trx_type_id : '||p_trx_type_id);
964: arp_util.debug('primary_salesrep_id : '||p_salesrep_id);
965: arp_util.debug('inventory_item_id : '||p_inv_item_id);
966: arp_util.debug('Memo_line_id : '||p_memo_line_id);
967: END IF;
968:
969: IF (ARP_Auto_Accounting.do_autoaccounting(
970: p_mode => 'G',
991: THEN
992: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ACCOUNT_CCID(1):= p_ccid;
993:
994: IF PG_DEBUG in ('Y','C') THEN
995: arp_util.debug('REV CCID passed for tax calculation :'|| p_ccid);
996: END IF;
997: ELSE
998: IF PG_DEBUG in ('Y','C') THEN
999: arp_util.debug('EXCEPTION: ARP_Auto_Accounting returned 0'||
995: arp_util.debug('REV CCID passed for tax calculation :'|| p_ccid);
996: END IF;
997: ELSE
998: IF PG_DEBUG in ('Y','C') THEN
999: arp_util.debug('EXCEPTION: ARP_Auto_Accounting returned 0'||
1000: ' and no ccid is being passed for Tax Calculation.');
1001: END IF;
1002: END IF;
1003: --Bug6126010 End.
1012: THEN
1013: pg_salesrep_id := p_salesrep_id;
1014:
1015: IF PG_DEBUG in ('Y','C') THEN
1016: arp_util.debug('Fetching poo values for salesrep');
1017: arp_util.debug(' salesrep_id = ' || pg_salesrep_id);
1018: arp_util.debug(' org_id = ' || pg_org_id);
1019: END IF;
1020:
1013: pg_salesrep_id := p_salesrep_id;
1014:
1015: IF PG_DEBUG in ('Y','C') THEN
1016: arp_util.debug('Fetching poo values for salesrep');
1017: arp_util.debug(' salesrep_id = ' || pg_salesrep_id);
1018: arp_util.debug(' org_id = ' || pg_org_id);
1019: END IF;
1020:
1021: BEGIN
1014:
1015: IF PG_DEBUG in ('Y','C') THEN
1016: arp_util.debug('Fetching poo values for salesrep');
1017: arp_util.debug(' salesrep_id = ' || pg_salesrep_id);
1018: arp_util.debug(' org_id = ' || pg_org_id);
1019: END IF;
1020:
1021: BEGIN
1022: select SR_PER.organization_id, -- poo_party_id
1045: pg_poo_location_id := NULL;
1046: END IF;
1047:
1048: IF PG_DEBUG in ('Y','C') THEN
1049: arp_util.debug('poo_party_id := ' || pg_poo_party_id);
1050: arp_util.debug('poo_location_id = ' || pg_poo_location_id);
1051: END IF;
1052:
1053: /* Now copy POO values from cache or POA */
1046: END IF;
1047:
1048: IF PG_DEBUG in ('Y','C') THEN
1049: arp_util.debug('poo_party_id := ' || pg_poo_party_id);
1050: arp_util.debug('poo_location_id = ' || pg_poo_location_id);
1051: END IF;
1052:
1053: /* Now copy POO values from cache or POA */
1054: IF pg_poo_party_id IS NOT NULL
1159: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.CTRL_TOTAL_LINE_TX_AMT(1) := p_tax_amount;
1160:
1161: IF PG_DEBUG in ('Y','C') THEN
1162: arp_etax_services_pkg.print_ebt_plsql_vars;
1163: arp_util.debug('populate_ebt_plsql_tables(-)');
1164: END IF;
1165: END populate_ebt_plsql_tables;
1166:
1167: /*=============================================================================
1217: l_warehouse_flag_changed BOOLEAN;
1218: l_ship_to_changed BOOLEAN;
1219:
1220: BEGIN
1221: arp_util.debug('ARP_ETAX_SERVICES_PKG.set_line_flags()+');
1222: arp_util.debug('p_cust_trx_line_id = ' || to_char(p_customer_trx_line_id));
1223:
1224: /*-----------------------------------------+
1225: | Fetch the old record from the database |
1218: l_ship_to_changed BOOLEAN;
1219:
1220: BEGIN
1221: arp_util.debug('ARP_ETAX_SERVICES_PKG.set_line_flags()+');
1222: arp_util.debug('p_cust_trx_line_id = ' || to_char(p_customer_trx_line_id));
1223:
1224: /*-----------------------------------------+
1225: | Fetch the old record from the database |
1226: +-----------------------------------------*/
1345:
1346: -- do we need to check for GDF changes???
1347:
1348: -- IF PG_DEBUG = 'Y' THEN
1349: arp_util_tax.debug('p_inventory_item_changed : '||
1350: arp_trx_util.boolean_to_varchar2(l_inventory_item_changed));
1351: arp_util_tax.debug('p_memo_line_changed : '||
1352: arp_trx_util.boolean_to_varchar2(l_memo_line_changed));
1353: arp_util_tax.debug('p_quantity_changed : '||
1347:
1348: -- IF PG_DEBUG = 'Y' THEN
1349: arp_util_tax.debug('p_inventory_item_changed : '||
1350: arp_trx_util.boolean_to_varchar2(l_inventory_item_changed));
1351: arp_util_tax.debug('p_memo_line_changed : '||
1352: arp_trx_util.boolean_to_varchar2(l_memo_line_changed));
1353: arp_util_tax.debug('p_quantity_changed : '||
1354: arp_trx_util.boolean_to_varchar2(l_quantity_changed));
1355: arp_util_tax.debug('p_extended_amount_changed : ' ||
1349: arp_util_tax.debug('p_inventory_item_changed : '||
1350: arp_trx_util.boolean_to_varchar2(l_inventory_item_changed));
1351: arp_util_tax.debug('p_memo_line_changed : '||
1352: arp_trx_util.boolean_to_varchar2(l_memo_line_changed));
1353: arp_util_tax.debug('p_quantity_changed : '||
1354: arp_trx_util.boolean_to_varchar2(l_quantity_changed));
1355: arp_util_tax.debug('p_extended_amount_changed : ' ||
1356: arp_trx_util.boolean_to_varchar2(l_extended_amount_changed )); arp_util_tax.debug('p_tax_exempt_flag_changed : ' ||
1357: arp_trx_util.boolean_to_varchar2(l_tax_exempt_flag_changed )); arp_util_tax.debug('p_tax_exempt_reason_changed : ' ||
1351: arp_util_tax.debug('p_memo_line_changed : '||
1352: arp_trx_util.boolean_to_varchar2(l_memo_line_changed));
1353: arp_util_tax.debug('p_quantity_changed : '||
1354: arp_trx_util.boolean_to_varchar2(l_quantity_changed));
1355: arp_util_tax.debug('p_extended_amount_changed : ' ||
1356: arp_trx_util.boolean_to_varchar2(l_extended_amount_changed )); arp_util_tax.debug('p_tax_exempt_flag_changed : ' ||
1357: arp_trx_util.boolean_to_varchar2(l_tax_exempt_flag_changed )); arp_util_tax.debug('p_tax_exempt_reason_changed : ' ||
1358: arp_trx_util.boolean_to_varchar2(l_tax_exempt_reason_changed ));
1359: arp_util_tax.debug('p_tax_exempt_cert_changed : ' ||
1352: arp_trx_util.boolean_to_varchar2(l_memo_line_changed));
1353: arp_util_tax.debug('p_quantity_changed : '||
1354: arp_trx_util.boolean_to_varchar2(l_quantity_changed));
1355: arp_util_tax.debug('p_extended_amount_changed : ' ||
1356: arp_trx_util.boolean_to_varchar2(l_extended_amount_changed )); arp_util_tax.debug('p_tax_exempt_flag_changed : ' ||
1357: arp_trx_util.boolean_to_varchar2(l_tax_exempt_flag_changed )); arp_util_tax.debug('p_tax_exempt_reason_changed : ' ||
1358: arp_trx_util.boolean_to_varchar2(l_tax_exempt_reason_changed ));
1359: arp_util_tax.debug('p_tax_exempt_cert_changed : ' ||
1360: arp_trx_util.boolean_to_varchar2(l_tax_exempt_cert_changed )); arp_util_tax.debug('p_tax_code_changed : '||
1353: arp_util_tax.debug('p_quantity_changed : '||
1354: arp_trx_util.boolean_to_varchar2(l_quantity_changed));
1355: arp_util_tax.debug('p_extended_amount_changed : ' ||
1356: arp_trx_util.boolean_to_varchar2(l_extended_amount_changed )); arp_util_tax.debug('p_tax_exempt_flag_changed : ' ||
1357: arp_trx_util.boolean_to_varchar2(l_tax_exempt_flag_changed )); arp_util_tax.debug('p_tax_exempt_reason_changed : ' ||
1358: arp_trx_util.boolean_to_varchar2(l_tax_exempt_reason_changed ));
1359: arp_util_tax.debug('p_tax_exempt_cert_changed : ' ||
1360: arp_trx_util.boolean_to_varchar2(l_tax_exempt_cert_changed )); arp_util_tax.debug('p_tax_code_changed : '||
1361: arp_trx_util.boolean_to_varchar2(l_tax_code_changed));
1355: arp_util_tax.debug('p_extended_amount_changed : ' ||
1356: arp_trx_util.boolean_to_varchar2(l_extended_amount_changed )); arp_util_tax.debug('p_tax_exempt_flag_changed : ' ||
1357: arp_trx_util.boolean_to_varchar2(l_tax_exempt_flag_changed )); arp_util_tax.debug('p_tax_exempt_reason_changed : ' ||
1358: arp_trx_util.boolean_to_varchar2(l_tax_exempt_reason_changed ));
1359: arp_util_tax.debug('p_tax_exempt_cert_changed : ' ||
1360: arp_trx_util.boolean_to_varchar2(l_tax_exempt_cert_changed )); arp_util_tax.debug('p_tax_code_changed : '||
1361: arp_trx_util.boolean_to_varchar2(l_tax_code_changed));
1362: arp_util_tax.debug('p_warehouse_flag_changed : '||
1363: arp_trx_util.boolean_to_varchar2(l_warehouse_flag_changed));
1356: arp_trx_util.boolean_to_varchar2(l_extended_amount_changed )); arp_util_tax.debug('p_tax_exempt_flag_changed : ' ||
1357: arp_trx_util.boolean_to_varchar2(l_tax_exempt_flag_changed )); arp_util_tax.debug('p_tax_exempt_reason_changed : ' ||
1358: arp_trx_util.boolean_to_varchar2(l_tax_exempt_reason_changed ));
1359: arp_util_tax.debug('p_tax_exempt_cert_changed : ' ||
1360: arp_trx_util.boolean_to_varchar2(l_tax_exempt_cert_changed )); arp_util_tax.debug('p_tax_code_changed : '||
1361: arp_trx_util.boolean_to_varchar2(l_tax_code_changed));
1362: arp_util_tax.debug('p_warehouse_flag_changed : '||
1363: arp_trx_util.boolean_to_varchar2(l_warehouse_flag_changed));
1364: arp_util_tax.debug('p_ship_to_changed : '||
1358: arp_trx_util.boolean_to_varchar2(l_tax_exempt_reason_changed ));
1359: arp_util_tax.debug('p_tax_exempt_cert_changed : ' ||
1360: arp_trx_util.boolean_to_varchar2(l_tax_exempt_cert_changed )); arp_util_tax.debug('p_tax_code_changed : '||
1361: arp_trx_util.boolean_to_varchar2(l_tax_code_changed));
1362: arp_util_tax.debug('p_warehouse_flag_changed : '||
1363: arp_trx_util.boolean_to_varchar2(l_warehouse_flag_changed));
1364: arp_util_tax.debug('p_ship_to_changed : '||
1365: arp_trx_util.boolean_to_varchar2(l_ship_to_changed));
1366: -- END IF;
1360: arp_trx_util.boolean_to_varchar2(l_tax_exempt_cert_changed )); arp_util_tax.debug('p_tax_code_changed : '||
1361: arp_trx_util.boolean_to_varchar2(l_tax_code_changed));
1362: arp_util_tax.debug('p_warehouse_flag_changed : '||
1363: arp_trx_util.boolean_to_varchar2(l_warehouse_flag_changed));
1364: arp_util_tax.debug('p_ship_to_changed : '||
1365: arp_trx_util.boolean_to_varchar2(l_ship_to_changed));
1366: -- END IF;
1367:
1368: p_inventory_item_changed := l_inventory_item_changed;
1377: p_ship_to_changed := l_ship_to_changed;
1378:
1379: pg_extended_amount_changed := l_extended_amount_changed;
1380:
1381: arp_util.debug('ARP_ETAX_SERVICES_PKG.set_line_flags()-');
1382:
1383: END set_line_flags;
1384:
1385: /*===========================================================================+
1415: AND line_type = 'TAX';
1416:
1417: BEGIN
1418:
1419: arp_util.debug('ARP_ETAX_SERVICES_PKG.delete_tax_f_ctl_id()+');
1420:
1421: FOR tax in s_tax_lines_for_inv_line( p_customer_trx_line_id )
1422: LOOP
1423:
1420:
1421: FOR tax in s_tax_lines_for_inv_line( p_customer_trx_line_id )
1422: LOOP
1423:
1424: arp_util.debug('customer trx line id = ' || to_char(p_customer_Trx_line_id));
1425: arp_util.debug('assoc customer trx line id = ' ||
1426: to_char(tax.customer_Trx_line_id));
1427:
1428: /*********************************************************************
1421: FOR tax in s_tax_lines_for_inv_line( p_customer_trx_line_id )
1422: LOOP
1423:
1424: arp_util.debug('customer trx line id = ' || to_char(p_customer_Trx_line_id));
1425: arp_util.debug('assoc customer trx line id = ' ||
1426: to_char(tax.customer_Trx_line_id));
1427:
1428: /*********************************************************************
1429: | Delete the account assignments and account sets associated with |
1439: arp_ctl_pkg.delete_p( tax.customer_trx_line_id );
1440:
1441:
1442: END LOOP;
1443: arp_util.debug('ARP_ETAX_SERVICES_PKG.delete_tax_f_ctl_id()-');
1444:
1445: EXCEPTION
1446: WHEN OTHERS
1447: THEN
1445: EXCEPTION
1446: WHEN OTHERS
1447: THEN
1448: IF PG_DEBUG = 'Y' THEN
1449: arp_util_tax.debug( 'EXCEPTION: arp_etax_services_pkg.delete_tax_f_ctl_id()');
1450: END IF;
1451: RAISE;
1452:
1453: END delete_tax_f_ctl_id;
1493: l_ship_to_changed BOOLEAN;
1494: l_trx_id NUMBER;
1495:
1496: BEGIN
1497: arp_util.debug('ARP_ETAX_SERVICES_PKG.before_update_line()+');
1498: arp_util.debug('customer_trx_line_id = ' || to_char(p_customer_trx_line_id));
1499:
1500: arp_etax_services_pkg.set_line_flags(
1501: p_customer_trx_line_id,
1494: l_trx_id NUMBER;
1495:
1496: BEGIN
1497: arp_util.debug('ARP_ETAX_SERVICES_PKG.before_update_line()+');
1498: arp_util.debug('customer_trx_line_id = ' || to_char(p_customer_trx_line_id));
1499:
1500: arp_etax_services_pkg.set_line_flags(
1501: p_customer_trx_line_id,
1502: p_line_rec,
1528: END IF;
1529:
1530: p_recalc_tax := pg_line_changed;
1531:
1532: arp_util.debug('ARP_ETAX_SERVICES_PKG.before_update_line()-');
1533:
1534: END before_update_line;
1535:
1536: /*=============================================================================
1576: l_return_status BOOLEAN := TRUE;
1577: l_success BOOLEAN;
1578: BEGIN
1579:
1580: arp_util.debug('ARP_ETAX_SERVICES_PKG.Mark_Tax_Lines_Deleted()+');
1581:
1582: -- populate the trx header local record.
1583: BEGIN
1584: OPEN Trx_Header;
1592: p_action => 'UPDATE',
1593: p_event_class_code => l_event_class_code,
1594: p_event_type_code => l_event_type_code);
1595:
1596: arp_util.debug('customer trx id = ' || p_customer_trx_id);
1597: arp_util.debug('event class code = ' || l_event_class_code);
1598: arp_util.debug('event type code = ' || l_event_type_code);
1599:
1600: IF (l_success) THEN
1593: p_event_class_code => l_event_class_code,
1594: p_event_type_code => l_event_type_code);
1595:
1596: arp_util.debug('customer trx id = ' || p_customer_trx_id);
1597: arp_util.debug('event class code = ' || l_event_class_code);
1598: arp_util.debug('event type code = ' || l_event_type_code);
1599:
1600: IF (l_success) THEN
1601: -- populate the transaction_line_rec for use in the tax service
1594: p_event_type_code => l_event_type_code);
1595:
1596: arp_util.debug('customer trx id = ' || p_customer_trx_id);
1597: arp_util.debug('event class code = ' || l_event_class_code);
1598: arp_util.debug('event type code = ' || l_event_type_code);
1599:
1600: IF (l_success) THEN
1601: -- populate the transaction_line_rec for use in the tax service
1602: l_transaction_line_rec.internal_organization_id :=
1627: ELSE
1628: RETURN FALSE;
1629: END IF;
1630:
1631: arp_util.debug('ARP_ETAX_SERVICES_PKG.Mark_Tax_Lines_Deleted()-');
1632: RETURN l_return_status;
1633:
1634: EXCEPTION
1635: WHEN OTHERS THEN
1658: p_customer_trx_id IN Number) IS
1659: l_success BOOLEAN;
1660: BEGIN
1661:
1662: arp_util.debug('ARP_ETAX_SERVICES_PKG.before_delete_line()+');
1663:
1664: -- delete tax line from ra_customer_Trx_lines and associated accting.
1665:
1666: arp_etax_services_pkg.delete_tax_f_ctl_id(
1670: p_customer_trx_line_id => p_customer_trx_line_id,
1671: p_customer_trx_id => p_customer_trx_id);
1672:
1673: IF (not l_success) THEN
1674: arp_util.debug('unable to mark tax for deletion');
1675: END IF;
1676:
1677: arp_util.debug('ARP_ETAX_SERVICES_PKG.before_delete_line()-');
1678:
1673: IF (not l_success) THEN
1674: arp_util.debug('unable to mark tax for deletion');
1675: END IF;
1676:
1677: arp_util.debug('ARP_ETAX_SERVICES_PKG.before_delete_line()-');
1678:
1679: END Before_Delete_Line;
1680:
1681:
1681:
1682: PROCEDURE print_ebt_plsql_vars IS
1683: BEGIN
1684:
1685: arp_util.debug(' internal_organization_id i:' ||
1686: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.INTERNAL_ORGANIZATION_ID(1) );
1687:
1688: arp_util.debug('application_id: ' ||
1689: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.APPLICATION_ID(1) );
1684:
1685: arp_util.debug(' internal_organization_id i:' ||
1686: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.INTERNAL_ORGANIZATION_ID(1) );
1687:
1688: arp_util.debug('application_id: ' ||
1689: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.APPLICATION_ID(1) );
1690:
1691: arp_util.debug('entity_code : ' ||
1692: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ENTITY_CODE(1));
1687:
1688: arp_util.debug('application_id: ' ||
1689: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.APPLICATION_ID(1) );
1690:
1691: arp_util.debug('entity_code : ' ||
1692: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ENTITY_CODE(1));
1693:
1694: arp_util.debug('event_class_code : ' ||
1695: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.EVENT_CLASS_CODE(1));
1690:
1691: arp_util.debug('entity_code : ' ||
1692: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ENTITY_CODE(1));
1693:
1694: arp_util.debug('event_class_code : ' ||
1695: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.EVENT_CLASS_CODE(1));
1696:
1697: arp_util.debug('event_type_code : ' ||
1698: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.EVENT_TYPE_CODE(1) );
1693:
1694: arp_util.debug('event_class_code : ' ||
1695: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.EVENT_CLASS_CODE(1));
1696:
1697: arp_util.debug('event_type_code : ' ||
1698: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.EVENT_TYPE_CODE(1) );
1699:
1700: arp_util.debug('trx_id : ' ||
1701: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_ID(1));
1696:
1697: arp_util.debug('event_type_code : ' ||
1698: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.EVENT_TYPE_CODE(1) );
1699:
1700: arp_util.debug('trx_id : ' ||
1701: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_ID(1));
1702:
1703: arp_util.debug('trx_date : ' ||
1704: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_DATE(1));
1699:
1700: arp_util.debug('trx_id : ' ||
1701: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_ID(1));
1702:
1703: arp_util.debug('trx_date : ' ||
1704: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_DATE(1));
1705:
1706: arp_util.debug('ledger_id : ' ||
1707: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.LEDGER_ID(1));
1702:
1703: arp_util.debug('trx_date : ' ||
1704: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_DATE(1));
1705:
1706: arp_util.debug('ledger_id : ' ||
1707: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.LEDGER_ID(1));
1708:
1709: arp_util.debug('trx_currency_code : ' ||
1710: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_CURRENCY_CODE(1));
1705:
1706: arp_util.debug('ledger_id : ' ||
1707: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.LEDGER_ID(1));
1708:
1709: arp_util.debug('trx_currency_code : ' ||
1710: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_CURRENCY_CODE(1));
1711:
1712: arp_util.debug('currency_conversion_date : ' ||
1713: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.CURRENCY_CONVERSION_DATE(1));
1708:
1709: arp_util.debug('trx_currency_code : ' ||
1710: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_CURRENCY_CODE(1));
1711:
1712: arp_util.debug('currency_conversion_date : ' ||
1713: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.CURRENCY_CONVERSION_DATE(1));
1714:
1715: arp_util.debug('currency_conversion_rate : ' ||
1716: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.CURRENCY_CONVERSION_RATE(1));
1711:
1712: arp_util.debug('currency_conversion_date : ' ||
1713: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.CURRENCY_CONVERSION_DATE(1));
1714:
1715: arp_util.debug('currency_conversion_rate : ' ||
1716: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.CURRENCY_CONVERSION_RATE(1));
1717:
1718: arp_util.debug('currency_conversion_type : ' ||
1719: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.CURRENCY_CONVERSION_TYPE(1));
1714:
1715: arp_util.debug('currency_conversion_rate : ' ||
1716: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.CURRENCY_CONVERSION_RATE(1));
1717:
1718: arp_util.debug('currency_conversion_type : ' ||
1719: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.CURRENCY_CONVERSION_TYPE(1));
1720:
1721: arp_util.debug('minimum_accountable_unit : ' ||
1722: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.MINIMUM_ACCOUNTABLE_UNIT(1));
1717:
1718: arp_util.debug('currency_conversion_type : ' ||
1719: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.CURRENCY_CONVERSION_TYPE(1));
1720:
1721: arp_util.debug('minimum_accountable_unit : ' ||
1722: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.MINIMUM_ACCOUNTABLE_UNIT(1));
1723:
1724: arp_util.debug('precision : ' ||
1725: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.PRECISION(1));
1720:
1721: arp_util.debug('minimum_accountable_unit : ' ||
1722: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.MINIMUM_ACCOUNTABLE_UNIT(1));
1723:
1724: arp_util.debug('precision : ' ||
1725: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.PRECISION(1));
1726:
1727: arp_util.debug('legal_entity_id : ' ||
1728: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.LEGAL_ENTITY_ID(1));
1723:
1724: arp_util.debug('precision : ' ||
1725: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.PRECISION(1));
1726:
1727: arp_util.debug('legal_entity_id : ' ||
1728: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.LEGAL_ENTITY_ID(1));
1729:
1730: arp_util.debug('rounding_ship_to_party_id : ' ||
1731: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ROUNDING_SHIP_TO_PARTY_ID(1));
1726:
1727: arp_util.debug('legal_entity_id : ' ||
1728: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.LEGAL_ENTITY_ID(1));
1729:
1730: arp_util.debug('rounding_ship_to_party_id : ' ||
1731: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ROUNDING_SHIP_TO_PARTY_ID(1));
1732:
1733: arp_util.debug('rounding_bill_to_party_id : ' ||
1734: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ROUNDING_BILL_TO_PARTY_ID(1));
1729:
1730: arp_util.debug('rounding_ship_to_party_id : ' ||
1731: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ROUNDING_SHIP_TO_PARTY_ID(1));
1732:
1733: arp_util.debug('rounding_bill_to_party_id : ' ||
1734: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ROUNDING_BILL_TO_PARTY_ID(1));
1735:
1736: arp_util.debug('rndg_ship_to_party_site_id : ' ||
1737: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.RNDG_SHIP_TO_PARTY_SITE_ID(1));
1732:
1733: arp_util.debug('rounding_bill_to_party_id : ' ||
1734: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ROUNDING_BILL_TO_PARTY_ID(1));
1735:
1736: arp_util.debug('rndg_ship_to_party_site_id : ' ||
1737: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.RNDG_SHIP_TO_PARTY_SITE_ID(1));
1738:
1739: arp_util.debug('rndg_bill_to_party_site_id :' ||
1740: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.RNDG_BILL_TO_PARTY_SITE_ID(1));
1735:
1736: arp_util.debug('rndg_ship_to_party_site_id : ' ||
1737: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.RNDG_SHIP_TO_PARTY_SITE_ID(1));
1738:
1739: arp_util.debug('rndg_bill_to_party_site_id :' ||
1740: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.RNDG_BILL_TO_PARTY_SITE_ID(1));
1741:
1742: arp_util.debug('receivables_trx_type_id : ' ||
1743: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.RECEIVABLES_TRX_TYPE_ID(1));
1738:
1739: arp_util.debug('rndg_bill_to_party_site_id :' ||
1740: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.RNDG_BILL_TO_PARTY_SITE_ID(1));
1741:
1742: arp_util.debug('receivables_trx_type_id : ' ||
1743: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.RECEIVABLES_TRX_TYPE_ID(1));
1744:
1745: arp_util.debug('tax_reporting_flag : ' ||
1746: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TAX_REPORTING_FLAG(1));
1741:
1742: arp_util.debug('receivables_trx_type_id : ' ||
1743: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.RECEIVABLES_TRX_TYPE_ID(1));
1744:
1745: arp_util.debug('tax_reporting_flag : ' ||
1746: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TAX_REPORTING_FLAG(1));
1747:
1748: arp_util.debug('quote_flag : ' ||
1749: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.QUOTE_FLAG(1));
1744:
1745: arp_util.debug('tax_reporting_flag : ' ||
1746: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TAX_REPORTING_FLAG(1));
1747:
1748: arp_util.debug('quote_flag : ' ||
1749: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.QUOTE_FLAG(1));
1750:
1751: arp_util.debug('trx_number : ' ||
1752: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_NUMBER(1));
1747:
1748: arp_util.debug('quote_flag : ' ||
1749: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.QUOTE_FLAG(1));
1750:
1751: arp_util.debug('trx_number : ' ||
1752: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_NUMBER(1));
1753:
1754: arp_util.debug('trx_description : ' ||
1755: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_DESCRIPTION(1));
1750:
1751: arp_util.debug('trx_number : ' ||
1752: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_NUMBER(1));
1753:
1754: arp_util.debug('trx_description : ' ||
1755: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_DESCRIPTION(1));
1756:
1757: arp_util.debug('trx_communicated_date : ' ||
1758: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_COMMUNICATED_DATE(1));
1753:
1754: arp_util.debug('trx_description : ' ||
1755: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_DESCRIPTION(1));
1756:
1757: arp_util.debug('trx_communicated_date : ' ||
1758: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_COMMUNICATED_DATE(1));
1759:
1760: arp_util.debug('batch_source_id : ' ||
1761: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.BATCH_SOURCE_ID(1));
1756:
1757: arp_util.debug('trx_communicated_date : ' ||
1758: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_COMMUNICATED_DATE(1));
1759:
1760: arp_util.debug('batch_source_id : ' ||
1761: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.BATCH_SOURCE_ID(1));
1762:
1763: arp_util.debug('batch_source_name : ' ||
1764: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.BATCH_SOURCE_NAME(1));
1759:
1760: arp_util.debug('batch_source_id : ' ||
1761: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.BATCH_SOURCE_ID(1));
1762:
1763: arp_util.debug('batch_source_name : ' ||
1764: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.BATCH_SOURCE_NAME(1));
1765:
1766: arp_util.debug('doc_seq_id : ' ||
1767: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.DOC_SEQ_ID(1));
1762:
1763: arp_util.debug('batch_source_name : ' ||
1764: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.BATCH_SOURCE_NAME(1));
1765:
1766: arp_util.debug('doc_seq_id : ' ||
1767: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.DOC_SEQ_ID(1));
1768:
1769: arp_util.debug('doc_seq_name :' ||
1770: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.DOC_SEQ_NAME(1));
1765:
1766: arp_util.debug('doc_seq_id : ' ||
1767: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.DOC_SEQ_ID(1));
1768:
1769: arp_util.debug('doc_seq_name :' ||
1770: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.DOC_SEQ_NAME(1));
1771:
1772: arp_util.debug('doc_seq_value : ' ||
1773: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.DOC_SEQ_VALUE(1));
1768:
1769: arp_util.debug('doc_seq_name :' ||
1770: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.DOC_SEQ_NAME(1));
1771:
1772: arp_util.debug('doc_seq_value : ' ||
1773: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.DOC_SEQ_VALUE(1));
1774:
1775: arp_util.debug('trx_due_date : ' ||
1776: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_DUE_DATE(1));
1771:
1772: arp_util.debug('doc_seq_value : ' ||
1773: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.DOC_SEQ_VALUE(1));
1774:
1775: arp_util.debug('trx_due_date : ' ||
1776: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_DUE_DATE(1));
1777:
1778: arp_util.debug('trx_type_description : ' ||
1779: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_TYPE_DESCRIPTION(1));
1774:
1775: arp_util.debug('trx_due_date : ' ||
1776: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_DUE_DATE(1));
1777:
1778: arp_util.debug('trx_type_description : ' ||
1779: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_TYPE_DESCRIPTION(1));
1780:
1781: arp_util.debug('trx_level_type : ' ||
1782: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_LEVEL_TYPE(1));
1777:
1778: arp_util.debug('trx_type_description : ' ||
1779: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_TYPE_DESCRIPTION(1));
1780:
1781: arp_util.debug('trx_level_type : ' ||
1782: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_LEVEL_TYPE(1));
1783:
1784: arp_util.debug('trx_line_id : ' ||
1785: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_LINE_ID(1));
1780:
1781: arp_util.debug('trx_level_type : ' ||
1782: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_LEVEL_TYPE(1));
1783:
1784: arp_util.debug('trx_line_id : ' ||
1785: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_LINE_ID(1));
1786:
1787: arp_util.debug('line_class : ' ||
1788: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.LINE_CLASS(1));
1783:
1784: arp_util.debug('trx_line_id : ' ||
1785: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_LINE_ID(1));
1786:
1787: arp_util.debug('line_class : ' ||
1788: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.LINE_CLASS(1));
1789:
1790: arp_util.debug('line_level_action : ' ||
1791: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.LINE_LEVEL_ACTION(1));
1786:
1787: arp_util.debug('line_class : ' ||
1788: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.LINE_CLASS(1));
1789:
1790: arp_util.debug('line_level_action : ' ||
1791: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.LINE_LEVEL_ACTION(1));
1792:
1793: arp_util.debug('trx_shipping_date : ' ||
1794: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_SHIPPING_DATE(1));
1789:
1790: arp_util.debug('line_level_action : ' ||
1791: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.LINE_LEVEL_ACTION(1));
1792:
1793: arp_util.debug('trx_shipping_date : ' ||
1794: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_SHIPPING_DATE(1));
1795:
1796: arp_util.debug('trx_line_type : ' ||
1797: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_LINE_TYPE(1));
1792:
1793: arp_util.debug('trx_shipping_date : ' ||
1794: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_SHIPPING_DATE(1));
1795:
1796: arp_util.debug('trx_line_type : ' ||
1797: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_LINE_TYPE(1));
1798:
1799: arp_util.debug('trx_line_date : ' ||
1800: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_LINE_DATE(1));
1795:
1796: arp_util.debug('trx_line_type : ' ||
1797: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_LINE_TYPE(1));
1798:
1799: arp_util.debug('trx_line_date : ' ||
1800: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_LINE_DATE(1));
1801:
1802: arp_util.debug('line_amt_includes_tax_flag : ' ||
1803: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.LINE_AMT_INCLUDES_TAX_FLAG(1));
1798:
1799: arp_util.debug('trx_line_date : ' ||
1800: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_LINE_DATE(1));
1801:
1802: arp_util.debug('line_amt_includes_tax_flag : ' ||
1803: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.LINE_AMT_INCLUDES_TAX_FLAG(1));
1804:
1805: arp_util.debug('line_amt : ' ||
1806: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.LINE_AMT(1));
1801:
1802: arp_util.debug('line_amt_includes_tax_flag : ' ||
1803: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.LINE_AMT_INCLUDES_TAX_FLAG(1));
1804:
1805: arp_util.debug('line_amt : ' ||
1806: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.LINE_AMT(1));
1807:
1808: arp_util.debug('trx_line_quantity : ' ||
1809: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_LINE_QUANTITY(1));
1804:
1805: arp_util.debug('line_amt : ' ||
1806: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.LINE_AMT(1));
1807:
1808: arp_util.debug('trx_line_quantity : ' ||
1809: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_LINE_QUANTITY(1));
1810:
1811: arp_util.debug('unit_price : ' ||
1812: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.UNIT_PRICE(1));
1807:
1808: arp_util.debug('trx_line_quantity : ' ||
1809: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_LINE_QUANTITY(1));
1810:
1811: arp_util.debug('unit_price : ' ||
1812: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.UNIT_PRICE(1));
1813:
1814: arp_util.debug('exemption_control_flag : ' ||
1815: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.EXEMPTION_CONTROL_FLAG(1));
1810:
1811: arp_util.debug('unit_price : ' ||
1812: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.UNIT_PRICE(1));
1813:
1814: arp_util.debug('exemption_control_flag : ' ||
1815: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.EXEMPTION_CONTROL_FLAG(1));
1816:
1817: arp_util.debug('exempt_certificate_number : ' ||
1818: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.EXEMPT_CERTIFICATE_NUMBER(1));
1813:
1814: arp_util.debug('exemption_control_flag : ' ||
1815: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.EXEMPTION_CONTROL_FLAG(1));
1816:
1817: arp_util.debug('exempt_certificate_number : ' ||
1818: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.EXEMPT_CERTIFICATE_NUMBER(1));
1819:
1820: arp_util.debug('exempt_reason : ' ||
1821: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.EXEMPT_REASON_CODE(1));
1816:
1817: arp_util.debug('exempt_certificate_number : ' ||
1818: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.EXEMPT_CERTIFICATE_NUMBER(1));
1819:
1820: arp_util.debug('exempt_reason : ' ||
1821: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.EXEMPT_REASON_CODE(1));
1822:
1823: arp_util.debug('product_id : ' ||
1824: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.PRODUCT_ID(1));
1819:
1820: arp_util.debug('exempt_reason : ' ||
1821: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.EXEMPT_REASON_CODE(1));
1822:
1823: arp_util.debug('product_id : ' ||
1824: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.PRODUCT_ID(1));
1825:
1826: arp_util.debug('product_org_id : ' ||
1827: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.PRODUCT_ORG_ID(1));
1822:
1823: arp_util.debug('product_id : ' ||
1824: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.PRODUCT_ID(1));
1825:
1826: arp_util.debug('product_org_id : ' ||
1827: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.PRODUCT_ORG_ID(1));
1828:
1829: arp_util.debug('uom_code : ' ||
1830: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.UOM_CODE(1));
1825:
1826: arp_util.debug('product_org_id : ' ||
1827: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.PRODUCT_ORG_ID(1));
1828:
1829: arp_util.debug('uom_code : ' ||
1830: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.UOM_CODE(1));
1831:
1832: arp_util.debug('fob_point : ' ||
1833: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.FOB_POINT(1));
1828:
1829: arp_util.debug('uom_code : ' ||
1830: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.UOM_CODE(1));
1831:
1832: arp_util.debug('fob_point : ' ||
1833: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.FOB_POINT(1));
1834:
1835: arp_util.debug('ship_to_party_id : ' ||
1836: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.SHIP_TO_PARTY_ID(1));
1831:
1832: arp_util.debug('fob_point : ' ||
1833: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.FOB_POINT(1));
1834:
1835: arp_util.debug('ship_to_party_id : ' ||
1836: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.SHIP_TO_PARTY_ID(1));
1837:
1838: arp_util.debug('ship_from_party_id : ' ||
1839: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.SHIP_FROM_PARTY_ID(1));
1834:
1835: arp_util.debug('ship_to_party_id : ' ||
1836: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.SHIP_TO_PARTY_ID(1));
1837:
1838: arp_util.debug('ship_from_party_id : ' ||
1839: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.SHIP_FROM_PARTY_ID(1));
1840:
1841: arp_util.debug('bill_to_party_id : ' ||
1842: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.BILL_TO_PARTY_ID(1));
1837:
1838: arp_util.debug('ship_from_party_id : ' ||
1839: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.SHIP_FROM_PARTY_ID(1));
1840:
1841: arp_util.debug('bill_to_party_id : ' ||
1842: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.BILL_TO_PARTY_ID(1));
1843:
1844: arp_util.debug('ship_to_party_site_id : ' ||
1845: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.SHIP_TO_PARTY_SITE_ID(1));
1840:
1841: arp_util.debug('bill_to_party_id : ' ||
1842: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.BILL_TO_PARTY_ID(1));
1843:
1844: arp_util.debug('ship_to_party_site_id : ' ||
1845: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.SHIP_TO_PARTY_SITE_ID(1));
1846:
1847: arp_util.debug('ship_to_location_id : ' ||
1848: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.SHIP_TO_LOCATION_ID(1));
1843:
1844: arp_util.debug('ship_to_party_site_id : ' ||
1845: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.SHIP_TO_PARTY_SITE_ID(1));
1846:
1847: arp_util.debug('ship_to_location_id : ' ||
1848: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.SHIP_TO_LOCATION_ID(1));
1849:
1850: arp_util.debug('bill_to_location_id : ' ||
1851: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.BILL_TO_LOCATION_ID(1));
1846:
1847: arp_util.debug('ship_to_location_id : ' ||
1848: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.SHIP_TO_LOCATION_ID(1));
1849:
1850: arp_util.debug('bill_to_location_id : ' ||
1851: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.BILL_TO_LOCATION_ID(1));
1852:
1853: arp_util.debug('account_ccid : ' ||
1854: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ACCOUNT_CCID(1));
1849:
1850: arp_util.debug('bill_to_location_id : ' ||
1851: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.BILL_TO_LOCATION_ID(1));
1852:
1853: arp_util.debug('account_ccid : ' ||
1854: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ACCOUNT_CCID(1));
1855:
1856: arp_util.debug('output_tax_classification_code : ' ||
1857: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.OUTPUT_TAX_CLASSIFICATION_CODE(1));
1852:
1853: arp_util.debug('account_ccid : ' ||
1854: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ACCOUNT_CCID(1));
1855:
1856: arp_util.debug('output_tax_classification_code : ' ||
1857: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.OUTPUT_TAX_CLASSIFICATION_CODE(1));
1858:
1859: arp_util.debug('interface_entity_code : ' ||
1860: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.INTERFACE_ENTITY_CODE(1));
1855:
1856: arp_util.debug('output_tax_classification_code : ' ||
1857: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.OUTPUT_TAX_CLASSIFICATION_CODE(1));
1858:
1859: arp_util.debug('interface_entity_code : ' ||
1860: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.INTERFACE_ENTITY_CODE(1));
1861:
1862: arp_util.debug('interface_line_id : ' ||
1863: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.INTERFACE_LINE_ID(1));
1858:
1859: arp_util.debug('interface_entity_code : ' ||
1860: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.INTERFACE_ENTITY_CODE(1));
1861:
1862: arp_util.debug('interface_line_id : ' ||
1863: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.INTERFACE_LINE_ID(1));
1864:
1865: arp_util.debug('trx_line_number : ' ||
1866: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_LINE_NUMBER(1));
1861:
1862: arp_util.debug('interface_line_id : ' ||
1863: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.INTERFACE_LINE_ID(1));
1864:
1865: arp_util.debug('trx_line_number : ' ||
1866: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_LINE_NUMBER(1));
1867:
1868: arp_util.debug('historical_flag : ' ||
1869: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.HISTORICAL_FLAG(1));
1864:
1865: arp_util.debug('trx_line_number : ' ||
1866: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_LINE_NUMBER(1));
1867:
1868: arp_util.debug('historical_flag : ' ||
1869: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.HISTORICAL_FLAG(1));
1870:
1871: arp_util.debug('ctrl_hdr_tx_appl_flag : ' ||
1872: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.CTRL_HDR_TX_APPL_FLAG(1));
1867:
1868: arp_util.debug('historical_flag : ' ||
1869: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.HISTORICAL_FLAG(1));
1870:
1871: arp_util.debug('ctrl_hdr_tx_appl_flag : ' ||
1872: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.CTRL_HDR_TX_APPL_FLAG(1));
1873:
1874: arp_util.debug('ship_third_pty_acct_site_id : ' ||
1875: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.SHIP_THIRD_PTY_ACCT_SITE_ID(1));
1870:
1871: arp_util.debug('ctrl_hdr_tx_appl_flag : ' ||
1872: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.CTRL_HDR_TX_APPL_FLAG(1));
1873:
1874: arp_util.debug('ship_third_pty_acct_site_id : ' ||
1875: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.SHIP_THIRD_PTY_ACCT_SITE_ID(1));
1876:
1877: arp_util.debug('bill_third_pty_acct_site_id : ' ||
1878: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.BILL_THIRD_PTY_ACCT_SITE_ID(1));
1873:
1874: arp_util.debug('ship_third_pty_acct_site_id : ' ||
1875: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.SHIP_THIRD_PTY_ACCT_SITE_ID(1));
1876:
1877: arp_util.debug('bill_third_pty_acct_site_id : ' ||
1878: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.BILL_THIRD_PTY_ACCT_SITE_ID(1));
1879:
1880: arp_util.debug('ship_third_pty_acct_id : ' ||
1881: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.SHIP_THIRD_PTY_ACCT_ID(1));
1876:
1877: arp_util.debug('bill_third_pty_acct_site_id : ' ||
1878: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.BILL_THIRD_PTY_ACCT_SITE_ID(1));
1879:
1880: arp_util.debug('ship_third_pty_acct_id : ' ||
1881: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.SHIP_THIRD_PTY_ACCT_ID(1));
1882:
1883: arp_util.debug('bill_third_pty_acct_id : ' ||
1884: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.BILL_THIRD_PTY_ACCT_ID(1));
1879:
1880: arp_util.debug('ship_third_pty_acct_id : ' ||
1881: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.SHIP_THIRD_PTY_ACCT_ID(1));
1882:
1883: arp_util.debug('bill_third_pty_acct_id : ' ||
1884: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.BILL_THIRD_PTY_ACCT_ID(1));
1885:
1886: arp_util.debug('ship_to_cust_acct_site_use_id : ' ||
1887: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.SHIP_TO_CUST_ACCT_SITE_USE_ID(1));
1882:
1883: arp_util.debug('bill_third_pty_acct_id : ' ||
1884: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.BILL_THIRD_PTY_ACCT_ID(1));
1885:
1886: arp_util.debug('ship_to_cust_acct_site_use_id : ' ||
1887: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.SHIP_TO_CUST_ACCT_SITE_USE_ID(1));
1888:
1889: arp_util.debug('bill_to_cust_acct_site_use_id : ' ||
1890: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.BILL_TO_CUST_ACCT_SITE_USE_ID(1));
1885:
1886: arp_util.debug('ship_to_cust_acct_site_use_id : ' ||
1887: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.SHIP_TO_CUST_ACCT_SITE_USE_ID(1));
1888:
1889: arp_util.debug('bill_to_cust_acct_site_use_id : ' ||
1890: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.BILL_TO_CUST_ACCT_SITE_USE_ID(1));
1891:
1892: END print_ebt_plsql_vars;
1893:
1932: l_tax_amount NUMBER;
1933:
1934: BEGIN
1935:
1936: arp_util.debug('ARP_ETAX_SERVICES_PKG.Line_det_factors()+');
1937:
1938: IF (p_mode IN ('INSERT','INSERT_NO_TAX','INSERT_NO_TAX_EVER',
1939: 'INSERT_NO_LINE')) THEN
1940: l_action := 'CREATE';
1965: p_action => l_action,
1966: p_event_class_code => l_event_class_code,
1967: p_event_type_code => l_event_type_code);
1968:
1969: arp_util.debug('customer trx id = ' || p_customer_trx_id);
1970: arp_util.debug('event class code = ' || l_event_class_code);
1971: arp_util.debug('event type code = ' || l_event_type_code);
1972: arp_util.debug('line level action = ' || l_line_level_action);
1973:
1966: p_event_class_code => l_event_class_code,
1967: p_event_type_code => l_event_type_code);
1968:
1969: arp_util.debug('customer trx id = ' || p_customer_trx_id);
1970: arp_util.debug('event class code = ' || l_event_class_code);
1971: arp_util.debug('event type code = ' || l_event_type_code);
1972: arp_util.debug('line level action = ' || l_line_level_action);
1973:
1974: IF (l_success) THEN
1967: p_event_type_code => l_event_type_code);
1968:
1969: arp_util.debug('customer trx id = ' || p_customer_trx_id);
1970: arp_util.debug('event class code = ' || l_event_class_code);
1971: arp_util.debug('event type code = ' || l_event_type_code);
1972: arp_util.debug('line level action = ' || l_line_level_action);
1973:
1974: IF (l_success) THEN
1975: -- populate the transaction_line_rec for use in the tax service
1968:
1969: arp_util.debug('customer trx id = ' || p_customer_trx_id);
1970: arp_util.debug('event class code = ' || l_event_class_code);
1971: arp_util.debug('event type code = ' || l_event_type_code);
1972: arp_util.debug('line level action = ' || l_line_level_action);
1973:
1974: IF (l_success) THEN
1975: -- populate the transaction_line_rec for use in the tax service
1976: l_transaction_line_rec.internal_organization_id := NULL;
1984:
1985: /* initialize the plsql table */
1986: ZX_GLOBAL_STRUCTURES_PKG.INIT_TRX_LINE_DIST_TBL(1);
1987:
1988: arp_util.debug('calling populate_ebt_plsql_tables ');
1989: populate_ebt_plsql_tables(
1990: p_customer_trx_id => p_customer_trx_id,
1991: p_customer_trx_line_id => p_customer_trx_line_id,
1992: p_event_type_code => l_event_type_code,
2016: end if;
2017:
2018: -- verify the return status from the tax api.
2019: IF (l_return_status_service <> 'S') THEN -- handle errors
2020: arp_util.debug('line_det_factors returned error');
2021: IF ( l_msg_count = 1 ) THEN
2022: -- then there is only 1 message raised by the API, and
2023: -- it has been sent out in the parameter x_msg_data.
2024: l_msg_data_out := l_msg_data;
2021: IF ( l_msg_count = 1 ) THEN
2022: -- then there is only 1 message raised by the API, and
2023: -- it has been sent out in the parameter x_msg_data.
2024: l_msg_data_out := l_msg_data;
2025: arp_util.debug('API failed with : ' || l_msg_data_out);
2026: l_mesg := l_msg_data_out;
2027:
2028: ELSIF (l_msg_count > 1) THEN
2029: -- the messages are on the stack and there is more then
2033: FND_API.G_FALSE);
2034: if (l_mesg IS NULL) THEN
2035: EXIT;
2036: end if;
2037: arp_util.debug('API failed with : ' || l_mesg);
2038: end loop;
2039: END IF;
2040:
2041: -- raise error
2046:
2047: APP_EXCEPTION.RAISE_EXCEPTION;
2048: END IF;
2049: ELSE
2050: arp_util.debug('ERROR getting EVENT INFORMATION');
2051: END IF;
2052: arp_util.debug('ARP_ETAX_SERVICES_PKG.Line_det_factors()-');
2053:
2054: END line_det_factors;
2048: END IF;
2049: ELSE
2050: arp_util.debug('ERROR getting EVENT INFORMATION');
2051: END IF;
2052: arp_util.debug('ARP_ETAX_SERVICES_PKG.Line_det_factors()-');
2053:
2054: END line_det_factors;
2055:
2056: /*=============================================================================
2086: l_event_class_code zx_trx_headers_gt.event_class_code%TYPE;
2087: l_event_type_code zx_trx_headers_gt.event_type_code%TYPE;
2088: l_llst_exists NUMBER := 0; -- 4713671
2089: BEGIN
2090: arp_util.debug('arp_etax_services_pkg.Header_det_factors(+)');
2091:
2092: /* Initializing return status ..*/
2093: x_return_status := FND_API.G_RET_STS_SUCCESS;
2094:
2179: p_action => l_action,
2180: p_event_class_code => l_event_class_code,
2181: p_event_type_code => l_event_type_code);
2182:
2183: arp_util.debug('customer trx id = ' || p_customer_trx_id);
2184: arp_util.debug('event class code = ' || l_event_class_code);
2185: arp_util.debug('event type code = ' || l_event_type_code);
2186:
2187: IF (l_success) THEN
2180: p_event_class_code => l_event_class_code,
2181: p_event_type_code => l_event_type_code);
2182:
2183: arp_util.debug('customer trx id = ' || p_customer_trx_id);
2184: arp_util.debug('event class code = ' || l_event_class_code);
2185: arp_util.debug('event type code = ' || l_event_type_code);
2186:
2187: IF (l_success) THEN
2188: -- need to select from the table as items have been posted to
2181: p_event_type_code => l_event_type_code);
2182:
2183: arp_util.debug('customer trx id = ' || p_customer_trx_id);
2184: arp_util.debug('event class code = ' || l_event_class_code);
2185: arp_util.debug('event type code = ' || l_event_type_code);
2186:
2187: IF (l_success) THEN
2188: -- need to select from the table as items have been posted to
2189: -- populate the header_det_factors_rec_type
2356:
2357: END IF; -- end header is null
2358: END IF; -- end llst exists
2359: ELSE
2360: arp_util.debug('ERROR getting EVENT INFORMATION');
2361: END IF;
2362:
2363: -- need to call the tax api
2364: zx_api_pub.update_det_factors_hdr(
2372: p_hdr_det_factors_rec => l_hdr_det_factors_rec
2373: );
2374:
2375: END IF;
2376: arp_util.debug('arp_etax_services_pkg.Header_det_factors(-)');
2377:
2378: END Header_det_factors;
2379:
2380: /*=============================================================================
2427: l_account_set_flag VARCHAR2(1);
2428: l_rtn NUMBER;
2429: l_xla_ev_rec ARP_XLA_EVENTS.XLA_EVENTS_TYPE;
2430: BEGIN
2431: arp_util.debug('ARP_ETAX_SERVICES_PKG.Calculate_tax(+)');
2432: arp_util.debug('p_action = ' || p_action);
2433:
2434: /* initializing precision, mau, hdr level rdn */
2435: pg_base_precision := arp_trx_global.system_info.base_precision;
2428: l_rtn NUMBER;
2429: l_xla_ev_rec ARP_XLA_EVENTS.XLA_EVENTS_TYPE;
2430: BEGIN
2431: arp_util.debug('ARP_ETAX_SERVICES_PKG.Calculate_tax(+)');
2432: arp_util.debug('p_action = ' || p_action);
2433:
2434: /* initializing precision, mau, hdr level rdn */
2435: pg_base_precision := arp_trx_global.system_info.base_precision;
2436: pg_base_min_acc_unit := arp_trx_global.system_info.base_min_acc_unit;
2446: p_action => p_action,
2447: p_event_class_code => l_event_class_code,
2448: p_event_type_code => l_event_type_code);
2449:
2450: arp_util.debug('customer trx id = ' || p_customer_trx_id);
2451: arp_util.debug('action = ' || p_action);
2452: arp_util.debug('event class code = ' || l_event_class_code);
2453: arp_util.debug('event type code = ' || l_event_type_code);
2454:
2447: p_event_class_code => l_event_class_code,
2448: p_event_type_code => l_event_type_code);
2449:
2450: arp_util.debug('customer trx id = ' || p_customer_trx_id);
2451: arp_util.debug('action = ' || p_action);
2452: arp_util.debug('event class code = ' || l_event_class_code);
2453: arp_util.debug('event type code = ' || l_event_type_code);
2454:
2455: IF (l_success) THEN
2448: p_event_type_code => l_event_type_code);
2449:
2450: arp_util.debug('customer trx id = ' || p_customer_trx_id);
2451: arp_util.debug('action = ' || p_action);
2452: arp_util.debug('event class code = ' || l_event_class_code);
2453: arp_util.debug('event type code = ' || l_event_type_code);
2454:
2455: IF (l_success) THEN
2456: /* populate transaction rec type */
2449:
2450: arp_util.debug('customer trx id = ' || p_customer_trx_id);
2451: arp_util.debug('action = ' || p_action);
2452: arp_util.debug('event class code = ' || l_event_class_code);
2453: arp_util.debug('event type code = ' || l_event_type_code);
2454:
2455: IF (l_success) THEN
2456: /* populate transaction rec type */
2457: l_transaction_rec.internal_organization_id := arp_global.sysparam.org_id; l_transaction_rec.application_id := 222;
2470: /* 5152340 - Remove AR tax lines prior to calculate call */
2471: arp_etax_util.delete_tax_lines_from_ar(p_customer_trx_id);
2472:
2473: /* call Tax */
2474: arp_util.debug('calling ZX api to calculate tax');
2475:
2476: zx_api_pub.calculate_tax(
2477: p_api_version => 1.0,
2478: p_init_msg_list => FND_API.G_TRUE,
2485: x_msg_count => x_msg_count,
2486: x_msg_data => x_msg_data,
2487: x_doc_level_recalc_flag => l_doc_level_recalc_flag );
2488:
2489: arp_util.debug('return status service = ' || x_return_status);
2490:
2491: IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2492: -- insert Tax records into ra_customer_trx_lines based upon
2493: -- customer trx id
2490:
2491: IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2492: -- insert Tax records into ra_customer_trx_lines based upon
2493: -- customer trx id
2494: arp_util.debug('calling build_ar_tax_lines ...');
2495:
2496: arp_etax_util.build_ar_tax_lines(
2497: p_customer_trx_id => p_customer_trx_id,
2498: p_rows_inserted => l_rows);
2613: pg_trx_header_level_rounding ,
2614: 'N',
2615: 'N') = 0 -- FALSE
2616: THEN
2617: arp_util.debug('EXCEPTION: arp_etax_services_pkg.calculate_tax()');
2618: arp_util.debug(l_error_message);
2619: fnd_message.set_name('AR', 'AR_ROUNDING_ERROR');
2620: fnd_message.set_token('ROUTINE','ARP_ETAX_SERVICES_PKG.CALCULATE_TAX');
2621: APP_EXCEPTION.raise_exception;
2614: 'N',
2615: 'N') = 0 -- FALSE
2616: THEN
2617: arp_util.debug('EXCEPTION: arp_etax_services_pkg.calculate_tax()');
2618: arp_util.debug(l_error_message);
2619: fnd_message.set_name('AR', 'AR_ROUNDING_ERROR');
2620: fnd_message.set_token('ROUTINE','ARP_ETAX_SERVICES_PKG.CALCULATE_TAX');
2621: APP_EXCEPTION.raise_exception;
2622: END IF;
2628: ELSE
2629: arp_standard.debug('could not get an event class code');
2630: END IF;
2631:
2632: arp_util.debug('ARP_ETAX_SERVICES_PKG.Calculate_tax(-)');
2633: END Calculate_tax;
2634:
2635: /*=============================================================================
2636: | FUNCTION - Get_Tax_Action()
2654: l_action VARCHAR2(12);
2655:
2656: BEGIN
2657:
2658: arp_util.debug('ARP_ETAX_SERVICES_PKG.Get_Tax_Action(+)');
2659:
2660: select count(customer_trx_id)
2661: INTO l_count
2662: FROM ra_customer_trx_lines
2668: ELSE
2669: l_action := 'UPDATE';
2670: END IF;
2671:
2672: arp_util.debug('ARP_ETAX_SERVICES_PKG.Get_Tax_Action(-)');
2673:
2674: return l_action;
2675:
2676: END Get_Tax_Action;
2709: l_num_failed_dist_rows NUMBER;
2710: l_msg_data VARCHAR2(4000);
2711: l_rows NUMBER;
2712: BEGIN
2713: arp_util.debug('ARP_ETAX_SERVICES_PKG.Override_Tax_Lines(+)');
2714:
2715: /* Initializing return status ..*/
2716: x_return_status := FND_API.G_RET_STS_SUCCESS;
2717:
2721: p_action => p_action,
2722: p_event_class_code => l_event_class_code,
2723: p_event_type_code => l_event_type_code);
2724:
2725: arp_util.debug('customer trx id = ' || p_customer_trx_id);
2726: arp_util.debug('action = ' || p_action);
2727: arp_util.debug('event class code = ' || l_event_class_code);
2728: arp_util.debug('event type code = ' || l_event_type_code);
2729:
2722: p_event_class_code => l_event_class_code,
2723: p_event_type_code => l_event_type_code);
2724:
2725: arp_util.debug('customer trx id = ' || p_customer_trx_id);
2726: arp_util.debug('action = ' || p_action);
2727: arp_util.debug('event class code = ' || l_event_class_code);
2728: arp_util.debug('event type code = ' || l_event_type_code);
2729:
2730: IF (l_success) THEN
2723: p_event_type_code => l_event_type_code);
2724:
2725: arp_util.debug('customer trx id = ' || p_customer_trx_id);
2726: arp_util.debug('action = ' || p_action);
2727: arp_util.debug('event class code = ' || l_event_class_code);
2728: arp_util.debug('event type code = ' || l_event_type_code);
2729:
2730: IF (l_success) THEN
2731: /* populate transaction rec type */
2724:
2725: arp_util.debug('customer trx id = ' || p_customer_trx_id);
2726: arp_util.debug('action = ' || p_action);
2727: arp_util.debug('event class code = ' || l_event_class_code);
2728: arp_util.debug('event type code = ' || l_event_type_code);
2729:
2730: IF (l_success) THEN
2731: /* populate transaction rec type */
2732: l_transaction_rec.internal_organization_id := arp_global.sysparam.org_id;
2755: -- update AR with return from tax
2756: IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2757: -- insert Tax records into ra_customer_trx_lines based upon
2758: -- customer trx id
2759: arp_util.debug('calling build_ar_tax_lines ...');
2760:
2761: arp_etax_util.build_ar_tax_lines(
2762: p_customer_trx_id => p_customer_trx_id,
2763: p_rows_inserted => l_rows);
2800: END IF; -- l_rows
2801: END IF;
2802:
2803: END IF; -- if event codes were derived.
2804: arp_util.debug('ARP_ETAX_SERVICES_PKG.Override_Tax_Lines(-)');
2805: END Override_Tax_Lines;
2806:
2807: /*=============================================================================
2808: | FUNCTION - is_trx_completed()
2830: l_update boolean;
2831: l_complete_flag varchar2(1);
2832: BEGIN
2833:
2834: arp_util.debug('ARP_ETAX_SERVICES_PKG.is_tax_update_allowed()+');
2835:
2836: SELECT complete_flag
2837: INTO l_complete_flag
2838: FROM ra_customer_trx
2841: IF (l_complete_flag = 'Y' )
2842: THEN
2843: /* trx is complete, prevent updates */
2844: l_update := FALSE;
2845: arp_util.debug(' updates prevented by complete_flag');
2846: ELSE
2847: /* trx is incomplete, changes are allowed */
2848: l_update := TRUE;
2849: END IF;
2847: /* trx is incomplete, changes are allowed */
2848: l_update := TRUE;
2849: END IF;
2850:
2851: arp_util.debug('ARP_ETAX_SERVICES_PKG.is_tax_update_allowed()-');
2852:
2853: return l_update;
2854:
2855: END is_tax_update_allowed;