Pesquisas e classificações

4D v16

Video script

Nos primeiros vídeo, usamos editores padrão para realizar pesquisas e classificação. Neste vídeo, vamos aprender a programar a exibição destes editores padrão.

Na parte superior do formulário, temos uma série de botões que foram integrados. No capítulo anterior, podemos começar a programar o botão "All" para a tabela de Technicians.

Agora vamos agendar para levar em conta a lista exibida na tela quando você clica na página atual.

Vamos começar com o botão "All":

É mostrado o formulário Navigator.
Selecionamos o botão "All" (na página 0).
Mostramos o método objeto associado (Clique direito -> Método objeto) ou ALT + Clique para abrir o método.

Temos que usar o comando ALL RECORDS que toma o nome da tabela correspondente como parâmetro.

Mas como podemos saber que tabela é mostrada quando se produz o clique?

Sabemos que colocamos a lista de intervenções na página 1 do formulário, a lista de técnicos na página 2, etc.

Só necessitamos que 4D indique a página que é mostrada e em seguida realiza a pesquisa nesta página.
Em primeiro lugar, temos que escrever o seguinte:

 Case of

    :(FORM Get current page=1)

       ALL RECORDS([INTERVENTIONS])

    :(FORM Get current page=2)

       ALL RECORDS([TECHNICIANS])

 End case

Desta maneira 4D nos indica que se a página atual é a página 1, deve selecionar a lista das intervenções e se é a página 2, deve selecionar a lista dos técnicos.

Quando estamos na página das intervenções, recebemos todas as intervenções e na página técnicos, obtemos todos os técnicos.

Agora vamos a fazer o mesmo com o botão "Query".

Mostro a página 0 do formulário de navegação
ALT+clique no botão "All" para Copiar o método logo a fecho
ALT+clique no botão "Query" para criar seu método
Colar
e vamos a substituir ALL RECORDS com QUERY

Em seguida fechamos o método.

Voltamos a executar o formulário "Executar" => Método "Navigator"
e agora quando estamos em "Interventions":

Se fazemos clique em Query, agora temos os campos da tabela Interventions
Se estamos em Technicians, Query nos dá os campos da tabela Technicians

Consulte os vídeos anteriores e a documentação para obter mais informação sobre como funciona este editor.

Pelo momento, não vamos a programar os outros botões da planilha que utilizamos porque depois vamos tornar esta programação genérica.