OX001SRL Ponto de Entrada localizado na rotina Orçamento de Peças e Serviços (OFIXX001) e tem como finalidade a gravação de log

Descrição:

Este Ponto de Entrada está localizado na rotina Orçamento de Peças e Serviços (OFIXX001), tem como finalidade a gravação de log.

Eventos:

lRetorna := .t.

if OX001FPOK()

oGetPecas:aCols[oGetPecas:nAt,FG_POSVAR("VS3_CODITE","aHeaderP")] := cCodIteVal

M->VS3_CODITE := cCodIteVal

// Quando trocar o item deve deixar a TES em branco para recarregar com a TES do item relacionado

oGetPecas:aCols[oGetPecas:nAt,FG_POSVAR("VS3_CODTES","aHeaderP")] := Space(TAMSX3("VS3_CODTES")[1])

M->VS3_CODTES := Space(TAMSX3("VS3_CODTES")[1])

__ReadVar := 'M->VS3_CODITE'

//

if OX001FPOK()

If ExistBlock("OX001SRL")

aRetPESRL := ExecBlock("OX001SRL",.f.,.f., {{cCodSalva, cGruSalva, cDesSalva, cTesSalva}})

EndIf

else

lRetorna := .f.

endif

//

else

lRetorna := .f.

endif

Função:

OX001SOBEREL()