[Home] [Help]
50:
51:
52: IF (DUMMY >= 1) THEN
53: V_RESULT := 0;
54: x :=OE_MSG.SET_MESSAGE_NAME('OE_CAN_RMA_INTERFACED');
55: -- "You cannot cancel this Return at this level."
56: ELSE
57: SELECT NVL(SUM(NVL(MTLSRR.RECEIVED_QUANTITY,0)),0)
58: INTO RECEIVED_QUANTITY
66: AND S29 = 14);
67:
68: IF (RECEIVED_QUANTITY > 0) THEN
69: V_RESULT := 0;
70: x :=OE_MSG.SET_MESSAGE_NAME('OE_CAN_RMA_INTERFACED');
71: -- "You cannot cancel this Return at this level."
72: ELSE
73: V_RESULT := 1;
74: END IF;
84: AND SLD.WIP_COMPLETED_QUANTITY < SLD.QUANTITY;
85:
86: IF (DUMMY >= 1) THEN
87: V_RESULT := 0;
88: x :=OE_MSG.SET_MESSAGE_NAME('OE_CAN_ATO_DETS_LINKED');
89: -- This order contains ATO lines whose details are
90: -- linked. See explanation
91: ELSE
92: V_RESULT := 1;
326: WHERE HEADER_ID = V_HEADER_ID);
327:
328:
329: IF V_PRINT_ERR_MSG = 1 THEN
330: x :=OE_MSG.SET_MESSAGE_NAME('OE_CAN_ORD_CANCLD_REQUERY');
331: V_RESULT := 1;
332: ELSE
333: V_RESULT := 1;
334: END IF;
400: AND SYSDATE BETWEEN SER.START_DATE_ACTIVE AND SER.END_DATE_ACTIVE;
401:
402: IF (DUMMY >= 1) THEN
403: IF V_PRINT_ERR_MSG = 1 THEN
404: x :=OE_MSG.SET_MESSAGE_NAME('OE_CAN_SERVICE_ACTIVE');
405: -- "You cannot cancel an order that has active service lines."
406: END IF;
407: V_RESULT := 1;
408: ELSE
417: AND SYSDATE BETWEEN SER.START_DATE_ACTIVE AND SER.END_DATE_ACTIVE;
418:
419: IF (DUMMY2 >= 1) THEN
420: IF V_PRINT_ERR_MSG = 1 THEN
421: x :=OE_MSG.SET_MESSAGE_NAME('OE_CAN_SERVICE_ACTIVE');
422: END IF;
423: V_RESULT := 1;
424: END IF;
425:
437: AND NVL(S2,18) <> 18;
438:
439: IF (DUMMY3 >= 1) THEN
440: IF V_PRINT_ERR_MSG = 1 THEN
441: x :=OE_MSG.SET_MESSAGE_NAME('OE_CAN_NO_ATO_AFTER_PICK');
442: END IF;
443: V_RESULT := 1;
444: END IF;
445:
539: GOTO do_calculation;
540:
541: ELSE
542: IF V_PRINT_ERR_MSG = 1 THEN
543: x :=OE_MSG.SET_MESSAGE_NAME('OE_CAN_INVALID_S29');
544: V_RESULT := 0;
545: ELSE
546: V_RESULT := 0;
547: END IF;
1310: AND L.PICKING_HEADER_ID = H.PICKING_HEADER_ID
1311: AND H.STATUS_CODE IN ('OPEN' ,'PENDING', 'IN PROGRESS');
1312:
1313: IF (DUMMY >= 1) THEN
1314: TEMP := OE_MSG.SET_MESSAGE_NAME ('OE_CANCEL_CLASS_OPENSLP');
1315: V_RESULT := 0;
1316: RETURN;
1317: END IF;
1318:
1510:
1511: IF (X_BOM_RESULT = 0) THEN
1512: V_RESULT := 1;
1513: ELSE
1514: x :=OE_MSG.SET_BUFFER_MESSAGE('OE_BOM_EXPLOSION_FAILED', 'REASON', X_BOM_RESULT);
1515: -- issue message 'OE_BOM_EXPLOSION_FAILED'
1516: -- REASON=:WORLD.BOM_MESSAGE
1517: V_RESULT := 0;
1518: END IF;
1614: RETURN;
1615: END IF;
1616: ELSE
1617: -- You must select a quantity that is a multiple of the parent quantity.
1618: x :=OE_MSG.SET_MESSAGE_NAME('OE_CAN_OPN_NOT_RATIO');
1619: V_RESULT := 0;
1620: RETURN;
1621: END IF;
1622:
1646: AND ORDERED_QUANTITY - NVL(CANCELLED_QUANTITY,0) > 0);
1647:
1648: IF (DUMMY2 >= 1) THEN
1649: -- You may not cancel the last option in this mandatory class.
1650: x :=OE_MSG.SET_MESSAGE_NAME('OE_CAN_LAST_OPT');
1651: V_RESULT := 0;
1652: RETURN;
1653: END IF;
1654:
1670:
1671:
1672: IF ( DUMMY3 >= 1) THEN
1673: -- You may not cancel a mandatory class.
1674: x :=OE_MSG.SET_MESSAGE_NAME('OE_CAN_MAND_CLASS');
1675: V_RESULT := 0;
1676: RETURN;
1677: END IF;
1678:
1706:
1707:
1708: IF (DUMMY4 = 0) THEN
1709: -- You have gone below the minimum required quantity for this option.
1710: x :=OE_MSG.SET_MESSAGE_NAME('OE_CAN_ATO_LOW');
1711: V_RESULT := 0;
1712: RETURN;
1713: ELSE
1714: V_RESULT := 1;