2110 if (
present(var))
then
2111 dbafilter_init%var=var
2112 else if (nopreserve)
then
2113 dbafilter_init%var=cmiss
2116 if (
present(datetime))
then
2117 dbafilter_init%datetime=datetime
2118 else if (nopreserve)
then
2119 dbafilter_init%datetime=dbadatetime()
2122 if (
present(level))
then
2123 dbafilter_init%level=level
2124 else if (nopreserve)
then
2125 dbafilter_init%level=dbalevel()
2128 if (
present(timerange))
then
2129 dbafilter_init%timerange=timerange
2130 else if (nopreserve)
then
2131 dbafilter_init%timerange=dbatimerange()
2134 if (
present(network))
then
2135 dbafilter_init%network=network
2136 else if (nopreserve)
then
2137 dbafilter_init%network=dbanetwork()
2140 if (
present(datetimemin))
then
2141 dbafilter_init%datetimemin=datetimemin