DBA Data[Home] [Help]

PACKAGE: APPS.GMDRTVAL_PUB

Source


1 PACKAGE GMDRTVAL_PUB AUTHID CURRENT_USER AS
2 /* $Header: GMDPRTVS.pls 120.6 2009/03/23 17:18:46 rnalla ship $ */
3 
4 /* Subtypes */
5 /* ======== */
6 
7 /* Error Return Code Constants: */
8 /* =========================== */
9 GMD_ROUTING_EXISTS        CONSTANT INTEGER := -50;  /*Duplicate Routing. */
10 GMD_INV_ROUTING_CLASS     CONSTANT INTEGER := -51;  /*Routing class is not valid. */
11 GMD_DUP_ROUTINGSTEP_NO    CONSTANT INTEGER := -52;  /*Duplicate routing step number. */
12 GMD_INV_OPRN              CONSTANT INTEGER := -53;  /*Invalid operation. */
13 
14 /* Table types */
15 TYPE max_qty_tbl IS TABLE OF NUMBER
16 	INDEX BY BINARY_INTEGER;
17 
18 /* Functions and Procedures */
19 /* ======================== */
20 FUNCTION get_theoretical_process_loss(prouting_class IN VARCHAR2, pquantity IN NUMBER) RETURN NUMBER;
21 FUNCTION get_fixed_process_loss(prouting_class IN VARCHAR2) RETURN NUMBER; /* B6811759 */
22 FUNCTION check_duplicate_routing(prouting_no IN VARCHAR2,
23                                  prouting_vers IN NUMBER,
24                                  pcalledby_form IN VARCHAR2 DEFAULT 'F') RETURN NUMBER;
25 FUNCTION check_routing_class(prouting_class IN VARCHAR2, pcalledby_form IN VARCHAR2 DEFAULT 'F') RETURN NUMBER;
26 FUNCTION check_routingstep_no(proutingstep_no IN NUMBER, prouting_id IN NUMBER,
27                               pcalledby_form IN VARCHAR2 DEFAULT 'F') RETURN NUMBER;
28 
29 FUNCTION check_oprn(poprn_no IN VARCHAR2 DEFAULT NULL, poprn_vers IN NUMBER DEFAULT NULL,
30                     prouting_start_date IN DATE DEFAULT NULL,
31                     pcalledby_form IN VARCHAR2 DEFAULT 'F',
32                     poprn_id IN NUMBER DEFAULT NULL,
33                     prouting_end_date IN DATE DEFAULT NULL) RETURN NUMBER;
34 
35 PROCEDURE check_routing(pRouting_no 	IN 	VARCHAR2,
36 			pRouting_vers 	IN 	NUMBER,
37 			xRouting_id 	IN OUT NOCOPY 	NUMBER,
38 			xReturn_status	OUT NOCOPY 	VARCHAR2);
39 FUNCTION circular_dependencies_exist (pparent_key IN NUMBER, pcalled_from_batch IN NUMBER DEFAULT 0)
40          RETURN BOOLEAN;
41 PROCEDURE generate_step_dependencies(prouting_id IN NUMBER, x_return_status OUT NOCOPY VARCHAR2);
42 
43 /* Added by Shyam - Overloaded procedure*/
44 PROCEDURE generate_step_dependencies(prouting_id IN NUMBER, pDep_type NUMBER, x_return_status OUT NOCOPY VARCHAR2);
45 
46 PROCEDURE  Get_process_loss_max_qtys(	pRouting_class 	IN 	VARCHAR2,
47 					pFromMaxQty 	IN 	NUMBER,
48 					pToMaxQty	IN 	NUMBER,
49 					max_quantity	OUT NOCOPY 	max_qty_tbl ,
50 					x_return_status	OUT NOCOPY 	VARCHAR2);
51 
52 /* Added by Shyam  for Routing Designer*/
53 PROCEDURE  get_routingstep_info(pRouting_id       IN     gmd_routings.routing_id%TYPE := NULL
54                                ,pxRoutingStep_no  IN OUT NOCOPY fm_rout_dtl.routingStep_no%TYPE
55                                ,pxRoutingStep_id  IN OUT NOCOPY fm_rout_dtl.routingStep_id%TYPE
56                                ,x_return_status   OUT NOCOPY    VARCHAR2 );
57 
58 PROCEDURE Validate_Routing_Details( pRouting_id      IN   NUMBER,
59                                     x_msg_count	     OUT NOCOPY  NUMBER,
60                                     x_msg_stack	     OUT NOCOPY  VARCHAR2,
61                                     x_return_status  OUT NOCOPY  VARCHAR2);
62 
63 PROCEDURE Validate_Routing_VR_Dates( pRouting_id      IN   NUMBER,
64                                      x_msg_count      OUT NOCOPY  NUMBER,
65                                      x_msg_stack      OUT NOCOPY  VARCHAR2,
66                                      x_return_status  OUT NOCOPY  VARCHAR2);
67 
68 PROCEDURE Update_VR_with_Rt_Dates( pRouting_id      IN   NUMBER,
69                                    x_msg_count      OUT NOCOPY  NUMBER,
70                                    x_msg_stack      OUT NOCOPY  VARCHAR2,
71                                    x_return_status  OUT NOCOPY  VARCHAR2);
72 
73 FUNCTION Check_routing_override_exists(p_routingstep_id NUMBER) RETURN BOOLEAN;
74 
75 PROCEDURE check_delete_mark(pdelete_mark IN NUMBER,x_return_status OUT NOCOPY  VARCHAR2);
76 
77 PROCEDURE check_ownerorgn_code(powner_id IN NUMBER,powner_orgn IN VARCHAR2,x_return_status OUT NOCOPY  VARCHAR2);
78 
79 
80 PROCEDURE check_deprouting (prouting_id          IN     gmd_routings.routing_id%TYPE
81                            ,proutingStep_no      IN     fm_rout_dtl.routingStep_no%TYPE
82                            ,pdeproutingStep_no   IN     fm_rout_dep.dep_routingStep_no%TYPE
83                            ,x_return_status      OUT NOCOPY VARCHAR2);
84 
85 
86 END;