very slick....for you old Mumpsters, here's an extrinsic function

%Split(List,Array,del) ;;liberating a VB function
S del=$G(del,"|")
Do ##class(%ListOfDataTypes).BuildValueArray($lfs(List,del),.Array)
Q 1