Replacing a part of a number only

I want to be able to copy and paste a large amount of accounting codes in a column, and have a formula in another cell which replaces only a section of the accounting code with an appropriate value.

For example, if I enter 02-22300-1111-2222-333-4, I'd want the value in the target cell to show up as 02-44100-1111-2222-333-4. However, if I entered 02-22600-1111-2222-333-4, the target cell would become 02-40300-1111-2222-333-4. Attached is an example.

I thought I could accomplish it by combining the if, find, and replace functions but I have not been completely successful so far.

Any help would be appreciated.