shadowrl2644
Programmer
When using the text <lineout> process --- it create a valid textfile but the first line is blank
Added a second \\ Slash in front of the command does not help.
Code Snip I am having a problem with as follows
set safety off
SET TEXTMERGE ON noshow
STORE FCREATE('TempEdiout.txt') TO _TEXT
IF _Text = -1 && can't create low level file the exit
WAIT WINDOW 'Cannot create output file ; press a key to exit'
CANCEL
ENDIF
use EdiOut
SCAN
TEXT
\<<outline>>
ENDTEXT
ENDSCAN
CLOSE ALL
**** need to comment out
**** MODIFY FILE TempEdiout.txt
**** need to comment out
WAIT WINDOW 'create complete'
SET textmerge off
SET SAFETY off
COPY FILE TempEdiOut.txt TO &LcTheFile
COPY FILE TempediOut.txt TO &LcBkupFILE
DELETE FILE TEMPEDIOUT.TXT
Added a second \\ Slash in front of the command does not help.
Code Snip I am having a problem with as follows
set safety off
SET TEXTMERGE ON noshow
STORE FCREATE('TempEdiout.txt') TO _TEXT
IF _Text = -1 && can't create low level file the exit
WAIT WINDOW 'Cannot create output file ; press a key to exit'
CANCEL
ENDIF
use EdiOut
SCAN
TEXT
\<<outline>>
ENDTEXT
ENDSCAN
CLOSE ALL
**** need to comment out
**** MODIFY FILE TempEdiout.txt
**** need to comment out
WAIT WINDOW 'create complete'
SET textmerge off
SET SAFETY off
COPY FILE TempEdiOut.txt TO &LcTheFile
COPY FILE TempediOut.txt TO &LcBkupFILE
DELETE FILE TEMPEDIOUT.TXT