To work, via Horgoš.
I'm preparing PolC for the X revision of the ICD (or BNO, as they named it in hungarian, don't know how ours did it, probably left untranslated), i.e. the diagnose codes list. While the ninth was close to library model, with the first digit meaning the general area, then each following digit came closer to the matter, the tenth boggles the mind. Not one doctor likes it, and they on disagree what ware the makers of the list on, was it crack or heroin. On top of it all, the old scheme with using catal6 to quickly parse the big list to find the diagnose to include in the handy shortlist, is now almost useless (though it would work, but...), because all, absolutely all names in it are prefixed with the definite article. Which is a or az in hungarian, there's no third. There were many foreheads clapped, but there's no helping it, that's what your medical organization gave, thank her.
I slowly started preparing the transition. For starters, along the old diag.dbf table, which held the IX version (which they call the revision, so it's probably the 10th version, the initial one can't be a revision of anything if there was none before it to revise). The text with the list came in some shoddy quasihungarian codepage, so I had to convert that first, writing a disposable routine for it... now why is there a 2:49 timestamp on it, buggered if I know.
Looking at wikipedia now.. the tenth revision, published in 1994, came into effect in the US only in 2015 (which fits with what I know), and the eleventh officially came to effect in 2022, but when will it be effective, who knows. For which cute dick did the Hungarians rush to implement it twenty years ahead of the US?
Also, the latest version of arhiv2.prg has all the goodies about backing up the tables - creates a zip named after a day of the week (so up to seven different names), asks for the floppy or disk where to create it, has a list of files to pack in an arh0.cmd file, reads the zipper's log to check for anything missing or any errors.
In PolC, the zakaz.prg (appointments) routine was also enriched - the target office is picked from the roster and appointments, aka the work plan, where it shows the slots taken; it shows the phone extension too so the nurse can call and check. If the target office has fixed appointment intervals (i.e. 5, 10, 15, 20 minutes) then it offers the free slots. It also had a preview (catal6 again) of the waiting room on the given day and place. A real cake with a cherry.
To send to lab there was a separate routine, similar to this and using lots of common code, just different in what one had to pick - which analysis etc. Similarly, there were routines to send to ultrasound, CT, x-ray and perhaps one more.