Descrição

Este Ponto de Entrada será executado na rotina "Conferência de Orçamento (OFIXA013)" depois da gravação da transferência.

Observações

Exemplos

User Function OXX002DTR()     

MsgInfo("Ponto de entrada OXX002DTR executado com sucesso!")

lRetorno := .t.

Return lRetorno

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

Retorno

Retorno lRetorno variavel logica (.T. ou .f.)

Eventos de chamada do Ponto de Entrada

if lIntegra261  

lMSErroAuto := .f.  

MSExecAuto(\{|x, y| MATA261(x,y)\},aItensNew,3)  

If lMsErroAuto   

MostraErro()   

DisarmTransaction()   

MsgInfo(STR0013,STR0005)   

return .f.  

EndIf

endif

//

//

if !FM_PILHA("OFIOM430")  

OFIXI001(VS1->VS1_NUMORC,.t.)

Endif

// Ponto de entrada depois da gravação da transferencia.

if ExistBlock("OXX002DTR")   

lRetorn := ExecBlock("OXX002DTR",.f.,.f.)   

if !lRetorn   DisarmTransaction()   

return .f.   

Endif

Endif

END TRANSACTION

Variáveis

Programa Fonte

OFIXX002