\* ------------------------------------------------------------------
\* STN Express Script
\* Name:  multi01.sc
\* Function: Time restricted multifile search with duplicate remove
\* Author:  Andreas Litscher, InfoLit Infobroker GmbH, CH-Bern
\* Date:  19.12.2007
\* ------------------------------------------------------------------

capture off <>

=> set plural on
echo ""
echo "Type in the first date in ISO-Format"
echo "e.g. 20070801"
get _datum

=> del his y;del exp y
=> index medline embase biosis caplus inspec compendex
=> set detail on
=> s fetal(2a)(disease or surgery) and up=>_datum \> _lnum1
capture on
=> set detail off

=> file hit
=> s _lnum1 \> _lnum2
=> set duporder file
=> dup rem _lnum2

=> d ti from each
=> d his
capture off <>

=> file stnguide
\* ------------------------------------------------------------------