164: --
165: -- When not found, raise error.
166: --
167: if l_elm_rec.element_type_id is NULL then
168: hr_utility.set_message(801,'HR_7478_PLK_INCONSISTENT_ELE');
169: hr_utility.set_message_token('ELEMENT_TYPE_ID',NULL);
170: hr_utility.set_message_token('ELEMENT_NAME',p_elm_code_tbl(l_index));
171: hr_utility.raise_error;
172: else
165: -- When not found, raise error.
166: --
167: if l_elm_rec.element_type_id is NULL then
168: hr_utility.set_message(801,'HR_7478_PLK_INCONSISTENT_ELE');
169: hr_utility.set_message_token('ELEMENT_TYPE_ID',NULL);
170: hr_utility.set_message_token('ELEMENT_NAME',p_elm_code_tbl(l_index));
171: hr_utility.raise_error;
172: else
173: p_elm_rec_tbl(l_elm_rec.element_type_id).element_code := p_elm_code_tbl(l_index);
166: --
167: if l_elm_rec.element_type_id is NULL then
168: hr_utility.set_message(801,'HR_7478_PLK_INCONSISTENT_ELE');
169: hr_utility.set_message_token('ELEMENT_TYPE_ID',NULL);
170: hr_utility.set_message_token('ELEMENT_NAME',p_elm_code_tbl(l_index));
171: hr_utility.raise_error;
172: else
173: p_elm_rec_tbl(l_elm_rec.element_type_id).element_code := p_elm_code_tbl(l_index);
174: p_elm_rec_tbl(l_elm_rec.element_type_id).input_currency_code := l_elm_rec.input_currency_code;
167: if l_elm_rec.element_type_id is NULL then
168: hr_utility.set_message(801,'HR_7478_PLK_INCONSISTENT_ELE');
169: hr_utility.set_message_token('ELEMENT_TYPE_ID',NULL);
170: hr_utility.set_message_token('ELEMENT_NAME',p_elm_code_tbl(l_index));
171: hr_utility.raise_error;
172: else
173: p_elm_rec_tbl(l_elm_rec.element_type_id).element_code := p_elm_code_tbl(l_index);
174: p_elm_rec_tbl(l_elm_rec.element_type_id).input_currency_code := l_elm_rec.input_currency_code;
175: p_elm_rec_tbl(l_elm_rec.element_type_id).multiple_entries_allowed_flag := l_elm_rec.multiple_entries_allowed_flag;
313: p_assignment_id => p_assignment_id,
314: p_element_type_id => l_element_type_id,
315: p_session_date => p_effective_date);
316: if p_element_link_id is NULL then
317: hr_utility.set_message(801,'HR_7027_ELE_ENTRY_EL_NOT_EXST');
318: hr_utility.set_message_token('DATE',fnd_date.date_to_displaydate(p_effective_date));
319: hr_utility.raise_error;
320: end if;
321: --
314: p_element_type_id => l_element_type_id,
315: p_session_date => p_effective_date);
316: if p_element_link_id is NULL then
317: hr_utility.set_message(801,'HR_7027_ELE_ENTRY_EL_NOT_EXST');
318: hr_utility.set_message_token('DATE',fnd_date.date_to_displaydate(p_effective_date));
319: hr_utility.raise_error;
320: end if;
321: --
322: -- At first, checks whether the entry is available.
315: p_session_date => p_effective_date);
316: if p_element_link_id is NULL then
317: hr_utility.set_message(801,'HR_7027_ELE_ENTRY_EL_NOT_EXST');
318: hr_utility.set_message_token('DATE',fnd_date.date_to_displaydate(p_effective_date));
319: hr_utility.raise_error;
320: end if;
321: --
322: -- At first, checks whether the entry is available.
323: --
527: open csr_iv;
528: fetch csr_iv into l_rec;
529: If csr_iv%NOTFOUND then
530: close csr_iv;
531: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
532: hr_utility.set_message_token('PROCEDURE','hr_entry.check_format');
533: hr_utility.set_message_token('STEP','1');
534: hr_utility.raise_error;
535: End If;
528: fetch csr_iv into l_rec;
529: If csr_iv%NOTFOUND then
530: close csr_iv;
531: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
532: hr_utility.set_message_token('PROCEDURE','hr_entry.check_format');
533: hr_utility.set_message_token('STEP','1');
534: hr_utility.raise_error;
535: End If;
536: close csr_iv;
529: If csr_iv%NOTFOUND then
530: close csr_iv;
531: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
532: hr_utility.set_message_token('PROCEDURE','hr_entry.check_format');
533: hr_utility.set_message_token('STEP','1');
534: hr_utility.raise_error;
535: End If;
536: close csr_iv;
537: --
530: close csr_iv;
531: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
532: hr_utility.set_message_token('PROCEDURE','hr_entry.check_format');
533: hr_utility.set_message_token('STEP','1');
534: hr_utility.raise_error;
535: End If;
536: close csr_iv;
537: --
538: -- When user entered value is NULL.
545: --
546: -- When not hot defaulted.
547: --
548: If l_rec.hot_default_flag = 'N' then
549: hr_utility.set_message(801,'HR_6127_ELE_ENTRY_VALUE_MAND');
550: hr_utility.set_message_token('INPUT_VALUE_NAME',l_rec.name);
551: hr_utility.raise_error;
552: --
553: -- When hot defaulted.
546: -- When not hot defaulted.
547: --
548: If l_rec.hot_default_flag = 'N' then
549: hr_utility.set_message(801,'HR_6127_ELE_ENTRY_VALUE_MAND');
550: hr_utility.set_message_token('INPUT_VALUE_NAME',l_rec.name);
551: hr_utility.raise_error;
552: --
553: -- When hot defaulted.
554: --
547: --
548: If l_rec.hot_default_flag = 'N' then
549: hr_utility.set_message(801,'HR_6127_ELE_ENTRY_VALUE_MAND');
550: hr_utility.set_message_token('INPUT_VALUE_NAME',l_rec.name);
551: hr_utility.raise_error;
552: --
553: -- When hot defaulted.
554: --
555: Else
553: -- When hot defaulted.
554: --
555: Else
556: If l_rec.default_value is NULL then
557: hr_utility.set_message(801,'HR_6128_ELE_ENTRY_MAND_HOT');
558: hr_utility.set_message_token('INPUT_VALUE_NAME',l_rec.name);
559: hr_utility.raise_error;
560: Else
561: p_canonical_value := l_rec.default_value;
554: --
555: Else
556: If l_rec.default_value is NULL then
557: hr_utility.set_message(801,'HR_6128_ELE_ENTRY_MAND_HOT');
558: hr_utility.set_message_token('INPUT_VALUE_NAME',l_rec.name);
559: hr_utility.raise_error;
560: Else
561: p_canonical_value := l_rec.default_value;
562: hr_chkfmt.changeformat(
555: Else
556: If l_rec.default_value is NULL then
557: hr_utility.set_message(801,'HR_6128_ELE_ENTRY_MAND_HOT');
558: hr_utility.set_message_token('INPUT_VALUE_NAME',l_rec.name);
559: hr_utility.raise_error;
560: Else
561: p_canonical_value := l_rec.default_value;
562: hr_chkfmt.changeformat(
563: input => p_canonical_value,
592: -- In case the value input is incorrect format.
593: --
594: when others then
595: l_d_uom := hr_general.decode_lookup('UNITS',l_rec.uom);
596: hr_utility.set_message(801,'PAY_6306_INPUT_VALUE_FORMAT');
597: hr_utility.set_message_token('UNIT_OF_MEASURE',l_d_uom);
598: hr_utility.raise_error;
599: End;
600: --
593: --
594: when others then
595: l_d_uom := hr_general.decode_lookup('UNITS',l_rec.uom);
596: hr_utility.set_message(801,'PAY_6306_INPUT_VALUE_FORMAT');
597: hr_utility.set_message_token('UNIT_OF_MEASURE',l_d_uom);
598: hr_utility.raise_error;
599: End;
600: --
601: -- Format min_value and max_value for output parameters.
594: when others then
595: l_d_uom := hr_general.decode_lookup('UNITS',l_rec.uom);
596: hr_utility.set_message(801,'PAY_6306_INPUT_VALUE_FORMAT');
597: hr_utility.set_message_token('UNIT_OF_MEASURE',l_d_uom);
598: hr_utility.raise_error;
599: End;
600: --
601: -- Format min_value and max_value for output parameters.
602: -- These parameters should be used for message only.
620: -- then raise error. In case of 'W'(Warning), Forms should warn to user
621: -- with fnd_message.warn procedure.
622: --
623: If l_min_max_status = 'F' and l_rec.warning_or_error = 'E' then
624: hr_utility.set_message(801,'PAY_JP_INPUTV_OUT_OF_RANGE');
625: hr_utility.set_message_token('MIN_VALUE',p_user_min_value);
626: hr_utility.set_message_token('MAX_VALUE',p_user_max_value);
627: hr_utility.raise_error;
628: End If;
621: -- with fnd_message.warn procedure.
622: --
623: If l_min_max_status = 'F' and l_rec.warning_or_error = 'E' then
624: hr_utility.set_message(801,'PAY_JP_INPUTV_OUT_OF_RANGE');
625: hr_utility.set_message_token('MIN_VALUE',p_user_min_value);
626: hr_utility.set_message_token('MAX_VALUE',p_user_max_value);
627: hr_utility.raise_error;
628: End If;
629: --
622: --
623: If l_min_max_status = 'F' and l_rec.warning_or_error = 'E' then
624: hr_utility.set_message(801,'PAY_JP_INPUTV_OUT_OF_RANGE');
625: hr_utility.set_message_token('MIN_VALUE',p_user_min_value);
626: hr_utility.set_message_token('MAX_VALUE',p_user_max_value);
627: hr_utility.raise_error;
628: End If;
629: --
630: -- Execute formula validation.
623: If l_min_max_status = 'F' and l_rec.warning_or_error = 'E' then
624: hr_utility.set_message(801,'PAY_JP_INPUTV_OUT_OF_RANGE');
625: hr_utility.set_message_token('MIN_VALUE',p_user_min_value);
626: hr_utility.set_message_token('MAX_VALUE',p_user_max_value);
627: hr_utility.raise_error;
628: End If;
629: --
630: -- Execute formula validation.
631: --
644: -- then raise error. In case of 'W'(Warning), Forms should warn to user
645: -- with fnd_message.warn procedure.
646: --
647: If l_formula_status = 'E' and l_rec.warning_or_error = 'E' then
648: hr_utility.set_message(801,'HR_ELE_ENTRY_FORMULA_HINT');
649: hr_utility.set_message_token('FORMULA_TEXT',p_formula_message);
650: hr_utility.raise_error;
651: End If;
652: --
645: -- with fnd_message.warn procedure.
646: --
647: If l_formula_status = 'E' and l_rec.warning_or_error = 'E' then
648: hr_utility.set_message(801,'HR_ELE_ENTRY_FORMULA_HINT');
649: hr_utility.set_message_token('FORMULA_TEXT',p_formula_message);
650: hr_utility.raise_error;
651: End If;
652: --
653: -- In case lookup_type validation is applied.
646: --
647: If l_formula_status = 'E' and l_rec.warning_or_error = 'E' then
648: hr_utility.set_message(801,'HR_ELE_ENTRY_FORMULA_HINT');
649: hr_utility.set_message_token('FORMULA_TEXT',p_formula_message);
650: hr_utility.raise_error;
651: End If;
652: --
653: -- In case lookup_type validation is applied.
654: --
659: If hr_api.not_exists_in_hr_lookups(
660: p_effective_date => p_effective_date,
661: p_lookup_type => l_rec.lookup_type,
662: p_lookup_code => p_canonical_value) then
663: hr_utility.set_message(801,'HR_7033_ELE_ENTRY_LKUP_INVLD');
664: hr_utility.set_message_token('LOOKUP_TYPE',l_rec.lookup_type);
665: hr_utility.raise_error;
666: End If;
667: End If;
660: p_effective_date => p_effective_date,
661: p_lookup_type => l_rec.lookup_type,
662: p_lookup_code => p_canonical_value) then
663: hr_utility.set_message(801,'HR_7033_ELE_ENTRY_LKUP_INVLD');
664: hr_utility.set_message_token('LOOKUP_TYPE',l_rec.lookup_type);
665: hr_utility.raise_error;
666: End If;
667: End If;
668: End If;
661: p_lookup_type => l_rec.lookup_type,
662: p_lookup_code => p_canonical_value) then
663: hr_utility.set_message(801,'HR_7033_ELE_ENTRY_LKUP_INVLD');
664: hr_utility.set_message_token('LOOKUP_TYPE',l_rec.lookup_type);
665: hr_utility.raise_error;
666: End If;
667: End If;
668: End If;
669: --
723: and p_effective_date
724: between pet.effective_start_date and pet.effective_end_date;
725: --
726: Begin
727: hr_utility.set_location('Entering:'||l_proc, 5);
728: Open C_Sel1;
729: Fetch C_Sel1 Into l_entry_type,
730: l_processing_type;
731: If C_Sel1%notfound then
729: Fetch C_Sel1 Into l_entry_type,
730: l_processing_type;
731: If C_Sel1%notfound then
732: Close C_Sel1;
733: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
734: hr_utility.set_message_token('PROCEDURE', l_proc);
735: hr_utility.set_message_token('STEP','10');
736: hr_utility.raise_error;
737: End If;
730: l_processing_type;
731: If C_Sel1%notfound then
732: Close C_Sel1;
733: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
734: hr_utility.set_message_token('PROCEDURE', l_proc);
735: hr_utility.set_message_token('STEP','10');
736: hr_utility.raise_error;
737: End If;
738: Close C_Sel1;
731: If C_Sel1%notfound then
732: Close C_Sel1;
733: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
734: hr_utility.set_message_token('PROCEDURE', l_proc);
735: hr_utility.set_message_token('STEP','10');
736: hr_utility.raise_error;
737: End If;
738: Close C_Sel1;
739: --
732: Close C_Sel1;
733: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
734: hr_utility.set_message_token('PROCEDURE', l_proc);
735: hr_utility.set_message_token('STEP','10');
736: hr_utility.raise_error;
737: End If;
738: Close C_Sel1;
739: --
740: If l_processing_type = 'N' or
757: p_update_override => p_update_override,
758: p_update_change_insert => p_update_change_insert);
759: End If;
760: --
761: hr_utility.set_location(' Leaving:'||l_proc, 10);
762: End find_dt_upd_modes;
763: --
764: -- ----------------------------------------------------------------------------
765: -- |--------------------------< find_dt_del_modes >---------------------------|
802: and p_effective_date
803: between pet.effective_start_date and pet.effective_end_date;
804: --
805: Begin
806: hr_utility.set_location('Entering:'||l_proc, 5);
807: Open C_Sel1;
808: Fetch C_Sel1 Into l_parent_key_value1,
809: l_parent_key_value2,
810: l_entry_type,
810: l_entry_type,
811: l_processing_type;
812: If C_Sel1%notfound then
813: Close C_Sel1;
814: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
815: hr_utility.set_message_token('PROCEDURE', l_proc);
816: hr_utility.set_message_token('STEP','10');
817: hr_utility.raise_error;
818: End If;
811: l_processing_type;
812: If C_Sel1%notfound then
813: Close C_Sel1;
814: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
815: hr_utility.set_message_token('PROCEDURE', l_proc);
816: hr_utility.set_message_token('STEP','10');
817: hr_utility.raise_error;
818: End If;
819: Close C_Sel1;
812: If C_Sel1%notfound then
813: Close C_Sel1;
814: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
815: hr_utility.set_message_token('PROCEDURE', l_proc);
816: hr_utility.set_message_token('STEP','10');
817: hr_utility.raise_error;
818: End If;
819: Close C_Sel1;
820: --
813: Close C_Sel1;
814: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
815: hr_utility.set_message_token('PROCEDURE', l_proc);
816: hr_utility.set_message_token('STEP','10');
817: hr_utility.raise_error;
818: End If;
819: Close C_Sel1;
820: --
821: If l_processing_type = 'N' or
844: p_future_change => p_future_change,
845: p_delete_next_change => p_delete_next_change);
846: End If;
847: --
848: hr_utility.set_location(' Leaving:'||l_proc, 10);
849: End find_dt_del_modes;
850: --
851: -- ----------------------------------------------------------------------------
852: -- |-------------------------------< ins_lck >--------------------------------|
867: l_validation_start_date date;
868: l_validation_end_date date;
869: --
870: Begin
871: hr_utility.set_location('Entering:'||l_proc, 5);
872: --
873: -- Validate the datetrack mode getting the validation start
874: -- and end dates for the specified datetrack operation.
875: --
895: --
896: p_validation_start_date := l_validation_start_date;
897: p_validation_end_date := l_validation_end_date;
898: --
899: hr_utility.set_location(' Leaving:'||l_proc, 15);
900: End ins_lck;
901: --
902: -- ----------------------------------------------------------------------------
903: -- |---------------------------------< lck >----------------------------------|
942: -- from hr_comments hc
943: -- where hc.comment_id = g_old_rec.comment_id;
944: --
945: Begin
946: hr_utility.set_location('Entering:'||l_proc, 5);
947: --
948: -- Ensure that all the mandatory arguments are not null
949: --
950: hr_api.mandatory_arg_error(p_api_name => l_proc,
975: Close C_Sel1;
976: --
977: -- The primary key is invalid therefore we must error
978: --
979: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
980: hr_utility.raise_error;
981: --
982: End If;
983: Close C_Sel1;
976: --
977: -- The primary key is invalid therefore we must error
978: --
979: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
980: hr_utility.raise_error;
981: --
982: End If;
983: Close C_Sel1;
984: --
985: -- Check if the set object version number is the same as the existing
986: -- object version number
987: --
988: If (p_object_version_number <> g_old_rec.object_version_number) Then
989: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
990: hr_utility.raise_error;
991: End If;
992: hr_utility.set_location(l_proc, 15);
993: --
986: -- object version number
987: --
988: If (p_object_version_number <> g_old_rec.object_version_number) Then
989: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
990: hr_utility.raise_error;
991: End If;
992: hr_utility.set_location(l_proc, 15);
993: --
994: -- Providing we are doing an update and a comment_id exists then
988: If (p_object_version_number <> g_old_rec.object_version_number) Then
989: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
990: hr_utility.raise_error;
991: End If;
992: hr_utility.set_location(l_proc, 15);
993: --
994: -- Providing we are doing an update and a comment_id exists then
995: -- we select the comment text.
996: --
1008: -- -- The comment_text for the specified comment_id does not exist.
1009: -- -- We must error due to data integrity problems.
1010: -- --
1011: -- Close C_Sel3;
1012: -- hr_utility.set_message(801, 'HR_7202_COMMENT_TEXT_NOT_EXIST');
1013: -- hr_utility.raise_error;
1014: -- End If;
1015: -- Close C_Sel3;
1016: -- End If;
1009: -- -- We must error due to data integrity problems.
1010: -- --
1011: -- Close C_Sel3;
1012: -- hr_utility.set_message(801, 'HR_7202_COMMENT_TEXT_NOT_EXIST');
1013: -- hr_utility.raise_error;
1014: -- End If;
1015: -- Close C_Sel3;
1016: -- End If;
1017: --
1017: --
1018: -- Validate the datetrack mode mode getting the validation start
1019: -- and end dates for the specified datetrack operation.
1020: --
1021: hr_utility.set_location('Entering validation_dt_mode', 15);
1022: dt_api.validate_dt_mode
1023: (p_effective_date => p_effective_date,
1024: p_datetrack_mode => p_datetrack_mode,
1025: p_base_table_name => 'pay_element_entries_f',
1039: -- We are doing a datetrack 'INSERT' which is illegal within this
1040: -- procedure therefore we must error (note: to lck on insert the
1041: -- private procedure ins_lck should be called).
1042: --
1043: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1044: hr_utility.set_message_token('PROCEDURE', l_proc);
1045: hr_utility.set_message_token('STEP','20');
1046: hr_utility.raise_error;
1047: --
1040: -- procedure therefore we must error (note: to lck on insert the
1041: -- private procedure ins_lck should be called).
1042: --
1043: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1044: hr_utility.set_message_token('PROCEDURE', l_proc);
1045: hr_utility.set_message_token('STEP','20');
1046: hr_utility.raise_error;
1047: --
1048: End If;
1041: -- private procedure ins_lck should be called).
1042: --
1043: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1044: hr_utility.set_message_token('PROCEDURE', l_proc);
1045: hr_utility.set_message_token('STEP','20');
1046: hr_utility.raise_error;
1047: --
1048: End If;
1049: --
1042: --
1043: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1044: hr_utility.set_message_token('PROCEDURE', l_proc);
1045: hr_utility.set_message_token('STEP','20');
1046: hr_utility.raise_error;
1047: --
1048: End If;
1049: --
1050: -- Set the validation start and end date OUT arguments
1051: --
1052: p_validation_start_date := l_validation_start_date;
1053: p_validation_end_date := l_validation_end_date;
1054: --
1055: hr_utility.set_location(' Leaving:'||l_proc, 30);
1056: --
1057: -- We need to trap the ORA LOCK exception
1058: --
1059: Exception
1061: --
1062: -- The object is locked therefore we need to supply a meaningful
1063: -- error message.
1064: --
1065: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
1066: hr_utility.set_message_token('TABLE_NAME', 'pay_element_entries_f');
1067: hr_utility.raise_error;
1068: When l_object_invalid then
1069: --
1062: -- The object is locked therefore we need to supply a meaningful
1063: -- error message.
1064: --
1065: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
1066: hr_utility.set_message_token('TABLE_NAME', 'pay_element_entries_f');
1067: hr_utility.raise_error;
1068: When l_object_invalid then
1069: --
1070: -- The object doesn't exist or is invalid
1063: -- error message.
1064: --
1065: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
1066: hr_utility.set_message_token('TABLE_NAME', 'pay_element_entries_f');
1067: hr_utility.raise_error;
1068: When l_object_invalid then
1069: --
1070: -- The object doesn't exist or is invalid
1071: --
1068: When l_object_invalid then
1069: --
1070: -- The object doesn't exist or is invalid
1071: --
1072: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
1073: hr_utility.set_message_token('TABLE_NAME', 'pay_element_entries_f');
1074: hr_utility.raise_error;
1075: End lck;
1076: --
1069: --
1070: -- The object doesn't exist or is invalid
1071: --
1072: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
1073: hr_utility.set_message_token('TABLE_NAME', 'pay_element_entries_f');
1074: hr_utility.raise_error;
1075: End lck;
1076: --
1077: -- ----------------------------------------------------------------------------
1070: -- The object doesn't exist or is invalid
1071: --
1072: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
1073: hr_utility.set_message_token('TABLE_NAME', 'pay_element_entries_f');
1074: hr_utility.raise_error;
1075: End lck;
1076: --
1077: -- ----------------------------------------------------------------------------
1078: -- |---------------------------< init_varray >--------------------------------|