Using your expression above , for some reason it is only extracting the word Oracle and coming up blank for DNA. :/
I have got the following result below using : System_Name: Left([System],(InStr(1,[System],"-"))-2)
But as you can see, that expression is throwing an error "#Func!" for Oracle..