Subversion Repositories wimsdev

# Variable calculations should be done in this file.

# It is read and interpreted by wims for all valid calls to the module.

!read adm/language names.phtml

!default type=uniq

!default reflim=100

!default search=yes

key=!trim $key

!if $style notwordof day week month year beginning

 style=

!endif

!default style=month

!if $reflim>300

 reflim=300

!endif

!if $reflim<10

 reflim=10

!endif

!if $cmd=new or $cmd=renew

 sitestart=!mexec getstart.sh

!endif

start_year=!char 1,2,3,4 of $sitestart

start_month=!char 5,6 of $sitestart

start_day=!char 7,8 of $sitestart

insplot_set=timefmt "%Y%m%d"; xdata time; nomxtics; nox2tics; size 0.7

insplot_transparent=white

!if $cmd=reply

 show=yes

 !read date

 !if $date1<$start_year$start_month$start_day

  date1=$start_year$start_month$start_day

 !endif

 ref=!mexec refcnt.sh $type $date1 $date2

 auto=!word 1 of $ref

 ref=!line 2 to -1 of $ref

 wims_module_log=$cnt $style $type

!endif

!for i in 1,2

 year$i=!char 1 to 4 of $(date$i)

 month$i=!char 5,6 of $(date$i)

 day$i=!char 7,8 of $(date$i)

 date_$i=!date -d $(date$i) '+%j'

!next i

laps=!eval ($year2-$year1)*365+$date_2-$date_1+1

!ifval floor($year1/4)<floor($year2/4) and floor($year1/100)=floor($year2/100)

 laps=!eval $laps+1

!endif