[Home] [Help]
PACKAGE: APPS.INL_TAX_PVT
Source
1 PACKAGE INL_TAX_PVT AS
2 /* $Header: INLVTAXS.pls 120.6.12010000.5 2008/10/30 16:16:16 acferrei ship $ */
3
4 G_ENTITY_CODE zx_evnt_cls_mappings.entity_code%TYPE;
5 G_MODULE_NAME CONSTANT VARCHAR2(200) := 'INL.PLSQL.INL_TAX_PVT.';
6 G_PKG_NAME CONSTANT VARCHAR2(30):='INL_TAX_PVT';
7 CURSOR Shipment_Lines(p_ship_header_id number) IS
8 SELECT bill_from_party_id
9 ,bill_from_party_site_id
10 ,bill_to_location_id
11 ,bill_to_organization_id
12 ,currency_code
13 ,currency_conversion_date
14 ,currency_conversion_rate
15 ,currency_conversion_type
16 ,intended_use
17 ,inventory_item_id
18 ,line_qty
19 ,party_id
20 ,party_site_id
21 ,poa_party_id
22 ,poa_party_site_id
23 ,poo_location_id
24 ,poo_organization_id
25 ,product_category
26 ,product_fiscal_class
27 ,product_type
28 ,ship_from_party_id
29 ,ship_from_party_site_id
30 ,ship_header_id
31 ,ship_line_id
32 ,ship_line_num
33 ,ship_to_location_id
34 ,ship_to_organization_id
35 ,source
36 ,src_id
37 ,src_type_code
38 ,tax_already_calculated_flag
39 ,tax_classification_code
40 ,trx_business_category
41 ,unit_price
42 ,uom_code
43 ,user_def_fiscal_class
44 FROM inl_ebtax_lines_v
45 WHERE ship_header_id = p_ship_header_id
46 AND adjustment_num = 0;
47 TYPE ship_Lines_Tab_Type IS TABLE OF Shipment_Lines%ROWTYPE;
48 l_ship_line_list ship_Lines_Tab_Type;
49
50 CURSOR Shipment_Header(p_ship_header_id number) IS
51 SELECT ship_type_id
52 ,ship_header_id
53 ,organization_id
54 ,location_id
55 ,ship_date
56 ,legal_entity_id
57 ,taxation_country
58 ,ship_num
59 ,document_sub_type
60 FROM inl_ship_headers
61 WHERE ship_header_id = p_ship_header_id;
62 l_ship_header_rec Shipment_Header%ROWTYPE;
63
64 -- Record to keep Tax Line info.
65 TYPE tax_ln_rec IS RECORD(
66 tax_line_id NUMBER, --null for new lines
67 tax_line_num NUMBER, --null for new lines
68 tax_code VARCHAR2(30),
69 ship_header_id NUMBER,
70 parent_tax_line_id NUMBER,
71 adjustment_num NUMBER,
72 match_id NUMBER,
73 source_parent_table_name VARCHAR2(30),
74 source_parent_table_id NUMBER,
75 to_parent_table_name VARCHAR2(30),
76 to_parent_table_id NUMBER,
77 tax_amt NUMBER,
78 nrec_tax_amt NUMBER,
79 currency_code VARCHAR2(15),
80 currency_conversion_type VARCHAR2(30),
81 currency_conversion_date DATE,
82 currency_conversion_rate NUMBER,
83 tax_amt_included_flag VARCHAR2(1)
84 );
85
86 TYPE tax_ln_tbl IS TABLE OF tax_ln_rec INDEX BY BINARY_INTEGER;
87
88 PROCEDURE Generate_Taxes(
89 p_api_version IN NUMBER,
90 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
91 p_commit IN VARCHAR2 := FND_API.G_FALSE,
92 p_ship_header_id IN NUMBER,
93 x_return_status OUT NOCOPY VARCHAR2,
94 x_msg_count OUT NOCOPY NUMBER,
95 x_msg_data OUT NOCOPY VARCHAR2
96 );
97
98 PROCEDURE Calculate_Tax(
99 p_api_version IN NUMBER,
100 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
101 p_commit IN VARCHAR2 := FND_API.G_FALSE,
102 p_ship_header_id IN NUMBER,
103 x_return_status OUT NOCOPY VARCHAR2,
104 x_msg_count OUT NOCOPY NUMBER,
105 x_msg_data OUT NOCOPY VARCHAR2
106 );
107
108 PROCEDURE Get_DefaultTaxDetAttribs(
109 p_api_version IN NUMBER,
110 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
111 p_commit IN VARCHAR2 := FND_API.G_FALSE,
112 p_application_id IN NUMBER,
113 p_entity_code IN VARCHAR2,
114 p_event_class_code IN VARCHAR2,
115 p_org_id IN VARCHAR2,
116 p_item_id IN NUMBER,
117 p_country_code IN VARCHAR2,
118 p_effective_date IN DATE,
119 p_source_type_code IN VARCHAR2,
120 p_po_line_location_id IN NUMBER,
121 x_return_status OUT NOCOPY VARCHAR2,
122 x_msg_count OUT NOCOPY NUMBER,
123 x_msg_data OUT NOCOPY VARCHAR2,
124 x_trx_biz_category OUT NOCOPY VARCHAR2,
125 x_intended_use OUT NOCOPY VARCHAR2,
126 x_prod_category OUT NOCOPY VARCHAR2,
127 x_prod_fisc_class_code OUT NOCOPY VARCHAR2,
128 x_product_type OUT NOCOPY VARCHAR2
129 );
130
131 END INL_TAX_PVT;