Insert Into archivio_mov (
prog_schedina,
codalbergo,
codcomalb,
annogestionale,
data_elaborazione,
stato,
ncomp,
stato_res,
codstato,
comune,
prov,
codcomune,
codgruppo,
flagriporto)

Select @progschedina+1,codalbergo,codcomalb,CONVERT(char( 4),dbo.GetFirstMonthDay_1(@data_elaborazione), 112),dbo.GetFirstMonthDay_1(@data_elaborazione),'A',nrcomp,statores,codnazione,comune,provincia,codcomune,codgruppo,'1'
from #tbltemp
where data_partenza is null
group by nschedina,codalbergo,codcomalb,annogestionale,statores,codnazione,comune,provincia,codcomune,codgruppo,data_elaborazione,data_arrivo,data_partenza,nrcomp