APPS.HZ_EMPLOYMENT_HISTORY_PKG dependencies on HZ_EMPLOYMENT_HISTORY

Line 1: PACKAGE BODY HZ_EMPLOYMENT_HISTORY_PKG as

1: PACKAGE BODY HZ_EMPLOYMENT_HISTORY_PKG as
2: /* $Header: ARHEHITB.pls 120.7 2005/10/30 03:52:10 appldev ship $ */
3:
4:
5: PROCEDURE Insert_Row(

Line 43: INSERT INTO HZ_EMPLOYMENT_HISTORY(

39:
40: WHILE l_success = 'N' LOOP
41: BEGIN
42:
43: INSERT INTO HZ_EMPLOYMENT_HISTORY(
44: EMPLOYMENT_HISTORY_ID,
45: BEGIN_DATE,
46: PARTY_ID,
47: EMPLOYED_AS_TITLE,

Line 80: decode( x_EMPLOYMENT_HISTORY_ID, FND_API.G_MISS_NUM, HZ_EMPLOYMENT_HISTORY_S.NEXTVAL, NULL, HZ_EMPLOYMENT_HISTORY_S.NEXTVAL, x_EMPLOYMENT_HISTORY_ID ),

76: EMPLOYED_AS_TITLE_CODE,
77: WEEKLY_WORK_HOURS,
78: COMMENTS
79: ) VALUES (
80: decode( x_EMPLOYMENT_HISTORY_ID, FND_API.G_MISS_NUM, HZ_EMPLOYMENT_HISTORY_S.NEXTVAL, NULL, HZ_EMPLOYMENT_HISTORY_S.NEXTVAL, x_EMPLOYMENT_HISTORY_ID ),
81: decode( x_BEGIN_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),x_BEGIN_DATE),
82: decode( x_PARTY_ID, FND_API.G_MISS_NUM, NULL,x_PARTY_ID),
83: decode( x_EMPLOYED_AS_TITLE, FND_API.G_MISS_CHAR, NULL,x_EMPLOYED_AS_TITLE),
84: decode( x_EMPLOYED_BY_DIVISION_NAME, FND_API.G_MISS_CHAR, NULL,x_EMPLOYED_BY_DIVISION_NAME),

Line 126: IF INSTRB( SQLERRM, 'HZ_EMPLOYMENT_HISTORY_U1' ) <> 0 OR

122: l_success := 'Y';
123:
124: EXCEPTION
125: WHEN DUP_VAL_ON_INDEX THEN
126: IF INSTRB( SQLERRM, 'HZ_EMPLOYMENT_HISTORY_U1' ) <> 0 OR
127: INSTRB( SQLERRM, 'HZ_EMPLOYMENT_HISTORY_PK' ) <> 0
128: THEN
129: DECLARE
130: l_count NUMBER;

Line 127: INSTRB( SQLERRM, 'HZ_EMPLOYMENT_HISTORY_PK' ) <> 0

123:
124: EXCEPTION
125: WHEN DUP_VAL_ON_INDEX THEN
126: IF INSTRB( SQLERRM, 'HZ_EMPLOYMENT_HISTORY_U1' ) <> 0 OR
127: INSTRB( SQLERRM, 'HZ_EMPLOYMENT_HISTORY_PK' ) <> 0
128: THEN
129: DECLARE
130: l_count NUMBER;
131: l_dummy VARCHAR2(1);

Line 135: SELECT HZ_EMPLOYMENT_HISTORY_S.NEXTVAL

131: l_dummy VARCHAR2(1);
132: BEGIN
133: l_count := 1;
134: WHILE l_count > 0 LOOP
135: SELECT HZ_EMPLOYMENT_HISTORY_S.NEXTVAL
136: INTO X_EMPLOYMENT_HISTORY_ID FROM dual;
137: BEGIN
138: SELECT 'Y' INTO l_dummy
139: FROM HZ_EMPLOYMENT_HISTORY

Line 139: FROM HZ_EMPLOYMENT_HISTORY

135: SELECT HZ_EMPLOYMENT_HISTORY_S.NEXTVAL
136: INTO X_EMPLOYMENT_HISTORY_ID FROM dual;
137: BEGIN
138: SELECT 'Y' INTO l_dummy
139: FROM HZ_EMPLOYMENT_HISTORY
140: WHERE EMPLOYMENT_HISTORY_ID = EMPLOYMENT_HISTORY_ID;
141: l_count := 1;
142: EXCEPTION
143: WHEN NO_DATA_FOUND THEN

Line 163: DELETE FROM HZ_EMPLOYMENT_HISTORY

159:
160: PROCEDURE Delete_Row( x_EMPLOYMENT_HISTORY_ID NUMBER
161: ) IS
162: BEGIN
163: DELETE FROM HZ_EMPLOYMENT_HISTORY
164: WHERE EMPLOYMENT_HISTORY_ID = x_EMPLOYMENT_HISTORY_ID;
165: If (SQL%NOTFOUND) then
166: RAISE NO_DATA_FOUND;
167: End If;

Line 202: Update HZ_EMPLOYMENT_HISTORY

198: x_WEEKLY_WORK_HOURS IN NUMBER,
199: x_COMMENTS IN VARCHAR2
200: ) IS
201: BEGIN
202: Update HZ_EMPLOYMENT_HISTORY
203: SET
204: EMPLOYMENT_HISTORY_ID = decode( x_EMPLOYMENT_HISTORY_ID, NULL, EMPLOYMENT_HISTORY_ID, FND_API.G_MISS_NUM,NULL, X_EMPLOYMENT_HISTORY_ID,x_EMPLOYMENT_HISTORY_ID),
205: BEGIN_DATE = decode( x_BEGIN_DATE, NULL,BEGIN_DATE,FND_API.G_MISS_DATE,NULL,x_BEGIN_DATE),
206: PARTY_ID = decode( x_PARTY_ID, NULL,PARTY_ID,FND_API.G_MISS_NUM,NULL,x_PARTY_ID),

Line 289: FROM HZ_EMPLOYMENT_HISTORY

285: x_APPLICATION_ID IN NUMBER
286: ) IS
287: CURSOR C IS
288: SELECT *
289: FROM HZ_EMPLOYMENT_HISTORY
290: WHERE rowid = x_Rowid
291: FOR UPDATE of EMPLOYMENT_HISTORY_ID NOWAIT;
292: Recinfo C%ROWTYPE;
293: BEGIN

Line 496: FROM HZ_EMPLOYMENT_HISTORY

492: x_employment_type_code,
493: x_employed_as_title_code,
494: x_weekly_work_hours,
495: x_comments
496: FROM HZ_EMPLOYMENT_HISTORY
497: WHERE employment_history_id = x_employment_history_id;
498:
499: EXCEPTION
500: WHEN NO_DATA_FOUND THEN

Line 510: END HZ_EMPLOYMENT_HISTORY_PKG;

506:
507: END Select_Row;
508:
509:
510: END HZ_EMPLOYMENT_HISTORY_PKG;