1 PACKAGE BOM_RTG_NETWORK_VALIDATE_API AUTHID CURRENT_USER AS
2 /* $Header: BOMRNWVS.pls 115.0 99/07/26 17:43:54 porting ship $ */
3
4 TYPE Lnk_Record_Type IS RECORD
5 ( from_op_seq_id NUMBER,
6 to_op_seq_id NUMBER,
7 flag VARCHAR2(1));
8
9 TYPE Lnk_Tbl_Type IS TABLE OF Lnk_Record_Type
10 INDEX BY BINARY_INTEGER;
11
12 TYPE Op_Record_Type IS RECORD
13 ( operation_seq_id NUMBER,
14 operation_seq_num NUMBER);
15
16 TYPE Op_Tbl_Type IS TABLE OF Op_Record_Type
17 INDEX BY BINARY_INTEGER;
18 /*-------------------------------------------------------------------------
19 Name
20 validate_routing_network
21
22 Description
23 This PROCEDURE validates the Routing Network. A check for loops
24 is performed before checking for any broken links in the network.
25
26 Returns
27 x_status - Status of the validation.
28 x_message - If a loop/broken link exists, the nodes where it
29 exists is returned.
30 +--------------------------------------------------------------------------*/
31
32 PROCEDURE validate_routing_network(
33 p_rtg_sequence_id IN NUMBER,
34 p_assy_item_id IN NUMBER,
35 p_org_id IN NUMBER,
36 p_alt_rtg_desig IN VARCHAR2 DEFAULT NULL,
37 p_operation_type IN NUMBER,
38 x_status OUT VARCHAR2,
39 x_message OUT VARCHAR2);
40
41
42 END BOM_RTG_NETWORK_VALIDATE_API;