301: SAVEPOINT Before_Lock;
302:
303: -- If it is BULK Mode then no need to query these values from Database
304:
305: IF OE_BULK_WF_UTIL.G_LINE_INDEX IS NOT NULL THEN
306: IF l_debug_level > 0 THEN
307: oe_debug_pub.add( 'SCH BULK MODE' , 5 ) ;
308: END IF;
309:
306: IF l_debug_level > 0 THEN
307: oe_debug_pub.add( 'SCH BULK MODE' , 5 ) ;
308: END IF;
309:
310: l_line_id := OE_BULK_ORDER_PVT.G_LINE_REC.line_id(OE_BULK_WF_UTIL.G_LINE_INDEX);
311:
312: l_top_model_line_id :=
313: OE_BULK_ORDER_PVT.G_LINE_REC.top_model_line_id(OE_BULK_WF_UTIL.G_LINE_INDEX);
314:
309:
310: l_line_id := OE_BULK_ORDER_PVT.G_LINE_REC.line_id(OE_BULK_WF_UTIL.G_LINE_INDEX);
311:
312: l_top_model_line_id :=
313: OE_BULK_ORDER_PVT.G_LINE_REC.top_model_line_id(OE_BULK_WF_UTIL.G_LINE_INDEX);
314:
315: l_item_type_code :=
316: OE_BULK_ORDER_PVT.G_LINE_REC.item_type_code(OE_BULK_WF_UTIL.G_LINE_INDEX);
317:
312: l_top_model_line_id :=
313: OE_BULK_ORDER_PVT.G_LINE_REC.top_model_line_id(OE_BULK_WF_UTIL.G_LINE_INDEX);
314:
315: l_item_type_code :=
316: OE_BULK_ORDER_PVT.G_LINE_REC.item_type_code(OE_BULK_WF_UTIL.G_LINE_INDEX);
317:
318: l_line_category_code :=
319: OE_BULK_ORDER_PVT.G_LINE_REC.line_category_code(OE_BULK_WF_UTIL.G_LINE_INDEX);
320:
315: l_item_type_code :=
316: OE_BULK_ORDER_PVT.G_LINE_REC.item_type_code(OE_BULK_WF_UTIL.G_LINE_INDEX);
317:
318: l_line_category_code :=
319: OE_BULK_ORDER_PVT.G_LINE_REC.line_category_code(OE_BULK_WF_UTIL.G_LINE_INDEX);
320:
321: l_schedule_status_code :=
322: OE_BULK_ORDER_PVT.G_LINE_REC.schedule_status_code(OE_BULK_WF_UTIL.G_LINE_INDEX);
323:
318: l_line_category_code :=
319: OE_BULK_ORDER_PVT.G_LINE_REC.line_category_code(OE_BULK_WF_UTIL.G_LINE_INDEX);
320:
321: l_schedule_status_code :=
322: OE_BULK_ORDER_PVT.G_LINE_REC.schedule_status_code(OE_BULK_WF_UTIL.G_LINE_INDEX);
323:
324: l_ship_model_complete_flag :=
325: OE_BULK_ORDER_PVT.G_LINE_REC.ship_model_complete_flag(OE_BULK_WF_UTIL.G_LINE_INDEX);
326:
321: l_schedule_status_code :=
322: OE_BULK_ORDER_PVT.G_LINE_REC.schedule_status_code(OE_BULK_WF_UTIL.G_LINE_INDEX);
323:
324: l_ship_model_complete_flag :=
325: OE_BULK_ORDER_PVT.G_LINE_REC.ship_model_complete_flag(OE_BULK_WF_UTIL.G_LINE_INDEX);
326:
327: l_ato_line_id :=
328: OE_BULK_ORDER_PVT.G_LINE_REC.ato_line_id(OE_BULK_WF_UTIL.G_LINE_INDEX);
329:
324: l_ship_model_complete_flag :=
325: OE_BULK_ORDER_PVT.G_LINE_REC.ship_model_complete_flag(OE_BULK_WF_UTIL.G_LINE_INDEX);
326:
327: l_ato_line_id :=
328: OE_BULK_ORDER_PVT.G_LINE_REC.ato_line_id(OE_BULK_WF_UTIL.G_LINE_INDEX);
329:
330: l_source_type_code :=
331: OE_BULK_ORDER_PVT.G_LINE_REC.source_type_code(OE_BULK_WF_UTIL.G_LINE_INDEX);
332:
327: l_ato_line_id :=
328: OE_BULK_ORDER_PVT.G_LINE_REC.ato_line_id(OE_BULK_WF_UTIL.G_LINE_INDEX);
329:
330: l_source_type_code :=
331: OE_BULK_ORDER_PVT.G_LINE_REC.source_type_code(OE_BULK_WF_UTIL.G_LINE_INDEX);
332:
333: l_request_date :=
334: OE_BULK_ORDER_PVT.G_LINE_REC.request_date(OE_BULK_WF_UTIL.G_LINE_INDEX);
335:
330: l_source_type_code :=
331: OE_BULK_ORDER_PVT.G_LINE_REC.source_type_code(OE_BULK_WF_UTIL.G_LINE_INDEX);
332:
333: l_request_date :=
334: OE_BULK_ORDER_PVT.G_LINE_REC.request_date(OE_BULK_WF_UTIL.G_LINE_INDEX);
335:
336: l_sch_ship_date :=
337: OE_BULK_ORDER_PVT.G_LINE_REC.schedule_ship_date(OE_BULK_WF_UTIL.G_LINE_INDEX);
338:
333: l_request_date :=
334: OE_BULK_ORDER_PVT.G_LINE_REC.request_date(OE_BULK_WF_UTIL.G_LINE_INDEX);
335:
336: l_sch_ship_date :=
337: OE_BULK_ORDER_PVT.G_LINE_REC.schedule_ship_date(OE_BULK_WF_UTIL.G_LINE_INDEX);
338:
339: l_ship_from_org_id :=
340: OE_BULK_ORDER_PVT.G_LINE_REC.ship_from_org_id(OE_BULK_WF_UTIL.G_LINE_INDEX);
341:
336: l_sch_ship_date :=
337: OE_BULK_ORDER_PVT.G_LINE_REC.schedule_ship_date(OE_BULK_WF_UTIL.G_LINE_INDEX);
338:
339: l_ship_from_org_id :=
340: OE_BULK_ORDER_PVT.G_LINE_REC.ship_from_org_id(OE_BULK_WF_UTIL.G_LINE_INDEX);
341:
342: -- Locking of top model not needed for BULK create as model(kit) and child
343: -- (included items) are created in the same DB session
344: -- Handle external lines call not needed as BULK does not support external
345: -- lines
346: -- If the mode is BULK from Order Import Then check globals to find out
347: -- if line on activity specific hold
348:
349: IF OE_BULK_HOLDS_PVT.G_Line_Holds_Tbl.EXISTS(OE_BULK_WF_UTIL.G_LINE_INDEX)
350: AND OE_BULK_HOLDS_PVT.G_Line_Holds_Tbl(OE_BULK_WF_UTIL.G_LINE_INDEX).On_Scheduling_Hold = 'Y'
351: THEN
352: l_result := FND_API.G_TRUE;
353: END IF;
346: -- If the mode is BULK from Order Import Then check globals to find out
347: -- if line on activity specific hold
348:
349: IF OE_BULK_HOLDS_PVT.G_Line_Holds_Tbl.EXISTS(OE_BULK_WF_UTIL.G_LINE_INDEX)
350: AND OE_BULK_HOLDS_PVT.G_Line_Holds_Tbl(OE_BULK_WF_UTIL.G_LINE_INDEX).On_Scheduling_Hold = 'Y'
351: THEN
352: l_result := FND_API.G_TRUE;
353: END IF;
354:
1143: IF l_debug_level > 0 THEN
1144: oe_debug_pub.add('-- bulk mode set results on global record', 5);
1145: END IF;
1146:
1147: IF OE_BULK_WF_UTIL.G_LINE_INDEX IS NOT NULL THEN
1148: -- shippable flag need to be checked based on ship from org.
1149:
1150: IF p_line_rec.inventory_item_id is NULL THEN
1151: p_line_rec.inventory_item_id := OE_BULK_ORDER_PVT.G_LINE_REC.inventory_item_id(OE_BULK_WF_UTIL.G_LINE_INDEX);
1147: IF OE_BULK_WF_UTIL.G_LINE_INDEX IS NOT NULL THEN
1148: -- shippable flag need to be checked based on ship from org.
1149:
1150: IF p_line_rec.inventory_item_id is NULL THEN
1151: p_line_rec.inventory_item_id := OE_BULK_ORDER_PVT.G_LINE_REC.inventory_item_id(OE_BULK_WF_UTIL.G_LINE_INDEX);
1152: END IF;
1153:
1154: l_key := OE_BULK_CACHE.Load_Item
1155: ( p_key1 => p_line_rec.inventory_item_id
1159: -- compare and assign.
1160: -- this load item will serve at the time if wf shipping call.
1161:
1162: OE_BULK_ORDER_PVT.G_LINE_REC.shippable_flag
1163: (OE_BULK_WF_UTIL.G_LINE_INDEX) :=
1164: OE_BULK_CACHE.G_ITEM_TBL(l_key).shippable_item_flag;
1165:
1166: IF OE_BULK_ORDER_PVT.G_LINE_REC.schedule_status_code
1167: (OE_BULK_WF_UTIL.G_LINE_INDEX) is NULL AND
1163: (OE_BULK_WF_UTIL.G_LINE_INDEX) :=
1164: OE_BULK_CACHE.G_ITEM_TBL(l_key).shippable_item_flag;
1165:
1166: IF OE_BULK_ORDER_PVT.G_LINE_REC.schedule_status_code
1167: (OE_BULK_WF_UTIL.G_LINE_INDEX) is NULL AND
1168: p_line_rec.schedule_status_code is not NULL
1169: THEN
1170: oe_debug_pub.add('2 sch bulk mode, set results wf sch',5);
1171: -- need not put original item
1170: oe_debug_pub.add('2 sch bulk mode, set results wf sch',5);
1171: -- need not put original item
1172:
1173: OE_BULK_ORDER_PVT.G_LINE_REC.schedule_status_code
1174: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.schedule_status_code;
1175: OE_BULK_ORDER_PVT.G_LINE_REC.schedule_ship_date
1176: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.schedule_ship_date;
1177: OE_BULK_ORDER_PVT.G_LINE_REC.schedule_arrival_date
1178: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.schedule_arrival_date;
1172:
1173: OE_BULK_ORDER_PVT.G_LINE_REC.schedule_status_code
1174: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.schedule_status_code;
1175: OE_BULK_ORDER_PVT.G_LINE_REC.schedule_ship_date
1176: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.schedule_ship_date;
1177: OE_BULK_ORDER_PVT.G_LINE_REC.schedule_arrival_date
1178: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.schedule_arrival_date;
1179: OE_BULK_ORDER_PVT.G_LINE_REC.ship_from_org_id
1180: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.ship_from_org_id;
1174: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.schedule_status_code;
1175: OE_BULK_ORDER_PVT.G_LINE_REC.schedule_ship_date
1176: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.schedule_ship_date;
1177: OE_BULK_ORDER_PVT.G_LINE_REC.schedule_arrival_date
1178: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.schedule_arrival_date;
1179: OE_BULK_ORDER_PVT.G_LINE_REC.ship_from_org_id
1180: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.ship_from_org_id;
1181: OE_BULK_ORDER_PVT.G_LINE_REC.shipping_method_code
1182: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.shipping_method_code;
1176: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.schedule_ship_date;
1177: OE_BULK_ORDER_PVT.G_LINE_REC.schedule_arrival_date
1178: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.schedule_arrival_date;
1179: OE_BULK_ORDER_PVT.G_LINE_REC.ship_from_org_id
1180: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.ship_from_org_id;
1181: OE_BULK_ORDER_PVT.G_LINE_REC.shipping_method_code
1182: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.shipping_method_code;
1183: OE_BULK_ORDER_PVT.G_LINE_REC.delivery_lead_time
1184: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.delivery_lead_time;
1178: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.schedule_arrival_date;
1179: OE_BULK_ORDER_PVT.G_LINE_REC.ship_from_org_id
1180: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.ship_from_org_id;
1181: OE_BULK_ORDER_PVT.G_LINE_REC.shipping_method_code
1182: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.shipping_method_code;
1183: OE_BULK_ORDER_PVT.G_LINE_REC.delivery_lead_time
1184: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.delivery_lead_time;
1185: OE_BULK_ORDER_PVT.G_LINE_REC.visible_demand_flag
1186: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.visible_demand_flag;
1180: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.ship_from_org_id;
1181: OE_BULK_ORDER_PVT.G_LINE_REC.shipping_method_code
1182: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.shipping_method_code;
1183: OE_BULK_ORDER_PVT.G_LINE_REC.delivery_lead_time
1184: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.delivery_lead_time;
1185: OE_BULK_ORDER_PVT.G_LINE_REC.visible_demand_flag
1186: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.visible_demand_flag;
1187:
1188: --OE_BULK_ORDER_PVT.G_LINE_REC.PLANNING_PRIORITY.extend(l_count);
1182: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.shipping_method_code;
1183: OE_BULK_ORDER_PVT.G_LINE_REC.delivery_lead_time
1184: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.delivery_lead_time;
1185: OE_BULK_ORDER_PVT.G_LINE_REC.visible_demand_flag
1186: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.visible_demand_flag;
1187:
1188: --OE_BULK_ORDER_PVT.G_LINE_REC.PLANNING_PRIORITY.extend(l_count);
1189: --OE_BULK_ORDER_PVT.G_LINE_REC.planning_priority
1190: --(OE_BULK_WF_UTIL.G_LINE_INDEX) := l_line_rec.planning_priority;
1186: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.visible_demand_flag;
1187:
1188: --OE_BULK_ORDER_PVT.G_LINE_REC.PLANNING_PRIORITY.extend(l_count);
1189: --OE_BULK_ORDER_PVT.G_LINE_REC.planning_priority
1190: --(OE_BULK_WF_UTIL.G_LINE_INDEX) := l_line_rec.planning_priority;
1191:
1192: OE_BULK_ORDER_PVT.G_LINE_REC.re_source_flag
1193: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.re_source_flag;
1194: OE_BULK_ORDER_PVT.G_LINE_REC.mfg_lead_time
1189: --OE_BULK_ORDER_PVT.G_LINE_REC.planning_priority
1190: --(OE_BULK_WF_UTIL.G_LINE_INDEX) := l_line_rec.planning_priority;
1191:
1192: OE_BULK_ORDER_PVT.G_LINE_REC.re_source_flag
1193: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.re_source_flag;
1194: OE_BULK_ORDER_PVT.G_LINE_REC.mfg_lead_time
1195: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.mfg_lead_time;
1196: END IF;
1197:
1191:
1192: OE_BULK_ORDER_PVT.G_LINE_REC.re_source_flag
1193: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.re_source_flag;
1194: OE_BULK_ORDER_PVT.G_LINE_REC.mfg_lead_time
1195: (OE_BULK_WF_UTIL.G_LINE_INDEX) := p_line_rec.mfg_lead_time;
1196: END IF;
1197:
1198: END IF; -- bulk mode.
1199: