APPS.XDO_TRANS_UNITS_PKG dependencies on XDO_TRANS_UNITS

Line 1: package body XDO_TRANS_UNITS_PKG as

1: package body XDO_TRANS_UNITS_PKG as
2: /* $Header: XDOTRUTB.pls 120.1 2005/07/02 05:05:42 appldev noship $ */
3:
4: procedure INSERT_ROW (
5: X_APPLICATION_SHORT_NAME in VARCHAR2,

Line 19: insert into XDO_TRANS_UNITS (

15: X_LAST_UPDATED_BY in NUMBER,
16: X_LAST_UPDATE_LOGIN in NUMBER
17: ) is
18: begin
19: insert into XDO_TRANS_UNITS (
20: APPLICATION_SHORT_NAME,
21: TEMPLATE_CODE,
22: UNIT_ID,
23: NOTE,

Line 82: update XDO_TRANS_UNITS

78: X_LAST_UPDATED_BY in NUMBER,
79: X_LAST_UPDATE_LOGIN in NUMBER)
80: is
81: begin
82: update XDO_TRANS_UNITS
83: set APPLICATION_SHORT_NAME = X_APPLICATION_SHORT_NAME,
84: TEMPLATE_CODE = X_TEMPLATE_CODE,
85: UNIT_ID = X_UNIT_ID,
86: NOTE = nvl(X_NOTE, NOTE),

Line 129: delete from XDO_TRANS_UNITS

125: if (sql%notfound) then
126: raise no_data_found;
127: end if;
128:
129: delete from XDO_TRANS_UNITS
130: where APPLICATION_SHORT_NAME = X_APPLICATION_SHORT_NAME
131: and TEMPLATE_CODE = X_TEMPLATE_CODE
132: and UNIT_ID = UNIT_ID;
133:

Line 184: xtu_ludate date; -- lud in xdo_trans_units (to check the row exists)

180: f_luby number; -- entity owner in file
181: f_ludate date; -- entity update date in file
182: db_luby number; -- entity owner in db
183: db_ludate date; -- entity update date in db
184: xtu_ludate date; -- lud in xdo_trans_units (to check the row exists)
185:
186: begin
187:
188: -- Translate char last_update_date to date

Line 229: -- in XDO_TRANS_UNITS.

225: exception
226: when no_data_found then
227:
228: -- Check first if this is a valid trans-unit that exists
229: -- in XDO_TRANS_UNITS.
230: -- We should not create any new trans-units from this
231: -- procedure.
232: begin
233: select LAST_UPDATE_DATE

Line 235: from XDO_TRANS_UNITS

231: -- procedure.
232: begin
233: select LAST_UPDATE_DATE
234: into xtu_ludate
235: from XDO_TRANS_UNITS
236: where APPLICATION_SHORT_NAME = X_APPLICATION_SHORT_NAME
237: and TEMPLATE_CODE = X_TEMPLATE_CODE
238: and UNIT_ID = X_UNIT_ID;
239: exception

Line 339: from XDO_TRANS_UNITS

335: begin
336:
337: select LAST_UPDATED_BY, LAST_UPDATE_DATE
338: into db_luby, db_ludate
339: from XDO_TRANS_UNITS
340: where APPLICATION_SHORT_NAME = X_APPLICATION_SHORT_NAME
341: and TEMPLATE_CODE = X_TEMPLATE_CODE
342: and UNIT_ID = X_UNIT_ID;
343:

Line 357: XDO_TRANS_UNITS_PKG.UPDATE_ROW(

353: p_db_lud => db_ludate,
354: p_custom_mode => x_custom_mode))
355: then
356:
357: XDO_TRANS_UNITS_PKG.UPDATE_ROW(
358: X_APPLICATION_SHORT_NAME,
359: X_TEMPLATE_CODE,
360: X_UNIT_ID,
361: X_LANGUAGE,

Line 378: XDO_TRANS_UNITS_PKG.INSERT_ROW(

374: return 0; -- row not updated due to custom mode
375:
376: exception when no_data_found then
377:
378: XDO_TRANS_UNITS_PKG.INSERT_ROW(
379: X_APPLICATION_SHORT_NAME,
380: X_TEMPLATE_CODE,
381: X_UNIT_ID,
382: X_LANGUAGE,

Line 475: end XDO_TRANS_UNITS_PKG;

471: end;
472:
473: end LOAD_TRANS_UNIT_PROP;
474:
475: end XDO_TRANS_UNITS_PKG;