Hi Steven,
There is a limit on methods, and in my testing, it's 6499.

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?