[Home] [Help]
3675:
3676: /*
3677: if p_rec.customer_id is not null then
3678:
3679: ota_tdb_bus2.check_enrollment_type(p_rec.event_id,
3680: p_rec.delegate_contact_id,
3681: p_enrollment_type,
3682: p_rec.booking_id);
3683:
3685: */
3686: -- check that the delegate, contact and authorizer are visible when the
3687: -- booking is made
3688: --
3689: ota_tdb_bus2.check_person_visible (p_rec.delegate_person_id,
3690: p_rec.date_booking_placed,
3691: 'Delegate',
3692: p_rec.person_address_type);
3693: --
3693: --
3694: --
3695: -- Check that sponsor and delegate are valid for enrollment
3696: --
3697: ota_tdb_bus2.check_spon_del_validity (p_rec.event_id,
3698: p_rec.organization_id,
3699: p_rec.delegate_person_id,
3700: p_rec.sponsor_person_id,
3701: p_rec.date_booking_placed);
3716: --
3717: -- Check that the delegate contact and sponsor contact exist for
3718: -- the customer for an external enrollment
3719: --
3720: ota_tdb_bus2.check_customer_details(p_rec.customer_id,
3721: p_rec.delegate_contact_id,
3722: p_rec.contact_id);
3723: --
3724: -- Checks whether contact address id is not null and that :
3723: --
3724: -- Checks whether contact address id is not null and that :
3725: -- The address_id is valid for the customer
3726: --
3727: -- ota_tdb_bus2.check_contact_address (p_rec.contact_address_id,
3728: -- p_rec.customer_id);
3729: --
3730: -- Check that when an internal booking is used that certain variables
3731: -- are populated while certain other variables are null
3729: --
3730: -- Check that when an internal booking is used that certain variables
3731: -- are populated while certain other variables are null
3732: --
3733: ota_tdb_bus2.check_organization_details (p_rec.organization_id,
3734: p_rec.delegate_person_id,
3735: p_rec.delegate_assignment_id,
3736: p_rec.sponsor_person_id,
3737: p_rec.sponsor_assignment_id);
3796: if p_rec.corespondent = 'S' then
3797: --
3798: -- Check delegate has a valid address in per_addresses
3799: --
3800: ota_tdb_bus2.check_person_address(p_rec.delegate_person_id,
3801: p_rec.person_address_id,
3802: 'Delegate');
3803: --
3804: elsif p_rec.corespondent = 'C' then
3804: elsif p_rec.corespondent = 'C' then
3805: --
3806: -- Check contact has a valid address in per_addresses
3807: --
3808: ota_tdb_bus2.check_person_address(p_rec.sponsor_person_id,
3809: p_rec.person_address_id,
3810: 'Contact');
3811: --
3812: end if;
3884: );
3885: --
3886: -- Check business group is the same for all persons and assignments
3887: --
3888: ota_tdb_bus2.check_org_business_group (p_rec.event_id,
3889: p_rec.business_group_id,
3890: p_rec.organization_id,
3891: p_rec.delegate_person_id,
3892: p_rec.sponsor_person_id,
3899: ,p_rec.org_id);
3900:
3901: /*Enhancement 1823602*/
3902: IF p_rec.line_id IS NOT NULL THEN
3903: ota_tdb_bus2.check_commitment_date(p_rec.line_id,
3904: p_rec.event_id);
3905: END IF;
3906: /*Enhancement 1823602*/
3907:
4055: l_event_record_use := 'NEW EVENT';
4056: --
4057: end if;
4058: --
4059: ota_tdb_bus2.check_person_visible (p_rec.delegate_person_id,
4060: p_rec.date_booking_placed,
4061: 'Delegate',
4062: p_rec.person_address_type);
4063: --
4088: l_contact_id_changed or
4089: l_date_booking_placed_changed and
4090: p_rec.customer_id is not null then
4091:
4092: ota_tdb_bus2.check_enrollment_type(p_rec.event_id,
4093: p_rec.delegate_contact_id,
4094: p_enrollment_type,
4095: p_rec.booking_id);
4096:
4102: -- The address_id is valid for the customer
4103: --
4104: if l_contact_address_id_changed or
4105: l_customer_id_changed then
4106: -- ota_tdb_bus2.check_contact_address (p_rec.contact_address_id,
4107: -- p_rec.customer_id);
4108: null;
4109: end if;
4110: --
4115: l_sponsor_person_id_changed or
4116: l_delegate_ass_changed or
4117: l_sponsor_ass_changed then
4118: --
4119: ota_tdb_bus2.check_org_business_group (p_rec.event_id,
4120: p_rec.business_group_id,
4121: p_rec.organization_id,
4122: p_rec.delegate_person_id,
4123: p_rec.sponsor_person_id,
4130: if l_event_id_changed or
4131: l_delegate_person_id_changed or
4132: l_sponsor_person_id_changed or
4133: l_organization_id_changed then
4134: ota_tdb_bus2.check_spon_del_validity ( p_rec.event_id,
4135: p_rec.organization_id,
4136: p_rec.delegate_person_id,
4137: p_rec.sponsor_person_id,
4138: p_rec.date_booking_placed);
4179: if p_rec.corespondent = 'S' then
4180: --
4181: -- Check delegate has a valid address in per_addresses
4182: --
4183: ota_tdb_bus2.check_person_address(p_rec.delegate_person_id,
4184: p_rec.person_address_id,
4185: 'Delegate');
4186: --
4187: elsif p_rec.corespondent = 'C' then
4187: elsif p_rec.corespondent = 'C' then
4188: --
4189: -- Check contact has a valid address in per_addresses
4190: --
4191: ota_tdb_bus2.check_person_address(p_rec.sponsor_person_id,
4192: p_rec.person_address_id,
4193: 'Contact');
4194: --
4195: end if;
4202: --
4203: if l_customer_id_changed or
4204: l_delegate_contact_id_changed or
4205: l_contact_id_changed then
4206: ota_tdb_bus2.check_customer_details(p_rec.customer_id,
4207: p_rec.delegate_contact_id,
4208: p_rec.contact_id);
4209: end if;
4210: --
4212: --
4213: if l_delegate_person_id_changed or
4214: l_sponsor_person_id_changed or
4215: l_organization_id_changed then
4216: ota_tdb_bus2.check_organization_details (p_rec.organization_id,
4217: p_rec.delegate_person_id,
4218: p_rec.delegate_assignment_id,
4219: p_rec.sponsor_person_id,
4220: p_rec.sponsor_assignment_id);
4399: ,p_rec.line_id
4400: ,p_rec.org_id);
4401:
4402: if l_old_event_id_changed then
4403: ota_tdb_bus2.chk_old_event_changed
4404: (p_rec.booking_id
4405: ,p_rec.old_event_id);
4406: end if;
4407: /* Enhancement 1823602*/
4405: ,p_rec.old_event_id);
4406: end if;
4407: /* Enhancement 1823602*/
4408: IF p_rec.line_id IS NOT NULL THEN
4409: ota_tdb_bus2.check_commitment_date(p_rec.line_id,
4410: p_rec.event_id);
4411: END IF;
4412: /*Enhancement 1823602*/
4413: /* Bug 4401588 */