323:
324: IF var_set_id IS NULL
325: THEN
326: x_return_status := FND_API.G_RET_STS_ERROR ;
327: fnd_message.set_name('MRP', 'MRCONC-CANNOT GET PROFILE');
328: fnd_message.set_token('PROFILE', 'MRP_DEFAULT_ASSIGNMENT_SET');
329: RETURN;
330: END IF;
331:
324: IF var_set_id IS NULL
325: THEN
326: x_return_status := FND_API.G_RET_STS_ERROR ;
327: fnd_message.set_name('MRP', 'MRCONC-CANNOT GET PROFILE');
328: fnd_message.set_token('PROFILE', 'MRP_DEFAULT_ASSIGNMENT_SET');
329: RETURN;
330: END IF;
331:
332:
409: ((p_mode = 'VENDOR' OR p_mode = 'BOTH')AND
410: found_ven = FALSE))
411: THEN
412: x_return_status := FND_API.G_RET_STS_ERROR ;
413: fnd_message.set_name('MRP', 'GEN-CANNOT SELECT');
414: fnd_message.set_token('SELECT', 'EC_SOURCE', TRUE);
415: fnd_message.set_token('ROUTINE', 'MRP_SOURCING', FALSE);
416: RETURN;
417: END IF;
410: found_ven = FALSE))
411: THEN
412: x_return_status := FND_API.G_RET_STS_ERROR ;
413: fnd_message.set_name('MRP', 'GEN-CANNOT SELECT');
414: fnd_message.set_token('SELECT', 'EC_SOURCE', TRUE);
415: fnd_message.set_token('ROUTINE', 'MRP_SOURCING', FALSE);
416: RETURN;
417: END IF;
418: EXCEPTION
411: THEN
412: x_return_status := FND_API.G_RET_STS_ERROR ;
413: fnd_message.set_name('MRP', 'GEN-CANNOT SELECT');
414: fnd_message.set_token('SELECT', 'EC_SOURCE', TRUE);
415: fnd_message.set_token('ROUTINE', 'MRP_SOURCING', FALSE);
416: RETURN;
417: END IF;
418: EXCEPTION
419: WHEN NO_DATA_FOUND THEN
417: END IF;
418: EXCEPTION
419: WHEN NO_DATA_FOUND THEN
420: x_return_status := FND_API.G_RET_STS_ERROR ;
421: fnd_message.set_name('MRP', 'GEN-NO ROWS SELECTED');
422: fnd_message.set_token('TABLE', 'mrp_sources_v');
423: RETURN;
424: END;
425: END Get_Source;
418: EXCEPTION
419: WHEN NO_DATA_FOUND THEN
420: x_return_status := FND_API.G_RET_STS_ERROR ;
421: fnd_message.set_name('MRP', 'GEN-NO ROWS SELECTED');
422: fnd_message.set_token('TABLE', 'mrp_sources_v');
423: RETURN;
424: END;
425: END Get_Source;
426: