Páginas filhas
  • LOG_db_column_get_type

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Bloco de código
languageruby
themeConfluence
linenumberstrue
#------------------------------------#
 FUNCTION LOG_db_column_get_type_test()
#------------------------------------#
   DEFINE l_tableNametable, l_column  CHAR(3050)  
   DEFINE l_columnName db CHAR(503)

  
   #Pesquisa de uma tabela usando como parâmetro uma variável.
   IF LOG_db_column_get_type(l"estoque_tableNametrans",l_columnName) THEN
      CALL conout("Coluna encontrada no banco de dados.")
   ELSE"num_seq") IS NULL THEN
      CALL conout("Coluna não encontrada no Nenhum banco de dados conectado.")
   END IF

   #Pesquisa
 de uma tabelaLET usando valor fixo.
   IFl_db = LOG_db_column_get_type("itemestoque_trans","colunanum_nao_existenteseq") THEN
   CASE l_db
   WHEN  "IFX" CALL conout("ColunaConexão encontradacom no banco de dadosInformix.")
   WHEN "ORA" CALL conout("Conexão com banco ELSEOracle.")
   WHEN "MSV"  CALL conout("ColunaConexão nãocom encontrada no banco de dadosSQLServer.")
   END IFCASE

 END FUNCTION

Informações

Fontes: dbinfo.4gl, dbinfo.prw

...