[Home] [Help]
1: PACKAGE BODY WSMPLBMI AS
2: /* $Header: WSMLBMIB.pls 120.97.12010000.3 2009/12/23 12:02:50 sisankar ship $ */
3:
4: --mes
5: g_log_level_unexpected NUMBER := FND_LOG.LEVEL_UNEXPECTED ;
94:
95: EXCEPTION
96: WHEN OTHERS THEN
97: x_return_code := SQLCODE;
98: x_err_buf := 'WSMPLBMI.val_jump_from_queue' ||'(stmt_num='||l_stmt_num||'): '||substrb(sqlerrm,1,1000);
99: fnd_file.put_line(fnd_file.log, x_err_buf);
100:
101: END val_jump_from_queue;
102:
293: l_source_code WSM_LOT_MOVE_TXN_INTERFACE.source_code%type;
294: -- Logging variables.....
295: l_msg_tokens WSM_Log_PVT.token_rec_tbl;
296: l_log_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
297: l_module CONSTANT VARCHAR2(100) := 'wsm.plsql.WSMPLBMI.custom_validations';
298: l_param_tbl WSM_Log_PVT.param_tbl_type;
299: l_return_status VARCHAR2(1);
300: l_msg_count number;
301: l_msg_data varchar2(4000);
310: l_stmt_num := 10;
311:
312: if (l_debug = 'Y') then
313: fnd_file.put_line(fnd_file.log, 'g_aps_wps_profile '||g_aps_wps_profile);
314: fnd_file.put_line(fnd_file.log, '*******************Parameters to WSMPLBMI*******************');
315:
316: fnd_file.put_line(fnd_file.log, 'p_header_id='||p_header_id||
317: ', p_txn_id='||p_txn_id||
318: ', p_wip_entity_name='||p_wip_entity_name||
351: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
352: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'transaction_type');
353: x_err_buf := FND_MESSAGE.GET;
354:
355: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
356: return(x_return_code);
357: END IF;
358:
359: -- Changed p_txn_type to l_txn_type in this procedure
383: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'Organization_id');
384: x_err_buf := FND_MESSAGE.GET;
385:
386: fnd_file.put_line(fnd_file.log,
387: 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
388: x_return_code := 1;
389: return(x_return_code);
390: END;
391:
396:
397: FND_MESSAGE.SET_NAME('WSM', 'WSM_NON_WSM_ORG');
398: x_err_buf := FND_MESSAGE.GET;
399:
400: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
401:
402: return(x_return_code);
403: END IF;
404:
458: FND_MESSAGE.SET_NAME('WSM', 'WSM_INFO_NOT_FOUND');
459: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'acct_period_id');
460: x_err_buf := FND_MESSAGE.GET;
461:
462: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
463: return(x_return_code);
464: END IF;
465:
466: l_stmt_num := 30;
481: x_return_code := 1;
482: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
483: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'wip_entity_name/wip_entity_id');
484: x_err_buf := FND_MESSAGE.GET;
485: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
486: return(x_return_code);
487: END IF;
488:
489: l_stmt_num := 32;
502: FND_MESSAGE.SET_NAME('WSM', 'WSM_NOT_WSM_LOT_JOB');
503: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'wip_entities');
504: x_err_buf := FND_MESSAGE.GET;
505:
506: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
507: return(x_return_code);
508: END IF;
509:
510: l_stmt_num := 33;
522: x_return_code := 1;
523: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
524: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'wip_entity_id');
525: x_err_buf := FND_MESSAGE.GET;
526: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
527: return(x_return_code);
528:
529: WHEN OTHERS THEN
530: x_return_code := SQLCODE;
527: return(x_return_code);
528:
529: WHEN OTHERS THEN
530: x_return_code := SQLCODE;
531: x_err_buf := 'WSMPLBMI.custom_validation' ||'(stmt_num='||l_stmt_num||') : '||substrb(sqlerrm,1,1000);
532: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
533: return(x_return_code);
534: END;
535:
528:
529: WHEN OTHERS THEN
530: x_return_code := SQLCODE;
531: x_err_buf := 'WSMPLBMI.custom_validation' ||'(stmt_num='||l_stmt_num||') : '||substrb(sqlerrm,1,1000);
532: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
533: return(x_return_code);
534: END;
535:
536: ELSE -- if the user has passed wip_entity_name and not wip_entity_id
553: FND_MESSAGE.SET_NAME('WSM', 'WSM_NOT_WSM_LOT_JOB');
554: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'wip_entities');
555: x_err_buf := FND_MESSAGE.GET;
556:
557: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
558: return(x_return_code);
559: END IF;
560:
561: EXCEPTION
563: x_return_code := 1;
564: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
565: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'wip_entity_name');
566: x_err_buf := FND_MESSAGE.GET;
567: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
568: return(x_return_code);
569: END;
570: --***VJ End Changes***--
571: END IF; -- Fix for bug #2095035
578: application => 'WSM',
579: name => 'WSM_NO_VALID_COPY');
580: x_err_buf := FND_MESSAGE.GET;
581:
582: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
583: return(x_return_code);
584: END IF;
585: --bug 3512105 end
586:
618: FND_MESSAGE.SET_NAME('WSM', 'WSM_NOT_RELEASED_JOB');
619: FND_MESSAGE.SET_TOKEN('FLD_NAME', p_wip_entity_name);
620: x_err_buf := FND_MESSAGE.GET;
621:
622: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
623: return(x_return_code);
624: end if;
625: --end bug fix 1667427
626:
641: -- ST : Bug fix : 4454300 : End
642:
643: x_err_buf := FND_MESSAGE.GET;
644:
645: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
646: return(x_return_code);
647: END IF;
648: -- End Fix for bug #2094358
649:
670: error = l_error_msg -- CZH.BUG2135538
671: where header_id = p_header_id;
672:
673: l_stmt_num := 60;
674: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
675:
676: ELSIF (l_wlmti_wip_entity_id <> l_wip_entity_id) THEN
677:
678: x_return_code := 1;
680: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
681: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'wip_entity_id');
682: x_err_buf := FND_MESSAGE.GET;
683:
684: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
685: return(x_return_code);
686:
687: END IF;
688:
754: FND_MESSAGE.SET_NAME('WSM', 'WSM_NOT_WSM_LOT_JOB');
755: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'wsm_lot_move_txn_interface');
756: x_err_buf := FND_MESSAGE.GET;
757:
758: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
759: return(x_return_code);
760: END IF;
761:
762: l_stmt_num := 70;
772: error = l_error_msg -- CZH.BUG2135538
773: where header_id = p_header_id;
774:
775: l_stmt_num := 75;
776: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
777: ELSIF (l_wlmti_primary_item_id <> l_primary_item_id) THEN
778: x_return_code := 1;
779:
780: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
780: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
781: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'primary_item_id');
782: x_err_buf := FND_MESSAGE.GET;
783:
784: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
785: return(x_return_code);
786: END IF;
787:
788: IF (l_wlmti_org_code IS NULL) THEN
797: --ERROR = 'WARNING:'||x_err_buf -- CZH.BUG2135538
798: error = l_error_msg -- CZH.BUG2135538
799: where header_id = p_header_id;
800: l_stmt_num := 80;
801: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
802:
803: ELSIF (l_wlmti_org_code <> g_prev_org_code) THEN --***VJ Changed for Performance Upgrade***--
804: x_return_code := 1;
805:
805:
806: FND_MESSAGE.SET_NAME('WSM', 'WSM_ORG_ID-CODE_COMB_INVALID');
807: x_err_buf := FND_MESSAGE.GET;
808:
809: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
810: return(x_return_code);
811: END IF;
812:
813: IF (G_LOG_LEVEL_STATEMENT >= l_log_level) THEN
847: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
848: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'last_updated_by');
849: x_err_buf := FND_MESSAGE.GET;
850:
851: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
852: return(x_return_code);
853: END;
854:
855: l_stmt_num := 90;
885: error = l_error_msg -- CZH.BUG2135538
886: where header_id = p_header_id;
887:
888: l_stmt_num := 95;
889: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
890: ELSIF (l_wlmti_last_upd_name <> g_prev_upd_user_name) THEN
891: --***VJ Changed for Performance Upgrade***--
892: x_return_code := 1;
893:
894: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
895: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'last_updated_by_name');
896: x_err_buf := FND_MESSAGE.GET;
897:
898: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
899: return(x_return_code);
900: END IF;
901: END IF;
902:
918: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
919: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'created_by');
920: x_err_buf := FND_MESSAGE.GET;
921:
922: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='
923: ||l_stmt_num||'): '||x_err_buf);
924: return(x_return_code);
925: END;
926: END IF;
944: error = l_error_msg -- CZH.BUG2135538
945: where header_id = p_header_id;
946:
947: l_stmt_num := 110;
948: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
949: ELSIF (l_wlmti_created_by_name <> g_prev_cr_user_name) THEN
950: --***VJ Changed for Performance Upgrade***--
951: x_return_code := 1;
952:
953: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
954: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'created_by_name');
955: x_err_buf := FND_MESSAGE.GET;
956:
957: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
958: return(x_return_code);
959: END IF;
960: END IF;
961: END IF; --IF (l_source_code NOT IN ('move in oa page',
1000: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
1001: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'acct_period_id');
1002: x_err_buf := FND_MESSAGE.GET;
1003:
1004: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
1005: return(x_return_code);
1006: -- END;
1007: --***VJ End Changes***--
1008: END IF;
1023: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
1024: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'reason_id');
1025: x_err_buf := FND_MESSAGE.GET;
1026:
1027: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
1028: return(x_return_code);
1029: END;
1030: END IF;
1031:
1046: error = l_error_msg -- CZH.BUG2135538
1047: where header_id = p_header_id;
1048:
1049: l_stmt_num := 130;
1050: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
1051: --***VJ End Additions***--
1052: ELSIF (l_reason_name <> l_mtr_reason_name) THEN
1053: FND_MESSAGE.SET_NAME('WSM', 'WSM_MODIFIED_FIELD');
1054: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'reason_name');
1061: error = l_error_msg -- CZH.BUG2135538
1062: where header_id = p_header_id;
1063:
1064: l_stmt_num := 135;
1065: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
1066: END IF;
1067: -- END Fix for bug #1497882
1068:
1069:
1082: FND_MESSAGE.SET_NAME('WSM', 'WSM_PENDING_TXN');
1083: FND_MESSAGE.SET_TOKEN('TABLE', 'wip_move_txn_interface');
1084: x_err_buf := FND_MESSAGE.GET;
1085:
1086: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
1087: return(x_return_code);
1088: END IF;
1089:
1090: l_stmt_num := 145;
1103: FND_MESSAGE.SET_NAME('WSM', 'WSM_PENDING_TXN');
1104: FND_MESSAGE.SET_TOKEN('TABLE', 'wsm_split_merge_transactions');
1105: x_err_buf := FND_MESSAGE.GET;
1106:
1107: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
1108:
1109: return(x_return_code);
1110: END IF;
1111:
1121:
1122: -- FND_MESSAGE.SET_NAME('WSM', 'WSM_NO_MOVE_FM_LAST_OP');
1123: -- x_err_buf := FND_MESSAGE.GET;
1124:
1125: -- fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
1126: -- return(x_return_code);
1127: --END IF;
1128: --**VJ: End Deletion for 9999 Removal **--
1129:
1135: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
1136: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'jump_flag');
1137: x_err_buf := FND_MESSAGE.GET;
1138:
1139: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
1140: return(x_return_code);
1141: END IF;
1142: --***VJ End Additions***--
1143:
1173: error = l_error_msg -- CZH.BUG2135538
1174: where header_id = p_header_id;
1175:
1176: l_stmt_num := 160;
1177: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
1178: ELSE
1179: IF (p_primary_uom <> l_primary_uom) THEN
1180: x_return_code := 1;
1181:
1182: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_PRI_UOM');
1183: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'primary_uom');
1184: x_err_buf := FND_MESSAGE.GET;
1185:
1186: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
1187: return(x_return_code);
1188: END IF;
1189: END IF;
1190: -- end fix for bug1765389
1220: name => 'WIP_STATUS_NO_TXN1');
1221: l_err_buf := fnd_message.get;
1222: x_err_buf := substrb(l_err_buf,1,150);
1223:
1224: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):');
1225: fnd_file.put_line(fnd_file.log, 'ERROR :' ||l_err_buf);
1226: return(x_return_code);
1227: end if;
1228: end;
1315: name => 'WIP_NO_MOVE_SF_STATUS_BETWEEN');
1316: l_err_buf := fnd_message.get;
1317: x_err_buf := substrb(l_err_buf,1,150);
1318:
1319: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):');
1320: fnd_file.put_line(fnd_file.log, 'ERROR :' ||l_err_buf);
1321: return(x_return_code);
1322: end if;
1323: end;
1339:
1340: FND_MESSAGE.SET_NAME('WSM', 'WSM_TXN_FOR_SCR');
1341: x_err_buf := FND_MESSAGE.GET;
1342:
1343: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
1344: return(x_return_code);
1345: END IF;
1346:
1347: --***VJ Changed for Performance Upgrade***--
1364: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
1365: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'from_operation_seq_num/code/intraoperation_step');
1366: x_err_buf := FND_MESSAGE.GET;
1367:
1368: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
1369:
1370: return(x_return_code);
1371: END;
1372: --***VJ End Changes***--
1449: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
1450: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'fm_op_seq_num');
1451: x_err_buf := FND_MESSAGE.GET;
1452:
1453: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
1454: return(x_return_code);
1455: END IF;
1456:
1457: l_stmt_num := 176;
1471: x_return_code := 1;
1472: fnd_message.set_name('WSM', 'WSM_INVALID_FIELD');
1473: fnd_message.set_token('FLD_NAME', 'fm_op_code');
1474: x_err_buf := fnd_message.get;
1475: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
1476: return(x_return_code);
1477:
1478: elsif (p_fm_op_code is null and l_wo_op_code is not null) then
1479: UPDATE wsm_lot_move_txn_interface
1483: fnd_message.set_name('WSM', 'WSM_MODIFIED_FIELD');
1484: fnd_message.set_token('FLD_NAME', 'fm_operation_code');
1485: x_err_buf := fnd_message.get;
1486:
1487: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
1488:
1489: -- henceforth, if p_fm_op_code is NULL, use l_fm_op_code_temp instead.
1490: l_fm_op_code_temp := l_wo_op_code;
1491:
1493: x_return_code := 1;
1494: fnd_message.set_name('WSM', 'WSM_INVALID_FIELD');
1495: fnd_message.set_token('FLD_NAME', 'fm_op_code');
1496: x_err_buf := fnd_message.get;
1497: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
1498: return(x_return_code);
1499:
1500: end if;
1501: -- end bugfix 2363380
1507: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
1508: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'fm_intraop_step_type');
1509: x_err_buf := FND_MESSAGE.GET;
1510:
1511: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
1512: return(x_return_code);
1513: END IF;
1514:
1515: -- p_fm_intraop_step_type should not be Scrap
1519:
1520: FND_MESSAGE.SET_NAME('WSM', 'WSM_NO_MOVE_FM_SCRAP');
1521: x_err_buf := FND_MESSAGE.GET;
1522:
1523: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
1524: return(x_return_code);
1525: END IF;
1526:
1527:
1586: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
1587: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'wo_dept_id'); --bugfix 1587295: changed the token
1588: x_err_buf := FND_MESSAGE.GET;
1589:
1590: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
1591: return(x_return_code);
1592: ELSE
1593: FND_MESSAGE.SET_NAME('WSM', 'WSM_MODIFIED_FIELD');
1594: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'fm_department_id/fm_department_code');
1593: FND_MESSAGE.SET_NAME('WSM', 'WSM_MODIFIED_FIELD');
1594: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'fm_department_id/fm_department_code');
1595: x_err_buf := FND_MESSAGE.GET;
1596:
1597: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
1598: END IF;
1599:
1600: l_stmt_num := 185;
1601: SELECT nvl(common_routing_sequence_id, routing_reference_id)
1615: IF (x_return_code <> 0) THEN
1616: FND_MESSAGE.SET_NAME('WSM', 'WSM_CANNOT_GET_RTG_END');
1617: x_err_buf := FND_MESSAGE.GET;
1618:
1619: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
1620: return(x_return_code);
1621: ELSE
1622: if (l_debug = 'Y') then
1623: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num
1619: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
1620: return(x_return_code);
1621: ELSE
1622: if (l_debug = 'Y') then
1623: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num
1624: ||'): Returned success from WSMPUTIL.find_routing_end');
1625: end if;
1626: END IF;
1627:
1649: x_return_code := 1;
1650: FND_MESSAGE.SET_NAME('WSM', 'WSM_NULL_FIELD');
1651: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'p_to_op_seq_num');
1652: x_err_buf := FND_MESSAGE.GET;
1653: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
1654: return(x_return_code);
1655:
1656: END IF;
1657:
1671: THEN
1672: FND_MESSAGE.SET_NAME('WSM', 'WSM_NO_EFFECTIVE_NEXT_OP');
1673: x_err_buf := FND_MESSAGE.GET;
1674: l_error_msg := substr(l_error_msg||'WARNING: '||x_err_buf||'| ', 1, 2000);
1675: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
1676: END IF;
1677: -- EA: CZH.I_OED-1
1678:
1679: --NO CHECK FOR RETURN VALUES HERE....-VJ--
1702: x_return_code := 1;
1703: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
1704: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_op_seq_num');
1705: x_err_buf := FND_MESSAGE.GET;
1706: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
1707: return(x_return_code);
1708: END;
1709: --***VJ End Changes***--
1710:
1713: IF ((l_wo_rtg_op_seq_num = p_to_op_seq_num) AND (l_wo_op_seq_id <> l_op_seq_id)) THEN
1714: x_return_code := 1;
1715: FND_MESSAGE.SET_NAME('WSM', 'WSM_MOVE_CURR_OP_REPLACED');
1716: x_err_buf := FND_MESSAGE.GET;
1717: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
1718: return(x_return_code);
1719: END IF;
1720: --end bug 3463128
1721:
1745: x_return_code := 1;
1746: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
1747: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_op_code');
1748: x_err_buf := FND_MESSAGE.GET;
1749: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
1750: return(x_return_code);
1751: end if;
1752:
1753: else -- l_iop_move_out_rtg = TURE, intraop move @ outside rtg
1759: x_return_code := 1;
1760: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
1761: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_op_code');
1762: x_err_buf := FND_MESSAGE.GET;
1763: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
1764: return(x_return_code);
1765: else
1766: -- BA: CZH.bug 2362225, because we use l_op_code later on
1767: l_op_code := p_to_op_code;
1781: x_return_code := 1;
1782: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
1783: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_op_code');
1784: x_err_buf := FND_MESSAGE.GET;
1785: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='
1786: ||l_stmt_num||'): ' ||x_err_buf);
1787: return(x_return_code);
1788: end;
1789: end if;
1800: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
1801: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_dept_id');
1802: x_err_buf := FND_MESSAGE.GET;
1803:
1804: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
1805: return(x_return_code);
1806: END IF;
1807:
1808: UPDATE WSM_LOT_MOVE_TXN_INTERFACE WLMTI
1822: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
1823: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'dept_id');
1824: x_err_buf := FND_MESSAGE.GET;
1825:
1826: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
1827: return(x_return_code);
1828: ELSE
1829: FND_MESSAGE.SET_NAME('WSM', 'WSM_MODIFIED_FIELD');
1830: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_department_id/to_department_code');
1829: FND_MESSAGE.SET_NAME('WSM', 'WSM_MODIFIED_FIELD');
1830: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_department_id/to_department_code');
1831: x_err_buf := FND_MESSAGE.GET;
1832:
1833: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
1834: END IF;
1835:
1836:
1837: l_stmt_num := 230;
1897: x_return_code := 1;
1898: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
1899: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_op_seq_num/to_op_code');
1900: x_err_buf := FND_MESSAGE.GET;
1901: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='
1902: ||l_stmt_num||'): '||x_err_buf);
1903: return(x_return_code);
1904: end;
1905: elsif l_op_seq_id = l_wo_op_seq_id then -- CZH: move from inside rtg to inside rtg, to the same op
1909: x_return_code := -1;
1910: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
1911: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_intraop_step_type');
1912: x_err_buf := FND_MESSAGE.GET;
1913: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
1914: return(x_return_code);
1915: end if;
1916:
1917: end if;
1951: x_return_code := 1;
1952: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
1953: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_op_seq_num');
1954: x_err_buf := FND_MESSAGE.GET;
1955: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
1956: return(x_return_code);
1957:
1958: WHEN TOO_MANY_ROWS THEN
1959: x_return_code := 1;
1959: x_return_code := 1;
1960: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
1961: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_op_seq_num');
1962: x_err_buf := FND_MESSAGE.GET;
1963: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
1964: return(x_return_code);
1965:
1966: END;
1967: --***VJ End Changes***--
2001: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2002: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_op_code');
2003: x_err_buf := FND_MESSAGE.GET;
2004:
2005: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
2006: return(x_return_code);
2007: end if;
2008: -- NSO Modification by abedajna: additions end
2009:
2011: x_return_code := 1;
2012: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2013: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_dept_id');
2014: x_err_buf := FND_MESSAGE.GET;
2015: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
2016: return(x_return_code);
2017: END IF;
2018:
2019: ELSE -- p_to_op_seq_num is NULL, i.e. jump to outside routing
2038: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2039: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_op_code');
2040: x_err_buf := FND_MESSAGE.GET;
2041:
2042: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='
2043: ||l_stmt_num||'):'||x_err_buf);
2044: return(x_return_code);
2045: END;
2046: --***VJ End Changes***--
2057: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2058: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_op_code');
2059: x_err_buf := FND_MESSAGE.GET;
2060:
2061: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='
2062: ||l_stmt_num||'):'||x_err_buf);
2063: return(x_return_code);
2064: END IF;
2065:
2070: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2071: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_dept_id');
2072: x_err_buf := FND_MESSAGE.GET;
2073:
2074: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
2075: return(x_return_code);
2076: END IF;
2077:
2078: ELSE -- IF p_to_op_code IS NULL
2084: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2085: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_op_code');
2086: x_err_buf := FND_MESSAGE.GET;
2087:
2088: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2089: return(x_return_code);
2090: --End additions
2091:
2092: END IF; -- p_to_op_code IS NULL/NOT NULL
2108: if (l_debug = 'Y') then
2109: fnd_file.put_line(fnd_file.log, 'Jump from Queue is set to FALSE');
2110: end if;
2111: else
2112: WSMPLBMI.val_jump_from_queue(l_wip_entity_id,
2113: p_org_id,
2114: p_fm_op_seq_num,
2115: l_wo_op_seq_id,
2116: x_return_code,
2117: x_err_buf);
2118:
2119: if (x_return_code <> 0) then
2120: fnd_file.put_line(fnd_file.log,
2121: 'After calling WSMPLBMI.val_jump_from_queue ' || x_err_buf);
2122: return(x_return_code);
2123: end if;
2124: l_jump_from_queue := TRUE;
2125: if (l_debug = 'Y') then
2148: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2149: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_dept_id');
2150: x_err_buf := FND_MESSAGE.GET;
2151:
2152: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2153: return(x_return_code);
2154: ELSE
2155: FND_MESSAGE.SET_NAME('WSM', 'WSM_MODIFIED_FIELD');
2156: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_department_id/to_department_code');
2155: FND_MESSAGE.SET_NAME('WSM', 'WSM_MODIFIED_FIELD');
2156: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_department_id/to_department_code');
2157: x_err_buf := FND_MESSAGE.GET;
2158:
2159: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
2160: END IF;
2161:
2162: -- Fix bug #1501376
2163: l_to_dept_id := l_jmp_dept_id; -- l_to_dept_id is a local variable for p_to_dept_id, if NULL
2202: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2203: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'wo_dept_id'); --bugfix 1587295: changed the token
2204: x_err_buf := FND_MESSAGE.GET;
2205:
2206: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2207: return(x_return_code);
2208: ELSE
2209: FND_MESSAGE.SET_NAME('WSM', 'WSM_MODIFIED_FIELD');
2210: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'fm_department_id/fm_department_code');
2209: FND_MESSAGE.SET_NAME('WSM', 'WSM_MODIFIED_FIELD');
2210: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'fm_department_id/fm_department_code');
2211: x_err_buf := FND_MESSAGE.GET;
2212:
2213: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
2214: END IF;
2215:
2216: l_stmt_num := 190;
2217: BEGIN
2233: x_return_code := 1;
2234: FND_MESSAGE.SET_NAME('WSM', 'WSM_CANNOT_GET_RTG_END');
2235: x_err_buf := FND_MESSAGE.GET;
2236:
2237: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2238: return(x_return_code);
2239: END;
2240: if (l_debug = 'Y') then
2241: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): l_end_op_seq_id '||l_end_op_seq_id||' l_end_std_op_id '||l_end_std_op_id||' l_end_dept_id '||l_end_dept_id||' l_end_op_seq_num '||l_end_op_seq_num);
2237: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2238: return(x_return_code);
2239: END;
2240: if (l_debug = 'Y') then
2241: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): l_end_op_seq_id '||l_end_op_seq_id||' l_end_std_op_id '||l_end_std_op_id||' l_end_dept_id '||l_end_dept_id||' l_end_op_seq_num '||l_end_op_seq_num);
2242: end if;
2243:
2244: l_op_seq_id := NULL;
2245:
2260: x_return_code := 1;
2261: FND_MESSAGE.SET_NAME('WSM', 'WSM_NULL_FIELD');
2262: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'p_to_op_seq_num');
2263: x_err_buf := FND_MESSAGE.GET;
2264: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2265: return(x_return_code);
2266:
2267: END IF;
2268:
2294: x_return_code := 1;
2295: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2296: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_op_seq_num');
2297: x_err_buf := FND_MESSAGE.GET;
2298: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2299: return(x_return_code);
2300: END;
2301:
2302: --bug 3463128 give a message if the current operation has been replaced and the user is trying a
2304: IF ((l_wo_rtg_op_seq_num = p_to_op_seq_num) AND (l_wo_op_seq_id <> l_op_seq_id)) THEN
2305: x_return_code := 1;
2306: FND_MESSAGE.SET_NAME('WSM', 'WSM_MOVE_CURR_OP_REPLACED');
2307: x_err_buf := FND_MESSAGE.GET;
2308: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2309: return(x_return_code);
2310: END IF;
2311: --end bug 3463128
2312:
2323: x_return_code := 1;
2324: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2325: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_op_code');
2326: x_err_buf := FND_MESSAGE.GET;
2327: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2328: return(x_return_code);
2329: end if;
2330:
2331: else -- l_iop_move_out_rtg = TURE, intraop move @ outside rtg
2337: x_return_code := 1;
2338: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2339: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_op_code');
2340: x_err_buf := FND_MESSAGE.GET;
2341: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2342: return(x_return_code);
2343: else
2344: -- BA: CZH.bug 2362225, because we use l_op_code later on
2345: l_op_code := p_to_op_code;
2359: x_return_code := 1;
2360: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2361: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_op_code');
2362: x_err_buf := FND_MESSAGE.GET;
2363: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='
2364: ||l_stmt_num||'): ' ||x_err_buf);
2365: return(x_return_code);
2366: end;
2367: end if;
2378: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2379: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_dept_id');
2380: x_err_buf := FND_MESSAGE.GET;
2381:
2382: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2383: return(x_return_code);
2384: END IF;
2385:
2386: --move enh
2404: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2405: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'dept_id');
2406: x_err_buf := FND_MESSAGE.GET;
2407:
2408: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2409: return(x_return_code);
2410: ELSE
2411: FND_MESSAGE.SET_NAME('WSM', 'WSM_MODIFIED_FIELD');
2412: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_department_id/to_department_code');
2411: FND_MESSAGE.SET_NAME('WSM', 'WSM_MODIFIED_FIELD');
2412: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_department_id/to_department_code');
2413: x_err_buf := FND_MESSAGE.GET;
2414:
2415: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
2416: END IF;
2417: ELSE --(l_to_dept_code IS NOT NULL)
2418: UPDATE WSM_LOT_MOVE_TXN_INTERFACE WLMTI
2419: SET TO_DEPARTMENT_CODE=l_to_dept_code
2457: x_return_code := 1;
2458: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2459: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_op_seq_num/to_op_code');
2460: x_err_buf := FND_MESSAGE.GET;
2461: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation( stmt_num=' ||l_stmt_num||'): '||x_err_buf);
2462: return(x_return_code);
2463: end;
2464: END IF;
2465:
2470: x_return_code := -1;
2471: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2472: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_intraop_step_type');
2473: x_err_buf := FND_MESSAGE.GET;
2474: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2475: return(x_return_code);
2476: end if;
2477:
2478: end if;
2514: x_return_code := 1;
2515: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2516: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_op_seq_num');
2517: x_err_buf := FND_MESSAGE.GET;
2518: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
2519: return(x_return_code);
2520:
2521: WHEN TOO_MANY_ROWS THEN
2522: x_return_code := 1;
2522: x_return_code := 1;
2523: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2524: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_op_seq_num');
2525: x_err_buf := FND_MESSAGE.GET;
2526: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
2527: return(x_return_code);
2528: END;
2529:
2530: l_std_op_id := l_jmp_std_op_id;
2547: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2548: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_op_code');
2549: x_err_buf := FND_MESSAGE.GET;
2550:
2551: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
2552: return(x_return_code);
2553: end if;
2554: -- NSO Modification by abedajna: additions end
2555:
2557: x_return_code := 1;
2558: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2559: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_dept_id');
2560: x_err_buf := FND_MESSAGE.GET;
2561: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
2562: return(x_return_code);
2563: END IF;
2564:
2565: ELSE -- p_to_op_seq_num is NULL, i.e. jump to outside routing
2584: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2585: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_op_code');
2586: x_err_buf := FND_MESSAGE.GET;
2587:
2588: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='
2589: ||l_stmt_num||'):'||x_err_buf);
2590: return(x_return_code);
2591: END;
2592: --***VJ End Changes***--
2603: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2604: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_op_code');
2605: x_err_buf := FND_MESSAGE.GET;
2606:
2607: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='
2608: ||l_stmt_num||'):'||x_err_buf);
2609: return(x_return_code);
2610: END IF;
2611:
2616: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2617: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_dept_id');
2618: x_err_buf := FND_MESSAGE.GET;
2619:
2620: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
2621: return(x_return_code);
2622: END IF;
2623:
2624: ELSE -- IF p_to_op_code IS NULL
2630: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2631: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_op_code');
2632: x_err_buf := FND_MESSAGE.GET;
2633:
2634: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2635: return(x_return_code);
2636: --End additions
2637:
2638: END IF; -- p_to_op_code IS NULL/NOT NULL
2653: if (l_debug = 'Y') then
2654: fnd_file.put_line(fnd_file.log, 'Jump from Queue is set to FALSE');
2655: end if;
2656: else
2657: WSMPLBMI.val_jump_from_queue(l_wip_entity_id,
2658: p_org_id,
2659: p_fm_op_seq_num,
2660: l_wo_op_seq_id,
2661: x_return_code,
2662: x_err_buf);
2663:
2664: if (x_return_code <> 0) then
2665: fnd_file.put_line(fnd_file.log,
2666: 'After calling WSMPLBMI.val_jump_from_queue ' || x_err_buf);
2667: return(x_return_code);
2668: end if;
2669: l_jump_from_queue := TRUE;
2670: if (l_debug = 'Y') then
2696: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2697: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_dept_id');
2698: x_err_buf := FND_MESSAGE.GET;
2699:
2700: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2701: return(x_return_code);
2702: ELSE
2703: FND_MESSAGE.SET_NAME('WSM', 'WSM_MODIFIED_FIELD');
2704: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_department_id/to_department_code');
2703: FND_MESSAGE.SET_NAME('WSM', 'WSM_MODIFIED_FIELD');
2704: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_department_id/to_department_code');
2705: x_err_buf := FND_MESSAGE.GET;
2706:
2707: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
2708: END IF;
2709: END IF; --l_to_dept_code IS NULL
2710:
2711: -- Fix bug #1501376
2738: value => 'zero',
2739: translate => TRUE); */
2740: FND_MESSAGE.SET_NAME('WSM', 'WSM_SCRAP_NOT_LESS_THAN_ZERO');
2741: x_err_buf := FND_MESSAGE.GET;
2742: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2743: return(x_return_code);
2744: END IF;
2745:
2746: IF (p_txn_qty < 0) THEN
2758: token => 'ENTITY2',
2759: value => 'zero',
2760: translate => TRUE);
2761: x_err_buf := FND_MESSAGE.GET;
2762: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2763: return(x_return_code);
2764: END IF;
2765:
2766: IF ((l_scrap_qty = 0) AND (p_txn_qty = 0)) THEN
2768: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2769: --move enh? get the meaning of /
2770: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'scrap_quantity/transaction_quantity');
2771: x_err_buf := FND_MESSAGE.GET;
2772: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2773: return(x_return_code);
2774: END IF;
2775:
2776: IF ((p_to_intraop_step_type = 5)) THEN
2778: x_return_code := 1;
2779: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2780: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'scrap_quantity/transaction_quantity');
2781: x_err_buf := FND_MESSAGE.GET;
2782: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2783: return(x_return_code);
2784:
2785: END IF;
2786:
2789: FND_MESSAGE.SET_NAME('WSM', 'WSM_MODIFIED_FIELD');
2790: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'scrap_at_operation_flag');
2791: x_err_buf := FND_MESSAGE.GET;
2792:
2793: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
2794: END IF;
2795:
2796: ELSIF (l_scrap_qty>0) THEN
2797: --bug 3385113 added nvls
2801: x_return_code := 1;
2802: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2803: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'scrap_at_operation_flag');
2804: x_err_buf := FND_MESSAGE.GET;
2805: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
2806: return(x_return_code);
2807: END IF;
2808: ELSE
2809: IF (nvl(l_scrap_at_operation_flag, -1) <> 1) THEN
2811: FND_MESSAGE.SET_NAME('WSM', 'WSM_MODIFIED_FIELD');
2812: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'scrap_at_operation_flag');
2813: x_err_buf := FND_MESSAGE.GET;
2814:
2815: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
2816: END IF;
2817: END IF;
2818: END IF;
2819:
2823: AND (g_param_jump_fm_q = 2)) THEN
2824: x_return_code := 1;
2825: FND_MESSAGE.SET_NAME('WSM', 'WSM_SCRAP_AT_TO_ONLY');
2826: x_err_buf := FND_MESSAGE.GET;
2827: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2828: return(x_return_code);
2829: END IF;
2830:
2831: -- p_to_intraop_step_type should not be > 5 -- NSO Modification by abedajna
2836: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
2837: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_intraop_step_type');
2838: x_err_buf := FND_MESSAGE.GET;
2839:
2840: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2841: return(x_return_code);
2842: END IF;
2843:
2844: -- Cannot Scrap in a Future Op
2855:
2856: FND_MESSAGE.SET_NAME('WSM', 'WSM_NO_FUTURE_SCR');
2857: x_err_buf := FND_MESSAGE.GET;
2858:
2859: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2860: return(x_return_code);
2861: END IF;
2862:
2863: --mes added following if condition
2878: x_err_buf);
2879: IF (x_return_code <> 0) THEN
2880: FND_MESSAGE.SET_NAME('WSM', 'WSM_CANNOT_GET_NEXT_MAND_STEP');
2881: x_err_buf := FND_MESSAGE.GET;
2882: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2883: return(x_return_code);
2884: ELSE
2885: if (l_debug = 'Y') then
2886: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num
2882: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2883: return(x_return_code);
2884: ELSE
2885: if (l_debug = 'Y') then
2886: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num
2887: ||'): Returned success from WSMPOPRN.get_current_op');
2888: end if;
2889: END IF;
2890: else
2956: IF (x_return_code <> 0) THEN
2957: FND_MESSAGE.SET_NAME('WSM', 'WSM_NO_INTRAOP_VALUE');
2958: x_err_buf := FND_MESSAGE.GET;
2959:
2960: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2961: return(x_return_code);
2962: ELSE
2963: if (l_debug = 'Y') then
2964: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num
2960: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2961: return(x_return_code);
2962: ELSE
2963: if (l_debug = 'Y') then
2964: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num
2965: ||'): Returned success from WSMPOPRN.get_intra_operation_value');
2966: end if;
2967: END IF;
2968:
2983: END IF;
2984: END IF;
2985:
2986: if (l_debug = 'Y') then
2987: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num
2988: || ') l_err_condition: '||l_err_condition);
2989: end if;
2990:
2991: IF (l_err_condition = 1) THEN
2994:
2995: FND_MESSAGE.SET_NAME('WSM', 'WSM_MAND_STEP');
2996: x_err_buf := FND_MESSAGE.GET;
2997:
2998: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
2999: return(x_return_code);
3000: END IF;
3001: END IF; --IF (nvl(l_source_code, 'interface') NOT IN ('move in oa page'
3002:
3010: x_return_code := 1;
3011: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
3012: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'fm_intraop_step_type/to_intraop_step_type');
3013: x_err_buf := FND_MESSAGE.GET;
3014: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
3015: return(x_return_code);
3016: end if;
3017:
3018: end if;
3047: FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_UOM_CONV');
3048: FND_MESSAGE.SET_TOKEN('VALUE1', p_txn_uom);
3049: FND_MESSAGE.SET_TOKEN('VALUE2', l_primary_uom);
3050: x_err_buf := FND_MESSAGE.GET;
3051: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
3052: return(x_return_code);
3053: end if;
3054: --end bug 5496297
3055:
3064: x_return_code := 1;
3065: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_JOB_TXN_QTY');
3066: x_err_buf := FND_MESSAGE.GET;
3067:
3068: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
3069: return(x_return_code);
3070:
3071: END IF;
3072: -- ST : Serial Support Project ---
3097: x_return_code := 1;
3098: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_JOB_TXN_QTY');
3099: x_err_buf := FND_MESSAGE.GET;
3100:
3101: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
3102: return(x_return_code);
3103:
3104: END IF;
3105: -- ST : Serial Support Project ---
3111: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
3112: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'transaction_quantity');
3113: x_err_buf := FND_MESSAGE.GET;
3114:
3115: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
3116: return(x_return_code);
3117: END IF;
3118:
3119: IF (l_converted_scrap_qty > l_operation_qty) THEN
3122: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
3123: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'scrap_quantity');
3124: x_err_buf := FND_MESSAGE.GET;
3125:
3126: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
3127: return(x_return_code);
3128: END IF;
3129: --end move enh
3130:
3219: error = l_error_msg -- CZH.BUG2135538
3220: where header_id = p_header_id;
3221:
3222: l_stmt_num := 325;
3223: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
3224: ELSE
3225: x_return_code := 1;
3226: -- abb changed the message
3227: fnd_message.set_name('WSM','WSM_NO_SCRAP_ACC');
3226: -- abb changed the message
3227: fnd_message.set_name('WSM','WSM_NO_SCRAP_ACC');
3228: fnd_message.set_token('DEPT_ID',to_char(l_to_dept_id));
3229: x_err_buf := FND_MESSAGE.GET;
3230: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
3231: return(x_return_code);
3232: END IF;
3233: END IF;
3234:
3253: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
3254: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'scrap_account_id');
3255: x_err_buf := FND_MESSAGE.GET;
3256:
3257: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||
3258: l_stmt_num||'): '||x_err_buf);
3259: return(x_return_code);
3260: END;
3261: --***VJ End Additions***--
3278: x_return_code := 1;
3279: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
3280: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'scrap_account_id');
3281: x_err_buf := FND_MESSAGE.GET;
3282: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='|| l_stmt_num||'): '||x_err_buf);
3283: return(x_return_code);
3284: END;
3285:
3286: elsif ((l_est_scrap_acc = 2 or l_job_type = 3) and l_wlmti_scrap_acct_id = -1) then
3351: error = l_error_msg
3352: where header_id = p_header_id;
3353:
3354: l_stmt_num := 325;
3355: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
3356: ELSE
3357: x_return_code := 1;
3358: fnd_message.set_name('WSM','WSM_NO_SCRAP_ACC');
3359: IF (nvl(l_scrap_at_operation_flag, 1) = 1) THEN
3361: ELSE
3362: fnd_message.set_token('DEPT_ID',to_char(l_to_dept_id));
3363: END IF;
3364: x_err_buf := FND_MESSAGE.GET;
3365: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
3366: return(x_return_code);
3367: END IF;
3368:
3369: BEGIN
3378: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
3379: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'scrap_account_id');
3380: x_err_buf := FND_MESSAGE.GET;
3381:
3382: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||
3383: l_stmt_num||'): '||x_err_buf);
3384: return(x_return_code);
3385: END;
3386: ELSE --(l_wlmti_scrap_acct_id <> -1)
3416: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
3417: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'scrap_account_id');
3418: x_err_buf := FND_MESSAGE.GET;
3419:
3420: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||
3421: l_stmt_num||'): '||x_err_buf);
3422: return(x_return_code);
3423: END;
3424: END IF;
3455: error = l_error_msg
3456: where header_id = p_header_id;
3457:
3458: l_stmt_num := 325;
3459: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
3460: ELSE
3461: x_return_code := 1;
3462: fnd_message.set_name('WSM','WSM_NO_SCRAP_ACC');
3463: IF (nvl(l_scrap_at_operation_flag, 1) = 1) THEN
3465: ELSE
3466: fnd_message.set_token('DEPT_ID',to_char(l_to_dept_id));
3467: END IF;
3468: x_err_buf := FND_MESSAGE.GET;
3469: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
3470: return(x_return_code);
3471: END IF;
3472:
3473: BEGIN
3482: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
3483: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'scrap_account_id');
3484: x_err_buf := FND_MESSAGE.GET;
3485:
3486: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||
3487: l_stmt_num||'): '||x_err_buf);
3488: return(x_return_code);
3489: END;
3490: ELSE --(l_wlmti_scrap_acct_id <> -1)
3506: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
3507: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'scrap_account_id');
3508: x_err_buf := FND_MESSAGE.GET;
3509:
3510: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||
3511: l_stmt_num||'): '||x_err_buf);
3512: return(x_return_code);
3513: END;
3514: END IF; --(l_wlmti_scrap_acct_id = -1)
3532: x_return_code := 1;
3533: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
3534: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'scrap_account_id');
3535: x_err_buf := FND_MESSAGE.GET;
3536: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='|| l_stmt_num||'): '||x_err_buf);
3537: return(x_return_code);
3538: END;
3539:
3540: elsif ((l_est_scrap_acc = 2 or l_job_type = 3) and l_wlmti_scrap_acct_id = -1) then
3556: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
3557: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'primary_quantity');
3558: x_err_buf := FND_MESSAGE.GET;
3559:
3560: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
3561: return(x_return_code);
3562: END IF;*/
3563:
3564: --bug 3385113 added nvls
3568:
3569: FND_MESSAGE.SET_NAME('WSM', 'WSM_SCRAP_MOVE_QTY_INCORRECT');
3570: x_err_buf := FND_MESSAGE.GET;
3571:
3572: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
3573: return(x_return_code);
3574: END IF;
3575: --move enh commented out ELSE branch
3576:
3586:
3587: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_TXN_QTY');
3588: x_err_buf := FND_MESSAGE.GET;
3589:
3590: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
3591: return(x_return_code);
3592: END IF;
3593:
3594: END IF;
3634: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
3635: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'jump_flag');
3636: x_err_buf := FND_MESSAGE.GET;
3637:
3638: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
3639:
3640: return(x_return_code);
3641: end if;
3642:
3685:
3686: fnd_message.set_name('WIP', 'WIP_EZ_NO_SUBINV_DEFAULT1');
3687: x_err_buf := fnd_message.get;
3688:
3689: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
3690:
3691: return(x_return_code);
3692: end if;
3693: --endfix
3704:
3705: l_stmt_num := 355;
3706: l_txn_type := 2;
3707:
3708: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='
3709: ||l_stmt_num||'): WARNING: Changed transaction_type to 2 in WLMTI');
3710:
3711: END IF;
3712: ELSE -- not the last operation
3721:
3722: l_stmt_num := 360;
3723: l_txn_type := 1;
3724:
3725: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='
3726: ||l_stmt_num||'): WARNING: Changed transaction_type to 1 in WLMTI');
3727: END IF;
3728: END IF;
3729:
3741:
3742: fnd_message.set_name('WIP', 'WIP_EZ_NO_SUBINV_DEFAULT1');
3743: x_err_buf := fnd_message.get;
3744:
3745: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
3746:
3747: return(x_return_code);
3748: end if;
3749: --endfix
3759:
3760: l_stmt_num := 365;
3761: l_txn_type := 2;
3762:
3763: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='
3764: ||l_stmt_num||'): WARNING: Changed transaction_type to 2 in WLMTI');
3765: END IF;
3766: ELSE -- not the last operation
3767: IF (l_txn_type <> 1) THEN -- Move only
3775:
3776: l_stmt_num := 370;
3777: l_txn_type := 1;
3778:
3779: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='
3780: ||l_stmt_num||'): WARNING: Changed transaction_type to 1 in WLMTI');
3781: END IF;
3782: END IF;
3783: END IF;
3804: l_stmt_num := 371;
3805: x_return_code := 1;
3806: FND_MESSAGE.SET_NAME('WSM', 'WSM_NO_SCRAP_BKFLSH_OFF');
3807: x_err_buf := FND_MESSAGE.GET;
3808: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
3809: return(x_return_code);
3810: END IF;
3811:
3812: END IF; -- for forward moves and completions
3843: x_return_code := 1;
3844: FND_MESSAGE.SET_NAME('WSM', 'WSM_NO_COMPLETION');
3845: x_err_buf := FND_MESSAGE.GET;
3846:
3847: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
3848: return(x_return_code);
3849: END;
3850: --***VJ End Changes***--
3851:
3854: x_return_code := 1;
3855: FND_MESSAGE.SET_NAME('WSM', 'WSM_NO_COMPLETION');
3856: x_err_buf := FND_MESSAGE.GET;
3857:
3858: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
3859: return(x_return_code);
3860: END IF;
3861:
3862: l_stmt_num := 380;
3896: THEN
3897: x_return_code := 1;
3898: FND_MESSAGE.SET_NAME('WSM', 'WSM_MES_UNDO_OA_FORMSINTERFACE');
3899: x_err_buf := FND_MESSAGE.GET;
3900: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
3901: return(x_return_code);
3902: END IF;
3903: --mes end
3904:
3973: error = l_error_msg -- CZH.BUG2135538
3974: where header_id = p_header_id;
3975:
3976: l_stmt_num := 390;
3977: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
3978: end if;
3979:
3980: BEGIN
3981: -- ST : Serial Support Project ---
4117: x_return_code := 1;
4118: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_JOB_TXN_QTY');
4119: x_err_buf := FND_MESSAGE.GET;
4120:
4121: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
4122: return(x_return_code);
4123:
4124: END IF;
4125: -- ST : Serial Support ---
4177: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_RETURN'); -- Fix for bug #2095267
4178: x_return_code := 1;
4179: x_err_buf := FND_MESSAGE.GET;
4180:
4181: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
4182: return(x_return_code);
4183: end if;
4184:
4185: -- abbKanban begin
4225: ** FND_MESSAGE.SET_NAME('WSM', 'WSM_KNBN_CARD_STS_FAIL');
4226: ** fnd_message.set_token('STATUS','InProcess');
4227: ** x_return_code := 1;
4228: ** x_err_buf := FND_MESSAGE.GET;
4229: ** fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
4230: ** return(x_return_code);
4231: ** end if;
4232: ** end if;
4233: **
4259: FND_MESSAGE.SET_NAME('WSM', 'WSM_NO_WAC_SCRAP_ACC');
4260: fnd_message.set_token('CC', l_class_code);
4261: x_return_code := 1;
4262: x_err_buf := FND_MESSAGE.GET;
4263: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
4264: return(x_return_code);
4265: end if;
4266: end if;
4267:
4280: fnd_message.set_name('WSM','WSM_NO_SCRAP_ACC');
4281: fnd_message.set_token('DEPT_ID',to_char(l_cmp_to_dept_id));
4282: x_return_code := 1;
4283: x_err_buf := FND_MESSAGE.GET;
4284: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
4285: return(x_return_code);
4286: end if;
4287: end if;
4288:
4327: FND_MESSAGE.SET_NAME('WSM', 'WSM_UNDO_NOT_ENABLED');
4328: --end bug 4202723
4329: x_err_buf := FND_MESSAGE.GET;
4330:
4331: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
4332:
4333: return(x_return_code);
4334: end if;
4335:
4353: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
4354: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'wip_entity_name');
4355: x_err_buf := FND_MESSAGE.GET;
4356:
4357: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
4358: return(x_return_code);
4359: END;
4360: --***VJ End Changes***--
4361:
4390: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
4391: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'wip_entity_name');
4392: x_err_buf := FND_MESSAGE.GET;
4393:
4394: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
4395: return(x_return_code);
4396: END;
4397:
4398:
4439:
4440: FND_MESSAGE.SET_NAME('WSM', 'WSM_NO_MOVE_TXNS');
4441: x_err_buf := FND_MESSAGE.GET;
4442:
4443: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
4444:
4445: return(x_return_code);
4446: END IF;
4447: EXCEPTION
4450:
4451: FND_MESSAGE.SET_NAME('WSM', 'WSM_NO_MOVE_TXNS');
4452: x_err_buf := FND_MESSAGE.GET;
4453:
4454: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
4455: return(x_return_code);
4456: END;
4457: -- End fix for bug #2095253
4458:
4484: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
4485: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_operation_seq_num/transaction_quantity');
4486: x_err_buf := FND_MESSAGE.GET;
4487:
4488: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
4489: return(x_return_code);
4490: END;
4491:
4492: -- abb changes for bug 2427171 begin
4493: if l_txn_id is null then
4494: x_return_code := 1;
4495: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_MOVE_CAND');
4496: x_err_buf := FND_MESSAGE.GET;
4497: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf) ;
4498: return(x_return_code);
4499: end if;
4500: -- abb changes for bug 2427171 end
4501: --***VJ End Changes***--
4543: THEN
4544: x_return_code := 1;
4545: FND_MESSAGE.SET_NAME('WSM', 'WSM_MES_UNDO_OA_FORMSINTERFACE');
4546: x_err_buf := FND_MESSAGE.GET;
4547: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
4548: return(x_return_code);
4549: END IF;
4550:
4551: IF (l_fm_op_seq_num <> l_to_op_seq_num) THEN
4720: p_run_log_level => l_log_level
4721: );
4722: END IF;
4723: l_stmt_num := 440;
4724: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
4725:
4726: END IF;
4727:
4728: -- Verify if the given p_to_op_seq/code/iop/dept_id is same as the above retrieved l_from_op_seq/code/iop/dept_id.
4766: error = l_error_msg -- CZH.BUG2135538
4767: where header_id = p_header_id;
4768:
4769: l_stmt_num := 445;
4770: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
4771: END IF;
4772:
4773: --BA: CZH:BUG2154720
4774: l_stmt_num := 447;
4797: x_return_code := 1;
4798: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_JOB_TXN_QTY');
4799: x_err_buf := FND_MESSAGE.GET;
4800:
4801: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
4802: return(x_return_code);
4803:
4804: END IF;
4805: -- ST : Serial Support ---
4846: x_return_code := 1;
4847: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_JOB_TXN_QTY');
4848: x_err_buf := FND_MESSAGE.GET;
4849:
4850: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
4851: return(x_return_code);
4852:
4853: END IF;
4854: -- ST : Serial Support ---
4868: x_return_code := 1;
4869: FND_MESSAGE.SET_NAME('WSM', 'WSM_SCRAP_QTY_INCORRECT');
4870: x_err_buf := FND_MESSAGE.GET;
4871:
4872: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):
4873: '||x_err_buf);
4874:
4875: return(x_return_code);
4876: END IF;
4888: --FND_MESSAGE.SET_TOKEN('FLD_NAME', 'transaction_quantity');
4889: FND_MESSAGE.SET_NAME('WSM', 'WSM_LOT_INVALID_CANDIDATE'); -- Fix for bug #2095253
4890: x_err_buf := FND_MESSAGE.GET;
4891:
4892: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
4893: return(x_return_code);
4894: end if;
4895: -- END IF;
4896:
4941: error = l_error_msg -- CZH.BUG2135538
4942: where header_id = p_header_id;
4943:
4944: l_stmt_num := 460;
4945: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
4946: --bug 5185751 modify line below since l_wmt_scrap_acct_id may be null
4947: --elsif (l_wmt_scrap_acct_id <> l_wlmti_scrap_acct_id) then
4948: elsif (nvl(l_wmt_scrap_acct_id, -1) <> l_wlmti_scrap_acct_id) then
4949: x_return_code := 1;
4951: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
4952: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'scrap_account');
4953: x_err_buf := FND_MESSAGE.GET;
4954:
4955: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
4956:
4957: return(x_return_code);
4958: end if;
4959:
4976: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
4977: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_dept_id'); --bugfix 1587295: changed the token
4978: x_err_buf := FND_MESSAGE.GET;
4979:
4980: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
4981: return(x_return_code);
4982: ELSE
4983: FND_MESSAGE.SET_NAME('WSM', 'WSM_MODIFIED_FIELD');
4984: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'fm_department_code');
4983: FND_MESSAGE.SET_NAME('WSM', 'WSM_MODIFIED_FIELD');
4984: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'fm_department_code');
4985: x_err_buf := FND_MESSAGE.GET;
4986:
4987: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
4988: END IF;
4989: --***VJ End Additions***--
4990:
4991: l_stmt_num := 475;
5002: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
5003: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'fm_dept_id'); --bugfix 1587295: changed the token
5004: x_err_buf := FND_MESSAGE.GET;
5005:
5006: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
5007: return(x_return_code);
5008: ELSE
5009: FND_MESSAGE.SET_NAME('WSM', 'WSM_MODIFIED_FIELD');
5010: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_department_code');
5009: FND_MESSAGE.SET_NAME('WSM', 'WSM_MODIFIED_FIELD');
5010: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'to_department_code');
5011: x_err_buf := FND_MESSAGE.GET;
5012:
5013: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'):'||x_err_buf);
5014: END IF;
5015: --***VJ End Additions***--
5016:
5017: --NSO Modification by abedajna addition end
5032:
5033: x_return_code := 0;
5034: x_err_buf := '';
5035: --move enh replaced NVL(l_converted_txn_qty,0) with l_bk_move_chk_qty
5036: x_return_code := WSMPLBMI.validate_lot_txn_for_bk_move(p_org_id,
5037: l_wip_entity_id,
5038: -- NVL(l_converted_txn_qty,0), -- CZH: BUG2154720
5039: l_bk_move_chk_qty,
5040: l_txn_type,
5069: FND_MESSAGE.SET_NAME('WSM', 'WSM_INFO_NOT_FOUND');
5070: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'acct_period_id');
5071: x_err_buf := FND_MESSAGE.GET;
5072:
5073: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
5074: return(x_return_code);
5075: END IF;
5076:
5077:
5096: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_PRI_UOM');
5097: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'fm_op_seq_num/fm_intraop_step_type');
5098: x_err_buf := FND_MESSAGE.GET;
5099:
5100: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
5101: return(x_return_code);
5102: END IF;
5103:
5104:
5125: x_return_code := 1;
5126: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_JOB_TXN_QTY');
5127: x_err_buf := FND_MESSAGE.GET;
5128:
5129: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
5130: return(x_return_code);
5131:
5132: END IF;
5133: -- ST : Serial Support ---
5168: FND_MESSAGE.SET_NAME('WSM', 'WSM_UPDATE_INVALID');
5169: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'primary_quantity');
5170: x_err_buf := FND_MESSAGE.GET;
5171:
5172: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
5173: return(x_return_code);
5174: END IF;
5175:
5176:
5223: -- IF (x_return_code <> 0) THEN
5224: -- FND_MESSAGE.SET_NAME('WSM', 'WSM_DISABLE_OPS_FAILED');
5225: -- x_err_buf := FND_MESSAGE.GET;
5226: --
5227: -- fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
5228: -- return(x_return_code);
5229: -- ELSE
5230: -- if (l_debug = 'Y') then
5231: -- fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num
5227: -- fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
5228: -- return(x_return_code);
5229: -- ELSE
5230: -- if (l_debug = 'Y') then
5231: -- fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num
5232: -- ||'): Returned success from WSMPOPRN.disable_operations');
5233: -- end if;
5234: -- END IF;
5235: -- EA: CZH.BUG2168828
5309: end if;
5310:
5311: -- OSP FP I end changes
5312:
5313: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
5314: return(x_return_code);
5315: ELSE
5316: if (l_debug = 'Y') then
5317: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num
5313: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): '||x_err_buf);
5314: return(x_return_code);
5315: ELSE
5316: if (l_debug = 'Y') then
5317: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num
5318: ||'): Returned success from WSMPOPRN.add_operation');
5319: end if;
5320:
5321: END IF;
5332: and operation_seq_num= p_fm_op_seq_num;
5333: END IF;
5334:
5335: if (l_debug = 'Y') then
5336: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num||'): ');
5337: end if;
5338:
5339: --abb H Non Std Jobs
5340: IF (g_aps_wps_profile='N') THEN
5380: l_stmt_num := 540;
5381: IF (x_return_code <> 0) THEN
5382: -- use the error message returned from WSMPWROT.POPULATE_WRO
5383:
5384: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='
5385: ||l_stmt_num||') calling WSMPWROT.POPULATE_WRO: '||x_err_buf);
5386: return(x_return_code);
5387: ELSE
5388: if (l_debug = 'Y') then
5385: ||l_stmt_num||') calling WSMPWROT.POPULATE_WRO: '||x_err_buf);
5386: return(x_return_code);
5387: ELSE
5388: if (l_debug = 'Y') then
5389: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation(stmt_num='||l_stmt_num
5390: ||'): Returned success from WSMPWROT.POPULATE_WRO');
5391: end if;
5392: END IF;
5393: -- BA: CZH.BUGFIX 2350705
5412:
5413: x_return_code := 0;
5414: x_err_buf := NULL;
5415: if (l_debug = 'Y') then
5416: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.custom_validation' ||': Returned Success');
5417: end if;
5418:
5419: return x_return_code;
5420:
5420:
5421: EXCEPTION
5422: WHEN OTHERS THEN
5423: x_return_code := SQLCODE;
5424: x_err_buf := 'WSMPLBMI.custom_validation' ||'(stmt_num='||l_stmt_num||') : '||substrb(sqlerrm,1,1000);
5425: fnd_file.put_line(fnd_file.log, x_err_buf);
5426:
5427: return x_return_code;
5428: END custom_validation;
5474: x_return_code := 1;
5475: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
5476: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'transaction_type');
5477: x_err_buf := FND_MESSAGE.GET;
5478: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.validate_lot_txn_for_bk_move(stmt_num='
5479: ||l_stmt_num||'): '||x_err_buf);
5480: return(x_return_code);
5481: END IF;
5482:
5515: x_return_code := 1;
5516: FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
5517: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'move');
5518: x_err_buf := FND_MESSAGE.GET;
5519: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.validate_lot_txn_for_bk_move(stmt_num='
5520: || l_stmt_num||'): '||x_err_buf);
5521: return(x_return_code);
5522: END;
5523:
5548: --FND_MESSAGE.SET_NAME('WSM', 'WSM_INVALID_FIELD');
5549: --FND_MESSAGE.SET_TOKEN('FLD_NAME', 'transaction_quantity');
5550: FND_MESSAGE.SET_NAME('WSM', 'WSM_LOT_INVALID_CANDIDATE'); -- Fix for bug #2095253
5551: x_err_buf := FND_MESSAGE.GET;
5552: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.validate_lot_txn_for_bk_move(stmt_num='
5553: ||l_stmt_num||'): '||x_err_buf);
5554: return(x_return_code);
5555: END IF;
5556:
5587:
5588: EXCEPTION
5589: WHEN OTHERS THEN
5590: x_return_code := SQLCODE;
5591: x_err_buf := 'WSMPLBMI.validate_lot_txn_for_bk_move' ||'(stmt_num='||l_stmt_num||'): '||substrb(sqlerrm,1,1000);
5592: fnd_file.put_line(fnd_file.log, x_err_buf);
5593: return x_return_code;
5594: END validate_lot_txn_for_bk_move;
5595:
5614: x_return_code NUMBER;
5615: -- Logging variables.....
5616: l_msg_tokens WSM_Log_PVT.token_rec_tbl;
5617: l_log_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
5618: l_module CONSTANT VARCHAR2(100) := 'wsm.plsql.WSMPLBMI.set_undo_txn_id';
5619: l_param_tbl WSM_Log_PVT.param_tbl_type;
5620: l_return_status VARCHAR2(1);
5621: l_msg_count number;
5622: l_msg_data varchar2(4000);
5656: --and batch_id < p_undo_txn_id;
5657: and nvl(batch_id, transaction_id) < p_undo_txn_id;
5658:
5659: if (l_debug = 'Y') then
5660: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.set_undo_txn_id(stmt_num=' || l_stmt_num || '): p_undo_txn_id ' ||p_undo_txn_id||' x_undone_batch_id '||x_undone_batch_id);
5661: end if;
5662:
5663: IF (G_LOG_LEVEL_STATEMENT >= l_log_level) THEN
5664: l_msg_tokens.delete;
5708: WHEN NO_DATA_FOUND THEN
5709: x_return_code := 1;
5710: FND_MESSAGE.SET_NAME('WSM', 'WSM_SET_UNDO_TXN_ID_FAILED');
5711: x_err_buf := FND_MESSAGE.GET;
5712: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.set_undo_txn_id(stmt_num=' ||
5713: l_stmt_num || '): ' ||x_err_buf);
5714: return(x_return_code);
5715:
5716: WHEN OTHERS THEN
5714: return(x_return_code);
5715:
5716: WHEN OTHERS THEN
5717: x_return_code := SQLCODE;
5718: x_err_buf := 'WSMPLBMI.set_undo_txn_id' ||'(stmt_num='||l_stmt_num||'): '||substrb(sqlerrm,1,1000);
5719: fnd_file.put_line(fnd_file.log, x_err_buf);
5720: return x_return_code;
5721:
5722: END set_undo_txn_id;
5761: WHEN NO_DATA_FOUND THEN
5762: x_return_code := 1;
5763: FND_MESSAGE.SET_NAME('WSM', 'WSM_SET_UNDO_TXN_ID_FAILED');
5764: x_err_buf := FND_MESSAGE.GET;
5765: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.set_undo_txn_id(stmt_num=' ||
5766: l_stmt_num || '): ' ||x_err_buf);
5767: return(x_return_code);
5768:
5769: WHEN OTHERS THEN
5767: return(x_return_code);
5768:
5769: WHEN OTHERS THEN
5770: x_return_code := SQLCODE;
5771: x_err_buf := 'WSMPLBMI.set_undo_txn_id' ||'(stmt_num='||l_stmt_num||'): '||substrb(sqlerrm,1,1000);
5772: fnd_file.put_line(fnd_file.log, x_err_buf);
5773: return x_return_code;
5774:
5775: END set_undo_txn_id;
6205: l_temp_txn_type NUMBER; --bug 4380374
6206: -- Logging variables.....
6207: l_msg_tokens WSM_Log_PVT.token_rec_tbl;
6208: l_log_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
6209: l_module CONSTANT VARCHAR2(100) := 'wsm.plsql.wsmplbmi.movetransaction.main';
6210: l_param_tbl WSM_Log_PVT.param_tbl_type;
6211: -- Logging variables...
6212:
6213: BEGIN
6491: /************************************************
6492: * call custom_validation to validate the entry *
6493: ************************************************/
6494:
6495: x_error_code := WSMPLBMI.custom_validation(
6496: l_header_id,
6497: l_transaction_id,
6498: l_transaction_quantity,
6499: l_transaction_date,
6526: l_total_txns := l_total_txns+1;
6527:
6528: IF (x_error_code<> 0) THEN
6529: l_error_msg := x_error_msg;
6530: FND_FILE.PUT_LINE(FND_FILE.LOG, substrb('WSMPLBMI.MoveTransactions' ||'(stmt_num='||l_stmt_num||') : '||l_error_msg, 1,4000));
6531: ROLLBACK TO validation;
6532: error_handler(p_header_id => l_header_id
6533: , p_transaction_id => l_transaction_id
6534: , p_error_msg => l_error_msg
6641: p_intf_src_code => 'WSM');
6642:
6643: IF (x_err_code<> 0) THEN
6644: l_error_msg := x_error_msg;
6645: FND_FILE.PUT_LINE(FND_FILE.LOG, substrb('WSMPLBMI.MoveTransactions' ||'(stmt_num='||l_stmt_num||') : '||l_error_msg, 1,4000));
6646: ROLLBACK TO validation;
6647: error_handler(p_header_id => l_header_id
6648: , p_transaction_id => l_transaction_id
6649: , p_error_msg => l_error_msg
7712: IF (x_error_code=0) THEN
7713: FND_FILE.PUT_LINE(FND_FILE.LOG, 'find_routing_end returned success');
7714: ELSE
7715: l_error_msg := x_error_msg;
7716: FND_FILE.PUT_LINE(FND_FILE.LOG,'WSMPLBMI.custom_validation' ||'(stmt_num='||l_stmt_num||') : '||substrb(l_error_msg, 1,4000));
7717: ROLLBACK TO validation;
7718: error_handler(p_header_id => l_header_id
7719: , p_transaction_id => l_transaction_id
7720: , p_error_msg => l_error_msg
7968: SET new_wip_entity_name=l_new_name
7969: where rowid=l_rowid;
7970: ELSE
7971: l_error_msg := x_error_msg;
7972: FND_FILE.PUT_LINE(FND_FILE.LOG,'WSMPLBMI.MoveTransactions' ||'(stmt_num='||l_stmt_num||') : '||substrb(l_error_msg, 1,4000));
7973: ROLLBACK TO validation;
7974: error_handler(p_header_id => l_header_id
7975: , p_transaction_id => l_transaction_id
7976: , p_error_msg => l_error_msg
8114: SET wip_entity_name=l_new_name
8115: where rowid=l_rowid;
8116: ELSE
8117: l_error_msg := x_error_msg;
8118: FND_FILE.PUT_LINE(FND_FILE.LOG,'WSMPLBMI.MoveTransactions' ||'(stmt_num='||l_stmt_num||') : '||substrb(l_error_msg, 1,4000));
8119: ROLLBACK TO validation;
8120: error_handler(p_header_id => l_header_id
8121: , p_transaction_id => l_transaction_id
8122: , p_error_msg => l_error_msg
8451: WHERE header_id = l_header_id);
8452:
8453: l_count := SQL%ROWCOUNT;
8454: IF (g_mrp_debug='Y') THEN
8455: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.MoveTransaction' ||'(stmt_num='||l_stmt_num||') :
8456: Inserted Scrap Txn');
8457: END IF;
8458:
8459: --mes populate l_job_fm_op_seq_num, l_job_to_op_seq_num
8685: , p_transaction_id => l_transaction_id
8686: , p_error_msg => l_error_msg
8687: , x_error_code => x_err_code
8688: , x_error_msg => x_err_msg);
8689: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.MoveTransaction' ||'(stmt_num='||l_stmt_num||') : '||l_error_msg);
8690: IF (x_err_code <> 0) THEN
8691: raise e_proc_exception;
8692: END IF;
8693:
8749: -- End if;--not normal move or undo
8750: End if ;
8751: END;
8752: END IF;--End of check on transaction type.
8753: WSMPLBMI.update_costed_qty_compl(
8754: p_transaction_type => l_transaction_type
8755: , p_job_fm_op_seq_num => l_fm_op_seq_num
8756: , p_job_to_op_seq_num => l_job_to_op_seq_num
8757: , p_wip_entity_id => l_wip_entity_id
8819: AND wo.operation_seq_num = wro.operation_seq_num
8820: AND wo.count_point_type = 3);
8821:
8822: IF (g_mrp_debug='Y') THEN
8823: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.MoveTransaction' ||'(stmt_num='||l_stmt_num||') :
8824: Updated '||SQL%ROWCOUNT||' rows in WRO');
8825: END IF;
8826:
8827: END IF;
8872: FND_FILE.PUT_LINE(FND_FILE.LOG, 'WSMPOPRN.call_infinite_scheduler returned success');
8873: END IF;
8874: ELSE
8875: l_error_msg := x_error_msg;
8876: FND_FILE.PUT_LINE(FND_FILE.LOG,'WSMPLBMI.custom_validation' ||'(stmt_num='||l_stmt_num||') : '||substrb(l_error_msg, 1,4000));
8877: ROLLBACK TO validation;
8878: error_handler(p_header_id => l_header_id
8879: , p_transaction_id => l_transaction_id
8880: , p_error_msg => l_error_msg
9033: x_returnStatus => l_return_status,
9034: x_errorMsg => l_error_msg);
9035:
9036: IF(l_return_status <> 'S')THEN
9037: FND_FILE.PUT_LINE(FND_FILE.LOG, substrb('WSMPLBMI.MoveTransactions' ||'(stmt_num='||l_stmt_num||') : '||l_error_msg, 1,4000));
9038: ROLLBACK TO validation;
9039: error_handler(p_header_id => l_header_id
9040: , p_transaction_id => l_transaction_id
9041: , p_error_msg => l_error_msg
9101: x_returnStatus => l_return_status,
9102: x_errorMsg => l_error_msg);
9103:
9104: IF (l_return_status <> 'S') THEN
9105: FND_FILE.PUT_LINE(FND_FILE.LOG, substrb('WSMPLBMI.MoveTransactions' ||'(stmt_num='||l_stmt_num||') : '||l_error_msg, 1,4000));
9106: ROLLBACK TO validation;
9107: error_handler(p_header_id => l_header_id
9108: , p_transaction_id => l_transaction_id
9109: , p_error_msg => l_error_msg
10570: )
10571: ));
10572:
10573: IF (g_mrp_debug='Y') THEN
10574: fnd_file.put_line(fnd_file.log, 'WSMPLBMI.MoveTransaction' ||'(stmt_num='||l_stmt_num||') :
10575: Updated '||SQL%ROWCOUNT||' rows in WOY');
10576: END IF;
10577: /**********************************
10578: UPDATE WIP_OPERATION_YIELDS woy
10704: AND l_charge_jump_from_queue=2) THEN
10705: undo_jump_from_queue:=TRUE;
10706: END IF;
10707:
10708: x_return_code := WSMPLBMI.set_undo_txn_id(
10709: rec.organization_id,
10710: rec.wip_entity_id,
10711: --mes replacing l_undo_txn_id with rec.transaction_id
10712: --l_undo_txn_id,
10846: l_stmt_num := 290;
10847: /* BA: CZH.BUG2282570 */
10848: /* for UNDO, set WMT.wsm_undo_txn_id */
10849: IF (rec.transaction_type = 3) THEN
10850: x_return_code := WSMPLBMI.set_undo_txn_id(rec.organization_id,
10851: rec.wip_entity_id,
10852: rec.transaction_id,
10853: x_err_msg);
10854:
11134: /*Changes for skaradib*/
11135:
11136: l_stmt_num := 340;
11137: IF (g_mrp_debug='Y') THEN
11138: fnd_file.put_line(fnd_file.log,'WSMPLBMI.MoveTransaction Successful ');
11139: END IF;
11140:
11141: IF (G_LOG_LEVEL_PROCEDURE >= l_log_level) THEN
11142: l_msg_tokens.delete;
11165: END IF;
11166: retcode := 1;
11167: ROLLBACK;
11168: UPDATE wsm_lot_move_txn_interface WLMTI
11169: SET WLMTI.ERROR = 'Error WSMPLBMI.MoveTransaction' ||'(stmt_num='||l_stmt_num||')',
11170: WLMTI.STATUS = g_error,
11171: WLMTI.LAST_UPDATE_DATE = SYSDATE
11172: WHERE WLMTI.GROUP_ID = p_group_id
11173: AND WLMTI.STATUS in (g_pending, g_running) ;
11186: END IF;
11187: retcode := -1;
11188: ROLLBACK;
11189: UPDATE wsm_lot_move_txn_interface WLMTI
11190: SET WLMTI.ERROR = 'Error WSMPLBMI.MoveTransaction' ||'(stmt_num='||l_stmt_num||')',
11191: WLMTI.STATUS = g_error,
11192: WLMTI.LAST_UPDATE_DATE = SYSDATE
11193: WHERE WLMTI.GROUP_ID = p_group_id
11194: AND WLMTI.STATUS in (g_pending, g_running) ;
11195:
11196: WHEN e_proc_exception THEN
11197:
11198: retcode := -1;
11199: errbuf := 'WSMPLBMI.MoveTransaction' ||'(stmt_num='||l_stmt_num||') : '||x_error_msg;
11200: fnd_file.put_line(fnd_file.log, errbuf);
11201: ROLLBACK;
11202:
11203: UPDATE wsm_lot_move_txn_interface WLMTI
11237: );
11238: END IF;
11239:
11240: retcode := SQLCODE;
11241: errbuf :='WSMPLBMI.MoveTransaction' ||'(stmt_num='||l_stmt_num||') : '||sqlerrm;
11242: fnd_file.put_line(fnd_file.log, errbuf);
11243: ROLLBACK;
11244:
11245: UPDATE wsm_lot_move_txn_interface WLMTI
11345:
11346: -- Logging variables.....
11347: l_msg_tokens WSM_Log_PVT.token_rec_tbl;
11348: l_log_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
11349: l_module CONSTANT VARCHAR2(100) := 'wsm.plsql.WSMPLBMI.MoveTransactions.html';
11350: l_param_tbl WSM_Log_PVT.param_tbl_type;
11351: x_error_count NUMBER;
11352: x_return_code NUMBER;
11353: x_error_msg VARCHAR2(4000);
11923: IF (x_return_status = g_ret_success) THEN
11924: l_msg_tokens.delete;
11925: WSM_log_PVT.logMessage (
11926: p_module_name => l_module,
11927: p_msg_text => 'WSMPLBMI.MoveTransaction returned '||
11928: ';x_wip_move_api_sucess_msg '||
11929: x_wip_move_api_sucess_msg||
11930: ';retcode '||
11931: retcode||
12089: l_first_serial_txn_id NUMBER; --bug 5444062
12090: -- Logging variables.....
12091: l_msg_tokens WSM_Log_PVT.token_rec_tbl;
12092: l_log_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
12093: l_module CONSTANT VARCHAR2(100) := 'wsm.plsql.WSMPLBMI.getMoveOutPageProperties';
12094: l_param_tbl WSM_Log_PVT.param_tbl_type;
12095: l_next_links_exist NUMBER := 0; --bug 5531107
12096: x_error_count NUMBER;
12097: x_return_code NUMBER;
12687: l_current_job_op_seq_num NUMBER;
12688: -- Logging variables.....
12689: l_msg_tokens WSM_Log_PVT.token_rec_tbl;
12690: l_log_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
12691: l_module CONSTANT VARCHAR2(100) := 'wsm.plsql.WSMPLBMI.getJobOpPageProperties';
12692: l_param_tbl WSM_Log_PVT.param_tbl_type;
12693: x_error_count NUMBER;
12694: x_return_code NUMBER;
12695: x_error_msg VARCHAR2(4000);
12956: l_fm_costed_quantity_completed NUMBER := 0;
12957: l_to_costed_quantity_completed NUMBER := 0;
12958: l_msg_tokens WSM_Log_PVT.token_rec_tbl;
12959: l_log_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
12960: l_module VARCHAR2(100) := 'wsm.plsql.WSMPLBMI.update_costed_qty_compl';
12961: l_stmt_num NUMBER := 0;
12962: BEGIN
12963: IF (G_LOG_LEVEL_STATEMENT >= l_log_level) THEN
12964: l_msg_tokens.delete;
13379: RETURN NULL;
13380: END convert_uom;
13381: --mes end
13382:
13383: END WSMPLBMI;
13384: