[Home] [Help]
260: IF lreturn_status >= 0 THEN
261:
262: IF (batch_last_update > orig_last_update_date) AND
263: (p_action_type <> 1) THEN
264: fnd_message.set_name('GMP','GMP_BATCH_HEADER_CHANGED');
265: fnd_msg_pub.add ;
266: e_msg := e_msg || ' Batch header is changed.';
267: breturn_status := -1 ;
268: ELSIF (p_start_date < sysdate AND p_action_type = 1) THEN
265: fnd_msg_pub.add ;
266: e_msg := e_msg || ' Batch header is changed.';
267: breturn_status := -1 ;
268: ELSIF (p_start_date < sysdate AND p_action_type = 1) THEN
269: fnd_message.set_name('GMP','GMP_BATCH_START_DATE_PAST_DUE');
270: fnd_msg_pub.add ;
271: e_msg := e_msg || ' New Batch start date is past due.' ;
272: breturn_status := -1 ;
273: ELSIF (t_batch_status > 2 OR t_batch_status <= 0) AND
271: e_msg := e_msg || ' New Batch start date is past due.' ;
272: breturn_status := -1 ;
273: ELSIF (t_batch_status > 2 OR t_batch_status <= 0) AND
274: (p_action_type <> 1) THEN
275: fnd_message.set_name('GMP','GMP_BATCH_STATUS_NOT_PENDING');
276: fnd_msg_pub.add ;
277: e_msg := e_msg || ' Batch is not in pending.' ;
278: breturn_status := -1 ;
279: ELSE
360:
361: IF p_action_type <> 1 THEN
362:
363: IF operation_tab(oper_cnt).batchstep_id = 0 THEN
364: fnd_message.set_name('GMP','GMP_OPER_DELETED');
365: fnd_msg_pub.add ;
366: e_msg := e_msg || ' Operation deleted.';
367: sreturn_status := -1 ;
368: EXIT ;
367: sreturn_status := -1 ;
368: EXIT ;
369: ELSIF (operation_tab(oper_cnt).gme_oper_count <>
370: operation_tab(oper_cnt).aps_oper_count) THEN
371: fnd_message.set_name('GMP','GMP_NUMBER_OF_OPER_MISMATCH');
372: fnd_msg_pub.add ;
373: e_msg := e_msg || ' Number of operation does not match.';
374: sreturn_status := -1 ;
375: EXIT ;
376: ELSIF (operation_tab(oper_cnt).bo_last_update < 0) AND
377: (operation_tab(oper_cnt).step_status = 1) THEN
378: -- If step is in pending and last update changed, We are not
379: -- Updating the batch
380: fnd_message.set_name('GMP','GMP_BATCH_STEP_CHANGED');
381: fnd_msg_pub.add ;
382: e_msg := e_msg || ' Pending Step/Operation is changed.' ;
383: sreturn_status := -1 ;
384: EXIT;
385: ELSIF (operation_tab(oper_cnt).first_unit_start_date < sysdate) AND
386: (operation_tab(oper_cnt).step_status = 1) AND t_batch_status = 2 THEN
387: -- For WIP batch, step is pending and step start date is past due,
388: -- We are not Updating the batch
389: fnd_message.set_name('GMP','GMP_STEP_PAST_DUE');
390: fnd_msg_pub.add ;
391: e_msg := e_msg || ' WIP batch, Pending Step is past due.' ;
392: sreturn_status := -1 ;
393: EXIT;
426: sreturn_status);
427: END IF;
428:
429: IF sreturn_status < 0 THEN
430: fnd_message.set_name('GMP','GMP_STEP_UPDATE_FAILED');
431: fnd_msg_pub.add ;
432: e_msg := e_msg || ' Failed: Update to Step/Operation' ;
433: EXIT;
434: END IF ;
478: p_login_id,
479: breturn_status);
480:
481: IF breturn_status < 0 THEN
482: fnd_message.set_name('GMP','GMP_STEP_UPDATE_FAILED');
483: fnd_msg_pub.add ;
484: e_msg := e_msg || ' Failed: Update to Batch End Date' ;
485: sreturn_status := -1 ;
486: ELSE
793: or_tab(or_cnt).gme_rsrc_count || '--' ||
794: or_tab(or_cnt).aps_rsrc_count); */
795:
796: IF or_tab(or_cnt).Aoperation_seq_num = 0 THEN
797: fnd_message.set_name('GMP','GMP_OPERATION_CHANGED');
798: fnd_msg_pub.add ;
799: e_msg := e_msg || ' Operation Changed. ';
800: batch_valid := -1 ;
801: EXIT ;
799: e_msg := e_msg || ' Operation Changed. ';
800: batch_valid := -1 ;
801: EXIT ;
802: ELSIF or_tab(or_cnt).Aschedule_seq_num = 0 THEN -- For R12.0
803: fnd_message.set_name('GMP','GMP_ACTIVITY_CHANGED');
804: fnd_msg_pub.add ;
805: e_msg := e_msg || ' Activity Changed.';
806: batch_valid := -1 ;
807: EXIT ;
806: batch_valid := -1 ;
807: EXIT ;
808: ELSIF or_tab(or_cnt).gme_actv_count <>
809: or_tab(or_cnt).aps_actv_count THEN
810: fnd_message.set_name('GMP','GMP_ACTV_CNT_MISMATCH');
811: fnd_msg_pub.add ;
812: e_msg := e_msg || ' Number of activities does not match.';
813: batch_valid := -1 ;
814: EXIT ;
814: EXIT ;
815:
816: ELSIF or_tab(or_cnt).gme_rsrc_count <>
817: or_tab(or_cnt).aps_rsrc_count THEN
818: fnd_message.set_name('GMP','GMP_RSRC_CNT_MISMATCH');
819: fnd_msg_pub.add ;
820: e_msg := e_msg || ' Number of resources does not match.';
821: batch_valid := -1 ;
822: EXIT ;
820: e_msg := e_msg || ' Number of resources does not match.';
821: batch_valid := -1 ;
822: EXIT ;
823: ELSIF or_tab(or_cnt).bsa_lup < 0 THEN
824: fnd_message.set_name('GMP','GMP_ACTIVITY_CHANGED');
825: fnd_msg_pub.add ;
826: e_msg := e_msg || ' Activity updated.';
827: batch_valid := -1 ;
828: EXIT ;
826: e_msg := e_msg || ' Activity updated.';
827: batch_valid := -1 ;
828: EXIT ;
829: ELSIF or_tab(or_cnt).bsr_lup < 0 THEN
830: fnd_message.set_name('GMP','GMP_ACT_RSRC_CHANGED');
831: fnd_msg_pub.add ;
832: e_msg := e_msg || ' Activity Resource changed.';
833: batch_valid := -1 ;
834: EXIT ;
977: new_batchstep_resource_id,
978: rreturn_status );
979:
980: IF rreturn_status < 0 THEN
981: fnd_message.set_name('GMP','GMP_STEP_RESOURCE_FAILED');
982: fnd_msg_pub.add ;
983: e_msg := e_msg || ' Step Resource failed: GME way' ;
984: log_message(e_msg) ;
985: EXIT;
1012: new_batchstep_resource_id,
1013: rreturn_status );
1014:
1015: IF rreturn_status < 0 THEN
1016: fnd_message.set_name('GMP','GMP_STEP_RESOURCE_FAILED');
1017: fnd_msg_pub.add ;
1018: e_msg := e_msg || ' Step Resource failed:APS Way' ;
1019: log_message(e_msg) ;
1020: EXIT;
1098: p_login_id,
1099: areturn_status);
1100:
1101: IF areturn_status < 0 THEN
1102: fnd_message.set_name('GMP','GMP_ACTIVITY_UPDATE_FAIL');
1103: fnd_msg_pub.add ;
1104: e_msg := e_msg || ' Update to Activities is failed' ;
1105: log_message(e_msg) ;
1106: EXIT;
1225:
1226: rtran_cnt := rtran_cnt + 1;
1227:
1228: IF treturn_status < 0 THEN
1229: fnd_message.set_name('GMP','GMP_RSRC_TRANS_UPDATE_FAIL');
1230: fnd_msg_pub.add ;
1231: e_msg := e_msg || ' Update to Resource Transaction is failed' ;
1232: EXIT;
1233: END IF ;
1246: p_organization_id,
1247: mreturn_status) ;
1248:
1249: IF mreturn_status < 0 THEN
1250: fnd_message.set_name('GMP','GMP_MATL_UPDATE_FAIL');
1251: fnd_msg_pub.add ;
1252: e_msg := e_msg || ' Materail Update is failed' ;
1253: END IF ;
1254: END IF ;
1259: p_header_id,
1260: xreturn_status) ;
1261:
1262: IF xreturn_status < 0 THEN
1263: fnd_message.set_name('GMP','GMP_RSRC_CHRGS_UPDATE_FAIL');
1264: fnd_msg_pub.add ;
1265: e_msg := e_msg || ' Charges Insert is failed' ;
1266: END IF ;
1267:
1477: temp_date := pstart_date + ((v_rsrc_usage/24) / v_assigned_unit ) ;
1478:
1479: IF (temp_date > v_end_date) THEN
1480: return_status := -3;
1481: fnd_message.set_name('GMP','GMP_SEND_GREATER_START');
1482: fnd_msg_pub.add ;
1483: e_msg := e_msg || ' Step End date greater than start date.';
1484:
1485: END IF;
1526: plogin_id ,
1527: tran_status );
1528:
1529: IF tran_status < 0 THEN
1530: fnd_message.set_name('GMP','GMP_RSRC_TRANS_UPDATE_FAIL');
1531: fnd_msg_pub.add ;
1532: e_msg := e_msg || ' Failed: Resource Transaction' ;
1533: return_status := -6 ;
1534: EXIT;
1786: temp_date := v_start_date +
1787: ( (v_zero.plan_rsrc_usage / v_zero.plan_rsrc_count) / 24 ) ;
1788:
1789: IF temp_date > v_end_date THEN
1790: fnd_message.set_name('GMP','GMP_USER_RSRC');
1791: fnd_msg_pub.add ;
1792: e_msg := e_msg || ' User must maintain the DO NOT PLAN resource dates. ' || v_zero.resources;
1793: ELSE
1794:
2472: LOOP
2473: FETCH cur_structure INTO structure_tab(structure_size);
2474: EXIT WHEN cur_structure%NOTFOUND;
2475: IF structure_tab(structure_size).recipe_change < 0 THEN
2476: fnd_message.set_name('GMP','GMP_RECIPE_CHANGED');
2477: fnd_msg_pub.add ;
2478: e_msg := e_msg || ' Recipe is Changed';
2479: return_status := -1 ;
2480: EXIT ;
2479: return_status := -1 ;
2480: EXIT ;
2481:
2482: ELSIF structure_tab(structure_size).validity_rule_change < 0 THEN
2483: fnd_message.set_name('GMP','GMP_RECIPE_VR_CHANGED');
2484: fnd_msg_pub.add ;
2485: e_msg := e_msg || ' Recipe/Validity Rule changed' ;
2486: return_status := -1 ;
2487: EXIT ;
2486: return_status := -1 ;
2487: EXIT ;
2488:
2489: ELSIF structure_tab(structure_size).formula_header_change < 0 THEN
2490: fnd_message.set_name('GMP','GMP_FORMULA_CHANGED');
2491: fnd_msg_pub.add ;
2492: e_msg := e_msg || ' Formula Header/detail is Changed ';
2493: return_status := -1 ;
2494: EXIT ;
2493: return_status := -1 ;
2494: EXIT ;
2495:
2496: ELSIF structure_tab(structure_size).formula_detail_change < 0 THEN
2497: fnd_message.set_name('GMP','GMP_FORMULA_CHANGED');
2498: fnd_msg_pub.add ;
2499: e_msg := e_msg || ' Formula Header/detail is Changed ';
2500: return_status := -1 ;
2501: EXIT ;
2500: return_status := -1 ;
2501: EXIT ;
2502:
2503: ELSIF structure_tab(structure_size).routing_header_change < 0 THEN
2504: fnd_message.set_name('GMP','GMP_ROUTING_CHANGED');
2505: fnd_msg_pub.add ;
2506: e_msg := e_msg || ' Routing Header is changed';
2507: return_status := -1 ;
2508: EXIT ;
2507: return_status := -1 ;
2508: EXIT ;
2509:
2510: ELSIF structure_tab(structure_size).routingstep_no IS NULL THEN
2511: fnd_message.set_name('GMP','GMP_ROUTING_ACT_CHANGED');
2512: fnd_msg_pub.add ;
2513: e_msg := e_msg || ' Routing Opeartion/Activity deleted';
2514: return_status := -1 ;
2515: EXIT ;
2514: return_status := -1 ;
2515: EXIT ;
2516: ELSIF (structure_tab(structure_size).opm_resource_change <>
2517: structure_tab(structure_size).aps_resource_sum) THEN
2518: fnd_message.set_name('GMP','GMP_RSRC_MISMATCH');
2519: fnd_msg_pub.add ;
2520: e_msg := e_msg || ' Routing resources added or deleted. Details of the batch will NOT be synchronized.' ;
2521: return_status := -1 ;
2522: EXIT ;
2521: return_status := -1 ;
2522: EXIT ;
2523: ELSIF (structure_tab(structure_size).opm_oper_sum <>
2524: structure_tab(structure_size).aps_oper_sum ) THEN
2525: fnd_message.set_name('GMP','GMP_OPERATION_MISMATCH');
2526: fnd_msg_pub.add ;
2527: e_msg := e_msg || ' Routing steps added or deleted. Details of the batch will NOT be synchronized.' ;
2528: return_status := -1 ;
2529: EXIT ;
2528: return_status := -1 ;
2529: EXIT ;
2530: ELSIF (structure_tab(structure_size).opm_activity_sum <>
2531: structure_tab(structure_size).aps_activity_sum) THEN
2532: fnd_message.set_name('GMP','GMP_ACTIVITY_MISMATCH');
2533: fnd_msg_pub.add ;
2534: e_msg := e_msg || ' Routing activity added or deleted. Details of the batch will NOT be synchronized.' ;
2535: return_status := -1 ;
2536: EXIT ;
2534: e_msg := e_msg || ' Routing activity added or deleted. Details of the batch will NOT be synchronized.' ;
2535: return_status := -1 ;
2536: EXIT ;
2537: ELSIF (structure_tab(structure_size).rtg_detail_change < 0) THEN
2538: fnd_message.set_name('GMP','GMP_OPERATION_CHANGED');
2539: fnd_msg_pub.add ;
2540: e_msg := e_msg || ' Details of a step have changed. Details of the batch will NOT be synchronized.' ;
2541: return_status := -1 ;
2542: EXIT ;
2540: e_msg := e_msg || ' Details of a step have changed. Details of the batch will NOT be synchronized.' ;
2541: return_status := -1 ;
2542: EXIT ;
2543: ELSIF (structure_tab(structure_size).rtg_oper_change < 0) THEN
2544: fnd_message.set_name('GMP','GMP_OPERATION_CHANGED');
2545: fnd_msg_pub.add ;
2546: e_msg := e_msg || ' Details of a step have changed. Details of the batch will NOT be synchronized.' ;
2547: return_status := -1 ;
2548: EXIT ;
2546: e_msg := e_msg || ' Details of a step have changed. Details of the batch will NOT be synchronized.' ;
2547: return_status := -1 ;
2548: EXIT ;
2549: ELSIF (structure_tab(structure_size).rtg_activity_change < 0) THEN
2550: fnd_message.set_name('GMP','GMP_ROUTING_ACT_CHANGED');
2551: fnd_msg_pub.add ;
2552: e_msg := e_msg || ' An activity in the routing has changed. Details of the batch will NOT be synchronized.';
2553: return_status := -1 ;
2554: EXIT ;
2553: return_status := -1 ;
2554: EXIT ;
2555: ELSIF (structure_tab(structure_size).opm_resource_change < 0) THEN
2556: -- MEssage is OK
2557: fnd_message.set_name('GMP','GMP_ROUTING_CHANGED2');
2558: fnd_msg_pub.add ;
2559: e_msg := e_msg || ' Routing resources have changed. Details of the batch will NOT be synchronized.' ;
2560: return_status := -1 ;
2561: EXIT ;