Descrição | Ponto de entrada para customizações de gravação específica, o ponto de entrada vai ser chamado quando for confirmada uma gravação no registro. |
|---|---|
Observações | |
Exemplos | User Function MNTA5451() |
Local cAlias := PARAMIBX1
Local nRecno := PARAMIBX2
Local nOpcx := PARAMIBX3
If nOpcx == 3
dbSelectArea("ZZ1")
dbSetOrder(1)
If dbSeek(xFilial("ZZ1")+TRH->TRH_NUMSIN)
RecLock("ZZ1",.F.)
Else
RecLock("ZZ1",.T.)
ZZ1->ZZ1_FILIAL := xFilial("ZZ1")
ZZ1->ZZ1_SINIST := TRH_NUMSIN
Endif
ZZ1->ZZ1_DTEVEN := dDataBase
ZZ1->ZZ1_HREVEN := Time()
ZZ1->(MsUnLock())
EndIf
Return
Preview | |
|---|---|
Veja também | |
Idioma | Português(Brasil) |
Versões | Versões_Anteriores |
Sistemas Operacionais Suportados | Todos |
Compatível com as Bases de Dados | Todas |
Updates | |
Parâmetros | |
Retorno | MNTA5451 -> .T. |
Eventos de chamada do Ponto de Entrada | |
Variáveis | |
Programa Fonte | MNTA545.prx |