The numbers are for the dimension styles related to only specific types of dims. E.g. 7 is for leaders. Unfortunately those express tools was never updated when adesk added the sub-category styles.
I haven't make such lisp (or other) yet, but what I've done is to rename the main style in a DWG where the style is incorrect, then copy-paste a dim from a DWG where it is correct and match properties (use something like filter or quick select to select dimensions easier).