Retornar se uma coluna de tabela é serial no banco Logix.

Sintaxe

LOG_db_column_isSerial( < l_tableName >, < l_columnName > ) => SMALLINT

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

SMALLINT

TRUE - Coluna encontrada no banco de dados.

FALSE - Coluna não encontrada no banco de dados.

Exemplo

#------------------------------------#
 FUNCTION LOG_db_column_isSerial_test()
#------------------------------------#
  DEFINE l_table, l_column CHAR(50)    

    IF LOG_db_column_isSerial("estoque_trans","num_seq") THEN
       CALL conout("num_seq COLUNA EH SERIAL... ")
    ELSE
       CALL conout("num_seq COLUNA NAO EH SERIAL... ")
    END IF    

    IF LOG_db_column_isSerial("estoque_trans","num_transac") THEN
       CALL conout("num_transac COLUNA EH SERIAL... ")
    ELSE
       CALL conout("num_transac COLUNA NAO EH SERIAL... ")
    END IF    
    
    IF LOG_db_column_isSerial("item_barra","cod_item_barra_ser") THEN
       CALL conout("cod_item_barra_ser COLUNA EH SERIAL... ")
    ELSE
       CALL conout("cod_item_barra_ser COLUNA NAO EH SERIAL... ")
    END IF

 END FUNCTION

Informações

Fontes: dbinfo.4gl, dbinfo.prw

Veja também

LOG_db_table_exists