VM040TOK - Executado no OK da janela da rotina Despesas/Receitas (VEIVM040).

Descrição

Este Ponto de Entrada está localizado na rotina Despesas/Receitas (VEIVM040), executado no OK da janela.

Observações

Exemplos

User Function VM040TOK()
Local lRet := .t.
Local aColsAux := ParamIxb01 // Parametro 1 - aCols da Rotina
MsgInfo("Ponto de Entrada VM040TOK executado com sucesso!","Atenção")
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

aCols - Matriz - aCols da Rotina

Retorno

lRet - Lógico - .t. para continuar o processo de gravacao / .f. para abortar a gravacao

Eventos de chamada do Ponto de Entrada

//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
//³ PE Tudo Ok ( validacao no Tudo OK da janela ) ³
//³ .T. - continua gravacao das despesas/receitas ³
//³ .F. - cancela gravacao das despesas/receitas ³
//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
If ExistBlock("VM040TOK")
Return ( ExecBlock("VM040TOK",.f.,.f., { aClone(aCols) } ) )
EndIf
//

User Function VM040TOK()

Local lRet := .t.

Local aColsAux := ParamIxb[01] // Parametro 1 - aCols da Rotina

MsgInfo("Ponto de Entrada VM040TOK executado com sucesso!","Atenção")

Return(lRet)

Variáveis

Programa Fonte

VEIVM040