Páginas filhas
  • LOG_db_column_get_type

Versões comparadas

Chave

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

Retorna o tipo da coluna numa tabela DO a definição do tipo de uma coluna de tabela no banco de dados , cfme o banco de dados conectado, respeitando também o tamanho e escala em caso de coluna tipo CHAR, DATETIME, DECIMAL, etc.

Sintaxe

Bloco de código
LOG_db_column_get_type( < l_tableName >, < l_columnName > ) => SMALLINTCHAR

Parâmetros

Nome

Tipo

Obrigatório?

Descrição

l_tableName

CHAR

Sim

Nome da tabela no Banco de Dados.

l_columnName

CHAR

Sim

Nome da coluna de tabela no Banco de Dados.

Retorno

Tipo

Descrição

CHAR

Retorna o texto contendo a definição do tipo de dado da tabela e coluna indicados.

Exemplos:

   CHAR(15) 
DATETIME YEAR TO SECOND  → Banco Informix
DECIMAL(17,2)

Banco Informix

NUMBER(10)Banco OracleCHAR(30)SqlServer
            → Banco Informix
NUMBER(14,3)    → Banco Oracle

Exemplo

Bloco de código
languageruby
themeConfluence
linenumberstrue
#---------------------------------------#
 FUNCTION LOG_db_column_get_type_test()
#---------------------------------------#
   DEFINE l_tableNametype      CHAR(30)
   DEFINE l_columnNameDBtype    CHAR(503)

  
   #Pesquisa de uma tabela usando como parâmetro uma variável.
   IF LOG_db_column_get_type(l_tableName,l_columnName) THENCALL LOG_connectDatabase("DEFAULT")

   LET l_DBtype = LOG_getCurrentDBType()
 
   IF  l_DBtype CALL conout("Coluna encontrada no banco de dados.")
   ELSEIS NULL THEN
      CALL conout("Coluna não encontrada no Nenhum banco de dados conectado.")
   ENDELSE  IF

  	 #Pesquisa de uma tabela usando valor fixo.
   IF	LET l_type = LOG_db_column_get_type("itemestoque_trans","colunanum_nao_existenteseq") THEN
      		CALL conout("Coluna encontrada no bancoO tipo de dados.")
dado da  ELSE
      CALL conout("Coluna não encontrada no banco de dados.")coluna ESTOQUE_TRANS.NUM_SEQ é: " || l_type)  		
   END IF
 END FUNCTION

Informações

Fontes: dbinfo.4gl, dbinfo.prw

Veja também

LOG_db_table_exists

LOG_db_column_isSerial