1: package body AR_BPA_URLS_PKG as
2: /* $Header: ARBPURLB.pls 120.2 2005/10/30 04:13:55 appldev noship $ */
3: procedure INSERT_ROW (
4: X_ROWID in out nocopy VARCHAR2,
5: X_URL_ID in NUMBER,
332: if (X_OWNER = 'SEED') then
333: user_id := 1;
334: end if;
335:
336: AR_BPA_URLS_PKG.UPDATE_ROW (
337: X_URL_ID => X_URL_ID,
338: X_URL_ADDRESS => X_URL_ADDRESS,
339: X_FULL_URL_ADDRESS => X_FULL_URL_ADDRESS,
340: X_SEEDED_FLAG => X_SEEDED_FLAG,
347: X_APPLICATION_ID => X_APPLICATION_ID,
348: X_DATA_SOURCE_ID => X_DATA_SOURCE_ID);
349: exception
350: when NO_DATA_FOUND then
351: AR_BPA_URLS_PKG.INSERT_ROW (
352: X_ROWID => row_id,
353: X_URL_ID => X_URL_ID,
354: X_URL_ADDRESS => X_URL_ADDRESS,
355: X_FULL_URL_ADDRESS => X_FULL_URL_ADDRESS,
366: X_DATA_SOURCE_ID => X_DATA_SOURCE_ID);
367: end;
368: end LOAD_ROW;
369:
370: end AR_BPA_URLS_PKG;