Histórico da Página
...
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
#------------------------------------# 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
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas