set fileContentList {
	{}
	{
		% This file is interpreted by tcl so each LaTeX back slash must be duplicated
		\\documentclass[brazilian,PublicacaoLivro,SemFormatacaoCapitulo,SemFolhaAprovacao]{http://urlib.net/iconet.com.br/banon/2008/03.25.01.19/tdiinpe}
		%\\documentclass[brazilian,PublicacaoLivro,SemFormatacaoCapitulo,SemFolhaAprovacaoo]{tdiinpe}
		%\\documentclass[brazilian,PublicacaoLivro,SemFormatacaoCapitulo,SemFolhaAprovacao]{../../../../../iconet.com.br/banon/2008/03.25.01.19/doc/tdiinpe}

		\\repositorio{$thisRepository} %% repositório onde está depositado o documento

		\\RequirePackage{comment}

		\\hypersetup{pdfstartpage=1,pdfstartview=FitH,baseurl=http://$localSite/col/$thisRepository/doc/}

		\\begin{comment}


		[[

			set siteList {
				bibdigital.sid.inpe.br:80
				{md-m09.sid.inpe.br 800}
				{md-m09b.sid.inpe.br 802}
				mtc-m12.sid.inpe.br:80
				mtc-m16.sid.inpe.br:80
				{mtc-m16b.sid.inpe.br 802}
				{mtc-m16c.sid.inpe.br 804}
				{mtc-m16d.sid.inpe.br 806}
				{plutao.sid.inpe.br 800}
				{mtc-m21.sid.inpe.br 802}
				{mtc-m21b.sid.inpe.br 804}
				{mtc-m21c.sid.inpe.br 806}
				marte.sid.inpe.br:80
				{marte2.sid.inpe.br 802}
				{marte3.sid.inpe.br 804}
			}

			proc CreateDataSet {args} {
				set i 0
				set data {}
				foreach input [[lindex $args 0]] {
					set line {}
					foreach list $args {
						lappend line [[lindex $list $i]]
					}
					lappend data $line
					incr i
				}
				return [[join $data \n]]
			}

# CreateSequence creates a list of bar group position along the x axis
			proc CreateSequence {numberOfItems firstSequenceItem increment} {
				set sequenceItem $firstSequenceItem
				for {set i 1} {$i <= $numberOfItems} {incr i} {
					lappend sequence $sequenceItem
					set sequenceItem [[expr $sequenceItem + $increment]]
				}
				return $sequence
			}

			proc ComputeAxisParameters {dxticks barWidth xnameList numberOfItemsList} {
				set firstSequenceItem [[expr 2 * $barWidth]]
				set xmax [[expr ([[llength $xnameList]] - 1) * $dxticks + 4 * $barWidth]]
				# set maxValue [[expr round(1.1 * [[lindex [[lsort -integer $numberOfItemsList]] end]])]]	;# 58
				set maxValue [[expr round(1.04 * [[lindex [[lsort -integer $numberOfItemsList]] end]])]]	;# 1.04 * 10
				set factor [[expr pow(10, [[string length $maxValue]] - 1)]]	;# 10.0
				set numberOfUnits [[expr int(ceil($maxValue / $factor))]]	;# 6
				# set maxTable(1) 1; set dticksTable(1) 0.2
				set maxTable(1) 1.2; set dticksTable(1) 0.2	;# maxValue == 1
				set maxTable(2) 2.5; set dticksTable(2) 0.5
				set maxTable(3) 3; set dticksTable(3) 0.5
				set maxTable(4) 4; set dticksTable(4) 1
				set maxTable(5) 5; set dticksTable(5) 1
				set maxTable(6) 6; set dticksTable(6) 1
				set maxTable(7) 8; set dticksTable(7) 2
				set maxTable(8) 8; set dticksTable(8) 2
				set maxTable(9) 10; set dticksTable(9) 2
				set maxTable(10) 12; set dticksTable(10) 2
				# set ymax [[expr int($maxTable($numberOfUnits) * $factor)]]	;# 60
				# set dyticks [[expr int($dticksTable($numberOfUnits) * $factor)]]	;# 10
				set ymax [[expr $maxTable($numberOfUnits) * $factor]]	;# 60
				set dyticks [[expr $dticksTable($numberOfUnits) * $factor]]	;# 10
				return [[list $firstSequenceItem $xmax $ymax $dyticks]]
			}

#			set currentYear 2009
#			set currentYear 2010
#			set currentYear 2011
#			set currentYear 2012
#			set currentYear 2013
#			set currentYear 2014
#			set currentYear 2015
#			set currentYear 2016
#			set currentYear 2017
#			set currentYear	2018
#			set currentYear	2019
			set currentYear 2020
			
#			set ingestYearList {2001 2002 2003 2004 2005 2006 2007 2008 2009}
#			set ingestYearList {2002 2003 2004 2005 2006 2007 2008 2009 2010}
#			set ingestYearList {2003 2004 2005 2006 2007 2008 2009 2010 2011}
#			set ingestYearList {2004 2005 2006 2007 2008 2009 2010 2011 2012}
#			set ingestYearList {2005 2006 2007 2008 2009 2010 2011 2012 2013}
#			set ingestYearList {2006 2007 2008 2009 2010 2011 2012 2013 2014}
#			set ingestYearList {2007 2008 2009 2010 2011 2012 2013 2014 2015}
#			set ingestYearList {2008 2009 2010 2011 2012 2013 2014 2015	2016}
#			set ingestYearList {2009 2010 2011 2012 2013 2014 2015 2016 2017}
#			set ingestYearList {2010 2011 2012 2013 2014 2015 2016 2017	2018}
#			set ingestYearList {2011 2012 2013 2014 2015 2016 2017 2018	2019}
			set ingestYearList {2012 2013 2014 2015 2016 2017 2018 2019 2020}
			
#			set publicationYearList {2001 2002 2003 2004 2005 2006 2007 2008 2009}
#			set publicationYearList {2002 2003 2004 2005 2006 2007 2008 2009 2010}
#			set publicationYearList {2003 2004 2005 2006 2007 2008 2009 2010 2011}
#			set publicationYearList {2004 2005 2006 2007 2008 2009 2010 2011 2012}
#			set publicationYearList {2005 2006 2007 2008 2009 2010 2011 2012 2013}
			set publicationYearList $ingestYearList
			
#			set publicationThreeYearList {2012 2013 2014}
#			set publicationThreeYearList {2013 2014 2015}
#			set publicationThreeYearList {2014 2015	2016}			
#			set publicationThreeYearList {2015 2016	2017}			
#			set publicationThreeYearList {2016 2017	2018}
#			set publicationThreeYearList {2017 2018	2019}
			set publicationThreeYearList {2018 2019 2020}

#			set vivaPublicationYearList {2001 2002 2003 2004 2005 2006 2007 2008 2009}
#			set vivaPublicationYearList {2002 2003 2004 2005 2006 2007 2008 2009 2010}
#			set vivaPublicationYearList {2003 2004 2005 2006 2007 2008 2009 2010 2011}
#			set vivaPublicationYearList {2004 2005 2006 2007 2008 2009 2010 2011 2012}
#			set vivaPublicationYearList {2005 2006 2007 2008 2009 2010 2011 2012 2013}
			set vivaPublicationYearList $ingestYearList

			set referenceTypeTable(AR) {Artigo em revista}
			set referenceTypeTable(AE) {Artigo em evento}
			set referenceTypeTable(CL) {Cap\'itulo de Livro}
			set referenceTypeTable(eP) {ePrint}
			set referenceTypeTable(L) {Livro}
			set referenceTypeTable(MA) {Material Audiovisual}
			set referenceTypeTable(MNP) {MAN NTC PUD RDP}
			set referenceTypeTable(R) {Relat\'orio}
			set referenceTypeTable(RJ) {Recorte de jornal}
			set referenceTypeTable(TD) {Tese e disserta\c{c}\~ao}

			set referenceTypeList {AR L MNP CL AE TD R eP MA RJ}	;# specifies the display order

			set referenceTypeTable2(AR) {referencetype, Journal Article}
			set referenceTypeTable2(AE) {referencetype, Conference Proceedings and not referencetype, audio*}
			set referenceTypeTable2(CL) {referencetype, Book Section}
			set referenceTypeTable2(eP) {referencetype, Electronic Source}
			set referenceTypeTable2(L) {secondarytype, l* and referencetype, book and not referencetype, section}
			set referenceTypeTable2(MA) {referencetype, Audiovisual Material}
			set referenceTypeTable2(MNP) {secondarytype, MAN or secondarytype, NTC or secondarytype, PUD or secondarytype, RDP}
			set referenceTypeTable2(R) {referencetype, Report}
			set referenceTypeTable2(RJ) {referencetype, Newspaper}
			set referenceTypeTable2(TD) {referencetype, Thesis}

			set totalNumberOfSearches 0

######### List of figures to be updated #########

#  1 ingestYear
#  2 publicationYear
#  3 thesisPublicationYear
#  4 thesisVivaPublicationYear
#  5 referenceType
#  6 currentYearReferenceType
#  7 accessYear
#  8 referenceTypeOfTheLastThreeYears
#  9 publicationYearDuringTheLastThreeYears
# 10 accessYearOfTheLastThreeYears
# 11 journalPublicationYear
# 12 conferencePublicationYear
# 13 bookSectionPublicationYear
# 14 reportPublicationYear
# 15 ePrintIngestYear
# 16 newspaperIngestYear

			if [[info exists searchResultArray]] {unset searchResultArray}	;# uncomment to ignore previous partial search results stored in searchResult.tcl in this repository (if any)

			set figureToBeUpdatedList {}											;# não comentar esta linha
			
#			lappend figureToBeUpdatedList {ingestYear}								;#  1
#			lappend figureToBeUpdatedList {publicationYear}							;#  2
#			lappend figureToBeUpdatedList {thesisPublicationYear}					;#  3
#			lappend figureToBeUpdatedList {thesisVivaPublicationYear}				;#  4
#			lappend figureToBeUpdatedList {referenceType}							;#  5
#			lappend figureToBeUpdatedList {currentYearReferenceType}				;#  6
#			lappend figureToBeUpdatedList {accessYear}								;#  7

#			lappend figureToBeUpdatedList {referenceTypeOfTheLastThreeYears}		;#  8
#			lappend figureToBeUpdatedList {publicationYearDuringTheLastThreeYears}	;#  9
#			lappend figureToBeUpdatedList {accessYearOfTheLastThreeYears}			;# 10

#			lappend figureToBeUpdatedList {journalPublicationYear}					;# 11
#			lappend figureToBeUpdatedList {conferencePublicationYear}				;# 12

#			lappend figureToBeUpdatedList {bookSectionPublicationYear}				;# 13
#			lappend figureToBeUpdatedList {reportPublicationYear}					;# 14

#			lappend figureToBeUpdatedList {ePrintIngestYear}						;# 15
#			lappend figureToBeUpdatedList {newspaperIngestYear}						;# 16

			set hei 0.2

			set barRed1 130; set barGreen1 130; set barBlue1 230
			set barRed2 30; set barGreen2 30; set barBlue2 130

		]]

		\\end{comment}

		\\input{./preamble} %% faça as modificações pertinentes no arquivo configuracao.tex

		\\begin{document}

		\\input{./document}

		\\begin{flushleft}
			\\renewcommand{\\baselinestretch}{0.9}
			\\footnotesize
% a linha abaixo para atualização do relatório torna o relatório com acesso restrito ao login
%			\\href{http://$localSite/update/$thisRepository?languagebutton=pt-BR}{Atualize este relatório}\\\\
			(última data de atualização do relatório: [[clock format [[clock seconds]] -format "%Y-%m-%d às %H:%M"]]).
		\\end{flushleft}

		\\end{document}
	}

	[[
		set dynamicList {}

# Figure 1
		if {[[lsearch $figureToBeUpdatedList ingestYear]] != -1} {
			set totalNumberOfSearches [[expr $totalNumberOfSearches + [[llength $ingestYearList]] * 2]]
			set numberOfRecordsPerIngestYear 0
			set numberOfFullTextPerIngestYear 0
			foreach ingestYear $ingestYearList {
				set searchExpression "repository */$ingestYear/* and hostcollection, *"
				set number [[DisplayNumberOfEntries2 $searchExpression]]
				lappend numberOfRecordsPerIngestYearList $number
				incr numberOfRecordsPerIngestYear $number
				set searchExpression "repository */$ingestYear/* and size, * and hostcollection, *"
				set number [[DisplayNumberOfEntries2 $searchExpression]]
				lappend numberOfFullTextPerIngestYearList $number
				incr numberOfFullTextPerIngestYear $number
			}
			lappend dynamicList {ingestYearBar.dat}
			lappend dynamicList [[
				set dxticks 1.08	;# 9 bars
				set barWidth 0.40
				foreach {firstSequenceItem xmax ymax dyticks} [[ComputeAxisParameters $dxticks $barWidth $ingestYearList $numberOfRecordsPerIngestYearList]] {break}
				set graphymove 0.3
				set graphxsize 15.4
				set graphysize 5.8
				CreateDataSet [[CreateSequence [[llength $ingestYearList]] $firstSequenceItem $dxticks]] $numberOfRecordsPerIngestYearList $numberOfFullTextPerIngestYearList
			]]
			lappend dynamicList {ingestYearBar.gle}
			lappend dynamicList "
				! size 15.4 6.0	! size of the paper
				size $graphxsize [[expr $graphysize * 0.92 + $graphymove]]

				set font ss lwidth 0.01
				set alabeldist .8

				barRed1 = $barRed1
				barGreen1 = $barGreen1
				barBlue1 = $barBlue1
				barRed2 = $barRed2
				barGreen2 = $barGreen2
				barBlue2 = $barBlue2

				include \"./color.gle\"
				! include \"barstyles.gle\"
				include \"./library.gle\"

				amove 0 $graphymove
				begin graph
					size $graphxsize $graphysize
					center
					data   \"ingestYearBar.dat\"
					xtitle \"Ano de inser\\c{c}\\~ao\"
					ytitle \"N\\'umero de itens\"
					xaxis min 0 max $xmax
					xnames $ingestYearList
					xticks off
					yaxis dticks $dyticks dsubticks $dyticks min 0 max $ymax
					x2axis off
					y2axis off
					xlabels hei $hei
					ylabels hei $hei
					bar d1,d2 width $barWidth dist [[expr $barWidth + 0.04]] style colormap1,colormap2
				end graph

				begin key
					justify bc
					absolute (pagewidth()/2) 0
					hei $hei
					nobox
					boxcolor clear
					fill rgb255($barRed1,$barGreen1,$barBlue1) text \"Registro - Total: $numberOfRecordsPerIngestYear\"
					fill rgb255($barRed2,$barGreen2,$barBlue2) text \"Texto completo - Total: $numberOfFullTextPerIngestYear\"
				end key
			"
			lappend dynamicList ${figureToBeUpdatedList}FigureDate.tex
			lappend dynamicList [[clock format [[clock seconds]] -format "%Y-%m-%d" ]]%
		}

# Figure 2
		if {[[lsearch $figureToBeUpdatedList publicationYear]] != -1} {
			set totalNumberOfSearches [[expr $totalNumberOfSearches + [[llength $publicationYearList]] * 2]]
			set numberOfRecordsPerPublicationYear 0
			set numberOfRecordsPerPublicationYearList {}
			set numberOfFullTextPerPublicationYear 0
			set numberOfFullTextPerPublicationYearList {}
			foreach publicationYear $publicationYearList {
				set searchExpression "repository */$currentYear/* and year, $publicationYear and hostcollection, *"
				set number [[DisplayNumberOfEntries2 $searchExpression]]
				lappend numberOfRecordsPerPublicationYearList $number
				incr numberOfRecordsPerPublicationYear $number
				set searchExpression "repository */$currentYear/* and year, $publicationYear and size, * and hostcollection, *"
				set number [[DisplayNumberOfEntries2 $searchExpression]]
				lappend numberOfFullTextPerPublicationYearList $number
				incr numberOfFullTextPerPublicationYear $number
			}
			lappend dynamicList {publicationYearBar.dat}
			lappend dynamicList [[
				set dxticks 1.08	;# 9 bars
				set barWidth 0.40
				foreach {firstSequenceItem xmax ymax dyticks} [[ComputeAxisParameters $dxticks $barWidth $publicationYearList $numberOfRecordsPerPublicationYearList]] {break}
				set graphymove 0.3
				set graphxsize 15.4
				set graphysize 5.8
				CreateDataSet [[CreateSequence [[llength $publicationYearList]] $firstSequenceItem $dxticks]] $numberOfRecordsPerPublicationYearList $numberOfFullTextPerPublicationYearList
			]]
			lappend dynamicList {publicationYearBar.gle}
			lappend dynamicList "
				! size 15.4 6.0	! size of the paper
				size $graphxsize [[expr $graphysize * 0.92 + $graphymove]]

				set font ss lwidth 0.01
				set alabeldist .8

				barRed1 = $barRed1
				barGreen1 = $barGreen1
				barBlue1 = $barBlue1
				barRed2 = $barRed2
				barGreen2 = $barGreen2
				barBlue2 = $barBlue2

				include \"./color.gle\"
				! include \"barstyles.gle\"
				include \"./library.gle\"

				amove 0 $graphymove
				begin graph
					size $graphxsize $graphysize
					center
					data   \"publicationYearBar.dat\"
					xtitle \"Ano de publica\\c{c}\\~ao\"
					ytitle \"N\\'umero de itens\"
					xaxis min 0 max $xmax
					xnames $publicationYearList
					xticks off
					yaxis dticks $dyticks dsubticks $dyticks min 0 max $ymax
					x2axis off
					y2axis off
					xlabels hei $hei
					ylabels hei $hei
					bar d1,d2 width $barWidth dist [[expr $barWidth + 0.04]] style colormap1,colormap2
				end graph

				begin key
					justify bc
					absolute (pagewidth()/2) 0
					hei $hei
					nobox
					boxcolor clear
					fill rgb255($barRed1,$barGreen1,$barBlue1) text \"Registro - Total: $numberOfRecordsPerPublicationYear\"
					fill rgb255($barRed2,$barGreen2,$barBlue2) text \"Texto completo - Total: $numberOfFullTextPerPublicationYear\"
				end key
			"
			lappend dynamicList ${figureToBeUpdatedList}FigureDate.tex
			lappend dynamicList [[clock format [[clock seconds]] -format "%Y-%m-%d" ]]%
		}

# Figure 3
		if {[[lsearch $figureToBeUpdatedList thesisPublicationYear]] != -1} {
			set totalNumberOfSearches [[expr $totalNumberOfSearches + [[llength $publicationYearList]] * 2]]
			set numberOfThesisRecordsPerPublicationYear 0
			set numberOfThesisRecordsPerPublicationYearList {}
			set numberOfThesisFullTextPerPublicationYear 0
			set numberOfThesisFullTextPerPublicationYearList {}
			foreach publicationYear $publicationYearList {
				set searchExpression "year, $publicationYear and referencetype, Thesis"
				set number [[DisplayNumberOfEntries2 $searchExpression]]
				lappend numberOfThesisRecordsPerPublicationYearList $number
				incr numberOfThesisRecordsPerPublicationYear $number
				set searchExpression "year, $publicationYear and referencetype, Thesis and size, *"
				set number [[DisplayNumberOfEntries2 $searchExpression]]
				lappend numberOfThesisFullTextPerPublicationYearList $number
				incr numberOfThesisFullTextPerPublicationYear $number
			}
			lappend dynamicList {thesisPublicationYearBar.dat}
			lappend dynamicList [[
				set dxticks 1.08	;# 9 bars
				set barWidth 0.40
				foreach {firstSequenceItem xmax ymax dyticks} [[ComputeAxisParameters $dxticks $barWidth $publicationYearList $numberOfThesisRecordsPerPublicationYearList]] {break}
				set graphymove 0.3
				set graphxsize 15.4
				set graphysize 5.8
				CreateDataSet [[CreateSequence [[llength $publicationYearList]] $firstSequenceItem $dxticks]] $numberOfThesisRecordsPerPublicationYearList $numberOfThesisFullTextPerPublicationYearList
			]]
			lappend dynamicList {thesisPublicationYearBar.gle}
			lappend dynamicList "
				! size 15.4 6.0	! size of the paper
				size $graphxsize [[expr $graphysize * 0.92 + $graphymove]]

				set font ss lwidth 0.01
				set alabeldist .8

				barRed1 = $barRed1
				barGreen1 = $barGreen1
				barBlue1 = $barBlue1
				barRed2 = $barRed2
				barGreen2 = $barGreen2
				barBlue2 = $barBlue2

				include \"./color.gle\"
				! include \"barstyles.gle\"
				include \"./library.gle\"

				amove 0 $graphymove
				begin graph
					size $graphxsize $graphysize
					center
					data   \"thesisPublicationYearBar.dat\"
					xtitle \"Ano de publica\\c{c}\\~ao\"
					ytitle \"N\\'umero de itens\"
					xaxis min 0 max $xmax
					xnames $publicationYearList
					xticks off
					yaxis dticks $dyticks dsubticks $dyticks min 0 max $ymax
					x2axis off
					y2axis off
					xlabels hei $hei
					ylabels hei $hei
					bar d1,d2 width $barWidth dist [[expr $barWidth + 0.04]] style colormap1,colormap2
				end graph

				begin key
					justify bc
					absolute (pagewidth()/2) 0
					hei $hei
					nobox
					boxcolor clear
					fill rgb255($barRed1,$barGreen1,$barBlue1) text \"Registro - Total: $numberOfThesisRecordsPerPublicationYear\"
					fill rgb255($barRed2,$barGreen2,$barBlue2) text \"Texto completo - Total: $numberOfThesisFullTextPerPublicationYear\"
				end key
			"
			lappend dynamicList ${figureToBeUpdatedList}FigureDate.tex
			lappend dynamicList [[clock format [[clock seconds]] -format "%Y-%m-%d" ]]%
		}

# Figure 4
		if {[[lsearch $figureToBeUpdatedList thesisVivaPublicationYear]] != -1} {
			set totalNumberOfSearches [[expr $totalNumberOfSearches + [[llength $publicationYearList]] * 2]]
			set numberOfThesisRecordsPerVivaPublicationYear 0
			set numberOfThesisFullTextPerVivaPublicationYear 0
			foreach vivaPublicationYear $vivaPublicationYearList {
				set searchExpression "date, $vivaPublicationYear and referencetype, Thesis"
				set number [[DisplayNumberOfEntries2 $searchExpression]]
				lappend numberOfThesisRecordsPerVivaPublicationYearList $number
				incr numberOfThesisRecordsPerVivaPublicationYear $number
				set searchExpression "year, $vivaPublicationYear and date, $vivaPublicationYear and referencetype, Thesis"
				set number [[DisplayNumberOfEntries2 $searchExpression]]
				lappend numberOfThesisFullTextPerVivaPublicationYearList $number
				incr numberOfThesisFullTextPerVivaPublicationYear $number
			}
			lappend dynamicList {thesisVivaPublicationYearBar.dat}
			lappend dynamicList [[
				set dxticks 1.08	;# 9 bars
				set barWidth 0.40
				foreach {firstSequenceItem xmax ymax dyticks} [[ComputeAxisParameters $dxticks $barWidth $vivaPublicationYearList $numberOfThesisRecordsPerVivaPublicationYearList]] {break}
				set graphymove 0.3
				set graphxsize 15.4
				set graphysize 5.8
				CreateDataSet [[CreateSequence [[llength $vivaPublicationYearList]] $firstSequenceItem $dxticks]] $numberOfThesisRecordsPerVivaPublicationYearList $numberOfThesisFullTextPerVivaPublicationYearList
			]]
			lappend dynamicList {thesisVivaPublicationYearBar.gle}
			lappend dynamicList "
				! size 15.4 7.4	! size of the paper
				size $graphxsize [[expr $graphysize * 0.92 + $graphymove]]

				set font ss lwidth 0.01
				set alabeldist .8

				barRed1 = $barRed1
				barGreen1 = $barGreen1
				barBlue1 = $barBlue1
				barRed2 = $barRed2
				barGreen2 = $barGreen2
				barBlue2 = $barBlue2

				include \"./color.gle\"
				! include \"barstyles.gle\"
				include \"./library.gle\"

				amove 0 $graphymove
				begin graph
					size $graphxsize $graphysize
					center
					data   \"thesisVivaPublicationYearBar.dat\"
					xtitle \"Ano de defesa ou publica\\c{c}\\~ao\"
					ytitle \"N\\'umero de itens\"
					xaxis min 0 max $xmax
					xnames $publicationYearList
					xticks off
					yaxis dticks $dyticks dsubticks $dyticks min 0 max $ymax
					x2axis off
					y2axis off
					xlabels hei $hei
					ylabels hei $hei
					bar d1,d2 width $barWidth dist [[expr $barWidth + 0.04]] style colormap1,colormap2
				end graph

				begin key
					justify bc
					absolute (pagewidth()/2) 0
					hei $hei
					nobox
					boxcolor clear
					fill rgb255($barRed1,$barGreen1,$barBlue1) text \"TDs defendidas - Total: $numberOfThesisRecordsPerVivaPublicationYear\"
					fill rgb255($barRed2,$barGreen2,$barBlue2) text \"TDs publicadas - Total: $numberOfThesisFullTextPerVivaPublicationYear\"
				end key
			"
			lappend dynamicList ${figureToBeUpdatedList}FigureDate.tex
			lappend dynamicList [[clock format [[clock seconds]] -format "%Y-%m-%d" ]]%
		}

# Figure 5
		if {[[lsearch $figureToBeUpdatedList referenceType]] != -1} {
			set totalNumberOfSearches [[expr $totalNumberOfSearches + [[llength $referenceTypeList]] * 2]]
			set numberOfRecordsPerReferenceType 0
			set numberOfFullTextPerReferenceType 0
			set dataList {}
			foreach referenceType $referenceTypeList {
				set searchExpression "$referenceTypeTable2($referenceType) and hostcollection, *"
				set number1 [[DisplayNumberOfEntries2 $searchExpression]]
#				lappend numberOfRecordsPerReferenceTypeList $number1
				incr numberOfRecordsPerReferenceType $number1
				set searchExpression "$referenceTypeTable2($referenceType) and size, * and hostcollection, *"
				set number2 [[DisplayNumberOfEntries2 $searchExpression]]
#				lappend numberOfFullTextPerReferenceTypeList $number2
				incr numberOfFullTextPerReferenceType $number2
				lappend dataList [[list $referenceType $number1 $number2]]
			}
			set dataList [[lsort -index 1 -decreasing -integer $dataList]]
			set referenceTypeList2 {}
			set numberOfRecordsPerReferenceTypeList2 {}
			set numberOfFullTextPerReferenceTypeList2 {}
			foreach data $dataList {
				lappend referenceTypeList2 [[lindex $data 0]]
				lappend numberOfRecordsPerReferenceTypeList2 [[lindex $data 1]]
				lappend numberOfFullTextPerReferenceTypeList2 [[lindex $data 2]]
			}
			lappend dynamicList {referenceTypeBar.dat}
			lappend dynamicList [[
				set dxticks 1.08	;# 9 bars
				set barWidth 0.40
#				foreach {firstSequenceItem xmax ymax dyticks} [[ComputeAxisParameters $dxticks $barWidth $referenceTypeList $numberOfRecordsPerReferenceTypeList]] {break}
				foreach {firstSequenceItem xmax ymax dyticks} [[ComputeAxisParameters $dxticks $barWidth $referenceTypeList2 $numberOfRecordsPerReferenceTypeList2]] {break}
				set graphymove 2.2
				set graphxsize 15.4
				set graphysize 5.6
#				CreateDataSet [[CreateSequence [[llength $referenceTypeList]] $firstSequenceItem $dxticks]] $numberOfRecordsPerReferenceTypeList $numberOfFullTextPerReferenceTypeList
				CreateDataSet [[CreateSequence [[llength $referenceTypeList2]] $firstSequenceItem $dxticks]] $numberOfRecordsPerReferenceTypeList2 $numberOfFullTextPerReferenceTypeList2
			]]
			lappend dynamicList {referenceTypeBar.gle}
			lappend dynamicList "
				! size 15.4 7.4	! size of the paper
				size $graphxsize [[expr $graphysize * 0.92 + $graphymove]]

				set font ss lwidth 0.01
				set alabeldist .8

				barRed1 = $barRed1
				barGreen1 = $barGreen1
				barBlue1 = $barBlue1
				barRed2 = $barRed2
				barGreen2 = $barGreen2
				barBlue2 = $barBlue2

				include \"./color.gle\"
				! include \"barstyles.gle\"
				include \"./library.gle\"

				amove 0 $graphymove
				begin graph
					size $graphxsize $graphysize
					center
					data   \"referenceTypeBar.dat\"
					xtitle \"Tipo de refer\\^encia\"
					ytitle \"N\\'umero de itens\"
					xaxis min 0 max $xmax
					xnames $referenceTypeList2
					xticks off
					yaxis dticks $dyticks dsubticks $dyticks min 0 max $ymax
					x2axis off
					y2axis off
					xlabels hei $hei
					ylabels hei $hei
					bar d1,d2 width $barWidth dist [[expr $barWidth + 0.04]] style colormap1,colormap2
				end graph

				begin key
					justify bc
					absolute -1.84+(pagewidth()/2) 0
					hei $hei
					nobox
					[[
						set lineList {}
						foreach referenceType $referenceTypeList2 {
							lappend lineList "text \"$referenceType\""
						}
						join $lineList \n
					]]
				end key

				begin key
					justify bc
					absolute -0.6+(pagewidth()/2) 0
					hei $hei
					nobox
					[[
						set lineList {}
						foreach referenceType $referenceTypeList2 {
							lappend lineList "text \"- $referenceTypeTable($referenceType)\""
						}
						join $lineList \n
					]]
				end key

				begin key
					justify bc
					!absolute 1.7+(pagewidth()/2) 0
					absolute 2.2+(pagewidth()/2) 0
					hei $hei
					nobox
					boxcolor clear
					fill rgb255($barRed1,$barGreen1,$barBlue1) text \"Registro - Total: $numberOfRecordsPerReferenceType\"
					fill rgb255($barRed2,$barGreen2,$barBlue2) text \"Texto completo - Total: $numberOfFullTextPerReferenceType\"
				end key
			"
			lappend dynamicList ${figureToBeUpdatedList}FigureDate.tex
			lappend dynamicList [[clock format [[clock seconds]] -format "%Y-%m-%d" ]]%
		}

# Figure 6
		if {[[lsearch $figureToBeUpdatedList currentYearReferenceType]] != -1} {
			set totalNumberOfSearches [[expr $totalNumberOfSearches + [[llength $referenceTypeList]] * 2]]
			set numberOfRecordsPerCurrentYearReferenceType 0
			set numberOfFullTextPerCurrentYearReferenceType 0
			set dataList {}
			foreach referenceType $referenceTypeList {
				set searchExpression "$referenceTypeTable2($referenceType) and repository */$currentYear/* and hostcollection, *"
				set number1 [[DisplayNumberOfEntries2 $searchExpression]]
#				lappend numberOfRecordsPerCurrentYearReferenceTypeList $number1
				incr numberOfRecordsPerCurrentYearReferenceType $number1
				set searchExpression "$referenceTypeTable2($referenceType) and repository */$currentYear/* and size, * and hostcollection, *"
				set number2 [[DisplayNumberOfEntries2 $searchExpression]]
#				lappend numberOfFullTextPerCurrentYearReferenceTypeList $number2
				incr numberOfFullTextPerCurrentYearReferenceType $number2
				lappend dataList [[list $referenceType $number1 $number2]]
			}
			set dataList [[lsort -index 1 -decreasing -integer $dataList]]
			set referenceTypeList2 {}
			set numberOfRecordsPerReferenceTypeList2 {}
			set numberOfFullTextPerReferenceTypeList2 {}
			foreach data $dataList {
				lappend referenceTypeList2 [[lindex $data 0]]
				lappend numberOfRecordsPerCurrentYearReferenceTypeList2 [[lindex $data 1]]
				lappend numberOfFullTextPerCurrentYearReferenceTypeList2 [[lindex $data 2]]
			}
			lappend dynamicList {currentYearReferenceTypeBar.dat}
			lappend dynamicList [[
				set dxticks 1.08	;# 9 bars
				set barWidth 0.40
				foreach {firstSequenceItem xmax ymax dyticks} [[ComputeAxisParameters $dxticks $barWidth $referenceTypeList2 $numberOfRecordsPerCurrentYearReferenceTypeList2]] {break}
				set graphymove 2.2
				set graphxsize 15.4
				set graphysize 5.6
				CreateDataSet [[CreateSequence [[llength $referenceTypeList2]] $firstSequenceItem $dxticks]] $numberOfRecordsPerCurrentYearReferenceTypeList2 $numberOfFullTextPerCurrentYearReferenceTypeList2
			]]
			lappend dynamicList {currentYearReferenceTypeBar.gle}
			lappend dynamicList "
				! size 15.4 7.4	! size of the paper
				size $graphxsize [[expr $graphysize * 0.92 + $graphymove]]

				set font ss lwidth 0.01
				set alabeldist .8

				barRed1 = $barRed1
				barGreen1 = $barGreen1
				barBlue1 = $barBlue1
				barRed2 = $barRed2
				barGreen2 = $barGreen2
				barBlue2 = $barBlue2

				include \"./color.gle\"
				! include \"barstyles.gle\"
				include \"./library.gle\"

				amove 0 $graphymove
				begin graph
					size $graphxsize $graphysize
					center
					data   \"currentYearReferenceTypeBar.dat\"
					xtitle \"Tipo de refer\\^encia\"
					ytitle \"N\\'umero de itens\"
					xaxis min 0 max $xmax
					xnames $referenceTypeList2
					xticks off
					yaxis dticks $dyticks dsubticks $dyticks min 0 max $ymax
					x2axis off
					y2axis off
					xlabels hei $hei
					ylabels hei $hei
					bar d1,d2 width $barWidth dist [[expr $barWidth + 0.04]] style colormap1,colormap2
				end graph

				begin key
					justify bc
					absolute -1.84+(pagewidth()/2) 0
					hei $hei
					nobox
					[[
						set lineList {}
						foreach referenceType $referenceTypeList2 {
							lappend lineList "text \"$referenceType\""
						}
						join $lineList \n
					]]
				end key

				begin key
					justify bc
					absolute -0.6+(pagewidth()/2) 0
					hei $hei
					nobox
					[[
						set lineList {}
						foreach referenceType $referenceTypeList2 {
							lappend lineList "text \"- $referenceTypeTable($referenceType)\""
						}
						join $lineList \n
					]]
				end key

				begin key
					justify bc
					!absolute 1.7+(pagewidth()/2) 0
					absolute 2.2+(pagewidth()/2) 0
					hei $hei
					nobox
					boxcolor clear
					fill rgb255($barRed1,$barGreen1,$barBlue1) text \"Registro - Total: $numberOfRecordsPerCurrentYearReferenceType\"
					fill rgb255($barRed2,$barGreen2,$barBlue2) text \"Texto completo - Total: $numberOfFullTextPerCurrentYearReferenceType\"
				end key
			"
			lappend dynamicList ${figureToBeUpdatedList}FigureDate.tex
			lappend dynamicList [[clock format [[clock seconds]] -format "%Y-%m-%d" ]]%
		}

# Figure 7
		if {[[lsearch $figureToBeUpdatedList accessYear]] != -1} {
#			set patternList {2001 2002 2003 2004 2005 2006 2007 2008 2009}
#			set patternList {2002 2003 2004 2005 2006 2007 2008 2009 2010}
#			set patternList {2003 2004 2005 2006 2007 2008 2009 2010 2011}
#			set patternList {2004 2005 2006 2007 2008 2009 2010 2011 2012}
#			set patternList {2005 2006 2007 2008 2009 2010 2011 2012 2013}
			set patternList $ingestYearList
#			set yearList {2001 2002 2003 2004 2005 2006 2007 2008 2009}
#			set yearList {2002 2003 2004 2005 2006 2007 2008 2009 2010}
#			set yearList {2003 2004 2005 2006 2007 2008 2009 2010 2011}
#			set yearList {2004 2005 2006 2007 2008 2009 2010 2011 2012}
#			set yearList {2005 2006 2007 2008 2009 2010 2011 2012 2013}
			set yearList $ingestYearList
			set histogram [[CreateAccessHistogram {sid.inpe.br/bibdigital@80/2006/04.07.15.50.13 sid.inpe.br/bibdigital@80/2006/11.11.23.17} $patternList $siteList]]
			set totalNumberOfAccess 0
			foreach access $histogram {
				incr totalNumberOfAccess $access
			}
			lappend dynamicList {accessYearBar.dat}
			lappend dynamicList [[
				set dxticks 0.50
				set barWidth 0.38

				foreach {firstSequenceItem xmax ymax dyticks} [[ComputeAxisParameters $dxticks $barWidth $yearList $histogram]] {break}
				set graphymove 0.0
				set graphxsize 7.6
				set graphysize 5.8
				CreateDataSet [[CreateSequence [[llength $yearList]] $firstSequenceItem $dxticks]] $histogram
			]]
			lappend dynamicList {accessYearBar.gle}
			lappend dynamicList "
				!size 5 5	! size of the paper
				size $graphxsize [[expr $graphysize * 0.92 + $graphymove]]

				set font ss lwidth 0.01
				set alabeldist .8

				barRed1 = $barRed1
				barGreen1 = $barGreen1
				barBlue1 = $barBlue1

				include \"./color.gle\"
				! include \"barstyles.gle\"
				include \"./library.gle\"

				amove 0 $graphymove
				begin graph
					size $graphxsize $graphysize
					center
					data   \"accessYearBar.dat\"
					!xtitle \"M\\^eses\"
					xtitle \"Ano\"
					ytitle \"N\\'umero de acessos\"
					xaxis min 0 max $xmax
					xnames $yearList
					xticks off
					yaxis dticks $dyticks dsubticks $dyticks min 0 max $ymax
					x2axis off
					y2axis off
					xlabels hei .16
					ylabels hei .16
					!bar d1,d2 width $barWidth dist [[expr $barWidth + 0.04]] style colormap1,colormap2
					bar d1 width $barWidth style colormap1
				end graph

				begin key
					justify bc
					absolute pagewidth()/2 0
					hei 0.16
					nobox
					boxcolor clear
					text \"N\\'umero total de acessos: $totalNumberOfAccess\"
				end key
			"
			lappend dynamicList ${figureToBeUpdatedList}FigureDate.tex
			lappend dynamicList [[clock format [[clock seconds]] -format "%Y-%m-%d" ]]%
		}

# Figure 8
		if {[[lsearch $figureToBeUpdatedList referenceTypeOfTheLastThreeYears]] != -1} {
			set totalNumberOfSearches [[expr $totalNumberOfSearches + [[llength $referenceTypeList]] * 2]]
			set numberOfRecordsPerReferenceType 0
			set numberOfFullTextPerReferenceType 0
			set dataList {}
			foreach referenceType $referenceTypeList {
				set searchExpression "$referenceTypeTable2($referenceType) and hostcollection, * and {year, 2017 or year, 2018 or year, 2019}"
				set number1 [[DisplayNumberOfEntries2 $searchExpression]]
#				lappend numberOfRecordsPerReferenceTypeList $number1
				incr numberOfRecordsPerReferenceType $number1
				set searchExpression "$referenceTypeTable2($referenceType) and size, * and hostcollection, * and {year, 2017 or year, 2018 or year, 2019}"
				set number2 [[DisplayNumberOfEntries2 $searchExpression]]
#				lappend numberOfFullTextPerReferenceTypeList $number2
				incr numberOfFullTextPerReferenceType $number2
				lappend dataList [[list $referenceType $number1 $number2]]
			}
			set dataList [[lsort -index 1 -decreasing -integer $dataList]]
			set referenceTypeList2 {}
			set numberOfRecordsPerReferenceTypeList2 {}
			set numberOfFullTextPerReferenceTypeList2 {}
			foreach data $dataList {
				lappend referenceTypeList2 [[lindex $data 0]]
				lappend numberOfRecordsPerReferenceTypeList2 [[lindex $data 1]]
				lappend numberOfFullTextPerReferenceTypeList2 [[lindex $data 2]]
			}
			lappend dynamicList {referenceTypeOfTheLastThreeYearsBar.dat}
			lappend dynamicList [[
				set dxticks 1.08	;# 9 bars
				set barWidth 0.40
#				foreach {firstSequenceItem xmax ymax dyticks} [[ComputeAxisParameters $dxticks $barWidth $referenceTypeList $numberOfRecordsPerReferenceTypeList]] {break}
				foreach {firstSequenceItem xmax ymax dyticks} [[ComputeAxisParameters $dxticks $barWidth $referenceTypeList2 $numberOfRecordsPerReferenceTypeList2]] {break}
				set graphymove 2.2
				set graphxsize 15.4
				set graphysize 5.6
#				CreateDataSet [[CreateSequence [[llength $referenceTypeList]] $firstSequenceItem $dxticks]] $numberOfRecordsPerReferenceTypeList $numberOfFullTextPerReferenceTypeList
				CreateDataSet [[CreateSequence [[llength $referenceTypeList2]] $firstSequenceItem $dxticks]] $numberOfRecordsPerReferenceTypeList2 $numberOfFullTextPerReferenceTypeList2
			]]
			lappend dynamicList {referenceTypeOfTheLastThreeYearsBar.gle}
			lappend dynamicList "
				! size 15.4 7.4	! size of the paper
				size $graphxsize [[expr $graphysize * 0.92 + $graphymove]]

				set font ss lwidth 0.01
				set alabeldist .8

				barRed1 = $barRed1
				barGreen1 = $barGreen1
				barBlue1 = $barBlue1
				barRed2 = $barRed2
				barGreen2 = $barGreen2
				barBlue2 = $barBlue2

				include \"./color.gle\"
				! include \"barstyles.gle\"
				include \"./library.gle\"

				amove 0 $graphymove
				begin graph
					size $graphxsize $graphysize
					center
					data   \"referenceTypeOfTheLastThreeYearsBar.dat\"
					xtitle \"Tipo de refer\\^encia\"
					ytitle \"N\\'umero de itens\"
					xaxis min 0 max $xmax
					xnames $referenceTypeList2
					xticks off
					yaxis dticks $dyticks dsubticks $dyticks min 0 max $ymax
					x2axis off
					y2axis off
					xlabels hei $hei
					ylabels hei $hei
					bar d1,d2 width $barWidth dist [[expr $barWidth + 0.04]] style colormap1,colormap2
				end graph

				begin key
					justify bc
					absolute -1.84+(pagewidth()/2) 0
					hei $hei
					nobox
					[[
						set lineList {}
						foreach referenceType $referenceTypeList2 {
							lappend lineList "text \"$referenceType\""
						}
						join $lineList \n
					]]
				end key

				begin key
					justify bc
					absolute -0.6+(pagewidth()/2) 0
					hei $hei
					nobox
					[[
						set lineList {}
						foreach referenceType $referenceTypeList2 {
							lappend lineList "text \"- $referenceTypeTable($referenceType)\""
						}
						join $lineList \n
					]]
				end key

				begin key
					justify bc
					!absolute 1.7+(pagewidth()/2) 0
					absolute 2.2+(pagewidth()/2) 0
					hei $hei
					nobox
					boxcolor clear
					fill rgb255($barRed1,$barGreen1,$barBlue1) text \"Registro - Total: $numberOfRecordsPerReferenceType\"
					fill rgb255($barRed2,$barGreen2,$barBlue2) text \"Texto completo - Total: $numberOfFullTextPerReferenceType\"
				end key
			"
			lappend dynamicList ${figureToBeUpdatedList}FigureDate.tex
			lappend dynamicList [[clock format [[clock seconds]] -format "%Y-%m-%d" ]]%
		}

# Figure 9
		if {[[lsearch $figureToBeUpdatedList publicationYearDuringTheLastThreeYears]] != -1} {
			set totalNumberOfSearches [[expr $totalNumberOfSearches + [[llength $publicationThreeYearList]] * 2]]
			set numberOfRecordsPerPublicationYear 0
			set numberOfRecordsPerPublicationYearList {}
			set numberOfFullTextPerPublicationYear 0
			set numberOfFullTextPerPublicationYearList {}
			foreach publicationYear $publicationThreeYearList {
				set searchExpression "repository, */$publicationYear/* and year, $publicationYear and hostcollection, *"
				set number [[DisplayNumberOfEntries2 $searchExpression]]
				lappend numberOfRecordsPerPublicationYearList $number
				incr numberOfRecordsPerPublicationYear $number
				set searchExpression "repository, */$publicationYear/* and year, $publicationYear and size, * and hostcollection, *"
				set number [[DisplayNumberOfEntries2 $searchExpression]]
				lappend numberOfFullTextPerPublicationYearList $number
				incr numberOfFullTextPerPublicationYear $number
			}
			lappend dynamicList {publicationYearDuringTheLastThreeYearsBar.dat}
			lappend dynamicList [[
				set dxticks 1.08	;# 9 bars
				set barWidth 0.40
				foreach {firstSequenceItem xmax ymax dyticks} [[ComputeAxisParameters $dxticks $barWidth $publicationThreeYearList $numberOfRecordsPerPublicationYearList]] {break}
				set graphymove 0.3
				set graphxsize 15.4
				set graphysize 5.8
				CreateDataSet [[CreateSequence [[llength $publicationThreeYearList]] $firstSequenceItem $dxticks]] $numberOfRecordsPerPublicationYearList $numberOfFullTextPerPublicationYearList
			]]
			lappend dynamicList {publicationYearDuringTheLastThreeYearsBar.gle}
			lappend dynamicList "
				! size 15.4 6.0	! size of the paper
				size $graphxsize [[expr $graphysize * 0.92 + $graphymove]]

				set font ss lwidth 0.01
				set alabeldist .8

				barRed1 = $barRed1
				barGreen1 = $barGreen1
				barBlue1 = $barBlue1
				barRed2 = $barRed2
				barGreen2 = $barGreen2
				barBlue2 = $barBlue2

				include \"./color.gle\"
				! include \"barstyles.gle\"
				include \"./library.gle\"

				amove 0 $graphymove
				begin graph
					size $graphxsize $graphysize
					center
					data   \"publicationYearDuringTheLastThreeYearsBar.dat\"
					xtitle \"Ano de publica\\c{c}\\~ao\"
					ytitle \"N\\'umero de itens\"
					xaxis min 0 max $xmax
					xnames $publicationThreeYearList
					xticks off
					yaxis dticks $dyticks dsubticks $dyticks min 0 max $ymax
					x2axis off
					y2axis off
					xlabels hei $hei
					ylabels hei $hei
					bar d1,d2 width $barWidth dist [[expr $barWidth + 0.04]] style colormap1,colormap2
				end graph

				begin key
					justify bc
					absolute (pagewidth()/2) 0
					hei $hei
					nobox
					boxcolor clear
					fill rgb255($barRed1,$barGreen1,$barBlue1) text \"Registro - Total: $numberOfRecordsPerPublicationYear\"
					fill rgb255($barRed2,$barGreen2,$barBlue2) text \"Texto completo - Total: $numberOfFullTextPerPublicationYear\"
				end key
			"
			lappend dynamicList ${figureToBeUpdatedList}FigureDate.tex
			lappend dynamicList [[clock format [[clock seconds]] -format "%Y-%m-%d" ]]%
		}

# Figure 10
		if {[[lsearch $figureToBeUpdatedList accessYearOfTheLastThreeYears]] != -1} {
			set patternList $publicationThreeYearList
			set yearList $patternList
			set histogram [[CreateAccessHistogram {sid.inpe.br/bibdigital@80/2006/04.07.15.50.13 sid.inpe.br/bibdigital@80/2006/11.11.23.17} $patternList $siteList]]
			set totalNumberOfAccess 0
			foreach access $histogram {
				incr totalNumberOfAccess $access
			}
			lappend dynamicList {accessYearOfTheLastThreeYearsBar.dat}
			lappend dynamicList [[
				set dxticks 0.50
				set barWidth 0.38

				foreach {firstSequenceItem xmax ymax dyticks} [[ComputeAxisParameters $dxticks $barWidth $yearList $histogram]] {break}
				set graphymove 0.0
				set graphxsize 7.6
				set graphysize 5.8
				CreateDataSet [[CreateSequence [[llength $yearList]] $firstSequenceItem $dxticks]] $histogram
			]]
			lappend dynamicList {accessYearOfTheLastThreeYearsBar.gle}
			lappend dynamicList "
				!size 5 5	! size of the paper
				size $graphxsize [[expr $graphysize * 0.92 + $graphymove]]

				set font ss lwidth 0.01
				set alabeldist .8

				barRed1 = $barRed1
				barGreen1 = $barGreen1
				barBlue1 = $barBlue1

				include \"./color.gle\"
				! include \"barstyles.gle\"
				include \"./library.gle\"

				amove 0 $graphymove
				begin graph
					size $graphxsize $graphysize
					center
					data   \"accessYearOfTheLastThreeYearsBar.dat\"
					!xtitle \"M\\^eses\"
					xtitle \"Ano\"
					ytitle \"N\\'umero de acessos\"
					xaxis min 0 max $xmax
					xnames $yearList
					xticks off
					yaxis dticks $dyticks dsubticks $dyticks min 0 max $ymax
					x2axis off
					y2axis off
					xlabels hei .16
					ylabels hei .16
					!bar d1,d2 width $barWidth dist [[expr $barWidth + 0.04]] style colormap1,colormap2
					bar d1 width $barWidth style colormap1
				end graph

				begin key
					justify bc
					absolute pagewidth()/2 0
					hei 0.16
					nobox
					boxcolor clear
					text \"N\\'umero total de acessos: $totalNumberOfAccess\"
				end key
			"
			lappend dynamicList ${figureToBeUpdatedList}FigureDate.tex
			lappend dynamicList [[clock format [[clock seconds]] -format "%Y-%m-%d" ]]%
		}

# Figure 11
		if {[[lsearch $figureToBeUpdatedList journalPublicationYear]] != -1} {
			set totalNumberOfSearches [[expr $totalNumberOfSearches + [[llength $publicationYearList]] * 2]]
			set numberOfJournalPerPublicationYear 0
			set numberOfJournalPerPublicationYearList {}
			set numberOfJournalFullTextPerPublicationYear 0
			set numberOfJournalFullTextPerPublicationYearList {}
			foreach publicationYear $publicationYearList {
				set searchExpression "ref journal and year, $publicationYear"
				set number [[DisplayNumberOfEntries2 $searchExpression]]
				lappend numberOfJournalPerPublicationYearList $number
				incr numberOfJournalPerPublicationYear $number
				set searchExpression "ref journal and year, $publicationYear and size, *"
				set number [[DisplayNumberOfEntries2 $searchExpression]]
				lappend numberOfJournalFullTextPerPublicationYearList $number
				incr numberOfJournalFullTextPerPublicationYear $number
			}
			lappend dynamicList {journalPublicationYearBar.dat}
			lappend dynamicList [[
				set dxticks 1.08	;# 9 bars
				set barWidth 0.40
				foreach {firstSequenceItem xmax ymax dyticks} [[ComputeAxisParameters $dxticks $barWidth $publicationYearList $numberOfJournalPerPublicationYearList]] {break}
				set graphymove 0.3
				set graphxsize 15.4
				set graphysize 5.8
				CreateDataSet [[CreateSequence [[llength $publicationYearList]] $firstSequenceItem $dxticks]] $numberOfJournalPerPublicationYearList $numberOfJournalFullTextPerPublicationYearList
			]]
			lappend dynamicList {journalPublicationYearBar.gle}
			lappend dynamicList "
				! size 15.4 6.0	! size of the paper
				size $graphxsize [[expr $graphysize * 0.92 + $graphymove]]

				set font ss lwidth 0.01
				set alabeldist .8

				barRed1 = $barRed1
				barGreen1 = $barGreen1
				barBlue1 = $barBlue1
				barRed2 = $barRed2
				barGreen2 = $barGreen2
				barBlue2 = $barBlue2

				include \"./color.gle\"
				! include \"barstyles.gle\"
				include \"./library.gle\"

				amove 0 $graphymove
				begin graph
					size $graphxsize $graphysize
					center
					data   \"journalPublicationYearBar.dat\"
					xtitle \"Ano de publica\\c{c}\\~ao\"
					ytitle \"N\\'umero de itens\"
					xaxis min 0 max $xmax
					xnames $publicationYearList
					xticks off
					yaxis dticks $dyticks dsubticks $dyticks min 0 max $ymax
					x2axis off
					y2axis off
					xlabels hei $hei
					ylabels hei $hei
					bar d1,d2 width $barWidth dist [[expr $barWidth + 0.04]] style colormap1,colormap2
				end graph

				begin key
					justify bc
					absolute (pagewidth()/2) 0
					hei $hei
					nobox
					boxcolor clear
					fill rgb255($barRed1,$barGreen1,$barBlue1) text \"Registro - Total: $numberOfJournalPerPublicationYear\"
					fill rgb255($barRed2,$barGreen2,$barBlue2) text \"Texto completo - Total: $numberOfJournalFullTextPerPublicationYear\"
				end key
			"
			lappend dynamicList ${figureToBeUpdatedList}FigureDate.tex
			lappend dynamicList [[clock format [[clock seconds]] -format "%Y-%m-%d" ]]%
		}

# Figure 12
		if {[[lsearch $figureToBeUpdatedList conferencePublicationYear]] != -1} {
			set totalNumberOfSearches [[expr $totalNumberOfSearches + [[llength $publicationYearList]] * 2]]
			set numberOfConferencePerPublicationYear 0
			set numberOfConferencePerPublicationYearList {}
			set numberOfConferenceFullTextPerPublicationYear 0
			set numberOfConferenceFullTextPerPublicationYearList {}
			foreach publicationYear $publicationYearList {
				set searchExpression "ref conference and not ref audio* and year, $publicationYear"
				set number [[DisplayNumberOfEntries2 $searchExpression]]
				lappend numberOfConferencePerPublicationYearList $number
				incr numberOfConferencePerPublicationYear $number
				set searchExpression "ref conference and not ref audio* and year, $publicationYear and size, *"
				set number [[DisplayNumberOfEntries2 $searchExpression]]
				lappend numberOfConferenceFullTextPerPublicationYearList $number
				incr numberOfConferenceFullTextPerPublicationYear $number
			}
			lappend dynamicList {conferencePublicationYearBar.dat}
			lappend dynamicList [[
				set dxticks 1.08	;# 9 bars
				set barWidth 0.40
				foreach {firstSequenceItem xmax ymax dyticks} [[ComputeAxisParameters $dxticks $barWidth $publicationYearList $numberOfConferencePerPublicationYearList]] {break}
				set graphymove 0.3
				set graphxsize 15.4
				set graphysize 5.8
				CreateDataSet [[CreateSequence [[llength $publicationYearList]] $firstSequenceItem $dxticks]] $numberOfConferencePerPublicationYearList $numberOfConferenceFullTextPerPublicationYearList
			]]
			lappend dynamicList {conferencePublicationYearBar.gle}
			lappend dynamicList "
				! size 15.4 6.0	! size of the paper
				size $graphxsize [[expr $graphysize * 0.92 + $graphymove]]

				set font ss lwidth 0.01
				set alabeldist .8

				barRed1 = $barRed1
				barGreen1 = $barGreen1
				barBlue1 = $barBlue1
				barRed2 = $barRed2
				barGreen2 = $barGreen2
				barBlue2 = $barBlue2

				include \"./color.gle\"
				! include \"barstyles.gle\"
				include \"./library.gle\"

				amove 0 $graphymove
				begin graph
					size $graphxsize $graphysize
					center
					data   \"conferencePublicationYearBar.dat\"
					xtitle \"Ano de publica\\c{c}\\~ao\"
					ytitle \"N\\'umero de itens\"
					xaxis min 0 max $xmax
					xnames $publicationYearList
					xticks off
					yaxis dticks $dyticks dsubticks $dyticks min 0 max $ymax
					x2axis off
					y2axis off
					xlabels hei $hei
					ylabels hei $hei
					bar d1,d2 width $barWidth dist [[expr $barWidth + 0.04]] style colormap1,colormap2
				end graph

				begin key
					justify bc
					absolute (pagewidth()/2) 0
					hei $hei
					nobox
					boxcolor clear
					fill rgb255($barRed1,$barGreen1,$barBlue1) text \"Registro - Total: $numberOfConferencePerPublicationYear\"
					fill rgb255($barRed2,$barGreen2,$barBlue2) text \"Texto completo - Total: $numberOfConferenceFullTextPerPublicationYear\"
				end key
			"
			lappend dynamicList ${figureToBeUpdatedList}FigureDate.tex
			lappend dynamicList [[clock format [[clock seconds]] -format "%Y-%m-%d" ]]%
		}

# Figure 13
		if {[[lsearch $figureToBeUpdatedList bookSectionPublicationYear]] != -1} {
			set totalNumberOfSearches [[expr $totalNumberOfSearches + [[llength $publicationYearList]] * 2]]
			set numberOfBookSectionPerPublicationYear 0
			set numberOfBookSectionPerPublicationYearList {}
			set numberOfBookSectionFullTextPerPublicationYear 0
			set numberOfBookSectionFullTextPerPublicationYearList {}
			foreach publicationYear $publicationYearList {
				set searchExpression "ref book section and year, $publicationYear"
#				set searchExpression "secondaryt PUD or secondaryt NTC or secondaryt MAN or secondaryt RDP or secondaryt RPQ or type RPQ and year, $publicationYear"
				set number [[DisplayNumberOfEntries2 $searchExpression]]
				lappend numberOfBookSectionPerPublicationYearList $number
				incr numberOfBookSectionPerPublicationYear $number
#				set searchExpression "secondaryt PUD or secondaryt NTC or secondaryt MAN or secondaryt RDP or secondaryt RPQ or type RPQ and year, $publicationYear and size, *"
				set searchExpression "ref book section and year, $publicationYear and size, *"
				set number [[DisplayNumberOfEntries2 $searchExpression]]
				lappend numberOfBookSectionFullTextPerPublicationYearList $number
				incr numberOfBookSectionFullTextPerPublicationYear $number
			}
			lappend dynamicList {bookSectionPublicationYearBar.dat}
			lappend dynamicList [[
				set dxticks 1.08	;# 9 bars
				set barWidth 0.40
				foreach {firstSequenceItem xmax ymax dyticks} [[ComputeAxisParameters $dxticks $barWidth $publicationYearList $numberOfBookSectionPerPublicationYearList]] {break}
				set graphymove 0.3
				set graphxsize 15.4
				set graphysize 5.8
				CreateDataSet [[CreateSequence [[llength $publicationYearList]] $firstSequenceItem $dxticks]] $numberOfBookSectionPerPublicationYearList $numberOfBookSectionFullTextPerPublicationYearList
			]]
			lappend dynamicList {bookSectionPublicationYearBar.gle}
			lappend dynamicList "
				! size 15.4 6.0	! size of the paper
				size $graphxsize [[expr $graphysize * 0.92 + $graphymove]]

				set font ss lwidth 0.01
				set alabeldist .8

				barRed1 = $barRed1
				barGreen1 = $barGreen1
				barBlue1 = $barBlue1
				barRed2 = $barRed2
				barGreen2 = $barGreen2
				barBlue2 = $barBlue2

				include \"./color.gle\"
				! include \"barstyles.gle\"
				include \"./library.gle\"

				amove 0 $graphymove
				begin graph
					size $graphxsize $graphysize
					center
					data   \"bookSectionPublicationYearBar.dat\"
					xtitle \"Ano de publica\\c{c}\\~ao\"
					ytitle \"N\\'umero de itens\"
					xaxis min 0 max $xmax
					xnames $publicationYearList
					xticks off
					yaxis dticks $dyticks dsubticks $dyticks min 0 max $ymax
					x2axis off
					y2axis off
					xlabels hei $hei
					ylabels hei $hei
					bar d1,d2 width $barWidth dist [[expr $barWidth + 0.04]] style colormap1,colormap2
				end graph

				begin key
					justify bc
					absolute (pagewidth()/2) 0
					hei $hei
					nobox
					boxcolor clear
					fill rgb255($barRed1,$barGreen1,$barBlue1) text \"Registro - Total: $numberOfBookSectionPerPublicationYear\"
					fill rgb255($barRed2,$barGreen2,$barBlue2) text \"Texto completo - Total: $numberOfBookSectionFullTextPerPublicationYear\"
				end key
			"
			lappend dynamicList ${figureToBeUpdatedList}FigureDate.tex
			lappend dynamicList [[clock format [[clock seconds]] -format "%Y-%m-%d" ]]%
		}

# Figure 14
		if {[[lsearch $figureToBeUpdatedList reportPublicationYear]] != -1} {
			set totalNumberOfSearches [[expr $totalNumberOfSearches + [[llength $publicationYearList]] * 2]]
			set numberOfReportPerPublicationYear 0
			set numberOfReportPerPublicationYearList {}
			set numberOfReportFullTextPerPublicationYear 0
			set numberOfReportFullTextPerPublicationYearList {}
			foreach publicationYear $publicationYearList {
				set searchExpression "secondaryt PUD or secondaryt NTC or secondaryt MAN or secondaryt RDP or secondaryt RPQ or type RPQ and year, $publicationYear"
				set number [[DisplayNumberOfEntries2 $searchExpression]]
				lappend numberOfReportPerPublicationYearList $number
				incr numberOfReportPerPublicationYear $number
				set searchExpression "secondaryt PUD or secondaryt NTC or secondaryt MAN or secondaryt RDP or secondaryt RPQ or type RPQ and year, $publicationYear and size, *"
				set number [[DisplayNumberOfEntries2 $searchExpression]]
				lappend numberOfReportFullTextPerPublicationYearList $number
				incr numberOfReportFullTextPerPublicationYear $number
			}
			lappend dynamicList {reportPublicationYearBar.dat}
			lappend dynamicList [[
				set dxticks 1.08	;# 9 bars
				set barWidth 0.40
				foreach {firstSequenceItem xmax ymax dyticks} [[ComputeAxisParameters $dxticks $barWidth $publicationYearList $numberOfReportPerPublicationYearList]] {break}
				set graphymove 0.3
				set graphxsize 15.4
				set graphysize 5.8
				CreateDataSet [[CreateSequence [[llength $publicationYearList]] $firstSequenceItem $dxticks]] $numberOfReportPerPublicationYearList $numberOfReportFullTextPerPublicationYearList
			]]
			lappend dynamicList {reportPublicationYearBar.gle}
			lappend dynamicList "
				! size 15.4 6.0	! size of the paper
				size $graphxsize [[expr $graphysize * 0.92 + $graphymove]]

				set font ss lwidth 0.01
				set alabeldist .8

				barRed1 = $barRed1
				barGreen1 = $barGreen1
				barBlue1 = $barBlue1
				barRed2 = $barRed2
				barGreen2 = $barGreen2
				barBlue2 = $barBlue2

				include \"./color.gle\"
				! include \"barstyles.gle\"
				include \"./library.gle\"

				amove 0 $graphymove
				begin graph
					size $graphxsize $graphysize
					center
					data   \"reportPublicationYearBar.dat\"
					xtitle \"Ano de publica\\c{c}\\~ao\"
					ytitle \"N\\'umero de itens\"
					xaxis min 0 max $xmax
					xnames $publicationYearList
					xticks off
					yaxis dticks $dyticks dsubticks $dyticks min 0 max $ymax
					x2axis off
					y2axis off
					xlabels hei $hei
					ylabels hei $hei
					bar d1,d2 width $barWidth dist [[expr $barWidth + 0.04]] style colormap1,colormap2
				end graph

				begin key
					justify bc
					absolute (pagewidth()/2) 0
					hei $hei
					nobox
					boxcolor clear
					fill rgb255($barRed1,$barGreen1,$barBlue1) text \"Registro - Total: $numberOfReportPerPublicationYear\"
					fill rgb255($barRed2,$barGreen2,$barBlue2) text \"Texto completo - Total: $numberOfReportFullTextPerPublicationYear\"
				end key
			"
			lappend dynamicList ${figureToBeUpdatedList}FigureDate.tex
			lappend dynamicList [[clock format [[clock seconds]] -format "%Y-%m-%d" ]]%
		}

# Figure 15
		if {[[lsearch $figureToBeUpdatedList ePrintIngestYear]] != -1} {
			set totalNumberOfSearches [[expr $totalNumberOfSearches + [[llength $ingestYearList]] * 2]]
			set numberOfEPrintRecordsPerIngestYear 0
			set numberOfEPrintFullTextPerIngestYear 0
			foreach ingestYear $ingestYearList {
				set searchExpression "ref Source and repository, */$ingestYear/*"
				set number [[DisplayNumberOfEntries2 $searchExpression]]
				lappend numberOfEPrintRecordsPerIngestYearList $number
				incr numberOfEPrintRecordsPerIngestYear $number
				set searchExpression "ref Source and repository, */$ingestYear/* and size, *"
				set number [[DisplayNumberOfEntries2 $searchExpression]]
				lappend numberOfEPrintFullTextPerIngestYearList $number
				incr numberOfEPrintFullTextPerIngestYear $number
			}
			lappend dynamicList {ePrintIngestYearBar.dat}
			lappend dynamicList [[
				set dxticks 1.08	;# 9 bars
				set barWidth 0.40
				foreach {firstSequenceItem xmax ymax dyticks} [[ComputeAxisParameters $dxticks $barWidth $ingestYearList $numberOfEPrintRecordsPerIngestYearList]] {break}
				set graphymove 0.3
				set graphxsize 15.4
				set graphysize 5.8
				CreateDataSet [[CreateSequence [[llength $ingestYearList]] $firstSequenceItem $dxticks]] $numberOfEPrintRecordsPerIngestYearList $numberOfEPrintFullTextPerIngestYearList
			]]
			lappend dynamicList {ePrintIngestYearBar.gle}
			lappend dynamicList "
				! size 15.4 6.0	! size of the paper
				size $graphxsize [[expr $graphysize * 0.92 + $graphymove]]

				set font ss lwidth 0.01
				set alabeldist .8

				barRed1 = $barRed1
				barGreen1 = $barGreen1
				barBlue1 = $barBlue1
				barRed2 = $barRed2
				barGreen2 = $barGreen2
				barBlue2 = $barBlue2

				include \"./color.gle\"
				! include \"barstyles.gle\"
				include \"./library.gle\"

				amove 0 $graphymove
				begin graph
					size $graphxsize $graphysize
					center
					data   \"ePrintIngestYearBar.dat\"
					xtitle \"Ano de inser\\c{c}\\~ao\"
					ytitle \"N\\'umero de itens\"
					xaxis min 0 max $xmax
					xnames $ingestYearList
					xticks off
					yaxis dticks $dyticks dsubticks $dyticks min 0 max $ymax
					x2axis off
					y2axis off
					xlabels hei $hei
					ylabels hei $hei
					bar d1,d2 width $barWidth dist [[expr $barWidth + 0.04]] style colormap1,colormap2
				end graph

				begin key
					justify bc
					absolute (pagewidth()/2) 0
					hei $hei
					nobox
					boxcolor clear
					fill rgb255($barRed1,$barGreen1,$barBlue1) text \"Registro - Total: $numberOfEPrintRecordsPerIngestYear\"
					fill rgb255($barRed2,$barGreen2,$barBlue2) text \"Texto completo - Total: $numberOfEPrintFullTextPerIngestYear\"
				end key
			"
			lappend dynamicList ${figureToBeUpdatedList}FigureDate.tex
			lappend dynamicList [[clock format [[clock seconds]] -format "%Y-%m-%d" ]]%
		}

# Figure 16
		if {[[lsearch $figureToBeUpdatedList newspaperIngestYear]] != -1} {
			set totalNumberOfSearches [[expr $totalNumberOfSearches + [[llength $ingestYearList]] * 2]]
			set numberOfNewspaperRecordsPerIngestYear 0
			set numberOfNewspaperFullTextPerIngestYear 0
			foreach ingestYear $ingestYearList {
				set searchExpression "ref Newspaper and repository, */$ingestYear/*"
				set number [[DisplayNumberOfEntries2 $searchExpression]]
				lappend numberOfNewspaperRecordsPerIngestYearList $number
				incr numberOfNewspaperRecordsPerIngestYear $number
				set searchExpression "ref Newspaper and repository, */$ingestYear/* and size, *"
				set number [[DisplayNumberOfEntries2 $searchExpression]]
				lappend numberOfNewspaperFullTextPerIngestYearList $number
				incr numberOfNewspaperFullTextPerIngestYear $number
			}
			lappend dynamicList {newspaperIngestYearBar.dat}
			lappend dynamicList [[
				set dxticks 1.08	;# 9 bars
				set barWidth 0.40
				foreach {firstSequenceItem xmax ymax dyticks} [[ComputeAxisParameters $dxticks $barWidth $ingestYearList $numberOfNewspaperRecordsPerIngestYearList]] {break}
				set graphymove 0.3
				set graphxsize 15.4
				set graphysize 5.8
				CreateDataSet [[CreateSequence [[llength $ingestYearList]] $firstSequenceItem $dxticks]] $numberOfNewspaperRecordsPerIngestYearList $numberOfNewspaperFullTextPerIngestYearList
			]]
			lappend dynamicList {newspaperIngestYearBar.gle}
			lappend dynamicList "
				! size 15.4 6.0	! size of the paper
				size $graphxsize [[expr $graphysize * 0.92 + $graphymove]]

				set font ss lwidth 0.01
				set alabeldist .8

				barRed1 = $barRed1
				barGreen1 = $barGreen1
				barBlue1 = $barBlue1
				barRed2 = $barRed2
				barGreen2 = $barGreen2
				barBlue2 = $barBlue2

				include \"./color.gle\"
				! include \"barstyles.gle\"
				include \"./library.gle\"

				amove 0 $graphymove
				begin graph
					size $graphxsize $graphysize
					center
					data   \"newspaperIngestYearBar.dat\"
					xtitle \"Ano de inser\\c{c}\\~ao\"
					ytitle \"N\\'umero de itens\"
					xaxis min 0 max $xmax
					xnames $ingestYearList
					xticks off
					yaxis dticks $dyticks dsubticks $dyticks min 0 max $ymax
					x2axis off
					y2axis off
					xlabels hei $hei
					ylabels hei $hei
					bar d1,d2 width $barWidth dist [[expr $barWidth + 0.04]] style colormap1,colormap2
				end graph

				begin key
					justify bc
					absolute (pagewidth()/2) 0
					hei $hei
					nobox
					boxcolor clear
					fill rgb255($barRed1,$barGreen1,$barBlue1) text \"Registro - Total: $numberOfNewspaperRecordsPerIngestYear\"
					fill rgb255($barRed2,$barGreen2,$barBlue2) text \"Texto completo - Total: $numberOfNewspaperFullTextPerIngestYear\"
				end key
			"
			lappend dynamicList ${figureToBeUpdatedList}FigureDate.tex
			lappend dynamicList [[clock format [[clock seconds]] -format "%Y-%m-%d" ]]%
		}

		set dynamicList
	]]
}