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