[Home] [Help]
54: --
55: -- {End Of Comments}
56: -- ----------------------------------------------------------------------------
57: Procedure dt_update_dml
58: (p_rec in out nocopy pay_opm_shd.g_rec_type
59: ,p_effective_date in date
60: ,p_datetrack_mode in varchar2
61: ,p_validation_start_date in date
62: ,p_validation_end_date in date
79: ,p_base_key_column => 'org_payment_method_id'
80: ,p_base_key_value => p_rec.org_payment_method_id
81: );
82: --
83: pay_opm_shd.g_api_dml := true; -- Set the api dml status
84: --
85: -- Update the pay_org_payment_methods_f Row
86: --
87: update pay_org_payment_methods_f
145: where org_payment_method_id = p_rec.org_payment_method_id
146: and effective_start_date = p_validation_start_date
147: and effective_end_date = p_validation_end_date;
148: --
149: pay_opm_shd.g_api_dml := false; -- Unset the api dml status
150: --
151: -- Set the effective start and end dates
152: --
153: p_rec.effective_start_date := p_validation_start_date;
157: hr_utility.set_location(' Leaving:'||l_proc, 15);
158: Exception
159: When hr_api.check_integrity_violated Then
160: -- A check constraint has been violated
161: pay_opm_shd.g_api_dml := false; -- Unset the api dml status
162: pay_opm_shd.constraint_error
163: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
164: When hr_api.unique_integrity_violated Then
165: -- Unique integrity has been violated
158: Exception
159: When hr_api.check_integrity_violated Then
160: -- A check constraint has been violated
161: pay_opm_shd.g_api_dml := false; -- Unset the api dml status
162: pay_opm_shd.constraint_error
163: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
164: When hr_api.unique_integrity_violated Then
165: -- Unique integrity has been violated
166: pay_opm_shd.g_api_dml := false; -- Unset the api dml status
162: pay_opm_shd.constraint_error
163: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
164: When hr_api.unique_integrity_violated Then
165: -- Unique integrity has been violated
166: pay_opm_shd.g_api_dml := false; -- Unset the api dml status
167: pay_opm_shd.constraint_error
168: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
169: When Others Then
170: pay_opm_shd.g_api_dml := false; -- Unset the api dml status
163: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
164: When hr_api.unique_integrity_violated Then
165: -- Unique integrity has been violated
166: pay_opm_shd.g_api_dml := false; -- Unset the api dml status
167: pay_opm_shd.constraint_error
168: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
169: When Others Then
170: pay_opm_shd.g_api_dml := false; -- Unset the api dml status
171: Raise;
166: pay_opm_shd.g_api_dml := false; -- Unset the api dml status
167: pay_opm_shd.constraint_error
168: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
169: When Others Then
170: pay_opm_shd.g_api_dml := false; -- Unset the api dml status
171: Raise;
172: End dt_update_dml;
173: --
174: -- ----------------------------------------------------------------------------
202: --
203: -- {End Of Comments}
204: -- ----------------------------------------------------------------------------
205: Procedure update_dml
206: (p_rec in out nocopy pay_opm_shd.g_rec_type
207: ,p_effective_date in date
208: ,p_datetrack_mode in varchar2
209: ,p_validation_start_date in date
210: ,p_validation_end_date in date
269: --
270: -- {End Of Comments}
271: -- ----------------------------------------------------------------------------
272: Procedure dt_pre_update
273: (p_rec in out nocopy pay_opm_shd.g_rec_type
274: ,p_effective_date in date
275: ,p_datetrack_mode in varchar2
276: ,p_validation_start_date in date
277: ,p_validation_end_date in date
285: If (p_datetrack_mode <> hr_api.g_correction) then
286: --
287: -- Update the current effective end date
288: --
289: pay_opm_shd.upd_effective_end_date
290: (p_effective_date => p_effective_date
291: ,p_base_key_value => p_rec.org_payment_method_id
292: ,p_new_effective_end_date => (p_validation_start_date - 1)
293: ,p_validation_start_date => p_validation_start_date
355: --
356: -- {End Of Comments}
357: -- ----------------------------------------------------------------------------
358: Procedure pre_update
359: (p_rec in out nocopy pay_opm_shd.g_rec_type
360: ,p_effective_date in date
361: ,p_datetrack_mode in varchar2
362: ,p_validation_start_date in date
363: ,p_validation_end_date in date
377: ,p_comment_text => p_rec.comments
378: );
379: -- Update the comments if they have changed
380: ElsIf (p_rec.comment_id is not null and p_rec.comments <>
381: pay_opm_shd.g_old_rec.comments) then
382: hr_comm_api.upd(p_comment_id => p_rec.comment_id
383: ,p_source_table_name => 'PAY_ORG_PAYMENT_METHODS_F'
384: ,p_comment_text => p_rec.comments
385: );
428: --
429: -- {End Of Comments}
430: -- ----------------------------------------------------------------------------
431: Procedure post_update
432: (p_rec in pay_opm_shd.g_rec_type
433: ,p_effective_date in date
434: ,p_datetrack_mode in varchar2
435: ,p_validation_start_date in date
436: ,p_validation_end_date in date
561: => p_rec.cost_cleared_void_payment
562: ,p_exclude_manual_payment
563: => p_rec.exclude_manual_payment
564: ,p_effective_start_date_o
565: => pay_opm_shd.g_old_rec.effective_start_date
566: ,p_effective_end_date_o
567: => pay_opm_shd.g_old_rec.effective_end_date
568: ,p_business_group_id_o
569: => pay_opm_shd.g_old_rec.business_group_id
563: => p_rec.exclude_manual_payment
564: ,p_effective_start_date_o
565: => pay_opm_shd.g_old_rec.effective_start_date
566: ,p_effective_end_date_o
567: => pay_opm_shd.g_old_rec.effective_end_date
568: ,p_business_group_id_o
569: => pay_opm_shd.g_old_rec.business_group_id
570: ,p_external_account_id_o
571: => pay_opm_shd.g_old_rec.external_account_id
565: => pay_opm_shd.g_old_rec.effective_start_date
566: ,p_effective_end_date_o
567: => pay_opm_shd.g_old_rec.effective_end_date
568: ,p_business_group_id_o
569: => pay_opm_shd.g_old_rec.business_group_id
570: ,p_external_account_id_o
571: => pay_opm_shd.g_old_rec.external_account_id
572: ,p_currency_code_o
573: => pay_opm_shd.g_old_rec.currency_code
567: => pay_opm_shd.g_old_rec.effective_end_date
568: ,p_business_group_id_o
569: => pay_opm_shd.g_old_rec.business_group_id
570: ,p_external_account_id_o
571: => pay_opm_shd.g_old_rec.external_account_id
572: ,p_currency_code_o
573: => pay_opm_shd.g_old_rec.currency_code
574: ,p_payment_type_id_o
575: => pay_opm_shd.g_old_rec.payment_type_id
569: => pay_opm_shd.g_old_rec.business_group_id
570: ,p_external_account_id_o
571: => pay_opm_shd.g_old_rec.external_account_id
572: ,p_currency_code_o
573: => pay_opm_shd.g_old_rec.currency_code
574: ,p_payment_type_id_o
575: => pay_opm_shd.g_old_rec.payment_type_id
576: ,p_defined_balance_id_o
577: => pay_opm_shd.g_old_rec.defined_balance_id
571: => pay_opm_shd.g_old_rec.external_account_id
572: ,p_currency_code_o
573: => pay_opm_shd.g_old_rec.currency_code
574: ,p_payment_type_id_o
575: => pay_opm_shd.g_old_rec.payment_type_id
576: ,p_defined_balance_id_o
577: => pay_opm_shd.g_old_rec.defined_balance_id
578: ,p_org_payment_method_name_o
579: => pay_opm_shd.g_old_rec.org_payment_method_name
573: => pay_opm_shd.g_old_rec.currency_code
574: ,p_payment_type_id_o
575: => pay_opm_shd.g_old_rec.payment_type_id
576: ,p_defined_balance_id_o
577: => pay_opm_shd.g_old_rec.defined_balance_id
578: ,p_org_payment_method_name_o
579: => pay_opm_shd.g_old_rec.org_payment_method_name
580: ,p_comment_id_o
581: => pay_opm_shd.g_old_rec.comment_id
575: => pay_opm_shd.g_old_rec.payment_type_id
576: ,p_defined_balance_id_o
577: => pay_opm_shd.g_old_rec.defined_balance_id
578: ,p_org_payment_method_name_o
579: => pay_opm_shd.g_old_rec.org_payment_method_name
580: ,p_comment_id_o
581: => pay_opm_shd.g_old_rec.comment_id
582: ,p_comments_o
583: => pay_opm_shd.g_old_rec.comments
577: => pay_opm_shd.g_old_rec.defined_balance_id
578: ,p_org_payment_method_name_o
579: => pay_opm_shd.g_old_rec.org_payment_method_name
580: ,p_comment_id_o
581: => pay_opm_shd.g_old_rec.comment_id
582: ,p_comments_o
583: => pay_opm_shd.g_old_rec.comments
584: ,p_attribute_category_o
585: => pay_opm_shd.g_old_rec.attribute_category
579: => pay_opm_shd.g_old_rec.org_payment_method_name
580: ,p_comment_id_o
581: => pay_opm_shd.g_old_rec.comment_id
582: ,p_comments_o
583: => pay_opm_shd.g_old_rec.comments
584: ,p_attribute_category_o
585: => pay_opm_shd.g_old_rec.attribute_category
586: ,p_attribute1_o
587: => pay_opm_shd.g_old_rec.attribute1
581: => pay_opm_shd.g_old_rec.comment_id
582: ,p_comments_o
583: => pay_opm_shd.g_old_rec.comments
584: ,p_attribute_category_o
585: => pay_opm_shd.g_old_rec.attribute_category
586: ,p_attribute1_o
587: => pay_opm_shd.g_old_rec.attribute1
588: ,p_attribute2_o
589: => pay_opm_shd.g_old_rec.attribute2
583: => pay_opm_shd.g_old_rec.comments
584: ,p_attribute_category_o
585: => pay_opm_shd.g_old_rec.attribute_category
586: ,p_attribute1_o
587: => pay_opm_shd.g_old_rec.attribute1
588: ,p_attribute2_o
589: => pay_opm_shd.g_old_rec.attribute2
590: ,p_attribute3_o
591: => pay_opm_shd.g_old_rec.attribute3
585: => pay_opm_shd.g_old_rec.attribute_category
586: ,p_attribute1_o
587: => pay_opm_shd.g_old_rec.attribute1
588: ,p_attribute2_o
589: => pay_opm_shd.g_old_rec.attribute2
590: ,p_attribute3_o
591: => pay_opm_shd.g_old_rec.attribute3
592: ,p_attribute4_o
593: => pay_opm_shd.g_old_rec.attribute4
587: => pay_opm_shd.g_old_rec.attribute1
588: ,p_attribute2_o
589: => pay_opm_shd.g_old_rec.attribute2
590: ,p_attribute3_o
591: => pay_opm_shd.g_old_rec.attribute3
592: ,p_attribute4_o
593: => pay_opm_shd.g_old_rec.attribute4
594: ,p_attribute5_o
595: => pay_opm_shd.g_old_rec.attribute5
589: => pay_opm_shd.g_old_rec.attribute2
590: ,p_attribute3_o
591: => pay_opm_shd.g_old_rec.attribute3
592: ,p_attribute4_o
593: => pay_opm_shd.g_old_rec.attribute4
594: ,p_attribute5_o
595: => pay_opm_shd.g_old_rec.attribute5
596: ,p_attribute6_o
597: => pay_opm_shd.g_old_rec.attribute6
591: => pay_opm_shd.g_old_rec.attribute3
592: ,p_attribute4_o
593: => pay_opm_shd.g_old_rec.attribute4
594: ,p_attribute5_o
595: => pay_opm_shd.g_old_rec.attribute5
596: ,p_attribute6_o
597: => pay_opm_shd.g_old_rec.attribute6
598: ,p_attribute7_o
599: => pay_opm_shd.g_old_rec.attribute7
593: => pay_opm_shd.g_old_rec.attribute4
594: ,p_attribute5_o
595: => pay_opm_shd.g_old_rec.attribute5
596: ,p_attribute6_o
597: => pay_opm_shd.g_old_rec.attribute6
598: ,p_attribute7_o
599: => pay_opm_shd.g_old_rec.attribute7
600: ,p_attribute8_o
601: => pay_opm_shd.g_old_rec.attribute8
595: => pay_opm_shd.g_old_rec.attribute5
596: ,p_attribute6_o
597: => pay_opm_shd.g_old_rec.attribute6
598: ,p_attribute7_o
599: => pay_opm_shd.g_old_rec.attribute7
600: ,p_attribute8_o
601: => pay_opm_shd.g_old_rec.attribute8
602: ,p_attribute9_o
603: => pay_opm_shd.g_old_rec.attribute9
597: => pay_opm_shd.g_old_rec.attribute6
598: ,p_attribute7_o
599: => pay_opm_shd.g_old_rec.attribute7
600: ,p_attribute8_o
601: => pay_opm_shd.g_old_rec.attribute8
602: ,p_attribute9_o
603: => pay_opm_shd.g_old_rec.attribute9
604: ,p_attribute10_o
605: => pay_opm_shd.g_old_rec.attribute10
599: => pay_opm_shd.g_old_rec.attribute7
600: ,p_attribute8_o
601: => pay_opm_shd.g_old_rec.attribute8
602: ,p_attribute9_o
603: => pay_opm_shd.g_old_rec.attribute9
604: ,p_attribute10_o
605: => pay_opm_shd.g_old_rec.attribute10
606: ,p_attribute11_o
607: => pay_opm_shd.g_old_rec.attribute11
601: => pay_opm_shd.g_old_rec.attribute8
602: ,p_attribute9_o
603: => pay_opm_shd.g_old_rec.attribute9
604: ,p_attribute10_o
605: => pay_opm_shd.g_old_rec.attribute10
606: ,p_attribute11_o
607: => pay_opm_shd.g_old_rec.attribute11
608: ,p_attribute12_o
609: => pay_opm_shd.g_old_rec.attribute12
603: => pay_opm_shd.g_old_rec.attribute9
604: ,p_attribute10_o
605: => pay_opm_shd.g_old_rec.attribute10
606: ,p_attribute11_o
607: => pay_opm_shd.g_old_rec.attribute11
608: ,p_attribute12_o
609: => pay_opm_shd.g_old_rec.attribute12
610: ,p_attribute13_o
611: => pay_opm_shd.g_old_rec.attribute13
605: => pay_opm_shd.g_old_rec.attribute10
606: ,p_attribute11_o
607: => pay_opm_shd.g_old_rec.attribute11
608: ,p_attribute12_o
609: => pay_opm_shd.g_old_rec.attribute12
610: ,p_attribute13_o
611: => pay_opm_shd.g_old_rec.attribute13
612: ,p_attribute14_o
613: => pay_opm_shd.g_old_rec.attribute14
607: => pay_opm_shd.g_old_rec.attribute11
608: ,p_attribute12_o
609: => pay_opm_shd.g_old_rec.attribute12
610: ,p_attribute13_o
611: => pay_opm_shd.g_old_rec.attribute13
612: ,p_attribute14_o
613: => pay_opm_shd.g_old_rec.attribute14
614: ,p_attribute15_o
615: => pay_opm_shd.g_old_rec.attribute15
609: => pay_opm_shd.g_old_rec.attribute12
610: ,p_attribute13_o
611: => pay_opm_shd.g_old_rec.attribute13
612: ,p_attribute14_o
613: => pay_opm_shd.g_old_rec.attribute14
614: ,p_attribute15_o
615: => pay_opm_shd.g_old_rec.attribute15
616: ,p_attribute16_o
617: => pay_opm_shd.g_old_rec.attribute16
611: => pay_opm_shd.g_old_rec.attribute13
612: ,p_attribute14_o
613: => pay_opm_shd.g_old_rec.attribute14
614: ,p_attribute15_o
615: => pay_opm_shd.g_old_rec.attribute15
616: ,p_attribute16_o
617: => pay_opm_shd.g_old_rec.attribute16
618: ,p_attribute17_o
619: => pay_opm_shd.g_old_rec.attribute17
613: => pay_opm_shd.g_old_rec.attribute14
614: ,p_attribute15_o
615: => pay_opm_shd.g_old_rec.attribute15
616: ,p_attribute16_o
617: => pay_opm_shd.g_old_rec.attribute16
618: ,p_attribute17_o
619: => pay_opm_shd.g_old_rec.attribute17
620: ,p_attribute18_o
621: => pay_opm_shd.g_old_rec.attribute18
615: => pay_opm_shd.g_old_rec.attribute15
616: ,p_attribute16_o
617: => pay_opm_shd.g_old_rec.attribute16
618: ,p_attribute17_o
619: => pay_opm_shd.g_old_rec.attribute17
620: ,p_attribute18_o
621: => pay_opm_shd.g_old_rec.attribute18
622: ,p_attribute19_o
623: => pay_opm_shd.g_old_rec.attribute19
617: => pay_opm_shd.g_old_rec.attribute16
618: ,p_attribute17_o
619: => pay_opm_shd.g_old_rec.attribute17
620: ,p_attribute18_o
621: => pay_opm_shd.g_old_rec.attribute18
622: ,p_attribute19_o
623: => pay_opm_shd.g_old_rec.attribute19
624: ,p_attribute20_o
625: => pay_opm_shd.g_old_rec.attribute20
619: => pay_opm_shd.g_old_rec.attribute17
620: ,p_attribute18_o
621: => pay_opm_shd.g_old_rec.attribute18
622: ,p_attribute19_o
623: => pay_opm_shd.g_old_rec.attribute19
624: ,p_attribute20_o
625: => pay_opm_shd.g_old_rec.attribute20
626: ,p_pmeth_information_category_o
627: => pay_opm_shd.g_old_rec.pmeth_information_category
621: => pay_opm_shd.g_old_rec.attribute18
622: ,p_attribute19_o
623: => pay_opm_shd.g_old_rec.attribute19
624: ,p_attribute20_o
625: => pay_opm_shd.g_old_rec.attribute20
626: ,p_pmeth_information_category_o
627: => pay_opm_shd.g_old_rec.pmeth_information_category
628: ,p_pmeth_information1_o
629: => pay_opm_shd.g_old_rec.pmeth_information1
623: => pay_opm_shd.g_old_rec.attribute19
624: ,p_attribute20_o
625: => pay_opm_shd.g_old_rec.attribute20
626: ,p_pmeth_information_category_o
627: => pay_opm_shd.g_old_rec.pmeth_information_category
628: ,p_pmeth_information1_o
629: => pay_opm_shd.g_old_rec.pmeth_information1
630: ,p_pmeth_information2_o
631: => pay_opm_shd.g_old_rec.pmeth_information2
625: => pay_opm_shd.g_old_rec.attribute20
626: ,p_pmeth_information_category_o
627: => pay_opm_shd.g_old_rec.pmeth_information_category
628: ,p_pmeth_information1_o
629: => pay_opm_shd.g_old_rec.pmeth_information1
630: ,p_pmeth_information2_o
631: => pay_opm_shd.g_old_rec.pmeth_information2
632: ,p_pmeth_information3_o
633: => pay_opm_shd.g_old_rec.pmeth_information3
627: => pay_opm_shd.g_old_rec.pmeth_information_category
628: ,p_pmeth_information1_o
629: => pay_opm_shd.g_old_rec.pmeth_information1
630: ,p_pmeth_information2_o
631: => pay_opm_shd.g_old_rec.pmeth_information2
632: ,p_pmeth_information3_o
633: => pay_opm_shd.g_old_rec.pmeth_information3
634: ,p_pmeth_information4_o
635: => pay_opm_shd.g_old_rec.pmeth_information4
629: => pay_opm_shd.g_old_rec.pmeth_information1
630: ,p_pmeth_information2_o
631: => pay_opm_shd.g_old_rec.pmeth_information2
632: ,p_pmeth_information3_o
633: => pay_opm_shd.g_old_rec.pmeth_information3
634: ,p_pmeth_information4_o
635: => pay_opm_shd.g_old_rec.pmeth_information4
636: ,p_pmeth_information5_o
637: => pay_opm_shd.g_old_rec.pmeth_information5
631: => pay_opm_shd.g_old_rec.pmeth_information2
632: ,p_pmeth_information3_o
633: => pay_opm_shd.g_old_rec.pmeth_information3
634: ,p_pmeth_information4_o
635: => pay_opm_shd.g_old_rec.pmeth_information4
636: ,p_pmeth_information5_o
637: => pay_opm_shd.g_old_rec.pmeth_information5
638: ,p_pmeth_information6_o
639: => pay_opm_shd.g_old_rec.pmeth_information6
633: => pay_opm_shd.g_old_rec.pmeth_information3
634: ,p_pmeth_information4_o
635: => pay_opm_shd.g_old_rec.pmeth_information4
636: ,p_pmeth_information5_o
637: => pay_opm_shd.g_old_rec.pmeth_information5
638: ,p_pmeth_information6_o
639: => pay_opm_shd.g_old_rec.pmeth_information6
640: ,p_pmeth_information7_o
641: => pay_opm_shd.g_old_rec.pmeth_information7
635: => pay_opm_shd.g_old_rec.pmeth_information4
636: ,p_pmeth_information5_o
637: => pay_opm_shd.g_old_rec.pmeth_information5
638: ,p_pmeth_information6_o
639: => pay_opm_shd.g_old_rec.pmeth_information6
640: ,p_pmeth_information7_o
641: => pay_opm_shd.g_old_rec.pmeth_information7
642: ,p_pmeth_information8_o
643: => pay_opm_shd.g_old_rec.pmeth_information8
637: => pay_opm_shd.g_old_rec.pmeth_information5
638: ,p_pmeth_information6_o
639: => pay_opm_shd.g_old_rec.pmeth_information6
640: ,p_pmeth_information7_o
641: => pay_opm_shd.g_old_rec.pmeth_information7
642: ,p_pmeth_information8_o
643: => pay_opm_shd.g_old_rec.pmeth_information8
644: ,p_pmeth_information9_o
645: => pay_opm_shd.g_old_rec.pmeth_information9
639: => pay_opm_shd.g_old_rec.pmeth_information6
640: ,p_pmeth_information7_o
641: => pay_opm_shd.g_old_rec.pmeth_information7
642: ,p_pmeth_information8_o
643: => pay_opm_shd.g_old_rec.pmeth_information8
644: ,p_pmeth_information9_o
645: => pay_opm_shd.g_old_rec.pmeth_information9
646: ,p_pmeth_information10_o
647: => pay_opm_shd.g_old_rec.pmeth_information10
641: => pay_opm_shd.g_old_rec.pmeth_information7
642: ,p_pmeth_information8_o
643: => pay_opm_shd.g_old_rec.pmeth_information8
644: ,p_pmeth_information9_o
645: => pay_opm_shd.g_old_rec.pmeth_information9
646: ,p_pmeth_information10_o
647: => pay_opm_shd.g_old_rec.pmeth_information10
648: ,p_pmeth_information11_o
649: => pay_opm_shd.g_old_rec.pmeth_information11
643: => pay_opm_shd.g_old_rec.pmeth_information8
644: ,p_pmeth_information9_o
645: => pay_opm_shd.g_old_rec.pmeth_information9
646: ,p_pmeth_information10_o
647: => pay_opm_shd.g_old_rec.pmeth_information10
648: ,p_pmeth_information11_o
649: => pay_opm_shd.g_old_rec.pmeth_information11
650: ,p_pmeth_information12_o
651: => pay_opm_shd.g_old_rec.pmeth_information12
645: => pay_opm_shd.g_old_rec.pmeth_information9
646: ,p_pmeth_information10_o
647: => pay_opm_shd.g_old_rec.pmeth_information10
648: ,p_pmeth_information11_o
649: => pay_opm_shd.g_old_rec.pmeth_information11
650: ,p_pmeth_information12_o
651: => pay_opm_shd.g_old_rec.pmeth_information12
652: ,p_pmeth_information13_o
653: => pay_opm_shd.g_old_rec.pmeth_information13
647: => pay_opm_shd.g_old_rec.pmeth_information10
648: ,p_pmeth_information11_o
649: => pay_opm_shd.g_old_rec.pmeth_information11
650: ,p_pmeth_information12_o
651: => pay_opm_shd.g_old_rec.pmeth_information12
652: ,p_pmeth_information13_o
653: => pay_opm_shd.g_old_rec.pmeth_information13
654: ,p_pmeth_information14_o
655: => pay_opm_shd.g_old_rec.pmeth_information14
649: => pay_opm_shd.g_old_rec.pmeth_information11
650: ,p_pmeth_information12_o
651: => pay_opm_shd.g_old_rec.pmeth_information12
652: ,p_pmeth_information13_o
653: => pay_opm_shd.g_old_rec.pmeth_information13
654: ,p_pmeth_information14_o
655: => pay_opm_shd.g_old_rec.pmeth_information14
656: ,p_pmeth_information15_o
657: => pay_opm_shd.g_old_rec.pmeth_information15
651: => pay_opm_shd.g_old_rec.pmeth_information12
652: ,p_pmeth_information13_o
653: => pay_opm_shd.g_old_rec.pmeth_information13
654: ,p_pmeth_information14_o
655: => pay_opm_shd.g_old_rec.pmeth_information14
656: ,p_pmeth_information15_o
657: => pay_opm_shd.g_old_rec.pmeth_information15
658: ,p_pmeth_information16_o
659: => pay_opm_shd.g_old_rec.pmeth_information16
653: => pay_opm_shd.g_old_rec.pmeth_information13
654: ,p_pmeth_information14_o
655: => pay_opm_shd.g_old_rec.pmeth_information14
656: ,p_pmeth_information15_o
657: => pay_opm_shd.g_old_rec.pmeth_information15
658: ,p_pmeth_information16_o
659: => pay_opm_shd.g_old_rec.pmeth_information16
660: ,p_pmeth_information17_o
661: => pay_opm_shd.g_old_rec.pmeth_information17
655: => pay_opm_shd.g_old_rec.pmeth_information14
656: ,p_pmeth_information15_o
657: => pay_opm_shd.g_old_rec.pmeth_information15
658: ,p_pmeth_information16_o
659: => pay_opm_shd.g_old_rec.pmeth_information16
660: ,p_pmeth_information17_o
661: => pay_opm_shd.g_old_rec.pmeth_information17
662: ,p_pmeth_information18_o
663: => pay_opm_shd.g_old_rec.pmeth_information18
657: => pay_opm_shd.g_old_rec.pmeth_information15
658: ,p_pmeth_information16_o
659: => pay_opm_shd.g_old_rec.pmeth_information16
660: ,p_pmeth_information17_o
661: => pay_opm_shd.g_old_rec.pmeth_information17
662: ,p_pmeth_information18_o
663: => pay_opm_shd.g_old_rec.pmeth_information18
664: ,p_pmeth_information19_o
665: => pay_opm_shd.g_old_rec.pmeth_information19
659: => pay_opm_shd.g_old_rec.pmeth_information16
660: ,p_pmeth_information17_o
661: => pay_opm_shd.g_old_rec.pmeth_information17
662: ,p_pmeth_information18_o
663: => pay_opm_shd.g_old_rec.pmeth_information18
664: ,p_pmeth_information19_o
665: => pay_opm_shd.g_old_rec.pmeth_information19
666: ,p_pmeth_information20_o
667: => pay_opm_shd.g_old_rec.pmeth_information20
661: => pay_opm_shd.g_old_rec.pmeth_information17
662: ,p_pmeth_information18_o
663: => pay_opm_shd.g_old_rec.pmeth_information18
664: ,p_pmeth_information19_o
665: => pay_opm_shd.g_old_rec.pmeth_information19
666: ,p_pmeth_information20_o
667: => pay_opm_shd.g_old_rec.pmeth_information20
668: ,p_object_version_number_o
669: => pay_opm_shd.g_old_rec.object_version_number
663: => pay_opm_shd.g_old_rec.pmeth_information18
664: ,p_pmeth_information19_o
665: => pay_opm_shd.g_old_rec.pmeth_information19
666: ,p_pmeth_information20_o
667: => pay_opm_shd.g_old_rec.pmeth_information20
668: ,p_object_version_number_o
669: => pay_opm_shd.g_old_rec.object_version_number
670: ,p_transfer_to_gl_flag_o
671: => pay_opm_shd.g_old_rec.transfer_to_gl_flag
665: => pay_opm_shd.g_old_rec.pmeth_information19
666: ,p_pmeth_information20_o
667: => pay_opm_shd.g_old_rec.pmeth_information20
668: ,p_object_version_number_o
669: => pay_opm_shd.g_old_rec.object_version_number
670: ,p_transfer_to_gl_flag_o
671: => pay_opm_shd.g_old_rec.transfer_to_gl_flag
672: ,p_cost_payment_o
673: => pay_opm_shd.g_old_rec.cost_payment
667: => pay_opm_shd.g_old_rec.pmeth_information20
668: ,p_object_version_number_o
669: => pay_opm_shd.g_old_rec.object_version_number
670: ,p_transfer_to_gl_flag_o
671: => pay_opm_shd.g_old_rec.transfer_to_gl_flag
672: ,p_cost_payment_o
673: => pay_opm_shd.g_old_rec.cost_payment
674: ,p_cost_cleared_payment_o
675: => pay_opm_shd.g_old_rec.cost_cleared_payment
669: => pay_opm_shd.g_old_rec.object_version_number
670: ,p_transfer_to_gl_flag_o
671: => pay_opm_shd.g_old_rec.transfer_to_gl_flag
672: ,p_cost_payment_o
673: => pay_opm_shd.g_old_rec.cost_payment
674: ,p_cost_cleared_payment_o
675: => pay_opm_shd.g_old_rec.cost_cleared_payment
676: ,p_cost_cleared_void_payment_o
677: => pay_opm_shd.g_old_rec.cost_cleared_void_payment
671: => pay_opm_shd.g_old_rec.transfer_to_gl_flag
672: ,p_cost_payment_o
673: => pay_opm_shd.g_old_rec.cost_payment
674: ,p_cost_cleared_payment_o
675: => pay_opm_shd.g_old_rec.cost_cleared_payment
676: ,p_cost_cleared_void_payment_o
677: => pay_opm_shd.g_old_rec.cost_cleared_void_payment
678: ,p_exclude_manual_payment_o
679: => pay_opm_shd.g_old_rec.exclude_manual_payment
673: => pay_opm_shd.g_old_rec.cost_payment
674: ,p_cost_cleared_payment_o
675: => pay_opm_shd.g_old_rec.cost_cleared_payment
676: ,p_cost_cleared_void_payment_o
677: => pay_opm_shd.g_old_rec.cost_cleared_void_payment
678: ,p_exclude_manual_payment_o
679: => pay_opm_shd.g_old_rec.exclude_manual_payment
680: );
681: --
675: => pay_opm_shd.g_old_rec.cost_cleared_payment
676: ,p_cost_cleared_void_payment_o
677: => pay_opm_shd.g_old_rec.cost_cleared_void_payment
678: ,p_exclude_manual_payment_o
679: => pay_opm_shd.g_old_rec.exclude_manual_payment
680: );
681: --
682: exception
683: --
735: --
736: -- {End Of Comments}
737: -- ----------------------------------------------------------------------------
738: Procedure convert_defs
739: (p_rec in out nocopy pay_opm_shd.g_rec_type
740: ) is
741: --
742: Begin
743: --
747: -- is being used then we must set to the 'current' argument value.
748: --
749: If (p_rec.business_group_id = hr_api.g_number) then
750: p_rec.business_group_id :=
751: pay_opm_shd.g_old_rec.business_group_id;
752: End If;
753: If (p_rec.external_account_id = hr_api.g_number) then
754: p_rec.external_account_id :=
755: pay_opm_shd.g_old_rec.external_account_id;
751: pay_opm_shd.g_old_rec.business_group_id;
752: End If;
753: If (p_rec.external_account_id = hr_api.g_number) then
754: p_rec.external_account_id :=
755: pay_opm_shd.g_old_rec.external_account_id;
756: End If;
757: If (p_rec.currency_code = hr_api.g_varchar2) then
758: p_rec.currency_code :=
759: pay_opm_shd.g_old_rec.currency_code;
755: pay_opm_shd.g_old_rec.external_account_id;
756: End If;
757: If (p_rec.currency_code = hr_api.g_varchar2) then
758: p_rec.currency_code :=
759: pay_opm_shd.g_old_rec.currency_code;
760: End If;
761: If (p_rec.payment_type_id = hr_api.g_number) then
762: p_rec.payment_type_id :=
763: pay_opm_shd.g_old_rec.payment_type_id;
759: pay_opm_shd.g_old_rec.currency_code;
760: End If;
761: If (p_rec.payment_type_id = hr_api.g_number) then
762: p_rec.payment_type_id :=
763: pay_opm_shd.g_old_rec.payment_type_id;
764: End If;
765: If (p_rec.defined_balance_id = hr_api.g_number) then
766: p_rec.defined_balance_id :=
767: pay_opm_shd.g_old_rec.defined_balance_id;
763: pay_opm_shd.g_old_rec.payment_type_id;
764: End If;
765: If (p_rec.defined_balance_id = hr_api.g_number) then
766: p_rec.defined_balance_id :=
767: pay_opm_shd.g_old_rec.defined_balance_id;
768: End If;
769: If (p_rec.org_payment_method_name = hr_api.g_varchar2) then
770: p_rec.org_payment_method_name :=
771: pay_opm_shd.g_old_rec.org_payment_method_name;
767: pay_opm_shd.g_old_rec.defined_balance_id;
768: End If;
769: If (p_rec.org_payment_method_name = hr_api.g_varchar2) then
770: p_rec.org_payment_method_name :=
771: pay_opm_shd.g_old_rec.org_payment_method_name;
772: End If;
773: If (p_rec.comment_id = hr_api.g_number) then
774: p_rec.comment_id :=
775: pay_opm_shd.g_old_rec.comment_id;
771: pay_opm_shd.g_old_rec.org_payment_method_name;
772: End If;
773: If (p_rec.comment_id = hr_api.g_number) then
774: p_rec.comment_id :=
775: pay_opm_shd.g_old_rec.comment_id;
776: End If;
777: If (p_rec.comments = hr_api.g_varchar2) then
778: p_rec.comments :=
779: pay_opm_shd.g_old_rec.comments;
775: pay_opm_shd.g_old_rec.comment_id;
776: End If;
777: If (p_rec.comments = hr_api.g_varchar2) then
778: p_rec.comments :=
779: pay_opm_shd.g_old_rec.comments;
780: End If;
781: If (p_rec.attribute_category = hr_api.g_varchar2) then
782: p_rec.attribute_category :=
783: pay_opm_shd.g_old_rec.attribute_category;
779: pay_opm_shd.g_old_rec.comments;
780: End If;
781: If (p_rec.attribute_category = hr_api.g_varchar2) then
782: p_rec.attribute_category :=
783: pay_opm_shd.g_old_rec.attribute_category;
784: End If;
785: If (p_rec.attribute1 = hr_api.g_varchar2) then
786: p_rec.attribute1 :=
787: pay_opm_shd.g_old_rec.attribute1;
783: pay_opm_shd.g_old_rec.attribute_category;
784: End If;
785: If (p_rec.attribute1 = hr_api.g_varchar2) then
786: p_rec.attribute1 :=
787: pay_opm_shd.g_old_rec.attribute1;
788: End If;
789: If (p_rec.attribute2 = hr_api.g_varchar2) then
790: p_rec.attribute2 :=
791: pay_opm_shd.g_old_rec.attribute2;
787: pay_opm_shd.g_old_rec.attribute1;
788: End If;
789: If (p_rec.attribute2 = hr_api.g_varchar2) then
790: p_rec.attribute2 :=
791: pay_opm_shd.g_old_rec.attribute2;
792: End If;
793: If (p_rec.attribute3 = hr_api.g_varchar2) then
794: p_rec.attribute3 :=
795: pay_opm_shd.g_old_rec.attribute3;
791: pay_opm_shd.g_old_rec.attribute2;
792: End If;
793: If (p_rec.attribute3 = hr_api.g_varchar2) then
794: p_rec.attribute3 :=
795: pay_opm_shd.g_old_rec.attribute3;
796: End If;
797: If (p_rec.attribute4 = hr_api.g_varchar2) then
798: p_rec.attribute4 :=
799: pay_opm_shd.g_old_rec.attribute4;
795: pay_opm_shd.g_old_rec.attribute3;
796: End If;
797: If (p_rec.attribute4 = hr_api.g_varchar2) then
798: p_rec.attribute4 :=
799: pay_opm_shd.g_old_rec.attribute4;
800: End If;
801: If (p_rec.attribute5 = hr_api.g_varchar2) then
802: p_rec.attribute5 :=
803: pay_opm_shd.g_old_rec.attribute5;
799: pay_opm_shd.g_old_rec.attribute4;
800: End If;
801: If (p_rec.attribute5 = hr_api.g_varchar2) then
802: p_rec.attribute5 :=
803: pay_opm_shd.g_old_rec.attribute5;
804: End If;
805: If (p_rec.attribute6 = hr_api.g_varchar2) then
806: p_rec.attribute6 :=
807: pay_opm_shd.g_old_rec.attribute6;
803: pay_opm_shd.g_old_rec.attribute5;
804: End If;
805: If (p_rec.attribute6 = hr_api.g_varchar2) then
806: p_rec.attribute6 :=
807: pay_opm_shd.g_old_rec.attribute6;
808: End If;
809: If (p_rec.attribute7 = hr_api.g_varchar2) then
810: p_rec.attribute7 :=
811: pay_opm_shd.g_old_rec.attribute7;
807: pay_opm_shd.g_old_rec.attribute6;
808: End If;
809: If (p_rec.attribute7 = hr_api.g_varchar2) then
810: p_rec.attribute7 :=
811: pay_opm_shd.g_old_rec.attribute7;
812: End If;
813: If (p_rec.attribute8 = hr_api.g_varchar2) then
814: p_rec.attribute8 :=
815: pay_opm_shd.g_old_rec.attribute8;
811: pay_opm_shd.g_old_rec.attribute7;
812: End If;
813: If (p_rec.attribute8 = hr_api.g_varchar2) then
814: p_rec.attribute8 :=
815: pay_opm_shd.g_old_rec.attribute8;
816: End If;
817: If (p_rec.attribute9 = hr_api.g_varchar2) then
818: p_rec.attribute9 :=
819: pay_opm_shd.g_old_rec.attribute9;
815: pay_opm_shd.g_old_rec.attribute8;
816: End If;
817: If (p_rec.attribute9 = hr_api.g_varchar2) then
818: p_rec.attribute9 :=
819: pay_opm_shd.g_old_rec.attribute9;
820: End If;
821: If (p_rec.attribute10 = hr_api.g_varchar2) then
822: p_rec.attribute10 :=
823: pay_opm_shd.g_old_rec.attribute10;
819: pay_opm_shd.g_old_rec.attribute9;
820: End If;
821: If (p_rec.attribute10 = hr_api.g_varchar2) then
822: p_rec.attribute10 :=
823: pay_opm_shd.g_old_rec.attribute10;
824: End If;
825: If (p_rec.attribute11 = hr_api.g_varchar2) then
826: p_rec.attribute11 :=
827: pay_opm_shd.g_old_rec.attribute11;
823: pay_opm_shd.g_old_rec.attribute10;
824: End If;
825: If (p_rec.attribute11 = hr_api.g_varchar2) then
826: p_rec.attribute11 :=
827: pay_opm_shd.g_old_rec.attribute11;
828: End If;
829: If (p_rec.attribute12 = hr_api.g_varchar2) then
830: p_rec.attribute12 :=
831: pay_opm_shd.g_old_rec.attribute12;
827: pay_opm_shd.g_old_rec.attribute11;
828: End If;
829: If (p_rec.attribute12 = hr_api.g_varchar2) then
830: p_rec.attribute12 :=
831: pay_opm_shd.g_old_rec.attribute12;
832: End If;
833: If (p_rec.attribute13 = hr_api.g_varchar2) then
834: p_rec.attribute13 :=
835: pay_opm_shd.g_old_rec.attribute13;
831: pay_opm_shd.g_old_rec.attribute12;
832: End If;
833: If (p_rec.attribute13 = hr_api.g_varchar2) then
834: p_rec.attribute13 :=
835: pay_opm_shd.g_old_rec.attribute13;
836: End If;
837: If (p_rec.attribute14 = hr_api.g_varchar2) then
838: p_rec.attribute14 :=
839: pay_opm_shd.g_old_rec.attribute14;
835: pay_opm_shd.g_old_rec.attribute13;
836: End If;
837: If (p_rec.attribute14 = hr_api.g_varchar2) then
838: p_rec.attribute14 :=
839: pay_opm_shd.g_old_rec.attribute14;
840: End If;
841: If (p_rec.attribute15 = hr_api.g_varchar2) then
842: p_rec.attribute15 :=
843: pay_opm_shd.g_old_rec.attribute15;
839: pay_opm_shd.g_old_rec.attribute14;
840: End If;
841: If (p_rec.attribute15 = hr_api.g_varchar2) then
842: p_rec.attribute15 :=
843: pay_opm_shd.g_old_rec.attribute15;
844: End If;
845: If (p_rec.attribute16 = hr_api.g_varchar2) then
846: p_rec.attribute16 :=
847: pay_opm_shd.g_old_rec.attribute16;
843: pay_opm_shd.g_old_rec.attribute15;
844: End If;
845: If (p_rec.attribute16 = hr_api.g_varchar2) then
846: p_rec.attribute16 :=
847: pay_opm_shd.g_old_rec.attribute16;
848: End If;
849: If (p_rec.attribute17 = hr_api.g_varchar2) then
850: p_rec.attribute17 :=
851: pay_opm_shd.g_old_rec.attribute17;
847: pay_opm_shd.g_old_rec.attribute16;
848: End If;
849: If (p_rec.attribute17 = hr_api.g_varchar2) then
850: p_rec.attribute17 :=
851: pay_opm_shd.g_old_rec.attribute17;
852: End If;
853: If (p_rec.attribute18 = hr_api.g_varchar2) then
854: p_rec.attribute18 :=
855: pay_opm_shd.g_old_rec.attribute18;
851: pay_opm_shd.g_old_rec.attribute17;
852: End If;
853: If (p_rec.attribute18 = hr_api.g_varchar2) then
854: p_rec.attribute18 :=
855: pay_opm_shd.g_old_rec.attribute18;
856: End If;
857: If (p_rec.attribute19 = hr_api.g_varchar2) then
858: p_rec.attribute19 :=
859: pay_opm_shd.g_old_rec.attribute19;
855: pay_opm_shd.g_old_rec.attribute18;
856: End If;
857: If (p_rec.attribute19 = hr_api.g_varchar2) then
858: p_rec.attribute19 :=
859: pay_opm_shd.g_old_rec.attribute19;
860: End If;
861: If (p_rec.attribute20 = hr_api.g_varchar2) then
862: p_rec.attribute20 :=
863: pay_opm_shd.g_old_rec.attribute20;
859: pay_opm_shd.g_old_rec.attribute19;
860: End If;
861: If (p_rec.attribute20 = hr_api.g_varchar2) then
862: p_rec.attribute20 :=
863: pay_opm_shd.g_old_rec.attribute20;
864: End If;
865: If (p_rec.pmeth_information_category = hr_api.g_varchar2) then
866: p_rec.pmeth_information_category :=
867: pay_opm_shd.g_old_rec.pmeth_information_category;
863: pay_opm_shd.g_old_rec.attribute20;
864: End If;
865: If (p_rec.pmeth_information_category = hr_api.g_varchar2) then
866: p_rec.pmeth_information_category :=
867: pay_opm_shd.g_old_rec.pmeth_information_category;
868: End If;
869: If (p_rec.pmeth_information1 = hr_api.g_varchar2) then
870: p_rec.pmeth_information1 :=
871: pay_opm_shd.g_old_rec.pmeth_information1;
867: pay_opm_shd.g_old_rec.pmeth_information_category;
868: End If;
869: If (p_rec.pmeth_information1 = hr_api.g_varchar2) then
870: p_rec.pmeth_information1 :=
871: pay_opm_shd.g_old_rec.pmeth_information1;
872: End If;
873: If (p_rec.pmeth_information2 = hr_api.g_varchar2) then
874: p_rec.pmeth_information2 :=
875: pay_opm_shd.g_old_rec.pmeth_information2;
871: pay_opm_shd.g_old_rec.pmeth_information1;
872: End If;
873: If (p_rec.pmeth_information2 = hr_api.g_varchar2) then
874: p_rec.pmeth_information2 :=
875: pay_opm_shd.g_old_rec.pmeth_information2;
876: End If;
877: If (p_rec.pmeth_information3 = hr_api.g_varchar2) then
878: p_rec.pmeth_information3 :=
879: pay_opm_shd.g_old_rec.pmeth_information3;
875: pay_opm_shd.g_old_rec.pmeth_information2;
876: End If;
877: If (p_rec.pmeth_information3 = hr_api.g_varchar2) then
878: p_rec.pmeth_information3 :=
879: pay_opm_shd.g_old_rec.pmeth_information3;
880: End If;
881: If (p_rec.pmeth_information4 = hr_api.g_varchar2) then
882: p_rec.pmeth_information4 :=
883: pay_opm_shd.g_old_rec.pmeth_information4;
879: pay_opm_shd.g_old_rec.pmeth_information3;
880: End If;
881: If (p_rec.pmeth_information4 = hr_api.g_varchar2) then
882: p_rec.pmeth_information4 :=
883: pay_opm_shd.g_old_rec.pmeth_information4;
884: End If;
885: If (p_rec.pmeth_information5 = hr_api.g_varchar2) then
886: p_rec.pmeth_information5 :=
887: pay_opm_shd.g_old_rec.pmeth_information5;
883: pay_opm_shd.g_old_rec.pmeth_information4;
884: End If;
885: If (p_rec.pmeth_information5 = hr_api.g_varchar2) then
886: p_rec.pmeth_information5 :=
887: pay_opm_shd.g_old_rec.pmeth_information5;
888: End If;
889: If (p_rec.pmeth_information6 = hr_api.g_varchar2) then
890: p_rec.pmeth_information6 :=
891: pay_opm_shd.g_old_rec.pmeth_information6;
887: pay_opm_shd.g_old_rec.pmeth_information5;
888: End If;
889: If (p_rec.pmeth_information6 = hr_api.g_varchar2) then
890: p_rec.pmeth_information6 :=
891: pay_opm_shd.g_old_rec.pmeth_information6;
892: End If;
893: If (p_rec.pmeth_information7 = hr_api.g_varchar2) then
894: p_rec.pmeth_information7 :=
895: pay_opm_shd.g_old_rec.pmeth_information7;
891: pay_opm_shd.g_old_rec.pmeth_information6;
892: End If;
893: If (p_rec.pmeth_information7 = hr_api.g_varchar2) then
894: p_rec.pmeth_information7 :=
895: pay_opm_shd.g_old_rec.pmeth_information7;
896: End If;
897: If (p_rec.pmeth_information8 = hr_api.g_varchar2) then
898: p_rec.pmeth_information8 :=
899: pay_opm_shd.g_old_rec.pmeth_information8;
895: pay_opm_shd.g_old_rec.pmeth_information7;
896: End If;
897: If (p_rec.pmeth_information8 = hr_api.g_varchar2) then
898: p_rec.pmeth_information8 :=
899: pay_opm_shd.g_old_rec.pmeth_information8;
900: End If;
901: If (p_rec.pmeth_information9 = hr_api.g_varchar2) then
902: p_rec.pmeth_information9 :=
903: pay_opm_shd.g_old_rec.pmeth_information9;
899: pay_opm_shd.g_old_rec.pmeth_information8;
900: End If;
901: If (p_rec.pmeth_information9 = hr_api.g_varchar2) then
902: p_rec.pmeth_information9 :=
903: pay_opm_shd.g_old_rec.pmeth_information9;
904: End If;
905: If (p_rec.pmeth_information10 = hr_api.g_varchar2) then
906: p_rec.pmeth_information10 :=
907: pay_opm_shd.g_old_rec.pmeth_information10;
903: pay_opm_shd.g_old_rec.pmeth_information9;
904: End If;
905: If (p_rec.pmeth_information10 = hr_api.g_varchar2) then
906: p_rec.pmeth_information10 :=
907: pay_opm_shd.g_old_rec.pmeth_information10;
908: End If;
909: If (p_rec.pmeth_information11 = hr_api.g_varchar2) then
910: p_rec.pmeth_information11 :=
911: pay_opm_shd.g_old_rec.pmeth_information11;
907: pay_opm_shd.g_old_rec.pmeth_information10;
908: End If;
909: If (p_rec.pmeth_information11 = hr_api.g_varchar2) then
910: p_rec.pmeth_information11 :=
911: pay_opm_shd.g_old_rec.pmeth_information11;
912: End If;
913: If (p_rec.pmeth_information12 = hr_api.g_varchar2) then
914: p_rec.pmeth_information12 :=
915: pay_opm_shd.g_old_rec.pmeth_information12;
911: pay_opm_shd.g_old_rec.pmeth_information11;
912: End If;
913: If (p_rec.pmeth_information12 = hr_api.g_varchar2) then
914: p_rec.pmeth_information12 :=
915: pay_opm_shd.g_old_rec.pmeth_information12;
916: End If;
917: If (p_rec.pmeth_information13 = hr_api.g_varchar2) then
918: p_rec.pmeth_information13 :=
919: pay_opm_shd.g_old_rec.pmeth_information13;
915: pay_opm_shd.g_old_rec.pmeth_information12;
916: End If;
917: If (p_rec.pmeth_information13 = hr_api.g_varchar2) then
918: p_rec.pmeth_information13 :=
919: pay_opm_shd.g_old_rec.pmeth_information13;
920: End If;
921: If (p_rec.pmeth_information14 = hr_api.g_varchar2) then
922: p_rec.pmeth_information14 :=
923: pay_opm_shd.g_old_rec.pmeth_information14;
919: pay_opm_shd.g_old_rec.pmeth_information13;
920: End If;
921: If (p_rec.pmeth_information14 = hr_api.g_varchar2) then
922: p_rec.pmeth_information14 :=
923: pay_opm_shd.g_old_rec.pmeth_information14;
924: End If;
925: If (p_rec.pmeth_information15 = hr_api.g_varchar2) then
926: p_rec.pmeth_information15 :=
927: pay_opm_shd.g_old_rec.pmeth_information15;
923: pay_opm_shd.g_old_rec.pmeth_information14;
924: End If;
925: If (p_rec.pmeth_information15 = hr_api.g_varchar2) then
926: p_rec.pmeth_information15 :=
927: pay_opm_shd.g_old_rec.pmeth_information15;
928: End If;
929: If (p_rec.pmeth_information16 = hr_api.g_varchar2) then
930: p_rec.pmeth_information16 :=
931: pay_opm_shd.g_old_rec.pmeth_information16;
927: pay_opm_shd.g_old_rec.pmeth_information15;
928: End If;
929: If (p_rec.pmeth_information16 = hr_api.g_varchar2) then
930: p_rec.pmeth_information16 :=
931: pay_opm_shd.g_old_rec.pmeth_information16;
932: End If;
933: If (p_rec.pmeth_information17 = hr_api.g_varchar2) then
934: p_rec.pmeth_information17 :=
935: pay_opm_shd.g_old_rec.pmeth_information17;
931: pay_opm_shd.g_old_rec.pmeth_information16;
932: End If;
933: If (p_rec.pmeth_information17 = hr_api.g_varchar2) then
934: p_rec.pmeth_information17 :=
935: pay_opm_shd.g_old_rec.pmeth_information17;
936: End If;
937: If (p_rec.pmeth_information18 = hr_api.g_varchar2) then
938: p_rec.pmeth_information18 :=
939: pay_opm_shd.g_old_rec.pmeth_information18;
935: pay_opm_shd.g_old_rec.pmeth_information17;
936: End If;
937: If (p_rec.pmeth_information18 = hr_api.g_varchar2) then
938: p_rec.pmeth_information18 :=
939: pay_opm_shd.g_old_rec.pmeth_information18;
940: End If;
941: If (p_rec.pmeth_information19 = hr_api.g_varchar2) then
942: p_rec.pmeth_information19 :=
943: pay_opm_shd.g_old_rec.pmeth_information19;
939: pay_opm_shd.g_old_rec.pmeth_information18;
940: End If;
941: If (p_rec.pmeth_information19 = hr_api.g_varchar2) then
942: p_rec.pmeth_information19 :=
943: pay_opm_shd.g_old_rec.pmeth_information19;
944: End If;
945: If (p_rec.pmeth_information20 = hr_api.g_varchar2) then
946: p_rec.pmeth_information20 :=
947: pay_opm_shd.g_old_rec.pmeth_information20;
943: pay_opm_shd.g_old_rec.pmeth_information19;
944: End If;
945: If (p_rec.pmeth_information20 = hr_api.g_varchar2) then
946: p_rec.pmeth_information20 :=
947: pay_opm_shd.g_old_rec.pmeth_information20;
948: End If;
949: If (p_rec.transfer_to_gl_flag = hr_api.g_varchar2) then
950: p_rec.transfer_to_gl_flag :=
951: pay_opm_shd.g_old_rec.transfer_to_gl_flag;
947: pay_opm_shd.g_old_rec.pmeth_information20;
948: End If;
949: If (p_rec.transfer_to_gl_flag = hr_api.g_varchar2) then
950: p_rec.transfer_to_gl_flag :=
951: pay_opm_shd.g_old_rec.transfer_to_gl_flag;
952: End If;
953: If (p_rec.cost_payment = hr_api.g_varchar2) then
954: p_rec.cost_payment :=
955: pay_opm_shd.g_old_rec.cost_payment;
951: pay_opm_shd.g_old_rec.transfer_to_gl_flag;
952: End If;
953: If (p_rec.cost_payment = hr_api.g_varchar2) then
954: p_rec.cost_payment :=
955: pay_opm_shd.g_old_rec.cost_payment;
956: End If;
957: If (p_rec.cost_cleared_payment = hr_api.g_varchar2) then
958: p_rec.cost_cleared_payment :=
959: pay_opm_shd.g_old_rec.cost_cleared_payment;
955: pay_opm_shd.g_old_rec.cost_payment;
956: End If;
957: If (p_rec.cost_cleared_payment = hr_api.g_varchar2) then
958: p_rec.cost_cleared_payment :=
959: pay_opm_shd.g_old_rec.cost_cleared_payment;
960: End If;
961: If (p_rec.cost_cleared_void_payment = hr_api.g_varchar2) then
962: p_rec.cost_cleared_void_payment :=
963: pay_opm_shd.g_old_rec.cost_cleared_void_payment;
959: pay_opm_shd.g_old_rec.cost_cleared_payment;
960: End If;
961: If (p_rec.cost_cleared_void_payment = hr_api.g_varchar2) then
962: p_rec.cost_cleared_void_payment :=
963: pay_opm_shd.g_old_rec.cost_cleared_void_payment;
964: End If;
965: If (p_rec.exclude_manual_payment = hr_api.g_varchar2) then
966: p_rec.exclude_manual_payment :=
967: pay_opm_shd.g_old_rec.exclude_manual_payment;
963: pay_opm_shd.g_old_rec.cost_cleared_void_payment;
964: End If;
965: If (p_rec.exclude_manual_payment = hr_api.g_varchar2) then
966: p_rec.exclude_manual_payment :=
967: pay_opm_shd.g_old_rec.exclude_manual_payment;
968: End If;
969: --
970: End convert_defs;
971: --
974: -- ----------------------------------------------------------------------------
975: Procedure upd
976: (p_effective_date in date
977: ,p_datetrack_mode in varchar2
978: ,p_rec in out nocopy pay_opm_shd.g_rec_type
979: ) is
980: --
981: l_proc varchar2(72) := g_package||'upd';
982: l_validation_start_date date;
990: dt_api.validate_dt_upd_mode(p_datetrack_mode => p_datetrack_mode);
991: --
992: -- We must lock the row which we need to update.
993: --
994: pay_opm_shd.lck
995: (p_effective_date => p_effective_date
996: ,p_datetrack_mode => p_datetrack_mode
997: ,p_org_payment_method_id => p_rec.org_payment_method_id
998: ,p_object_version_number => p_rec.object_version_number
1109: ,p_effective_end_date out nocopy date
1110: ,p_comment_id out nocopy number
1111: ) is
1112: --
1113: l_rec pay_opm_shd.g_rec_type;
1114: l_proc varchar2(72) := g_package||'upd';
1115: --
1116: Begin
1117: hr_utility.set_location('Entering:'||l_proc, 5);
1119: -- Call conversion function to turn arguments into the
1120: -- l_rec structure.
1121: --
1122: l_rec :=
1123: pay_opm_shd.convert_args
1124: (p_org_payment_method_id
1125: ,null
1126: ,null
1127: ,hr_api.g_number