354: x_status_id OUT NOCOPY NUMBER,
355: x_return_val OUT NOCOPY BOOLEAN) IS
356:
357: -- For instance status id.
358: CURSOR csi_instance_statuses_csr (p_status_name IN VARCHAR2) IS
359: SELECT instance_status_id
360: FROM csi_instance_statuses
361: WHERE name = p_status_name;
362:
356:
357: -- For instance status id.
358: CURSOR csi_instance_statuses_csr (p_status_name IN VARCHAR2) IS
359: SELECT instance_status_id
360: FROM csi_instance_statuses
361: WHERE name = p_status_name;
362:
363: l_instance_status_id NUMBER;
364: l_return_val BOOLEAN DEFAULT TRUE;
364: l_return_val BOOLEAN DEFAULT TRUE;
365:
366: BEGIN
367:
368: OPEN csi_instance_statuses_csr(p_status_name);
369: FETCH csi_instance_statuses_csr INTO l_instance_status_id;
370: IF (csi_instance_statuses_csr%NOTFOUND) THEN
371: FND_MESSAGE.Set_Name('AHL','AHL_UC_INST_STATUS_MISSING');
372: FND_MESSAGE.Set_Token('CODE',p_status_name);
365:
366: BEGIN
367:
368: OPEN csi_instance_statuses_csr(p_status_name);
369: FETCH csi_instance_statuses_csr INTO l_instance_status_id;
370: IF (csi_instance_statuses_csr%NOTFOUND) THEN
371: FND_MESSAGE.Set_Name('AHL','AHL_UC_INST_STATUS_MISSING');
372: FND_MESSAGE.Set_Token('CODE',p_status_name);
373: FND_MSG_PUB.ADD;
366: BEGIN
367:
368: OPEN csi_instance_statuses_csr(p_status_name);
369: FETCH csi_instance_statuses_csr INTO l_instance_status_id;
370: IF (csi_instance_statuses_csr%NOTFOUND) THEN
371: FND_MESSAGE.Set_Name('AHL','AHL_UC_INST_STATUS_MISSING');
372: FND_MESSAGE.Set_Token('CODE',p_status_name);
373: FND_MSG_PUB.ADD;
374: --dbms_output.put_line('Status code not found');
373: FND_MSG_PUB.ADD;
374: --dbms_output.put_line('Status code not found');
375: l_return_val := FALSE;
376: END IF;
377: CLOSE csi_instance_statuses_csr;
378:
379: -- assign out parameters.
380: x_return_val := l_return_val;
381: x_status_id := l_instance_status_id;
389: x_status_name OUT NOCOPY VARCHAR2,
390: x_return_val OUT NOCOPY BOOLEAN) IS
391:
392: -- For instance status name.
393: CURSOR csi_instance_statuses_csr (p_status_id IN NUMBER) IS
394: SELECT name
395: FROM csi_instance_statuses
396: WHERE instance_status_id = p_status_id;
397:
391:
392: -- For instance status name.
393: CURSOR csi_instance_statuses_csr (p_status_id IN NUMBER) IS
394: SELECT name
395: FROM csi_instance_statuses
396: WHERE instance_status_id = p_status_id;
397:
398: l_status_name csi_instance_statuses.name%TYPE;
399: l_return_val BOOLEAN DEFAULT TRUE;
394: SELECT name
395: FROM csi_instance_statuses
396: WHERE instance_status_id = p_status_id;
397:
398: l_status_name csi_instance_statuses.name%TYPE;
399: l_return_val BOOLEAN DEFAULT TRUE;
400:
401: BEGIN
402:
399: l_return_val BOOLEAN DEFAULT TRUE;
400:
401: BEGIN
402:
403: OPEN csi_instance_statuses_csr(p_status_id);
404: FETCH csi_instance_statuses_csr INTO l_status_name;
405: IF (csi_instance_statuses_csr%NOTFOUND) THEN
406: l_return_val := FALSE;
407: END IF;
400:
401: BEGIN
402:
403: OPEN csi_instance_statuses_csr(p_status_id);
404: FETCH csi_instance_statuses_csr INTO l_status_name;
405: IF (csi_instance_statuses_csr%NOTFOUND) THEN
406: l_return_val := FALSE;
407: END IF;
408: CLOSE csi_instance_statuses_csr;
401: BEGIN
402:
403: OPEN csi_instance_statuses_csr(p_status_id);
404: FETCH csi_instance_statuses_csr INTO l_status_name;
405: IF (csi_instance_statuses_csr%NOTFOUND) THEN
406: l_return_val := FALSE;
407: END IF;
408: CLOSE csi_instance_statuses_csr;
409:
404: FETCH csi_instance_statuses_csr INTO l_status_name;
405: IF (csi_instance_statuses_csr%NOTFOUND) THEN
406: l_return_val := FALSE;
407: END IF;
408: CLOSE csi_instance_statuses_csr;
409:
410: -- assign out parameters.
411: x_return_val := l_return_val;
412: x_status_name := l_status_name;
507: WHERE csi.instance_id = p_csi_item_instance_id;
508:
509: CURSOR csi_inst_statuses_csr(p_instance_status_id IN NUMBER) IS
510: SELECT name
511: FROM csi_instance_statuses
512: WHERE instance_status_id = p_instance_status_id;
513:
514: l_return_val BOOLEAN DEFAULT TRUE;
515: l_status_name csi_instance_statuses.name%TYPE DEFAULT NULL;
511: FROM csi_instance_statuses
512: WHERE instance_status_id = p_instance_status_id;
513:
514: l_return_val BOOLEAN DEFAULT TRUE;
515: l_status_name csi_instance_statuses.name%TYPE DEFAULT NULL;
516: l_status_id NUMBER;
517:
518: l_location_type_code csi_item_instances.location_type_code%TYPE;
519: