DBA Data[Home] [Help]

APPS.PER_CONTACT_INFO_TYPES_PKG dependencies on PER_CONTACT_INFO_TYPES

Line 1: PACKAGE BODY per_contact_info_types_pkg AS

1: PACKAGE BODY per_contact_info_types_pkg AS
2: /* $Header: pecit01t.pkb 115.6 2002/12/04 12:18:16 pkakar noship $ */
3: -- +-------------------------------------------------------------------------+
4: -- | Global variables |
5: -- +-------------------------------------------------------------------------+

Line 43: x_active_inactive_flag IN per_contact_info_types.active_inactive_flag%TYPE) IS

39: --
40: -- {End Of Comments}
41: -- ---------------------------------------------------------------------------
42: PROCEDURE chk_active_inactive_flag(
43: x_active_inactive_flag IN per_contact_info_types.active_inactive_flag%TYPE) IS
44: BEGIN
45:
46: -- = Raise an error when specified active_inactive_flag is not 'Y' or 'N'.
47: IF x_active_inactive_flag NOT IN ('Y','N') THEN

Line 97: x_multiple_occurences_flag IN per_contact_info_types.multiple_occurences_flag%TYPE) IS

93: --
94: -- {End Of Comments}
95: -- ---------------------------------------------------------------------------
96: PROCEDURE chk_multiple_occurences_flag(
97: x_multiple_occurences_flag IN per_contact_info_types.multiple_occurences_flag%TYPE) IS
98: BEGIN
99:
100: -- = Raise an error when specified multiple_occurences_flag is not 'Y' or 'N'.
101: IF x_multiple_occurences_flag NOT IN ('Y','N') THEN

Line 152: x_information_type IN per_contact_info_types.information_type%TYPE,

148: --
149: -- {End Of Comments}
150: -- ---------------------------------------------------------------------------
151: PROCEDURE chk_update_mltpl_occrncs_flg(
152: x_information_type IN per_contact_info_types.information_type%TYPE,
153: x_multiple_occurences_flag IN per_contact_info_types.multiple_occurences_flag%TYPE) IS
154: --
155: CURSOR cel_old_value(
156: p_information_type IN per_contact_info_types.information_type%TYPE) IS

Line 153: x_multiple_occurences_flag IN per_contact_info_types.multiple_occurences_flag%TYPE) IS

149: -- {End Of Comments}
150: -- ---------------------------------------------------------------------------
151: PROCEDURE chk_update_mltpl_occrncs_flg(
152: x_information_type IN per_contact_info_types.information_type%TYPE,
153: x_multiple_occurences_flag IN per_contact_info_types.multiple_occurences_flag%TYPE) IS
154: --
155: CURSOR cel_old_value(
156: p_information_type IN per_contact_info_types.information_type%TYPE) IS
157: SELECT multiple_occurences_flag

Line 156: p_information_type IN per_contact_info_types.information_type%TYPE) IS

152: x_information_type IN per_contact_info_types.information_type%TYPE,
153: x_multiple_occurences_flag IN per_contact_info_types.multiple_occurences_flag%TYPE) IS
154: --
155: CURSOR cel_old_value(
156: p_information_type IN per_contact_info_types.information_type%TYPE) IS
157: SELECT multiple_occurences_flag
158: FROM per_contact_info_types
159: WHERE information_type = p_information_type;
160: --

Line 158: FROM per_contact_info_types

154: --
155: CURSOR cel_old_value(
156: p_information_type IN per_contact_info_types.information_type%TYPE) IS
157: SELECT multiple_occurences_flag
158: FROM per_contact_info_types
159: WHERE information_type = p_information_type;
160: --
161: l_old_value per_contact_info_types.multiple_occurences_flag%TYPE;
162: --

Line 161: l_old_value per_contact_info_types.multiple_occurences_flag%TYPE;

157: SELECT multiple_occurences_flag
158: FROM per_contact_info_types
159: WHERE information_type = p_information_type;
160: --
161: l_old_value per_contact_info_types.multiple_occurences_flag%TYPE;
162: --
163: BEGIN
164:
165: -- = Validate only when multiple_occurences_flag is updated to 'Y'.

Line 273: FROM per_contact_info_types

269: x_object_version_number IN NUMBER) IS
270: --
271: CURSOR c IS
272: SELECT ROWID
273: FROM per_contact_info_types
274: WHERE information_type = x_information_type;
275: --
276: BEGIN
277: --

Line 284: INSERT INTO per_contact_info_types(

280: --
281: chk_multiple_occurences_flag(
282: x_multiple_occurences_flag => x_multiple_occurences_flag);
283: --
284: INSERT INTO per_contact_info_types(
285: information_type,
286: active_inactive_flag,
287: multiple_occurences_flag,
288: legislation_code,

Line 315: INSERT INTO per_contact_info_types_tl(

311: -- x_program_id,
312: -- x_program_update_date,
313: x_object_version_number);
314: --
315: INSERT INTO per_contact_info_types_tl(
316: information_type,
317: language,
318: source_lang,
319: description,

Line 339: FROM per_contact_info_types_tl t

335: FROM fnd_languages l
336: WHERE l.installed_flag IN ('I','B')
337: AND NOT EXISTS(
338: SELECT NULL
339: FROM per_contact_info_types_tl t
340: WHERE t.information_type = x_information_type
341: AND t.language = l.language_code);
342: --
343: OPEN c;

Line 410: FROM per_contact_info_types

406: active_inactive_flag,
407: multiple_occurences_flag,
408: legislation_code,
409: object_version_number
410: FROM per_contact_info_types
411: WHERE information_type = x_information_type
412: FOR UPDATE OF information_type NOWAIT;
413: --
414: recinfo c%ROWTYPE;

Line 421: FROM per_contact_info_types_tl

417: SELECT
418: description,
419: DECODE(language,USERENV('LANG'),'Y',
420: 'N') baselang
421: FROM per_contact_info_types_tl
422: WHERE information_type = x_information_type
423: AND USERENV('LANG') IN (language,source_lang)
424: FOR UPDATE OF information_type NOWAIT;
425: --

Line 575: FROM per_contact_info_types

571: x_object_version_number IN OUT NOCOPY NUMBER) IS
572: --
573: CURSOR get_object_version_number IS
574: SELECT NVL(MAX(object_version_number),0)+1
575: FROM per_contact_info_types
576: WHERE information_type = x_information_type;
577: --
578: l_ovn NUMBER;
579: BEGIN

Line 595: UPDATE per_contact_info_types

591: OPEN get_object_version_number;
592: FETCH get_object_version_number INTO l_ovn;
593: CLOSE get_object_version_number;
594: --
595: UPDATE per_contact_info_types
596: SET
597: active_inactive_flag = x_active_inactive_flag,
598: multiple_occurences_flag = x_multiple_occurences_flag,
599: legislation_code = x_legislation_code,

Line 618: UPDATE per_contact_info_types_tl

614: END IF;
615: -- =
616:
617: --
618: UPDATE per_contact_info_types_tl
619: SET
620: description = x_description,
621: last_update_date = x_last_update_date,
622: last_updated_by = x_last_updated_by,

Line 679: DELETE FROM per_contact_info_types_tl

675: --
676: DELETE FROM per_contact_extra_info_f
677: WHERE information_type = x_information_type;
678: --
679: DELETE FROM per_contact_info_types_tl
680: WHERE information_type = x_information_type;
681: --
682:
683: -- = Raise error when the specified information type does not exist.

Line 690: DELETE FROM per_contact_info_types

686: END IF;
687: -- =
688:
689: --
690: DELETE FROM per_contact_info_types
691: WHERE information_type = x_information_type;
692: --
693:
694: -- = Raise error when the row for the language of user's environment does

Line 753: l_proc VARCHAR2(61) := 'PER_CONTACT_INFO_TYPES_PKG.LOAD_ROW';

749: x_legislation_code IN VARCHAR2,
750: x_object_version_number IN NUMBER,
751: x_owner IN VARCHAR2) IS
752: --
753: l_proc VARCHAR2(61) := 'PER_CONTACT_INFO_TYPES_PKG.LOAD_ROW';
754: l_rowid ROWID;
755: l_request_id per_contact_info_types.request_id%TYPE;
756: l_program_application_id per_contact_info_types.program_application_id%TYPE;
757: l_program_id per_contact_info_types.program_id%TYPE;

Line 755: l_request_id per_contact_info_types.request_id%TYPE;

751: x_owner IN VARCHAR2) IS
752: --
753: l_proc VARCHAR2(61) := 'PER_CONTACT_INFO_TYPES_PKG.LOAD_ROW';
754: l_rowid ROWID;
755: l_request_id per_contact_info_types.request_id%TYPE;
756: l_program_application_id per_contact_info_types.program_application_id%TYPE;
757: l_program_id per_contact_info_types.program_id%TYPE;
758: l_program_update_date per_contact_info_types.program_update_date%TYPE;
759: l_created_by per_contact_info_types.created_by%TYPE := 0;

Line 756: l_program_application_id per_contact_info_types.program_application_id%TYPE;

752: --
753: l_proc VARCHAR2(61) := 'PER_CONTACT_INFO_TYPES_PKG.LOAD_ROW';
754: l_rowid ROWID;
755: l_request_id per_contact_info_types.request_id%TYPE;
756: l_program_application_id per_contact_info_types.program_application_id%TYPE;
757: l_program_id per_contact_info_types.program_id%TYPE;
758: l_program_update_date per_contact_info_types.program_update_date%TYPE;
759: l_created_by per_contact_info_types.created_by%TYPE := 0;
760: l_creation_date per_contact_info_types.creation_date%TYPE := SYSDATE;

Line 757: l_program_id per_contact_info_types.program_id%TYPE;

753: l_proc VARCHAR2(61) := 'PER_CONTACT_INFO_TYPES_PKG.LOAD_ROW';
754: l_rowid ROWID;
755: l_request_id per_contact_info_types.request_id%TYPE;
756: l_program_application_id per_contact_info_types.program_application_id%TYPE;
757: l_program_id per_contact_info_types.program_id%TYPE;
758: l_program_update_date per_contact_info_types.program_update_date%TYPE;
759: l_created_by per_contact_info_types.created_by%TYPE := 0;
760: l_creation_date per_contact_info_types.creation_date%TYPE := SYSDATE;
761: l_last_update_date per_contact_info_types.last_update_date%TYPE := SYSDATE;

Line 758: l_program_update_date per_contact_info_types.program_update_date%TYPE;

754: l_rowid ROWID;
755: l_request_id per_contact_info_types.request_id%TYPE;
756: l_program_application_id per_contact_info_types.program_application_id%TYPE;
757: l_program_id per_contact_info_types.program_id%TYPE;
758: l_program_update_date per_contact_info_types.program_update_date%TYPE;
759: l_created_by per_contact_info_types.created_by%TYPE := 0;
760: l_creation_date per_contact_info_types.creation_date%TYPE := SYSDATE;
761: l_last_update_date per_contact_info_types.last_update_date%TYPE := SYSDATE;
762: l_last_updated_by per_contact_info_types.last_updated_by%TYPE := 0;

Line 759: l_created_by per_contact_info_types.created_by%TYPE := 0;

755: l_request_id per_contact_info_types.request_id%TYPE;
756: l_program_application_id per_contact_info_types.program_application_id%TYPE;
757: l_program_id per_contact_info_types.program_id%TYPE;
758: l_program_update_date per_contact_info_types.program_update_date%TYPE;
759: l_created_by per_contact_info_types.created_by%TYPE := 0;
760: l_creation_date per_contact_info_types.creation_date%TYPE := SYSDATE;
761: l_last_update_date per_contact_info_types.last_update_date%TYPE := SYSDATE;
762: l_last_updated_by per_contact_info_types.last_updated_by%TYPE := 0;
763: l_last_update_login per_contact_info_types.last_update_login%TYPE := 0;

Line 760: l_creation_date per_contact_info_types.creation_date%TYPE := SYSDATE;

756: l_program_application_id per_contact_info_types.program_application_id%TYPE;
757: l_program_id per_contact_info_types.program_id%TYPE;
758: l_program_update_date per_contact_info_types.program_update_date%TYPE;
759: l_created_by per_contact_info_types.created_by%TYPE := 0;
760: l_creation_date per_contact_info_types.creation_date%TYPE := SYSDATE;
761: l_last_update_date per_contact_info_types.last_update_date%TYPE := SYSDATE;
762: l_last_updated_by per_contact_info_types.last_updated_by%TYPE := 0;
763: l_last_update_login per_contact_info_types.last_update_login%TYPE := 0;
764: l_object_version_number per_contact_info_types.object_version_number%TYPE;

Line 761: l_last_update_date per_contact_info_types.last_update_date%TYPE := SYSDATE;

757: l_program_id per_contact_info_types.program_id%TYPE;
758: l_program_update_date per_contact_info_types.program_update_date%TYPE;
759: l_created_by per_contact_info_types.created_by%TYPE := 0;
760: l_creation_date per_contact_info_types.creation_date%TYPE := SYSDATE;
761: l_last_update_date per_contact_info_types.last_update_date%TYPE := SYSDATE;
762: l_last_updated_by per_contact_info_types.last_updated_by%TYPE := 0;
763: l_last_update_login per_contact_info_types.last_update_login%TYPE := 0;
764: l_object_version_number per_contact_info_types.object_version_number%TYPE;
765: --

Line 762: l_last_updated_by per_contact_info_types.last_updated_by%TYPE := 0;

758: l_program_update_date per_contact_info_types.program_update_date%TYPE;
759: l_created_by per_contact_info_types.created_by%TYPE := 0;
760: l_creation_date per_contact_info_types.creation_date%TYPE := SYSDATE;
761: l_last_update_date per_contact_info_types.last_update_date%TYPE := SYSDATE;
762: l_last_updated_by per_contact_info_types.last_updated_by%TYPE := 0;
763: l_last_update_login per_contact_info_types.last_update_login%TYPE := 0;
764: l_object_version_number per_contact_info_types.object_version_number%TYPE;
765: --
766: BEGIN

Line 763: l_last_update_login per_contact_info_types.last_update_login%TYPE := 0;

759: l_created_by per_contact_info_types.created_by%TYPE := 0;
760: l_creation_date per_contact_info_types.creation_date%TYPE := SYSDATE;
761: l_last_update_date per_contact_info_types.last_update_date%TYPE := SYSDATE;
762: l_last_updated_by per_contact_info_types.last_updated_by%TYPE := 0;
763: l_last_update_login per_contact_info_types.last_update_login%TYPE := 0;
764: l_object_version_number per_contact_info_types.object_version_number%TYPE;
765: --
766: BEGIN
767: --

Line 764: l_object_version_number per_contact_info_types.object_version_number%TYPE;

760: l_creation_date per_contact_info_types.creation_date%TYPE := SYSDATE;
761: l_last_update_date per_contact_info_types.last_update_date%TYPE := SYSDATE;
762: l_last_updated_by per_contact_info_types.last_updated_by%TYPE := 0;
763: l_last_update_login per_contact_info_types.last_update_login%TYPE := 0;
764: l_object_version_number per_contact_info_types.object_version_number%TYPE;
765: --
766: BEGIN
767: --
768: -- Translate developer keys to internal parameters.

Line 862: UPDATE per_contact_info_types_tl SET

858: x_description IN VARCHAR2,
859: x_owner IN VARCHAR2) IS
860: BEGIN
861: --
862: UPDATE per_contact_info_types_tl SET
863: description = x_description,
864: last_update_date = SYSDATE,
865: last_updated_by = DECODE(x_owner,'SEED',1,0),
866: last_update_login = 0,

Line 906: DELETE FROM per_contact_info_types_tl pcitt

902: -- ---------------------------------------------------------------------------
903: PROCEDURE add_language IS
904: BEGIN
905: --
906: DELETE FROM per_contact_info_types_tl pcitt
907: WHERE NOT EXISTS(
908: SELECT NULL FROM per_contact_info_types pcit
909: WHERE pcit.information_type = pcitt.information_type);
910: --

Line 908: SELECT NULL FROM per_contact_info_types pcit

904: BEGIN
905: --
906: DELETE FROM per_contact_info_types_tl pcitt
907: WHERE NOT EXISTS(
908: SELECT NULL FROM per_contact_info_types pcit
909: WHERE pcit.information_type = pcitt.information_type);
910: --
911: UPDATE per_contact_info_types_tl pcitt_t SET
912: description = (SELECT pcitt_b.description

Line 911: UPDATE per_contact_info_types_tl pcitt_t SET

907: WHERE NOT EXISTS(
908: SELECT NULL FROM per_contact_info_types pcit
909: WHERE pcit.information_type = pcitt.information_type);
910: --
911: UPDATE per_contact_info_types_tl pcitt_t SET
912: description = (SELECT pcitt_b.description
913: FROM per_contact_info_types_tl pcitt_b
914: WHERE pcitt_b.information_type = pcitt_t.information_type
915: AND pcitt_b.language = pcitt_t.source_lang)

Line 913: FROM per_contact_info_types_tl pcitt_b

909: WHERE pcit.information_type = pcitt.information_type);
910: --
911: UPDATE per_contact_info_types_tl pcitt_t SET
912: description = (SELECT pcitt_b.description
913: FROM per_contact_info_types_tl pcitt_b
914: WHERE pcitt_b.information_type = pcitt_t.information_type
915: AND pcitt_b.language = pcitt_t.source_lang)
916: WHERE (pcitt_t.information_type, pcitt_t.language) IN
917: (SELECT pcitt_sub_t.information_type, pcitt_sub_t.language

Line 918: FROM per_contact_info_types_tl pcitt_sub_b, per_contact_info_types_tl pcitt_sub_t

914: WHERE pcitt_b.information_type = pcitt_t.information_type
915: AND pcitt_b.language = pcitt_t.source_lang)
916: WHERE (pcitt_t.information_type, pcitt_t.language) IN
917: (SELECT pcitt_sub_t.information_type, pcitt_sub_t.language
918: FROM per_contact_info_types_tl pcitt_sub_b, per_contact_info_types_tl pcitt_sub_t
919: WHERE pcitt_sub_b.information_type = pcitt_sub_t.information_type
920: AND pcitt_sub_b.language = pcitt_sub_t.source_lang
921: AND (pcitt_sub_b.description <> pcitt_sub_t.description
922: OR (pcitt_sub_b.description IS NULL AND pcitt_sub_t.description IS NOT NULL)

Line 925: INSERT INTO per_contact_info_types_tl(

921: AND (pcitt_sub_b.description <> pcitt_sub_t.description
922: OR (pcitt_sub_b.description IS NULL AND pcitt_sub_t.description IS NOT NULL)
923: OR (pcitt_sub_b.description IS NOT NULL AND pcitt_sub_t.description IS NULL)));
924: --
925: INSERT INTO per_contact_info_types_tl(
926: information_type,
927: language,
928: source_lang,
929: description,

Line 946: per_contact_info_types_tl pcitt,

942: pcitt.last_update_login,
943: pcitt.created_by,
944: pcitt.creation_date
945: FROM
946: per_contact_info_types_tl pcitt,
947: fnd_languages fl
948: WHERE fl.installed_flag IN ('I', 'B')
949: AND pcitt.language = USERENV('LANG')
950: AND NOT EXISTS(

Line 951: SELECT NULL FROM per_contact_info_types_tl pcitt_t

947: fnd_languages fl
948: WHERE fl.installed_flag IN ('I', 'B')
949: AND pcitt.language = USERENV('LANG')
950: AND NOT EXISTS(
951: SELECT NULL FROM per_contact_info_types_tl pcitt_t
952: WHERE pcitt_t.information_type = pcitt.information_type
953: AND pcitt_t.language = fl.language_code);
954: --
955: END add_language;

Line 1037: l_package_name VARCHAR2(80) := 'PER_CONTACT_INFO_TYPES_PKG.VALIDATE_TRANSLATION';

1033: information_type IN VARCHAR2,
1034: language IN VARCHAR2,
1035: description IN VARCHAR2) IS
1036: --
1037: l_package_name VARCHAR2(80) := 'PER_CONTACT_INFO_TYPES_PKG.VALIDATE_TRANSLATION';
1038: --
1039: CURSOR c_translation(
1040: p_language IN VARCHAR2,
1041: p_description IN VARCHAR2,

Line 1044: per_contact_info_types_tl citt,

1040: p_language IN VARCHAR2,
1041: p_description IN VARCHAR2,
1042: p_information_type IN VARCHAR2) IS
1043: SELECT 1 FROM
1044: per_contact_info_types_tl citt,
1045: per_contact_info_types cit
1046: WHERE UPPER(citt.description) = UPPER(p_description)
1047: AND citt.information_type = cit.information_type
1048: AND citt.language = p_language

Line 1045: per_contact_info_types cit

1041: p_description IN VARCHAR2,
1042: p_information_type IN VARCHAR2) IS
1043: SELECT 1 FROM
1044: per_contact_info_types_tl citt,
1045: per_contact_info_types cit
1046: WHERE UPPER(citt.description) = UPPER(p_description)
1047: AND citt.information_type = cit.information_type
1048: AND citt.language = p_language
1049: AND (cit.information_type <> p_information_type

Line 1093: END per_contact_info_types_pkg;

1089: procedure_name => 'Leaving:' || l_package_name,
1090: stage => 80);
1091: --
1092: END validate_translation;
1093: END per_contact_info_types_pkg;