Article ID: 194524
Article Last Modified on 1/17/2001
KEYBOARD "{ctrl+w}"
MODIFY PROCEDURES
******************Begin Working Code**********************
#DEFINE CRLF CHR(13) + CHR(10)
x="PROCEDURE TEST1" + CRLF + "X=1" + CRLF + "ENDPROC" + CRLF
STRTOFILE(x,"TESTPROC.TXT")
CREATE DATA TEST
KEYBOARD "{ctrl+w}" && Added to close Procedure Editor.
MODIFY PROCEDURES && Opens the Procedures Editor Window for saving.
APPEND PROCEDURE FROM TESTPROC.TXT
LIST PROCEDURES
MODIFY PROCEDURES
MODIFY FILE TESTPROC.TXT
*******************End Working Code************************
#DEFINE CRLF CHR(13) + CHR(10)
x="PROCEDURE TEST1" + CRLF + "X=1" + CRLF + "ENDPROC" + CRLF
STRTOFILE(X,"TESTPROC.TXT")
CREATE DATA TEST
APPEND PROCEDURE FROM TESTPROC.TXT
LIST PROCEDURES
MODIFY PROCEDURES
MODIFY FILE TESTPROC.TXT
Keywords: kbxbase kbdatabase kbprb KB194524