How can I derive a name in the middle of text?

How many colons could you possibly get in the invoice line description?
If it's only a handful, you could check the text to the left of each colon to see if it is "Consultant", and if it is, use the text to the right. Something like this:

//Get all the text parts between colons(:)
var text texta = Part([Descsription],1,":");
var text textb = Part([Descsription],2,":");
var text textc = Part([Descsription],3,":");
var text textd = Part([Descsription],3,":");

//Find which part contains "Consultant", and then use the next part.
var text NamePart = 
Case("Consultant",
Right($texta,10),$textb,
Right($textb,10),$textc,
Right($textc,10),$textd);

//Get the first and last name
var text FirstName = Part($NamePart,2," \n");
var text LastName =  Part($NamePart,3," \n");

//Create the display anme
$FirstName & " " & $LastName

There could be a lot of colons in some cases.

I'm wondering if there is any way to do this with a code fragment / code page.

 Building on Matt's approach, you can use the new line character which is \n as a delimiter.

//Get all the text parts between colons(:)
var text texta = Trim(Part([Descsription],1,"\n"));
var text textb = Trim(Part([Descsription],2,"\n"));
var text textc = Trim(Part([Descsription],3,"\n"));
var text textd = Trim(Part([Descsription],3,"n"));


var text ConsultantLine = 
IF(
Begins($texta, "Consultant"), $texta,
Begins($textb, "Consultant"), $textb,
Begins($textc, "Consultant"), $textc,
Begins($textd, "Consultant"), $texta)

Trim(Right($ConsultantLine,":"))

Thanks everyone.  I was actually able to get the sending application configured to make the text much easier  for native QuickBase to parse.  I didn't think that was an option.