EINDEUTIGES CAMPOS.RDB$FIELD_NAME ALS COLUMN_NAME VORWÄHLEN,
FALL
WENN DADOSCAMPO.RDB$FIELD_PRECISION > 0 DANN „NUMERISCH“
WENN TIPOS.RDB$TYPE_NAME = „LANG“ DANN „GANZE ZAHL“
WENN TIPOS.RDB$TYPE_NAME = „KURZE“ DANN „SMALLINT“
WENN TIPOS.RDB$TYPE_NAME = „INT64“ DANN „NUMERISCH“
WENN TIPOS.RDB$TYPE_NAME = „UNTERSCHIEDLICHE“ DANN „VARCHAR“
WENN TIPOS.RDB$TYPE_NAME = „TEXT“ DANN „VERKOHLEN“
WENN TIPOS.RDB$TYPE_NAME = „KLECKS-“ DANN „KLECKS SUB_TYPE“
SONST TIPOS.RDB$TYPE_NAME
ENDE ALS FIELD_TYPE,
FALL
WENN DADOSCAMPO.RDB$FIELD_TYPE IN (16.8) DANN DADOSCAMPO.RDB$FIELD_PRECISION
SONST DADOSCAMPO.RDB$FIELD_LENGTH
ENDE ALS DATA_LENGTH, DADOSCAMPO.RDB$FIELD_SCALE ALS DATA_SCALE,
FALL CAMPOS.RDB$NULL_FLAG WENN 1 DANN „N-“ SONST „Y-“ ENDE ALS NULLABLE
VON
RDB$RELATIONS TABELAS, RDB$RELATION_FIELDS CAMPOS, RDB$FIELDS
DADOSCAMPO, RDB$TYPES TIPOS
WO TABELAS.RDB$RELATION_NAME = „PESSOAS“
UND TIPOS.RDB$FIELD_NAME = „RDB$FIELD_TYPE“
UND TABELAS.RDB$RELATION_NAME = CAMPOS.RDB$RELATION_NAME
UND CAMPOS.RDB$FIELD_SOURCE = DADOSCAMPO.RDB$FIELD_NAME
UND DADOSCAMPO.RDB$FIELD_TYPE = TIPOS.RDB$TYPE
AUFTRAG DURCH CAMPOS.RDB$FIELD_POSITION
|