Or probably you might move where expressions to select field list and set flags for Exmatch,ProbMatch etc (not tested off the top of my head - 1 Exactmatch, 2 Prob...0 Nomatch):

set exact on
set ansi on
select *,;
 iif( upper(&bmlname)=upper(sddmdata.sdlname) and ;
        upper(&bmaddr)=upper(sddmdata.addr) , 1, ;
iif(upper(&bmaddr)=upper(sddmdata.addr), 2, ;
iif(val(&bmaddr)=val(sddmdata.addr),3,0) );
) as MatchFlag ;
 from bmdata left join sddmdata ;
  on left(&bmzip,5)=left(sddmdata.sdzip,5) ;
  where !(sddmdata.sdaddr == '') into cursAll

Cetin