Check several directories for files

Post by **Marcus Tettmar** » Sun Nov 15, 1998 12:00 am

Contributed By: John R. Logue [email protected]
Submitted On: 15/11/98

IfFileExists>G:+Tax ResearchCourtsDownloadAppeals1st_cir*.?*,yes1
Let>v1=
Goto>no1
Label>yes1
Let>v1=1st,
Label>no1
IfFileExists>G:+Tax ResearchCourtsDownloadAppeals2nd_cir*.?*,yes2
Let>v2=
Goto>no2
Label>yes2
Let>v2=2nd,
Label>no2
Concat>v1,v2
IfFileExists>G:+Tax ResearchCourtsDownloadAppeals3rd_cir*.?*,yes3
Let>v3=
Goto>no3
Label>yes3
Let>v3=3rd,
Label>no3
Concat>v1,v3
IfFileExists>G:+Tax ResearchCourtsDownloadAppeals4th_cir*.?*,yes4
Let>v4=
Goto>no4
Label>yes4
Let>v4=4th,
Label>no4
Concat>v1,v4
IfFileExists>G:+Tax ResearchCourtsDownloadAppeals5th_cir*.?*,yes5
Let>v5=
Goto>no5
Label>yes5
Let>v5=5th,
Label>no5
Concat>v1,v5
IfFileExists>G:+Tax ResearchCourtsDownloadAppeals6th_cir*.?*,yes6
Let>v6=
Goto>no6
Label>yes6
Let>v6=6th,
Label>no6
Concat>v1,v6
IfFileExists>G:+Tax ResearchCourtsDownloadAppeals7th_cir*.?*,yes7
Let>v7=
Goto>no7
Label>yes7
Let>v7=7th,
Label>no7
Concat>v1,v7
IfFileExists>G:+Tax ResearchCourtsDownloadAppeals8th_cir*.?*,yes8
Let>v8=
Goto>no8
Label>yes8
Let>v8=8th,
Label>no8
Concat>v1,v8
IfFileExists>G:+Tax ResearchCourtsDownloadAppeals9th_cir*.?*,yes9
Let>v9=
Goto>no9
Label>yes9
Let>v9=9th,
Label>no9
Concat>v1,v9
IfFileExists>G:+Tax ResearchCourtsDownloadAppeals10th_cir*.?*,yes10
Let>v10=
Goto>no10
Label>yes10
Let>v10=10th,
Label>no10
Concat>v1,v10
IfFileExists>G:+Tax ResearchCourtsDownloadAppeals11th_cir*.?*,yes11
Let>v11=
Goto>no11
Label>yes11
Let>v11=11th,
Label>no11
Concat>v1,v11
IfFileExists>G:+Tax ResearchCourtsDownloadAppealsDC_cir*.?*,yesDC
Let>vDC=
Goto>noDC
Label>yesDC
Let>vDC=DC,
Label>noDC
Concat>v1,vDC
IfFileExists>G:+Tax ResearchCourtsDownloadAppealsFed_cir*.?*,yesFed
Let>vFed=
Goto>noFed
Label>yesFed
Let>vFed=Fed,
Label>noFed
Concat>v1,vFed
IfFileExists>G:+Tax ResearchCourtsDownloadSupreme*.?*,yesSup
Let>vSup=
Goto>noSup
Label>yesSup
Let>vSup=Supreme,
Label>noSup
Concat>v1,vSup
IfFileExists>G:+Tax ResearchCourtsDownloadBankrupt*.?*,yesBan
Let>vBan=
Goto>noBan
Label>yesBan
Let>vBan=Bankruptcy,
Label>noBan
Concat>v1,vBan
IfFileExists>G:+Tax ResearchCourtsDownloadDistrict*.?*,yesDis
Let>vDis=
Goto>noDis
Label>yesDis
Let>vDis=District,
Label>noDis
Concat>v1,vDis
Let>Msg=The following download directories contain files:
Concat>Msg,v1
Message>Msg