1 PACKAGE BODY GML_CREATE_BATCH_FOR_SO_PVT AS
2 /* $Header: GMLCRBTB.pls 120.3 2011/06/09 19:18:37 adeshmuk noship $
3 +=========================================================================+
4 | Copyright (c) 2000 Oracle Corporation |
5 | TVP, Reading, England |
6 | All rights reserved |
7 +=========================================================================+
8 | FILENAME |
9 | GMLCRBTB.pls |
10 | |
11 | DESCRIPTION |
12 | This package contains private utilities relating to OPM |
13 | reservation. |
14 | |
15 | |
16 | HISTORY |
17 | Feb,2005 Neelima Chekuri Created |
18 | Bug 12591872 - Commenting code as this file is obsolete in R12 |
19 +=========================================================================+
20 API Name : GML_CREATE_BATCH_FOR_SO_PVT
21 Type : Private
22 Function : This package contains Private Utilities procedures used to
23 Create OPM batches and reservations for Sales Orders
24 Pre-reqs : N/A
25 Parameters: Per function
26
27 Current Vers : 1.0
28
29 */
30
31 PROCEDURE create_batch_for_so_line
32 (
33 errbuf OUT NOCOPY VARCHAR2
34 ,retcode OUT NOCOPY VARCHAR2
35 ,p_api_version IN NUMBER
36 ,p_init_msg_list IN VARCHAR2
37 ,p_commit IN VARCHAR2
38 ,p_so_line_id IN NUMBER
39 ) IS
40
41 -- Standard constants to be used to check for call compatibility.
42 l_api_version CONSTANT NUMBER := 1.0;
43 l_api_name CONSTANT VARCHAR2(30):= 'allocate_opm_orders';
44
45
46 BEGIN
47
48 NULL;
49
50 /* EXCEPTION HANDLING
51 ====================*/
52 EXCEPTION
53 WHEN OTHERS THEN
54 NULL;
55
56 END create_batch_for_so_line;
57
58
59 FUNCTION Submit_Create_batch_Request(p_so_line IN NUMBER)
60 RETURN NUMBER IS
61
62
63 BEGIN
64 NULL;
65 Return NULL;
66
67 END Submit_create_batch_request;
68
69 PROCEDURE calculate_rsv_and_alloc_qty(p_so_line_id IN NUMBER,
70 x_primary_qty OUT NOCOPY NUMBER,
71 x_secondary_qty OUT NOCOPY NUMBER,
72 x_return_status OUT NOCOPY VARCHAR2) IS
73
74 BEGIN
75
76 x_primary_qty := 0;
77 x_secondary_qty := 0;
78 x_return_status := NULL;
79 NULL;
80
81
82 EXCEPTION
83 WHEN OTHERS THEN
84 NULL;
85
86 END calculate_rsv_and_alloc_qty;
87
88
89
90 PROCEDURE Update_batch_pending_trans(
91 p_batch_id IN NUMBER,
92 p_whse_code IN VARCHAR2,
93 p_so_line_id IN NUMBER,
94 p_item_id IN NUMBER,
95 x_return_status OUT NOCOPY NUMBER,
96 x_msg_count OUT NOCOPY NUMBER,
97 x_msg_data OUT NOCOPY VARCHAR2
98 ) IS
99 BEGIN
100 x_return_status:= 0;
101 x_msg_count:= 0;
102 x_msg_data:= NULL;
103 NULL;
104 EXCEPTION
105
106 WHEN OTHERS THEN
107 NULL;
108
109 END update_batch_pending_trans;
110
111 PROCEDURE send_workflow_notification(
112 p_batch_id IN NUMBER,
113 p_batch_line_id IN NUMBER,
114 p_so_line_id IN NUMBER,
115 p_item_id IN NUMBER,
116 p_lot_no IN VARCHAR2 DEFAULT NULL,
117 x_return_status OUT NOCOPY VARCHAR2,
118 x_msg_count OUT NOCOPY NUMBER,
119 x_msg_data OUT NOCOPY VARCHAR2 ) IS
120
121
122 BEGIN
123 x_msg_data := NULL;
124 x_msg_count := 0;
125 x_return_status := NULL;
126 NULL;
127 EXCEPTION
128 WHEN OTHERS THEN
129 NULL;
130
131 END send_workflow_notification;
132
133
134 PROCEDURE Copy_attachments ( p_so_category_id IN NUMBER
135 , p_so_line_id IN NUMBER
136 , p_batch_category_id IN NUMBER
137 , p_batch_id IN NUMBER
138 , x_return_status OUT NOCOPY VARCHAR2) IS
139
140 BEGIN
141 x_return_status := NULL;
142 NULL;
143 EXCEPTION
144 WHEN OTHERS THEN
145 NULL;
146 END Copy_attachments;
147
148 PROCEDURE ui_create_batch_for_so_line(
149 errbuf OUT NOCOPY VARCHAR2
150 ,retcode OUT NOCOPY VARCHAR2
151 ,p_order_type IN VARCHAR2
152 ,p_order_number_low IN NUMBER
153 ,p_order_number_high IN NUMBER
154 ,p_warehouse IN VARCHAR2
155 ,p_customer_id IN VARCHAR2
156 ,p_inventory_item_id IN VARCHAR2)
157
158 IS
159
160
161 BEGIN
162 NULL;
163 EXCEPTION
164 WHEN OTHERS THEN
165 NULL;
166
167 END ui_create_batch_for_so_line;
168
169 END GML_CREATE_BATCH_FOR_SO_PVT;