my $dtopt= DateCalc($dt1,$dt2,0); ##

##

my $dtopt= DateCalc($dt1,$dt2,1);

##

##

my $dtopt= DateCalc($dt1,$dt2,2);

##

##

my $dtopt= DateCalc($dt1,$dt2,3);