1: package body AR_BPA_PAGE_SETUPS_PKG as
2: /* $Header: ARBPSTPB.pls 120.0 2004/07/30 07:28:06 verao noship $ */
3:
4: procedure INSERT_ROW (
5: X_ROWID in out nocopy VARCHAR2,
355: user_id := 1;
356: end if;
357:
358: BEGIN
359: AR_BPA_PAGE_SETUPS_PKG.UPDATE_ROW (
360: X_PAGE_SETUP_ID => X_PAGE_SETUP_ID ,
361: X_PAGE_WIDTH => X_PAGE_WIDTH ,
362: X_PAGE_HEIGHT => X_PAGE_HEIGHT ,
363: X_TOP_MARGIN => X_TOP_MARGIN ,
375: X_LAST_UPDATED_BY => user_id,
376: X_LAST_UPDATE_LOGIN => 0);
377: exception
378: when NO_DATA_FOUND then
379: AR_BPA_PAGE_SETUPS_PKG.INSERT_ROW (
380: X_ROWID => row_id,
381: X_PAGE_SETUP_ID => X_PAGE_SETUP_ID ,
382: X_PAGE_WIDTH => X_PAGE_WIDTH ,
383: X_PAGE_HEIGHT => X_PAGE_HEIGHT ,
420: end TRANSLATE_ROW;
421:
422:
423:
424: end AR_BPA_PAGE_SETUPS_PKG;