1: package body AHL_SPACE_UNAVAILABLE_PKG as
2: /* $Header: AHLLSUAB.pls 115.4 2003/04/04 12:09:05 adharia noship $ */
3: procedure INSERT_ROW (
4: X_ROWID in out NOCOPY VARCHAR2,
5: X_SPACE_UNAVAILABILITY_ID in NUMBER,
475: end if ;
476:
477: l_obj_verno := 1;
478:
479: AHL_SPACE_UNAVAILABLE_PKG.INSERT_ROW (
480: X_ROWID => l_row_id ,
481: X_SPACE_UNAVAILABILITY_ID => l_obj_id ,
482: X_OBJECT_VERSION_NUMBER => l_obj_verno ,
483:
517: close c_obj_verno;
518:
519: l_obj_verno := l_obj_verno + 1;
520:
521: AHL_SPACE_UNAVAILABLE_PKG.UPDATE_ROW (
522: X_SPACE_UNAVAILABILITY_ID => X_SPACE_UNAVAILABILITY_ID ,
523: X_OBJECT_VERSION_NUMBER => l_obj_verno ,
524:
525: X_ATTRIBUTE13 => X_ATTRIBUTE13 ,
567: and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
568: end TRANSLATE_ROW;
569:
570:
571: end AHL_SPACE_UNAVAILABLE_PKG;