Thanks but a developer friend helped me resolve this one with a logic fix.
Below is what the code does in the background, its not perfect but is gets the job done.
If(And((Len(Mid( Parent .Default,Find("/", Parent .Default)+1,Find("/", Parent .Default,Find("/", Parent .Default)+1)-1-Find("/", Parent .Default))))=1,(Len(Left( Parent .Default,Value(Find("/", Parent .Default))-1))=1)),
Concatenate("0",Mid( Parent .Default,Find("/", Parent .Default)+1,Find("/", Parent .Default,Find("/", Parent .Default)+1)-1-Find("/", Parent .Default)),"/0",Left( Parent .Default,Value(Find("/", Parent .Default))-1),"/",Right( Parent .Default,4)),
If(Len(Mid( Parent .Default,Find("/", Parent .Default)+1,Find("/", Parent .Default,Find("/", Parent .Default)+1)-1-Find("/", Parent .Default)))=1,
Concatenate("0",Mid( Parent .Default,Find("/", Parent .Default)+1,Find("/", Parent .Default,Find("/", Parent .Default)+1)-1-Find("/", Parent .Default)),"/",Left( Parent .Default,Value(Find("/", Parent .Default))-1),"/",Right( Parent .Default,4)),
If(Len(Left( Parent .Default,Value(Find("/", Parent .Default))-1))=1,
Concatenate(Mid( Parent .Default,Find("/", Parent .Default)+1,Find("/", Parent .Default,Find("/", Parent .Default)+1)-1-Find("/", Parent .Default)),"/0",Left( Parent .Default,Value(Find("/", Parent .Default))-1),"/",Right( Parent .Default,4)),
Concatenate(Mid( Parent .Default,Find("/", Parent .Default)+1,Find("/", Parent .Default,Find("/", Parent .Default)+1)-1-Find("/", Parent .Default)),"/",Left( Parent .Default,Value(Find("/", Parent .Default))-1),"/",Right( Parent .Default,4)))))