DT PE WV102VLD - Validação do produto/volume na conferência de expedição e estorno

01. DADOS GERAIS

02. DESCRIÇÃO

Este Ponto de Entrada permite a validação da conferência e o estorno do produto ou volume.

03. LOCALIZAÇÃO

Localizado na validação do produto ou volume na conferência de expedição.

04. PARÂMETROS

05. RETORNO

Lógico - .T. ou .F.

06. VERSÕES

Protheus 11.80.

07. OBSERVAÇÃO

Todos os parâmetros são recebidos na User Function via PARAMIXB conforme consta em Execblock / Customização.

08. EXEMPLO

------

#INCLUDE "PROTHEUS.CH" 

User Function WV102VLD()
Local lRet := .T. // Se .F., invalida o produto para conferir/estornar
Local nTipo := PARAMIXB[1] // Tipo de conferência (1=Carga;2=Pedido;3=Nota Fiscal)
Local lEstorno := PARAMIXB[2] // Indica se é um estorno (.T.=Sim;.F.=Não)
Local cCarga := PARAMIXB[3] // Carga informada na conferência
Local cPedido := PARAMIXB[4] // Pedido informado na conferência
Local cPrdOri := PARAMIXB[5] // Produto origem
Local cProduto := PARAMIXB[6] // Produto
Local nQtd := PARAMIXB[7] // Quantidade a conferir/estornar
Local cLoteCtl := PARAMIXB[8] // Lote do produto
Local cNumLote := PARAMIXB[9] // Sublote do produto
Local aVolume := PARAMIXB[10] // Volumes da conferência
Local cCodBar := PARAMIXB[11] // Código de barras do produto
Local cCodExp := PARAMIXB[12] // Código da conferência de expedição

If !lEstorno
         //-- Condições para validação da conferência
Else
        //-- Condições para validação do estorno
EndIf

Return lRet

------