MNT41508 - Validação de sobreposição de insumo no banco de dados

Descrição

Ponto de entrada para validação de sobreposição de insumos considerando as informações já cadastradas no banco de dados.

Observações

Deverá ser utilizada a função padrão NGVDTINS para consistir as validações do SIGAMNT

Exemplos

#INCLUDE "PROTHEUS.CH"

User Function MNT41508()
Local lOk
Local nLinha := PARAMIXB[1] //Parâmetro indicando a linha do aCols que será consistido

Local nCODIGO := GdFieldPos("TL_CODIGO")
Local nDATAIN := GdFieldPos("TL_DTINICI")
Local nHORAIN := GdFieldPos("TL_HOINICI")
Local nDATAFI := GdFieldPos("TL_DTFIM")
Local nHORAFI := GdFieldPos("TL_HOFIM")
Local nTIPORE := GdFieldPos("TL_TIPOREG")

lOk := NGVDTINS(aCols[nLinha][nCODIGO],aCols[nLinha][nDATAIN],aCols[nLinha][nHORAIN],aCols[nLinha][nDATAFI],aCols[nLinha][nHORAFI],aCols[nLinha][nTIPORE])

If lOk
//Consistencia específica
lOk := ValidEspecifico()
EndIf

Return lOk

Preview

Idioma

Português(Brasil)

Versões

Microsiga_Protheus11

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Updates

Parâmetros

nLinha - Linha onde será validado

Retorno

lOk - Indica se a linha está ok

Eventos de chamada do Ponto de Entrada

Variáveis

Programa Fonte

MNTA415.PRW