Hi,
I have following set of coding
GOSUB INIT
GOSUB PROCESS
INIT:
*****
...
EXECUTE 'SH -c "rm ETC.BP/CBSL1.TXT"'
OPENSEQ 'ETC.BP/CBSL1.TXT' TO TEXT.FILE ELSE PRINT "ERROR"
...
PROCESS:
********
...
WHILE DRID:MORE
CALL F.READ(FN.DRAWINGS,DRID,R.DR,F.DRAWINGS,ERR)
Y.TMP.LINE = LINE
*Y.TMP.LINE* := R.DR<TF.DR.DRAW.CURRENCY>
:"|":R.DR<TF.DR.DOCUMENT.AMOUNT>
WRITESEQ Y.TMP.LINE TO TEXT.FILE ELSE PRINT "ERROR"
REPEAT
...
On the DEBUG data comes to *Y.TMP.LINE *and the line is created as
required.
But it does not generate the text file in *ETC.BP/CBSL1.TXT *as expected.
What might've gone wrong?
Thanks for ur replies.
--
Please read the posting guidelines at:
http://groups.google.com/group/jBASE/web/Posting%20Guidelines
IMPORTANT: Type T24: at the start of the subject line for questions specific to
Globus/T24
To post, send email to [email protected]
To unsubscribe, send email to [email protected]
For more options, visit this group at http://groups.google.com/group/jBASE?hl=en
