Produto: | |
---|---|
Linha de Produto: | |
Segmento: | |
Módulo: | SIGAWMS - Gestão de Armazenagem |
Função: | WMSA320 - Conferência de Recebimento |
País: | Todos Países |
Ticket: | 14545141 |
Requisito/Story/Issue (informe o requisito relacionado) : | DLOGWMSMSP-14219 |
Este Ponto de Entrada é acionado tanto na finalização quanto na reabertura da conferência do recebimento, já que são processos correlacionados:
Localizado nos processos na finalização e na reabertura da conferência de recebimento.
Nome | Tipo | Descrição |
---|---|---|
cEmbarque | Caractere | Código do embarque |
cTipoMov | Caractere | Tipo do movimento:
|
cTpConf | Caractere | Tipo de documento que será conferido:
|
Retorno lógico.
Protheus 12.1.23 ou superiores.
Não se aplica.
------
#INCLUDE 'TOTVS.CH'
/*/{Protheus.doc} W320DMOV
/*/
User Function W320DMOV() //{cEmbarque,cTipoMov} cTipoMov -> F=Falta, E=Excesso, cTpConf (1=Pré-Nota, 2=Nota já classificada)
Local aArea := { GetArea(), DCW->(GetArea()) }
Local cEmbarque := PARAMIXB[1]
Local cTipoMov := PARAMIXB[2]
Local lRet := Nil
If cTipoMov $ "E|F"
DCW->(DBSetOrder(1))//DCW_FILIAL+DCW_EMBARQ
DCW->(DBSeek(xFilial("DCW")+cEmbarque))
cTpConf := DCW->DCW_TPCONF
Else
cTpConf := cTipoMov
Endif
//Conferência gerada com base no documento de entrada já classificado.
If cTpConf == "2"
lRet := .F. //Retorna falto para não gerar as movimentações de ajustes das divergências.
Endif
AEval(aArea, {|area| RestArea(area)})
Return(lRet)
------
<style> div.theme-default .ia-splitter #main { margin-left: 0px; } .ia-fixed-sidebar, .ia-splitter-left { display: none; } #main { padding-left: 10px; padding-right: 10px; overflow-x: hidden; } .aui-header-primary .aui-nav, .aui-page-panel { margin-left: 0px !important; } .aui-header-primary .aui-nav { margin-left: 0px !important; } .aui-tabs.horizontal-tabs>.tabs-menu>.menu-item.active-tab a::after { background: #FF9900; !important } .menu-item.active-tab { border-bottom: none !important; } </style> |