If you have LRGLBRVARS as a VOC pointer and can LIST LRGLBRVARS then
OPENSEQ 'LRGLBRVARS',FNAME TO OUT.FILE ELSE NULL should do it if you know it
is present (if the XLS is open with Excel you will usually get an abort)
Although I personally would check it is actually there via "normal" read syntax
OPEN 'LRGLBRVARS' TO LRGLBRVARS ELSE STOP 201,'LRGLBRVARS'
READ CHECKITSTHERE FROM LRGLBRVARS,FNAME ELSE STOP 201,FNAME
Epicor Software (UK) is a limited company registered in England & Wales.
Registration Number: 2338274. Registered Office: 6th Floor, One London Wall,
London EC2Y 5EB
This e-mail and any attachments to it are confidential and is for the use of
the intended recipient(s) only. If you have received this e-mail in error,
please notify the sender immediately and then delete it. If you are not the
intended recipient, you must not use, disclose or distribute this e-mail
without the author's prior permission. We have taken precautions to minimize
the risk of transmitting software viruses, but we advise you to carry out your
own virus checks on any attachment to this message. We cannot accept liability
for any loss or damage caused by software viruses. Any views and/or opinions
expressed in this e-mail are of the author only and do not represent the views
of Epicor Software (UK) Limited or any other company within its group.
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Kevin King
Sent: 05 August 2013 14:31
To: U2 Users List
Subject: Re: [U2] OPENSEQ
I've never used OPENSEQ on a remote drive like that. I presume you can LIST
LRGLBRVARS @ TCL without difficulty right? If so, I would think the OPENSEQ
should work with that just fine. May I also presume that you looked at FNAME
and a file with that name really does exist in that directory file?
On Mon, Aug 5, 2013 at 7:10 AM, Al DeWitt <adew...@stylmark.com> wrote:
> Please educate me on OPENSEQ. I have some code that is giving me an
> error. The funny thing is that I stole the code from a working program:
> The code:
> 064: FNAME = 'LLV':FNAME:'.XLS'
> 065: OPENSEQ "\\SERVER\SHARE-NAME\FOLDER-NAME\LrgLbrVariances",FNAME
> TO OUT.FILE ELSE
> 066: *OPENSEQ "LRGLBRVARS",FNAME TO OUT.FILE ELSE
> 067: ERRCD = STATUS()
> 068: GOSUB 900
> 069: CALL SB.DISP(3,'SFC9667 OPENSEQ Error: ':ERRMSG:' Program is
> 070: GO 9999
> 071: END
> If I run it as is ERRCD = 2. If I comment out 65 and uncomment 66
> ERRCD = 0. According to manual 2 means: The file does not exist. A 0
> means The record does not exist.
> In my voc file I have an entry for LRGLBRVARS. It looks like this:
> Top of "LRGLBRVARS" in "VOC", 3 lines, 48 characters.
> 001: DIR
> 002: \\led\fs-styl\Public\LrgLbrVariances
> 003: D_HOLD_
> What is OPENSEQ looking for and where does it expect it to find it?
> Albert DeWitt, CPIM
This message has been scanned for malware by Websense. www.websense.com
U2-Users mailing list