1: package body AMS_QUERY_PURP_ASSOC_PKG as
2: /* $Header: amstqpab.pls 120.0 2005/05/31 14:43:33 appldev noship $ */
3: procedure INSERT_ROW (
4: X_TEMP_PURPOSE_ASSOC_ID in NUMBER,
5: X_OBJECT_VERSION_NUMBER in NUMBER,
164: l_TEMP_PURPOSE_ASSOC_ID := x_TEMP_PURPOSE_ASSOC_ID;
165: END IF;
166: l_obj_verno := 1;
167:
168: AMS_QUERY_PURP_ASSOC_PKG.insert_row (
169: x_TEMP_PURPOSE_ASSOC_ID => l_TEMP_PURPOSE_ASSOC_ID,
170: x_last_update_date => SYSDATE,
171: x_last_updated_by => l_user_id,
172: x_creation_date => SYSDATE,
187:
188: if (l_db_luby_id IN (0, 1, 2) or NVL(x_custom_mode, 'PRESERVE')='FORCE')
189: then
190:
191: AMS_QUERY_PURP_ASSOC_PKG.update_row (
192: x_TEMP_PURPOSE_ASSOC_ID => x_TEMP_PURPOSE_ASSOC_ID,
193: x_last_update_date => SYSDATE,
194: x_last_updated_by => l_user_id,
195: x_last_update_login => 0,
204: END IF;
205: END load_row;
206:
207:
208: end AMS_QUERY_PURP_ASSOC_PKG;