PowerBuilder

CSV Enable Quotes

Explains the EnableQuotes property for the CSV class. PowerBuilder

integer li_rc
integer li_Success
oleobject loo_Csv
oleobject loo_Csv2

li_Success = 0

// The CSV in this example contains this:   test;"123;abc";xyz

loo_Csv = create oleobject
li_rc = loo_Csv.ConnectToNewObject("Chilkat.Csv")
if li_rc < 0 then
    destroy loo_Csv
    MessageBox("Error","Connecting to COM object failed")
    return
end if

// EnableQuotes is 1 by default, but we'll explicitly set to 1 here:
loo_Csv.EnableQuotes = 1
li_Success = loo_Csv.LoadFile("qa_data/csv/enableQuotes.csv")

// Show row 0, column 0
Write-Debug loo_Csv.GetCell(0,0)
// Show row 0, column 1
Write-Debug loo_Csv.GetCell(0,1)
// Show row 0, column 2
Write-Debug loo_Csv.GetCell(0,2)

// Output is: 
//  test
//  123;abc
//  xyz

// -------------------------------------------
// Turn off EnableQuotes and see what happens:

loo_Csv2 = create oleobject
li_rc = loo_Csv2.ConnectToNewObject("Chilkat.Csv")

loo_Csv2.EnableQuotes = 0

li_Success = loo_Csv2.LoadFile("qa_data/csv/enableQuotes.csv")

Write-Debug loo_Csv2.GetCell(0,0)
Write-Debug loo_Csv2.GetCell(0,1)
Write-Debug loo_Csv2.GetCell(0,2)
Write-Debug loo_Csv2.GetCell(0,3)

// Output is:

//  test
//  "123
//  abc"
//  xyz


destroy loo_Csv
destroy loo_Csv2