1: package body pa_res_formats_pvt as
2: /* $Header: PARFMTVB.pls 120.0 2005/05/30 09:50:49 appldev noship $ */
3: procedure INSERT_ROW (
4: X_ROWID in out NOCOPY ROWID,
5: P_RES_FORMAT_ID in NUMBER,
386: else
387: user_id :=0;
388: end if;
389:
390: pa_res_formats_pvt.UPDATE_ROW (
391: P_RES_FORMAT_ID => P_RES_FORMAT_ID ,
392: P_RESOURCE_FORMAT_SEQ => P_RESOURCE_FORMAT_SEQ,
393: P_RESOURCE_CLASS_ID => P_RESOURCE_CLASS_ID,
394: P_RES_TYPE_ID => P_RES_TYPE_ID,
412: P_LAST_UPDATE_LOGIN => 0 );
413:
414: EXCEPTION
415: WHEN no_data_found then
416: pa_res_formats_pvt.INSERT_ROW (
417: X_ROWID => l_rowid ,
418: P_RES_FORMAT_ID => P_RES_FORMAT_ID ,
419: P_RESOURCE_FORMAT_SEQ => P_RESOURCE_FORMAT_SEQ,
420: P_RESOURCE_CLASS_ID => P_RESOURCE_CLASS_ID,
440: P_LAST_UPDATED_BY => user_id ,
441: P_LAST_UPDATE_LOGIN => 0 );
442: end LOAD_ROW;
443:
444: end pa_res_formats_pvt;