[Home] [Help]
84: epa.allow_repeat_in_cycle,
85: epa.day_tolerance,
86: epa.next_service_start_date,
87: epa.next_service_end_date
88: from eam_pm_activities epa, mtl_eam_asset_activities meaa
89: where epa.pm_schedule_id=p_pm_schedule_id
90: and epa.activity_association_id =meaa.source_tmpl_id
91: and meaa.maintenance_object_id=l_maintenance_object_id;
92:
185: begin
186:
187: select maintenance_object_id, maintenance_object_type
188: into l_maintenance_object_id, l_maintenance_object_type
189: from mtl_eam_asset_activities
190: where activity_association_id=p_activity_assoc_id;
191:
192: pm_header_row.maintenance_object_id := l_maintenance_object_id;
193: pm_header_row.maintenance_object_type := 3;
398:
399: -- Get maintenance object id and maintenance type
400: select maintenance_object_id, maintenance_object_type
401: into l_maintenance_object_id, l_maintenance_object_type
402: from mtl_eam_asset_activities
403: where activity_association_id=p_activity_assoc_id;
404:
405: -- for runtime rule, get the meter id
406: if (a_pm_rule.meter_id is not null) then
583: -- of l_activity_assoc_id, that have auto_instantiation_flag as "Y"
584:
585: cursor pm_template_csr_old IS
586: select pm_schedule_id
587: from eam_pm_schedulings eps, mtl_eam_asset_activities meaa, eam_pm_set_names epsn
588: where eps.activity_association_id=meaa.source_tmpl_id
589: and meaa.activity_association_id=l_activity_assoc_id
590: and eps.tmpl_flag='Y'
591: and eps.auto_instantiation_flag='Y'
593: and (epsn.end_date is null or (epsn.end_date > sysdate and epsn.end_date > nvl(eps.to_effective_date, sysdate)));
594:
595: cursor pm_template_csr IS
596: select distinct eps.pm_schedule_id
597: from eam_pm_schedulings eps, eam_pm_activities epa,mtl_eam_asset_activities meaa, eam_pm_set_names epsn
598: where eps.pm_schedule_id=epa.pm_schedule_id
599: and epa.activity_association_id=meaa.source_tmpl_id
600: and meaa.activity_association_id=l_activity_assoc_id
601: and eps.tmpl_flag='Y'
2487: select last_service_start_date, last_service_end_date,last_scheduled_start_date,last_scheduled_end_date,
2488: maintenance_object_id,asset_activity_id
2489: into l_last_service_start_date, l_last_service_end_date,l_last_scheduled_start_date,l_last_scheduled_end_date,
2490: l_maintenance_object_id,l_asset_activity_id
2491: from mtl_eam_asset_activities
2492: where activity_association_id=p_pm_activity_grp_rec.activity_association_id;
2493:
2494: select distinct msi.concatenated_segments into l_act_name
2495: from mtl_system_items_b_kfv msi
2517: l_lsi_updated := 'Y';
2518: x_activities :=l_act_name;
2519: end if;
2520:
2521: UPDATE mtl_eam_asset_activities
2522: SET last_service_start_date = l_last_service_start_date,
2523: last_service_end_date = l_last_service_end_date,
2524: last_update_date=sysdate, last_updated_by=fnd_global.user_id,
2525: last_update_login=fnd_global.login_id
2567: x_activities :=l_act_name;
2568: end;
2569: end if;
2570:
2571: UPDATE mtl_eam_asset_activities meaa
2572: SET meaa.last_scheduled_start_date = l_last_scheduled_start_date,
2573: meaa.last_scheduled_end_date = l_last_scheduled_end_date,
2574: meaa.wip_entity_id=l_wip_entity_id,
2575: last_update_date=sysdate, last_updated_by=fnd_global.user_id,
2721: if (p_pm_schedule_rec.tmpl_flag='N') then
2722:
2723: select last_service_start_date, last_service_end_date
2724: into l_last_service_start_date, l_last_service_end_date
2725: from mtl_eam_asset_activities
2726: where activity_association_id=p_pm_activity_grp_rec.activity_association_id;
2727:
2728: if (l_last_service_start_date is null or l_last_service_end_date is null) then
2729: x_reason_failed:='EAM_PM_HD_ACT_NO_SERVICE_DATE';
3040:
3041: if (l_rescheduling_point in (1,5,6)) then
3042:
3043: select max(meaa.last_service_start_date) into l_last_service_date
3044: from mtl_eam_asset_activities meaa, eam_pm_activities epa, eam_pm_schedulings eps
3045: where epa.activity_association_id=meaa.activity_association_id and
3046: epa.pm_schedule_id=eps.pm_schedule_id and eps.pm_schedule_id=p_pm_schedule_id and
3047: ((epa.ALLOW_REPEAT_IN_CYCLE='N' and epa.interval_multiple=eps.current_seq) or
3048: (epa.ALLOW_REPEAT_IN_CYCLE='Y' and mod(eps.current_seq, epa.interval_multiple)=0))
3051:
3052: elsif (l_rescheduling_point = 2) then
3053:
3054: select max(meaa.last_service_end_date) into l_last_service_date
3055: from mtl_eam_asset_activities meaa, eam_pm_activities epa, eam_pm_schedulings eps
3056: where epa.activity_association_id=meaa.activity_association_id and
3057: epa.pm_schedule_id=eps.pm_schedule_id and eps.pm_schedule_id=p_pm_schedule_id and
3058: ((epa.ALLOW_REPEAT_IN_CYCLE='N' and epa.interval_multiple=eps.current_seq) or
3059: (epa.ALLOW_REPEAT_IN_CYCLE='Y' and mod(eps.current_seq, epa.interval_multiple)=0))
3062:
3063: elsif (l_rescheduling_point = 3) then
3064:
3065: select max(meaa.last_scheduled_start_date) into l_last_service_date
3066: from mtl_eam_asset_activities meaa, eam_pm_activities epa, eam_pm_schedulings eps
3067: where epa.activity_association_id=meaa.activity_association_id and
3068: epa.pm_schedule_id=eps.pm_schedule_id and eps.pm_schedule_id=p_pm_schedule_id and
3069: ((epa.ALLOW_REPEAT_IN_CYCLE='N' and epa.interval_multiple=eps.current_seq) or
3070: (epa.ALLOW_REPEAT_IN_CYCLE='Y' and mod(eps.current_seq, epa.interval_multiple)=0))
3073:
3074: elsif (l_rescheduling_point = 4) then
3075:
3076: select max(meaa.last_scheduled_end_date) into l_last_service_date
3077: from mtl_eam_asset_activities meaa, eam_pm_activities epa, eam_pm_schedulings eps
3078: where epa.activity_association_id=meaa.activity_association_id and
3079: epa.pm_schedule_id=eps.pm_schedule_id and eps.pm_schedule_id=p_pm_schedule_id and
3080: ((epa.ALLOW_REPEAT_IN_CYCLE='N' and epa.interval_multiple=eps.current_seq) or
3081: (epa.ALLOW_REPEAT_IN_CYCLE='Y' and mod(eps.current_seq, epa.interval_multiple)=0))
3089:
3090: if (l_rescheduling_point in (1,5,6)) then
3091:
3092: select max(meaa.last_service_start_date) into l_last_service_date
3093: from mtl_eam_asset_activities meaa, eam_pm_activities epa, eam_pm_schedulings eps
3094: where epa.activity_association_id=meaa.activity_association_id and
3095: epa.pm_schedule_id=eps.pm_schedule_id and eps.pm_schedule_id=p_pm_schedule_id
3096: and nvl(meaa.start_date_active, sysdate-1) < sysdate and nvl(meaa.end_date_active, sysdate+1) > sysdate; /*bug 10381070 */
3097:
3097:
3098: elsif (l_rescheduling_point = 2) then
3099:
3100: select max(meaa.last_service_end_date) into l_last_service_date
3101: from mtl_eam_asset_activities meaa, eam_pm_activities epa, eam_pm_schedulings eps
3102: where epa.activity_association_id=meaa.activity_association_id and
3103: epa.pm_schedule_id=eps.pm_schedule_id and eps.pm_schedule_id=p_pm_schedule_id
3104: and nvl(meaa.start_date_active, sysdate-1) < sysdate and nvl(meaa.end_date_active, sysdate+1) > sysdate; /*bug 10381070 */
3105:
3105:
3106: elsif (l_rescheduling_point = 3) then
3107:
3108: select max(meaa.last_scheduled_start_date) into l_last_service_date
3109: from mtl_eam_asset_activities meaa, eam_pm_activities epa, eam_pm_schedulings eps
3110: where epa.activity_association_id=meaa.activity_association_id and
3111: epa.pm_schedule_id=eps.pm_schedule_id and eps.pm_schedule_id=p_pm_schedule_id
3112: and nvl(meaa.start_date_active, sysdate-1) < sysdate and nvl(meaa.end_date_active, sysdate+1) > sysdate; /*bug 10381070 */
3113:
3113:
3114: elsif (l_rescheduling_point = 4) then
3115:
3116: select max(meaa.last_scheduled_end_date) into l_last_service_date
3117: from mtl_eam_asset_activities meaa, eam_pm_activities epa, eam_pm_schedulings eps
3118: where epa.activity_association_id=meaa.activity_association_id and
3119: epa.pm_schedule_id=eps.pm_schedule_id and eps.pm_schedule_id=p_pm_schedule_id
3120: and nvl(meaa.start_date_active, sysdate-1) < sysdate and nvl(meaa.end_date_active, sysdate+1) > sysdate; /*bug 10381070 */
3121:
3128: --lowest interval multiple activity in case of a tie
3129: -- modified for 9754424, handled no_data_found exception incase of l_last_service_date is null.
3130: Begin
3131: select * into l_act_assoc_id from (
3132: SELECT meaa.activity_association_id FROM mtl_eam_asset_activities meaa, eam_pm_activities epa
3133: WHERE decode(l_rescheduling_point,2,last_service_end_date ,3,last_scheduled_start_date, 4,last_scheduled_end_date ,last_service_start_date)
3134: = l_last_service_date
3135: AND meaa.activity_association_id = epa.activity_association_id AND epa.pm_schedule_id = p_pm_schedule_id
3136: and nvl(meaa.start_date_active, sysdate-1) < sysdate and nvl(meaa.end_date_active, sysdate+1) > sysdate /*bug 10381070 */