1: package body XDP_WORKITEMS_PKG as
2: /* $Header: XDPWIB.pls 120.2 2005/07/15 06:31:42 appldev ship $ */
3: procedure INSERT_ROW (
4: X_ROWID in OUT NOCOPY VARCHAR2,
5: X_WORKITEM_ID in NUMBER,
404: -- user_id := 1;
405: --end if;
406: user_id := fnd_load_util.owner_id(X_OWNER);
407:
408: XDP_WORKITEMS_PKG.UPDATE_ROW (
409: X_WORKITEM_ID => X_WORKITEM_ID,
410: X_WORKITEM_NAME => X_WORKITEM_NAME,
411: X_VERSION => X_VERSION,
412: X_WI_TYPE_CODE => X_WI_TYPE_CODE,
429: X_LAST_UPDATE_LOGIN => 0);
430:
431: exception
432: when NO_DATA_FOUND then
433: XDP_WORKITEMS_PKG.INSERT_ROW (
434: X_ROWID => row_id,
435: X_WORKITEM_ID => X_WORKITEM_ID,
436: X_WORKITEM_NAME => X_WORKITEM_NAME,
437: X_VERSION => X_VERSION,
481:
482: end TRANSLATE_ROW;
483:
484:
485: end XDP_WORKITEMS_PKG;