DBA Data[Home] [Help]

APPS.PAY_BTL_BUS dependencies on PAY_BTL_SHD

Line 20: p_rec in pay_btl_shd.g_rec_type)

16: -- ---------------------------------------------------------------------------
17: -- |----------------------< Validate_Input_Values >--------------------------|
18: -- ---------------------------------------------------------------------------
19: Procedure Validate_Input_Values (p_session_date in date,
20: p_rec in pay_btl_shd.g_rec_type)
21: is
22: Cursor csr_Input_value_set (P_Element_type_id in number,
23: P_Effective_date in Date)
24: is

Line 246: p_segment IN pay_btl_shd.segment_value

242: --
243: Procedure chk_mandatory_segments(
244: p_level IN VARCHAR2,
245: p_cost_id_flex_num IN NUMBER,
246: p_segment IN pay_btl_shd.segment_value
247: ) is
248: l_proc VARCHAR2(72) := g_package||'check_mandatory_segments';
249: --
250:

Line 290: l_required_segment pay_btl_shd.Segment_value

286:
287:
288: -- local variable to hold segments needed for the particular level
289: -- initialy mark all segment as not required
290: l_required_segment pay_btl_shd.Segment_value
291: := pay_btl_shd.segment_value('N','N','N','N','N','N','N','N','N','N',
292: 'N','N','N','N','N','N','N','N','N','N',
293: 'N','N','N','N','N','N','N','N','N','N'
294: );

Line 291: := pay_btl_shd.segment_value('N','N','N','N','N','N','N','N','N','N',

287:
288: -- local variable to hold segments needed for the particular level
289: -- initialy mark all segment as not required
290: l_required_segment pay_btl_shd.Segment_value
291: := pay_btl_shd.segment_value('N','N','N','N','N','N','N','N','N','N',
292: 'N','N','N','N','N','N','N','N','N','N',
293: 'N','N','N','N','N','N','N','N','N','N'
294: );
295: --

Line 529: (p_rec in pay_btl_shd.g_rec_type

525: --
526: -- {End Of Comments}
527: -- ----------------------------------------------------------------------------
528: Procedure chk_non_updateable_args
529: (p_rec in pay_btl_shd.g_rec_type
530: ) IS
531: --
532: l_proc varchar2(72) := g_package || 'chk_non_updateable_args';
533: l_error EXCEPTION;

Line 541: IF NOT pay_btl_shd.api_updating

537: --
538: -- Only proceed with the validation if a row exists for the current
539: -- record in the HR Schema.
540: --
541: IF NOT pay_btl_shd.api_updating
542: (p_batch_line_id => p_rec.batch_line_id
543: ,p_object_version_number => p_rec.object_version_number
544: ) THEN
545: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');

Line 554: pay_btl_shd.g_old_rec.batch_id then

550: --
551: hr_utility.set_location(l_proc, 10);
552: --
553: if nvl(p_rec.batch_id, hr_api.g_number) <>
554: pay_btl_shd.g_old_rec.batch_id then
555: l_argument := 'batch_id';
556: raise l_error;
557: end if;
558: --

Line 694: pay_btl_shd.constraint_error('PAY_BATCH_LINES_FK3');

690: open csr_batch_id_exists;
691: fetch csr_batch_id_exists into l_dummy;
692: if csr_batch_id_exists%notfound then
693: close csr_batch_id_exists;
694: pay_btl_shd.constraint_error('PAY_BATCH_LINES_FK3');
695: end if;
696: close csr_batch_id_exists;
697: end if;
698: --

Line 786: l_api_updating := pay_btl_shd.api_updating

782: );
783: --
784: hr_utility.set_location(l_proc, 10);
785: --
786: l_api_updating := pay_btl_shd.api_updating
787: (p_batch_line_id => p_batch_line_id,
788: p_object_version_number => p_object_version_number
789: );
790: hr_utility.set_location(l_proc,20);

Line 795: nvl(pay_btl_shd.g_old_rec.batch_line_status,hr_api.g_varchar2) <>

791: --
792: -- Only proceed with SQL validation if absolutely necessary
793: --
794: if ((l_api_updating and
795: nvl(pay_btl_shd.g_old_rec.batch_line_status,hr_api.g_varchar2) <>
796: nvl(p_batch_line_status,hr_api.g_varchar2))
797: or (NOT l_api_updating)) then
798: --
799: hr_utility.set_location(l_proc,30);

Line 807: pay_btl_shd.constraint_error('PAY_BCHL_BATCH_LINE_STATUS_CHK');

803: if hr_api.not_exists_in_hr_lookups
804: (p_effective_date => p_session_date,
805: p_lookup_type => 'BATCH_STATUS',
806: p_lookup_code => p_batch_line_status) then
807: pay_btl_shd.constraint_error('PAY_BCHL_BATCH_LINE_STATUS_CHK');
808: end if;
809: --
810: --
811: if ((l_api_updating) and

Line 812: nvl(pay_btl_shd.g_old_rec.batch_line_status,hr_api.g_varchar2) <>

808: end if;
809: --
810: --
811: if ((l_api_updating) and
812: nvl(pay_btl_shd.g_old_rec.batch_line_status,hr_api.g_varchar2) <>
813: nvl(p_batch_line_status,hr_api.g_varchar2)) then
814: --
815: IF pay_btl_shd.g_old_rec.batch_line_status in ('U') then
816: if p_batch_line_status not in ('U') then

Line 815: IF pay_btl_shd.g_old_rec.batch_line_status in ('U') then

811: if ((l_api_updating) and
812: nvl(pay_btl_shd.g_old_rec.batch_line_status,hr_api.g_varchar2) <>
813: nvl(p_batch_line_status,hr_api.g_varchar2)) then
814: --
815: IF pay_btl_shd.g_old_rec.batch_line_status in ('U') then
816: if p_batch_line_status not in ('U') then
817: Fnd_Message.Set_Name('PER', 'HR_289267_STATUS_INVALID');
818: fnd_message.raise_error;
819: end if;

Line 820: ELSIF pay_btl_shd.g_old_rec.batch_line_status in ('V') then

816: if p_batch_line_status not in ('U') then
817: Fnd_Message.Set_Name('PER', 'HR_289267_STATUS_INVALID');
818: fnd_message.raise_error;
819: end if;
820: ELSIF pay_btl_shd.g_old_rec.batch_line_status in ('V') then
821: if p_batch_line_status not in ('V','U') then
822: Fnd_Message.Set_Name('PER', 'HR_289267_STATUS_INVALID');
823: fnd_message.raise_error;
824: end if;

Line 825: ELSIF pay_btl_shd.g_old_rec.batch_line_status in ('T') then

821: if p_batch_line_status not in ('V','U') then
822: Fnd_Message.Set_Name('PER', 'HR_289267_STATUS_INVALID');
823: fnd_message.raise_error;
824: end if;
825: ELSIF pay_btl_shd.g_old_rec.batch_line_status in ('T') then
826: if p_batch_line_status not in ('T') then
827: Fnd_Message.Set_Name('PER', 'HR_289267_STATUS_INVALID');
828: fnd_message.raise_error;
829: end if;

Line 830: ELSIF pay_btl_shd.g_old_rec.batch_line_status in ('E') then

826: if p_batch_line_status not in ('T') then
827: Fnd_Message.Set_Name('PER', 'HR_289267_STATUS_INVALID');
828: fnd_message.raise_error;
829: end if;
830: ELSIF pay_btl_shd.g_old_rec.batch_line_status in ('E') then
831: if p_batch_line_status not in ('E','U') then
832: Fnd_Message.Set_Name('PER', 'HR_289267_STATUS_INVALID');
833: fnd_message.raise_error;
834: end if;

Line 929: l_api_updating := pay_btl_shd.api_updating

925: );
926: --
927: hr_utility.set_location(l_proc, 10);
928: --
929: l_api_updating := pay_btl_shd.api_updating
930: (p_batch_line_id => p_batch_line_id,
931: p_object_version_number => p_object_version_number
932: );
933: hr_utility.set_location(l_proc,20);

Line 938: nvl(pay_btl_shd.g_old_rec.entry_type,hr_api.g_varchar2) <>

934: --
935: -- Only proceed with SQL validation if absolutely necessary
936: --
937: if ((l_api_updating and
938: nvl(pay_btl_shd.g_old_rec.entry_type,hr_api.g_varchar2) <>
939: nvl(p_entry_type,hr_api.g_varchar2))
940: or (NOT l_api_updating)) then
941: --
942: hr_utility.set_location(l_proc,30);

Line 956: pay_btl_shd.constraint_error('PAY_BCHL_ENTRY_TYPE_CHK');

952: if hr_api.not_exists_in_hr_lookups
953: (p_effective_date => p_session_date,
954: p_lookup_type => 'ENTRY_TYPE',
955: p_lookup_code => p_entry_type) then
956: pay_btl_shd.constraint_error('PAY_BCHL_ENTRY_TYPE_CHK');
957: end if;
958: --
959: end if;
960: --

Line 1046: p_rec in pay_btl_shd.g_rec_type

1042: -- ----------------------------------------------------------------------------
1043: -- |-------------------------< chk_flex_segments >----------------------------|
1044: -- ----------------------------------------------------------------------------
1045: procedure chk_flex_segments(
1046: p_rec in pay_btl_shd.g_rec_type
1047: )
1048: is
1049:
1050: cursor csr_bg_id(c_batch_id pay_batch_headers.batch_id%type) is

Line 1062: l_segments pay_btl_shd.segment_value;

1058: where business_group_id= c_business_group_id;
1059:
1060: l_business_group_id pay_batch_headers.business_group_id%type;
1061: l_id_flex_num pay_cost_allocation_keyflex.id_flex_num%type;
1062: l_segments pay_btl_shd.segment_value;
1063:
1064:
1065: begin
1066:

Line 1086: l_segments := pay_btl_shd.segment_value( p_rec.segment1, p_rec.segment2, p_rec.segment3, p_rec.segment4,

1082: end if;
1083: close csr_id_flex_num;
1084:
1085:
1086: l_segments := pay_btl_shd.segment_value( p_rec.segment1, p_rec.segment2, p_rec.segment3, p_rec.segment4,
1087: p_rec.segment5, p_rec.segment6, p_rec.segment7, p_rec.segment8,
1088: p_rec.segment9, p_rec.segment10,p_rec.segment11,p_rec.segment12,
1089: p_rec.segment13,p_rec.segment14,p_rec.segment15,p_rec.segment16,
1090: p_rec.segment17,p_rec.segment18,p_rec.segment19,p_rec.segment20,

Line 1114: p_rec in pay_btl_shd.g_rec_type

1110: -- |---------------------------< insert_validate >----------------------------|
1111: -- ----------------------------------------------------------------------------
1112: Procedure insert_validate
1113: (p_session_date in date,
1114: p_rec in pay_btl_shd.g_rec_type
1115: ) is
1116: --
1117:
1118:

Line 1167: p_rec in pay_btl_shd.g_rec_type

1163: -- |---------------------------< update_validate >----------------------------|
1164: -- ----------------------------------------------------------------------------
1165: Procedure update_validate
1166: (p_session_date in date,
1167: p_rec in pay_btl_shd.g_rec_type
1168: ) is
1169: --
1170: l_proc varchar2(72) := g_package||'update_validate';
1171: --

Line 1222: (p_rec in pay_btl_shd.g_rec_type

1218: -- ----------------------------------------------------------------------------
1219: -- |---------------------------< delete_validate >----------------------------|
1220: -- ----------------------------------------------------------------------------
1221: Procedure delete_validate
1222: (p_rec in pay_btl_shd.g_rec_type
1223: ) is
1224: --
1225: l_proc varchar2(72) := g_package||'delete_validate';
1226: --