VÄLJ DISTINKT CAMPOS.RDB$FIELD_NAME SOM COLUMN_NAME,
FALL
NÄR DADOSCAMPO.RDB$FIELD_PRECISION > ”NUMERISK” 0 DÄREFTER,
NÄR TIPOS.RDB$TYPE_NAME = ”LONG” DÄREFTER ”HELTAL”,
NÄR TIPOS.RDB$TYPE_NAME = ”KORT STAVELSE” DÄREFTER ”SMALLINT”,
NÄR TIPOS.RDB$TYPE_NAME = ””NUMERISK” INT64” DÄREFTER,
NÄR TIPOS.RDB$TYPE_NAME = ”VARIERANDE” DÄREFTER ”VARCHAR”,
NÄR TIPOS.RDB$TYPE_NAME = ”TEXT BRÄNNER TILL KOL” DÄREFTER ””,
NÄR TIPOS.RDB$TYPE_NAME = ”KLICK SUB_TYPE” ”FÖR KLICK” DÄREFTER,
ANNAN TIPOS.RDB$TYPE_NAME
AVSLUTA SOM FIELD_TYPE,
FALL
NÄR DADOSCAMPO.RDB$FIELD_TYPE I (16.8) DÄREFTER DADOSCAMPO.RDB$FIELD_PRECISION
ANNAN DADOSCAMPO.RDB$FIELD_LENGTH
AVSLUTA SOM DATA_LENGTH, DADOSCAMPO.RDB$FIELD_SCALE SOM DATA_SCALE,
CASE CAMPOS.RDB$NULL_FLAG, NÄR 1 ”N” ANNAT ”Y” AVSLUTAR DÄREFTER SOM NULLABLE
FRÅN
RDB$RELATIONS TABELAS, RDB$RELATION_FIELDS CAMPOS, RDB$FIELDS
DADOSCAMPO RDB$TYPES TIPOS
VAR TABELAS.RDB$RELATION_NAME = ”PESSOAS”,
OCH TIPOS.RDB$FIELD_NAME = ”RDB$FIELD_TYPE”,
OCH TABELAS.RDB$RELATION_NAME = CAMPOS.RDB$RELATION_NAME
OCH CAMPOS.RDB$FIELD_SOURCE = DADOSCAMPO.RDB$FIELD_NAME
OCH DADOSCAMPO.RDB$FIELD_TYPE = TIPOS.RDB$TYPE
BESTÄLLA VID CAMPOS.RDB$FIELD_POSITION
|