01. DADOS GERAIS

Produto:

Linha de Produto:

Segmento:

Módulo:

Função:WMSA580 - Requisição automática OP 
País:Brasil
Ticket:19912745
Story:DLOGWMSMSP-16440

02. DESCRIÇÃO

Inclusão de novo ponto de entrada para que seja possível filtrar mais de uma ordem de produção para geração de serviços de requisição pro WMS.

Este ponto de entrada poderá ser acionado quando executado de forma automática a geração de requisição de ordens de produção.

Receberá como parâmetro parte do filtro com a OP que está sendo processada conforme parâmetros de execução.  Exemplo : Executando diretamente a função WMSA508GRA(.F. /*Exibe mensagem*/,"001"/*ordem de produção*/) . Neste exemplo o ponto de entrada receberá o filtro com o OP selecionada 001, que poderá ser alterado.



Nome do ponto de entrada: WMS508CW
Parâmetros:
cwhere: Recebe uma string com parte da where clause com a OP que enviada para na chamada da função de processamento.
Retorno: Envia a string recebida alterada com os filtros necessários com uma ou mais ordem de produção.

03. DEMAIS INFORMAÇÕES

Exemplo de uso:

#INCLUDE "PROTHEUS.CH"

User Function WMSV081V()
    Local cVolume := PARAMIXB[1]
    Local cCarga := PARAMIXB[2]
    Local cPedido := PARAMIXB[3]
    Local cArmazem := PARAMIXB[4]
    Local cEndereco := PARAMIXB[5]
    Local lRet := .T.
    Local aArea := GetArea()
    Local cAliasDCU := GetNextAlias()

    BeginSql Alias cAliasDCU
        SELECT 1
        FROM %Table:DCU% DCU
        WHERE DCU.DCU_FILIAL = %xFilial:DCU%
        AND DCU.DCU_CODVOL = %Exp:cVolume%
        AND DCU.DCU_OPERAD <> %Exp:__cUserID%
        AND DCU.%NotDel%
    EndSql
    If (cAliasDCU)->(!Eof())
        lRet := .F.
        WMSVTAviso("U_WMSV81","Volume iniciado por outro operador")
    EndIf
    (cAliasDCU)->(dbCloseArea())

    RestArea(aArea)
Return lRet


04. ASSUNTOS RELACIONADOS