func mdi_missing(head, missed)
 ;returns iq = -1 if can't be done and 1 if OK
 hb = bmap(head)
 nl = num_elem(hb)/80
 if nl le 0 then return, 0
 redim, hb, 80, nl
 ;look for MISSVALS
 gotem = 0
 for i=1,nl-1 do {
 s=upcase(smap(hb(*,i)))
 if strpos(s,'MISSVALS') eq 0 then { missed = fix(strskp(s,'=')) gotem = 1 }
 }
 if gotem eq 1 then return, 1 else return, 0
 endfunc