Skip to content

Esse tutorial ensina como incluir interface para uma nova tabela de domínio [TD] no Config.

Tutorial ​

1. Criar uma nova página no componente "Notebook".
Config-Nova-Tela-1.jpg

2. Incluir novo nó no componente treeview.

No componente treeview, abrir a propriedade ListNodes e inserir nova linha com os dados necessários.
Este nó deve estar no posição certa que aparecerá no treeview na situação de todo expandido.

Dica: pode-se fazer essas modificaçãos no dfm

Nív: nível em que esta o nó.
Título: o que aparece no treeview.
Pag: número da página no notebook (PageIndex).
CpoIndice: campo descritivo da tabela [DES???].
Título da Pag: descrição que aparece no topo da tela.
CpoAtivação: campo que define se registro está ativo [???ATI].
Tabela: nome da tabela.
Mensagem1: ajuda na localização exata no treeview. Manter a numeração sequencial iniciando em zero.
SelectedIndex: serve para implementações em nós específicos e localização no select de inconsistências. Manter a numeração sequencial a partir do maior. Para definí-lo fazer uma busca no ListNodes para procurar qual foi o último utilizado.

  • Tratar procedure "ConfiguraTreeview" se for necessário modificar dinamicamente alguma propriedade do treeview.
  • Tratar function "Pagina" e procedure "NovoVoltaEdicao" para definir tratamentos ao abrir a página pelo treeview, pelo combo de busca, por alguma inconsistência ao gravar ou pelo duplo clique no grid de inconsistências.

3. Na function "TransfereDados", incluir nova tabela no tratamento de "TransfereDadosAux".

4. Colocar no combo de Busca da treeview a nova tabela criada.

5. Incluir interface para as colunas.
Para mais detalhes verificar Como criar interface para nova coluna de domínio no Config.

6. Tratar inconsistências.
Para todos os casos, se o campo tiver algum tipo de inconsistência que possa ser tratada, como "NOT NULL" ou "dados repetidos":

  • Versão inferior à 5.2M: no DataModule, procurar o componente "qrInconsistencias" e incluir o select adequado que mostre a inconsistência ocorrida, baseando-se nos dados da TW_TAB que ainda não estão gravados.
  • Versão 5.2M e posteriores: na view TV_CONFIG_INCONSISTENCIAS, incluir o select adequado que mostre a inconsistência ocorrida, baseando-se nos dados da TW_TAB, que ainda não estão gravados.

Obs: Não devem haver linhas em branco na view, pois o Oracle considera como finalização de comando, e o restante do script é ignorado. Sempre aplicar a view em alguma base Oracle e PostgreSQL para garantir que é criada sem erros.

  • Se a função "CargaConfig" não estiver aplicada na base, vai gravar os dados, mas não irá buscar os dados e mostrar na TD. Isso acontece quando fazemos a tarefa de banco e já fazemos a tarefa de interface.

Nota: Verificar a descrição completa do processo de interface no cabeçalho do arquivo TTFO.pas.

Categorias ​