DBA Data[Home] [Help]

PACKAGE: APPS.GMIVDX

Source


1 PACKAGE GMIVDX AS
2 /* $Header: GMIVDXS.pls 120.1 2005/07/12 14:59:45 jsrivast noship $
3  +==========================================================================+
4  |                   Copyright (c) 1998 Oracle Corporation                  |
5  |                          Redwood Shores, CA, USA                         |
6  |                            All rights reserved.                          |
7  +==========================================================================+
8  | FILE NAME                                                                |
9  |    GMIVDXS.pls                                                           |
10  |                                                                          |
11  | PACKAGE NAME                                                             |
12  |    GMIVDX                                                                |
13  |                                                                          |
14  | TYPE                                                                     |
15  |   Private                                                                |
16  | DESCRIPTION                                                              |
17  |    This package contains the private APIs for Process / Discrete Transfer|
18  |                                                                          |
19  | CONTENTS                                                                 |
20  |    Create_discrete_transfer_pvt                                          |
21  |    Validate_transfer                                                     |
22  |    construct_post_records                                                |
23  |                                                                          |
24  | HISTORY                                                                  |
25  |    Created - Jalaj Srivastava                                            |
26  |                                                                          |
27  |                                                                          |
28  +==========================================================================+
29 */
30 
31 /* Record Type Declaration */
32 
33 TYPE hdr_type IS RECORD
34 (
35  orgn_code	        	gmi_discrete_transfers.orgn_code%TYPE
36 ,co_code                	gmi_discrete_transfers.co_code%TYPE
37 ,transfer_number		gmi_discrete_transfers.transfer_number%TYPE
38 ,transfer_type	        	gmi_discrete_transfers.transfer_type%TYPE
39 ,trans_date	        	gmi_discrete_transfers.trans_date%TYPE
40 ,comments	        	gmi_discrete_transfers.comments%TYPE
41 ,attribute_category		gmi_discrete_transfers.attribute_category%TYPE
42 ,attribute1	        	gmi_discrete_transfers.attribute1%TYPE
43 ,attribute2	        	gmi_discrete_transfers.attribute2%TYPE
44 ,attribute3	        	gmi_discrete_transfers.attribute3%TYPE
45 ,attribute4	        	gmi_discrete_transfers.attribute4%TYPE
46 ,attribute5	        	gmi_discrete_transfers.attribute5%TYPE
47 ,attribute6	        	gmi_discrete_transfers.attribute6%TYPE
48 ,attribute7	        	gmi_discrete_transfers.attribute7%TYPE
49 ,attribute8	        	gmi_discrete_transfers.attribute8%TYPE
50 ,attribute9	        	gmi_discrete_transfers.attribute9%TYPE
51 ,attribute10	        	gmi_discrete_transfers.attribute10%TYPE
52 ,attribute11	        	gmi_discrete_transfers.attribute11%TYPE
53 ,attribute12	        	gmi_discrete_transfers.attribute12%TYPE
54 ,attribute13        		gmi_discrete_transfers.attribute13%TYPE
55 ,attribute14	        	gmi_discrete_transfers.attribute14%TYPE
56 ,attribute15	        	gmi_discrete_transfers.attribute15%TYPE
57 ,attribute16	        	gmi_discrete_transfers.attribute16%TYPE
58 ,attribute17	        	gmi_discrete_transfers.attribute17%TYPE
59 ,attribute18	        	gmi_discrete_transfers.attribute18%TYPE
60 ,attribute19	        	gmi_discrete_transfers.attribute19%TYPE
61 ,attribute20	        	gmi_discrete_transfers.attribute20%TYPE
62 ,attribute21            	gmi_discrete_transfers.attribute21%TYPE
63 ,attribute22            	gmi_discrete_transfers.attribute22%TYPE
64 ,attribute23            	gmi_discrete_transfers.attribute23%TYPE
65 ,attribute24            	gmi_discrete_transfers.attribute24%TYPE
66 ,attribute25            	gmi_discrete_transfers.attribute25%TYPE
67 ,attribute26            	gmi_discrete_transfers.attribute26%TYPE
68 ,attribute27            	gmi_discrete_transfers.attribute27%TYPE
69 ,attribute28            	gmi_discrete_transfers.attribute28%TYPE
70 ,attribute29            	gmi_discrete_transfers.attribute29%TYPE
71 ,attribute30            	gmi_discrete_transfers.attribute30%TYPE
72 /* ****************************************************************** */
73 ,assignment_type        	sy_docs_seq.assignment_type%TYPE
74 ,transaction_header_id          NUMBER
75 );
76 
77 TYPE line_type IS RECORD
78 (
79  line_no	                gmi_discrete_transfer_lines.line_no%TYPE
80 ,opm_item_id	                gmi_discrete_transfer_lines.opm_item_id%TYPE
81 ,opm_whse_code	                gmi_discrete_transfer_lines.opm_whse_code%TYPE
82 ,opm_location	                gmi_discrete_transfer_lines.opm_location%TYPE
83 ,opm_lot_id	                gmi_discrete_transfer_lines.opm_lot_id%TYPE
84 ,opm_lot_expiration_date	gmi_discrete_transfer_lines.opm_lot_expiration_date%TYPE
85 ,opm_lot_status	                gmi_discrete_transfer_lines.opm_lot_status%TYPE
86 ,opm_grade	                gmi_discrete_transfer_lines.opm_grade%TYPE
87 ,opm_charge_acct_id	        gmi_discrete_transfer_lines.opm_charge_acct_id%TYPE
88 ,opm_charge_au_id	        gmi_discrete_transfer_lines.opm_charge_au_id%TYPE
89 ,opm_reason_code	        gmi_discrete_transfer_lines.opm_reason_code%TYPE
90 ,odm_inv_organization_id	gmi_discrete_transfer_lines.odm_inv_organization_id%TYPE
91 ,odm_item_id	                gmi_discrete_transfer_lines.odm_item_id%TYPE
92 ,odm_item_revision              gmi_discrete_transfer_lines.odm_item_revision%TYPE
93 ,odm_subinventory	        gmi_discrete_transfer_lines.odm_subinventory%TYPE
94 ,odm_locator_id	                gmi_discrete_transfer_lines.odm_locator_id%TYPE
95 ,odm_lot_number	                VARCHAR2(80)
96 ,odm_lot_expiration_date	gmi_discrete_transfer_lines.odm_lot_expiration_date%TYPE
97 ,odm_charge_account_id	        gmi_discrete_transfer_lines.odm_charge_account_id%TYPE
98 ,odm_period_id	                gmi_discrete_transfer_lines.odm_period_id%TYPE
99 ,odm_unit_cost	                gmi_discrete_transfer_lines.odm_unit_cost%TYPE
100 ,odm_reason_id                  gmi_discrete_transfer_lines.odm_reason_id%TYPE
101 ,quantity	                gmi_discrete_transfer_lines.quantity%TYPE
102 ,quantity_um	                gmi_discrete_transfer_lines.quantity_um%TYPE
103 ,quantity2	                gmi_discrete_transfer_lines.quantity2%TYPE
104 ,opm_primary_quantity           gmi_discrete_transfer_lines.opm_primary_quantity%TYPE
105 ,odm_primary_quantity     	gmi_discrete_transfer_lines.odm_primary_quantity%TYPE
106 ,lot_level                      gmi_discrete_transfer_lines.lot_level%TYPE
107 ,attribute_category	        gmi_discrete_transfer_lines.attribute_category%TYPE
108 ,attribute1	                gmi_discrete_transfer_lines.attribute1%TYPE
109 ,attribute2	                gmi_discrete_transfer_lines.attribute2%TYPE
110 ,attribute3	                gmi_discrete_transfer_lines.attribute3%TYPE
111 ,attribute4	                gmi_discrete_transfer_lines.attribute4%TYPE
112 ,attribute5	                gmi_discrete_transfer_lines.attribute5%TYPE
113 ,attribute6	                gmi_discrete_transfer_lines.attribute6%TYPE
114 ,attribute7	                gmi_discrete_transfer_lines.attribute7%TYPE
115 ,attribute8	                gmi_discrete_transfer_lines.attribute8%TYPE
116 ,attribute9	                gmi_discrete_transfer_lines.attribute9%TYPE
117 ,attribute10	                gmi_discrete_transfer_lines.attribute10%TYPE
118 ,attribute11	                gmi_discrete_transfer_lines.attribute11%TYPE
119 ,attribute12	                gmi_discrete_transfer_lines.attribute12%TYPE
120 ,attribute13	                gmi_discrete_transfer_lines.attribute13%TYPE
121 ,attribute14	                gmi_discrete_transfer_lines.attribute14%TYPE
122 ,attribute15	                gmi_discrete_transfer_lines.attribute15%TYPE
123 ,attribute16	                gmi_discrete_transfer_lines.attribute16%TYPE
124 ,attribute17	                gmi_discrete_transfer_lines.attribute17%TYPE
125 ,attribute18	                gmi_discrete_transfer_lines.attribute18%TYPE
126 ,attribute19	                gmi_discrete_transfer_lines.attribute19%TYPE
127 ,attribute20	                gmi_discrete_transfer_lines.attribute20%TYPE
128 ,attribute21                    gmi_discrete_transfer_lines.attribute21%TYPE
129 ,attribute22                    gmi_discrete_transfer_lines.attribute22%TYPE
130 ,attribute23                    gmi_discrete_transfer_lines.attribute23%TYPE
131 ,attribute24                    gmi_discrete_transfer_lines.attribute24%TYPE
132 ,attribute25                    gmi_discrete_transfer_lines.attribute25%TYPE
133 ,attribute26                    gmi_discrete_transfer_lines.attribute26%TYPE
134 ,attribute27                    gmi_discrete_transfer_lines.attribute27%TYPE
135 ,attribute28                    gmi_discrete_transfer_lines.attribute28%TYPE
136 ,attribute29                    gmi_discrete_transfer_lines.attribute29%TYPE
137 ,attribute30                    gmi_discrete_transfer_lines.attribute30%TYPE
138 /* *********************************************************************** */
139 ,opm_item_no                    ic_item_mst.item_no%TYPE
140 ,lot_control                    NUMBER /* same as OPM item lot control flag */
141 /* Jalaj Srivastava Bug 3812701 */
142 ,odm_quantity_uom_code          mtl_units_of_measure.uom_code%TYPE
143 /* *************************************************************************
144    these attributes are duplicated at the lot level as the lot may be at line
145    or lot record level
146    ************************************************************************* */
147 ,opm_lot_no                     ic_lots_mst.lot_no%TYPE
148 ,opm_sublot_no                  ic_lots_mst.sublot_no%TYPE
149 );
150 
151 TYPE lot_type IS RECORD
152 (
153  line_no	                gmi_discrete_transfer_lines.line_no%TYPE
154 ,opm_lot_id	                gmi_discrete_transfer_lots.opm_lot_id%TYPE
155 ,opm_lot_expiration_date	gmi_discrete_transfer_lots.opm_lot_expiration_date%TYPE
156 ,opm_lot_status	                gmi_discrete_transfer_lots.opm_lot_status%TYPE
157 ,opm_grade	                gmi_discrete_transfer_lots.opm_grade%TYPE
158 ,odm_lot_number	                VARCHAR2(80)
159 ,odm_lot_expiration_date	gmi_discrete_transfer_lines.odm_lot_expiration_date%TYPE
160 ,quantity	                gmi_discrete_transfer_lots.quantity%TYPE
161 ,quantity2	                gmi_discrete_transfer_lots.quantity2%TYPE
162 ,opm_primary_quantity           gmi_discrete_transfer_lots.opm_primary_quantity%TYPE
163 ,odm_primary_quantity           gmi_discrete_transfer_lots.odm_primary_quantity%TYPE
164 /* *********************************************************************** */
165 ,opm_lot_no                     ic_lots_mst.lot_no%TYPE
166 ,opm_sublot_no                  ic_lots_mst.sublot_no%TYPE
167 );
168 
169 TYPE line_type_tbl IS TABLE OF line_type           	            INDEX BY BINARY_INTEGER;
170 
171 TYPE lot_type_tbl  IS TABLE OF lot_type                       	    INDEX BY BINARY_INTEGER;
172 
173 TYPE line_row_tbl  IS TABLE OF gmi_discrete_transfer_lines%ROWTYPE  INDEX BY BINARY_INTEGER;
174 
175 TYPE lot_row_tbl   IS TABLE OF gmi_discrete_transfer_lots%ROWTYPE   INDEX BY BINARY_INTEGER;
176 
177 /* PROCEDURE Declaration */
178 
179 PROCEDURE Create_transfer_pvt
180 ( p_api_version          IN              NUMBER
181 , p_init_msg_list        IN              VARCHAR2 DEFAULT FND_API.G_FALSE
182 , p_commit               IN              VARCHAR2 DEFAULT FND_API.G_FALSE
183 , p_validation_level     IN              NUMBER   DEFAULT FND_API.G_VALID_LEVEL_FULL
184 , x_return_status        OUT NOCOPY      VARCHAR2
185 , x_msg_count            OUT NOCOPY      NUMBER
186 , x_msg_data             OUT NOCOPY      VARCHAR2
187 , p_hdr_rec              IN              hdr_type
188 , p_line_rec_tbl         IN              line_type_tbl
189 , p_lot_rec_tbl          IN              lot_type_tbl
190 , x_hdr_row              OUT NOCOPY      gmi_discrete_transfers%ROWTYPE
191 , x_line_row_tbl         OUT NOCOPY      line_row_tbl
192 , x_lot_row_tbl          OUT NOCOPY      lot_row_tbl
193 , x_transaction_set_id   OUT NOCOPY      mtl_material_transactions.transaction_set_id%TYPE
194 );
195 
196 PROCEDURE Validate_transfer
197 ( p_api_version          IN              NUMBER
198 , p_init_msg_list        IN              VARCHAR2 DEFAULT FND_API.G_FALSE
199 , p_commit               IN              VARCHAR2 DEFAULT FND_API.G_FALSE
200 , p_validation_level     IN              NUMBER   DEFAULT FND_API.G_VALID_LEVEL_FULL
201 , x_return_status        OUT NOCOPY      VARCHAR2
202 , x_msg_count            OUT NOCOPY      NUMBER
203 , x_msg_data             OUT NOCOPY      VARCHAR2
204 , p_hdr_rec              IN  OUT NOCOPY  hdr_type
205 , p_line_rec_tbl         IN  OUT NOCOPY  line_type_tbl
206 , p_lot_rec_tbl          IN  OUT NOCOPY  lot_type_tbl
207 );
208 
209 PROCEDURE construct_post_records
210 ( p_api_version          IN              NUMBER
211 , p_init_msg_list        IN              VARCHAR2 DEFAULT FND_API.G_FALSE
212 , p_commit               IN              VARCHAR2 DEFAULT FND_API.G_FALSE
213 , p_validation_level     IN              NUMBER   DEFAULT FND_API.G_VALID_LEVEL_FULL
214 , x_return_status        OUT NOCOPY      VARCHAR2
215 , x_msg_count            OUT NOCOPY      NUMBER
216 , x_msg_data             OUT NOCOPY      VARCHAR2
217 , p_hdr_rec              IN OUT NOCOPY   hdr_type
218 , p_line_rec_tbl         IN OUT NOCOPY   line_type_tbl
219 , p_lot_rec_tbl          IN OUT NOCOPY   lot_type_tbl
220 , x_hdr_row              OUT NOCOPY      gmi_discrete_transfers%ROWTYPE
221 , x_line_row_tbl         OUT NOCOPY      line_row_tbl
222 , x_lot_row_tbl          OUT NOCOPY      lot_row_tbl
223 );
224 
225 GMI_Lot_Sublot_Delimiter                 Varchar2(1);
226 INV_TRANS_DATE_OPTION                    pls_integer;
227 INV_OPEN_PAST_PERIOD                     BOOLEAN;
228 WMS_INSTALLED                            VARCHAR2(5);
229 
230 END GMIVDX;