1 package IGS_PS_ANL_LOAD_U_LN_PKG AUTHID CURRENT_USER AS
2 /* $Header: IGSPI05S.pls 115.3 2002/11/29 01:53:38 nsidana ship $ */
3
4 procedure INSERT_ROW (
5 X_ROWID in out NOCOPY VARCHAR2,
6 X_COURSE_CD in VARCHAR2,
7 X_CRV_VERSION_NUMBER in NUMBER,
8 X_EFFECTIVE_START_DT in DATE,
9 X_YR_NUM in NUMBER,
10 X_UV_VERSION_NUMBER in NUMBER,
11 X_UNIT_CD in VARCHAR2,
12 X_MODE in VARCHAR2 default 'R'
13 );
14 procedure LOCK_ROW (
15 X_ROWID IN VARCHAR2,
16 X_COURSE_CD in VARCHAR2,
17 X_CRV_VERSION_NUMBER in NUMBER,
18 X_EFFECTIVE_START_DT in DATE,
19 X_YR_NUM in NUMBER,
20 X_UV_VERSION_NUMBER in NUMBER,
21 X_UNIT_CD in VARCHAR2
22 );
23 procedure DELETE_ROW (
24 X_ROWID in VARCHAR2
25 );
26
27 FUNCTION Get_PK_For_Validation (
28 x_course_cd IN VARCHAR2,
29 x_crv_version_number IN NUMBER,
30 x_yr_num IN NUMBER,
31 x_effective_start_dt IN DATE,
32 x_unit_cd IN VARCHAR2,
33 x_uv_version_number IN NUMBER )
34 RETURN BOOLEAN;
35
36 PROCEDURE GET_FK_IGS_PS_ANL_LOAD (
37 x_course_cd IN VARCHAR2,
38 x_version_number IN NUMBER,
39 x_yr_num IN NUMBER,
40 x_effective_start_dt IN DATE
41 );
42
43 PROCEDURE GET_FK_IGS_PS_UNIT_VER (
44 x_unit_cd IN VARCHAR2,
45 x_version_number IN NUMBER
46 );
47
48 PROCEDURE Check_Constraints (
49 Column_Name IN VARCHAR2 DEFAULT NULL,
50 Column_Value IN VARCHAR2 DEFAULT NULL
51 );
52
53 PROCEDURE Before_DML (
54 p_action IN VARCHAR2,
55 x_rowid IN VARCHAR2 DEFAULT NULL,
56 x_course_cd IN VARCHAR2 DEFAULT NULL,
57 x_crv_version_number IN NUMBER DEFAULT NULL,
58 x_yr_num IN NUMBER DEFAULT NULL,
59 x_effective_start_dt IN DATE DEFAULT NULL,
60 x_unit_cd IN VARCHAR2 DEFAULT NULL,
61 x_uv_version_number IN NUMBER DEFAULT NULL,
62 x_creation_date IN DATE DEFAULT NULL,
63 x_created_by IN NUMBER DEFAULT NULL,
64 x_last_update_date IN DATE DEFAULT NULL,
65 x_last_updated_by IN NUMBER DEFAULT NULL,
66 x_last_update_login IN NUMBER DEFAULT NULL
67 ) ;
68
69 end IGS_PS_ANL_LOAD_U_LN_PKG;