484: IF p_created_from = 'ARXTWMAI' THEN
485: BEGIN
486: SELECT adr.global_attribute8
487: INTO l_contributor_class_code
488: FROM hz_cust_acct_sites_all adr,
489: hz_cust_site_uses rsu
490: WHERE rsu.site_use_id = p_ship_to_address_id
491: AND rsu.cust_acct_site_id = adr.cust_acct_site_id;
492: END;
497: ELSIF p_created_from = 'RAXTRX' THEN
498: BEGIN
499: SELECT cas.global_attribute8
500: INTO l_contributor_class_code
501: FROM hz_cust_acct_sites cas
502: WHERE cas.cust_acct_site_id = p_ship_to_address_id;
503: END;
504: IF l_contributor_class_code is null then
505: l_return_code := 'ERROR';
552: END IF;
553: IF p_created_from = 'ARXTWMAI' THEN
554: SELECT nvl(cas.global_attribute9,'N')
555: INTO l_cus_cls_flag
556: FROM hz_cust_acct_sites_all cas, hz_cust_site_uses rsu
557: WHERE rsu.site_use_id = p_ship_to_address_id
558: AND rsu.cust_acct_site_id = cas.cust_acct_site_id;
559: --
560: IF l_cus_cls_flag = 'Y' THEN
559: --
560: IF l_cus_cls_flag = 'Y' THEN
561: SELECT 'Success'
562: INTO l_dummy_code
563: FROM jl_zz_ar_tx_cus_cls_all cus, hz_cust_acct_sites_all cas, hz_cust_site_uses rsu
564: WHERE tax_attr_class_code = l_contributor_class_code
565: AND rsu.site_use_id = p_ship_to_address_id
566: AND cas.cust_acct_site_id = cus.address_id
567: AND rsu.cust_acct_site_id = cas.cust_acct_site_id
582:
583: ELSE
584: SELECT nvl(cas.global_attribute9,'N')
585: INTO l_cus_cls_flag
586: FROM hz_cust_acct_sites cas
587: WHERE cas.cust_acct_site_id = p_ship_to_address_id;
588: IF l_cus_cls_flag = 'Y' THEN
589: SELECT 'Success'
590: INTO l_dummy_code
587: WHERE cas.cust_acct_site_id = p_ship_to_address_id;
588: IF l_cus_cls_flag = 'Y' THEN
589: SELECT 'Success'
590: INTO l_dummy_code
591: FROM jl_zz_ar_tx_cus_cls_all cus, hz_cust_acct_sites cas
592: WHERE tax_attr_class_code = l_contributor_class_code
593: AND cas.cust_acct_site_id = cus.address_id
594: AND cas.cust_acct_site_id = p_ship_to_address_id
595: AND tax_category_id = doc_letter_rec.tax_category_id