OX001OK - Ao confirmar um orçamento permite realizar validações pré-definidas.

Descrição

Ponto de Entrada na rotina Orçamento Por Fases (OFIXX001), executado ao clicar na opção OK permitindo validações pré-definidas.

Observações

Exemplos

User Function OX001OK
Local lRet := .t.

MsgInfo("Ponto de entrada 'OX001OK' executado com sucesso!")

Return lret

Preview

Veja também

Idioma

Português(Brasil)

Versões

Todas

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Updates

Parâmetros

lRet - retorno Booleano - .t. ou .f.

Retorno

Eventos de chamada do Ponto de Entrada

// ############################################################
// # Verifica se trata-se de VISUALIZACAO DE ORCAMENTO #
// ############################################################
if !lOX001Auto
if VISUALIZA
oDlgXX001:end()
return .t.
endif
// ############################################################
// # Pergunta se deseja faturar realmente #
// ############################################################
if M->VS1_TIPORC == "1"
if !MsgYesNo(STR0067,STR0025)
return .f.
endif
endif
endif
If ExistBlock("OX001OK")
If !ExecBlock("OX001OK",.f.,.f.)
return .f.
Endif
EndIf

Variáveis

Programa Fonte

OFIXX001.PRW