1: package body PA_ADW_DIMENSION_STATUS_PKG as
2: /* $Header: PAADWDSB.pls 120.0 2005/05/29 13:48:11 appldev noship $ */
3: procedure INSERT_ROW (
4: X_DIMENSION_CODE IN VARCHAR2,
5: X_DIMENSION_NAME IN VARCHAR2,
11: X_CREATED_BY IN NUMBER,
12: X_LAST_UPDATE_LOGIN IN NUMBER
13: ) is
14: begin
15: insert into PA_ADW_DIMENSION_STATUS(
16: DIMENSION_CODE ,
17: DIMENSION_NAME ,
18: STATUS_CODE ,
19: UPDATE_ALLOWED ,
45: X_DIMENSION_NAME IN VARCHAR2,
46: X_OWNER IN VARCHAR2) is
47: begin
48:
49: update PA_ADW_DIMENSION_STATUS set
50: DIMENSION_NAME = X_DIMENSION_NAME,
51: LAST_UPDATE_DATE = sysdate,
52: LAST_UPDATED_BY = decode(X_OWNER, 'SEED', 1, 0),
53: LAST_UPDATE_LOGIN = 0
76: X_LAST_UPDATED_BY IN NUMBER,
77: X_LAST_UPDATE_LOGIN IN NUMBER
78: ) is
79: begin
80: update PA_ADW_DIMENSION_STATUS set
81: DIMENSION_NAME = X_DIMENSION_NAME,
82: STATUS_CODE = X_STATUS_CODE,
83: UPDATE_ALLOWED = X_UPDATE_ALLOWED,
84: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
95: raise;
96:
97: end UPDATE_ROW;
98:
99: end PA_ADW_DIMENSION_STATUS_PKG;