compile function ex_vm_rem( VMArray )

$insert logical
declare function fieldcount


Vcnt = fieldcount( VMArray, @vm )
for i = Vcnt to 1 step -1
   if VMArray<1,i> = '' then
      VMArray = delete( VMArray, 1, i, 0 )
   end
next i
RETURN VMArray

