I agree with Surrogate!
Are these long names being used for growing the width of the shape to accommodate the displayed text?
Check out the following shapesheet functions, which would be used in Text Transform section: Textwidth, Textheight. Then set shape width = txtwidth. This would alleviate need for tediously long names. Forum search ought to provide additional examples.