APPS.HZ_EDUCATION_PKG dependencies on HZ_EDUCATION

Line 1: PACKAGE BODY HZ_EDUCATION_PKG as

1: PACKAGE BODY HZ_EDUCATION_PKG as
2: /* $Header: ARHPEDTB.pls 120.6 2005/10/30 04:22:09 appldev ship $ */
3:
4:
5: PROCEDURE Insert_Row(

Line 27: INSERT INTO HZ_EDUCATION(

23:
24: BEGIN
25: WHILE l_success = 'N' LOOP
26: BEGIN
27: INSERT INTO HZ_EDUCATION(
28: EDUCATION_ID,
29: COURSE_MAJOR,
30: PARTY_ID,
31: SCHOOL_PARTY_ID,

Line 52: decode( x_EDUCATION_ID, FND_API.G_MISS_NUM, HZ_EDUCATION_S.NEXTVAL, NULL, HZ_EDUCATION_S.NEXTVAL, X_EDUCATION_ID ),

48: CREATED_BY_MODULE,
49: APPLICATION_ID
50:
51: ) VALUES (
52: decode( x_EDUCATION_ID, FND_API.G_MISS_NUM, HZ_EDUCATION_S.NEXTVAL, NULL, HZ_EDUCATION_S.NEXTVAL, X_EDUCATION_ID ),
53: decode( x_COURSE_MAJOR, FND_API.G_MISS_CHAR, NULL,x_COURSE_MAJOR),
54: decode( x_PARTY_ID, FND_API.G_MISS_NUM, NULL,x_PARTY_ID),
55: decode( x_SCHOOL_PARTY_ID, FND_API.G_MISS_NUM, NULL,x_SCHOOL_PARTY_ID),
56: decode( x_DEGREE_RECEIVED, FND_API.G_MISS_CHAR, NULL,x_DEGREE_RECEIVED),

Line 85: IF INSTRB( SQLERRM, 'HZ_EDUCATION_U1' ) <> 0 OR

81: l_success := 'Y';
82:
83: EXCEPTION
84: WHEN DUP_VAL_ON_INDEX THEN
85: IF INSTRB( SQLERRM, 'HZ_EDUCATION_U1' ) <> 0 OR
86: INSTRB( SQLERRM, 'HZ_EDUCATION_PK' ) <> 0
87: THEN
88: DECLARE
89: l_count NUMBER;

Line 86: INSTRB( SQLERRM, 'HZ_EDUCATION_PK' ) <> 0

82:
83: EXCEPTION
84: WHEN DUP_VAL_ON_INDEX THEN
85: IF INSTRB( SQLERRM, 'HZ_EDUCATION_U1' ) <> 0 OR
86: INSTRB( SQLERRM, 'HZ_EDUCATION_PK' ) <> 0
87: THEN
88: DECLARE
89: l_count NUMBER;
90: l_dummy VARCHAR2(1);

Line 94: SELECT HZ_EDUCATION_S.NEXTVAL

90: l_dummy VARCHAR2(1);
91: BEGIN
92: l_count := 1;
93: WHILE l_count > 0 LOOP
94: SELECT HZ_EDUCATION_S.NEXTVAL
95: INTO X_EDUCATION_ID FROM dual;
96: BEGIN
97: SELECT 'Y' INTO l_dummy
98: FROM HZ_EDUCATION

Line 98: FROM HZ_EDUCATION

94: SELECT HZ_EDUCATION_S.NEXTVAL
95: INTO X_EDUCATION_ID FROM dual;
96: BEGIN
97: SELECT 'Y' INTO l_dummy
98: FROM HZ_EDUCATION
99: WHERE EDUCATION_ID = EDUCATION_ID;
100: l_count := 1;
101: EXCEPTION
102: WHEN NO_DATA_FOUND THEN

Line 122: DELETE FROM HZ_EDUCATION

118:
119: PROCEDURE Delete_Row( x_EDUCATION_ID NUMBER
120: ) IS
121: BEGIN
122: DELETE FROM HZ_EDUCATION
123: WHERE EDUCATION_ID = x_EDUCATION_ID;
124: If (SQL%NOTFOUND) then
125: RAISE NO_DATA_FOUND;
126: End If;

Line 149: Update HZ_EDUCATION

145: x_APPLICATION_ID IN NUMBER
146:
147: ) IS
148: BEGIN
149: Update HZ_EDUCATION
150: SET
151: EDUCATION_ID = decode( x_EDUCATION_ID, NULL, EDUCATION_ID, FND_API.G_MISS_NUM, NULL, x_EDUCATION_ID),
152: COURSE_MAJOR = decode( x_COURSE_MAJOR, NULL, COURSE_MAJOR, FND_API.G_MISS_CHAR,NULL, x_COURSE_MAJOR),
153: PARTY_ID = decode( x_PARTY_ID, NULL, PARTY_ID, FND_API.G_MISS_NUM, NULL, x_PARTY_ID),

Line 208: FROM HZ_EDUCATION

204:
205: ) IS
206: CURSOR C IS
207: SELECT *
208: FROM HZ_EDUCATION
209: WHERE rowid = x_Rowid
210: FOR UPDATE of EDUCATION_ID NOWAIT;
211: Recinfo C%ROWTYPE;
212: BEGIN

Line 334: FROM HZ_EDUCATION

330: x_type_of_school,
331: x_status,
332: x_application_id,
333: x_created_by_module
334: FROM HZ_EDUCATION
335: WHERE education_id = x_education_id;
336:
337: EXCEPTION
338: WHEN NO_DATA_FOUND THEN

Line 348: END HZ_EDUCATION_PKG;

344:
345: END Select_Row;
346:
347:
348: END HZ_EDUCATION_PKG;