...Aaaah.  If it is NOT there then do this:-

OPEN 'LRGLBRVARS' TO LRGLBRVARS ELSE STOP 201,'LRGLBRVARS'
WRITE "" ON LRGLBRVARS,FNAME
OPENSEQ 'LRGLBRVARS',FNAME TO OUT.FILE ELSE NULL



-----------------------------
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.
-----------------------------

-----Original Message-----
From: Martin Braid
Sent: 05 August 2013 14:52
To: U2 Users List
Subject: RE: [U2] OPENSEQ

Spot the spilling miss steak.

.... and that will of course be 202,FNAME

-----Original Message-----
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Martin Braid
Sent: 05 August 2013 14:48
To: U2 Users List
Subject: Re: [U2] OPENSEQ

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 
first
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.
-----------------------------

-----Original Message-----
From: u2-users-boun...@listserver.u2ug.org 
[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
> aborting.')
> 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_
> Bottom.
>  What is OPENSEQ looking for and where does it expect it to find it?
>
> Thanks.
>
> Albert DeWitt, CPIM


This message has been scanned for malware by Websense. www.websense.com 
_______________________________________________
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Click 
https://www.mailcontrol.com/sr/xTPlpmVs7T!GX2PQPOmvUnx5AcfplCJVvID731zL8nSDZHbh!LQJTNwGoUldJppTIyW01XaW!eLX405xsHCs!A==
  to report this email as spam.
_______________________________________________
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

Reply via email to