Okay.. I came up with a convoluted script that seems to work.. lol.. I may have to redo this to make it simpler.

code:
break on
$cpname="servername"
$objcomp=GetObject("winmgmts:{impersonationLevel=impersonate}!\\$cpname")
$objjob=$objcomp.EXecQuery("Select * From Win32_PrintJob Where JobStatus='Printer Busy or Error'")

For each $job in $objjob
$printername=SPLIT($job.name,",",1)[0]
$sharename=$objcomp.Get("Win32_Printer='$printername'").sharename
$sharename ?

$objpq=GetObject("WinNT://$cpname/$sharename")
$objpq.Purge
@error
If @error = 0
? "All jobs cancelled for " + $printername + "."
Else
? "Purge failed for " + $printername + "."
Endif
Next
Brian