Histórico da Página
01. DADOS GERAIS
| Produto: |
| ||||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| Linha de Produto: |
| ||||||||||||||||
| Segmento: |
| ||||||||||||||||
| Módulo: |
| TOTVS WMS - Linha Protheus - WMS Protheus (SIGAWMS) | |
| Função: | WMSV085 |
|---|
| .PRW | |
| País: | Todos Países |
|---|---|
| Ticket: |
| 13559106 | |
| Requisito/Story/Issue (informe o requisito relacionado) : | DLOGWMSMSP-13564 |
|---|
02. DESCRIÇÃO
Este Ponto de Entrada permite complementar a tela que solicita a coleta de produtos no Recebimento ou na Transferência via Coletor RF, sendo executado após exibir o código do produto e antes da linha que solicita que o usuário confirme o código do produto.
...
- É possível exibir uma ou mais informações logo após o código do produto (dependendo da quantidade de linhas disponíveis na tela do coletor). Estas informações serão exibidas na tela enquanto for informado o produto, o lote e a quantidade.
- Outra opção é criar uma tela auxiliar que permite o uso de toda a tela do coletor. Entretanto, para esta opção será necessário pressionar a tecla Enter, para que a mesma seja fechada e, então, retorne à tela que efetua a confirmação do produto. Além disso, as informações não estarão mais disponíveis em tela quando for informado o produto, o lote e a quantidade.
03. LOCALIZAÇÃO
Localizado na função que solicita a confirmação do produto, após apresentar o código do produto e antes de solicitar a confirmação do código no processo de recebimento/transferência (WMSV085).
04. PARÂMETROS
| Nome | Tipo | Descrição |
|---|---|---|
nLinha | Numérico | Próxima linha disponível no coletor para o Ponto de Entrada exibir as informações. |
| lTemLote | Lógico | Indica que no produto padrão será exibido o lote, o que reduz em 1 a quantidade de linhas disponíveis para o Ponto de Entrada. |
| nTemSubLot | Lógico | Indica que no produto padrão será exibido o sublote, o que reduz em 1 a quantidade de linhas disponíveis para o Ponto de Entrada. |
nQtdTot | Numérico | Quantidade do movimento conferido. |
| nQtde | Numérico | Quantidade do produto, caso seja informado o Código de Barra do produto. |
05. RETORNO
Deve ser retornado o conteúdo de nLinha.
...
Se for criada uma nova tela é necessário retornar nLinha com o mesmo valor enviado para o Ponto de Entrada.
06. VERSÕES
Protheus 12.1.27 ou superiores.
07. OBSERVAÇÃO
Se não houver um controle exato da quantidade de linhas utilizadas pelo Ponto de Entrada na forma 1, poderá ocorrer exceção dentro da rotina padrão.
Utilize o exemplo para apoio neste controle.
08. EXEMPLO
...
| language | cpp |
|---|---|
| title | Exemplo |
| linenumbers | true |
| collapse | true |
...
------
#INCLUDE 'PROTHEUS.CH'
#INCLUDE 'APVT100.CH'
User Function WMSV085PPR()
Local nLinha := ParamIxb[1] //Última linha usada pelo produto padrão
Local lTemLote := ParamIxb[2] //Indica se será exibido o lote no produto padrão
Local lTemSubLot := ParamIxb[3] //Indica se será exibido o sublote no produto padrão
Local nQtdTot := ParamIxb[4] //Indica a quantidade do documento conferido
Local nQtde := ParamIxb[5] //Quantidade do produto caso seja usado Codigo de Barra
Local nQtMaxRow := VTMaxRow() + 1 //Qtde máxima de linhas do coletor
Local nLinPE := 0 //Qtde de linhas que o PE pode usar
Local aTelaAnt := {}
//até 8 linhas são usadas pelo programa padrão, caso haja lote e sublote.
nLinPE := nQtMaxRow - 8
//Se não houver lote, pode ser adicionada uma linha
If !lTemLote
nLinPE++
EndIf
//Se não houver sublote, pode ser adiciona uma linha
If !lTemSubLot
nLinPE++
EndIf
If nLinPE > 0
//Complementa a tela padrão com documento se houver ao menos 1 linha disponível
@ nLinha++,00 VTSay PadR('Documento: ' + D12->D12_DOC, VTMaxCol())
If nLinPE > 1
//Complementa a tela padrão com quantidade se houver ao menos 2 linhas disponíveis
@ nLinha++,00 VTSay PadR('Qtde: ' + AllTrim(Str(D12->D12_QTDORI)),
...
VTMaxCol())
...
EndIf
Else
//Se
...
não
...
houver
...
linhas
...
suficientes
...
há
...
a
...
possibilidade
...
de
...
criar
...
uma
...
nova
...
tela
...
para
...
exibir
//todas
...
as
...
informações
...
e
...
fechál-la
...
com
...
um
...
<Enter>
aTelaAnt := VTSave(00,
...
00,
...
VTMaxRow(),
...
VTMaxCol())
...
For nLinPE := 0 to VTMaxRow()
VTSay(nLinPE,0,Space(VtMaxCol()+1))
...
Next
WMSVTCabec('Dados
...
do
...
Produto',.F.,.F.,.T.)
...
@ 01,00
...
VTSay
...
PadR('Produto:
...
'
...
+
...
D12->D12_PRODUT,
...
VTMaxCol())
...
@ 02,00
...
VTSay
...
PadR('Docto:
...
'
...
+
...
D12->D12_DOC,
...
VTMaxCol())
...
@ 03,00
...
VTSay
...
PadR('Qtde:
...
'
...
+
...
AllTrim(Str(D12->D12_QTDORI)),
...
VTMaxCol())
...
WMSVTRodPe()
VTRestore(00,
...
00,
...
VTMaxRow(),
...
VTMaxCol(),
...
aTelaAnt)
...
EndIf
Return nLinha
------
| Templatedocumentos |
|---|
| HTML |
|---|
<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>
|
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas