How to import CSV into Clarion 11 TopSpeed file without writing code

[vitesse]

@vitesse

yes that sounds right (at least as it is at the moment - version 3.35), you could do a replace as you suggest, something like:

str   StringTheory
lne   StringTheory
fld   StringTheory
x     Long
y     Long
  code
  str.LoadFile('Somefile.CSV')
  str.LineEndings()
  str.Split('<13,10>','"')
  loop x = 1 to str.Records()
    Lne.SetValue(Str.GetLine(x))
    Lne.Split(',','"','"',true)
    loop y = 1 to lne.records()
      fld.setValue(lne.GetLine(y))
      if fld.replace('""','"')
        lne.SetLine(y, fld.getValue())
      end
    end
    field1 = Lne.GetLine(1)
    field2 = Lne.GetLine(2)
  end

Well it is a few years on and a few (well 45 actually) ST versions on. As of the current ST version 3.80 there is a new “CSVDecode” option on the “remove quotes” parameter of st.split() so you don’t need to worry now about converting 9"" nails to 9" nails.

so the above code can now be simplified to:

str   StringTheory
lne   StringTheory
x     Long,auto
  code
  str.LoadFile('Somefile.CSV')
  str.LineEndings()
  str.Split('<13,10>','"')
  loop x = 1 to str.Records()
    Lne.SetValue(Str.GetLine(x))
    Lne.Split(',','"','"',st:CSVDecode)  ! <--- note new option
    field1 = Lne.GetLine(1)
    field2 = Lne.GetLine(2)
  end