13 de julio de 2004

Saber si existe un campo en una tabla

Con esta función podemos comprobar si existe un campo en una tabla.

Ejemplo:
? ExisteCampo("MiCampo","MiTabla")

FUNCTION ExisteCampo(tcCampo,tcTabla)
  LOCAL la(1)
  AFIELDS(la,tcTabla)
  RETURN ASCAN(la,tcCampo,1,0,1,15) # 0
ENDFUNC


Luis María Guayán

6 comentarios :

  1. *** Otra forma de Verificar si existe Campo
    SELECT MiTabla
    IF FSIZE("MiCampo") = 0
    ALTER TABLE MiTabla ADD COLUMN MiCampo c(20) NULL
    ELSE
    *** No hace nada
    ENDIF

    ResponderBorrar
  2. Muy efectiva ambas opciones. muchas gracias! larga vida al zorro!!!

    ResponderBorrar
  3. *** Otra forma de Verificar si existe Campo
    SELECT MiTabla
    IF TYPE("MiCampo")="U"
    ALTER TABLE MiTabla ADD COLUMN MiCampo c(20) NULL
    ENDIF

    ResponderBorrar

Los comentarios son moderados, por lo que pueden demorar varias horas para su publicación.