407: FROM Mtl_Txn_Request_Headers MTRH
408: WHERE MTRH.Header_id = l_Kanban_Card_Rec_Tbl(1).document_header_id;
409:
410: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
411: FND_MESSAGE.SET_NAME('INV','INV_KANBAN_MO_ALLOC_SUCCESS');
412: FND_MESSAGE.SET_TOKEN('MOVE_ORDER',l_mo_request_number);
413: FND_MSG_PUB.Add;
414: fnd_file.put_line(fnd_file.log,'Error in Create_Transfer_Order during auto allocate '||fnd_message.get);
415: RAISE FND_API.g_exc_error;
408: WHERE MTRH.Header_id = l_Kanban_Card_Rec_Tbl(1).document_header_id;
409:
410: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
411: FND_MESSAGE.SET_NAME('INV','INV_KANBAN_MO_ALLOC_SUCCESS');
412: FND_MESSAGE.SET_TOKEN('MOVE_ORDER',l_mo_request_number);
413: FND_MSG_PUB.Add;
414: fnd_file.put_line(fnd_file.log,'Error in Create_Transfer_Order during auto allocate '||fnd_message.get);
415: RAISE FND_API.g_exc_error;
416: ELSE
410: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
411: FND_MESSAGE.SET_NAME('INV','INV_KANBAN_MO_ALLOC_SUCCESS');
412: FND_MESSAGE.SET_TOKEN('MOVE_ORDER',l_mo_request_number);
413: FND_MSG_PUB.Add;
414: fnd_file.put_line(fnd_file.log,'Error in Create_Transfer_Order during auto allocate '||fnd_message.get);
415: RAISE FND_API.g_exc_error;
416: ELSE
417: FND_MESSAGE.SET_NAME('INV','INV_MO_ALLOC_FAIL');
418: FND_MESSAGE.SET_TOKEN('MOVE_ORDER',l_mo_request_number);
413: FND_MSG_PUB.Add;
414: fnd_file.put_line(fnd_file.log,'Error in Create_Transfer_Order during auto allocate '||fnd_message.get);
415: RAISE FND_API.g_exc_error;
416: ELSE
417: FND_MESSAGE.SET_NAME('INV','INV_MO_ALLOC_FAIL');
418: FND_MESSAGE.SET_TOKEN('MOVE_ORDER',l_mo_request_number);
419: FND_MSG_PUB.Add;
420: fnd_file.put_line(fnd_file.log,'Error in Create_Transfer_Order during auto allocate '||fnd_message.get);
421: RAISE FND_API.g_exc_error;
414: fnd_file.put_line(fnd_file.log,'Error in Create_Transfer_Order during auto allocate '||fnd_message.get);
415: RAISE FND_API.g_exc_error;
416: ELSE
417: FND_MESSAGE.SET_NAME('INV','INV_MO_ALLOC_FAIL');
418: FND_MESSAGE.SET_TOKEN('MOVE_ORDER',l_mo_request_number);
419: FND_MSG_PUB.Add;
420: fnd_file.put_line(fnd_file.log,'Error in Create_Transfer_Order during auto allocate '||fnd_message.get);
421: RAISE FND_API.g_exc_error;
422: END IF;
416: ELSE
417: FND_MESSAGE.SET_NAME('INV','INV_MO_ALLOC_FAIL');
418: FND_MESSAGE.SET_TOKEN('MOVE_ORDER',l_mo_request_number);
419: FND_MSG_PUB.Add;
420: fnd_file.put_line(fnd_file.log,'Error in Create_Transfer_Order during auto allocate '||fnd_message.get);
421: RAISE FND_API.g_exc_error;
422: END IF;
423: END IF;
424:
641: EXCEPTION
642:
643: WHEN NO_data_FOUND Then
644: if l_sql_stmt_no = 10 then
645: FND_MESSAGE.SET_NAME('INV','INV-NO ITEM RECORD');
646: elsif l_sql_stmt_no = 20 then
647: FND_MESSAGE.SET_NAME('INV','INV-NO ORG INFORMATION');
648: elsif l_sql_stmt_no = 30 then
649: FND_MESSAGE.SET_NAME('INV','INV-NO CALENDAR DATE');
643: WHEN NO_data_FOUND Then
644: if l_sql_stmt_no = 10 then
645: FND_MESSAGE.SET_NAME('INV','INV-NO ITEM RECORD');
646: elsif l_sql_stmt_no = 20 then
647: FND_MESSAGE.SET_NAME('INV','INV-NO ORG INFORMATION');
648: elsif l_sql_stmt_no = 30 then
649: FND_MESSAGE.SET_NAME('INV','INV-NO CALENDAR DATE');
650: elsif l_sql_stmt_no = 40 then
651: FND_MESSAGE.SET_NAME('INV','INV_DEFAULT_DELIVERY_LOC_REQD');
645: FND_MESSAGE.SET_NAME('INV','INV-NO ITEM RECORD');
646: elsif l_sql_stmt_no = 20 then
647: FND_MESSAGE.SET_NAME('INV','INV-NO ORG INFORMATION');
648: elsif l_sql_stmt_no = 30 then
649: FND_MESSAGE.SET_NAME('INV','INV-NO CALENDAR DATE');
650: elsif l_sql_stmt_no = 40 then
651: FND_MESSAGE.SET_NAME('INV','INV_DEFAULT_DELIVERY_LOC_REQD');
652: elsif l_sql_stmt_no = 50 then
653: FND_MESSAGE.SET_NAME('INV','INV_INT_REVCODE');
647: FND_MESSAGE.SET_NAME('INV','INV-NO ORG INFORMATION');
648: elsif l_sql_stmt_no = 30 then
649: FND_MESSAGE.SET_NAME('INV','INV-NO CALENDAR DATE');
650: elsif l_sql_stmt_no = 40 then
651: FND_MESSAGE.SET_NAME('INV','INV_DEFAULT_DELIVERY_LOC_REQD');
652: elsif l_sql_stmt_no = 50 then
653: FND_MESSAGE.SET_NAME('INV','INV_INT_REVCODE');
654: elsif l_sql_stmt_no = 60 then
655: FND_MESSAGE.SET_NAME('FND','CONC-FDWHOAMI INVALID USERID');
649: FND_MESSAGE.SET_NAME('INV','INV-NO CALENDAR DATE');
650: elsif l_sql_stmt_no = 40 then
651: FND_MESSAGE.SET_NAME('INV','INV_DEFAULT_DELIVERY_LOC_REQD');
652: elsif l_sql_stmt_no = 50 then
653: FND_MESSAGE.SET_NAME('INV','INV_INT_REVCODE');
654: elsif l_sql_stmt_no = 60 then
655: FND_MESSAGE.SET_NAME('FND','CONC-FDWHOAMI INVALID USERID');
656: FND_MESSAGE.SET_TOKEN('USERID',to_char(FND_GLOBAL.USER_ID));
657: end if;
651: FND_MESSAGE.SET_NAME('INV','INV_DEFAULT_DELIVERY_LOC_REQD');
652: elsif l_sql_stmt_no = 50 then
653: FND_MESSAGE.SET_NAME('INV','INV_INT_REVCODE');
654: elsif l_sql_stmt_no = 60 then
655: FND_MESSAGE.SET_NAME('FND','CONC-FDWHOAMI INVALID USERID');
656: FND_MESSAGE.SET_TOKEN('USERID',to_char(FND_GLOBAL.USER_ID));
657: end if;
658: FND_MSG_PUB.Add;
659: fnd_file.put_line(fnd_file.log,'Error in Create_Replenishment'||'( stmt_num: '||l_sql_stmt_no||') '||fnd_message.get);
652: elsif l_sql_stmt_no = 50 then
653: FND_MESSAGE.SET_NAME('INV','INV_INT_REVCODE');
654: elsif l_sql_stmt_no = 60 then
655: FND_MESSAGE.SET_NAME('FND','CONC-FDWHOAMI INVALID USERID');
656: FND_MESSAGE.SET_TOKEN('USERID',to_char(FND_GLOBAL.USER_ID));
657: end if;
658: FND_MSG_PUB.Add;
659: fnd_file.put_line(fnd_file.log,'Error in Create_Replenishment'||'( stmt_num: '||l_sql_stmt_no||') '||fnd_message.get);
660: fnd_file.put_line(fnd_file.log,'Error in Create_Replenishment'||'( stmt_num: '||l_sql_stmt_no||') '||sqlerrm(sqlcode));
655: FND_MESSAGE.SET_NAME('FND','CONC-FDWHOAMI INVALID USERID');
656: FND_MESSAGE.SET_TOKEN('USERID',to_char(FND_GLOBAL.USER_ID));
657: end if;
658: FND_MSG_PUB.Add;
659: fnd_file.put_line(fnd_file.log,'Error in Create_Replenishment'||'( stmt_num: '||l_sql_stmt_no||') '||fnd_message.get);
660: fnd_file.put_line(fnd_file.log,'Error in Create_Replenishment'||'( stmt_num: '||l_sql_stmt_no||') '||sqlerrm(sqlcode));
661: x_return_status := 1;
662: WHEN FND_API.G_EXC_ERROR THEN
663: fnd_file.put_line(fnd_file.log,'Error in Create_Replenishment'||'( stmt_num: '||l_sql_stmt_no||') '||fnd_message.get);
659: fnd_file.put_line(fnd_file.log,'Error in Create_Replenishment'||'( stmt_num: '||l_sql_stmt_no||') '||fnd_message.get);
660: fnd_file.put_line(fnd_file.log,'Error in Create_Replenishment'||'( stmt_num: '||l_sql_stmt_no||') '||sqlerrm(sqlcode));
661: x_return_status := 1;
662: WHEN FND_API.G_EXC_ERROR THEN
663: fnd_file.put_line(fnd_file.log,'Error in Create_Replenishment'||'( stmt_num: '||l_sql_stmt_no||') '||fnd_message.get);
664: fnd_file.put_line(fnd_file.log,'Error in Create_Replenishment'||'( stmt_num: '||l_sql_stmt_no||') '||sqlerrm(sqlcode));
665: x_return_status := 1;
666: WHEN OTHERS THEN
667: fnd_file.put_line(fnd_file.log,'Error in Create_Replenishment'||'( stmt_num: '||l_sql_stmt_no||') '||fnd_message.get);
663: fnd_file.put_line(fnd_file.log,'Error in Create_Replenishment'||'( stmt_num: '||l_sql_stmt_no||') '||fnd_message.get);
664: fnd_file.put_line(fnd_file.log,'Error in Create_Replenishment'||'( stmt_num: '||l_sql_stmt_no||') '||sqlerrm(sqlcode));
665: x_return_status := 1;
666: WHEN OTHERS THEN
667: fnd_file.put_line(fnd_file.log,'Error in Create_Replenishment'||'( stmt_num: '||l_sql_stmt_no||') '||fnd_message.get);
668: fnd_file.put_line(fnd_file.log,'Error in Create_Replenishment'||'( stmt_num: '||l_sql_stmt_no||') '||sqlerrm(sqlcode));
669: x_return_status := 1;
670: End Create_Replenishment;
671:
708: raise no_data_found;
709: end if;
710:
711: if nvl(fnd_profile.VALUE('FLM_EKB_OPS_FLAG'),0) <> 1 then
712: fnd_message.set_name('FLM', 'FLM_EKB_PROFILE_DISABLED');
713: fnd_file.put_line(fnd_file.log,fnd_message.get);
714: raise no_data_found;
715: end if;
716:
709: end if;
710:
711: if nvl(fnd_profile.VALUE('FLM_EKB_OPS_FLAG'),0) <> 1 then
712: fnd_message.set_name('FLM', 'FLM_EKB_PROFILE_DISABLED');
713: fnd_file.put_line(fnd_file.log,fnd_message.get);
714: raise no_data_found;
715: end if;
716:
717: select mkc.kanban_card_id,mkc.kanban_card_number,mkc.pull_sequence_id,mkc.inventory_item_id,mkc.organization_id,mkc.subinventory_name,mkc.supply_status