[Home] [Help]
1265:
1266: END IF;
1267:
1268: -- Validate card status for 'Active'
1269: IF l_kanban_detail_rec.card_status <> INV_KANBAN_PVT.G_Card_Status_Active THEN
1270:
1271: x_retcode := FND_API.G_RET_STS_ERROR;
1272:
1273: fnd_message.set_name('FLM','FLM_INVALID_CARD_STATUS');
1275:
1276: END IF;
1277:
1278: -- Validate source type for Inter Org / Intra Org
1279: IF l_kanban_detail_rec.source_type NOT IN (INV_KANBAN_PVT.G_Source_Type_InterOrg, INV_KANBAN_PVT.G_Source_Type_IntraOrg) THEN
1280:
1281: x_retcode := FND_API.G_RET_STS_ERROR;
1282:
1283: fnd_message.set_name('FLM','FLM_NO_KANBAN_TYPE');
1289: RETURN;
1290: END IF;
1291:
1292:
1293: IF l_kanban_detail_rec.source_type = INV_KANBAN_PVT.G_Source_Type_InterOrg THEN
1294:
1295: OPEN c_inter_order(p_kanban_card_id);
1296: FETCH c_inter_order INTO l_inter_order_rec;
1297: CLOSE c_inter_order;
1349: END IF; -- l_tolerance_param
1350:
1351: END IF;
1352:
1353: ELSIF l_kanban_detail_rec.source_type = INV_KANBAN_PVT.G_Source_Type_IntraOrg THEN
1354:
1355: OPEN c_intra_order(p_kanban_card_id);
1356: FETCH c_intra_order INTO l_intra_order_rec;
1357: CLOSE c_intra_order;
1552: END IF;
1553:
1554: IF p_process_flag = 'Y' THEN
1555:
1556: IF l_source_type = INV_KANBAN_PVT.G_Source_Type_InterOrg THEN
1557:
1558: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1559: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1560: l_log_module || '.complete_inter_transfer',
1579: 'x_retcode = ' || x_retcode || ', ' ||
1580: 'x_errmsg = ' || x_errmsg);
1581: END IF;
1582:
1583: ELSIF l_source_type = INV_KANBAN_PVT.G_Source_Type_IntraOrg THEN
1584:
1585: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1586: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1587: l_log_module || '.complete_intra_transfer',