1 PACKAGE AHL_UC_TREE_PVT AUTHID CURRENT_USER AS
2 /* $Header: AHLVUCTS.pls 120.1.12020000.2 2012/12/07 15:43:15 sareepar ship $ */
3
4 -- Define Record Type and Table Type for immediate children of a given UC node
5 /*
6 TYPE uc_child_rec_type IS RECORD(
7 node_type VARCHAR2(1),
8 instance_id NUMBER,
9 relationship_id NUMBER,
10 leaf_node_flag VARCHAR2(1),
11 has_subconfig_flag VARCHAR2(1));
12 TYPE uc_child_tbl_type IS TABLE OF uc_child_rec_type INDEX BY BINARY_INTEGER;
13 */
14 -- Define Record Type and Table Type for all descendants of a given UC root node
15 TYPE uc_descendant_rec_type IS RECORD(
16 node_type VARCHAR2(1),
17 instance_id NUMBER,
18 parent_instance_id NUMBER,
19 part_info VARCHAR2(80),
20 relationship_id NUMBER,
21 parent_rel_id NUMBER,
22 position_reference FND_LOOKUPS.meaning%TYPE,
23 position_necessity FND_LOOKUPS.meaning%TYPE,
24 leaf_node_flag VARCHAR2(1),
25 has_subconfig_flag VARCHAR2(1),
26 -- SATHAPLI::Enigma code changes, 26-Aug-2008
27 ata_code AHL_MC_RELATIONSHIPS.ATA_CODE%TYPE);
28 TYPE uc_descendant_tbl_type IS TABLE OF uc_descendant_rec_type INDEX BY BINARY_INTEGER;
29
30 -- Start of Comments --
31 -- Define procedure get_immediate_children
32 -- This API is used to draw the UC tree. For a given node, it will list all of its
33 -- immediate children nodes.
34 --
35 -- Procedure name : get_immediate_children
36 -- Type : Private
37 -- Function : To replace an old instance a new one in a UC tree.
38 -- Pre-reqs :
39 --
40 -- get_immediate_children parameters :
41 -- p_uc_child_rec IN uc_child_rec_type Required
42 -- x_uc_child_tbl OUT uc_child_tbl_type Required
43 -- p_uc_child_rec.leaf_node_flag and
44 -- p_uc_child_rec.has_subconfig_flag can be null
45 -- Version : Initial Version 1.0
46 --
47 -- End of Comments --
48 /*
49 PROCEDURE get_immediate_children(
50 p_api_version IN NUMBER := 1.0,
51 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
52 --p_commit IN VARCHAR2 := FND_API.G_FALSE,
53 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
54 x_return_status OUT NOCOPY VARCHAR2,
55 x_msg_count OUT NOCOPY NUMBER,
56 x_msg_data OUT NOCOPY VARCHAR2,
57 p_uc_parent_rec IN uc_child_rec_type,
58 x_uc_child_tbl OUT NOCOPY uc_child_tbl_type);
59 */
60 -- Start of Comments --
61 -- Define procedure get_immediate_children
62 -- This API is used to draw the UC tree. For a given uc root node, it will list all of its
63 -- descendant nodes.
64 --
65 -- Procedure name : get_whole_uc_tree
66 -- Type : Private
67 -- Function : To replace an old instance a new one in a UC tree.
68 -- Pre-reqs :
69 --
70 -- get_whole_uc_tree parameters :
71 -- p_uc_header_id IN NUMBER Required
72 -- x_uc_descendant_tbl OUT uc_descendant_tbl_type Required
73 -- Version : Initial Version 1.0
74 --
75 -- End of Comments --
76 PROCEDURE get_whole_uc_tree(
77 p_api_version IN NUMBER := 1.0,
78 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
79 --p_commit IN VARCHAR2 := FND_API.G_FALSE,
80 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
81 x_return_status OUT NOCOPY VARCHAR2,
82 x_msg_count OUT NOCOPY NUMBER,
83 x_msg_data OUT NOCOPY VARCHAR2,
84 p_uc_header_id IN NUMBER,
85 x_uc_descendant_tbl OUT NOCOPY uc_descendant_tbl_type);
86
87 -- Start of Comments --
88 -- Define Procedure migrate_uc_tree --
89 -- This API is used to migrate a UC tree to a new MC revision or copy
90 --
91 -- Procedure name : migrate_uc_tree
92 -- Type : Private
93 -- Function : To migrate an existing UC tree to a new MC revision or copy.
94 -- Pre-reqs :
95 --
96 -- migrate_uc_tree parameters :
97 -- p_uc_header_id IN NUMBER Required
98 -- Indicates the UC to be migrated
99 -- p_mc_header_id IN NUMBER Required
100 -- Indicates the new MC to which the UC will be migrated
101 --
102 -- Version : Initial Version 1.0
103 --
104 -- End of Comments --
105 PROCEDURE migrate_uc_tree(
106 p_api_version IN NUMBER,
107 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
108 p_commit IN VARCHAR2 := FND_API.G_FALSE,
109 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
110 x_return_status OUT NOCOPY VARCHAR2,
111 x_msg_count OUT NOCOPY NUMBER,
112 x_msg_data OUT NOCOPY VARCHAR2,
113 p_uc_header_id IN NUMBER,
114 p_mc_header_id IN NUMBER);
115
116 -- Start of Comments --
117 -- Define Procedure remap_uc_subtree --
118 -- This API is used to remap a UC subtree (not a sub-unit) to a MC branch. It is called
119 -- by ahl_uc_instnace_pvt.install_existing_instance.
120 --
121 -- Procedure name : remap_uc_subtree
122 -- Type : Private
123 -- Function : To remap a UC subtree (not a sub-unit) to a MC branch.
124 -- Pre-reqs :
125 --
126 -- remap_uc_subtree parameters :
127 -- p_instance_id IN NUMBER Required
128 -- Indicates the instance id of the UC subtree top node.
129 -- p_relationship_id IN NUMBER Required
130 -- Indicates position id of the MC branch top node.
131 --
132 -- Version : Initial Version 1.0
133 --
134 -- End of Comments --
135 PROCEDURE remap_uc_subtree(
136 p_api_version IN NUMBER,
137 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
138 p_commit IN VARCHAR2 := FND_API.G_FALSE,
139 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
140 x_return_status OUT NOCOPY VARCHAR2,
141 x_msg_count OUT NOCOPY NUMBER,
142 x_msg_data OUT NOCOPY VARCHAR2,
143 p_instance_id IN NUMBER,
144 p_relationship_id IN NUMBER);
145
146 END AHL_UC_TREE_PVT; -- Package spec