DBA Data[Home] [Help]

PACKAGE: APPS.GMD_RECIPE_VAL

Source


1 PACKAGE GMD_RECIPE_VAL AUTHID CURRENT_USER AS
2 /* $Header: GMDRVALS.pls 120.0 2005/05/30 02:07:33 appldev noship $ */
3 /*
4 /* --  API name: GMD_RECIPE_VAL  */
5 /*--  Type:  Group (or public???) */
6 /*--  Function: Validate entities within a recipe */
7 /*--  Pre-reqs: none */
8 /*--  Common Parameters for procedures: */
9 /*--    IN:  p_api_version   IN NUMBER */
10 /*--         p_init_msg_list IN VARCHAR2  optional default = FND_API.G_FALSE */
11 /*--         p_commit        IN VARCHAR2  optional default = FND_API.G_FALSE */
12 /*--         p_validation_level IN NUMBER optional */
13 /*--                                      default = FND_API.G_VALID_LEVEL_FULL */
14 /*--         (specific parameters) */
15 /*--    OUT: x_return_status OUT VARCHAR2(1) */
16 /*--         x_msg_count     OUT NUMBER */
17 /*--         x_msg_data      OUT VARCHAR2(2000) */
18 /*--         x_tbl_qcspecs   OUT t_qcspec_rec_tbl  (columns from qc_spec_mst) */
19 /*--         x_return_code   OUT NUMBER   number of rows in x_tbl_qcspecs or */
20 /*--                                      sql error code */
21 /*--  */
22 /*--  Version:  1.0  */
23 /*--  recipe_exists           in: id, no, vers;  out: id  */
24 /*--  recipe_name             in: name, version, action_code; out: id */
25 /*--  recipe_for_update       in: recipe_id, last_update_date, asynch or form; */
26 /*--                              out: lock row */
27 /*--  recipe_description      in: description; out: success or failure */
28 /*--  recipe_orgn_code        in: orgn_code, user_id; out: plant_ind */
29 /*--  process_loss_for_update  in:  recipe_id, orgn_code; out: lock row */
30 /*--  recipe_cust_exists      in: recipe_id, customer_id, out: success or failure */
31  /*    Sukarna Reddy dt 03/14/02. Bug 2099699. */
32 /*--  CHECK_ROUTING_VALIDITY :p_routing_id , p_recipe_status out: true or false */
33 /*-- */
34 /*--  Notes: */
35 /*--  End of comments ******************************************************* */
36 
37 
38   TYPE t_recipe_cust_tbl IS TABLE OF gmd_recipe_customers%ROWTYPE
39         INDEX BY BINARY_INTEGER;
40 
41   x_recipes_rec          gmd_recipes%ROWTYPE;
42 
43   empty_recipecust_tbl   t_recipe_cust_tbl;
44 
45   m_pkg_name      CONSTANT VARCHAR2 (30)  := 'GMD_VALIDITY_RULES_PVT';
46 
47 
48 
49 PROCEDURE recipe_exists
50               ( p_api_version      IN NUMBER,
51                 p_init_msg_list    IN VARCHAR2 := FND_API.G_FALSE,
52                 p_commit           IN VARCHAR2 := FND_API.G_FALSE,
53                 p_validation_level IN NUMBER   := FND_API.G_VALID_LEVEL_NONE,
54                 p_recipe_id        IN NUMBER,
55                 p_recipe_no        IN VARCHAR2,
56                 p_recipe_version   IN NUMBER,
57                 x_return_status    OUT NOCOPY  VARCHAR2,
58                 x_msg_count        OUT NOCOPY  NUMBER,
59                 x_msg_data         OUT NOCOPY  VARCHAR2,
60                 x_return_code      OUT NOCOPY  NUMBER,
61                 x_recipe_id        OUT NOCOPY  NUMBER);
65               ( p_api_version      IN NUMBER,
62 
63 
64 PROCEDURE recipe_name
66                 p_init_msg_list    IN VARCHAR2 := FND_API.G_FALSE,
67                 p_commit           IN VARCHAR2 := FND_API.G_FALSE,
68                 p_validation_level IN NUMBER   := FND_API.G_VALID_LEVEL_NONE,
69                 p_recipe_no        IN VARCHAR2,
70                 p_recipe_version   IN NUMBER,
71                 p_action_code      IN VARCHAR2  := 'U',
72                 x_return_status    OUT NOCOPY  VARCHAR2,
73                 x_msg_count        OUT NOCOPY  NUMBER,
74                 x_msg_data         OUT NOCOPY  VARCHAR2,
75                 x_return_code      OUT NOCOPY  NUMBER,
76                 x_recipe_id        OUT NOCOPY  NUMBER);
77 
78 PROCEDURE   recipe_for_update
79               ( p_api_version      IN NUMBER,
80                 p_init_msg_list    IN VARCHAR2 := FND_API.G_FALSE,
81                 p_commit           IN VARCHAR2 := FND_API.G_FALSE,
82                 p_validation_level IN NUMBER   := FND_API.G_VALID_LEVEL_NONE,
83                 p_recipe_id        IN NUMBER,
84                 p_last_update_date IN DATE,
85                 p_form_or_asynch   IN VARCHAR2 := 'A',
86                 x_return_status    OUT NOCOPY  VARCHAR2,
87                 x_msg_count        OUT NOCOPY  NUMBER,
88                 x_msg_data         OUT NOCOPY  VARCHAR2,
89                 x_return_code      OUT NOCOPY  NUMBER);
90 
91 
92 PROCEDURE   recipe_description
93               ( p_api_version      IN NUMBER,
94                 p_init_msg_list    IN VARCHAR2 := FND_API.G_FALSE,
95                 p_commit           IN VARCHAR2 := FND_API.G_FALSE,
96                 p_validation_level IN NUMBER   := FND_API.G_VALID_LEVEL_NONE,
97                 p_recipe_description IN VARCHAR2,
98                 x_return_status    OUT NOCOPY  VARCHAR2,
99                 x_msg_count        OUT NOCOPY  NUMBER,
100                 x_msg_data         OUT NOCOPY  VARCHAR2,
101                 x_return_code      OUT NOCOPY  NUMBER);
102 
103 
104 PROCEDURE   recipe_orgn_code
105               ( p_api_version      IN NUMBER,
106                 p_init_msg_list    IN VARCHAR2 := FND_API.G_FALSE,
107                 p_commit           IN VARCHAR2 := FND_API.G_FALSE,
108                 p_validation_level IN NUMBER   := FND_API.G_VALID_LEVEL_NONE,
109                 g_orgn_id          IN NUMBER,
110                 g_user_id          IN NUMBER,
111                 p_required_ind     IN VARCHAR2 := 'N',
112                 x_return_status    OUT NOCOPY  VARCHAR2,
113                 x_msg_count        OUT NOCOPY  NUMBER,
114                 x_msg_data         OUT NOCOPY  VARCHAR2,
115                 x_return_code      OUT NOCOPY  NUMBER,
116                 x_plant_ind        OUT NOCOPY  NUMBER,
117 		x_lab_ind          OUT NOCOPY  NUMBER);
118 
119 PROCEDURE   process_loss_for_update
120               ( p_api_version      IN NUMBER,
121                 p_init_msg_list    IN VARCHAR2 := FND_API.G_FALSE,
122                 p_commit           IN VARCHAR2 := FND_API.G_FALSE,
123                 p_validation_level IN NUMBER   := FND_API.G_VALID_LEVEL_NONE,
124                 p_recipe_id        IN NUMBER,
125                 p_orgn_id          IN NUMBER,
126                 p_last_update_date IN DATE,
127                 p_form_or_asynch   IN VARCHAR2 := 'A',
128                 x_return_status    OUT NOCOPY  VARCHAR2,
129                 x_msg_count        OUT NOCOPY  NUMBER,
130                 x_msg_data         OUT NOCOPY  VARCHAR2,
131                 x_return_code      OUT NOCOPY  NUMBER);
132 
133 PROCEDURE recipe_cust_exists
134               ( p_api_version      IN NUMBER,
135                 p_init_msg_list    IN VARCHAR2 := FND_API.G_FALSE,
136                 p_commit           IN VARCHAR2 := FND_API.G_FALSE,
137                 p_validation_level IN NUMBER   := FND_API.G_VALID_LEVEL_NONE,
138                 p_recipe_id        IN NUMBER,
139                 p_customer_id      IN NUMBER,
140                 x_return_status    OUT NOCOPY  VARCHAR2,
141                 x_msg_count        OUT NOCOPY  NUMBER,
142                 x_msg_data         OUT NOCOPY  VARCHAR2,
143                 x_return_code      OUT NOCOPY  NUMBER);
144 
145 FUNCTION check_routing_validity(p_routing_id     IN NUMBER,
146                                 p_recipe_status  IN VARCHAR2) RETURN BOOLEAN;
147 
148 
149 
150   /* Added by Shyam : new procedures for Validity Rules */
151   PROCEDURE validate_start_date (P_disp_start_date  DATE,
152                                  P_routing_start_date DATE,
153                                  x_return_status OUT NOCOPY VARCHAR2);
154 
155   PROCEDURE validate_end_date (P_end_date  DATE,
156                                P_routing_end_date DATE,
157                                x_return_status OUT NOCOPY VARCHAR2);
158 
159   PROCEDURE effective_dates ( P_start_date DATE,
160                               P_end_date DATE,
161                               x_return_status OUT NOCOPY VARCHAR2);
162 
163   PROCEDURE std_qty(P_std_qty NUMBER,
164                     P_min_qty NUMBER,
165                     P_max_qty NUMBER,
166                     x_return_status OUT NOCOPY VARCHAR2);
167 
168   PROCEDURE max_qty(P_min_qty NUMBER,
169                     P_max_qty NUMBER,
170                     x_return_status OUT NOCOPY VARCHAR2);
171 
172   -- this procedure calls gmi stored procedures and copies
173   -- min and max in inv uom into block fields
174   PROCEDURE calc_inv_qtys (P_inv_item_um VARCHAR2,
175                            P_item_um VARCHAR2,
176                            P_item_id NUMBER,
177                            P_min_qty NUMBER,
178                            P_max_qty NUMBER,
179                            X_inv_min_qty OUT NOCOPY NUMBER,
180                            X_inv_max_qty OUT NOCOPY NUMBER,
181                            x_return_status OUT NOCOPY VARCHAR2) ;
182 
183   PROCEDURE calculate_process_loss( V_assign 	IN	NUMBER DEFAULT 1
184                                    ,P_vr_id   IN  NUMBER
185                                    ,X_TPL      OUT NOCOPY NUMBER
186                                    ,X_PPL      OUT NOCOPY NUMBER
187                                    ,x_return_status OUT NOCOPY VARCHAR2);
188 
189   PROCEDURE check_for_duplicate(pRecipe_id NUMBER
190                                ,pitem_id NUMBER
191                                ,pOrgn_id NUMBER DEFAULT NULL
192                                ,pRecipe_Use NUMBER
193                                ,pPreference NUMBER
194                                ,pstd_qty NUMBER
195                                ,pmin_qty NUMBER
196                                ,pmax_qty NUMBER
197                                ,pinv_max_qty NUMBER
198                                ,pinv_min_qty NUMBER
199                                ,pitem_um VARCHAR2
200                                ,pValidity_Rule_Status  VARCHAR2
201                                ,pstart_date DATE
202                                ,pend_date DATE DEFAULT NULL
203                                ,pPlanned_process_loss NUMBER DEFAULT NULL
204                                ,x_return_status OUT NOCOPY VARCHAR2
205                                );
206 
207 
208 
209 END GMD_RECIPE_VAL;