En un mismo trozo de editor… podemos poner un procedure que se invoque varias veces sin tener que crearnos un procedimiento general en la aplicación.
Mira este código:
nCont is int
// A veces, tenemos cierto código que se repite en distintos bloques de código del mismo proceso
IF True THEN
Trace("Muestra texto "+nCont)
nCont++
END
// A veces, tenemos cierto código que se repite en distintos bloques de código del mismo proceso
IF True THEN
Trace("Muestra texto "+nCont)
nCont++
END
// A veces, tenemos cierto código que se repite en distintos bloques de código del mismo proceso
IF True THEN
Trace("Muestra texto "+nCont)
nCont++
END
// A veces, tenemos cierto código que se repite en distintos bloques de código del mismo proceso
IF True THEN
Trace("Muestra texto "+nCont)
nCont++
END
//////////////
// Podemos simplificarlos haciendo uso de los INTERNAL PROCEDURE
//////////////
nCont2 is int
MyTrace()
MyTrace()
MyTrace()
MyTrace()
INTERNAL PROCEDURE MyTrace()
Trace("Muestra texto "+nCont2)
nCont2++
END