1: package body JTF_EVT_TYPES_PKG as
2: /* $Header: JTFEVTTB.pls 115.1 2002/02/14 05:44:08 appldev ship $ */
3: procedure INSERT_ROW (
4: X_JTF_EVT_TYPES_ID in NUMBER,
5: X_SECURITY_GROUP_ID in NUMBER,
283: l_user_id := 1;
284: end if;
285:
286: -- Update row if present
287: JTF_EVT_TYPES_PKG.UPDATE_ROW (
288: X_JTF_EVT_TYPES_ID => X_JTF_EVT_TYPES_ID,
289: X_SECURITY_GROUP_ID => X_SECURITY_GROUP_ID,
290: X_JTF_EVT_TYPES_NAME => X_JTF_EVT_TYPES_NAME,
291: X_JTF_EVT_TYPES_DESC => X_JTF_EVT_TYPES_DESC,
294: X_LAST_UPDATE_LOGIN => 0 );
295: exception
296: when NO_DATA_FOUND then
297: -- Insert a row
298: JTF_EVT_TYPES_PKG.INSERT_ROW (
299: X_JTF_EVT_TYPES_ID => X_JTF_EVT_TYPES_ID,
300: X_SECURITY_GROUP_ID => X_SECURITY_GROUP_ID,
301: X_JTF_EVT_TYPES_NAME => X_JTF_EVT_TYPES_NAME,
302: X_JTF_EVT_TYPES_DESC => X_JTF_EVT_TYPES_DESC,
307: X_LAST_UPDATE_LOGIN => 0 );
308:
309: end LOAD_ROW;
310:
311: end JTF_EVT_TYPES_PKG;