DBA Data[Home] [Help]

PACKAGE BODY: APPS.ENG_INVOKE_ECO_BO

Source


1 PACKAGE BODY ENG_Invoke_ECO_Bo AS
2 /* $Header: ENGBIVKB.pls 115.6 2003/04/08 21:15:02 mxgovind ship $ */
3 
4 
5 
6  PROCEDURE Process_Eco
7    (   p_api_version_number        IN  NUMBER  := 1.0
8      ,   p_init_msg_list             IN  BOOLEAN := FALSE
9      ,   x_return_status             OUT NOCOPY VARCHAR2
10      ,   x_msg_count                 OUT NOCOPY NUMBER
11      ,   p_bo_identifier             IN  VARCHAR2 := 'ECO'
12      ,   p_ECO_rec                   IN  ENG_Eco_PUB.Eco_Rec_Type :=
13                                             ENG_Eco_PUB.G_MISS_ECO_REC
14      ,   p_eco_revision_tbl          IN  ENG_Eco_PUB.Eco_Revision_Tbl_Type :=
15                                             ENG_Eco_PUB.G_MISS_ECO_REVISION_TBL
16      ,   p_change_line_tbl          IN  ENG_Eco_PUB.Change_Line_Tbl_Type :=
17                                             ENG_Eco_PUB.G_MISS_CHANGE_LINE_TBL
18      ,   p_revised_item_tbl          IN  ENG_Eco_PUB.Revised_Item_Tbl_Type :=
19                                             ENG_Eco_PUB.G_MISS_REVISED_ITEM_TBL
20      ,   p_rev_component_tbl         IN  Bom_Bo_Pub.Rev_Component_Tbl_Type :=
21                                             ENG_Eco_PUB.G_MISS_REV_COMPONENT_TBL
22      ,   p_ref_designator_tbl        IN  Bom_Bo_Pub.Ref_Designator_Tbl_Type :=
23                                             ENG_Eco_PUB.G_MISS_REF_DESIGNATOR_TBL
24      ,   p_sub_component_tbl         IN  Bom_Bo_Pub.Sub_Component_Tbl_Type :=
25                                             ENG_Eco_PUB.G_MISS_SUB_COMPONENT_TBL
26      ,   p_rev_operation_tbl         IN  Bom_Rtg_Pub.Rev_Operation_Tbl_Type:=
27                                             Bom_Rtg_Pub.G_MISS_REV_OPERATION_TBL
28      ,   p_rev_op_resource_tbl       IN  Bom_Rtg_Pub.Rev_Op_Resource_Tbl_Type:=
29                                             Bom_Rtg_Pub.G_MISS_REV_OP_RESOURCE_TBL
30      ,   p_rev_sub_resource_tbl      IN  Bom_Rtg_Pub.Rev_Sub_Resource_Tbl_Type:=
31                                             Bom_Rtg_Pub.G_MISS_REV_SUB_RESOURCE_TBL
32      ,   x_ECO_rec                   OUT NOCOPY ENG_Eco_PUB.Eco_Rec_Type
33      ,   x_eco_revision_tbl          OUT NOCOPY ENG_Eco_PUB.Eco_Revision_Tbl_Type
34      ,   x_change_line_tbl          OUT NOCOPY ENG_Eco_PUB.Change_Line_Tbl_Type
35      ,   x_revised_item_tbl          OUT NOCOPY ENG_Eco_PUB.Revised_Item_Tbl_Type
36      ,   x_rev_component_tbl         OUT NOCOPY Bom_Bo_Pub.Rev_Component_Tbl_Type
37      ,   x_ref_designator_tbl        OUT NOCOPY Bom_Bo_Pub.Ref_Designator_Tbl_Type
38      ,   x_sub_component_tbl         OUT NOCOPY Bom_Bo_Pub.Sub_Component_Tbl_Type
39      ,   x_rev_operation_tbl         OUT NOCOPY Bom_Rtg_Pub.Rev_Operation_Tbl_Type
40      ,   x_rev_op_resource_tbl       OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Resource_Tbl_Type
41      ,   x_rev_sub_resource_tbl      OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Resource_Tbl_Type
42      ,   p_debug                     IN  VARCHAR2 := 'N'
43      ,   p_output_dir                IN  VARCHAR2 := NULL
44      ,   p_debug_filename            IN  VARCHAR2 := 'ECO_BO_Debug.log'
45    )
46 
47 IS
48 
49 BEGIN
50        ENG_Eco_PUB.Process_ECO
51        (   p_api_version_number        =>  p_api_version_number
52        ,   p_init_msg_list             =>  p_init_msg_list
53        ,   x_return_status             =>  x_return_status
54        ,   x_msg_count                 =>  x_msg_count
55        ,   p_bo_identifier             =>  p_bo_identifier
56        ,   p_ECO_rec                   =>  p_ECO_rec
57        ,   p_eco_revision_tbl          =>  p_eco_revision_tbl
58        ,   p_change_line_tbl           =>  p_change_line_tbl
59        ,   p_revised_item_tbl          =>  p_revised_item_tbl
60        ,   p_rev_component_tbl         =>  p_rev_component_tbl
61        ,   p_ref_designator_tbl        =>  p_ref_designator_tbl
62        ,   p_sub_component_tbl         =>  p_sub_component_tbl
63        ,   p_rev_operation_tbl         =>  p_rev_operation_tbl
64        ,   p_rev_op_resource_tbl       =>  p_rev_op_resource_tbl
65        ,   p_rev_sub_resource_tbl      =>  p_rev_sub_resource_tbl
66        ,   x_ECO_rec                   =>  x_ECO_rec
67        ,   x_eco_revision_tbl          =>  x_eco_revision_tbl
68        ,   x_change_line_tbl          =>  x_change_line_tbl
69        ,   x_revised_item_tbl          =>  x_revised_item_tbl
70        ,   x_rev_component_tbl         =>  x_rev_component_tbl
71        ,   x_ref_designator_tbl        =>  x_ref_designator_tbl
72        ,   x_sub_component_tbl         =>  x_sub_component_tbl
73        ,   x_rev_operation_tbl         =>  x_rev_operation_tbl
74        ,   x_rev_op_resource_tbl       =>  x_rev_op_resource_tbl
75        ,   x_rev_sub_resource_tbl      =>  x_rev_sub_resource_tbl
76        ,   p_debug                     =>  p_debug
77        ,   p_output_dir                =>  p_output_dir
78        ,   p_debug_filename            =>  p_debug_filename
79       );
80 
81 END Process_Eco ;
82 
83  -- Invoker for Error_Handler procedures/functions
84 PROCEDURE Initialize
85 IS
86 BEGIN
87 
88    Error_Handler.Initialize ;
89 
90 END Initialize ;
91 
92 PROCEDURE Reset
93 IS
94 BEGIN
95    Error_Handler.Reset ;
96 
97 END Reset ;
98 
99 PROCEDURE Get_Message_List
100    ( x_message_list    OUT NOCOPY Error_Handler.Error_Tbl_Type)
101 IS
102 BEGIN
103 
104    Error_Handler.Get_Message_List
105    ( x_message_list    => x_message_list ) ;
106 
107 END Get_Message_List ;
108 
109 PROCEDURE Get_Entity_Message
110    ( p_entity_id      IN  VARCHAR2
111    , x_message_list   OUT NOCOPY Error_Handler.Error_Tbl_Type
112    )
113 IS
114 BEGIN
115 
116    Error_Handler.Get_Entity_Message
117    ( p_entity_id      => p_entity_id
118    , x_message_list   => x_message_list
119    ) ;
120 
121 END Get_Entity_Message ;
122 
123 PROCEDURE Get_Entity_Message
124    ( p_entity_id      IN  VARCHAR2
125    , p_entity_index   IN  NUMBER
126    , x_message_list   OUT NOCOPY Error_Handler.Error_Tbl_Type
127    )
128 IS
129 BEGIN
130 
131    Error_Handler.Get_Entity_Message
132    ( p_entity_id      => p_entity_id
133    , p_entity_index   => p_entity_index
134    , x_message_list   => x_message_list
135    ) ;
136 
137 END Get_Entity_Message ;
138 
139 
140 PROCEDURE Delete_Message
141    ( p_entity_id          IN  VARCHAR2
142    , p_entity_index       IN  NUMBER
143    )
144 IS
145 BEGIN
146 
147    Error_Handler.Delete_Message
148    ( p_entity_id      => p_entity_id
149    , p_entity_index   => p_entity_index
150    );
151 
152 END Delete_Message ;
153 PROCEDURE Delete_Message
154    (  p_entity_id          IN  VARCHAR2 )
155 IS
156 BEGIN
157 
158    Error_Handler.Delete_Message
159    ( p_entity_id      => p_entity_id ) ;
160 
161 END Delete_Message ;
162 
163 PROCEDURE Get_Message
164    ( x_message_text   OUT NOCOPY VARCHAR2
165    , x_entity_index   OUT NOCOPY NUMBER
166    , x_entity_id      OUT NOCOPY VARCHAR2
167    , x_message_type   OUT NOCOPY VARCHAR2
168    )
169 IS
170 BEGIN
171 
172    Error_Handler.Get_Message
173    ( x_message_text   => x_message_text
174    , x_entity_index   => x_entity_index
175    , x_entity_id      => x_entity_id
176    , x_message_type   => x_message_type
177    ) ;
178 
179 
180 END Get_Message ;
181 FUNCTION Get_Message_Count RETURN NUMBER
182 IS
183 BEGIN
184 
185    RETURN Error_Handler.Get_Message_Count ;
186 
187 END Get_Message_Count ;
188 
189 PROCEDURE Dump_Message_List
190 IS
191 BEGIN
192 
193    Error_Handler.Dump_Message_List ;
194 
195 END Dump_Message_List ;
196 
197 -- Invoker for FND_GLOBAL.APPS_INITIALIZE
198 PROCEDURE Apps_Initialize
199    ( user_id           IN NUMBER
200     ,resp_id           IN NUMBER
201     ,resp_appl_id      IN NUMBER
202     ,security_group_id IN NUMBER  default 0
203    )
204 IS
205 BEGIN
206 
207    FND_GLOBAL.Apps_Initialize
208    ( user_id           => user_id
209     ,resp_id           => resp_id
210     ,resp_appl_id      => resp_appl_id
211     ,security_group_id => security_group_id
212    ) ;
213 
214 END Apps_Initialize  ;
215 
216 END  ENG_Invoke_ECO_Bo;