ParseElement ParseLine ->
Arg Open_interest : &Integer
    String_with_values : String
    Quotation_mark = '"'
    Delimiter = ','
+

 RemoveDelimiters ->
 Arg String : ^&_

 Quotation_marks_around = 0 ..

 - CharsIn String_with_numbers (
                                 Char : 
                                        If Char = Quotation_mark then
                                         If Quotation_marks_around = 0 then 
                                          Quotation_marks_around = 1
                                         Else 
                                          Quotation_marks_around = 0
                                        Else
                                         _
                                        ;

                                        If Char <> Quotation_mark then
                                         If Char <> Delimiter then
                                          String '= Char
                                         Else
                                          If !Quotation_marks_around then
                                           String '= Delimiter
                                          Else
                                           _
                                          ;
                                         ;
                                        Else
                                         _
                                        ;
                               )

 /

+

Parse Str . ',' . ',' Open_interest ',' .
' Str - RemoveDelimiters >Str< 
' String_with_numbers <- String_with_values 'N/A' '0'

/
