(DataFlex) CSV Column Names

Demonstrates how to access CSV column names.

The Chilkat CSV library/component/class is freeware. The downloads for .NET, C++, Perl, Java, Ruby, and Python contain all of the Chilkat classes, some of which are freeware and some of which require licensing.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

Use ChilkatAx-win32.pkg

Procedure Test
    Handle hoCsv
    Boolean iSuccess
    Integer i
    String sColName
    Integer iIdx
    String sTemp1
    Integer iTemp1

    // This example program loads a file (sample.csv)
    // that contains this content:
    // 
    // year,color,country,food
    // 2001,red,France,cheese
    // 2005,blue,"United States",hamburger
    // 2008,green,Italy,pasta
    // 1998,orange,Japan,sushi
    // 
    // The first row contains the column names.
    // This file is available at:
    // http://www.chilkatsoft.com/testData/sample.csv

    Get Create (RefClass(cComChilkatCsv)) To hoCsv
    If (Not(IsComObjectCreated(hoCsv))) Begin
        Send CreateComObject of hoCsv
    End

    // Prior to loading the CSV file, indicate that the 1st row
    // should be treated as column names:
    Set ComHasColumnNames Of hoCsv To True

    // Load the CSV records from the file:

    Get ComLoadFile Of hoCsv "sample.csv" To iSuccess
    If (iSuccess <> True) Begin
        Get ComLastErrorText Of hoCsv To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    // Display the column names:

    Get ComNumColumns Of hoCsv To iTemp1
    For i From 0 To (iTemp1 - 1)
        Get ComGetColumnName Of hoCsv i To sColName
        Showln i ": " sColName

        // The following line demonstrates to to get the column
        // index given a column name:
        Get ComGetIndex Of hoCsv sColName To iIdx
        Showln sColName " is at column index " iIdx
    Loop



End_Procedure