Pascal/Turbo Pascal - llamada al array por segunda vez

Hola, estoy haciendo un programa que mas o menos va así:
procedimientos
funcion case
y llamo a los procedimientos desde el case of, la primera vez que los llamo no hay problema pero si los vuelvo a llamar se me cierra el programa, he resuelto el problema creando una etiqueta y utilizando 'goto etiqueta' pero en casi todos los tutoriales y libros que leo no es aconsejable utilizar este método.
que puede estar pasando?
saludos.

si vieramos el codigo , podriamos ayudarte

saludos