bug: dont parse default values as type, support type interval DB mapping such VARCHAR() NUMERIC()

in the lineas split the analisis module only can process a pair of filedname & typeof,

this make that if a default value are set, parse as a type due the plist and mid:

 lineas = Split(TextAreaTipos.text, gb.NewLine)
  
  For a = 0 To lineas.max
    If lineas[a] <> "" Then
      n = Mid$(lineas[A], 1, InStr(lineas[A], " ") - 1)
      tipo = RTrim$(lineas[a]) ' ERROR aqui usa esto y asume el ultimo es un valor pr defecto, 
      tipo = Mid$(lineas[a], RInStr(lineas[a], " ") + 1)
      tipos.add(tipo) ' ERROR adiciona el valor por defecto como un tipo de dato
    Endif
  Next
  datos.Add(tipos, "campostipos" & comun.primeraMay(n))
  '
  
  campotipo = tipos
  nombretabla = Replace$(datos["tabla"][0], "'", "") ' quita las simple comillas que pone gambas3, cuando edita
  campo = datos["campos" & comun.primeraMay(nombretabla)]
  
  'creando codigo de la tabla....
  codigoCampo = creatabla.propiedades(campo, campotipo)
  codigoCampo &= creatabla.metodos(campo, campotipo)
  codigoCampo &= creatabla.FuncionesConsversion(campo, nombretabla)