VXX01FOK - Validações nos campos das rotinas de movimentação.

Através deste ponto de entrada será permitido que o usuário realize validações nos campos das rotinas de movimentação de Saída de Veículos.

User Function VXX01FOK()

MsgInfo("Ponto de Entrada VXX01FOK executado com sucesso!")

Return(.t.)

Português(Brasil)

Todas

Todos

Todas

N/A

Lógico - (True ou False)

Function VX001FIELDOK()
Local nCntFor
Local ni := 0
Local aUltMov := \{\}

// Validação dos campos por parte do usuario.
if ExistBlock("VXX01FOK")
if !ExecBlock("VXX01FOK",.f.,.f.)
Return .f.
Endif
Endif

// A ROTINA ATUALIZA OS CAMPOS DA INTEGRACAO FISCAL
If MaFisFound("IT",n)
if ReadVar() == "M->VVA_CODTES"
if !MaAvalTes("S",M->VVA_CODTES)
return .f.
endif
endif

VEIXX001