Skip to content

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

Tutorial ​

1. Verificar se ela existe na função "CARGACONFIG()" e na TV_TAB_??? e TW_TAB.

2. Procurar no componente "Notebook" a página no qual a tabela está localizada.

Dica: procurar por outro campo da mesma tabela.

Para criar nova coluna na TD_COB, procure pelo componente DBDESCOB.

Isso porque existe uma coluna chamada DESCOB na TD_COB.

  • Utilizar um label que identifique a coluna de acordo com o documentado no metadados.
  • Deve-se escolher o componente de acordo com o tipo de coluna do banco e dados.

Para mais informações visite Padrões para uso de componentes em Delphi.

  • Definir como nome "DB + nome do campo na tabela".

3. Ligar o DataSource do componente criado em "dmConfig.SrcTabTemp".

4. No DataModule procurar o componente "TAB" e incluir a coluna nas instrução de "SELECT".
Essa query está sem BDE, se for o caso de ter que colocar uma expressão nela, utilizar CAST e o demais cuidados necessários para se utilizar componentes sem BDE.

5. No DataModule procurar o componente "UpdateSQLTab" e incluir a coluna nas instruções de "INSERT" E "MODIFY".

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": 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.

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

Categorias ​