Ponto de Entrada

Descrição:

Ponto de entrada chamado antes da geração do titulo no financeiro, para que seja possível manipular as informações antes de salvar.

Localização:

Atualização / Mov Oficina / Orc Por Fases

Eventos:

//PE para permitir a manipulação do vetor aTitulo

If ExistBlock("OX004TIT")

aTitulo := ExecBlock("OX004TIT",.f.,.f.,{aTitulo})

EndIf


lMsErroAuto := .f.

MSExecAuto({|x| FINA040(x)},aTitulo)

Programa Fonte:

OFIXX004.PRW

Função:

OX004GERFIN()

Parâmetros:
NomeTipoDescrição
PARAMIXB[1]MatrizArray com os dados do título
Retorno:
NomeTipoDescrição

aTitulos

Matriz

retorna o array modificado, que será utilizado na chamada do execAuto

Exemplo:

Include totvs.ch

#include "protheus.ch"


User Function OX004TIT()


Local aTitulos := PARAMIXB[1]


MsgInfo("Passou pelo ponto de entrada","PE OX004TIT")


Return aTitulos