学步园

1. 取供应商税码

    FUNCTION get_tax_classification_code(<br /> p_party_id IN NUMBER<br /> ) RETURN VARCHAR2 IS<br /> l_tax_classification_code VARCHAR2(100);<br /> BEGIN<br /> SELECT tax_classification_code INTO l_tax_classification_code<br /> FROM zx_party_tax_profile<br /> WHERE party_id = p_party_id<br /> AND party_type_code = 'THIRD_PARTY';<br /> RETURN l_tax_classification_code;<br /> EXCEPTION<br /> WHEN OTHERS THEN RETURN NULL;<br /> END;<br /> --取供应商税码<br /> l_tax_classification_code := get_tax_classification_code(rec_header.vendor_id);</p> <p>

2. 取得供应商地点层税率
    FUNCTION get_vendor_tax(p_vendor_id IN NUMBER,<br /> p_vendor_site_id IN NUMBER) RETURN NUMBER IS<br /> v_vendor_tax NUMBER;<br /> BEGIN<br /> SELECT zxr.percentage_rate<br /> INTO v_vendor_tax<br /> FROM po_vendor_sites_all pvs,<br /> zx_party_tax_profile ztp,<br /> hz_code_assignments hca,<br /> zx_mco_eo_rates_v zxr<br /> WHERE ztp.party_id = pvs.party_site_id<br /> AND hca.owner_table_id = ztp.party_tax_profile_id<br /> AND hca.owner_table_name = 'ZX_PARTY_TAX_PROFILE'<br /> AND (hca.start_date_active <= SYSDATE OR<br /> hca.start_date_active IS NULL)<br /> AND (hca.end_date_active > SYSDATE OR hca.end_date_active IS NULL)<br /> AND zxr.tax_rate_code = hca.class_code<br /> AND (zxr.effective_from <= SYSDATE OR zxr.effective_from IS NULL)<br /> AND (zxr.effective_to > SYSDATE OR zxr.effective_to IS NULL)<br /> AND pvs.vendor_id = p_vendor_id<br /> AND pvs.vendor_site_id = p_vendor_site_id;<br /> RETURN v_vendor_tax;<br /> EXCEPTION<br /> WHEN OTHERS THEN<br /> RETURN 0;<br /> END;