1 PACKAGE Bom_Rtg_Eam_Util AUTHID CURRENT_USER AS
2 /* $Header: BOMREAMS.pls 115.3 2002/11/21 05:52:08 djebar ship $ */
3 /****************************************************************************
4 --
5 -- Copyright (c) 2001 Oracle Corporation, Redwood Shores, CA, USA
6 -- All rights reserved.
7 --
8 -- FILENAME
9 --
10 -- BOMREAMS.pls
11 --
12 -- DESCRIPTION
13 --
14 -- Spec of package Bom_Rtg_Eam_Util : eAM utility for routing package
15 --
16 -- NOTES
17 --
18 -- HISTORY
19 --
20 -- 12-AUG-01 Masanori Kimizuka Initial Creation
21 --
22 ****************************************************************************/
23 --
24 -- eAM Maintenace Routing Network Link Record
25 --
26 TYPE Op_Nwk_Link_Rec_Type IS RECORD
27 (
28 from_op_seq_id NUMBER
29 , from_op_seq_num NUMBER
30 , to_op_seq_id NUMBER
31 , to_op_seq_num NUMBER
32 , transition_type NUMBER
33 , planning_pct NUMBER
34 , network_seq_num NUMBER
35 , process_flag VARCHAR2(1)
36 ) ;
37
38 TYPE Op_Nwk_Link_Tbl_Type IS TABLE OF Op_Nwk_Link_Rec_Type
39 INDEX BY BINARY_INTEGER;
40
41 --
42 -- Missing Records for Op_Nwk_Link_Rec_Type
43 --
44 G_MISS_OP_NWK_LINK_REC Bom_Rtg_Eam_Util.Op_Nwk_Link_Rec_Type ;
45 G_MISS_OP_NWK_LINK_TBL Bom_Rtg_Eam_Util.Op_Nwk_Link_Tbl_Type ;
46
47 --
48 -- eAM Maintenace Routing Network Operation Node Record
49 --
50 TYPE Op_Node_Rec_Type IS RECORD
51 ( Operation_Sequence_Id NUMBER
52 , Operation_Sequence_Number NUMBER
53 , X_Coordinate NUMBER
54 , Y_Coordinate NUMBER
55 , Transaction_Type VARCHAR2(30)
56 , Return_Status VARCHAR2(1)
57 );
58
59 TYPE Op_Node_Tbl_Type IS TABLE OF Op_Node_Rec_Type
60 INDEX BY BINARY_INTEGER ;
61
62 --
63 -- Missing Records for Op_Node_Rec_Type
64 --
65 G_MISS_OP_NODE_REC Bom_Rtg_Eam_Util.Op_Node_Rec_Type ;
66 G_MISS_OP_NODE_TBL Bom_Rtg_Eam_Util.Op_Node_Tbl_Type ;
67
68
69 TYPE Op_Link_Rec_Type IS RECORD
70 (
71 Assembly_Item_Name VARCHAR2(81)
72 , Organization_Code VARCHAR2(3)
73 , Alternate_Routing_Code VARCHAR2(10)
74 , Operation_Type NUMBER
75 , From_Op_Seq_Id NUMBER
76 , To_Op_Seq_Id NUMBER
77 , New_From_Op_Seq_Id NUMBER
78 , New_To_Op_Seq_Id NUMBER
79 , Transaction_Type VARCHAR2(30)
80 , Return_Status VARCHAR2(1)
81 ) ;
82
83 TYPE Op_Link_Tbl_Type IS TABLE OF Op_Link_Rec_Type
84 INDEX BY BINARY_INTEGER ;
85
86 --
87 -- Missing Records for Op_Node_Rec_Type
88 --
89 G_MISS_OP_NODE_REC Bom_Rtg_Eam_Util.Op_Link_Rec_Type ;
90 G_MISS_OP_NODE_TBL Bom_Rtg_Eam_Util.Op_Link_Rec_Type ;
91
92
93 /*******************************************************************
94 * Procedure : Check_Eam_Rtg_Network
95 * Parameters IN : Routing Sequence Id
96 * Parameters OUT: Error Message
97 * Return Status
98 * Purpose : Procedure will validate for eAM Rtg Network.
99 * This procedure is called by Routing BO and BOMFDONW form
100 *********************************************************************/
101 PROCEDURE Check_Eam_Rtg_Network
102 ( p_routing_sequence_id IN NUMBER
103 , x_err_msg IN OUT NOCOPY VARCHAR2
104 , x_return_status IN OUT NOCOPY VARCHAR2
105 ) ;
106
107
108 /*******************************************************************
109 * Procedure : Check_Eam_Rtg_Network
110 * Parameters IN : Operation Network Exposed Record
111 * Operation Network Unexposed Record
112 * Old Operation Network exposed Record
113 * Old Operation Network Unexposed Record
114 * Mesg Token Table
115 * Parameters OUT: Mesg Token Table
116 * Return Status
117 * Purpose : Procedure will validate for eAM Rtg Network.
118 * This procedure is called by Routing BO and BOMFDONW form
119 *********************************************************************/
120 PROCEDURE Check_Eam_Rtg_Network
121 ( p_op_network_rec IN Bom_Rtg_Pub.Op_Network_Rec_Type
122 , p_op_network_unexp_rec IN Bom_Rtg_Pub.Op_Network_Unexposed_Rec_Type
123 , p_old_op_network_rec IN Bom_Rtg_Pub.Op_Network_Rec_Type
124 , p_old_op_network_unexp_rec IN Bom_Rtg_Pub.Op_Network_Unexposed_Rec_Type
125 , p_mesg_token_tbl IN Error_Handler.Mesg_Token_Tbl_Type
126 , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
127 , x_return_status IN OUT NOCOPY VARCHAR2
128 ) ;
129
130
131 /*******************************************************************
132 * Procedure : Check_Eam_Nwk_FromOp
133 * Parameters IN : From Op Seq Num
134 * From Op Seq Id
135 * To Op Seq Num
136 * To Op Seq Id
137 * Parameters OUT: Error Code
138 * Return Status
139 * Purpose : Procedure will validate for from operation in eAM Rtg Network.
140 *********************************************************************/
141 PROCEDURE Check_Eam_Nwk_FromOp
142 ( p_from_op_seq_num IN NUMBER
143 , p_from_op_seq_id IN NUMBER
144 , p_to_op_seq_num IN NUMBER
145 , p_to_op_seq_id IN NUMBER
146 , x_err_msg IN OUT NOCOPY VARCHAR2
147 , x_return_status IN OUT NOCOPY VARCHAR2
148 ) ;
149
150
151
152 /*******************************************************************
153 * Function : OrgIsEamEnabled
154 * Parameters IN : Org Id
155 * Parameters OUT:
156 * Purpose : Function will return the value of 'Y' or 'N'
157 * to check if organization is eAM enabled.
158 ********************************************************************/
159 FUNCTION OrgIsEamEnabled(p_org_id NUMBER) RETURN VARCHAR2 ;
160
161 /***************************************************************************
162 * Function : CheckShutdownType
163 * Returns : BOOLEAN
164 * Parameters IN : p_shutdown_type
165 * Parameters OUT: None
166 * Purpose : Function will return the value of True or False
167 * to check if ShutdownType is valid.
168 *****************************************************************************/
169 FUNCTION CheckShutdownType(p_shutdown_type IN VARCHAR2 ) RETURN BOOLEAN ;
170
171
172 /***************************************************************************
173 * Function : Check_UpdateDept
174 * Returns : BOOLEAN
175 * Parameters IN : p_op_seq_id, p_org_id, p_dept_id
176 * Parameters OUT: None
177 * Purpose : Function will return the value of True or False
178 * to check if user can update the department for this operation.
179 *****************************************************************************/
180 FUNCTION Check_UpdateDept
181 ( p_op_seq_id IN NUMBER
182 , p_org_id IN NUMBER
183 , p_dept_id IN NUMBER
184 ) RETURN BOOLEAN ;
185
186
187 /****************************************************************************
188 * Procedure : Operation_Nodes
189 * Parameters IN : Operation Node Table
190 * Parameters OUT : Operatin Node Table and Return Status and Messages
191 * Purpose : This procedure will process all the Operation Nodes records.
192 *
193 *****************************************************************************/
194 PROCEDURE Operation_Nodes
195 ( p_op_node_tbl IN Bom_Rtg_Eam_Util.Op_Node_Tbl_Type
196 , x_op_node_tbl IN OUT NOCOPY Bom_Rtg_Eam_Util.Op_Node_Tbl_Type
197 , x_return_mesg IN OUT NOCOPY VARCHAR2
198 , x_return_status IN OUT NOCOPY VARCHAR2
199 ) ;
200
201
202 /****************************************************************************
203 * Procedure : Operation_Links
204 * Parameters IN : Operation Links Table
205 * Parameters OUT : Operatin Links Table and Return Status and Messages
206 * Purpose : This procedure will process all the Operation Link records
207 * using Routing Business Objects.
208 *****************************************************************************/
209 PROCEDURE Operation_Links
210 ( p_op_link_tbl IN Bom_Rtg_Eam_Util.Op_Link_Tbl_Type
211 , x_op_link_tbl IN OUT NOCOPY Bom_Rtg_Eam_Util.Op_Link_Tbl_Type
212 , x_message_list IN OUT NOCOPY Error_Handler.Error_Tbl_Type
213 , x_return_status IN OUT NOCOPY VARCHAR2
214 ) ;
215
216 END Bom_Rtg_Eam_Util ;