Create ejer6 longuitud fija (Units).pas