List list = new List(Types::Class); 

CustTable custTable; 

while select custTable 

{ 

    list.addEnd(Tutorial_Comparable::newCustTable(custTable)); 

} 

return list; 

 

List                        list; 

ListIterator                it; 

; 

list =  strsplit(salesLine.Name,"\n"); 

it   = new ListIterator (list); 

while (it.more()) 

{ 

    it.value(); 

    it.next(); 

}

RecordSortedList    journalList;
journalList = new RecordSortedList(_record.TableId);
journalList.ins(_record);