APPS.XTR_GAIN_LOSS_DNM_PKG dependencies on XTR_GAIN_LOSS_DNM

Line 1: package body XTR_GAIN_LOSS_DNM_PKG as

1: package body XTR_GAIN_LOSS_DNM_PKG as
2: /* $Header: xtrgldpb.pls 120.3 2005/06/29 08:14:47 badiredd ship $ */
3:
4: procedure INSERT_ROW (
5: X_ROWID in OUT NOCOPY VARCHAR2,

Line 24: cursor C is select ROWID from XTR_GAIN_LOSS_DNM

20: X_LAST_UPDATE_DATE in DATE,
21: X_LAST_UPDATED_BY in NUMBER,
22: X_LAST_UPDATE_LOGIN in NUMBER
23: ) is
24: cursor C is select ROWID from XTR_GAIN_LOSS_DNM
25: where GAIN_LOSS_DNM_ID = X_GAIN_LOSS_DNM_ID
26: ;
27: begin
28: insert into XTR_GAIN_LOSS_DNM (

Line 28: insert into XTR_GAIN_LOSS_DNM (

24: cursor C is select ROWID from XTR_GAIN_LOSS_DNM
25: where GAIN_LOSS_DNM_ID = X_GAIN_LOSS_DNM_ID
26: ;
27: begin
28: insert into XTR_GAIN_LOSS_DNM (
29: LAST_UPDATE_LOGIN,
30: LAST_UPDATED_BY,
31: LAST_UPDATE_DATE,
32: COMPANY_CODE,

Line 101: from XTR_GAIN_LOSS_DNM

97: CURRENCY,
98: JOURNAL_DATE,
99: BATCH_ID,
100: REVAL_EFF_FLAG
101: from XTR_GAIN_LOSS_DNM
102: where GAIN_LOSS_DNM_ID = X_GAIN_LOSS_DNM_ID
103: for update of GAIN_LOSS_DNM_ID nowait;
104: begin
105: for tlinfo in c1 loop

Line 156: update XTR_GAIN_LOSS_DNM set

152: X_LAST_UPDATED_BY in NUMBER,
153: X_LAST_UPDATE_LOGIN in NUMBER
154: ) is
155: begin
156: update XTR_GAIN_LOSS_DNM set
157: COMPANY_CODE = X_COMPANY_CODE,
158: DEAL_NUMBER = X_DEAL_NUMBER,
159: TRANSACTION_NUMBER = X_TRANSACTION_NUMBER,
160: DATE_TYPE = X_DATE_TYPE,

Line 182: delete from XTR_GAIN_LOSS_DNM

178: procedure DELETE_ROW (
179: X_GAIN_LOSS_DNM_ID in NUMBER
180: ) is
181: begin
182: delete from XTR_GAIN_LOSS_DNM
183: where GAIN_LOSS_DNM_ID = X_GAIN_LOSS_DNM_ID;
184:
185: if (sql%notfound) then
186: raise no_data_found;

Line 191: end XTR_GAIN_LOSS_DNM_PKG;

187: end if;
188:
189: end DELETE_ROW;
190:
191: end XTR_GAIN_LOSS_DNM_PKG;