PACKAGE BODY: APPS.OE_INSTALL_BASE_UTIL

Source

1 PACKAGE BODY oe_install_base_util AS
2 /* $Header: OEXUINSB.pls 120.2 2006/06/23 22:06:40 sdatti noship $*/
3 
4 
5   PROCEDURE get_partner_ord_rec(
6     p_order_line_id     IN  number,
7     x_partner_order_rec OUT NOCOPY partner_order_rec)
8   IS
9   BEGIN
10 
11     SELECT oel.IB_OWNER,
12            oel.IB_INSTALLED_AT_LOCATION,
13            oel.IB_CURRENT_LOCATION,
14            nvl(oel.END_CUSTOMER_ID,oeh.END_CUSTOMER_ID),
15            nvl(oel.END_CUSTOMER_CONTACT_ID,oeh.END_CUSTOMER_CONTACT_ID),
16            nvl(oel.END_CUSTOMER_SITE_USE_ID,oeh.END_CUSTOMER_SITE_USE_ID),
17            oeh.sold_to_site_use_id
18     INTO   x_partner_order_rec.IB_OWNER,
19            x_partner_order_rec.IB_INSTALLED_AT_LOCATION,
20            x_partner_order_rec.IB_CURRENT_LOCATION,
21            x_partner_order_rec.END_CUSTOMER_ID,
22            x_partner_order_rec.END_CUSTOMER_CONTACT_ID,
23            x_partner_order_rec.END_CUSTOMER_SITE_USE_ID,
24            x_partner_order_rec.SOLD_TO_SITE_USE_ID
25     FROM   oe_order_lines_all oel,
26            oe_order_headers_all oeh
27     WHERE  oel.line_id = p_order_line_id
28     AND    oeh.header_id = oel.header_id;
29 
30   END get_partner_ord_rec;
31 
32   PROCEDURE return_selected_instances(
33     l_returned_inst_tbl IN  csi_datastructures_pub.instance_cz_tbl)
34   IS
35   BEGIN
36 
37     g_returned_inst_tbl := l_returned_inst_tbl;
38 
39   END return_selected_instances;
40 
41   PROCEDURE get_returned_instances(
42     l_read_inst_tbl  IN OUT NOCOPY csi_datastructures_pub.instance_cz_tbl )
43  is
44 
45   BEGIN
46  for j in  1..g_returned_inst_tbl.count loop
47    l_read_inst_tbl(j).item_instance_id           :=g_returned_inst_tbl(j).item_instance_id;
48    l_read_inst_tbl(j).config_instance_hdr_id     :=g_returned_inst_tbl(j).config_instance_hdr_id;
49    l_read_inst_tbl(j).config_instance_rev_number :=g_returned_inst_tbl(j).config_instance_rev_number;
50    l_read_inst_tbl(j).config_instance_item_id :=g_returned_inst_tbl(j).config_instance_item_id;
51    l_read_inst_tbl(j).bill_to_site_use_id        :=g_returned_inst_tbl(j).bill_to_site_use_id;
52    l_read_inst_tbl(j).ship_to_site_use_id        :=g_returned_inst_tbl(j).ship_to_site_use_id;
53    l_read_inst_tbl(j).instance_name              :=g_returned_inst_tbl(j).instance_name;
54  end loop;
55  END get_returned_instances;
56 
57 
58 END oe_install_base_util;