APPS.PER_BOOKINGS_PKG dependencies on PER_BOOKINGS

Line 1: PACKAGE BODY PER_BOOKINGS_PKG as

1: PACKAGE BODY PER_BOOKINGS_PKG as
2: /* $Header: pebkg01t.pkb 120.2 2008/01/02 08:06:23 uuddavol ship $ */
3: /*
4:
5: 25-JUL-95 AForte 70.3 Changed tokenised message

Line 134: SELECT rowid FROM PER_BOOKINGS

130:
131: L_DUMMY NUMBER;
132:
133: CURSOR C IS
134: SELECT rowid FROM PER_BOOKINGS
135: WHERE booking_id = X_Booking_Id;
136:
137: CURSOR C2 IS
138: SELECT PER_BOOKINGS_S.NEXTVAL

Line 138: SELECT PER_BOOKINGS_S.NEXTVAL

134: SELECT rowid FROM PER_BOOKINGS
135: WHERE booking_id = X_Booking_Id;
136:
137: CURSOR C2 IS
138: SELECT PER_BOOKINGS_S.NEXTVAL
139: FROM SYS.DUAL;
140:
141: CURSOR UNIQUE_CHECK IS
142: SELECT 1

Line 143: FROM PER_BOOKINGS PB

139: FROM SYS.DUAL;
140:
141: CURSOR UNIQUE_CHECK IS
142: SELECT 1
143: FROM PER_BOOKINGS PB
144: WHERE (PB.ROWID <> X_Rowid OR X_Rowid IS NULL)
145: AND PB.PERSON_ID = X_PERSON_ID
146: AND PB.BUSINESS_GROUP_ID + 0 = X_BUSINESS_GROUP_ID
147: AND PB.EVENT_ID = X_EVENT_ID;

Line 170: INSERT INTO PER_BOOKINGS(

166: OPEN C2;
167: FETCH C2 INTO X_Booking_Id;
168: CLOSE C2;
169:
170: INSERT INTO PER_BOOKINGS(
171: booking_id,
172: business_group_id,
173: person_id,
174: event_id,

Line 272: FROM PER_BOOKINGS

268: ) IS
269:
270: CURSOR C IS
271: SELECT *
272: FROM PER_BOOKINGS
273: WHERE rowid = X_Rowid
274: FOR UPDATE of Booking_Id NOWAIT;
275: Recinfo C%ROWTYPE;
276: BEGIN

Line 437: FROM PER_BOOKINGS PB

433: L_DUMMY NUMBER;
434:
435: CURSOR UNIQUE_CHECK IS
436: SELECT 1
437: FROM PER_BOOKINGS PB
438: WHERE (PB.ROWID <> X_Rowid OR X_Rowid IS NULL)
439: AND PB.PERSON_ID = X_PERSON_ID
440: AND PB.BUSINESS_GROUP_ID + 0 = X_BUSINESS_GROUP_ID
441: AND PB.EVENT_ID = X_EVENT_ID;

Line 461: UPDATE PER_BOOKINGS

457: ELSE
458: CLOSE UNIQUE_CHECK;
459: END IF;
460:
461: UPDATE PER_BOOKINGS
462: SET
463:
464: booking_id = X_Booking_Id,
465: business_group_id = X_Business_Group_Id,

Line 504: DELETE FROM PER_BOOKINGS

500: END Update_Row;
501:
502: PROCEDURE Delete_Row(X_Rowid VARCHAR2) IS
503: BEGIN
504: DELETE FROM PER_BOOKINGS
505: WHERE rowid = X_Rowid;
506:
507: if (SQL%NOTFOUND) then
508: HR_UTILITY.SET_MESSAGE(801,'HR_6153_ALL_PROCEDURE_FAIL');

Line 515: END PER_BOOKINGS_PKG;

511: HR_UTILITY.RAISE_ERROR;
512: end if;
513: END Delete_Row;
514:
515: END PER_BOOKINGS_PKG;