Histórico da Página
Ponto de Entrada
Descrição: | Este Ponto de Entrada está localizado na rotina Bloq/desbloq Veic (VEIVM060), executado após gravação do Bloqueio/Desbloqueio de um Veículo, tem como finalidade possibilitar customizações após gravação. | |||||||||
Localização: | Atualizações \ Mov Gerencial \ Bloq/desbloq Veic (VEIVM060) | |||||||||
Eventos: | If lRet // Ponto de Entrada para verificações customizadas após Bloqueio/Desbloqueio realizado com sucesso If ExistBlock("VM060DPGR") ExecBlock("VM060DPGR", .f., .f., {cTipo, nRecNoVB0}) EndIf FS_VERCHASSI(1) cChaInt := space(tamsx3("VV1_CHAINT")[1]) cChassi := space(25) cDesVei1 := cDesVei2 := cDesVei3 := space(200) cMotivo := space(100) dDatVal := ctod("") EndIf Return | |||||||||
Programa Fonte: | VEIVM060.PRW | |||||||||
Função: | FS_BLOCHASSI() | |||||||||
Parâmetros: |
| |||||||||
Retorno: | N/A |
Exemplo:
Include totvs.ch
/*
ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ
±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
±±ÉÍÍÍÍÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍËÍÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍËÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍÍÍ»±±
±±ºPrograma ³ VM060DPGR º Autor ³ MIL º Data ³ 12/06/2020 º±±
±±ÌÍÍÍÍÍÍÍÍÍÍØÍÍÍÍÍÍÍÍÍÍÊÍÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÊÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍ͹±±
±±ºDescricao ³ PE executado na rotina Bloq/desbloq Veic (VEIVM060) para º±±
±±º ³ verificações customizadas após Bloqueio/Desbloqueio do º±±
±±º ³ Veículo realizado com sucesso º±±
±±ÈÍÍÍÍÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ±±
±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß
*/
User Function VM060DPGR()
Local cTipo := ParamIXB[01] // Tipo de Operação: 0 - Desbloqueio / 1 - Bloqueio
Local nRecNoVB0 := ParamIXB[02] // RecNo da tabela VBO - Veiculos Bloqueio Desbloqueio
MsgAlert("Ponto de Entrada VM060DPGR executado com sucesso!", "Atenção")
Return .t.