#$INPBOX("Inserire l'anno di riferimento",AnnoSV)#
#$LET TESTO="SELECT * FROM ComAreMeMercatoEventoPA LEFT JOIN ComAreMeMercatoEvento on (ComAreMeMercatoEventoPA.IdZona=ComAreMeMercatoEvento.IdZona And ComAreMeMercatoEventoPA.IdMercato= ComAreMeMercatoEvento.IdMercato And ComAreMeMercatoEventoPA.IdEventoMercatale= ComAreMeMercatoEvento.IdEventoMercatale) WHERE  (YEAR(DataSvolgimento) ="+STR(?AnnoSV)+") And IdTipoPresenza='A' And ComAreMeMercatoEvento.IdMercato="+STR(IdMercato)+" ORDER BY IdAttivita,IdVariazione,DataSvolgimento "#
#$QUERY(?TESTO)#
#$LET IdAttivitaP=0#
#$LET IdVariazioneP=0#
Mercato: #$JOIN(ComAreMeMercato)##$>ComAreMeTabDenomMercato(IdDenominazioneMercato=IdDenominazioneMercato)##$ENDJOIN#	Giustificate	Non Giustificate	

#$LOOP(N)#
#$IF((IdAttivita!=?IdAttivitaP)|(IdVariazione!=?IdVariazioneP))#
#$IF((?nGiust!=0)|(?nNGiust!=0))#
Numero assenze	#$?nGiust#	#$?nNGiust#	
#$ENDIF#
#$LET nGiust=0#
#$LET nNGiust=0#

#$JOIN(!ComSaSchedaAttivitaIntestatario,IdAttivita=IdAttivita;IdVariazione=IdVariazione)##$LOOP(N)##$JOIN(Anagrafe,IdPersona=IdIntestatario)##$Intestazione##$ENDJOIN##$IF(ROWPOS<COUNT)#, #$ENDIF##$ENDLOOP##$ENDJOIN#( Cod. #$IdAttivita# Var. #$IdVariazione#)	
#$LET IdAttivitaP=IDAttivita#
#$LET IdVariazioneP=IdVariazione#
#$ENDIF#
#$IF(AssenzaGiustificata=-1)#
#$LET nGiust=?nGiust+1#
	#$DataSvolgimento#		
#$ELSE#
#$LET nNGiust=?nNGiust+1#
		#$DataSvolgimento#	
#$ENDIF#
#$ENDLOOP#
Numero assenze	#$?nGiust#	#$?nNGiust#	
#$ENDJOIN#