|
Inicio → WINDEV 25 → Wx - Voltar ao registro no Browser List apos incluir ou alterar um registro por um Form Update ao usar Querys e nao tables. |
Wx - Voltar ao registro no Browser List apos incluir ou alterar um registro por um Form Update ao usar Querys e nao tables. |
Iniciado por adrianoboller, mar., 08 2016 11:09 PM - 1 resposta |
| |
| | | |
|
| |
Membro registado 3.659 mensagems Popularité : +175 (223 votes) |
|
Publicado em março, 08 2016 - 11:09 PM |
Prezados,
Segue aqui um passo a passo de como voltar o ponteiro, FOCO, ou melhor, ao registro atual selecionado no BrowserList (Looper, Table) após incluir ou alterar um registro por um FormUpdate ao usar Querys e não tables, focando exatamente no registro em questão.
Esse passo a passo foi feito pelo Empresario e Desenvolvedor Jacques Bicas que cedeu para colocar no fórum a informação e assim contribuir com a comunidade.
Vamos lá ao passo a passo:
Isto vale para quando a table é populada manualmente ou não está linkada a database TABLE, quando o Browserlist foi feito via query, view, etc.
1) Criei uma variável global (do tipo VARIANT) e ao fechar o o FORM posiciona o ID da tabela que foi alterada (cliente, fornecedor, produto, etc)
gvNovoRegistro = CADTRANSPORTADORAS.TRANSPORTADORA
2) No botão incluir ou alterar uso o código abaixo:
gvNovoRegistro = CADTRANSPORTADORAS.TRANSPORTADORA
sRetorno is string = Open(Win_cadastro_CNPJCPF, "T")
IF sRetorno > "" THEN
IF Open(gsNomeForm,1,sRetorno) THEN
TableSelectPlus(Table_Cadastro, TableSeek(Table_Cadastro.Col_Codigo, gvNovoRegistro, True))
END
END
COMPLEMENTO DESSE POST:
http://forum.pcsoft.fr/fr-FR/pcsoft.br.windev/931-capturar-click-browse-list/read.awp…
SE GOSTOU DA UM LIKE
Forte abraço a todos e muito obrigado Jacques por compartilhar seu conhecimento.
Sucesso a todos
-- Adriano José Boller ______________________________________________ Consultor e Representante Oficial da PcSoft no Brasil +55 (41) 9949 1800 adrianoboller@gmail.com skype: adrianoboller http://wxinformatica.blogspot.com.br/ |
| |
| |
| | | |
|
| | |
| |
Membro registado 3.659 mensagems Popularité : +175 (223 votes) |
|
Publicado em junho, 29 2016 - 11:11 PM |
Procedure Refresh LooperDisplay(WIN_OS_03Roteiro.LOOP_QRY_T022Roteiro,taReExecuteQuery) LooperDisplay(WIN_OS_03Roteiro.LOOP_QRY_T022Roteiro,taInit)
Procedure Refresh TableDisplay(WIN_OS_03Roteiro.TABLE_QRY_T022Roteiro,taReExecuteQuery) TableDisplay(WIN_OS_03Roteiro.TABLE_QRY_T022Roteiro,taInit)
-- Adriano José Boller ______________________________________________ Consultor e Representante Oficial da PcSoft no Brasil +55 (41) 9949 1800 adrianoboller@gmail.com skype: adrianoboller http://wxinformatica.com.br/Mensagem modificada, junho, 29 2016 - 11:13 PM |
| |
| |
| | | |
|
| | | | |
| | |
|