1: PACKAGE BODY ast_Invoice_Lines_PVT AS
2: /* $Header: astvinlb.pls 115.3 2002/02/06 11:21:05 pkm ship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'AST_Invoice_Lines_PVT';
5: G_FILE_NAME CONSTANT VARCHAR2(12) :='astvinlb.pls';
1: PACKAGE BODY ast_Invoice_Lines_PVT AS
2: /* $Header: astvinlb.pls 115.3 2002/02/06 11:21:05 pkm ship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'AST_Invoice_Lines_PVT';
5: G_FILE_NAME CONSTANT VARCHAR2(12) :='astvinlb.pls';
6: G_APPL_ID NUMBER := FND_GLOBAL.Prog_Appl_Id;
7: G_LOGIN_ID NUMBER := FND_GLOBAL.Conc_Login_Id;
8: G_PROGRAM_ID NUMBER := FND_GLOBAL.Conc_Program_Id;
34: l_msg_count NUMBER;
35: l_msg_data VARCHAR2(32767);
36: l_invoice_id NUMBER := p_invoice_id;
37:
38: l_line_id_t AST_Invoice_Lines_PVT.line_id_tbl_type;
39: l_line_number_t AST_Invoice_Lines_PVT.line_number_tbl_type;
40: l_item_t AST_Invoice_Lines_PVT.item_tbl_type;
41: l_units_t AST_Invoice_Lines_PVT.units_tbl_type;
42: l_quantity_t AST_Invoice_Lines_PVT.quantity_tbl_type;
35: l_msg_data VARCHAR2(32767);
36: l_invoice_id NUMBER := p_invoice_id;
37:
38: l_line_id_t AST_Invoice_Lines_PVT.line_id_tbl_type;
39: l_line_number_t AST_Invoice_Lines_PVT.line_number_tbl_type;
40: l_item_t AST_Invoice_Lines_PVT.item_tbl_type;
41: l_units_t AST_Invoice_Lines_PVT.units_tbl_type;
42: l_quantity_t AST_Invoice_Lines_PVT.quantity_tbl_type;
43: l_price_per_unit_t AST_Invoice_Lines_PVT.price_per_unit_tbl_type;
36: l_invoice_id NUMBER := p_invoice_id;
37:
38: l_line_id_t AST_Invoice_Lines_PVT.line_id_tbl_type;
39: l_line_number_t AST_Invoice_Lines_PVT.line_number_tbl_type;
40: l_item_t AST_Invoice_Lines_PVT.item_tbl_type;
41: l_units_t AST_Invoice_Lines_PVT.units_tbl_type;
42: l_quantity_t AST_Invoice_Lines_PVT.quantity_tbl_type;
43: l_price_per_unit_t AST_Invoice_Lines_PVT.price_per_unit_tbl_type;
44: l_original_amount_t AST_Invoice_Lines_PVT.original_amount_tbl_type;
37:
38: l_line_id_t AST_Invoice_Lines_PVT.line_id_tbl_type;
39: l_line_number_t AST_Invoice_Lines_PVT.line_number_tbl_type;
40: l_item_t AST_Invoice_Lines_PVT.item_tbl_type;
41: l_units_t AST_Invoice_Lines_PVT.units_tbl_type;
42: l_quantity_t AST_Invoice_Lines_PVT.quantity_tbl_type;
43: l_price_per_unit_t AST_Invoice_Lines_PVT.price_per_unit_tbl_type;
44: l_original_amount_t AST_Invoice_Lines_PVT.original_amount_tbl_type;
45:
38: l_line_id_t AST_Invoice_Lines_PVT.line_id_tbl_type;
39: l_line_number_t AST_Invoice_Lines_PVT.line_number_tbl_type;
40: l_item_t AST_Invoice_Lines_PVT.item_tbl_type;
41: l_units_t AST_Invoice_Lines_PVT.units_tbl_type;
42: l_quantity_t AST_Invoice_Lines_PVT.quantity_tbl_type;
43: l_price_per_unit_t AST_Invoice_Lines_PVT.price_per_unit_tbl_type;
44: l_original_amount_t AST_Invoice_Lines_PVT.original_amount_tbl_type;
45:
46: CURSOR c_inv_line IS
39: l_line_number_t AST_Invoice_Lines_PVT.line_number_tbl_type;
40: l_item_t AST_Invoice_Lines_PVT.item_tbl_type;
41: l_units_t AST_Invoice_Lines_PVT.units_tbl_type;
42: l_quantity_t AST_Invoice_Lines_PVT.quantity_tbl_type;
43: l_price_per_unit_t AST_Invoice_Lines_PVT.price_per_unit_tbl_type;
44: l_original_amount_t AST_Invoice_Lines_PVT.original_amount_tbl_type;
45:
46: CURSOR c_inv_line IS
47: SELECT customer_trx_line_id,
40: l_item_t AST_Invoice_Lines_PVT.item_tbl_type;
41: l_units_t AST_Invoice_Lines_PVT.units_tbl_type;
42: l_quantity_t AST_Invoice_Lines_PVT.quantity_tbl_type;
43: l_price_per_unit_t AST_Invoice_Lines_PVT.price_per_unit_tbl_type;
44: l_original_amount_t AST_Invoice_Lines_PVT.original_amount_tbl_type;
45:
46: CURSOR c_inv_line IS
47: SELECT customer_trx_line_id,
48: customer_trx_id,
186: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
187: END IF;
188: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
189: END Get_Invoice_Lines;
190: END ast_Invoice_Lines_PVT;