118: EXCEPTION
119: WHEN OTHERS THEN
120: l_sqlcode := SQLCODE;
121: l_sqlerrm := SQLERRM;
122: l_source_org_rec.source_organization_id := FND_API.G_MISS_NUM;
123:
124: End Get_source_organization;
125:
126:
125:
126:
127: PROCEDURE process_requirement
128: ( p_api_version IN NUMBER
129: ,p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE
130: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
131: ,px_header_rec IN OUT NOCOPY csp_parts_requirement.Header_rec_type
132: ,px_line_table IN OUT NOCOPY csp_parts_requirement.Line_Tbl_type
133: ,p_create_order_flag IN VARCHAR2
126:
127: PROCEDURE process_requirement
128: ( p_api_version IN NUMBER
129: ,p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE
130: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
131: ,px_header_rec IN OUT NOCOPY csp_parts_requirement.Header_rec_type
132: ,px_line_table IN OUT NOCOPY csp_parts_requirement.Line_Tbl_type
133: ,p_create_order_flag IN VARCHAR2
134: ,x_return_status OUT NOCOPY VARCHAR2
136: ,x_msg_data OUT NOCOPY VARCHAR2
137: ) IS
138: l_api_version_number CONSTANT NUMBER := 1.0;
139: l_api_name CONSTANT VARCHAR2(30) := 'process_requirement';
140: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
141: l_msg_count NUMBER;
142: l_msg_data VARCHAR2(2000);
143: l_msg_dummy VARCHAR2(2000);
144: l_order_msg VARCHAR2(8000);
141: l_msg_count NUMBER;
142: l_msg_data VARCHAR2(2000);
143: l_msg_dummy VARCHAR2(2000);
144: l_order_msg VARCHAR2(8000);
145: l_commit VARCHAR2(1) := FND_API.G_FALSE;
146: l_user_id NUMBER;
147: l_login_id NUMBER;
148: l_today DATE;
149: EXCP_USER_DEFINED EXCEPTION;
216:
217: BEGIN
218: SAVEPOINT Process_Requirement_PUB;
219:
220: IF fnd_api.to_boolean(P_Init_Msg_List) THEN
221: -- initialize message list
222: FND_MSG_PUB.initialize;
223: END IF;
224:
222: FND_MSG_PUB.initialize;
223: END IF;
224:
225: -- Standard call to check for call compatibility.
226: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
227: p_api_version,
228: l_api_name,
229: G_PKG_NAME)
230: THEN
227: p_api_version,
228: l_api_name,
229: G_PKG_NAME)
230: THEN
231: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
232: END IF;
233:
234: -- initialize return status
235: x_return_status := FND_API.G_RET_STS_SUCCESS;
231: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
232: END IF;
233:
234: -- initialize return status
235: x_return_status := FND_API.G_RET_STS_SUCCESS;
236:
237: l_header_Rec := px_header_rec;
238: l_line_tbl := px_line_table;
239:
278: FND_MESSAGE.Set_Name('CSP', 'CSP_NEED_PASSED');
279: l_order_msg := FND_MESSAGE.GET;
280: END IF;
281: END IF;
282: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
283: null; --RAISE FND_API.G_EXC_ERROR;
284: END IF;
285: if l_msg_count > 0 THEN
286: for j in 1..fnd_msg_pub.count_msg loop
279: l_order_msg := FND_MESSAGE.GET;
280: END IF;
281: END IF;
282: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
283: null; --RAISE FND_API.G_EXC_ERROR;
284: END IF;
285: if l_msg_count > 0 THEN
286: for j in 1..fnd_msg_pub.count_msg loop
287: fnd_msg_pub.get(
285: if l_msg_count > 0 THEN
286: for j in 1..fnd_msg_pub.count_msg loop
287: fnd_msg_pub.get(
288: j,
289: FND_API.G_FALSE,
290: l_msg_data,
291: l_msg_dummy);
292: l_order_msg := l_order_msg || l_msg_data;
293: end loop;
314: P_Organization_Id => l_header_Rec.dest_organization_id,
315: P_Secondary_Inventory => l_header_rec.dest_subinventory,
316: x_source_org_id => l_line_Tbl(I).source_organization_id);
317: IF ((l_line_Tbl(I).source_organization_id IS NULL) OR
318: (l_line_Tbl(I).source_organization_id = FND_API.G_MISS_NUM)) THEN
319: -- no source organization defined, create requirement with error status
320: l_rqmt_header_rec.open_requirement := 'E';
321: END IF;
322: END If;
371: -- call csp_process_order API
372: csp_parts_order.process_order(
373: p_api_version => l_api_version_number
374: ,p_Init_Msg_List => p_init_msg_list
375: ,p_commit => FND_API.G_false
376: ,px_header_rec => l_header_rec
377: ,px_line_table => l_line_tbl
378: ,x_return_status => l_return_status
379: ,x_msg_count => l_msg_count
380: ,x_msg_data => l_msg_data
381: );
382:
383: -- set parts_defined to 'Y' if order has been created for this requirement
384: IF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
385: l_parts_defined := 'Y';
386: l_rqmt_header_rec.open_requirement := 'Y';
387: px_header_rec.order_header_id := l_header_Rec.order_header_id;
388: l_order_msg := null;
390: l_rqmt_header_rec.open_requirement := 'E';
391: for j in 1..fnd_msg_pub.count_msg loop
392: fnd_msg_pub.get(
393: j,
394: FND_API.G_FALSE,
395: l_msg_data,
396: l_msg_dummy);
397: l_order_msg := l_order_msg || l_msg_data;
398: end loop;
403: IF (l_header_rec.operation = G_OPR_CREATE) THEN
404: l_rqmt_header_Rec.created_by := nvl(l_user_id, -1);
405: l_rqmt_header_Rec.creation_date := l_today;
406: ELSIF (l_header_rec.operation IN (G_OPR_UPDATE, G_OPR_DELETE)) THEN
407: IF nvl(l_header_rec.requirement_header_id, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
408: FND_MESSAGE.SET_NAME ('CSP', 'CSP_MISSING_PARAMETERS');
409: FND_MESSAGE.SET_TOKEN ('PARAMETER', 'l_header_rec.requirement_header_id', FALSE);
410: FND_MSG_PUB.ADD;
411: RAISE EXCP_USER_DEFINED;
432: END;
433: END IF;
434: END IF;
435:
436: l_rqmt_header_Rec.requirement_header_id := nvl(l_header_rec.requirement_header_id, FND_API.G_MISS_NUM); --l_requirement_header_id;
437: l_rqmt_header_Rec.last_updated_by := nvl(l_user_id, -1);
438: l_rqmt_header_Rec.last_update_date := l_today;
439: l_rqmt_header_Rec.last_update_login := nvl(l_login_id, -1);
440: l_rqmt_header_Rec.ship_to_location_id := nvl(l_header_rec.ship_to_location_id, FND_API.G_MISS_NUM);
436: l_rqmt_header_Rec.requirement_header_id := nvl(l_header_rec.requirement_header_id, FND_API.G_MISS_NUM); --l_requirement_header_id;
437: l_rqmt_header_Rec.last_updated_by := nvl(l_user_id, -1);
438: l_rqmt_header_Rec.last_update_date := l_today;
439: l_rqmt_header_Rec.last_update_login := nvl(l_login_id, -1);
440: l_rqmt_header_Rec.ship_to_location_id := nvl(l_header_rec.ship_to_location_id, FND_API.G_MISS_NUM);
441: l_rqmt_header_Rec.timezone_id := nvl(l_timezone_id, FND_API.G_MISS_NUM);
442: l_rqmt_header_Rec.address_type := csp_parts_Requirement.G_ADDR_RESOURCE;
443: l_rqmt_header_Rec.task_id := nvl(l_header_rec.task_id, FND_API.G_MISS_NUM);
444: l_rqmt_header_Rec.task_assignment_id := nvl(l_header_rec.task_assignment_id, FND_API.G_MISS_NUM);
437: l_rqmt_header_Rec.last_updated_by := nvl(l_user_id, -1);
438: l_rqmt_header_Rec.last_update_date := l_today;
439: l_rqmt_header_Rec.last_update_login := nvl(l_login_id, -1);
440: l_rqmt_header_Rec.ship_to_location_id := nvl(l_header_rec.ship_to_location_id, FND_API.G_MISS_NUM);
441: l_rqmt_header_Rec.timezone_id := nvl(l_timezone_id, FND_API.G_MISS_NUM);
442: l_rqmt_header_Rec.address_type := csp_parts_Requirement.G_ADDR_RESOURCE;
443: l_rqmt_header_Rec.task_id := nvl(l_header_rec.task_id, FND_API.G_MISS_NUM);
444: l_rqmt_header_Rec.task_assignment_id := nvl(l_header_rec.task_assignment_id, FND_API.G_MISS_NUM);
445: l_rqmt_header_Rec.shipping_method_code := nvl(l_header_rec.shipping_method_code, FND_API.G_MISS_CHAR);
439: l_rqmt_header_Rec.last_update_login := nvl(l_login_id, -1);
440: l_rqmt_header_Rec.ship_to_location_id := nvl(l_header_rec.ship_to_location_id, FND_API.G_MISS_NUM);
441: l_rqmt_header_Rec.timezone_id := nvl(l_timezone_id, FND_API.G_MISS_NUM);
442: l_rqmt_header_Rec.address_type := csp_parts_Requirement.G_ADDR_RESOURCE;
443: l_rqmt_header_Rec.task_id := nvl(l_header_rec.task_id, FND_API.G_MISS_NUM);
444: l_rqmt_header_Rec.task_assignment_id := nvl(l_header_rec.task_assignment_id, FND_API.G_MISS_NUM);
445: l_rqmt_header_Rec.shipping_method_code := nvl(l_header_rec.shipping_method_code, FND_API.G_MISS_CHAR);
446: l_rqmt_header_Rec.need_by_date := nvl(l_header_rec.need_by_date, FND_API.G_MISS_DATE);
447: l_rqmt_header_Rec.destination_organization_id := nvl(l_header_rec.dest_organization_id, FND_API.G_MISS_NUM);
440: l_rqmt_header_Rec.ship_to_location_id := nvl(l_header_rec.ship_to_location_id, FND_API.G_MISS_NUM);
441: l_rqmt_header_Rec.timezone_id := nvl(l_timezone_id, FND_API.G_MISS_NUM);
442: l_rqmt_header_Rec.address_type := csp_parts_Requirement.G_ADDR_RESOURCE;
443: l_rqmt_header_Rec.task_id := nvl(l_header_rec.task_id, FND_API.G_MISS_NUM);
444: l_rqmt_header_Rec.task_assignment_id := nvl(l_header_rec.task_assignment_id, FND_API.G_MISS_NUM);
445: l_rqmt_header_Rec.shipping_method_code := nvl(l_header_rec.shipping_method_code, FND_API.G_MISS_CHAR);
446: l_rqmt_header_Rec.need_by_date := nvl(l_header_rec.need_by_date, FND_API.G_MISS_DATE);
447: l_rqmt_header_Rec.destination_organization_id := nvl(l_header_rec.dest_organization_id, FND_API.G_MISS_NUM);
448: l_rqmt_header_Rec.destination_subinventory := nvl(l_header_rec.dest_subinventory, FND_API.G_MISS_CHAR);
441: l_rqmt_header_Rec.timezone_id := nvl(l_timezone_id, FND_API.G_MISS_NUM);
442: l_rqmt_header_Rec.address_type := csp_parts_Requirement.G_ADDR_RESOURCE;
443: l_rqmt_header_Rec.task_id := nvl(l_header_rec.task_id, FND_API.G_MISS_NUM);
444: l_rqmt_header_Rec.task_assignment_id := nvl(l_header_rec.task_assignment_id, FND_API.G_MISS_NUM);
445: l_rqmt_header_Rec.shipping_method_code := nvl(l_header_rec.shipping_method_code, FND_API.G_MISS_CHAR);
446: l_rqmt_header_Rec.need_by_date := nvl(l_header_rec.need_by_date, FND_API.G_MISS_DATE);
447: l_rqmt_header_Rec.destination_organization_id := nvl(l_header_rec.dest_organization_id, FND_API.G_MISS_NUM);
448: l_rqmt_header_Rec.destination_subinventory := nvl(l_header_rec.dest_subinventory, FND_API.G_MISS_CHAR);
449: l_rqmt_header_Rec.parts_defined := nvl(l_parts_defined, FND_API.G_MISS_CHAR);
442: l_rqmt_header_Rec.address_type := csp_parts_Requirement.G_ADDR_RESOURCE;
443: l_rqmt_header_Rec.task_id := nvl(l_header_rec.task_id, FND_API.G_MISS_NUM);
444: l_rqmt_header_Rec.task_assignment_id := nvl(l_header_rec.task_assignment_id, FND_API.G_MISS_NUM);
445: l_rqmt_header_Rec.shipping_method_code := nvl(l_header_rec.shipping_method_code, FND_API.G_MISS_CHAR);
446: l_rqmt_header_Rec.need_by_date := nvl(l_header_rec.need_by_date, FND_API.G_MISS_DATE);
447: l_rqmt_header_Rec.destination_organization_id := nvl(l_header_rec.dest_organization_id, FND_API.G_MISS_NUM);
448: l_rqmt_header_Rec.destination_subinventory := nvl(l_header_rec.dest_subinventory, FND_API.G_MISS_CHAR);
449: l_rqmt_header_Rec.parts_defined := nvl(l_parts_defined, FND_API.G_MISS_CHAR);
450: -- l_rqmt_header_Rec.open_requirement := 'Y';
443: l_rqmt_header_Rec.task_id := nvl(l_header_rec.task_id, FND_API.G_MISS_NUM);
444: l_rqmt_header_Rec.task_assignment_id := nvl(l_header_rec.task_assignment_id, FND_API.G_MISS_NUM);
445: l_rqmt_header_Rec.shipping_method_code := nvl(l_header_rec.shipping_method_code, FND_API.G_MISS_CHAR);
446: l_rqmt_header_Rec.need_by_date := nvl(l_header_rec.need_by_date, FND_API.G_MISS_DATE);
447: l_rqmt_header_Rec.destination_organization_id := nvl(l_header_rec.dest_organization_id, FND_API.G_MISS_NUM);
448: l_rqmt_header_Rec.destination_subinventory := nvl(l_header_rec.dest_subinventory, FND_API.G_MISS_CHAR);
449: l_rqmt_header_Rec.parts_defined := nvl(l_parts_defined, FND_API.G_MISS_CHAR);
450: -- l_rqmt_header_Rec.open_requirement := 'Y';
451: l_rqmt_header_rec.order_type_id := nvl(l_header_rec.order_type_id, FND_API.G_MISS_NUM);
444: l_rqmt_header_Rec.task_assignment_id := nvl(l_header_rec.task_assignment_id, FND_API.G_MISS_NUM);
445: l_rqmt_header_Rec.shipping_method_code := nvl(l_header_rec.shipping_method_code, FND_API.G_MISS_CHAR);
446: l_rqmt_header_Rec.need_by_date := nvl(l_header_rec.need_by_date, FND_API.G_MISS_DATE);
447: l_rqmt_header_Rec.destination_organization_id := nvl(l_header_rec.dest_organization_id, FND_API.G_MISS_NUM);
448: l_rqmt_header_Rec.destination_subinventory := nvl(l_header_rec.dest_subinventory, FND_API.G_MISS_CHAR);
449: l_rqmt_header_Rec.parts_defined := nvl(l_parts_defined, FND_API.G_MISS_CHAR);
450: -- l_rqmt_header_Rec.open_requirement := 'Y';
451: l_rqmt_header_rec.order_type_id := nvl(l_header_rec.order_type_id, FND_API.G_MISS_NUM);
452: l_rqmt_header_rec.attribute_Category := nvl(l_header_rec.attribute_category, FND_API.G_MISS_CHAR);
445: l_rqmt_header_Rec.shipping_method_code := nvl(l_header_rec.shipping_method_code, FND_API.G_MISS_CHAR);
446: l_rqmt_header_Rec.need_by_date := nvl(l_header_rec.need_by_date, FND_API.G_MISS_DATE);
447: l_rqmt_header_Rec.destination_organization_id := nvl(l_header_rec.dest_organization_id, FND_API.G_MISS_NUM);
448: l_rqmt_header_Rec.destination_subinventory := nvl(l_header_rec.dest_subinventory, FND_API.G_MISS_CHAR);
449: l_rqmt_header_Rec.parts_defined := nvl(l_parts_defined, FND_API.G_MISS_CHAR);
450: -- l_rqmt_header_Rec.open_requirement := 'Y';
451: l_rqmt_header_rec.order_type_id := nvl(l_header_rec.order_type_id, FND_API.G_MISS_NUM);
452: l_rqmt_header_rec.attribute_Category := nvl(l_header_rec.attribute_category, FND_API.G_MISS_CHAR);
453: l_rqmt_header_rec.attribute1 := nvl(l_header_rec.attribute1, FND_API.G_MISS_CHAR);
447: l_rqmt_header_Rec.destination_organization_id := nvl(l_header_rec.dest_organization_id, FND_API.G_MISS_NUM);
448: l_rqmt_header_Rec.destination_subinventory := nvl(l_header_rec.dest_subinventory, FND_API.G_MISS_CHAR);
449: l_rqmt_header_Rec.parts_defined := nvl(l_parts_defined, FND_API.G_MISS_CHAR);
450: -- l_rqmt_header_Rec.open_requirement := 'Y';
451: l_rqmt_header_rec.order_type_id := nvl(l_header_rec.order_type_id, FND_API.G_MISS_NUM);
452: l_rqmt_header_rec.attribute_Category := nvl(l_header_rec.attribute_category, FND_API.G_MISS_CHAR);
453: l_rqmt_header_rec.attribute1 := nvl(l_header_rec.attribute1, FND_API.G_MISS_CHAR);
454: l_rqmt_header_rec.attribute2 := nvl(l_header_rec.attribute2, FND_API.G_MISS_CHAR);
455: l_rqmt_header_rec.attribute3 := nvl(l_header_rec.attribute3, FND_API.G_MISS_CHAR);
448: l_rqmt_header_Rec.destination_subinventory := nvl(l_header_rec.dest_subinventory, FND_API.G_MISS_CHAR);
449: l_rqmt_header_Rec.parts_defined := nvl(l_parts_defined, FND_API.G_MISS_CHAR);
450: -- l_rqmt_header_Rec.open_requirement := 'Y';
451: l_rqmt_header_rec.order_type_id := nvl(l_header_rec.order_type_id, FND_API.G_MISS_NUM);
452: l_rqmt_header_rec.attribute_Category := nvl(l_header_rec.attribute_category, FND_API.G_MISS_CHAR);
453: l_rqmt_header_rec.attribute1 := nvl(l_header_rec.attribute1, FND_API.G_MISS_CHAR);
454: l_rqmt_header_rec.attribute2 := nvl(l_header_rec.attribute2, FND_API.G_MISS_CHAR);
455: l_rqmt_header_rec.attribute3 := nvl(l_header_rec.attribute3, FND_API.G_MISS_CHAR);
456: l_rqmt_header_rec.attribute4 := nvl(l_header_rec.attribute4, FND_API.G_MISS_CHAR);
449: l_rqmt_header_Rec.parts_defined := nvl(l_parts_defined, FND_API.G_MISS_CHAR);
450: -- l_rqmt_header_Rec.open_requirement := 'Y';
451: l_rqmt_header_rec.order_type_id := nvl(l_header_rec.order_type_id, FND_API.G_MISS_NUM);
452: l_rqmt_header_rec.attribute_Category := nvl(l_header_rec.attribute_category, FND_API.G_MISS_CHAR);
453: l_rqmt_header_rec.attribute1 := nvl(l_header_rec.attribute1, FND_API.G_MISS_CHAR);
454: l_rqmt_header_rec.attribute2 := nvl(l_header_rec.attribute2, FND_API.G_MISS_CHAR);
455: l_rqmt_header_rec.attribute3 := nvl(l_header_rec.attribute3, FND_API.G_MISS_CHAR);
456: l_rqmt_header_rec.attribute4 := nvl(l_header_rec.attribute4, FND_API.G_MISS_CHAR);
457: l_rqmt_header_rec.attribute5 := nvl(l_header_rec.attribute5, FND_API.G_MISS_CHAR);
450: -- l_rqmt_header_Rec.open_requirement := 'Y';
451: l_rqmt_header_rec.order_type_id := nvl(l_header_rec.order_type_id, FND_API.G_MISS_NUM);
452: l_rqmt_header_rec.attribute_Category := nvl(l_header_rec.attribute_category, FND_API.G_MISS_CHAR);
453: l_rqmt_header_rec.attribute1 := nvl(l_header_rec.attribute1, FND_API.G_MISS_CHAR);
454: l_rqmt_header_rec.attribute2 := nvl(l_header_rec.attribute2, FND_API.G_MISS_CHAR);
455: l_rqmt_header_rec.attribute3 := nvl(l_header_rec.attribute3, FND_API.G_MISS_CHAR);
456: l_rqmt_header_rec.attribute4 := nvl(l_header_rec.attribute4, FND_API.G_MISS_CHAR);
457: l_rqmt_header_rec.attribute5 := nvl(l_header_rec.attribute5, FND_API.G_MISS_CHAR);
458: l_rqmt_header_rec.attribute6 := nvl(l_header_rec.attribute6, FND_API.G_MISS_CHAR);
451: l_rqmt_header_rec.order_type_id := nvl(l_header_rec.order_type_id, FND_API.G_MISS_NUM);
452: l_rqmt_header_rec.attribute_Category := nvl(l_header_rec.attribute_category, FND_API.G_MISS_CHAR);
453: l_rqmt_header_rec.attribute1 := nvl(l_header_rec.attribute1, FND_API.G_MISS_CHAR);
454: l_rqmt_header_rec.attribute2 := nvl(l_header_rec.attribute2, FND_API.G_MISS_CHAR);
455: l_rqmt_header_rec.attribute3 := nvl(l_header_rec.attribute3, FND_API.G_MISS_CHAR);
456: l_rqmt_header_rec.attribute4 := nvl(l_header_rec.attribute4, FND_API.G_MISS_CHAR);
457: l_rqmt_header_rec.attribute5 := nvl(l_header_rec.attribute5, FND_API.G_MISS_CHAR);
458: l_rqmt_header_rec.attribute6 := nvl(l_header_rec.attribute6, FND_API.G_MISS_CHAR);
459: l_rqmt_header_rec.attribute7 := nvl(l_header_rec.attribute7, FND_API.G_MISS_CHAR);
452: l_rqmt_header_rec.attribute_Category := nvl(l_header_rec.attribute_category, FND_API.G_MISS_CHAR);
453: l_rqmt_header_rec.attribute1 := nvl(l_header_rec.attribute1, FND_API.G_MISS_CHAR);
454: l_rqmt_header_rec.attribute2 := nvl(l_header_rec.attribute2, FND_API.G_MISS_CHAR);
455: l_rqmt_header_rec.attribute3 := nvl(l_header_rec.attribute3, FND_API.G_MISS_CHAR);
456: l_rqmt_header_rec.attribute4 := nvl(l_header_rec.attribute4, FND_API.G_MISS_CHAR);
457: l_rqmt_header_rec.attribute5 := nvl(l_header_rec.attribute5, FND_API.G_MISS_CHAR);
458: l_rqmt_header_rec.attribute6 := nvl(l_header_rec.attribute6, FND_API.G_MISS_CHAR);
459: l_rqmt_header_rec.attribute7 := nvl(l_header_rec.attribute7, FND_API.G_MISS_CHAR);
460: l_rqmt_header_rec.attribute8 := nvl(l_header_rec.attribute8, FND_API.G_MISS_CHAR);
453: l_rqmt_header_rec.attribute1 := nvl(l_header_rec.attribute1, FND_API.G_MISS_CHAR);
454: l_rqmt_header_rec.attribute2 := nvl(l_header_rec.attribute2, FND_API.G_MISS_CHAR);
455: l_rqmt_header_rec.attribute3 := nvl(l_header_rec.attribute3, FND_API.G_MISS_CHAR);
456: l_rqmt_header_rec.attribute4 := nvl(l_header_rec.attribute4, FND_API.G_MISS_CHAR);
457: l_rqmt_header_rec.attribute5 := nvl(l_header_rec.attribute5, FND_API.G_MISS_CHAR);
458: l_rqmt_header_rec.attribute6 := nvl(l_header_rec.attribute6, FND_API.G_MISS_CHAR);
459: l_rqmt_header_rec.attribute7 := nvl(l_header_rec.attribute7, FND_API.G_MISS_CHAR);
460: l_rqmt_header_rec.attribute8 := nvl(l_header_rec.attribute8, FND_API.G_MISS_CHAR);
461: l_rqmt_header_rec.attribute9 := nvl(l_header_rec.attribute9, FND_API.G_MISS_CHAR);
454: l_rqmt_header_rec.attribute2 := nvl(l_header_rec.attribute2, FND_API.G_MISS_CHAR);
455: l_rqmt_header_rec.attribute3 := nvl(l_header_rec.attribute3, FND_API.G_MISS_CHAR);
456: l_rqmt_header_rec.attribute4 := nvl(l_header_rec.attribute4, FND_API.G_MISS_CHAR);
457: l_rqmt_header_rec.attribute5 := nvl(l_header_rec.attribute5, FND_API.G_MISS_CHAR);
458: l_rqmt_header_rec.attribute6 := nvl(l_header_rec.attribute6, FND_API.G_MISS_CHAR);
459: l_rqmt_header_rec.attribute7 := nvl(l_header_rec.attribute7, FND_API.G_MISS_CHAR);
460: l_rqmt_header_rec.attribute8 := nvl(l_header_rec.attribute8, FND_API.G_MISS_CHAR);
461: l_rqmt_header_rec.attribute9 := nvl(l_header_rec.attribute9, FND_API.G_MISS_CHAR);
462: l_rqmt_header_rec.attribute10 := nvl(l_header_rec.attribute10, FND_API.G_MISS_CHAR);
455: l_rqmt_header_rec.attribute3 := nvl(l_header_rec.attribute3, FND_API.G_MISS_CHAR);
456: l_rqmt_header_rec.attribute4 := nvl(l_header_rec.attribute4, FND_API.G_MISS_CHAR);
457: l_rqmt_header_rec.attribute5 := nvl(l_header_rec.attribute5, FND_API.G_MISS_CHAR);
458: l_rqmt_header_rec.attribute6 := nvl(l_header_rec.attribute6, FND_API.G_MISS_CHAR);
459: l_rqmt_header_rec.attribute7 := nvl(l_header_rec.attribute7, FND_API.G_MISS_CHAR);
460: l_rqmt_header_rec.attribute8 := nvl(l_header_rec.attribute8, FND_API.G_MISS_CHAR);
461: l_rqmt_header_rec.attribute9 := nvl(l_header_rec.attribute9, FND_API.G_MISS_CHAR);
462: l_rqmt_header_rec.attribute10 := nvl(l_header_rec.attribute10, FND_API.G_MISS_CHAR);
463: l_rqmt_header_rec.attribute11 := nvl(l_header_rec.attribute11, FND_API.G_MISS_CHAR);
456: l_rqmt_header_rec.attribute4 := nvl(l_header_rec.attribute4, FND_API.G_MISS_CHAR);
457: l_rqmt_header_rec.attribute5 := nvl(l_header_rec.attribute5, FND_API.G_MISS_CHAR);
458: l_rqmt_header_rec.attribute6 := nvl(l_header_rec.attribute6, FND_API.G_MISS_CHAR);
459: l_rqmt_header_rec.attribute7 := nvl(l_header_rec.attribute7, FND_API.G_MISS_CHAR);
460: l_rqmt_header_rec.attribute8 := nvl(l_header_rec.attribute8, FND_API.G_MISS_CHAR);
461: l_rqmt_header_rec.attribute9 := nvl(l_header_rec.attribute9, FND_API.G_MISS_CHAR);
462: l_rqmt_header_rec.attribute10 := nvl(l_header_rec.attribute10, FND_API.G_MISS_CHAR);
463: l_rqmt_header_rec.attribute11 := nvl(l_header_rec.attribute11, FND_API.G_MISS_CHAR);
464: l_rqmt_header_rec.attribute12 := nvl(l_header_rec.attribute12, FND_API.G_MISS_CHAR);
457: l_rqmt_header_rec.attribute5 := nvl(l_header_rec.attribute5, FND_API.G_MISS_CHAR);
458: l_rqmt_header_rec.attribute6 := nvl(l_header_rec.attribute6, FND_API.G_MISS_CHAR);
459: l_rqmt_header_rec.attribute7 := nvl(l_header_rec.attribute7, FND_API.G_MISS_CHAR);
460: l_rqmt_header_rec.attribute8 := nvl(l_header_rec.attribute8, FND_API.G_MISS_CHAR);
461: l_rqmt_header_rec.attribute9 := nvl(l_header_rec.attribute9, FND_API.G_MISS_CHAR);
462: l_rqmt_header_rec.attribute10 := nvl(l_header_rec.attribute10, FND_API.G_MISS_CHAR);
463: l_rqmt_header_rec.attribute11 := nvl(l_header_rec.attribute11, FND_API.G_MISS_CHAR);
464: l_rqmt_header_rec.attribute12 := nvl(l_header_rec.attribute12, FND_API.G_MISS_CHAR);
465: l_rqmt_header_rec.attribute13 := nvl(l_header_rec.attribute13, FND_API.G_MISS_CHAR);
458: l_rqmt_header_rec.attribute6 := nvl(l_header_rec.attribute6, FND_API.G_MISS_CHAR);
459: l_rqmt_header_rec.attribute7 := nvl(l_header_rec.attribute7, FND_API.G_MISS_CHAR);
460: l_rqmt_header_rec.attribute8 := nvl(l_header_rec.attribute8, FND_API.G_MISS_CHAR);
461: l_rqmt_header_rec.attribute9 := nvl(l_header_rec.attribute9, FND_API.G_MISS_CHAR);
462: l_rqmt_header_rec.attribute10 := nvl(l_header_rec.attribute10, FND_API.G_MISS_CHAR);
463: l_rqmt_header_rec.attribute11 := nvl(l_header_rec.attribute11, FND_API.G_MISS_CHAR);
464: l_rqmt_header_rec.attribute12 := nvl(l_header_rec.attribute12, FND_API.G_MISS_CHAR);
465: l_rqmt_header_rec.attribute13 := nvl(l_header_rec.attribute13, FND_API.G_MISS_CHAR);
466: l_rqmt_header_rec.attribute14 := nvl(l_header_rec.attribute14, FND_API.G_MISS_CHAR);
459: l_rqmt_header_rec.attribute7 := nvl(l_header_rec.attribute7, FND_API.G_MISS_CHAR);
460: l_rqmt_header_rec.attribute8 := nvl(l_header_rec.attribute8, FND_API.G_MISS_CHAR);
461: l_rqmt_header_rec.attribute9 := nvl(l_header_rec.attribute9, FND_API.G_MISS_CHAR);
462: l_rqmt_header_rec.attribute10 := nvl(l_header_rec.attribute10, FND_API.G_MISS_CHAR);
463: l_rqmt_header_rec.attribute11 := nvl(l_header_rec.attribute11, FND_API.G_MISS_CHAR);
464: l_rqmt_header_rec.attribute12 := nvl(l_header_rec.attribute12, FND_API.G_MISS_CHAR);
465: l_rqmt_header_rec.attribute13 := nvl(l_header_rec.attribute13, FND_API.G_MISS_CHAR);
466: l_rqmt_header_rec.attribute14 := nvl(l_header_rec.attribute14, FND_API.G_MISS_CHAR);
467: l_rqmt_header_rec.attribute15 := nvl(l_header_rec.attribute15, FND_API.G_MISS_CHAR);
460: l_rqmt_header_rec.attribute8 := nvl(l_header_rec.attribute8, FND_API.G_MISS_CHAR);
461: l_rqmt_header_rec.attribute9 := nvl(l_header_rec.attribute9, FND_API.G_MISS_CHAR);
462: l_rqmt_header_rec.attribute10 := nvl(l_header_rec.attribute10, FND_API.G_MISS_CHAR);
463: l_rqmt_header_rec.attribute11 := nvl(l_header_rec.attribute11, FND_API.G_MISS_CHAR);
464: l_rqmt_header_rec.attribute12 := nvl(l_header_rec.attribute12, FND_API.G_MISS_CHAR);
465: l_rqmt_header_rec.attribute13 := nvl(l_header_rec.attribute13, FND_API.G_MISS_CHAR);
466: l_rqmt_header_rec.attribute14 := nvl(l_header_rec.attribute14, FND_API.G_MISS_CHAR);
467: l_rqmt_header_rec.attribute15 := nvl(l_header_rec.attribute15, FND_API.G_MISS_CHAR);
468:
461: l_rqmt_header_rec.attribute9 := nvl(l_header_rec.attribute9, FND_API.G_MISS_CHAR);
462: l_rqmt_header_rec.attribute10 := nvl(l_header_rec.attribute10, FND_API.G_MISS_CHAR);
463: l_rqmt_header_rec.attribute11 := nvl(l_header_rec.attribute11, FND_API.G_MISS_CHAR);
464: l_rqmt_header_rec.attribute12 := nvl(l_header_rec.attribute12, FND_API.G_MISS_CHAR);
465: l_rqmt_header_rec.attribute13 := nvl(l_header_rec.attribute13, FND_API.G_MISS_CHAR);
466: l_rqmt_header_rec.attribute14 := nvl(l_header_rec.attribute14, FND_API.G_MISS_CHAR);
467: l_rqmt_header_rec.attribute15 := nvl(l_header_rec.attribute15, FND_API.G_MISS_CHAR);
468:
469:
462: l_rqmt_header_rec.attribute10 := nvl(l_header_rec.attribute10, FND_API.G_MISS_CHAR);
463: l_rqmt_header_rec.attribute11 := nvl(l_header_rec.attribute11, FND_API.G_MISS_CHAR);
464: l_rqmt_header_rec.attribute12 := nvl(l_header_rec.attribute12, FND_API.G_MISS_CHAR);
465: l_rqmt_header_rec.attribute13 := nvl(l_header_rec.attribute13, FND_API.G_MISS_CHAR);
466: l_rqmt_header_rec.attribute14 := nvl(l_header_rec.attribute14, FND_API.G_MISS_CHAR);
467: l_rqmt_header_rec.attribute15 := nvl(l_header_rec.attribute15, FND_API.G_MISS_CHAR);
468:
469:
470: IF (l_header_Rec.task_assignment_id IS NULL) THEN
463: l_rqmt_header_rec.attribute11 := nvl(l_header_rec.attribute11, FND_API.G_MISS_CHAR);
464: l_rqmt_header_rec.attribute12 := nvl(l_header_rec.attribute12, FND_API.G_MISS_CHAR);
465: l_rqmt_header_rec.attribute13 := nvl(l_header_rec.attribute13, FND_API.G_MISS_CHAR);
466: l_rqmt_header_rec.attribute14 := nvl(l_header_rec.attribute14, FND_API.G_MISS_CHAR);
467: l_rqmt_header_rec.attribute15 := nvl(l_header_rec.attribute15, FND_API.G_MISS_CHAR);
468:
469:
470: IF (l_header_Rec.task_assignment_id IS NULL) THEN
471: l_Rqmt_header_rec.resource_type := l_header_rec.resource_type;
479: IF (l_header_rec.operation = G_OPR_CREATE) THEN
480: l_rqmt_line_Rec.created_by := nvl(l_user_id, -1);
481: l_rqmt_line_Rec.creation_date := l_today;
482: ELSIF (l_header_rec.operation IN (G_OPR_UPDATE, G_OPR_DELETE)) THEN
483: IF nvl(l_line_rec.requirement_line_id, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
484:
485: FND_MESSAGE.SET_NAME ('CSP', 'CSP_MISSING_PARAMETERS');
486: FND_MESSAGE.SET_TOKEN ('PARAMETER', 'l_line_rec.requirement_line_id', FALSE);
487: FND_MSG_PUB.ADD;
513: l_rqmt_line_Rec.requirement_line_id := l_line_rec.requirement_line_id;
514: l_rqmt_line_rec.last_updated_by := nvl(l_user_id, 1);
515: l_rqmt_line_rec.last_update_date := l_today;
516: l_rqmt_line_rec.last_update_login := nvl(l_login_id, -1);
517: --l_rqmt_line_rec.requirement_header_id := nvl(l_header_rec.requirement_header_id, FND_API.G_MISS_NUM);
518:
519: l_rqmt_line_rec.inventory_item_id := l_line_rec.inventory_item_id;
520: l_rqmt_line_rec.uom_code := l_line_rec.unit_of_measure;
521: l_rqmt_line_rec.required_quantity := l_line_rec.quantity;
529:
530: l_rqmt_line_rec.reservation_id := l_line_rec.reservation_id;
531: l_rqmt_line_rec.order_by_date := l_line_rec.order_by_date;*/
532:
533: l_rqmt_line_rec.attribute_Category := nvl(l_line_rec.attribute_category, FND_API.G_MISS_CHAR);
534: l_rqmt_line_rec.attribute1 := nvl(l_line_rec.attribute1, FND_API.G_MISS_CHAR);
535: l_rqmt_line_rec.attribute2 := nvl(l_line_rec.attribute2, FND_API.G_MISS_CHAR);
536: l_rqmt_line_rec.attribute3 := nvl(l_line_rec.attribute3, FND_API.G_MISS_CHAR);
537: l_rqmt_line_rec.attribute4 := nvl(l_line_rec.attribute4, FND_API.G_MISS_CHAR);
530: l_rqmt_line_rec.reservation_id := l_line_rec.reservation_id;
531: l_rqmt_line_rec.order_by_date := l_line_rec.order_by_date;*/
532:
533: l_rqmt_line_rec.attribute_Category := nvl(l_line_rec.attribute_category, FND_API.G_MISS_CHAR);
534: l_rqmt_line_rec.attribute1 := nvl(l_line_rec.attribute1, FND_API.G_MISS_CHAR);
535: l_rqmt_line_rec.attribute2 := nvl(l_line_rec.attribute2, FND_API.G_MISS_CHAR);
536: l_rqmt_line_rec.attribute3 := nvl(l_line_rec.attribute3, FND_API.G_MISS_CHAR);
537: l_rqmt_line_rec.attribute4 := nvl(l_line_rec.attribute4, FND_API.G_MISS_CHAR);
538: l_rqmt_line_rec.attribute5 := nvl(l_line_rec.attribute5, FND_API.G_MISS_CHAR);
531: l_rqmt_line_rec.order_by_date := l_line_rec.order_by_date;*/
532:
533: l_rqmt_line_rec.attribute_Category := nvl(l_line_rec.attribute_category, FND_API.G_MISS_CHAR);
534: l_rqmt_line_rec.attribute1 := nvl(l_line_rec.attribute1, FND_API.G_MISS_CHAR);
535: l_rqmt_line_rec.attribute2 := nvl(l_line_rec.attribute2, FND_API.G_MISS_CHAR);
536: l_rqmt_line_rec.attribute3 := nvl(l_line_rec.attribute3, FND_API.G_MISS_CHAR);
537: l_rqmt_line_rec.attribute4 := nvl(l_line_rec.attribute4, FND_API.G_MISS_CHAR);
538: l_rqmt_line_rec.attribute5 := nvl(l_line_rec.attribute5, FND_API.G_MISS_CHAR);
539: l_rqmt_line_rec.attribute6 := nvl(l_line_rec.attribute6, FND_API.G_MISS_CHAR);
532:
533: l_rqmt_line_rec.attribute_Category := nvl(l_line_rec.attribute_category, FND_API.G_MISS_CHAR);
534: l_rqmt_line_rec.attribute1 := nvl(l_line_rec.attribute1, FND_API.G_MISS_CHAR);
535: l_rqmt_line_rec.attribute2 := nvl(l_line_rec.attribute2, FND_API.G_MISS_CHAR);
536: l_rqmt_line_rec.attribute3 := nvl(l_line_rec.attribute3, FND_API.G_MISS_CHAR);
537: l_rqmt_line_rec.attribute4 := nvl(l_line_rec.attribute4, FND_API.G_MISS_CHAR);
538: l_rqmt_line_rec.attribute5 := nvl(l_line_rec.attribute5, FND_API.G_MISS_CHAR);
539: l_rqmt_line_rec.attribute6 := nvl(l_line_rec.attribute6, FND_API.G_MISS_CHAR);
540: l_rqmt_line_rec.attribute7 := nvl(l_line_rec.attribute7, FND_API.G_MISS_CHAR);
533: l_rqmt_line_rec.attribute_Category := nvl(l_line_rec.attribute_category, FND_API.G_MISS_CHAR);
534: l_rqmt_line_rec.attribute1 := nvl(l_line_rec.attribute1, FND_API.G_MISS_CHAR);
535: l_rqmt_line_rec.attribute2 := nvl(l_line_rec.attribute2, FND_API.G_MISS_CHAR);
536: l_rqmt_line_rec.attribute3 := nvl(l_line_rec.attribute3, FND_API.G_MISS_CHAR);
537: l_rqmt_line_rec.attribute4 := nvl(l_line_rec.attribute4, FND_API.G_MISS_CHAR);
538: l_rqmt_line_rec.attribute5 := nvl(l_line_rec.attribute5, FND_API.G_MISS_CHAR);
539: l_rqmt_line_rec.attribute6 := nvl(l_line_rec.attribute6, FND_API.G_MISS_CHAR);
540: l_rqmt_line_rec.attribute7 := nvl(l_line_rec.attribute7, FND_API.G_MISS_CHAR);
541: l_rqmt_line_rec.attribute8 := nvl(l_line_rec.attribute8, FND_API.G_MISS_CHAR);
534: l_rqmt_line_rec.attribute1 := nvl(l_line_rec.attribute1, FND_API.G_MISS_CHAR);
535: l_rqmt_line_rec.attribute2 := nvl(l_line_rec.attribute2, FND_API.G_MISS_CHAR);
536: l_rqmt_line_rec.attribute3 := nvl(l_line_rec.attribute3, FND_API.G_MISS_CHAR);
537: l_rqmt_line_rec.attribute4 := nvl(l_line_rec.attribute4, FND_API.G_MISS_CHAR);
538: l_rqmt_line_rec.attribute5 := nvl(l_line_rec.attribute5, FND_API.G_MISS_CHAR);
539: l_rqmt_line_rec.attribute6 := nvl(l_line_rec.attribute6, FND_API.G_MISS_CHAR);
540: l_rqmt_line_rec.attribute7 := nvl(l_line_rec.attribute7, FND_API.G_MISS_CHAR);
541: l_rqmt_line_rec.attribute8 := nvl(l_line_rec.attribute8, FND_API.G_MISS_CHAR);
542: l_rqmt_line_rec.attribute9 := nvl(l_line_rec.attribute9, FND_API.G_MISS_CHAR);
535: l_rqmt_line_rec.attribute2 := nvl(l_line_rec.attribute2, FND_API.G_MISS_CHAR);
536: l_rqmt_line_rec.attribute3 := nvl(l_line_rec.attribute3, FND_API.G_MISS_CHAR);
537: l_rqmt_line_rec.attribute4 := nvl(l_line_rec.attribute4, FND_API.G_MISS_CHAR);
538: l_rqmt_line_rec.attribute5 := nvl(l_line_rec.attribute5, FND_API.G_MISS_CHAR);
539: l_rqmt_line_rec.attribute6 := nvl(l_line_rec.attribute6, FND_API.G_MISS_CHAR);
540: l_rqmt_line_rec.attribute7 := nvl(l_line_rec.attribute7, FND_API.G_MISS_CHAR);
541: l_rqmt_line_rec.attribute8 := nvl(l_line_rec.attribute8, FND_API.G_MISS_CHAR);
542: l_rqmt_line_rec.attribute9 := nvl(l_line_rec.attribute9, FND_API.G_MISS_CHAR);
543: l_rqmt_line_rec.attribute10 := nvl(l_line_rec.attribute10, FND_API.G_MISS_CHAR);
536: l_rqmt_line_rec.attribute3 := nvl(l_line_rec.attribute3, FND_API.G_MISS_CHAR);
537: l_rqmt_line_rec.attribute4 := nvl(l_line_rec.attribute4, FND_API.G_MISS_CHAR);
538: l_rqmt_line_rec.attribute5 := nvl(l_line_rec.attribute5, FND_API.G_MISS_CHAR);
539: l_rqmt_line_rec.attribute6 := nvl(l_line_rec.attribute6, FND_API.G_MISS_CHAR);
540: l_rqmt_line_rec.attribute7 := nvl(l_line_rec.attribute7, FND_API.G_MISS_CHAR);
541: l_rqmt_line_rec.attribute8 := nvl(l_line_rec.attribute8, FND_API.G_MISS_CHAR);
542: l_rqmt_line_rec.attribute9 := nvl(l_line_rec.attribute9, FND_API.G_MISS_CHAR);
543: l_rqmt_line_rec.attribute10 := nvl(l_line_rec.attribute10, FND_API.G_MISS_CHAR);
544: l_rqmt_line_rec.attribute11 := nvl(l_line_rec.attribute11, FND_API.G_MISS_CHAR);
537: l_rqmt_line_rec.attribute4 := nvl(l_line_rec.attribute4, FND_API.G_MISS_CHAR);
538: l_rqmt_line_rec.attribute5 := nvl(l_line_rec.attribute5, FND_API.G_MISS_CHAR);
539: l_rqmt_line_rec.attribute6 := nvl(l_line_rec.attribute6, FND_API.G_MISS_CHAR);
540: l_rqmt_line_rec.attribute7 := nvl(l_line_rec.attribute7, FND_API.G_MISS_CHAR);
541: l_rqmt_line_rec.attribute8 := nvl(l_line_rec.attribute8, FND_API.G_MISS_CHAR);
542: l_rqmt_line_rec.attribute9 := nvl(l_line_rec.attribute9, FND_API.G_MISS_CHAR);
543: l_rqmt_line_rec.attribute10 := nvl(l_line_rec.attribute10, FND_API.G_MISS_CHAR);
544: l_rqmt_line_rec.attribute11 := nvl(l_line_rec.attribute11, FND_API.G_MISS_CHAR);
545: l_rqmt_line_rec.attribute12 := nvl(l_line_rec.attribute12, FND_API.G_MISS_CHAR);
538: l_rqmt_line_rec.attribute5 := nvl(l_line_rec.attribute5, FND_API.G_MISS_CHAR);
539: l_rqmt_line_rec.attribute6 := nvl(l_line_rec.attribute6, FND_API.G_MISS_CHAR);
540: l_rqmt_line_rec.attribute7 := nvl(l_line_rec.attribute7, FND_API.G_MISS_CHAR);
541: l_rqmt_line_rec.attribute8 := nvl(l_line_rec.attribute8, FND_API.G_MISS_CHAR);
542: l_rqmt_line_rec.attribute9 := nvl(l_line_rec.attribute9, FND_API.G_MISS_CHAR);
543: l_rqmt_line_rec.attribute10 := nvl(l_line_rec.attribute10, FND_API.G_MISS_CHAR);
544: l_rqmt_line_rec.attribute11 := nvl(l_line_rec.attribute11, FND_API.G_MISS_CHAR);
545: l_rqmt_line_rec.attribute12 := nvl(l_line_rec.attribute12, FND_API.G_MISS_CHAR);
546: l_rqmt_line_rec.attribute13 := nvl(l_line_rec.attribute13, FND_API.G_MISS_CHAR);
539: l_rqmt_line_rec.attribute6 := nvl(l_line_rec.attribute6, FND_API.G_MISS_CHAR);
540: l_rqmt_line_rec.attribute7 := nvl(l_line_rec.attribute7, FND_API.G_MISS_CHAR);
541: l_rqmt_line_rec.attribute8 := nvl(l_line_rec.attribute8, FND_API.G_MISS_CHAR);
542: l_rqmt_line_rec.attribute9 := nvl(l_line_rec.attribute9, FND_API.G_MISS_CHAR);
543: l_rqmt_line_rec.attribute10 := nvl(l_line_rec.attribute10, FND_API.G_MISS_CHAR);
544: l_rqmt_line_rec.attribute11 := nvl(l_line_rec.attribute11, FND_API.G_MISS_CHAR);
545: l_rqmt_line_rec.attribute12 := nvl(l_line_rec.attribute12, FND_API.G_MISS_CHAR);
546: l_rqmt_line_rec.attribute13 := nvl(l_line_rec.attribute13, FND_API.G_MISS_CHAR);
547: l_rqmt_line_rec.attribute14 := nvl(l_line_rec.attribute14, FND_API.G_MISS_CHAR);
540: l_rqmt_line_rec.attribute7 := nvl(l_line_rec.attribute7, FND_API.G_MISS_CHAR);
541: l_rqmt_line_rec.attribute8 := nvl(l_line_rec.attribute8, FND_API.G_MISS_CHAR);
542: l_rqmt_line_rec.attribute9 := nvl(l_line_rec.attribute9, FND_API.G_MISS_CHAR);
543: l_rqmt_line_rec.attribute10 := nvl(l_line_rec.attribute10, FND_API.G_MISS_CHAR);
544: l_rqmt_line_rec.attribute11 := nvl(l_line_rec.attribute11, FND_API.G_MISS_CHAR);
545: l_rqmt_line_rec.attribute12 := nvl(l_line_rec.attribute12, FND_API.G_MISS_CHAR);
546: l_rqmt_line_rec.attribute13 := nvl(l_line_rec.attribute13, FND_API.G_MISS_CHAR);
547: l_rqmt_line_rec.attribute14 := nvl(l_line_rec.attribute14, FND_API.G_MISS_CHAR);
548: l_rqmt_line_rec.attribute15 := nvl(l_line_rec.attribute15, FND_API.G_MISS_CHAR);
541: l_rqmt_line_rec.attribute8 := nvl(l_line_rec.attribute8, FND_API.G_MISS_CHAR);
542: l_rqmt_line_rec.attribute9 := nvl(l_line_rec.attribute9, FND_API.G_MISS_CHAR);
543: l_rqmt_line_rec.attribute10 := nvl(l_line_rec.attribute10, FND_API.G_MISS_CHAR);
544: l_rqmt_line_rec.attribute11 := nvl(l_line_rec.attribute11, FND_API.G_MISS_CHAR);
545: l_rqmt_line_rec.attribute12 := nvl(l_line_rec.attribute12, FND_API.G_MISS_CHAR);
546: l_rqmt_line_rec.attribute13 := nvl(l_line_rec.attribute13, FND_API.G_MISS_CHAR);
547: l_rqmt_line_rec.attribute14 := nvl(l_line_rec.attribute14, FND_API.G_MISS_CHAR);
548: l_rqmt_line_rec.attribute15 := nvl(l_line_rec.attribute15, FND_API.G_MISS_CHAR);
549:
542: l_rqmt_line_rec.attribute9 := nvl(l_line_rec.attribute9, FND_API.G_MISS_CHAR);
543: l_rqmt_line_rec.attribute10 := nvl(l_line_rec.attribute10, FND_API.G_MISS_CHAR);
544: l_rqmt_line_rec.attribute11 := nvl(l_line_rec.attribute11, FND_API.G_MISS_CHAR);
545: l_rqmt_line_rec.attribute12 := nvl(l_line_rec.attribute12, FND_API.G_MISS_CHAR);
546: l_rqmt_line_rec.attribute13 := nvl(l_line_rec.attribute13, FND_API.G_MISS_CHAR);
547: l_rqmt_line_rec.attribute14 := nvl(l_line_rec.attribute14, FND_API.G_MISS_CHAR);
548: l_rqmt_line_rec.attribute15 := nvl(l_line_rec.attribute15, FND_API.G_MISS_CHAR);
549:
550: l_rqmt_line_rec.order_line_id := l_line_Rec.order_line_id;
543: l_rqmt_line_rec.attribute10 := nvl(l_line_rec.attribute10, FND_API.G_MISS_CHAR);
544: l_rqmt_line_rec.attribute11 := nvl(l_line_rec.attribute11, FND_API.G_MISS_CHAR);
545: l_rqmt_line_rec.attribute12 := nvl(l_line_rec.attribute12, FND_API.G_MISS_CHAR);
546: l_rqmt_line_rec.attribute13 := nvl(l_line_rec.attribute13, FND_API.G_MISS_CHAR);
547: l_rqmt_line_rec.attribute14 := nvl(l_line_rec.attribute14, FND_API.G_MISS_CHAR);
548: l_rqmt_line_rec.attribute15 := nvl(l_line_rec.attribute15, FND_API.G_MISS_CHAR);
549:
550: l_rqmt_line_rec.order_line_id := l_line_Rec.order_line_id;
551: px_line_table(I).order_line_id := l_line_Rec.order_line_id;
544: l_rqmt_line_rec.attribute11 := nvl(l_line_rec.attribute11, FND_API.G_MISS_CHAR);
545: l_rqmt_line_rec.attribute12 := nvl(l_line_rec.attribute12, FND_API.G_MISS_CHAR);
546: l_rqmt_line_rec.attribute13 := nvl(l_line_rec.attribute13, FND_API.G_MISS_CHAR);
547: l_rqmt_line_rec.attribute14 := nvl(l_line_rec.attribute14, FND_API.G_MISS_CHAR);
548: l_rqmt_line_rec.attribute15 := nvl(l_line_rec.attribute15, FND_API.G_MISS_CHAR);
549:
550: l_rqmt_line_rec.order_line_id := l_line_Rec.order_line_id;
551: px_line_table(I).order_line_id := l_line_Rec.order_line_id;
552: l_rqmt_line_Tbl(I) := l_rqmt_line_rec;
568: -- call private api for inserting into csp_Requirement_headers
569: CSP_REQUIREMENT_HEADERS_PVT.Create_requirement_headers(
570: P_Api_Version_Number => l_api_Version_number,
571: P_Init_Msg_List => p_init_msg_list,
572: P_Commit => FND_API.G_FALSE,
573: p_validation_level => null,
574: P_REQUIREMENT_HEADER_Rec => l_rqmt_header_rec,
575: X_REQUIREMENT_HEADER_ID => l_requirement_header_id,
576: X_Return_Status => l_Return_status,
576: X_Return_Status => l_Return_status,
577: X_Msg_Count => l_msg_count,
578: X_Msg_Data => l_msg_data
579: );
580: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
581: RAISE FND_API.G_EXC_ERROR;
582: ELSE
583: IF l_order_msg IS NOT null THEN
584: FND_MESSAGE.Set_Name('CSP', 'CSP_REQ_CREATED');
577: X_Msg_Count => l_msg_count,
578: X_Msg_Data => l_msg_data
579: );
580: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
581: RAISE FND_API.G_EXC_ERROR;
582: ELSE
583: IF l_order_msg IS NOT null THEN
584: FND_MESSAGE.Set_Name('CSP', 'CSP_REQ_CREATED');
585: FND_MESSAGE.Set_Token('REQ_NUMBER',to_char(l_requirement_header_id));
600: -- call private api for inserting into csp_Requirement_headers
601: CSP_REQUIREMENT_HEADERS_PVT.Create_requirement_headers(
602: P_Api_Version_Number => l_api_Version_number,
603: P_Init_Msg_List => p_init_msg_list,
604: P_Commit => FND_API.G_FALSE,
605: p_validation_level => null,
606: P_REQUIREMENT_HEADER_Rec => l_rqmt_header_rec,
607: X_REQUIREMENT_HEADER_ID => l_requirement_header_id,
608: X_Return_Status => l_Return_status,
608: X_Return_Status => l_Return_status,
609: X_Msg_Count => l_msg_count,
610: X_Msg_Data => l_msg_data
611: );
612: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
613: RAISE FND_API.G_EXC_ERROR;
614: ELSE
615: IF l_order_msg IS NOT null THEN
616: FND_MESSAGE.Set_Name('CSP', 'CSP_REQ_CREATED');
609: X_Msg_Count => l_msg_count,
610: X_Msg_Data => l_msg_data
611: );
612: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
613: RAISE FND_API.G_EXC_ERROR;
614: ELSE
615: IF l_order_msg IS NOT null THEN
616: FND_MESSAGE.Set_Name('CSP', 'CSP_REQ_CREATED');
617: FND_MESSAGE.Set_Token('REQ_NUMBER',to_char(l_requirement_header_id));
623: -- call private api for inserting into csp_Requirement_headers
624: CSP_REQUIREMENT_HEADERS_PVT.Create_requirement_headers(
625: P_Api_Version_Number => l_api_Version_number,
626: P_Init_Msg_List => p_init_msg_list,
627: P_Commit => FND_API.G_FALSE,
628: p_validation_level => null,
629: P_REQUIREMENT_HEADER_Rec => l_rqmt_header_rec,
630: X_REQUIREMENT_HEADER_ID => l_requirement_header_id,
631: X_Return_Status => l_Return_status,
631: X_Return_Status => l_Return_status,
632: X_Msg_Count => l_msg_count,
633: X_Msg_Data => l_msg_data
634: );
635: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
636: RAISE FND_API.G_EXC_ERROR;
637: ELSE
638: IF l_order_msg IS NOT null THEN
639: FND_MESSAGE.Set_Name('CSP', 'CSP_REQ_CREATED');
632: X_Msg_Count => l_msg_count,
633: X_Msg_Data => l_msg_data
634: );
635: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
636: RAISE FND_API.G_EXC_ERROR;
637: ELSE
638: IF l_order_msg IS NOT null THEN
639: FND_MESSAGE.Set_Name('CSP', 'CSP_REQ_CREATED');
640: FND_MESSAGE.Set_Token('REQ_NUMBER',to_char(l_requirement_header_id));
654: -- call private api for inserting into csp_requirement_lines
655: CSP_Requirement_Lines_PVT.Create_requirement_lines(
656: P_Api_Version_Number => l_api_version_number,
657: P_Init_Msg_List => p_Init_Msg_List,
658: P_Commit => FND_API.G_FALSE,
659: p_validation_level => null,
660: P_Requirement_Line_Tbl => l_rqmt_line_tbl,
661: x_Requirement_Line_tbl => x_rqmt_line_tbl,
662: X_Return_Status => l_return_status,
663: X_Msg_Count => l_msg_count,
664: X_Msg_Data => l_msg_data
665: );
666:
667: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
668: RAISE FND_API.G_EXC_ERROR;
669: ELSE
670: IF x_msg_data IS null and l_order_msg is not null THEN
671: FND_MESSAGE.Set_Name('CSP', 'CSP_REQ_UPDATED');
664: X_Msg_Data => l_msg_data
665: );
666:
667: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
668: RAISE FND_API.G_EXC_ERROR;
669: ELSE
670: IF x_msg_data IS null and l_order_msg is not null THEN
671: FND_MESSAGE.Set_Name('CSP', 'CSP_REQ_UPDATED');
672: FND_MESSAGE.Set_Token('REQ_NUMBER',to_char(l_requirement_header_id));
696: -- call private api for updating requirement headers
697: CSP_REQUIREMENT_HEADERS_PVT.Update_requirement_headers(
698: P_Api_Version_Number => l_api_Version_number,
699: P_Init_Msg_List => p_init_msg_list,
700: P_Commit => FND_API.G_FALSE,
701: p_validation_level => null,
702: P_REQUIREMENT_HEADER_Rec => l_rqmt_header_rec,
703: X_Return_Status => l_Return_status,
704: X_Msg_Count => l_msg_count,
704: X_Msg_Count => l_msg_count,
705: X_Msg_Data => l_msg_data
706: );
707:
708: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
709: RAISE FND_API.G_EXC_ERROR;
710: END IF;
711:
712: -- call private api for updating requirement lines
705: X_Msg_Data => l_msg_data
706: );
707:
708: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
709: RAISE FND_API.G_EXC_ERROR;
710: END IF;
711:
712: -- call private api for updating requirement lines
713: --FOR I in 1..l_rqmt_line_tbl.COUNT LOOP
713: --FOR I in 1..l_rqmt_line_tbl.COUNT LOOP
714: CSP_Requirement_Lines_PVT.Update_requirement_lines(
715: P_Api_Version_Number => l_api_version_number,
716: P_Init_Msg_List => p_Init_Msg_List,
717: P_Commit => FND_API.G_FALSE,
718: p_validation_level => null,
719: P_Requirement_Line_Tbl => l_rqmt_line_tbl,
720: X_Return_Status => l_return_status,
721: X_Msg_Count => l_msg_count,
721: X_Msg_Count => l_msg_count,
722: X_Msg_Data => l_msg_data
723: );
724:
725: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
726: RAISE FND_API.G_EXC_ERROR;
727: END IF;
728:
729: --END LOOP;
722: X_Msg_Data => l_msg_data
723: );
724:
725: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
726: RAISE FND_API.G_EXC_ERROR;
727: END IF;
728:
729: --END LOOP;
730: If p_commit = FND_API.G_TRUE then
726: RAISE FND_API.G_EXC_ERROR;
727: END IF;
728:
729: --END LOOP;
730: If p_commit = FND_API.G_TRUE then
731: commit work;
732: end if;
733: END IF;
734: IF x_msg_data is not null or l_order_msg is not null THEN
734: IF x_msg_data is not null or l_order_msg is not null THEN
735: x_msg_data := x_msg_data || ' ' || l_order_msg;
736: END IF;
737: EXCEPTION
738: WHEN FND_API.G_EXC_ERROR THEN
739: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
740: P_API_NAME => L_API_NAME
741: ,P_PKG_NAME => G_PKG_NAME
742: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
743: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PUB
744: ,X_MSG_COUNT => X_MSG_COUNT
745: ,X_MSG_DATA => X_MSG_DATA
746: ,X_RETURN_STATUS => X_RETURN_STATUS);
747: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
748: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
749: P_API_NAME => L_API_NAME
750: ,P_PKG_NAME => G_PKG_NAME
751: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
761: FND_MSG_PUB.ADD;
762: fnd_msg_pub.count_and_get
763: ( p_count => x_msg_count
764: , p_data => x_msg_data);
765: x_return_status := FND_API.G_RET_STS_ERROR;
766:
767: END;
768:
769:
769:
770:
771: PROCEDURE csptrreq_fm_order(
772: p_api_version IN NUMBER
773: ,p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE
774: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
775: ,px_header_rec IN OUT NOCOPY csp_parts_requirement.Header_rec_type
776: ,px_line_table IN OUT NOCOPY csp_parts_requirement.Line_Tbl_type
777: ,x_return_status OUT NOCOPY VARCHAR2
770:
771: PROCEDURE csptrreq_fm_order(
772: p_api_version IN NUMBER
773: ,p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE
774: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
775: ,px_header_rec IN OUT NOCOPY csp_parts_requirement.Header_rec_type
776: ,px_line_table IN OUT NOCOPY csp_parts_requirement.Line_Tbl_type
777: ,x_return_status OUT NOCOPY VARCHAR2
778: ,x_msg_count OUT NOCOPY NUMBER
779: ,x_msg_data OUT NOCOPY VARCHAR2
780: ) IS
781: l_api_version_number CONSTANT NUMBER := 1.0;
782: l_api_name CONSTANT VARCHAR2(30) := 'csptrreq_fm_order';
783: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
784: l_msg_count NUMBER;
785: l_msg_data VARCHAR2(4000);
786: l_commit VARCHAR2(1) := FND_API.G_FALSE;
787: l_user_id NUMBER;
782: l_api_name CONSTANT VARCHAR2(30) := 'csptrreq_fm_order';
783: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
784: l_msg_count NUMBER;
785: l_msg_data VARCHAR2(4000);
786: l_commit VARCHAR2(1) := FND_API.G_FALSE;
787: l_user_id NUMBER;
788: l_login_id NUMBER;
789: l_today DATE;
790: EXCP_USER_DEFINED EXCEPTION;
828: BEGIN
829:
830: SAVEPOINT csptrreq_fm_order_PUB;
831:
832: IF fnd_api.to_boolean(P_Init_Msg_List) THEN
833: -- initialize message list
834: FND_MSG_PUB.initialize;
835: END IF;
836:
834: FND_MSG_PUB.initialize;
835: END IF;
836:
837: -- Standard call to check for call compatibility.
838: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
839: p_api_version,
840: l_api_name,
841: G_PKG_NAME)
842: THEN
839: p_api_version,
840: l_api_name,
841: G_PKG_NAME)
842: THEN
843: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
844: END IF;
845:
846: -- initialize return status
847: x_return_status := FND_API.G_RET_STS_SUCCESS;
843: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
844: END IF;
845:
846: -- initialize return status
847: x_return_status := FND_API.G_RET_STS_SUCCESS;
848:
849: l_header_Rec := px_header_rec;
850: l_old_line_tbl := px_line_table;
851:
877: x_return_status => l_return_status,
878: x_msg_count => l_msg_count,
879: x_msg_Data => l_msg_data
880: );
881: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
882: RAISE FND_API.G_EXC_ERROR;
883: END If;
884: END IF;
885:
878: x_msg_count => l_msg_count,
879: x_msg_Data => l_msg_data
880: );
881: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
882: RAISE FND_API.G_EXC_ERROR;
883: END If;
884: END IF;
885:
886: IF (l_qty_to_Reserve < l_resource_att and l_qty_to_reserve > 0) THEN
899: --x_msg_count => l_msg_Count,
900: x_msg_data => l_msg_data
901:
902: );
903: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
904: RAISE FND_API.G_EXC_ERROR;
905: END If;
906:
907: update csp_Requirement_lines
900: x_msg_data => l_msg_data
901:
902: );
903: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
904: RAISE FND_API.G_EXC_ERROR;
905: END If;
906:
907: update csp_Requirement_lines
908: set local_Reservation_id = l_local_Reservation_id
933: ,x_msg_count => l_msg_count
934: ,x_msg_data => l_msg_data
935: );
936:
937: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
938: RAISE FND_API.G_EXC_ERROR;
939: ELSE
940: -- update csp_requirement_line table with order information
941: FOR I IN 1..l_line_tbl.COUNT LOOP
934: ,x_msg_data => l_msg_data
935: );
936:
937: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
938: RAISE FND_API.G_EXC_ERROR;
939: ELSE
940: -- update csp_requirement_line table with order information
941: FOR I IN 1..l_line_tbl.COUNT LOOP
942: l_line_rec := l_line_tbl(I);
940: -- update csp_requirement_line table with order information
941: FOR I IN 1..l_line_tbl.COUNT LOOP
942: l_line_rec := l_line_tbl(I);
943:
944: IF nvl(l_line_rec.requirement_line_id, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
945:
946: FND_MESSAGE.SET_NAME ('CSP', 'CSP_MISSING_PARAMETERS');
947: FND_MESSAGE.SET_TOKEN ('PARAMETER', 'l_line_rec.requirement_line_id', FALSE);
948:
998: ,x_msg_count => l_msg_count
999: ,x_msg_data => l_msg_data
1000: );
1001:
1002: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1003: RAISE FND_API.G_EXC_ERROR;
1004: ELSE
1005: -- now update csp_requirement_line table with purchase req information
1006: J := l_line_tbl.count + 1;
999: ,x_msg_data => l_msg_data
1000: );
1001:
1002: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1003: RAISE FND_API.G_EXC_ERROR;
1004: ELSE
1005: -- now update csp_requirement_line table with purchase req information
1006: J := l_line_tbl.count + 1;
1007: FOR I IN 1..l_po_line_tbl.COUNT LOOP
1006: J := l_line_tbl.count + 1;
1007: FOR I IN 1..l_po_line_tbl.COUNT LOOP
1008: l_line_rec := l_po_line_tbl(I);
1009:
1010: IF nvl(l_line_rec.requirement_line_id, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
1011:
1012: FND_MESSAGE.SET_NAME ('CSP', 'CSP_MISSING_PARAMETERS');
1013: FND_MESSAGE.SET_TOKEN ('PARAMETER', 'l_line_rec.requirement_line_id', FALSE);
1014:
1064: X_Msg_Count => l_msg_count,
1065: X_Msg_Data => l_msg_data
1066: );
1067:
1068: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1069: RAISE FND_API.G_EXC_ERROR;
1070: END IF;
1071:
1072: -- assign output variables
1065: X_Msg_Data => l_msg_data
1066: );
1067:
1068: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1069: RAISE FND_API.G_EXC_ERROR;
1070: END IF;
1071:
1072: -- assign output variables
1073: px_header_rec := l_header_rec;
1075:
1076: END IF;
1077:
1078: EXCEPTION
1079: WHEN FND_API.G_EXC_ERROR THEN
1080: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
1081: P_API_NAME => L_API_NAME
1082: ,P_PKG_NAME => G_PKG_NAME
1083: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1084: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PUB
1085: ,X_MSG_COUNT => X_MSG_COUNT
1086: ,X_MSG_DATA => X_MSG_DATA
1087: ,X_RETURN_STATUS => X_RETURN_STATUS);
1088: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1089: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
1090: P_API_NAME => L_API_NAME
1091: ,P_PKG_NAME => G_PKG_NAME
1092: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1102: FND_MSG_PUB.ADD;
1103: fnd_msg_pub.count_and_get
1104: ( p_count => x_msg_count
1105: , p_data => x_msg_data);
1106: x_return_status := FND_API.G_RET_STS_ERROR;
1107:
1108: END csptrreq_fm_order;
1109:
1110: PROCEDURE csptrreq_order_res(
1108: END csptrreq_fm_order;
1109:
1110: PROCEDURE csptrreq_order_res(
1111: p_api_version IN NUMBER
1112: ,p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE
1113: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1114: ,px_header_rec IN OUT NOCOPY csp_parts_requirement.Header_rec_type
1115: ,px_line_table IN OUT NOCOPY csp_parts_requirement.Line_Tbl_type
1116: ,x_return_status OUT NOCOPY VARCHAR2
1109:
1110: PROCEDURE csptrreq_order_res(
1111: p_api_version IN NUMBER
1112: ,p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE
1113: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1114: ,px_header_rec IN OUT NOCOPY csp_parts_requirement.Header_rec_type
1115: ,px_line_table IN OUT NOCOPY csp_parts_requirement.Line_Tbl_type
1116: ,x_return_status OUT NOCOPY VARCHAR2
1117: ,x_msg_count OUT NOCOPY NUMBER
1118: ,x_msg_data OUT NOCOPY VARCHAR2
1119: ) IS
1120: l_api_version_number CONSTANT NUMBER := 1.0;
1121: l_api_name CONSTANT VARCHAR2(30) := 'csptrreq_fm_order';
1122: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1123: l_msg_count NUMBER;
1124: l_msg_data VARCHAR2(4000);
1125: l_commit VARCHAR2(1) := FND_API.G_FALSE;
1126: l_user_id NUMBER;
1121: l_api_name CONSTANT VARCHAR2(30) := 'csptrreq_fm_order';
1122: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1123: l_msg_count NUMBER;
1124: l_msg_data VARCHAR2(4000);
1125: l_commit VARCHAR2(1) := FND_API.G_FALSE;
1126: l_user_id NUMBER;
1127: l_login_id NUMBER;
1128: l_today DATE;
1129: EXCP_USER_DEFINED EXCEPTION;
1149: BEGIN
1150:
1151: SAVEPOINT csptrreq_fm_order_PUB;
1152:
1153: IF fnd_api.to_boolean(P_Init_Msg_List) THEN
1154: -- initialize message list
1155: FND_MSG_PUB.initialize;
1156: END IF;
1157:
1155: FND_MSG_PUB.initialize;
1156: END IF;
1157:
1158: -- Standard call to check for call compatibility.
1159: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1160: p_api_version,
1161: l_api_name,
1162: G_PKG_NAME)
1163: THEN
1160: p_api_version,
1161: l_api_name,
1162: G_PKG_NAME)
1163: THEN
1164: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1165: END IF;
1166:
1167: -- initialize return status
1168: x_return_status := FND_API.G_RET_STS_SUCCESS;
1164: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1165: END IF;
1166:
1167: -- initialize return status
1168: x_return_status := FND_API.G_RET_STS_SUCCESS;
1169:
1170: l_header_Rec := px_header_rec;
1171: l_line_tbl := px_line_table;
1172:
1193: p_reservation_parts => l_reservation_rec,
1194: x_return_status => l_return_status,
1195: x_msg_data => l_msg_data
1196: );
1197: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1198: RAISE FND_API.G_EXC_ERROR;
1199: ELSE
1200: -- code for inserting into req line dtls
1201: SELECT csp_req_line_Details_s1.nextval
1194: x_return_status => l_return_status,
1195: x_msg_data => l_msg_data
1196: );
1197: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1198: RAISE FND_API.G_EXC_ERROR;
1199: ELSE
1200: -- code for inserting into req line dtls
1201: SELECT csp_req_line_Details_s1.nextval
1202: INTO l_req_line_Dtl_id
1236: ,x_msg_count => l_msg_count
1237: ,x_msg_data => l_msg_data
1238: );
1239:
1240: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1241: RAISE FND_API.G_EXC_ERROR;
1242: ELSE
1243: -- insert record in csp_req_line_details table with order information
1244: FOR I IN 1..l_oe_line_tbl.COUNT LOOP
1237: ,x_msg_data => l_msg_data
1238: );
1239:
1240: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1241: RAISE FND_API.G_EXC_ERROR;
1242: ELSE
1243: -- insert record in csp_req_line_details table with order information
1244: FOR I IN 1..l_oe_line_tbl.COUNT LOOP
1245: l_line_rec := l_oe_line_tbl(I);
1274: ,x_msg_count => l_msg_count
1275: ,x_msg_data => l_msg_data
1276: );
1277:
1278: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1279: RAISE FND_API.G_EXC_ERROR;
1280: ELSE
1281: -- insert into csp_req_line_Details table with purchase req information
1282: FOR I IN 1..l_po_line_tbl.COUNT LOOP
1275: ,x_msg_data => l_msg_data
1276: );
1277:
1278: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1279: RAISE FND_API.G_EXC_ERROR;
1280: ELSE
1281: -- insert into csp_req_line_Details table with purchase req information
1282: FOR I IN 1..l_po_line_tbl.COUNT LOOP
1283: l_line_rec := l_po_line_tbl(I);
1299: END LOOP;
1300: END IF;
1301: END IF;
1302: EXCEPTION
1303: WHEN FND_API.G_EXC_ERROR THEN
1304: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
1305: P_API_NAME => L_API_NAME
1306: ,P_PKG_NAME => G_PKG_NAME
1307: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1308: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PUB
1309: ,X_MSG_COUNT => X_MSG_COUNT
1310: ,X_MSG_DATA => X_MSG_DATA
1311: ,X_RETURN_STATUS => X_RETURN_STATUS);
1312: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1313: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
1314: P_API_NAME => L_API_NAME
1315: ,P_PKG_NAME => G_PKG_NAME
1316: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1326: FND_MSG_PUB.ADD;
1327: fnd_msg_pub.count_and_get
1328: ( p_count => x_msg_count
1329: , p_data => x_msg_data);
1330: x_return_status := FND_API.G_RET_STS_ERROR;
1331: END;
1332:
1333: PROCEDURE delete_rqmt_header(
1334: p_api_version IN NUMBER
1331: END;
1332:
1333: PROCEDURE delete_rqmt_header(
1334: p_api_version IN NUMBER
1335: ,p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE
1336: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1337: ,p_header_id IN NUMBER
1338: ,x_return_status OUT NOCOPY VARCHAR2
1339: ,x_msg_count OUT NOCOPY NUMBER
1332:
1333: PROCEDURE delete_rqmt_header(
1334: p_api_version IN NUMBER
1335: ,p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE
1336: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1337: ,p_header_id IN NUMBER
1338: ,x_return_status OUT NOCOPY VARCHAR2
1339: ,x_msg_count OUT NOCOPY NUMBER
1340: ,x_msg_data OUT NOCOPY VARCHAR2
1345: l_count NUMBER;
1346: BEGIN
1347: SAVEPOINT delete_rqmt_header_PUB;
1348:
1349: IF fnd_api.to_boolean(P_Init_Msg_List) THEN
1350: -- initialize message list
1351: FND_MSG_PUB.initialize;
1352: END IF;
1353:
1351: FND_MSG_PUB.initialize;
1352: END IF;
1353:
1354: -- Standard call to check for call compatibility.
1355: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1356: p_api_version,
1357: l_api_name,
1358: G_PKG_NAME)
1359: THEN
1356: p_api_version,
1357: l_api_name,
1358: G_PKG_NAME)
1359: THEN
1360: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1361: END IF;
1362:
1363: -- initialize return status
1364: x_return_status := FND_API.G_RET_STS_SUCCESS;
1360: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1361: END IF;
1362:
1363: -- initialize return status
1364: x_return_status := FND_API.G_RET_STS_SUCCESS;
1365:
1366: IF (p_header_id IS NOT NULL) THEN
1367: SELECT count(*)
1368: INTO l_count
1382: DELETE FROM csp_requirement_headers
1383: WHERE requirement_header_id = p_header_id;
1384: END IF;
1385:
1386: IF fnd_api.to_boolean(p_commit) THEN
1387: commit work;
1388: END IF;
1389: x_return_status := FND_API.G_RET_STS_SUCCESS;
1390: END IF;
1385:
1386: IF fnd_api.to_boolean(p_commit) THEN
1387: commit work;
1388: END IF;
1389: x_return_status := FND_API.G_RET_STS_SUCCESS;
1390: END IF;
1391: EXCEPTION
1392: WHEN EXCP_USER_DEFINED THEN
1393: Rollback to delete_rqmt_header_PUB;
1390: END IF;
1391: EXCEPTION
1392: WHEN EXCP_USER_DEFINED THEN
1393: Rollback to delete_rqmt_header_PUB;
1394: x_return_status := FND_API.G_RET_STS_ERROR;
1395: fnd_msg_pub.count_and_get
1396: ( p_count => x_msg_count
1397: , p_data => x_msg_data);
1398:
1395: fnd_msg_pub.count_and_get
1396: ( p_count => x_msg_count
1397: , p_data => x_msg_data);
1398:
1399: WHEN FND_API.G_EXC_ERROR THEN
1400: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
1401: P_API_NAME => L_API_NAME
1402: ,P_PKG_NAME => G_PKG_NAME
1403: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1404: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PUB
1405: ,X_MSG_COUNT => X_MSG_COUNT
1406: ,X_MSG_DATA => X_MSG_DATA
1407: ,X_RETURN_STATUS => X_RETURN_STATUS);
1408: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1409: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
1410: P_API_NAME => L_API_NAME
1411: ,P_PKG_NAME => G_PKG_NAME
1412: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1422: FND_MSG_PUB.ADD;
1423: fnd_msg_pub.count_and_get
1424: ( p_count => x_msg_count
1425: , p_data => x_msg_data);
1426: x_return_status := FND_API.G_RET_STS_ERROR;
1427: END;
1428:
1429: PROCEDURE save_rqmt_line(
1430: p_api_version IN NUMBER
1427: END;
1428:
1429: PROCEDURE save_rqmt_line(
1430: p_api_version IN NUMBER
1431: ,p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE
1432: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1433: ,px_header_rec IN OUT NOCOPY csp_parts_requirement.Header_rec_type
1434: ,px_line_tbl IN OUT NOCOPY csp_parts_requirement.Line_tbl_type
1435: ,x_return_status OUT NOCOPY VARCHAR2
1428:
1429: PROCEDURE save_rqmt_line(
1430: p_api_version IN NUMBER
1431: ,p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE
1432: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1433: ,px_header_rec IN OUT NOCOPY csp_parts_requirement.Header_rec_type
1434: ,px_line_tbl IN OUT NOCOPY csp_parts_requirement.Line_tbl_type
1435: ,x_return_status OUT NOCOPY VARCHAR2
1436: ,x_msg_count OUT NOCOPY NUMBER
1448: l_rqmt_header_Rec csp_requirement_headers_pvt.requirement_header_rec_type;
1449: l_rqmt_line_Rec csp_requirement_lines_pvt.requirement_line_rec_type;
1450: l_rqmt_line_Tbl csp_requirement_lines_pvt.requirement_line_tbl_type;
1451: l_rqmt_line_Tbl_out csp_requirement_lines_pvt.requirement_line_tbl_type;
1452: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1453: l_msg_count NUMBER;
1454: l_msg_data VARCHAR2(2000);
1455: l_requirement_header_id NUMBER;
1456: l_resource_name VARCHAR2(240);
1492: */
1493: BEGIN
1494: SAVEPOINT save_rqmt_line_PUB;
1495:
1496: IF fnd_api.to_boolean(P_Init_Msg_List) THEN
1497: -- initialize message list
1498: FND_MSG_PUB.initialize;
1499: END IF;
1500:
1498: FND_MSG_PUB.initialize;
1499: END IF;
1500:
1501: -- Standard call to check for call compatibility.
1502: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1503: p_api_version,
1504: l_api_name,
1505: G_PKG_NAME)
1506: THEN
1504: l_api_name,
1505: G_PKG_NAME)
1506: THEN
1507:
1508: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1509: END IF;
1510:
1511: -- initialize return status
1512: x_return_status := FND_API.G_RET_STS_SUCCESS;
1508: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1509: END IF;
1510:
1511: -- initialize return status
1512: x_return_status := FND_API.G_RET_STS_SUCCESS;
1513: l_header_Rec := px_header_rec;
1514: l_line_tbl := px_line_tbl;
1515:
1516: -- user and login information
1593: CLOSE get_party_details;
1594:
1595: csp_ship_to_address_pvt.cust_inv_loc_link
1596: ( p_api_version => 1.0
1597: ,p_Init_Msg_List => FND_API.G_FALSE
1598: ,p_commit => FND_API.G_FALSE
1599: ,px_location_id => l_header_Rec.ship_to_location_id
1600: ,p_party_site_id => l_party_site_id
1601: ,p_cust_account_id => l_cust_account_id
1594:
1595: csp_ship_to_address_pvt.cust_inv_loc_link
1596: ( p_api_version => 1.0
1597: ,p_Init_Msg_List => FND_API.G_FALSE
1598: ,p_commit => FND_API.G_FALSE
1599: ,px_location_id => l_header_Rec.ship_to_location_id
1600: ,p_party_site_id => l_party_site_id
1601: ,p_cust_account_id => l_cust_account_id
1602: ,p_customer_id => l_customer_id
1623: ,p_attribute20 => null
1624: ,x_return_status => l_return_status
1625: ,x_msg_count => l_msg_count
1626: ,x_msg_data => l_msg_data);
1627: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1628: RAISE FND_API.G_EXC_ERROR;
1629: END IF;
1630: END IF;
1631:
1624: ,x_return_status => l_return_status
1625: ,x_msg_count => l_msg_count
1626: ,x_msg_data => l_msg_data);
1627: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1628: RAISE FND_API.G_EXC_ERROR;
1629: END IF;
1630: END IF;
1631:
1632: l_rqmt_header_Rec.requirement_header_id := nvl(l_header_rec.requirement_header_id, FND_API.G_MISS_NUM);
1628: RAISE FND_API.G_EXC_ERROR;
1629: END IF;
1630: END IF;
1631:
1632: l_rqmt_header_Rec.requirement_header_id := nvl(l_header_rec.requirement_header_id, FND_API.G_MISS_NUM);
1633: l_rqmt_header_Rec.created_by := nvl(l_user_id, -1);
1634: l_rqmt_header_Rec.creation_date := l_today;
1635: l_rqmt_header_Rec.last_updated_by := nvl(l_user_id, -1);
1636: l_rqmt_header_Rec.last_update_date := l_today;
1634: l_rqmt_header_Rec.creation_date := l_today;
1635: l_rqmt_header_Rec.last_updated_by := nvl(l_user_id, -1);
1636: l_rqmt_header_Rec.last_update_date := l_today;
1637: l_rqmt_header_Rec.last_update_login := nvl(l_login_id, -1);
1638: l_rqmt_header_Rec.ship_to_location_id := nvl(l_header_rec.ship_to_location_id, FND_API.G_MISS_NUM);
1639: l_rqmt_header_Rec.address_type := l_header_Rec.address_type;
1640: l_rqmt_header_Rec.task_id := nvl(l_header_rec.task_id, FND_API.G_MISS_NUM);
1641: l_rqmt_header_Rec.task_assignment_id := nvl(l_header_rec.task_assignment_id, FND_API.G_MISS_NUM);
1642: IF(l_header_rec.task_id IS NULL) THEN
1636: l_rqmt_header_Rec.last_update_date := l_today;
1637: l_rqmt_header_Rec.last_update_login := nvl(l_login_id, -1);
1638: l_rqmt_header_Rec.ship_to_location_id := nvl(l_header_rec.ship_to_location_id, FND_API.G_MISS_NUM);
1639: l_rqmt_header_Rec.address_type := l_header_Rec.address_type;
1640: l_rqmt_header_Rec.task_id := nvl(l_header_rec.task_id, FND_API.G_MISS_NUM);
1641: l_rqmt_header_Rec.task_assignment_id := nvl(l_header_rec.task_assignment_id, FND_API.G_MISS_NUM);
1642: IF(l_header_rec.task_id IS NULL) THEN
1643: l_rqmt_header_Rec.resource_id := nvl(l_header_rec.resource_id, FND_API.G_MISS_NUM);
1644: l_rqmt_header_Rec.resource_type := nvl(l_header_rec.resource_type, FND_API.G_MISS_CHAR);
1637: l_rqmt_header_Rec.last_update_login := nvl(l_login_id, -1);
1638: l_rqmt_header_Rec.ship_to_location_id := nvl(l_header_rec.ship_to_location_id, FND_API.G_MISS_NUM);
1639: l_rqmt_header_Rec.address_type := l_header_Rec.address_type;
1640: l_rqmt_header_Rec.task_id := nvl(l_header_rec.task_id, FND_API.G_MISS_NUM);
1641: l_rqmt_header_Rec.task_assignment_id := nvl(l_header_rec.task_assignment_id, FND_API.G_MISS_NUM);
1642: IF(l_header_rec.task_id IS NULL) THEN
1643: l_rqmt_header_Rec.resource_id := nvl(l_header_rec.resource_id, FND_API.G_MISS_NUM);
1644: l_rqmt_header_Rec.resource_type := nvl(l_header_rec.resource_type, FND_API.G_MISS_CHAR);
1645: END IF;
1639: l_rqmt_header_Rec.address_type := l_header_Rec.address_type;
1640: l_rqmt_header_Rec.task_id := nvl(l_header_rec.task_id, FND_API.G_MISS_NUM);
1641: l_rqmt_header_Rec.task_assignment_id := nvl(l_header_rec.task_assignment_id, FND_API.G_MISS_NUM);
1642: IF(l_header_rec.task_id IS NULL) THEN
1643: l_rqmt_header_Rec.resource_id := nvl(l_header_rec.resource_id, FND_API.G_MISS_NUM);
1644: l_rqmt_header_Rec.resource_type := nvl(l_header_rec.resource_type, FND_API.G_MISS_CHAR);
1645: END IF;
1646: l_rqmt_header_Rec.need_by_date := nvl(l_header_rec.need_by_date, FND_API.G_MISS_DATE);
1647: l_rqmt_header_Rec.destination_organization_id := nvl(l_header_rec.dest_organization_id, FND_API.G_MISS_NUM);
1640: l_rqmt_header_Rec.task_id := nvl(l_header_rec.task_id, FND_API.G_MISS_NUM);
1641: l_rqmt_header_Rec.task_assignment_id := nvl(l_header_rec.task_assignment_id, FND_API.G_MISS_NUM);
1642: IF(l_header_rec.task_id IS NULL) THEN
1643: l_rqmt_header_Rec.resource_id := nvl(l_header_rec.resource_id, FND_API.G_MISS_NUM);
1644: l_rqmt_header_Rec.resource_type := nvl(l_header_rec.resource_type, FND_API.G_MISS_CHAR);
1645: END IF;
1646: l_rqmt_header_Rec.need_by_date := nvl(l_header_rec.need_by_date, FND_API.G_MISS_DATE);
1647: l_rqmt_header_Rec.destination_organization_id := nvl(l_header_rec.dest_organization_id, FND_API.G_MISS_NUM);
1648: l_rqmt_header_Rec.destination_subinventory := nvl(l_header_rec.dest_subinventory, FND_API.G_MISS_CHAR);
1642: IF(l_header_rec.task_id IS NULL) THEN
1643: l_rqmt_header_Rec.resource_id := nvl(l_header_rec.resource_id, FND_API.G_MISS_NUM);
1644: l_rqmt_header_Rec.resource_type := nvl(l_header_rec.resource_type, FND_API.G_MISS_CHAR);
1645: END IF;
1646: l_rqmt_header_Rec.need_by_date := nvl(l_header_rec.need_by_date, FND_API.G_MISS_DATE);
1647: l_rqmt_header_Rec.destination_organization_id := nvl(l_header_rec.dest_organization_id, FND_API.G_MISS_NUM);
1648: l_rqmt_header_Rec.destination_subinventory := nvl(l_header_rec.dest_subinventory, FND_API.G_MISS_CHAR);
1649: l_rqmt_header_Rec.shipping_method_code := FND_API.G_MISS_CHAR;
1650: l_rqmt_header_Rec.parts_defined := nvl(l_parts_defined, FND_API.G_MISS_CHAR);
1643: l_rqmt_header_Rec.resource_id := nvl(l_header_rec.resource_id, FND_API.G_MISS_NUM);
1644: l_rqmt_header_Rec.resource_type := nvl(l_header_rec.resource_type, FND_API.G_MISS_CHAR);
1645: END IF;
1646: l_rqmt_header_Rec.need_by_date := nvl(l_header_rec.need_by_date, FND_API.G_MISS_DATE);
1647: l_rqmt_header_Rec.destination_organization_id := nvl(l_header_rec.dest_organization_id, FND_API.G_MISS_NUM);
1648: l_rqmt_header_Rec.destination_subinventory := nvl(l_header_rec.dest_subinventory, FND_API.G_MISS_CHAR);
1649: l_rqmt_header_Rec.shipping_method_code := FND_API.G_MISS_CHAR;
1650: l_rqmt_header_Rec.parts_defined := nvl(l_parts_defined, FND_API.G_MISS_CHAR);
1651: l_rqmt_header_Rec.open_requirement := 'W';
1644: l_rqmt_header_Rec.resource_type := nvl(l_header_rec.resource_type, FND_API.G_MISS_CHAR);
1645: END IF;
1646: l_rqmt_header_Rec.need_by_date := nvl(l_header_rec.need_by_date, FND_API.G_MISS_DATE);
1647: l_rqmt_header_Rec.destination_organization_id := nvl(l_header_rec.dest_organization_id, FND_API.G_MISS_NUM);
1648: l_rqmt_header_Rec.destination_subinventory := nvl(l_header_rec.dest_subinventory, FND_API.G_MISS_CHAR);
1649: l_rqmt_header_Rec.shipping_method_code := FND_API.G_MISS_CHAR;
1650: l_rqmt_header_Rec.parts_defined := nvl(l_parts_defined, FND_API.G_MISS_CHAR);
1651: l_rqmt_header_Rec.open_requirement := 'W';
1652: l_rqmt_header_rec.order_type_id := nvl(l_header_rec.order_type_id, FND_PROFILE.value('CSP_ORDER_TYPE'));
1645: END IF;
1646: l_rqmt_header_Rec.need_by_date := nvl(l_header_rec.need_by_date, FND_API.G_MISS_DATE);
1647: l_rqmt_header_Rec.destination_organization_id := nvl(l_header_rec.dest_organization_id, FND_API.G_MISS_NUM);
1648: l_rqmt_header_Rec.destination_subinventory := nvl(l_header_rec.dest_subinventory, FND_API.G_MISS_CHAR);
1649: l_rqmt_header_Rec.shipping_method_code := FND_API.G_MISS_CHAR;
1650: l_rqmt_header_Rec.parts_defined := nvl(l_parts_defined, FND_API.G_MISS_CHAR);
1651: l_rqmt_header_Rec.open_requirement := 'W';
1652: l_rqmt_header_rec.order_type_id := nvl(l_header_rec.order_type_id, FND_PROFILE.value('CSP_ORDER_TYPE'));
1653: l_rqmt_header_rec.attribute_Category := nvl(l_header_rec.attribute_category, FND_API.G_MISS_CHAR);
1646: l_rqmt_header_Rec.need_by_date := nvl(l_header_rec.need_by_date, FND_API.G_MISS_DATE);
1647: l_rqmt_header_Rec.destination_organization_id := nvl(l_header_rec.dest_organization_id, FND_API.G_MISS_NUM);
1648: l_rqmt_header_Rec.destination_subinventory := nvl(l_header_rec.dest_subinventory, FND_API.G_MISS_CHAR);
1649: l_rqmt_header_Rec.shipping_method_code := FND_API.G_MISS_CHAR;
1650: l_rqmt_header_Rec.parts_defined := nvl(l_parts_defined, FND_API.G_MISS_CHAR);
1651: l_rqmt_header_Rec.open_requirement := 'W';
1652: l_rqmt_header_rec.order_type_id := nvl(l_header_rec.order_type_id, FND_PROFILE.value('CSP_ORDER_TYPE'));
1653: l_rqmt_header_rec.attribute_Category := nvl(l_header_rec.attribute_category, FND_API.G_MISS_CHAR);
1654: l_rqmt_header_rec.attribute1 := nvl(l_header_rec.attribute1, FND_API.G_MISS_CHAR);
1649: l_rqmt_header_Rec.shipping_method_code := FND_API.G_MISS_CHAR;
1650: l_rqmt_header_Rec.parts_defined := nvl(l_parts_defined, FND_API.G_MISS_CHAR);
1651: l_rqmt_header_Rec.open_requirement := 'W';
1652: l_rqmt_header_rec.order_type_id := nvl(l_header_rec.order_type_id, FND_PROFILE.value('CSP_ORDER_TYPE'));
1653: l_rqmt_header_rec.attribute_Category := nvl(l_header_rec.attribute_category, FND_API.G_MISS_CHAR);
1654: l_rqmt_header_rec.attribute1 := nvl(l_header_rec.attribute1, FND_API.G_MISS_CHAR);
1655: l_rqmt_header_rec.attribute2 := nvl(l_header_rec.attribute2, FND_API.G_MISS_CHAR);
1656: l_rqmt_header_rec.attribute3 := nvl(l_header_rec.attribute3, FND_API.G_MISS_CHAR);
1657: l_rqmt_header_rec.attribute4 := nvl(l_header_rec.attribute4, FND_API.G_MISS_CHAR);
1650: l_rqmt_header_Rec.parts_defined := nvl(l_parts_defined, FND_API.G_MISS_CHAR);
1651: l_rqmt_header_Rec.open_requirement := 'W';
1652: l_rqmt_header_rec.order_type_id := nvl(l_header_rec.order_type_id, FND_PROFILE.value('CSP_ORDER_TYPE'));
1653: l_rqmt_header_rec.attribute_Category := nvl(l_header_rec.attribute_category, FND_API.G_MISS_CHAR);
1654: l_rqmt_header_rec.attribute1 := nvl(l_header_rec.attribute1, FND_API.G_MISS_CHAR);
1655: l_rqmt_header_rec.attribute2 := nvl(l_header_rec.attribute2, FND_API.G_MISS_CHAR);
1656: l_rqmt_header_rec.attribute3 := nvl(l_header_rec.attribute3, FND_API.G_MISS_CHAR);
1657: l_rqmt_header_rec.attribute4 := nvl(l_header_rec.attribute4, FND_API.G_MISS_CHAR);
1658: l_rqmt_header_rec.attribute5 := nvl(l_header_rec.attribute5, FND_API.G_MISS_CHAR);
1651: l_rqmt_header_Rec.open_requirement := 'W';
1652: l_rqmt_header_rec.order_type_id := nvl(l_header_rec.order_type_id, FND_PROFILE.value('CSP_ORDER_TYPE'));
1653: l_rqmt_header_rec.attribute_Category := nvl(l_header_rec.attribute_category, FND_API.G_MISS_CHAR);
1654: l_rqmt_header_rec.attribute1 := nvl(l_header_rec.attribute1, FND_API.G_MISS_CHAR);
1655: l_rqmt_header_rec.attribute2 := nvl(l_header_rec.attribute2, FND_API.G_MISS_CHAR);
1656: l_rqmt_header_rec.attribute3 := nvl(l_header_rec.attribute3, FND_API.G_MISS_CHAR);
1657: l_rqmt_header_rec.attribute4 := nvl(l_header_rec.attribute4, FND_API.G_MISS_CHAR);
1658: l_rqmt_header_rec.attribute5 := nvl(l_header_rec.attribute5, FND_API.G_MISS_CHAR);
1659: l_rqmt_header_rec.attribute6 := nvl(l_header_rec.attribute6, FND_API.G_MISS_CHAR);
1652: l_rqmt_header_rec.order_type_id := nvl(l_header_rec.order_type_id, FND_PROFILE.value('CSP_ORDER_TYPE'));
1653: l_rqmt_header_rec.attribute_Category := nvl(l_header_rec.attribute_category, FND_API.G_MISS_CHAR);
1654: l_rqmt_header_rec.attribute1 := nvl(l_header_rec.attribute1, FND_API.G_MISS_CHAR);
1655: l_rqmt_header_rec.attribute2 := nvl(l_header_rec.attribute2, FND_API.G_MISS_CHAR);
1656: l_rqmt_header_rec.attribute3 := nvl(l_header_rec.attribute3, FND_API.G_MISS_CHAR);
1657: l_rqmt_header_rec.attribute4 := nvl(l_header_rec.attribute4, FND_API.G_MISS_CHAR);
1658: l_rqmt_header_rec.attribute5 := nvl(l_header_rec.attribute5, FND_API.G_MISS_CHAR);
1659: l_rqmt_header_rec.attribute6 := nvl(l_header_rec.attribute6, FND_API.G_MISS_CHAR);
1660: l_rqmt_header_rec.attribute7 := nvl(l_header_rec.attribute7, FND_API.G_MISS_CHAR);
1653: l_rqmt_header_rec.attribute_Category := nvl(l_header_rec.attribute_category, FND_API.G_MISS_CHAR);
1654: l_rqmt_header_rec.attribute1 := nvl(l_header_rec.attribute1, FND_API.G_MISS_CHAR);
1655: l_rqmt_header_rec.attribute2 := nvl(l_header_rec.attribute2, FND_API.G_MISS_CHAR);
1656: l_rqmt_header_rec.attribute3 := nvl(l_header_rec.attribute3, FND_API.G_MISS_CHAR);
1657: l_rqmt_header_rec.attribute4 := nvl(l_header_rec.attribute4, FND_API.G_MISS_CHAR);
1658: l_rqmt_header_rec.attribute5 := nvl(l_header_rec.attribute5, FND_API.G_MISS_CHAR);
1659: l_rqmt_header_rec.attribute6 := nvl(l_header_rec.attribute6, FND_API.G_MISS_CHAR);
1660: l_rqmt_header_rec.attribute7 := nvl(l_header_rec.attribute7, FND_API.G_MISS_CHAR);
1661: l_rqmt_header_rec.attribute8 := nvl(l_header_rec.attribute8, FND_API.G_MISS_CHAR);
1654: l_rqmt_header_rec.attribute1 := nvl(l_header_rec.attribute1, FND_API.G_MISS_CHAR);
1655: l_rqmt_header_rec.attribute2 := nvl(l_header_rec.attribute2, FND_API.G_MISS_CHAR);
1656: l_rqmt_header_rec.attribute3 := nvl(l_header_rec.attribute3, FND_API.G_MISS_CHAR);
1657: l_rqmt_header_rec.attribute4 := nvl(l_header_rec.attribute4, FND_API.G_MISS_CHAR);
1658: l_rqmt_header_rec.attribute5 := nvl(l_header_rec.attribute5, FND_API.G_MISS_CHAR);
1659: l_rqmt_header_rec.attribute6 := nvl(l_header_rec.attribute6, FND_API.G_MISS_CHAR);
1660: l_rqmt_header_rec.attribute7 := nvl(l_header_rec.attribute7, FND_API.G_MISS_CHAR);
1661: l_rqmt_header_rec.attribute8 := nvl(l_header_rec.attribute8, FND_API.G_MISS_CHAR);
1662: l_rqmt_header_rec.attribute9 := nvl(l_header_rec.attribute9, FND_API.G_MISS_CHAR);
1655: l_rqmt_header_rec.attribute2 := nvl(l_header_rec.attribute2, FND_API.G_MISS_CHAR);
1656: l_rqmt_header_rec.attribute3 := nvl(l_header_rec.attribute3, FND_API.G_MISS_CHAR);
1657: l_rqmt_header_rec.attribute4 := nvl(l_header_rec.attribute4, FND_API.G_MISS_CHAR);
1658: l_rqmt_header_rec.attribute5 := nvl(l_header_rec.attribute5, FND_API.G_MISS_CHAR);
1659: l_rqmt_header_rec.attribute6 := nvl(l_header_rec.attribute6, FND_API.G_MISS_CHAR);
1660: l_rqmt_header_rec.attribute7 := nvl(l_header_rec.attribute7, FND_API.G_MISS_CHAR);
1661: l_rqmt_header_rec.attribute8 := nvl(l_header_rec.attribute8, FND_API.G_MISS_CHAR);
1662: l_rqmt_header_rec.attribute9 := nvl(l_header_rec.attribute9, FND_API.G_MISS_CHAR);
1663: l_rqmt_header_rec.attribute10 := nvl(l_header_rec.attribute10, FND_API.G_MISS_CHAR);
1656: l_rqmt_header_rec.attribute3 := nvl(l_header_rec.attribute3, FND_API.G_MISS_CHAR);
1657: l_rqmt_header_rec.attribute4 := nvl(l_header_rec.attribute4, FND_API.G_MISS_CHAR);
1658: l_rqmt_header_rec.attribute5 := nvl(l_header_rec.attribute5, FND_API.G_MISS_CHAR);
1659: l_rqmt_header_rec.attribute6 := nvl(l_header_rec.attribute6, FND_API.G_MISS_CHAR);
1660: l_rqmt_header_rec.attribute7 := nvl(l_header_rec.attribute7, FND_API.G_MISS_CHAR);
1661: l_rqmt_header_rec.attribute8 := nvl(l_header_rec.attribute8, FND_API.G_MISS_CHAR);
1662: l_rqmt_header_rec.attribute9 := nvl(l_header_rec.attribute9, FND_API.G_MISS_CHAR);
1663: l_rqmt_header_rec.attribute10 := nvl(l_header_rec.attribute10, FND_API.G_MISS_CHAR);
1664: l_rqmt_header_rec.attribute11 := nvl(l_header_rec.attribute11, FND_API.G_MISS_CHAR);
1657: l_rqmt_header_rec.attribute4 := nvl(l_header_rec.attribute4, FND_API.G_MISS_CHAR);
1658: l_rqmt_header_rec.attribute5 := nvl(l_header_rec.attribute5, FND_API.G_MISS_CHAR);
1659: l_rqmt_header_rec.attribute6 := nvl(l_header_rec.attribute6, FND_API.G_MISS_CHAR);
1660: l_rqmt_header_rec.attribute7 := nvl(l_header_rec.attribute7, FND_API.G_MISS_CHAR);
1661: l_rqmt_header_rec.attribute8 := nvl(l_header_rec.attribute8, FND_API.G_MISS_CHAR);
1662: l_rqmt_header_rec.attribute9 := nvl(l_header_rec.attribute9, FND_API.G_MISS_CHAR);
1663: l_rqmt_header_rec.attribute10 := nvl(l_header_rec.attribute10, FND_API.G_MISS_CHAR);
1664: l_rqmt_header_rec.attribute11 := nvl(l_header_rec.attribute11, FND_API.G_MISS_CHAR);
1665: l_rqmt_header_rec.attribute12 := nvl(l_header_rec.attribute12, FND_API.G_MISS_CHAR);
1658: l_rqmt_header_rec.attribute5 := nvl(l_header_rec.attribute5, FND_API.G_MISS_CHAR);
1659: l_rqmt_header_rec.attribute6 := nvl(l_header_rec.attribute6, FND_API.G_MISS_CHAR);
1660: l_rqmt_header_rec.attribute7 := nvl(l_header_rec.attribute7, FND_API.G_MISS_CHAR);
1661: l_rqmt_header_rec.attribute8 := nvl(l_header_rec.attribute8, FND_API.G_MISS_CHAR);
1662: l_rqmt_header_rec.attribute9 := nvl(l_header_rec.attribute9, FND_API.G_MISS_CHAR);
1663: l_rqmt_header_rec.attribute10 := nvl(l_header_rec.attribute10, FND_API.G_MISS_CHAR);
1664: l_rqmt_header_rec.attribute11 := nvl(l_header_rec.attribute11, FND_API.G_MISS_CHAR);
1665: l_rqmt_header_rec.attribute12 := nvl(l_header_rec.attribute12, FND_API.G_MISS_CHAR);
1666: l_rqmt_header_rec.attribute13 := nvl(l_header_rec.attribute13, FND_API.G_MISS_CHAR);
1659: l_rqmt_header_rec.attribute6 := nvl(l_header_rec.attribute6, FND_API.G_MISS_CHAR);
1660: l_rqmt_header_rec.attribute7 := nvl(l_header_rec.attribute7, FND_API.G_MISS_CHAR);
1661: l_rqmt_header_rec.attribute8 := nvl(l_header_rec.attribute8, FND_API.G_MISS_CHAR);
1662: l_rqmt_header_rec.attribute9 := nvl(l_header_rec.attribute9, FND_API.G_MISS_CHAR);
1663: l_rqmt_header_rec.attribute10 := nvl(l_header_rec.attribute10, FND_API.G_MISS_CHAR);
1664: l_rqmt_header_rec.attribute11 := nvl(l_header_rec.attribute11, FND_API.G_MISS_CHAR);
1665: l_rqmt_header_rec.attribute12 := nvl(l_header_rec.attribute12, FND_API.G_MISS_CHAR);
1666: l_rqmt_header_rec.attribute13 := nvl(l_header_rec.attribute13, FND_API.G_MISS_CHAR);
1667: l_rqmt_header_rec.attribute14 := nvl(l_header_rec.attribute14, FND_API.G_MISS_CHAR);
1660: l_rqmt_header_rec.attribute7 := nvl(l_header_rec.attribute7, FND_API.G_MISS_CHAR);
1661: l_rqmt_header_rec.attribute8 := nvl(l_header_rec.attribute8, FND_API.G_MISS_CHAR);
1662: l_rqmt_header_rec.attribute9 := nvl(l_header_rec.attribute9, FND_API.G_MISS_CHAR);
1663: l_rqmt_header_rec.attribute10 := nvl(l_header_rec.attribute10, FND_API.G_MISS_CHAR);
1664: l_rqmt_header_rec.attribute11 := nvl(l_header_rec.attribute11, FND_API.G_MISS_CHAR);
1665: l_rqmt_header_rec.attribute12 := nvl(l_header_rec.attribute12, FND_API.G_MISS_CHAR);
1666: l_rqmt_header_rec.attribute13 := nvl(l_header_rec.attribute13, FND_API.G_MISS_CHAR);
1667: l_rqmt_header_rec.attribute14 := nvl(l_header_rec.attribute14, FND_API.G_MISS_CHAR);
1668: l_rqmt_header_rec.attribute15 := nvl(l_header_rec.attribute15, FND_API.G_MISS_CHAR);
1661: l_rqmt_header_rec.attribute8 := nvl(l_header_rec.attribute8, FND_API.G_MISS_CHAR);
1662: l_rqmt_header_rec.attribute9 := nvl(l_header_rec.attribute9, FND_API.G_MISS_CHAR);
1663: l_rqmt_header_rec.attribute10 := nvl(l_header_rec.attribute10, FND_API.G_MISS_CHAR);
1664: l_rqmt_header_rec.attribute11 := nvl(l_header_rec.attribute11, FND_API.G_MISS_CHAR);
1665: l_rqmt_header_rec.attribute12 := nvl(l_header_rec.attribute12, FND_API.G_MISS_CHAR);
1666: l_rqmt_header_rec.attribute13 := nvl(l_header_rec.attribute13, FND_API.G_MISS_CHAR);
1667: l_rqmt_header_rec.attribute14 := nvl(l_header_rec.attribute14, FND_API.G_MISS_CHAR);
1668: l_rqmt_header_rec.attribute15 := nvl(l_header_rec.attribute15, FND_API.G_MISS_CHAR);
1669:
1662: l_rqmt_header_rec.attribute9 := nvl(l_header_rec.attribute9, FND_API.G_MISS_CHAR);
1663: l_rqmt_header_rec.attribute10 := nvl(l_header_rec.attribute10, FND_API.G_MISS_CHAR);
1664: l_rqmt_header_rec.attribute11 := nvl(l_header_rec.attribute11, FND_API.G_MISS_CHAR);
1665: l_rqmt_header_rec.attribute12 := nvl(l_header_rec.attribute12, FND_API.G_MISS_CHAR);
1666: l_rqmt_header_rec.attribute13 := nvl(l_header_rec.attribute13, FND_API.G_MISS_CHAR);
1667: l_rqmt_header_rec.attribute14 := nvl(l_header_rec.attribute14, FND_API.G_MISS_CHAR);
1668: l_rqmt_header_rec.attribute15 := nvl(l_header_rec.attribute15, FND_API.G_MISS_CHAR);
1669:
1670: -- check to see if requirements exist for a given task
1663: l_rqmt_header_rec.attribute10 := nvl(l_header_rec.attribute10, FND_API.G_MISS_CHAR);
1664: l_rqmt_header_rec.attribute11 := nvl(l_header_rec.attribute11, FND_API.G_MISS_CHAR);
1665: l_rqmt_header_rec.attribute12 := nvl(l_header_rec.attribute12, FND_API.G_MISS_CHAR);
1666: l_rqmt_header_rec.attribute13 := nvl(l_header_rec.attribute13, FND_API.G_MISS_CHAR);
1667: l_rqmt_header_rec.attribute14 := nvl(l_header_rec.attribute14, FND_API.G_MISS_CHAR);
1668: l_rqmt_header_rec.attribute15 := nvl(l_header_rec.attribute15, FND_API.G_MISS_CHAR);
1669:
1670: -- check to see if requirements exist for a given task
1671: /*commenting for 11.5.10 since multiple rqmt headers can exist for a task
1664: l_rqmt_header_rec.attribute11 := nvl(l_header_rec.attribute11, FND_API.G_MISS_CHAR);
1665: l_rqmt_header_rec.attribute12 := nvl(l_header_rec.attribute12, FND_API.G_MISS_CHAR);
1666: l_rqmt_header_rec.attribute13 := nvl(l_header_rec.attribute13, FND_API.G_MISS_CHAR);
1667: l_rqmt_header_rec.attribute14 := nvl(l_header_rec.attribute14, FND_API.G_MISS_CHAR);
1668: l_rqmt_header_rec.attribute15 := nvl(l_header_rec.attribute15, FND_API.G_MISS_CHAR);
1669:
1670: -- check to see if requirements exist for a given task
1671: /*commenting for 11.5.10 since multiple rqmt headers can exist for a task
1672: IF (l_header_rec.task_id IS NOT NULL) THEN
1692: -- call private api for inserting into csp_Requirement_headers
1693: CSP_REQUIREMENT_HEADERS_PVT.Create_requirement_headers(
1694: P_Api_Version_Number => l_api_Version_number,
1695: P_Init_Msg_List => p_init_msg_list,
1696: P_Commit => FND_API.G_FALSE,
1697: p_validation_level => null,
1698: P_REQUIREMENT_HEADER_Rec => l_rqmt_header_rec,
1699: X_REQUIREMENT_HEADER_ID => l_requirement_header_id,
1700: X_Return_Status => l_Return_status,
1701: X_Msg_Count => l_msg_count,
1702: X_Msg_Data => l_msg_data
1703: );
1704:
1705: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1706: fnd_msg_pub.count_and_get
1707: ( p_count => x_msg_count
1708: , p_data => x_msg_data);
1709: x_return_status := FND_API.G_RET_STS_ERROR;
1705: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1706: fnd_msg_pub.count_and_get
1707: ( p_count => x_msg_count
1708: , p_data => x_msg_data);
1709: x_return_status := FND_API.G_RET_STS_ERROR;
1710: return;
1711: --RAISE FND_API.G_EXC_ERROR;
1712: END IF;
1713: l_header_rec.requirement_header_id := l_requirement_header_id;
1707: ( p_count => x_msg_count
1708: , p_data => x_msg_data);
1709: x_return_status := FND_API.G_RET_STS_ERROR;
1710: return;
1711: --RAISE FND_API.G_EXC_ERROR;
1712: END IF;
1713: l_header_rec.requirement_header_id := l_requirement_header_id;
1714: WHEN OTHERS THEN
1715: NULL;
1718: -- call private api for inserting into csp_Requirement_headers
1719: CSP_REQUIREMENT_HEADERS_PVT.Create_requirement_headers(
1720: P_Api_Version_Number => l_api_Version_number,
1721: P_Init_Msg_List => p_init_msg_list,
1722: P_Commit => FND_API.G_FALSE,
1723: p_validation_level => null,
1724: P_REQUIREMENT_HEADER_Rec => l_rqmt_header_rec,
1725: X_REQUIREMENT_HEADER_ID => l_requirement_header_id,
1726: X_Return_Status => l_Return_status,
1727: X_Msg_Count => l_msg_count,
1728: X_Msg_Data => l_msg_data
1729: );
1730:
1731: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1732: RAISE FND_API.G_EXC_ERROR;
1733: END IF;
1734: l_header_rec.requirement_header_id := l_requirement_header_id;
1735: -- END IF;
1728: X_Msg_Data => l_msg_data
1729: );
1730:
1731: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1732: RAISE FND_API.G_EXC_ERROR;
1733: END IF;
1734: l_header_rec.requirement_header_id := l_requirement_header_id;
1735: -- END IF;
1736:
1760: l_rqmt_header_Rec.requirement_header_id := l_header_rec.requirement_header_id;
1761: l_rqmt_header_Rec.last_updated_by := nvl(l_user_id, -1);
1762: l_rqmt_header_Rec.last_update_date := l_today;
1763: l_rqmt_header_Rec.last_update_login := nvl(l_login_id, -1);
1764: l_rqmt_header_Rec.ship_to_location_id := nvl(l_header_rec.ship_to_location_id, FND_API.G_MISS_NUM);
1765: l_rqmt_header_Rec.task_id := nvl(l_header_rec.task_id, FND_API.G_MISS_NUM);
1766: l_rqmt_header_Rec.need_by_date := nvl(l_header_rec.need_by_date, FND_API.G_MISS_DATE);
1767:
1768: CSP_REQUIREMENT_HEADERS_PVT.Update_requirement_headers(
1761: l_rqmt_header_Rec.last_updated_by := nvl(l_user_id, -1);
1762: l_rqmt_header_Rec.last_update_date := l_today;
1763: l_rqmt_header_Rec.last_update_login := nvl(l_login_id, -1);
1764: l_rqmt_header_Rec.ship_to_location_id := nvl(l_header_rec.ship_to_location_id, FND_API.G_MISS_NUM);
1765: l_rqmt_header_Rec.task_id := nvl(l_header_rec.task_id, FND_API.G_MISS_NUM);
1766: l_rqmt_header_Rec.need_by_date := nvl(l_header_rec.need_by_date, FND_API.G_MISS_DATE);
1767:
1768: CSP_REQUIREMENT_HEADERS_PVT.Update_requirement_headers(
1769: P_Api_Version_Number => l_api_Version_number,
1762: l_rqmt_header_Rec.last_update_date := l_today;
1763: l_rqmt_header_Rec.last_update_login := nvl(l_login_id, -1);
1764: l_rqmt_header_Rec.ship_to_location_id := nvl(l_header_rec.ship_to_location_id, FND_API.G_MISS_NUM);
1765: l_rqmt_header_Rec.task_id := nvl(l_header_rec.task_id, FND_API.G_MISS_NUM);
1766: l_rqmt_header_Rec.need_by_date := nvl(l_header_rec.need_by_date, FND_API.G_MISS_DATE);
1767:
1768: CSP_REQUIREMENT_HEADERS_PVT.Update_requirement_headers(
1769: P_Api_Version_Number => l_api_Version_number,
1770: P_Init_Msg_List => p_init_msg_list,
1767:
1768: CSP_REQUIREMENT_HEADERS_PVT.Update_requirement_headers(
1769: P_Api_Version_Number => l_api_Version_number,
1770: P_Init_Msg_List => p_init_msg_list,
1771: P_Commit => FND_API.G_FALSE,
1772: p_validation_level => null,
1773: P_REQUIREMENT_HEADER_Rec => l_rqmt_header_rec,
1774: X_Return_Status => l_Return_status,
1775: X_Msg_Count => l_msg_count,
1775: X_Msg_Count => l_msg_count,
1776: X_Msg_Data => l_msg_data
1777: );
1778:
1779: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1780: RAISE FND_API.G_EXC_ERROR;
1781: END IF;
1782: END IF;
1783:
1776: X_Msg_Data => l_msg_data
1777: );
1778:
1779: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1780: RAISE FND_API.G_EXC_ERROR;
1781: END IF;
1782: END IF;
1783:
1784: -- create rqmt line
1819: l_rqmt_line_rec.ship_complete_flag := l_line_rec.ship_complete;
1820: l_rqmt_line_rec.likelihood := l_line_rec.likelihood;
1821: l_rqmt_line_rec.revision := l_line_rec.revision;
1822: l_rqmt_line_rec.ordered_quantity := l_line_Rec.quantity;
1823: l_rqmt_line_rec.attribute_Category := nvl(l_line_rec.attribute_category, FND_API.G_MISS_CHAR);
1824: l_rqmt_line_rec.attribute1 := nvl(l_line_rec.attribute1, FND_API.G_MISS_CHAR);
1825: l_rqmt_line_rec.attribute2 := nvl(l_line_rec.attribute2, FND_API.G_MISS_CHAR);
1826: l_rqmt_line_rec.attribute3 := nvl(l_line_rec.attribute3, FND_API.G_MISS_CHAR);
1827: l_rqmt_line_rec.attribute4 := nvl(l_line_rec.attribute4, FND_API.G_MISS_CHAR);
1820: l_rqmt_line_rec.likelihood := l_line_rec.likelihood;
1821: l_rqmt_line_rec.revision := l_line_rec.revision;
1822: l_rqmt_line_rec.ordered_quantity := l_line_Rec.quantity;
1823: l_rqmt_line_rec.attribute_Category := nvl(l_line_rec.attribute_category, FND_API.G_MISS_CHAR);
1824: l_rqmt_line_rec.attribute1 := nvl(l_line_rec.attribute1, FND_API.G_MISS_CHAR);
1825: l_rqmt_line_rec.attribute2 := nvl(l_line_rec.attribute2, FND_API.G_MISS_CHAR);
1826: l_rqmt_line_rec.attribute3 := nvl(l_line_rec.attribute3, FND_API.G_MISS_CHAR);
1827: l_rqmt_line_rec.attribute4 := nvl(l_line_rec.attribute4, FND_API.G_MISS_CHAR);
1828: l_rqmt_line_rec.attribute5 := nvl(l_line_rec.attribute5, FND_API.G_MISS_CHAR);
1821: l_rqmt_line_rec.revision := l_line_rec.revision;
1822: l_rqmt_line_rec.ordered_quantity := l_line_Rec.quantity;
1823: l_rqmt_line_rec.attribute_Category := nvl(l_line_rec.attribute_category, FND_API.G_MISS_CHAR);
1824: l_rqmt_line_rec.attribute1 := nvl(l_line_rec.attribute1, FND_API.G_MISS_CHAR);
1825: l_rqmt_line_rec.attribute2 := nvl(l_line_rec.attribute2, FND_API.G_MISS_CHAR);
1826: l_rqmt_line_rec.attribute3 := nvl(l_line_rec.attribute3, FND_API.G_MISS_CHAR);
1827: l_rqmt_line_rec.attribute4 := nvl(l_line_rec.attribute4, FND_API.G_MISS_CHAR);
1828: l_rqmt_line_rec.attribute5 := nvl(l_line_rec.attribute5, FND_API.G_MISS_CHAR);
1829: l_rqmt_line_rec.attribute6 := nvl(l_line_rec.attribute6, FND_API.G_MISS_CHAR);
1822: l_rqmt_line_rec.ordered_quantity := l_line_Rec.quantity;
1823: l_rqmt_line_rec.attribute_Category := nvl(l_line_rec.attribute_category, FND_API.G_MISS_CHAR);
1824: l_rqmt_line_rec.attribute1 := nvl(l_line_rec.attribute1, FND_API.G_MISS_CHAR);
1825: l_rqmt_line_rec.attribute2 := nvl(l_line_rec.attribute2, FND_API.G_MISS_CHAR);
1826: l_rqmt_line_rec.attribute3 := nvl(l_line_rec.attribute3, FND_API.G_MISS_CHAR);
1827: l_rqmt_line_rec.attribute4 := nvl(l_line_rec.attribute4, FND_API.G_MISS_CHAR);
1828: l_rqmt_line_rec.attribute5 := nvl(l_line_rec.attribute5, FND_API.G_MISS_CHAR);
1829: l_rqmt_line_rec.attribute6 := nvl(l_line_rec.attribute6, FND_API.G_MISS_CHAR);
1830: l_rqmt_line_rec.attribute7 := nvl(l_line_rec.attribute7, FND_API.G_MISS_CHAR);
1823: l_rqmt_line_rec.attribute_Category := nvl(l_line_rec.attribute_category, FND_API.G_MISS_CHAR);
1824: l_rqmt_line_rec.attribute1 := nvl(l_line_rec.attribute1, FND_API.G_MISS_CHAR);
1825: l_rqmt_line_rec.attribute2 := nvl(l_line_rec.attribute2, FND_API.G_MISS_CHAR);
1826: l_rqmt_line_rec.attribute3 := nvl(l_line_rec.attribute3, FND_API.G_MISS_CHAR);
1827: l_rqmt_line_rec.attribute4 := nvl(l_line_rec.attribute4, FND_API.G_MISS_CHAR);
1828: l_rqmt_line_rec.attribute5 := nvl(l_line_rec.attribute5, FND_API.G_MISS_CHAR);
1829: l_rqmt_line_rec.attribute6 := nvl(l_line_rec.attribute6, FND_API.G_MISS_CHAR);
1830: l_rqmt_line_rec.attribute7 := nvl(l_line_rec.attribute7, FND_API.G_MISS_CHAR);
1831: l_rqmt_line_rec.attribute8 := nvl(l_line_rec.attribute8, FND_API.G_MISS_CHAR);
1824: l_rqmt_line_rec.attribute1 := nvl(l_line_rec.attribute1, FND_API.G_MISS_CHAR);
1825: l_rqmt_line_rec.attribute2 := nvl(l_line_rec.attribute2, FND_API.G_MISS_CHAR);
1826: l_rqmt_line_rec.attribute3 := nvl(l_line_rec.attribute3, FND_API.G_MISS_CHAR);
1827: l_rqmt_line_rec.attribute4 := nvl(l_line_rec.attribute4, FND_API.G_MISS_CHAR);
1828: l_rqmt_line_rec.attribute5 := nvl(l_line_rec.attribute5, FND_API.G_MISS_CHAR);
1829: l_rqmt_line_rec.attribute6 := nvl(l_line_rec.attribute6, FND_API.G_MISS_CHAR);
1830: l_rqmt_line_rec.attribute7 := nvl(l_line_rec.attribute7, FND_API.G_MISS_CHAR);
1831: l_rqmt_line_rec.attribute8 := nvl(l_line_rec.attribute8, FND_API.G_MISS_CHAR);
1832: l_rqmt_line_rec.attribute9 := nvl(l_line_rec.attribute9, FND_API.G_MISS_CHAR);
1825: l_rqmt_line_rec.attribute2 := nvl(l_line_rec.attribute2, FND_API.G_MISS_CHAR);
1826: l_rqmt_line_rec.attribute3 := nvl(l_line_rec.attribute3, FND_API.G_MISS_CHAR);
1827: l_rqmt_line_rec.attribute4 := nvl(l_line_rec.attribute4, FND_API.G_MISS_CHAR);
1828: l_rqmt_line_rec.attribute5 := nvl(l_line_rec.attribute5, FND_API.G_MISS_CHAR);
1829: l_rqmt_line_rec.attribute6 := nvl(l_line_rec.attribute6, FND_API.G_MISS_CHAR);
1830: l_rqmt_line_rec.attribute7 := nvl(l_line_rec.attribute7, FND_API.G_MISS_CHAR);
1831: l_rqmt_line_rec.attribute8 := nvl(l_line_rec.attribute8, FND_API.G_MISS_CHAR);
1832: l_rqmt_line_rec.attribute9 := nvl(l_line_rec.attribute9, FND_API.G_MISS_CHAR);
1833: l_rqmt_line_rec.attribute10 := nvl(l_line_rec.attribute10, FND_API.G_MISS_CHAR);
1826: l_rqmt_line_rec.attribute3 := nvl(l_line_rec.attribute3, FND_API.G_MISS_CHAR);
1827: l_rqmt_line_rec.attribute4 := nvl(l_line_rec.attribute4, FND_API.G_MISS_CHAR);
1828: l_rqmt_line_rec.attribute5 := nvl(l_line_rec.attribute5, FND_API.G_MISS_CHAR);
1829: l_rqmt_line_rec.attribute6 := nvl(l_line_rec.attribute6, FND_API.G_MISS_CHAR);
1830: l_rqmt_line_rec.attribute7 := nvl(l_line_rec.attribute7, FND_API.G_MISS_CHAR);
1831: l_rqmt_line_rec.attribute8 := nvl(l_line_rec.attribute8, FND_API.G_MISS_CHAR);
1832: l_rqmt_line_rec.attribute9 := nvl(l_line_rec.attribute9, FND_API.G_MISS_CHAR);
1833: l_rqmt_line_rec.attribute10 := nvl(l_line_rec.attribute10, FND_API.G_MISS_CHAR);
1834: l_rqmt_line_rec.attribute11 := nvl(l_line_rec.attribute11, FND_API.G_MISS_CHAR);
1827: l_rqmt_line_rec.attribute4 := nvl(l_line_rec.attribute4, FND_API.G_MISS_CHAR);
1828: l_rqmt_line_rec.attribute5 := nvl(l_line_rec.attribute5, FND_API.G_MISS_CHAR);
1829: l_rqmt_line_rec.attribute6 := nvl(l_line_rec.attribute6, FND_API.G_MISS_CHAR);
1830: l_rqmt_line_rec.attribute7 := nvl(l_line_rec.attribute7, FND_API.G_MISS_CHAR);
1831: l_rqmt_line_rec.attribute8 := nvl(l_line_rec.attribute8, FND_API.G_MISS_CHAR);
1832: l_rqmt_line_rec.attribute9 := nvl(l_line_rec.attribute9, FND_API.G_MISS_CHAR);
1833: l_rqmt_line_rec.attribute10 := nvl(l_line_rec.attribute10, FND_API.G_MISS_CHAR);
1834: l_rqmt_line_rec.attribute11 := nvl(l_line_rec.attribute11, FND_API.G_MISS_CHAR);
1835: l_rqmt_line_rec.attribute12 := nvl(l_line_rec.attribute12, FND_API.G_MISS_CHAR);
1828: l_rqmt_line_rec.attribute5 := nvl(l_line_rec.attribute5, FND_API.G_MISS_CHAR);
1829: l_rqmt_line_rec.attribute6 := nvl(l_line_rec.attribute6, FND_API.G_MISS_CHAR);
1830: l_rqmt_line_rec.attribute7 := nvl(l_line_rec.attribute7, FND_API.G_MISS_CHAR);
1831: l_rqmt_line_rec.attribute8 := nvl(l_line_rec.attribute8, FND_API.G_MISS_CHAR);
1832: l_rqmt_line_rec.attribute9 := nvl(l_line_rec.attribute9, FND_API.G_MISS_CHAR);
1833: l_rqmt_line_rec.attribute10 := nvl(l_line_rec.attribute10, FND_API.G_MISS_CHAR);
1834: l_rqmt_line_rec.attribute11 := nvl(l_line_rec.attribute11, FND_API.G_MISS_CHAR);
1835: l_rqmt_line_rec.attribute12 := nvl(l_line_rec.attribute12, FND_API.G_MISS_CHAR);
1836: l_rqmt_line_rec.attribute13 := nvl(l_line_rec.attribute13, FND_API.G_MISS_CHAR);
1829: l_rqmt_line_rec.attribute6 := nvl(l_line_rec.attribute6, FND_API.G_MISS_CHAR);
1830: l_rqmt_line_rec.attribute7 := nvl(l_line_rec.attribute7, FND_API.G_MISS_CHAR);
1831: l_rqmt_line_rec.attribute8 := nvl(l_line_rec.attribute8, FND_API.G_MISS_CHAR);
1832: l_rqmt_line_rec.attribute9 := nvl(l_line_rec.attribute9, FND_API.G_MISS_CHAR);
1833: l_rqmt_line_rec.attribute10 := nvl(l_line_rec.attribute10, FND_API.G_MISS_CHAR);
1834: l_rqmt_line_rec.attribute11 := nvl(l_line_rec.attribute11, FND_API.G_MISS_CHAR);
1835: l_rqmt_line_rec.attribute12 := nvl(l_line_rec.attribute12, FND_API.G_MISS_CHAR);
1836: l_rqmt_line_rec.attribute13 := nvl(l_line_rec.attribute13, FND_API.G_MISS_CHAR);
1837: l_rqmt_line_rec.attribute14 := nvl(l_line_rec.attribute14, FND_API.G_MISS_CHAR);
1830: l_rqmt_line_rec.attribute7 := nvl(l_line_rec.attribute7, FND_API.G_MISS_CHAR);
1831: l_rqmt_line_rec.attribute8 := nvl(l_line_rec.attribute8, FND_API.G_MISS_CHAR);
1832: l_rqmt_line_rec.attribute9 := nvl(l_line_rec.attribute9, FND_API.G_MISS_CHAR);
1833: l_rqmt_line_rec.attribute10 := nvl(l_line_rec.attribute10, FND_API.G_MISS_CHAR);
1834: l_rqmt_line_rec.attribute11 := nvl(l_line_rec.attribute11, FND_API.G_MISS_CHAR);
1835: l_rqmt_line_rec.attribute12 := nvl(l_line_rec.attribute12, FND_API.G_MISS_CHAR);
1836: l_rqmt_line_rec.attribute13 := nvl(l_line_rec.attribute13, FND_API.G_MISS_CHAR);
1837: l_rqmt_line_rec.attribute14 := nvl(l_line_rec.attribute14, FND_API.G_MISS_CHAR);
1838: l_rqmt_line_rec.attribute15 := nvl(l_line_rec.attribute15, FND_API.G_MISS_CHAR);
1831: l_rqmt_line_rec.attribute8 := nvl(l_line_rec.attribute8, FND_API.G_MISS_CHAR);
1832: l_rqmt_line_rec.attribute9 := nvl(l_line_rec.attribute9, FND_API.G_MISS_CHAR);
1833: l_rqmt_line_rec.attribute10 := nvl(l_line_rec.attribute10, FND_API.G_MISS_CHAR);
1834: l_rqmt_line_rec.attribute11 := nvl(l_line_rec.attribute11, FND_API.G_MISS_CHAR);
1835: l_rqmt_line_rec.attribute12 := nvl(l_line_rec.attribute12, FND_API.G_MISS_CHAR);
1836: l_rqmt_line_rec.attribute13 := nvl(l_line_rec.attribute13, FND_API.G_MISS_CHAR);
1837: l_rqmt_line_rec.attribute14 := nvl(l_line_rec.attribute14, FND_API.G_MISS_CHAR);
1838: l_rqmt_line_rec.attribute15 := nvl(l_line_rec.attribute15, FND_API.G_MISS_CHAR);
1839:
1832: l_rqmt_line_rec.attribute9 := nvl(l_line_rec.attribute9, FND_API.G_MISS_CHAR);
1833: l_rqmt_line_rec.attribute10 := nvl(l_line_rec.attribute10, FND_API.G_MISS_CHAR);
1834: l_rqmt_line_rec.attribute11 := nvl(l_line_rec.attribute11, FND_API.G_MISS_CHAR);
1835: l_rqmt_line_rec.attribute12 := nvl(l_line_rec.attribute12, FND_API.G_MISS_CHAR);
1836: l_rqmt_line_rec.attribute13 := nvl(l_line_rec.attribute13, FND_API.G_MISS_CHAR);
1837: l_rqmt_line_rec.attribute14 := nvl(l_line_rec.attribute14, FND_API.G_MISS_CHAR);
1838: l_rqmt_line_rec.attribute15 := nvl(l_line_rec.attribute15, FND_API.G_MISS_CHAR);
1839:
1840: l_rqmt_line_tbl(I) := l_rqmt_line_rec;
1833: l_rqmt_line_rec.attribute10 := nvl(l_line_rec.attribute10, FND_API.G_MISS_CHAR);
1834: l_rqmt_line_rec.attribute11 := nvl(l_line_rec.attribute11, FND_API.G_MISS_CHAR);
1835: l_rqmt_line_rec.attribute12 := nvl(l_line_rec.attribute12, FND_API.G_MISS_CHAR);
1836: l_rqmt_line_rec.attribute13 := nvl(l_line_rec.attribute13, FND_API.G_MISS_CHAR);
1837: l_rqmt_line_rec.attribute14 := nvl(l_line_rec.attribute14, FND_API.G_MISS_CHAR);
1838: l_rqmt_line_rec.attribute15 := nvl(l_line_rec.attribute15, FND_API.G_MISS_CHAR);
1839:
1840: l_rqmt_line_tbl(I) := l_rqmt_line_rec;
1841: END LOOP;
1834: l_rqmt_line_rec.attribute11 := nvl(l_line_rec.attribute11, FND_API.G_MISS_CHAR);
1835: l_rqmt_line_rec.attribute12 := nvl(l_line_rec.attribute12, FND_API.G_MISS_CHAR);
1836: l_rqmt_line_rec.attribute13 := nvl(l_line_rec.attribute13, FND_API.G_MISS_CHAR);
1837: l_rqmt_line_rec.attribute14 := nvl(l_line_rec.attribute14, FND_API.G_MISS_CHAR);
1838: l_rqmt_line_rec.attribute15 := nvl(l_line_rec.attribute15, FND_API.G_MISS_CHAR);
1839:
1840: l_rqmt_line_tbl(I) := l_rqmt_line_rec;
1841: END LOOP;
1842:
1842:
1843: CSP_Requirement_Lines_PVT.Create_requirement_lines(
1844: P_Api_Version_Number => l_api_version_number,
1845: P_Init_Msg_List => p_Init_Msg_List,
1846: P_Commit => FND_API.G_FALSE,
1847: p_validation_level => null,
1848: P_Requirement_Line_Tbl => l_rqmt_line_tbl,
1849: x_Requirement_Line_tbl => l_rqmt_line_tbl_out,
1850: X_Return_Status => l_return_status,
1851: X_Msg_Count => l_msg_count,
1852: X_Msg_Data => l_msg_data
1853: );
1854:
1855: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1856: RAISE FND_API.G_EXC_ERROR;
1857: END IF;
1858:
1859: -- Return header rec and line table.
1852: X_Msg_Data => l_msg_data
1853: );
1854:
1855: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1856: RAISE FND_API.G_EXC_ERROR;
1857: END IF;
1858:
1859: -- Return header rec and line table.
1860: px_header_rec := l_header_rec;
1870: px_line_tbl(I).unit_of_measure := rqmt_line.uom_code;
1871: I := I + 1;
1872: END LOOP;
1873:
1874: IF fnd_api.to_boolean(p_commit) THEN
1875: commit work;
1876: END IF;
1877:
1878: x_return_status := FND_API.G_RET_STS_SUCCESS;
1874: IF fnd_api.to_boolean(p_commit) THEN
1875: commit work;
1876: END IF;
1877:
1878: x_return_status := FND_API.G_RET_STS_SUCCESS;
1879: EXCEPTION
1880: WHEN EXCP_USER_DEFINED THEN
1881: Rollback to save_rqmt_line_PUB;
1882: x_return_status := FND_API.G_RET_STS_ERROR;
1878: x_return_status := FND_API.G_RET_STS_SUCCESS;
1879: EXCEPTION
1880: WHEN EXCP_USER_DEFINED THEN
1881: Rollback to save_rqmt_line_PUB;
1882: x_return_status := FND_API.G_RET_STS_ERROR;
1883: fnd_msg_pub.count_and_get
1884: ( p_count => x_msg_count
1885: , p_data => x_msg_data);
1886:
1883: fnd_msg_pub.count_and_get
1884: ( p_count => x_msg_count
1885: , p_data => x_msg_data);
1886:
1887: WHEN FND_API.G_EXC_ERROR THEN
1888: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
1889: P_API_NAME => L_API_NAME
1890: ,P_PKG_NAME => G_PKG_NAME
1891: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1893: ,X_MSG_COUNT => X_MSG_COUNT
1894: ,X_MSG_DATA => X_MSG_DATA
1895: ,X_RETURN_STATUS => X_RETURN_STATUS);
1896:
1897: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1898: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
1899: P_API_NAME => L_API_NAME
1900: ,P_PKG_NAME => G_PKG_NAME
1901: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1911: FND_MSG_PUB.ADD;
1912: fnd_msg_pub.count_and_get
1913: ( p_count => x_msg_count
1914: , p_data => x_msg_data);
1915: x_return_status := FND_API.G_RET_STS_ERROR;
1916: END;
1917:
1918:
1919: PROCEDURE delete_rqmt_line(
1917:
1918:
1919: PROCEDURE delete_rqmt_line(
1920: p_api_version IN NUMBER
1921: ,p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE
1922: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1923: ,p_line_tbl IN OUT NOCOPY csp_parts_requirement.Rqmt_Line_tbl_type
1924: ,x_return_status OUT NOCOPY VARCHAR2
1925: ,x_msg_count OUT NOCOPY NUMBER
1918:
1919: PROCEDURE delete_rqmt_line(
1920: p_api_version IN NUMBER
1921: ,p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE
1922: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1923: ,p_line_tbl IN OUT NOCOPY csp_parts_requirement.Rqmt_Line_tbl_type
1924: ,x_return_status OUT NOCOPY VARCHAR2
1925: ,x_msg_count OUT NOCOPY NUMBER
1926: ,x_msg_data OUT NOCOPY VARCHAR2
1929: l_api_name CONSTANT VARCHAR2(30) := 'delete_rqmt_line';
1930: BEGIN
1931: SAVEPOINT delete_rqmt_line_PUB;
1932:
1933: IF fnd_api.to_boolean(P_Init_Msg_List) THEN
1934: -- initialize message list
1935: FND_MSG_PUB.initialize;
1936: END IF;
1937:
1935: FND_MSG_PUB.initialize;
1936: END IF;
1937:
1938: -- Standard call to check for call compatibility.
1939: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1940: p_api_version,
1941: l_api_name,
1942: G_PKG_NAME)
1943: THEN
1940: p_api_version,
1941: l_api_name,
1942: G_PKG_NAME)
1943: THEN
1944: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1945: END IF;
1946:
1947: -- initialize return status
1948: x_return_status := FND_API.G_RET_STS_SUCCESS;
1944: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1945: END IF;
1946:
1947: -- initialize return status
1948: x_return_status := FND_API.G_RET_STS_SUCCESS;
1949:
1950: IF (p_line_tbl.count > 0) THEN
1951: FOR I IN 1..p_line_Tbl.count LOOP
1952: DELETE FROM csp_Requirement_lines
1953: WHERE requirement_line_id = p_line_tbl(I).requirement_line_id;
1954: END LOOP;
1955: END IF;
1956:
1957: IF fnd_api.to_boolean(p_commit) THEN
1958: commit work;
1959: END IF;
1960: x_return_status := FND_API.G_RET_STS_SUCCESS;
1961:
1956:
1957: IF fnd_api.to_boolean(p_commit) THEN
1958: commit work;
1959: END IF;
1960: x_return_status := FND_API.G_RET_STS_SUCCESS;
1961:
1962: EXCEPTION
1963:
1964: WHEN FND_API.G_EXC_ERROR THEN
1960: x_return_status := FND_API.G_RET_STS_SUCCESS;
1961:
1962: EXCEPTION
1963:
1964: WHEN FND_API.G_EXC_ERROR THEN
1965: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
1966: P_API_NAME => L_API_NAME
1967: ,P_PKG_NAME => G_PKG_NAME
1968: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1969: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PUB
1970: ,X_MSG_COUNT => X_MSG_COUNT
1971: ,X_MSG_DATA => X_MSG_DATA
1972: ,X_RETURN_STATUS => X_RETURN_STATUS);
1973: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1974: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
1975: P_API_NAME => L_API_NAME
1976: ,P_PKG_NAME => G_PKG_NAME
1977: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1987: FND_MSG_PUB.ADD;
1988: fnd_msg_pub.count_and_get
1989: ( p_count => x_msg_count
1990: , p_data => x_msg_data);
1991: x_return_status := FND_API.G_RET_STS_ERROR;
1992: END;
1993:
1994: PROCEDURE check_Availability(
1995: p_api_version IN NUMBER
1992: END;
1993:
1994: PROCEDURE check_Availability(
1995: p_api_version IN NUMBER
1996: ,p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE
1997: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1998: ,p_header_id IN NUMBER
1999: ,x_line_Tbl OUT NOCOPY csp_parts_requirement.Line_tbl_type
2000: ,x_avail_flag OUT NOCOPY VARCHAR2
1993:
1994: PROCEDURE check_Availability(
1995: p_api_version IN NUMBER
1996: ,p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE
1997: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1998: ,p_header_id IN NUMBER
1999: ,x_line_Tbl OUT NOCOPY csp_parts_requirement.Line_tbl_type
2000: ,x_avail_flag OUT NOCOPY VARCHAR2
2001: ,x_return_status OUT NOCOPY VARCHAR2
2014: l_parts_list_tbl csp_sch_int_pvt.csp_parts_tbl_typ1;
2015: l_avail_list_tbl csp_sch_int_pvt.available_parts_tbl_typ1;
2016: I NUMBER;
2017: J NUMBER;
2018: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2019: l_msg_count NUMBER;
2020: l_msg_data VARCHAR2(4000);
2021:
2022: CURSOR rqmt_line_cur IS
2032:
2033: BEGIN
2034: SAVEPOINT check_Availability_PUB;
2035:
2036: IF fnd_api.to_boolean(P_Init_Msg_List) THEN
2037: -- initialize message list
2038: FND_MSG_PUB.initialize;
2039: END IF;
2040:
2038: FND_MSG_PUB.initialize;
2039: END IF;
2040:
2041: -- Standard call to check for call compatibility.
2042: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2043: p_api_version,
2044: l_api_name,
2045: G_PKG_NAME)
2046: THEN
2043: p_api_version,
2044: l_api_name,
2045: G_PKG_NAME)
2046: THEN
2047: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2048: END IF;
2049:
2050: -- initialize return status
2051: x_return_status := FND_API.G_RET_STS_SUCCESS;
2047: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2048: END IF;
2049:
2050: -- initialize return status
2051: x_return_status := FND_API.G_RET_STS_SUCCESS;
2052:
2053: IF (p_header_id IS NOT NULL) THEN
2054: select count(*)
2055: into l_count
2116: p_Called_From => 'MOBILE',
2117: p_location_id => l_header_rec.ship_to_location_id
2118: );
2119:
2120: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2121: null;
2122: --RAISE FND_API.G_EXC_ERROR;
2123: END IF;
2124:
2118: );
2119:
2120: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2121: null;
2122: --RAISE FND_API.G_EXC_ERROR;
2123: END IF;
2124:
2125: J := 1;
2126: I := 1;
2160: P_Organization_Id => l_header_Rec.dest_organization_id,
2161: P_Secondary_Inventory => l_header_rec.dest_subinventory,
2162: x_source_org_id => l_line_Tbl(I).source_organization_id);
2163: IF ((l_line_Tbl(I).source_organization_id IS NULL) OR
2164: (l_line_Tbl(I).source_organization_id = FND_API.G_MISS_NUM)) THEN
2165: -- no source organization defined, create requirement with error status
2166: x_avail_flag := 'N';
2167: END IF;
2168: END If;
2172: l_rqmt_line_tbl(I).last_update_date := sysdate;
2173: l_rqmt_line_tbl(I).last_update_login := nvl(FND_GLOBAL.login_id , -1);
2174: l_rqmt_line_tbl(I).inventory_item_id := l_line_tbl(I).inventory_item_id;
2175: l_rqmt_line_tbl(I).sourced_From := l_line_tbl(I).sourced_From;
2176: l_rqmt_line_tbl(I).source_organization_id := nvl(l_line_tbl(I).source_organization_id, FND_API.G_MISS_NUM);
2177: l_rqmt_line_tbl(I).arrival_Date := nvl(l_line_tbl(I).arrival_Date, FND_API.G_MISS_DATE);
2178: l_rqmt_line_tbl(I).shipping_method_code := nvl(l_line_Tbl(I).shipping_method_code, FND_API.G_MISS_CHAR);
2179: l_rqmt_line_tbl(I).order_by_date := nvl(l_line_tbl(I).order_by_date, FND_API.G_MISS_DATE);
2180: l_rqmt_line_tbl(I).ordered_quantity := nvl(l_line_Tbl(I).ordered_quantity, 0);
2173: l_rqmt_line_tbl(I).last_update_login := nvl(FND_GLOBAL.login_id , -1);
2174: l_rqmt_line_tbl(I).inventory_item_id := l_line_tbl(I).inventory_item_id;
2175: l_rqmt_line_tbl(I).sourced_From := l_line_tbl(I).sourced_From;
2176: l_rqmt_line_tbl(I).source_organization_id := nvl(l_line_tbl(I).source_organization_id, FND_API.G_MISS_NUM);
2177: l_rqmt_line_tbl(I).arrival_Date := nvl(l_line_tbl(I).arrival_Date, FND_API.G_MISS_DATE);
2178: l_rqmt_line_tbl(I).shipping_method_code := nvl(l_line_Tbl(I).shipping_method_code, FND_API.G_MISS_CHAR);
2179: l_rqmt_line_tbl(I).order_by_date := nvl(l_line_tbl(I).order_by_date, FND_API.G_MISS_DATE);
2180: l_rqmt_line_tbl(I).ordered_quantity := nvl(l_line_Tbl(I).ordered_quantity, 0);
2181: END LOOP;
2174: l_rqmt_line_tbl(I).inventory_item_id := l_line_tbl(I).inventory_item_id;
2175: l_rqmt_line_tbl(I).sourced_From := l_line_tbl(I).sourced_From;
2176: l_rqmt_line_tbl(I).source_organization_id := nvl(l_line_tbl(I).source_organization_id, FND_API.G_MISS_NUM);
2177: l_rqmt_line_tbl(I).arrival_Date := nvl(l_line_tbl(I).arrival_Date, FND_API.G_MISS_DATE);
2178: l_rqmt_line_tbl(I).shipping_method_code := nvl(l_line_Tbl(I).shipping_method_code, FND_API.G_MISS_CHAR);
2179: l_rqmt_line_tbl(I).order_by_date := nvl(l_line_tbl(I).order_by_date, FND_API.G_MISS_DATE);
2180: l_rqmt_line_tbl(I).ordered_quantity := nvl(l_line_Tbl(I).ordered_quantity, 0);
2181: END LOOP;
2182:
2175: l_rqmt_line_tbl(I).sourced_From := l_line_tbl(I).sourced_From;
2176: l_rqmt_line_tbl(I).source_organization_id := nvl(l_line_tbl(I).source_organization_id, FND_API.G_MISS_NUM);
2177: l_rqmt_line_tbl(I).arrival_Date := nvl(l_line_tbl(I).arrival_Date, FND_API.G_MISS_DATE);
2178: l_rqmt_line_tbl(I).shipping_method_code := nvl(l_line_Tbl(I).shipping_method_code, FND_API.G_MISS_CHAR);
2179: l_rqmt_line_tbl(I).order_by_date := nvl(l_line_tbl(I).order_by_date, FND_API.G_MISS_DATE);
2180: l_rqmt_line_tbl(I).ordered_quantity := nvl(l_line_Tbl(I).ordered_quantity, 0);
2181: END LOOP;
2182:
2183: IF l_rqmt_line_tbl.COUNT > 0 THEN
2183: IF l_rqmt_line_tbl.COUNT > 0 THEN
2184: CSP_Requirement_Lines_PVT.Update_requirement_lines(
2185: P_Api_Version_Number => l_api_version_number,
2186: P_Init_Msg_List => p_Init_Msg_List,
2187: P_Commit => FND_API.G_FALSE,
2188: p_validation_level => null,
2189: P_Requirement_Line_Tbl => l_rqmt_line_tbl,
2190: X_Return_Status => l_return_status,
2191: X_Msg_Count => l_msg_count,
2191: X_Msg_Count => l_msg_count,
2192: X_Msg_Data => l_msg_data
2193: );
2194:
2195: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2196: RAISE FND_API.G_EXC_ERROR;
2197: END IF;
2198: END IF;
2199: END If;
2192: X_Msg_Data => l_msg_data
2193: );
2194:
2195: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2196: RAISE FND_API.G_EXC_ERROR;
2197: END IF;
2198: END IF;
2199: END If;
2200: x_line_tbl := l_line_tbl;
2200: x_line_tbl := l_line_tbl;
2201: x_avail_flag := nvl(x_avail_flag, 'Y');
2202: END IF;
2203:
2204: IF fnd_api.to_boolean(p_commit) THEN
2205: commit work;
2206: END IF;
2207: END IF;
2208: EXCEPTION
2207: END IF;
2208: EXCEPTION
2209: WHEN EXCP_USER_DEFINED THEN
2210: Rollback to check_Availability_PUB;
2211: x_return_status := FND_API.G_RET_STS_ERROR;
2212: fnd_msg_pub.count_and_get
2213: ( p_count => x_msg_count
2214: , p_data => x_msg_data);
2215:
2212: fnd_msg_pub.count_and_get
2213: ( p_count => x_msg_count
2214: , p_data => x_msg_data);
2215:
2216: WHEN FND_API.G_EXC_ERROR THEN
2217: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
2218: P_API_NAME => L_API_NAME
2219: ,P_PKG_NAME => G_PKG_NAME
2220: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
2221: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PUB
2222: ,X_MSG_COUNT => X_MSG_COUNT
2223: ,X_MSG_DATA => X_MSG_DATA
2224: ,X_RETURN_STATUS => X_RETURN_STATUS);
2225: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2226: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
2227: P_API_NAME => L_API_NAME
2228: ,P_PKG_NAME => G_PKG_NAME
2229: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
2239: FND_MSG_PUB.ADD;
2240: fnd_msg_pub.count_and_get
2241: ( p_count => x_msg_count
2242: , p_data => x_msg_data);
2243: x_return_status := FND_API.G_RET_STS_ERROR;
2244: END;
2245:
2246: PROCEDURE create_order(
2247: p_api_version IN NUMBER
2244: END;
2245:
2246: PROCEDURE create_order(
2247: p_api_version IN NUMBER
2248: ,p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE
2249: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
2250: ,p_header_id IN NUMBER
2251: ,x_order_tbl OUT NOCOPY Order_Tbl_Type
2252: ,x_return_status OUT NOCOPY VARCHAR2
2245:
2246: PROCEDURE create_order(
2247: p_api_version IN NUMBER
2248: ,p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE
2249: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
2250: ,p_header_id IN NUMBER
2251: ,x_order_tbl OUT NOCOPY Order_Tbl_Type
2252: ,x_return_status OUT NOCOPY VARCHAR2
2253: ,x_msg_count OUT NOCOPY NUMBER
2264: l_rqmt_line_Tbl csp_requirement_lines_pvt.requirement_line_tbl_type;
2265: EXCP_USER_DEFINED EXCEPTION;
2266: I NUMBER;
2267: J NUMBER;
2268: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2269: l_msg_count NUMBER;
2270: l_msg_data VARCHAR2(2000);
2271: l_order_number NUMBER;
2272: l_open_requirement VARCHAr2(30);
2300: end if;
2301:
2302: SAVEPOINT create_order_PUB;
2303:
2304: IF fnd_api.to_boolean(P_Init_Msg_List) THEN
2305: -- initialize message list
2306: FND_MSG_PUB.initialize;
2307: END IF;
2308:
2306: FND_MSG_PUB.initialize;
2307: END IF;
2308:
2309: -- Standard call to check for call compatibility.
2310: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2311: p_api_version,
2312: l_api_name,
2313: G_PKG_NAME)
2314: THEN
2311: p_api_version,
2312: l_api_name,
2313: G_PKG_NAME)
2314: THEN
2315: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2316: END IF;
2317:
2318: -- initialize return status
2319: x_return_status := FND_API.G_RET_STS_SUCCESS;
2315: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2316: END IF;
2317:
2318: -- initialize return status
2319: x_return_status := FND_API.G_RET_STS_SUCCESS;
2320:
2321: -- user and login information
2322: SELECT Sysdate INTO l_today FROM dual;
2323: l_user_id := fnd_global.user_id;
2445: end if;
2446: csp_parts_order.process_order(
2447: p_api_version => l_api_version_number
2448: ,p_Init_Msg_List => p_init_msg_list
2449: ,p_commit => FND_API.G_FALSE
2450: ,px_header_rec => l_header_rec
2451: ,px_line_table => l_oe_line_tbl
2452: ,x_return_status => l_return_status
2453: ,x_msg_count => l_msg_count
2458: 'csp.plsql.CSP_PARTS_REQUIREMENT.create_order',
2459: 'csp_parts_order.process_order return status = ' || l_return_status);
2460: end if;
2461:
2462: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2463: RAISE FND_API.G_EXC_ERROR;
2464: ELSE
2465: -- update open_requirement_flag on requirement header
2466: BEGIN
2459: 'csp_parts_order.process_order return status = ' || l_return_status);
2460: end if;
2461:
2462: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2463: RAISE FND_API.G_EXC_ERROR;
2464: ELSE
2465: -- update open_requirement_flag on requirement header
2466: BEGIN
2467: l_open_requirement := 'S';
2538: ,x_msg_count => l_msg_count
2539: ,x_msg_data => l_msg_data
2540: );
2541:
2542: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2543: RAISE FND_API.G_EXC_ERROR;
2544: ELSE
2545: IF (nvl(l_open_requirement, 'W') <> 'S') THEN
2546: update csp_requirement_headers
2539: ,x_msg_data => l_msg_data
2540: );
2541:
2542: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2543: RAISE FND_API.G_EXC_ERROR;
2544: ELSE
2545: IF (nvl(l_open_requirement, 'W') <> 'S') THEN
2546: update csp_requirement_headers
2547: set open_requirement = 'S'
2574: END IF;
2575: END IF;
2576: END IF;
2577:
2578: x_return_status := FND_API.G_RET_STS_SUCCESS;
2579: IF fnd_api.to_boolean(p_commit) THEN
2580: commit work;
2581: END IF;
2582: END If;
2575: END IF;
2576: END IF;
2577:
2578: x_return_status := FND_API.G_RET_STS_SUCCESS;
2579: IF fnd_api.to_boolean(p_commit) THEN
2580: commit work;
2581: END IF;
2582: END If;
2583: if(FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2588: end if;
2589: EXCEPTION
2590: WHEN EXCP_USER_DEFINED THEN
2591: Rollback to create_order_PUB;
2592: x_return_status := FND_API.G_RET_STS_ERROR;
2593: fnd_msg_pub.count_and_get
2594: ( p_count => x_msg_count
2595: , p_data => x_msg_data);
2596:
2593: fnd_msg_pub.count_and_get
2594: ( p_count => x_msg_count
2595: , p_data => x_msg_data);
2596:
2597: WHEN FND_API.G_EXC_ERROR THEN
2598: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
2599: P_API_NAME => L_API_NAME
2600: ,P_PKG_NAME => G_PKG_NAME
2601: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
2602: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PUB
2603: ,X_MSG_COUNT => X_MSG_COUNT
2604: ,X_MSG_DATA => X_MSG_DATA
2605: ,X_RETURN_STATUS => X_RETURN_STATUS);
2606: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2607: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
2608: P_API_NAME => L_API_NAME
2609: ,P_PKG_NAME => G_PKG_NAME
2610: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
2620: FND_MSG_PUB.ADD;
2621: fnd_msg_pub.count_and_get
2622: ( p_count => x_msg_count
2623: , p_data => x_msg_data);
2624: x_return_status := FND_API.G_RET_STS_ERROR;
2625: END;
2626:
2627: PROCEDURE TASK_ASSIGNMENT_POST_UPDATE(x_return_status out nocopy varchar2)IS
2628: l_task_assignment_id NUMBER;
2652: AND resource_type = l_resource_type_code
2653: AND default_code = 'IN';
2654:
2655: BEGIN
2656: x_return_status := FND_API.G_RET_STS_SUCCESS;
2657: l_task_assignment_id := JTF_TASK_ASSIGNMENTS_PUB.p_task_assignments_user_hooks.task_assignment_id;
2658: l_resource_id := JTF_TASK_ASSIGNMENTS_PUB.p_task_assignments_user_hooks.resource_id;
2659: l_resource_type_code := JTF_TASK_ASSIGNMENTS_PUB.p_task_assignments_user_hooks.resource_type_code;
2660:
2694: WHERE task_assignment_id = b_task_assignment_id;
2695:
2696: l_task_assignment_id NUMBER;
2697: BEGIN
2698: x_return_status := FND_API.G_RET_STS_SUCCESS;
2699: l_task_assignment_id := JTF_TASK_ASSIGNMENTS_PUB.p_task_assignments_user_hooks.task_assignment_id;
2700:
2701: OPEN c_task_assignment(l_task_assignment_id);
2702: FETCH c_task_assignment INTO G_old_resource_id;