Myslím, že k provedení takové jednoduché manipulace není nutno přidávat funkci. Stačí přece
1) označit všechny názvy pouzder "...Select|Alphanumerical|Packages",
2) do "...|Change|Text (Replace)|Text to Find" vložit např. masku "*0805*" a pak všechna vyhovující jména pouzder nahradit novým obsahem ("...|Change|Text (Replace)|New Text") pomocí příkazu "...|Change|Text (Replace)|Replace All (Case Insensitive)".
Oba kroky jsem vložil do makra, které pro jednoznačnost obsahuje jako krok 0 ještě příkaz "...|Unselect|All Elements".
Následující řádky stačí přenést do textového souboru xxx.Mac a načíst např. příkazem "Macros|Replace".
Macros (
<Shift-Alt-X> "vyměň jména pouzder" (
<Alt-E> <o> <u> <e>
<Alt-E> <o> <s> <a> <c>
<Alt-E> <o> <a> <t> <t> <Ctrl-Alt-A> <n> <Ctrl-Alt-A> <i>
<Ctrl-Home>)
)