Код

select
СпрК.id as [Контрагент $Справочник.Контрагенты],
ДокСчет.iddoc as [ПоследнийСчет $Документ.Счет]
from $Документ.Счет ДокСчет

inner join 1sjourn Жур on Жур.iddoc=ДокСчет.iddoc
right join $Справочник.Контрагенты СпрК on СпрК.id=$ДокСчет.Контрагент

where
(Жур.Date in
(	select
Max(Жур1.Date)
from $Документ.Счет ДокСчет1
inner join 1sjourn Жур1 on Жур1.iddoc=ДокСчет1.iddoc
and Жур1.IsMark=''
where $ДокСчет1.Контрагент=$ДокСчет.Контрагент )  
and Жур.IsMark='')

or Жур.iddoc is null
order by СпрК.descr