2858type(dbafilter),intent(in),optional :: filter
2859
2860type(dbametaanddatab) :: element
2861
2862if (session%memdb .and. .not. session%loadfile)then
2863
2864 do while (session%messages_read_next())
2865 call session%set(filter=filter)
2866 call session%ingest_metaanddatab()
2867 call session%ingest_metaanddatab(element)