procstomem Method
Object: frmbehindsc
Expand/Collapse source code of procedure procstomem Source Code
LPARAMETERS tcStoredProcFileName
LOCAL lnFileHandle, ;
      lnFileSize, ;
      lcStoredProcs

COPY PROCEDURES TO (tcStoredProcFileName)
lnFileSize = FileSize(tcStoredProcFileName)    && IN UTILITY.PRG
lnFileHandle = FOPEN(tcStoredProcFileName)
=FSEEK(lnFileHandle, 0)
lcStoredProcs = FREAD(lnFileHandle, lnFileSize)
=FCLOSE(lnFileHandle)

RETURN lcStoredProcs