use otomax
set nocount on
update pengirim set kirim_info=1 where tipe_pengirim='S' and kirim_info=0
declare @kodereseller varchar(20), @pengirim varchar(50)
DECLARE cur1 CURSOR FORWARD_ONLY FOR SELECT kode FROM reseller
OPEN cur1
FETCH NEXT FROM cur1 INTO @kodereseller
WHILE @@FETCH_STATUS = 0 BEGIN
set @pengirim=null
select top 1 @pengirim=pengirim from inbox where kode_reseller=@kodereseller and tipe_pengirim='S' order by kode desc
if @pengirim is null
select top 1 @pengirim=pengirim from pengirim where kode_reseller=@kodereseller and tipe_pengirim='S'
if @pengirim is not null begin
print @kodereseller + ': ' + @pengirim
update pengirim set kirim_info=1 where pengirim=@pengirim and tipe_pengirim='S'
end
FETCH NEXT FROM cur1 INTO @kodereseller
END
CLOSE cur1
DEALLOCATE cur1
langkah menormalkan kembali agar pengirim tercentang semua