[Home] [Help]
2783: x_bfRequired := WIP_CONSTANTS.WBF_BF_PAGE;
2784: x_lotSerRequired := WIP_CONSTANTS.YES;
2785: ELSE
2786: -- derive lot for both Operation Pull and Assembly Pull components
2787: wip_autoLotProc_priv.deriveLotsFromMTI
2788: (p_orgID => p_orgID,
2789: p_wipEntityID => p_wipEntityID,
2790: p_txnHdrID => p_txnHdrID,
2791: p_cplTxnID => p_cplTxnID,
2794: p_initMsgList => fnd_api.g_false,
2795: p_endDebug => fnd_api.g_false,
2796: x_returnStatus => l_returnStatus);
2797: IF(l_returnStatus = fnd_api.g_ret_sts_unexp_error) THEN
2798: l_errMsg := 'wip_autoLotProc_priv.deriveLotsFromMTI failed';
2799: raise fnd_api.g_exc_unexpected_error;
2800: ELSIF(l_returnStatus = fnd_api.g_ret_sts_error) THEN
2801: x_bfRequired := WIP_CONSTANTS.WBF_BF_PAGE;
2802: x_lotSerRequired := WIP_CONSTANTS.YES;
3451: IF (p_objectID IS NOT NULL AND
3452: (p_txnType = WIP_CONSTANTS.RET_TXN OR
3453: l_backwardMove = WIP_CONSTANTS.YES)) THEN
3454: -- Derive lot control only from genealogy
3455: wip_autoLotProc_priv.deriveLotsFromMOG(x_compLots => x_compInfo,
3456: p_orgID => p_orgID,
3457: p_objectID => p_objectID,
3458: p_initMsgList => fnd_api.g_true,
3459: x_returnStatus => x_returnStatus);
3480: ELSE
3481: -- derive lot if the component under lot control, if return status
3482: -- is 'E' mean cannot derive lot, so the user need to provide more
3483: -- info.
3484: wip_autoLotProc_priv.deriveLots(
3485: x_compLots => x_compInfo,
3486: p_orgID => p_orgID,
3487: p_wipEntityID => p_wipEntityID,
3488: p_initMsgList => fnd_api.g_true,
3492: p_treeSrcName => null,
3493: x_returnStatus => x_returnStatus);
3494:
3495: IF(x_returnStatus = fnd_api.g_ret_sts_unexp_error) THEN
3496: l_errMsg := 'wip_autoLotProc_priv.deriveLots failed';
3497: raise fnd_api.g_exc_unexpected_error;
3498: ELSIF(x_returnStatus = fnd_api.g_ret_sts_error) THEN
3499: x_lotSerRequired := WIP_CONSTANTS.YES;
3500: ELSE -- succesfully derived lot