1 PACKAGE ast_Invoice_Lines_PVT AUTHID CURRENT_USER AS
2 /* $Header: astvinls.pls 115.3 2002/02/06 11:21:07 pkm ship $ */
3
4 TYPE line_id_tbl_type IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
5 TYPE line_number_tbl_type IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
6 TYPE item_tbl_type IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
7 TYPE units_tbl_type IS TABLE OF VARCHAR2(50) INDEX BY BINARY_INTEGER;
8 TYPE quantity_tbl_type IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
9 TYPE price_per_unit_tbl_type IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
10 TYPE original_amount_tbl_type IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
11 --Removed By JYPark TYPE dispute_quantity_tbl_type IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
12 --Removed By JYPark TYPE dispute_amount_tbl_type IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
13
14 PROCEDURE Get_Invoice_Lines(
15 p_api_version IN NUMBER,
16 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
17 p_commit IN VARCHAR2 := FND_API.G_FALSE,
18 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
19 x_return_status OUT VARCHAR2,
20 x_msg_count OUT NUMBER,
21 x_msg_data OUT VARCHAR2,
22 p_invoice_id IN NUMBER,
23 x_line_id_t OUT line_id_tbl_type,
24 x_line_number_t OUT line_number_tbl_type,
25 x_item_t OUT item_tbl_type,
26 x_units_t OUT units_tbl_type,
27 x_quantity_t OUT quantity_tbl_type,
28 x_price_per_unit_t OUT price_per_unit_tbl_type,
29 x_original_amount_t OUT original_amount_tbl_type
30 --Removed By JYPark x_dispute_quantity_t OUT dispute_quantity_tbl_type,
31 --Removed By JYPark x_dispute_amount_t OUT dispute_amount_tbl_type
32 );
33 END;