[Home] [Help]
PACKAGE BODY: APPS.CSP_CREATE_PARTS_REQ_PKG
Source
1 PACKAGE BODY CSP_CREATE_PARTS_REQ_PKG AS
2 /* $Header: cspgcprb.pls 120.0.12020000.4 2013/03/21 03:53:23 sunarasi noship $ */
3 -- Start of Comments
4 -- Package name : CSP_CREATE_PARTS_REQ_PKG
5 -- Purpose :
6 -- History :
7 -- 01-Mar-13, sunarasi
8 --
9 -- NOTE :
10 -- End of Comments
11 G_PKG_NAME CONSTANT VARCHAR2(30):='CSP_CREATE_PARTS_REQ_PKG';
12 FUNCTION create_requirement_headers(
13 p_open_requirement VARCHAR2
14 , p_ship_to_location_id NUMBER
15 , p_task_id NUMBER
16 , p_task_assignment_id NUMBER
17 , p_shipping_method_code VARCHAR2
18 , p_need_by_date DATE
19 , p_destination_organization_id NUMBER
20 , p_parts_defined VARCHAR2
21 , p_attribute_category VARCHAR2
22 , p_attribute1 VARCHAR2
23 , p_attribute2 VARCHAR2
24 , p_attribute3 VARCHAR2
25 , p_attribute4 VARCHAR2
26 , p_attribute5 VARCHAR2
27 , p_attribute6 VARCHAR2
28 , p_attribute7 VARCHAR2
29 , p_attribute8 VARCHAR2
30 , p_attribute9 VARCHAR2
31 , p_attribute10 VARCHAR2
32 , p_attribute11 VARCHAR2
33 , p_attribute12 VARCHAR2
34 , p_attribute13 VARCHAR2
35 , p_attribute14 VARCHAR2
36 , p_attribute15 VARCHAR2
37 , p_order_type_id NUMBER
38 , p_address_type VARCHAR2
39 , p_resource_id NUMBER
40 , p_resource_type VARCHAR2
41 , p_timezone_id NUMBER
42 , p_destination_subinventory VARCHAR2
43 , p_created_by NUMBER
44 , p_creation_date DATE
45 , p_last_updated_by NUMBER
46 , p_last_update_date date
47 , p_last_update_login NUMBER) RETURN reqmt_hdr_cur AS
48 requirement_header_rec csp_requirement_headers_pub.RQH_Rec_Type;
49 ddindx binary_integer; indx binary_integer;
50 l_hdr_cursor reqmt_hdr_cur;
51 x_requirement_header_id NUMBER;
52 x_return_status VARCHAR2(1);
53 x_msg_count NUMBER;
54 x_msg_data VARCHAR2(200);
55 BEGIN
56 requirement_header_rec.open_requirement := p_open_requirement;
57 requirement_header_rec.ship_to_location_id := p_ship_to_location_id;
58 requirement_header_rec.task_id := p_task_id;
59 requirement_header_rec.task_assignment_id := p_task_assignment_id;
60 requirement_header_rec.shipping_method_code := p_shipping_method_code;
61 requirement_header_rec.need_by_date := p_need_by_date;
62 requirement_header_rec.destination_organization_id := p_destination_organization_id;
63 requirement_header_rec.parts_defined := p_parts_defined;
64 requirement_header_rec.attribute_category := p_attribute_category;
65 requirement_header_rec.attribute1 := p_attribute1;
66 requirement_header_rec.attribute2 := p_attribute2;
67 requirement_header_rec.attribute3 := p_attribute3;
68 requirement_header_rec.attribute4 := p_attribute4;
69 requirement_header_rec.attribute5 := p_attribute5;
70 requirement_header_rec.attribute6 := p_attribute6;
71 requirement_header_rec.attribute7 := p_attribute7;
72 requirement_header_rec.attribute8 := p_attribute8;
73 requirement_header_rec.attribute9 := p_attribute9;
74 requirement_header_rec.attribute10 := p_attribute10;
75 requirement_header_rec.attribute11 := p_attribute11;
76 requirement_header_rec.attribute12 := p_attribute12;
77 requirement_header_rec.attribute13 := p_attribute13;
78 requirement_header_rec.attribute14 := p_attribute14;
79 requirement_header_rec.attribute15 := p_attribute15;
80 requirement_header_rec.order_type_id := p_order_type_id;
81 requirement_header_rec.address_type := p_address_type;
82 requirement_header_rec.resource_id := p_resource_id;
83 requirement_header_rec.resource_type := p_resource_type;
84 requirement_header_rec.timezone_id := p_timezone_id;
85 requirement_header_rec.destination_subinventory := p_destination_subinventory;
86 requirement_header_rec.created_by := fnd_global.user_id; --p_created_by;
87 requirement_header_rec.creation_date := sysdate; --p_creation_date;
88 requirement_header_rec.last_updated_by := fnd_global.user_id; --p_last_updated_by;
89 requirement_header_rec.last_update_date := sysdate; ---p_last_update_date;
90 requirement_header_rec.last_update_login := fnd_global.conc_login_id; --p_last_update_login;
91
92 csp_requirement_headers_pub.create_requirement_headers(1.0,
93 FND_ApI.G_FALSE,
94 FND_ApI.G_FALSE,
95 requirement_header_rec,
96 x_requirement_header_id,
97 x_return_status,
98 x_msg_count,
99 x_msg_data);
100 open l_hdr_cursor for
101 select x_requirement_header_id,x_return_status,x_msg_count,x_msg_data from DUAL;
102 Return l_hdr_cursor;
103 END;
104 function create_requirement_lines(
105 p_requirement_line_id number
106 ,p_created_by number
107 ,p_creation_date date
108 ,p_last_updated_by number
109 ,p_last_update_date date
110 ,p_last_update_login number
111 ,p_requirement_header_id number
112 ,p_inventory_item_id number
113 ,p_uom_code varchar2
114 ,p_required_quantity number
115 ,p_ship_complete_flag varchar2
116 ,p_likelihood number
117 ,p_revision varchar2
118 ,p_source_organization_id number
119 ,p_source_subinventory varchar2
120 ,p_ordered_quantity number
121 ,p_order_line_id number
122 ,p_reservation_id number
123 ,p_order_by_date date
124 ,p_attribute_category varchar2
125 ,p_attribute1 varchar2
126 ,p_attribute2 varchar2
127 ,p_attribute3 varchar2
128 ,p_attribute4 varchar2
129 ,p_attribute5 varchar2
130 ,p_attribute6 varchar2
131 ,p_attribute7 varchar2
132 ,p_attribute8 varchar2
133 ,p_attribute9 varchar2
134 ,p_attribute10 varchar2
135 ,p_attribute11 varchar2
136 ,p_attribute12 varchar2
137 ,p_attribute13 varchar2
138 ,p_attribute14 varchar2
139 ,p_attribute15 varchar2
140 ,p_arrival_date date
141 ,p_item_scratchpad varchar2
142 ,p_shipping_method_code varchar2
143 ,p_local_reservation_id number
144 ,p_sourced_from VARCHAR2) return reqmt_lines_cur as
145 requirement_lines_rec csp_requirement_lines_pub.rql_rec_type;
146 reqmt_lines_tbl csp_requirement_lines_pub.rql_tbl_type;
147 x_reqmt_lines_tbl csp_requirement_lines_pub.rql_tbl_type;
148 l_lines_cursor reqmt_lines_cur;
149 x_requirement_line_id number;
150 x_return_status varchar2(1);
151 x_msg_count number;
152 x_msg_data VARCHAR2(200);
153 BEGIN
154 -- Create requirement lines
155 reqmt_lines_tbl(1).requirement_line_id := p_requirement_line_id;
156 reqmt_lines_tbl(1).created_by := fnd_global.user_id; -- p_CREATED_BY;
157 reqmt_lines_tbl(1).creation_date := sysdate; --p_CREATION_DATE;
158 reqmt_lines_tbl(1).last_updated_by := fnd_global.user_id; --p_LAST_UpDATED_BY;
159 reqmt_lines_tbl(1).last_update_date := sysdate; --p_LAST_UpDATE_DATE;
160 reqmt_lines_tbl(1).LAST_UpDATE_LOGIN := fnd_global.conc_login_id; --p_LAST_UpDATE_LOGIN;
161 reqmt_lines_tbl(1).requirement_header_id := p_requirement_header_id;
162 reqmt_lines_tbl(1).inventory_item_id := p_inventory_item_id;
163 reqmt_lines_tbl(1).UOM_CODE := p_UOM_CODE;
164 reqmt_lines_tbl(1).REQUIRED_QUANTITY := p_REQUIRED_QUANTITY;
165 reqmt_lines_tbl(1).SHIp_COMpLETE_FLAG := p_SHIp_COMpLETE_FLAG;
166 reqmt_lines_tbl(1).LIKELIHOOD := p_LIKELIHOOD;
167 reqmt_lines_tbl(1).REVISION := p_REVISION;
168 reqmt_lines_tbl(1).SOURCE_ORGANIZATION_ID := p_SOURCE_ORGANIZATION_ID;
169 reqmt_lines_tbl(1).SOURCE_SUBINVENTORY := p_SOURCE_SUBINVENTORY;
170 reqmt_lines_tbl(1).ORDERED_QUANTITY := p_ORDERED_QUANTITY;
171 reqmt_lines_tbl(1).ORDER_LINE_ID := p_ORDER_LINE_ID;
172 reqmt_lines_tbl(1).RESERVATION_ID := p_RESERVATION_ID;
173 reqmt_lines_tbl(1).ATTRIBUTE_CATEGORY := p_ATTRIBUTE_CATEGORY;
174 reqmt_lines_tbl(1).ATTRIBUTE1 := p_ATTRIBUTE1;
175 reqmt_lines_tbl(1).ATTRIBUTE2 := p_ATTRIBUTE2;
176 reqmt_lines_tbl(1).ATTRIBUTE3 := p_ATTRIBUTE3;
177 reqmt_lines_tbl(1).ATTRIBUTE4 := p_ATTRIBUTE4;
178 reqmt_lines_tbl(1).ATTRIBUTE5 := p_ATTRIBUTE5;
179 reqmt_lines_tbl(1).ATTRIBUTE6 := p_ATTRIBUTE6;
180 reqmt_lines_tbl(1).ATTRIBUTE7 := p_ATTRIBUTE7;
181 reqmt_lines_tbl(1).ATTRIBUTE8 := p_ATTRIBUTE8;
182 reqmt_lines_tbl(1).ATTRIBUTE9 := p_ATTRIBUTE9;
183 reqmt_lines_tbl(1).ATTRIBUTE10 := p_ATTRIBUTE10;
184 reqmt_lines_tbl(1).ATTRIBUTE11 := p_ATTRIBUTE11;
185 reqmt_lines_tbl(1).ATTRIBUTE12 := p_ATTRIBUTE12;
186 reqmt_lines_tbl(1).ATTRIBUTE13 := p_ATTRIBUTE13;
187 reqmt_lines_tbl(1).ATTRIBUTE14 := p_ATTRIBUTE14;
188 reqmt_lines_tbl(1).ATTRIBUTE15 := p_ATTRIBUTE15;
189 reqmt_lines_tbl(1).arrival_date := p_arrival_date;
190 reqmt_lines_tbl(1).Item_Scratchpad := P_Item_Scratchpad;
191 reqmt_lines_tbl(1).SHIPPING_METHOD_CODE := p_SHIppING_METHOD_CODE;
192 reqmt_lines_tbl(1).LOCAL_RESERVATION_ID := p_LOCAL_RESERVATION_ID;
193 reqmt_lines_tbl(1).SOURCED_FROM := p_SOURCED_FROM;
194
195 CSP_REQUIREMENT_LINES_PUB.Create_REQUIREMENT_LINES(
196 1.0,
197 FND_API.G_FALSE,
198 FND_API.G_FALSE,
199 reqmt_lines_tbl,
200 x_reqmt_lines_tbl,
201 x_return_status,
202 X_Msg_Count,
203 x_msg_data );
204 --x_requirement_line_id := x_reqmt_lines_tbl(1).REQUIREMENT_LINE_ID;
205 open l_lines_cursor for
206 select x_requirement_line_id,x_return_status,x_msg_count,x_msg_data from dual;
207 Return l_lines_cursor;
208 end;
209 END CSP_CREATE_PARTS_REQ_PKG;