APPS.XTR_STOCK_POSITION_P dependencies on XTR_POSITION_HISTORY

Line 4: xtr_position_history table for the 'STOCK' deal.

1: PACKAGE BODY XTR_STOCK_POSITION_P as
2: /* $Header: xtrsposb.pls 120.1 2005/11/23 12:26:15 eaggarwa noship $ */
3: /* This files conatins three procedure to insert/update/delete rows from the
4: xtr_position_history table for the 'STOCK' deal.
5:
6: 1. Maintain_stk_position_history is called from the form when the
7: 'BUY' stock deal is created or the deal status is set to cancelled
8:

Line 59: L_DEAL_SUBTYPE XTR_POSITION_HISTORY.deal_subtype%TYPE;

55: L_HCE_BASE_REF_AMOUNT NUMBER;
56: L_BASE_REF_AMOUNT NUMBER;
57: L_DAILY_INT NUMBER;
58: L_HCE_INT NUMBER;
59: L_DEAL_SUBTYPE XTR_POSITION_HISTORY.deal_subtype%TYPE;
60: T_AS_AT_DATE DBMS_SQL.DATE_TABLE;
61: L_TRANSACTION_RATE NUMBER;
62:
63: --

Line 102: insert into XTR_POSITION_HISTORY(

98: END LOOP;
99:
100:
101: forall i in 1..T_AS_AT_DATE.COUNT
102: insert into XTR_POSITION_HISTORY(
103: AS_AT_DATE,
104: DEAL_TYPE,
105: DEAL_NUMBER,
106: TRANSACTION_NUMBER,

Line 153: delete from XTR_POSITION_HISTORY

149: /* UPDATE */
150: /**************/
151: elsif P_ACTION='UPDATE' and P_STATUS_CODE= 'CANCELLED' then
152:
153: delete from XTR_POSITION_HISTORY
154: where AS_AT_DATE >= L_REF_DATE
155: and DEAL_TYPE = P_DEAL_TYPE
156: and DEAL_NUMBER = P_DEAL_NUMBER;
157:

Line 231: from XTR_POSITION_HISTORY

227:
228: cursor GET_PRV_ROWS_STOCK(V_DEAL_TYPE VARCHAR2,
229: V_DEAL_NUMBER NUMBER) is
230: select max(AS_AT_DATE + 1)
231: from XTR_POSITION_HISTORY
232: where DEAL_TYPE = V_DEAL_TYPE
233: and DEAL_NUMBER = V_DEAL_NUMBER;
234:
235: cursor STOCK_LAST_PROC_DATE(V_AS_AT_DATE DATE,

Line 256: from XTR_POSITION_HISTORY

252: cursor CHK_LOCK_ROWS_STOCK(V_AS_AT_DATE DATE,
253: V_DEAL_TYPE VARCHAR2,
254: V_DEAL_NUMBER NUMBER) is
255: select rowid
256: from XTR_POSITION_HISTORY
257: where AS_AT_DATE = V_AS_AT_DATE
258: and DEAL_TYPE = V_DEAL_TYPE
259: and DEAL_NUMBER = V_DEAL_NUMBER
260: for update of BASE_REF_AMOUNT NOWAIT;

Line 282: Delete from XTR_POSITION_HISTORY

278: Fetch get_stock_resale into l_remaining_quantity,l_last_resale_date;
279: If get_stock_resale%FOUND then
280:
281: If nvl(l_remaining_quantity, -1) = 0 then -- total resale
282: Delete from XTR_POSITION_HISTORY
283: Where deal_number = P_DEAL_NUMBER
284: And as_at_date >= l_last_resale_date;
285: l_complete_resale := 'Y';
286: end if;

Line 370: update XTR_POSITION_HISTORY

366: /*========================================*/
367: /* Insert or Update position history table */
368: /*========================================*/
369: if L_ROWID is not null then
370: update XTR_POSITION_HISTORY
371: set COMPANY_CODE = P_COMPANY_CODE,
372: CPARTY_CODE = P_CPARTY_CODE,
373: DEAL_SUBTYPE = P_DEAL_SUBTYPE,
374: PRODUCT_TYPE = P_PRODUCT_TYPE,

Line 389: insert into XTR_POSITION_HISTORY(

385: where rowid=l_rowid;
386: else
387:
388: -- insert new row
389: insert into XTR_POSITION_HISTORY(
390: AS_AT_DATE,
391: DEAL_TYPE,
392: DEAL_NUMBER,
393: TRANSACTION_NUMBER,