visead
commented
4 years ago Quality control query in bugsdata.mdb created 20200219 to count records in each table
QNumRecordsPerTable
SELECT [Name], DCount("","[" & [Name] & "]") AS RecCount FROM MSysObjects WHERE Type=1 AND [Name] Not Like "Msys" ORDER BY 1
result at 20200219_16:30:
| Name | RecCount |
|---|---|
| BuildVersionBugsdata | 22 |
| INDEX | 11245 |
| TAttributes | 11962 |
| TBiblio | 6351 |
| TBiology | 37578 |
| TbirmBEETLEdat | 15696 |
| TCountry | 5 |
| TCountsheet | 1465 |
| TDatesCalendar | 2042 |
| TDatesMethods | 47 |
| TDatesPeriod | 7679 |
| TDatesRadio | 1368 |
| TDatesTypes | 4 |
| TDistrib | 41119 |
| TEcoBugs | 9057 |
| TEcoDefBugs | 22 |
| TEcoDefGroups | 6 |
| TEcoDefKoch | 125 |
| TEcoKoch | 17224 |
| TFossil | 193054 |
| TFossilUncertainty | 0 |
| TINDEXReplacements | 1072 |
| TKeys | 429 |
| TLab | 235 |
| TLookupCountsheetContext | 5 |
| TLookupCountsheetTypes | 4 |
| TLookupMonths | 12 |
| TLookupUncertaintyType | 6 |
| TMCRNames | 436 |
| TMCRSummaryData | 436 |
| TPeriods | 122 |
| TRDB | 2187 |
| TRDBCodes | 27 |
| TRDBSystems | 3 |
| TSample | 7940 |
| TSeasonActiveAdult | 9907 |
| TSite | 1316 |
| TSiteOtherProxies | 1129 |
| TSiteRef | 2027 |
| TSpeciesAssociations | 962 |
| TSynonym | 6872 |
| TSynonymNotes | 0 |
| TTaxoNotes | 10392 |
Create a quality control system that can be run when needed, primarily for when new data is imported or when system changes. Include: Record counts on key tables - before and after event