1 PACKAGE GMD_VALIDITY_RULES_PVT AUTHID CURRENT_USER AS
2 /* $Header: GMDVRVRS.pls 120.1 2010/11/04 20:08:30 rnalla ship $ */
3
4 m_api_version CONSTANT NUMBER := 1;
5 m_pkg_name CONSTANT VARCHAR2 (30) := 'GMD_VALIDITY_RULES_PVT';
6
7 /* define record and table type to specify the column that needs to
8 updated */
9 TYPE update_table_rec_type IS RECORD
10 (
11 p_col_to_update VARCHAR2(240)
12 ,p_value VARCHAR2(240)
13 );
14
15 TYPE update_tbl_type IS TABLE OF update_table_rec_type INDEX BY BINARY_INTEGER;
16
17 PROCEDURE update_validity_rules
18 ( p_validity_rule_id IN gmd_recipe_validity_rules.recipe_validity_rule_id%TYPE
19 , p_update_table IN GMD_VALIDITY_RULES_PVT.update_tbl_type
20 , x_message_count OUT NOCOPY NUMBER
21 , x_message_list OUT NOCOPY VARCHAR2
22 , x_return_status OUT NOCOPY VARCHAR2
23 );
24
25 -- Commented the section below to make these procedures / functions Private */
26 -- Some of these validation call might be moved to a public later.
27 /*
28 PROCEDURE validate_start_date (P_disp_start_date DATE,
29 P_routing_start_date DATE,
30 x_return_status OUT NOCOPY VARCHAR2);
31
32 PROCEDURE validate_end_date (P_end_date DATE,
33 P_routing_end_date DATE,
34 x_return_status OUT NOCOPY VARCHAR2);
35
36 PROCEDURE effective_dates ( P_start_date DATE,
37 P_end_date DATE,
38 x_return_status OUT NOCOPY VARCHAR2);
39
40 PROCEDURE std_qty(P_std_qty NUMBER,
41 P_min_qty NUMBER,
42 P_max_qty NUMBER,
43 x_return_status OUT NOCOPY VARCHAR2);
44
45 PROCEDURE max_qty(P_min_qty NUMBER,
46 P_max_qty NUMBER,
47 x_return_status OUT NOCOPY VARCHAR2);
48
49 -- this procedure calls gmi stored procedures and copies
50 -- min and max in inv uom into block fields
51 PROCEDURE calc_inv_qtys (P_inv_item_um VARCHAR2,
52 P_item_um VARCHAR2,
53 P_item_id NUMBER,
54 P_min_qty NUMBER,
55 P_max_qty NUMBER,
56 X_inv_min_qty OUT NOCOPY NUMBER,
57 X_inv_max_qty OUT NOCOPY NUMBER,
58 x_return_status OUT NOCOPY VARCHAR2) ;
59
60 PROCEDURE calculate_process_loss( V_assign IN NUMBER DEFAULT 1
61 ,P_vr_id IN NUMBER
62 ,X_TPL OUT NOCOPY NUMBER
63 ,X_PPL OUT NOCOPY NUMBER
64 ,x_return_status OUT NOCOPY VARCHAR2);
65
66 PROCEDURE check_for_duplicate(pRecipe_id NUMBER
67 ,pitem_id NUMBER
68 ,pOrgn_code VARCHAR2 DEFAULT NULL
69 ,pRecipe_Use NUMBER
70 ,pPreference NUMBER
71 ,pstd_qty NUMBER
72 ,pmin_qty NUMBER
73 ,pmax_qty NUMBER
74 ,pinv_max_qty NUMBER
75 ,pinv_min_qty NUMBER
76 ,pitem_um VARCHAR2
77 ,pstart_date DATE
78 ,pend_date DATE DEFAULT NULL
79 ,pPlanned_process_loss NUMBER DEFAULT NULL
80 ,x_return_status OUT NOCOPY VARCHAR2
81 );
82 */
83
84 END GMD_VALIDITY_RULES_PVT;