ProcText = '' Number2Do = 6500 && 6499 works for both loops below. FOR x = 1 TO m.Number2Do ProcText = m.ProcText + MakeProc(SYS(2015)) ENDFOR STRTOFILE(m.ProcText, "ProcsFile.PRG",0) COMPILE ProcsFile.PRG && Works. ProcText = 'DEFINE CLASS xx AS Custom' + CHR(13) + CHR(10) FOR x = 1 TO m.Number2Do ProcText = m.ProcText + MakeProc(SYS(2015)) ENDFOR STRTOFILE(m.ProcText ; + CHR(13)+CHR(10) + "ENDDEFINE", "ProcsFile.PRG",0) COMPILE ProcsFile.PRG && Fails. RETURN PROCEDURE MakeProc(ProcName) LOCAL ProcText TEXT TO ProcText NOSHOW TEXTMERGE PROCEDURE <<m.ProcName>> RETURN ENDPROC ENDTEXT RETURN m.ProcText ENDPROC>Is there a limit on how many methods and or properties a custom class can have?