DT PE DV070SCR - Tela solicitação de produto conferência

01. DADOS GERAIS

02. DESCRIÇÃO

Este Ponto de Entrada permite alterar a tela de solicitação do produto, na rotina de Conferência, por meio do coletor de radiofrequência.

Exemplo
Apresentar a descrição do produto específica do usuário.

Sintaxe
DV070SCR → Tela solicitação de produto conferência ( )

03. LOCALIZAÇÃO

Localizado na rotina WMSV070.

04. PARÂMETROS

Não se aplica.

05. RETORNO

Não se aplica.

06. VERSÕES

Protheus 8.11 e Protheus 10.

07. OBSERVAÇÃO

Não se aplica.

08. EXEMPLO

------

User Function DV070SCR()

Local aArea := GetArea()
Local aAreaSB1 := SB1→ (GetArea())
Local lWmsLote := SuperGetMv('MV_WMSLOTE',.F.,.F.) DBSelectArea("SB1")DBSetorder(1)

IF DBSeek(xFilial("SB1")+SDB→ DB_PRODUTO) @ 01,00 VTSay PadR("Pegue o Produto", VTMaxCol()) @ 02,00 VTSay SDB→ DB_PRODUTO @ 03,00 VTSay SubStr(SB1->B1_DESC,01,20) @ 04,00 VTSay SubStr(SB1->B1_DESC,21,20) @ 05,00 VTSay SubStr(SB1→B1_DESC,41,20)

If lWmsLote .And. Rastro(SDB→ DB_PRODUTO) @ 06,00 VTSay PadR("Lote",VTMaxCol()) @ 07,00 VTSay SDB→ DB_LOTECTL
EndIf

Endif

RestArea(aAreaSB1)
RestArea(aArea)

Return Nil

------