DT PE OM200FIM - Final do carregamento

01. DADOS GERAIS

Produto:	TOTVS OMS
Linha de Produto:	Linha Protheus
Segmento:	Logística
Módulo:	SIGAOMS - Gestão de Distribuição
Função:	OMSA200 - Montagem de Carga
País:	Todos Países
Ticket:	11516954
Requisito/Story/Issue (informe o requisito relacionado) :	DLOGWMSMSP-12215

02. DESCRIÇÃO

Este Ponto de Entrada é executado após a geração da carga e antes da atualização da tela na rotina OMSA200 (Montagem de Carga).

Sintaxe
OM200FIM ( ) → Nil

03. LOCALIZAÇÃO

Executado após a confirmação da carga na rotina OMSA200 (Montagem da Carga).

04. PARÂMETROS

Não se aplica.

05. RETORNO

Nome	Tipo	Descrição
Nil	Nulo	Nil

06. VERSÕES

Protheus 12.

07. OBSERVAÇÃO

Não se aplica.

08. EXEMPLO

------

#include 'protheus.ch'
#include 'parmtype.ch'

User Function OM200FIM()

local aArea := GetArea()
Local cCarga := DAK→DAK_COD
If DAI→(DbSeek(xFilial('DAI')+cCarga))
//Fazer algo aqui
Endif
If RecLock('DAK',.F.)
//Alterar algo aqui
DAK→(MsUnlock())
Endif
RestArea(aArea)
Return .T.