Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.


01. DADOS GERAIS

Produto:

Solucoes_totvs
SolucaoTOTVS Logística WMS

Solucoes_totvs_cross
SolucaoCross

Solucoes_totvs_parceiros
SolucaoParceiros

Solucoes_totvs_parceirosexptotvs
SolucaoParcsExpsTOTVS

Linha de Produto:

Linhas_totvs
LinhaLinha Protheus

Segmento:

Segmentos_totvs
SegmentoLogística

Módulo:SIGAWMS - Gestão de Armazenagem
Função:WMSV001 - Identifica as Funções do Operador Logado
País:Todos Países
Ticket:-
Requisito/Story/Issue (informe o requisito relacionado) :-


02. DESCRIÇÃO

Este Ponto de Entrada permite que sejam realizadas alterações na tabela D12, como o recurso humano a ser utilizado.

03. LOCALIZAÇÃO

Localizado após a busca de atividades para convocações.

04. PARÂMETROS

NomeTipoDescrição
D12->(Recno())NuméricoNúmero do registro na tabela D12

05. RETORNO

NomeTipoDescriçãoOpcional
lRetPELógicoIndicação se a alteração do recurso humano foi bem sucedida ou não.Não

06. VERSÕES

12.1.17 e superiores.

07. OBSERVAÇÃO

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

08. EXEMPLO

Bloco de código
#INCLUDE "PROTHEUS.CH"

User Function WMS001C()
	Local nRecnoD12 	:= PARAMIXB[1]

	D12->(dbGoTo(nRecnoD12))
	//Exemplo de regra
	//D12_STATUS 0=Estornada;1=Executada;2=Interrompida;3=Em Execução;4=A Executar
	If (D12->D12_RECHUM != __cUserID) .And. (D12->D12_STATUS = '2' .Or. D12->D12_STATUS = '4')
		RecLock("D12",.F.)
			D12->D12_RECHUM := __cUserID
		D12->(MsUnlock())
	EndIf
Return .T.

...