<t>Hello Terry,<br/> <br/> Function isProgramUnfinished(oPicasso as PicassoObject) as logic pascal <br/> local lResult as logic<br/> <br/> IF IsProgram(oPicasso)<br/> * is a program, and every program is unfinished<br/> lResult:=true<br/> ELSE<br/> * not a program, so it is not unfinished<br/> lResu...