Usando SQL para listar os campos das tabelas desejadas:
SELECT
TABELAS.NAME, COLUNAS.NAME AS COLUNA,
TIPOS.NAME AS TIPO,
COLUNAS.LENGTH AS TAMANHO,
COLUNAS.ISNULLABLE AS EH_NULO
FROM
sysobjects AS TABELAS,
syscolumns AS COLUNAS,
systypes AS TIPOS
WHERE
-- JOINS
TABELAS.ID = COLUNAS.ID
AND COLUNAS.USERTYPE = TIPOS.USERTYPE
AND TABELAS.NAME = 'SA1010'
• Veja também: Usando ADVPL com SQL
Este script é prático caso você tenha necessidade de listar campos (e outras propriedades) de uma ou mais tabelas do Protheus. Neste exemplo o script mostra os campos da SA1010:
SELECT
TABELAS.NAME, COLUNAS.NAME AS COLUNA,
TIPOS.NAME AS TIPO,
COLUNAS.LENGTH AS TAMANHO,
COLUNAS.ISNULLABLE AS EH_NULO
FROM
sysobjects AS TABELAS,
syscolumns AS COLUNAS,
systypes AS TIPOS
WHERE
-- JOINS
TABELAS.ID = COLUNAS.ID
AND COLUNAS.USERTYPE = TIPOS.USERTYPE
AND TABELAS.NAME = 'SA1010'
• Veja também: Usando ADVPL com SQL
Comentários
Postar um comentário