Re: [U2] OPENSEQ

2013-08-05 Thread Kevin King
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 looed
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 
 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
 ___
 U2-Users mailing list
 U2-Users@listserver.u2ug.org
 http://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ

2013-08-05 Thread Aaron Titus
I'm pretty sure Universe can open windows SMB drives, but I don't know that
I ever tried it with other MV systems. Keep in mind the most important
thing about windows  SMB drive shares:  unless you are logged into the
desktop, it doesn't automatically map them.  You may need to issue a net
use command to authenticate the share (or set it up within windows so that
authentication is not needed.)


*Aaron Titus*
Senior Software Engineer
F.W. Davison  Company, Inc.
508-747-7261 x245
ati...@fwdco.com



On Mon, Aug 5, 2013 at 9:31 AM, Kevin King ke...@precisonline.com wrote:

 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 looed
 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 
  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
  ___
  U2-Users mailing list
  U2-Users@listserver.u2ug.org
  http://listserver.u2ug.org/mailman/listinfo/u2-users
 
 ___
 U2-Users mailing list
 U2-Users@listserver.u2ug.org
 http://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ

2013-08-05 Thread Martin Braid
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 
 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


Re: [U2] OPENSEQ

2013-08-05 Thread Martin Braid
Spot the spilling miss steak.

 and that will of course be 202,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 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 
 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


Re: [U2] OPENSEQ

2013-08-05 Thread Larry Hiscock
I could be wrong, but I seem to recall that OPENSEQ supports two syntaxes

Option 1 has 2 arguments: openseq voc.pointer, filename to ...
Option 2 has only 1 argument:  openseq absolute.path.to.filename to ...

Also, if the server where your shared folder resides is not Windows, then
filenames will be case sensitive.

Larry Hiscock
Western Computer Services

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Al DeWitt
Sent: Monday, August 05, 2013 6:10 AM
To: (u2-users@listserver.u2ug.org)
Subject: [U2] OPENSEQ

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 
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
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ

2013-08-05 Thread Al DeWitt
Thanks for your reply Kevin.

I can list LRGLBRVARS at TCL.  I put a dummy file inside to prove it.

FNAME does not exist.  In the code I stole this from the name is created anew 
each time.  It always open the file empty, allows me to populate and close 
it.  However, in this code it's not working.

Since we're running SB+/SBClient I thought the '.XLS' extension was causing 
issues (grasping at straws) but I'm getting the same errors.


Albert DeWitt, CPIM
Sr. Programmer Analyst

Stylmark, Inc.
6536 Main St NE | Minneapolis MN 55432 | USA
DD: 763-574-8705 | PH: 763-574-7474 | F: 763-574-1415
adew...@stylmark.com
www.stylmark.com

Stylmark is a proud member of RDI, ARE, NGA
You can now find Stylmark on LinkedIn and Facebook

-Original Message-
From: Kevin King [mailto:ke...@precisonline.com] 
Sent: Monday, August 05, 2013 8:31 AM
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 looed 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 
 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
 ___
 U2-Users mailing list
 U2-Users@listserver.u2ug.org
 http://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ

2013-08-05 Thread bradley . schrag
Does the code still fail with the dummy file out there? If not, I'd guess 
permissions.



From:   Al DeWitt adew...@stylmark.com
To: U2 Users List u2-users@listserver.u2ug.org, 
Date:   08/05/2013 09:04 AM
Subject:Re: [U2] OPENSEQ
Sent by:u2-users-boun...@listserver.u2ug.org



Thanks for your reply Kevin.

I can list LRGLBRVARS at TCL.  I put a dummy file inside to prove it.

FNAME does not exist.  In the code I stole this from the name is created 
anew each time.  It always open the file empty, allows me to populate 
and close it.  However, in this code it's not working.

Since we're running SB+/SBClient I thought the '.XLS' extension was 
causing issues (grasping at straws) but I'm getting the same errors.


Albert DeWitt, CPIM
Sr. Programmer Analyst

Stylmark, Inc.
6536 Main St NE | Minneapolis MN 55432 | USA
DD: 763-574-8705 | PH: 763-574-7474 | F: 763-574-1415
adew...@stylmark.com
www.stylmark.com

Stylmark is a proud member of RDI, ARE, NGA
You can now find Stylmark on LinkedIn and Facebook

-Original Message-
From: Kevin King [mailto:ke...@precisonline.com] 
Sent: Monday, August 05, 2013 8:31 AM
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 
looed 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 
 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
 ___
 U2-Users mailing list
 U2-Users@listserver.u2ug.org
 http://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


U.S. BANCORP made the following annotations
-
Electronic Privacy Notice. This e-mail, and any attachments, contains 
information that is, or may be, covered by electronic communications privacy 
laws, and is also confidential and proprietary in nature. If you are not the 
intended recipient, please be advised that you are legally prohibited from 
retaining, using, copying, distributing, or otherwise disclosing this 
information in any manner. Instead, please reply to the sender that you have 
received this communication in error, and then immediately delete it. Thank you 
in advance for your cooperation.



-

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ

2013-08-05 Thread Al DeWitt
I'm a Domain Admin so permissions is not an issue.  I'm going back to the 
beginning and start over.  Maybe I have an issue I'm not seeing.

Thanks for all your help.

Albert DeWitt, CPIM
Sr. Programmer Analyst

Stylmark, Inc.
6536 Main St NE | Minneapolis MN 55432 | USA
DD: 763-574-8705 | PH: 763-574-7474 | F: 763-574-1415
adew...@stylmark.com
www.stylmark.com

Stylmark is a proud member of RDI, ARE, NGA
You can now find Stylmark on LinkedIn and Facebook


-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of 
bradley.sch...@usbank.com
Sent: Monday, August 05, 2013 9:10 AM
To: U2 Users List
Subject: Re: [U2] OPENSEQ

Does the code still fail with the dummy file out there? If not, I'd guess 
permissions.



From:   Al DeWitt adew...@stylmark.com
To: U2 Users List u2-users@listserver.u2ug.org, 
Date:   08/05/2013 09:04 AM
Subject:Re: [U2] OPENSEQ
Sent by:u2-users-boun...@listserver.u2ug.org



Thanks for your reply Kevin.

I can list LRGLBRVARS at TCL.  I put a dummy file inside to prove it.

FNAME does not exist.  In the code I stole this from the name is created 
anew each time.  It always open the file empty, allows me to populate 
and close it.  However, in this code it's not working.

Since we're running SB+/SBClient I thought the '.XLS' extension was 
causing issues (grasping at straws) but I'm getting the same errors.


Albert DeWitt, CPIM
Sr. Programmer Analyst

Stylmark, Inc.
6536 Main St NE | Minneapolis MN 55432 | USA
DD: 763-574-8705 | PH: 763-574-7474 | F: 763-574-1415
adew...@stylmark.com
www.stylmark.com

Stylmark is a proud member of RDI, ARE, NGA
You can now find Stylmark on LinkedIn and Facebook

-Original Message-
From: Kevin King [mailto:ke...@precisonline.com] 
Sent: Monday, August 05, 2013 8:31 AM
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 
looed 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 
 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
 ___
 U2-Users mailing list
 U2-Users@listserver.u2ug.org
 http://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


U.S. BANCORP made the following annotations
-
Electronic Privacy Notice. This e-mail, and any attachments, contains 
information that is, or may be, covered by electronic communications privacy 
laws, and is also confidential and proprietary in nature. If you are not the 
intended recipient, please be advised that you are legally prohibited from 
retaining, using, copying, distributing, or otherwise disclosing this 
information in any manner. Instead, please reply to the sender that you have 
received this communication in error, and then immediately delete it. Thank you 
in advance for your cooperation.



-

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ

2013-08-05 Thread Martin Braid
...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 
 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

Re: [U2] OPENSEQ

2013-08-05 Thread Wjhonson
Can someone point me to the page where we can use DIR type files at all?
It would make my job a lot easier!


 

 

 

-Original Message-
From: Al DeWitt adew...@stylmark.com
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Mon, Aug 5, 2013 7:04 am
Subject: Re: [U2] OPENSEQ


Thanks for your reply Kevin.

I can list LRGLBRVARS at TCL.  I put a dummy file inside to prove it.

FNAME does not exist.  In the code I stole this from the name is created anew 
each time.  It always open the file empty, allows me to populate and close 
it.  
However, in this code it's not working.

Since we're running SB+/SBClient I thought the '.XLS' extension was causing 
issues (grasping at straws) but I'm getting the same errors.


Albert DeWitt, CPIM
Sr. Programmer Analyst

Stylmark, Inc.
6536 Main St NE | Minneapolis MN 55432 | USA
DD: 763-574-8705 | PH: 763-574-7474 | F: 763-574-1415
adew...@stylmark.com
www.stylmark.com

Stylmark is a proud member of RDI, ARE, NGA
You can now find Stylmark on LinkedIn and Facebook

-Original Message-
From: Kevin King [mailto:ke...@precisonline.com] 
Sent: Monday, August 05, 2013 8:31 AM
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 looed 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 
 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
 ___
 U2-Users mailing list
 U2-Users@listserver.u2ug.org
 http://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

 
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ

2013-08-05 Thread Bill Haskett

Al:

UniData help shows...

Help Information For: UNIBASIC OPENSEQ  
Page: 1/5


OPENSEQ

Syntax

OPENSEQ [absolutepath | seq.filename,record.id] [READONLY] TO seq.file.var
[ON ERROR statements] [LOCKED statements] {THEN statements [END]
| ELSE statements [END]}

OPENSEQ [absolutepath | seq.filename,record.id] [READONLY] TO seq.file.var
[LOCKED statements] [ON ERROR statements] {THEN statements [END]
| ELSE statements [END]}

Description

The UniBasic OPENSEQ command opens a sequential file for access,
starting at the specified record. UniData limits to 150 the number
of sequential files you can open in a UniBasic program.

It would seem your path uses the seq.filename, record.id format 
instead of the absolute path format.  e.g.


065: OPENSEQ \\SERVER\SHARE-NAME\FOLDER-NAME\LrgLbrVariances\:FNAME TO 
OUT.FILE ELSE

HTH (and fixes it).

Bill
Untitled Page



- Original Message -
*From:* adew...@stylmark.com
*To:* U2 Users List u2-users@listserver.u2ug.org
*Date:* 8/5/2013 7:17 AM
*Subject:* Re: [U2] OPENSEQ

I'm a Domain Admin so permissions is not an issue.  I'm going back to the 
beginning and start over.  Maybe I have an issue I'm not seeing.

Thanks for all your help.

Albert DeWitt, CPIM
Sr. Programmer Analyst

Stylmark, Inc.
6536 Main St NE | Minneapolis MN 55432 | USA
DD: 763-574-8705 | PH: 763-574-7474 | F: 763-574-1415
adew...@stylmark.com
www.stylmark.com

Stylmark is a proud member of RDI, ARE, NGA
You can now find Stylmark on LinkedIn and Facebook


-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of 
bradley.sch...@usbank.com
Sent: Monday, August 05, 2013 9:10 AM
To: U2 Users List
Subject: Re: [U2] OPENSEQ

Does the code still fail with the dummy file out there? If not, I'd guess 
permissions.



From:   Al DeWitt adew...@stylmark.com
To: U2 Users List u2-users@listserver.u2ug.org,
Date:   08/05/2013 09:04 AM
Subject:Re: [U2] OPENSEQ
Sent by:u2-users-boun...@listserver.u2ug.org

Thanks for your reply Kevin.

I can list LRGLBRVARS at TCL.  I put a dummy file inside to prove it.

FNAME does not exist.  In the code I stole this from the name is created
anew each time.  It always open the file empty, allows me to populate
and close it.  However, in this code it's not working.

Since we're running SB+/SBClient I thought the '.XLS' extension was
causing issues (grasping at straws) but I'm getting the same errors.

Albert DeWitt, CPIM
Sr. Programmer Analyst

Stylmark, Inc.
6536 Main St NE | Minneapolis MN 55432 | USA
DD: 763-574-8705 | PH: 763-574-7474 | F: 763-574-1415
adew...@stylmark.com
www.stylmark.com

Stylmark is a proud member of RDI, ARE, NGA
You can now find Stylmark on LinkedIn and Facebook


-Original Message-
From: Kevin King [mailto:ke...@precisonline.com]
Sent: Monday, August 05, 2013 8:31 AM
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
looed 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 
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

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ

2013-08-05 Thread Wjhonson
*Falls out of my chair*

What ? What ?
I never knew you could DO this!

After some fiddling about I finally was able to make OPENSEQ open an UNC path.
Of course the one I tried, actually points to the exact same server and account 
the code is already running in, but I didn't even know you could OPEN an UNC 
path at all before!  I've been translating the UNC paths into DOS paths.

Now to try to open remote UNC path


 

 

 

-Original Message-
From: Bill Haskett wphask...@advantos.net
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Mon, Aug 5, 2013 10:05 am
Subject: Re: [U2] OPENSEQ


Al:

UniData help shows...

 Help Information For: UNIBASIC OPENSEQ  
Page: 1/5

OPENSEQ

Syntax

OPENSEQ [absolutepath | seq.filename,record.id] [READONLY] TO seq.file.var
[ON ERROR statements] [LOCKED statements] {THEN statements [END]
| ELSE statements [END]}

OPENSEQ [absolutepath | seq.filename,record.id] [READONLY] TO seq.file.var
[LOCKED statements] [ON ERROR statements] {THEN statements [END]
| ELSE statements [END]}

Description

The UniBasic OPENSEQ command opens a sequential file for access,
starting at the specified record. UniData limits to 150 the number
of sequential files you can open in a UniBasic program.

It would seem your path uses the seq.filename, record.id format 
instead of the absolute path format.  e.g.

065: OPENSEQ \\SERVER\SHARE-NAME\FOLDER-NAME\LrgLbrVariances\:FNAME TO 
OUT.FILE ELSE

HTH (and fixes it).

Bill
Untitled Page



- Original Message -
*From:* adew...@stylmark.com
*To:* U2 Users List u2-users@listserver.u2ug.org
*Date:* 8/5/2013 7:17 AM
*Subject:* Re: [U2] OPENSEQ
 I'm a Domain Admin so permissions is not an issue.  I'm going back to the 
beginning and start over.  Maybe I have an issue I'm not seeing.

 Thanks for all your help.

 Albert DeWitt, CPIM
 Sr. Programmer Analyst

 Stylmark, Inc.
 6536 Main St NE | Minneapolis MN 55432 | USA
 DD: 763-574-8705 | PH: 763-574-7474 | F: 763-574-1415
 adew...@stylmark.com
 www.stylmark.com

 Stylmark is a proud member of RDI, ARE, NGA
 You can now find Stylmark on LinkedIn and Facebook


 -Original Message-
 From: u2-users-boun...@listserver.u2ug.org 
 [mailto:u2-users-boun...@listserver.u2ug.org] 
On Behalf Of bradley.sch...@usbank.com
 Sent: Monday, August 05, 2013 9:10 AM
 To: U2 Users List
 Subject: Re: [U2] OPENSEQ

 Does the code still fail with the dummy file out there? If not, I'd guess 
permissions.


 
 From:   Al DeWitt adew...@stylmark.com
 To: U2 Users List u2-users@listserver.u2ug.org,
 Date:   08/05/2013 09:04 AM
 Subject:Re: [U2] OPENSEQ
 Sent by:u2-users-boun...@listserver.u2ug.org

 Thanks for your reply Kevin.

 I can list LRGLBRVARS at TCL.  I put a dummy file inside to prove it.

 FNAME does not exist.  In the code I stole this from the name is created
 anew each time.  It always open the file empty, allows me to populate
 and close it.  However, in this code it's not working.

 Since we're running SB+/SBClient I thought the '.XLS' extension was
 causing issues (grasping at straws) but I'm getting the same errors.

 Albert DeWitt, CPIM
 Sr. Programmer Analyst

 Stylmark, Inc.
 6536 Main St NE | Minneapolis MN 55432 | USA
 DD: 763-574-8705 | PH: 763-574-7474 | F: 763-574-1415
 adew...@stylmark.com
 www.stylmark.com

 Stylmark is a proud member of RDI, ARE, NGA
 You can now find Stylmark on LinkedIn and Facebook

 
 -Original Message-
 From: Kevin King [mailto:ke...@precisonline.com]
 Sent: Monday, August 05, 2013 8:31 AM
 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
 looed 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 
 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

Re: [U2] OPENSEQ

2013-08-05 Thread Bill Haskett
Remember, if you're using Windows 2008 (Vista Server) or later (I use 
2008 R2 - Windows 7 Server) then you have to be careful about how you 
share the network directory you want to share.


For testing purposes, if you're using Windows, it may be a good idea to 
share the directory to everyone, with full permissions.


Bill
Untitled Page



- Original Message -
*From:* wjhon...@aol.com
*To:* u2-users@listserver.u2ug.org
*Date:* 8/5/2013 10:16 AM
*Subject:* Re: [U2] OPENSEQ

*Falls out of my chair*

What ? What ?
I never knew you could DO this!

After some fiddling about I finally was able to make OPENSEQ open an UNC path.
Of course the one I tried, actually points to the exact same server and account 
the code is already running in, but I didn't even know you could OPEN an UNC 
path at all before!  I've been translating the UNC paths into DOS paths.

Now to try to open remote UNC path


-Original Message-
From: Bill Haskett wphask...@advantos.net
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Mon, Aug 5, 2013 10:05 am
Subject: Re: [U2] OPENSEQ


Al:

UniData help shows...

  Help Information For: UNIBASIC OPENSEQ
Page: 1/5

OPENSEQ

Syntax

OPENSEQ [absolutepath | seq.filename,record.id] [READONLY] TO seq.file.var
[ON ERROR statements] [LOCKED statements] {THEN statements [END]
| ELSE statements [END]}

OPENSEQ [absolutepath | seq.filename,record.id] [READONLY] TO seq.file.var
[LOCKED statements] [ON ERROR statements] {THEN statements [END]
| ELSE statements [END]}

Description

The UniBasic OPENSEQ command opens a sequential file for access,
starting at the specified record. UniData limits to 150 the number
of sequential files you can open in a UniBasic program.

It would seem your path uses the seq.filename, record.id format
instead of the absolute path format.  e.g.

065: OPENSEQ \\SERVER\SHARE-NAME\FOLDER-NAME\LrgLbrVariances\:FNAME TO
OUT.FILE ELSE

HTH (and fixes it).

Bill
Untitled Page



- Original Message -
*From:* adew...@stylmark.com
*To:* U2 Users List u2-users@listserver.u2ug.org
*Date:* 8/5/2013 7:17 AM
*Subject:* Re: [U2] OPENSEQ

I'm a Domain Admin so permissions is not an issue.  I'm going back to the
beginning and start over.  Maybe I have an issue I'm not seeing.

Thanks for all your help.

Albert DeWitt, CPIM
Sr. Programmer Analyst

Stylmark, Inc.
6536 Main St NE | Minneapolis MN 55432 | USA
DD: 763-574-8705 | PH: 763-574-7474 | F: 763-574-1415
adew...@stylmark.com
www.stylmark.com

Stylmark is a proud member of RDI, ARE, NGA
You can now find Stylmark on LinkedIn and Facebook


-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org]
On Behalf Of bradley.sch...@usbank.com
Sent: Monday, August 05, 2013 9:10 AM
To: U2 Users List
Subject: Re: [U2] OPENSEQ

Does the code still fail with the dummy file out there? If not, I'd guess
permissions.


From:   Al DeWitt adew...@stylmark.com
To: U2 Users List u2-users@listserver.u2ug.org,
Date:   08/05/2013 09:04 AM
Subject:Re: [U2] OPENSEQ
Sent by:u2-users-boun...@listserver.u2ug.org

Thanks for your reply Kevin.

I can list LRGLBRVARS at TCL.  I put a dummy file inside to prove it.

FNAME does not exist.  In the code I stole this from the name is created
anew each time.  It always open the file empty, allows me to populate
and close it.  However, in this code it's not working.

Since we're running SB+/SBClient I thought the '.XLS' extension was
causing issues (grasping at straws) but I'm getting the same errors.

Albert DeWitt, CPIM
Sr. Programmer Analyst

Stylmark, Inc.
6536 Main St NE | Minneapolis MN 55432 | USA
DD: 763-574-8705 | PH: 763-574-7474 | F: 763-574-1415
adew...@stylmark.com
www.stylmark.com

Stylmark is a proud member of RDI, ARE, NGA
You can now find Stylmark on LinkedIn and Facebook


-Original Message-
From: Kevin King [mailto:ke...@precisonline.com]
Sent: Monday, August 05, 2013 8:31 AM
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
looed 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

Re: [U2] OPENSEQ

2013-08-05 Thread Colin Alfke
Ummm, if the file doesn't exist then it's *supposed* to take the else
clause, when I'm creating new files I use THEN and put the abort in there.


When you borrowed this code did it have all of the validation? I don't have
my error codes handy - but if you let it continue does it let you do the
writeseq?

Hth
Colin

-Original Message-
From: Al DeWitt
Sent: Monday, August 05, 2013 8:04 AM
To: U2 Users List
Subject: Re: [U2] OPENSEQ

Thanks for your reply Kevin.

I can list LRGLBRVARS at TCL.  I put a dummy file inside to prove it.

FNAME does not exist.  In the code I stole this from the name is created
anew each time.  It always open the file empty, allows me to populate and
close it.  However, in this code it's not working.

Since we're running SB+/SBClient I thought the '.XLS' extension was causing
issues (grasping at straws) but I'm getting the same errors.


Albert DeWitt, CPIM
Sr. Programmer Analyst

Stylmark, Inc.

-Original Message-
From: Kevin King 
Sent: Monday, August 05, 2013 8:31 AM
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 looed 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 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 
 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 

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ

2013-08-05 Thread Al DeWitt
As I mentioned earlier I went back and started over.  This is my 
Top of LRGLBRVARS in VOC, 3 lines, 48 characters.
001: DIR
002: \\ServerName\ShareName\Folder\LrgLbrVariances
003: D_HOLD_
Bottom.

My OPENSEQ statement is this: OPENSEQ LRGLBRVARS,FNAME TO OUT.FILE ELSE NULL

This opens my previously non-existing file, allows me to write to it and closes 
it.

It does what I want it to.  As I mentioned to someone else I have no idea why 
the above statement worked, but trying to error catching showed an error 
condition.

Go figure.

Albert DeWitt, CPIM
Sr. Programmer Analyst

Stylmark, Inc.
6536 Main St NE | Minneapolis MN 55432 | USA
DD: 763-574-8705 | PH: 763-574-7474 | F: 763-574-1415
adew...@stylmark.com
www.stylmark.com

Stylmark is a proud member of RDI, ARE, NGA
You can now find Stylmark on LinkedIn and Facebook


-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Colin Alfke
Sent: Monday, August 05, 2013 12:32 PM
To: 'U2 Users List'
Subject: Re: [U2] OPENSEQ

Ummm, if the file doesn't exist then it's *supposed* to take the else clause, 
when I'm creating new files I use THEN and put the abort in there.


When you borrowed this code did it have all of the validation? I don't have my 
error codes handy - but if you let it continue does it let you do the writeseq?

Hth
Colin

-Original Message-
From: Al DeWitt
Sent: Monday, August 05, 2013 8:04 AM
To: U2 Users List
Subject: Re: [U2] OPENSEQ

Thanks for your reply Kevin.

I can list LRGLBRVARS at TCL.  I put a dummy file inside to prove it.

FNAME does not exist.  In the code I stole this from the name is created anew 
each time.  It always open the file empty, allows me to populate and close 
it.  However, in this code it's not working.

Since we're running SB+/SBClient I thought the '.XLS' extension was causing 
issues (grasping at straws) but I'm getting the same errors.


Albert DeWitt, CPIM
Sr. Programmer Analyst

Stylmark, Inc.

-Original Message-
From: Kevin King
Sent: Monday, August 05, 2013 8:31 AM
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 looed 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 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 
 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: \\ServerName\ShareName\Folder\LrgLbrVariances
 003: D_HOLD_
 Bottom.
  What is OPENSEQ looking for and where does it expect it to find it?

 Thanks.

 Albert DeWitt, CPIM

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ

2013-08-05 Thread John Hester
What you're seeing is the correct behavior of OPENSEQ.  I think what's causing 
the confusion is there are multiple error conditions possible when dealing 
with opening a flat file for writing.  The non-existence of the file prior to 
opening may or may not be an error depending on your usage scenario, but it is 
important information, and using an error code along with the ELSE clause is 
the only way it can be conveyed.  If you're writing a per-instance error log, 
for example, you might choose to loop through OPENSEQ statements and increment 
the ID until you hit the non-existence condition so you don't overwrite prior 
logs.  

-John

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Al DeWitt
Sent: Monday, August 05, 2013 11:03 AM
To: U2 Users List
Subject: Re: [U2] OPENSEQ

As I mentioned earlier I went back and started over.  This is my Top of 
LRGLBRVARS in VOC, 3 lines, 48 characters.
001: DIR
002: \\ServerName\ShareName\Folder\LrgLbrVariances
003: D_HOLD_
Bottom.

My OPENSEQ statement is this: OPENSEQ LRGLBRVARS,FNAME TO OUT.FILE ELSE NULL

This opens my previously non-existing file, allows me to write to it and closes 
it.

It does what I want it to.  As I mentioned to someone else I have no idea why 
the above statement worked, but trying to error catching showed an error 
condition.

Go figure.

Albert DeWitt, CPIM
Sr. Programmer Analyst

Stylmark, Inc.
6536 Main St NE | Minneapolis MN 55432 | USA
DD: 763-574-8705 | PH: 763-574-7474 | F: 763-574-1415 adew...@stylmark.com 
www.stylmark.com

Stylmark is a proud member of RDI, ARE, NGA You can now find Stylmark on 
LinkedIn and Facebook

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ

2013-08-05 Thread Tony Gravagno
 From: Al DeWitt 
 I'm a Domain Admin so permissions is not an issue.

I understand the sentiment there but we may not be aware of the
permissions required for the operation in question, so it's tough to
know if the right permissions have not been granted.

My related experiences, dunno if this helps anyone...

Some products need their own access to remote data resources. The
permissions of the current user, especially telnet, are not used to
access remote resource, because it's the DBMS not the user that is
doing the access. Most sites don't run their DBMS services with
Administrator privs - that's a huge security issue. (I can just see
people now going huh? really? and checking their services ... go
ahead, we'll be here when you get back...)

I'll sometimes temporarily open full permissions to the target and
give admin privs to the client application just to see if that
resolves the issue. You'd be surprised at how often this does reveal a
permissions issue - but again you shouldn't leave it like that because
this is a huge security issue. NOT being a domain admin I usually have
issues getting the right restricted permissions back so I always try
to have someone else handy to fix it. :)

I also use Sysinternals tools to find out exactly what the system is
trying to do. Maybe in this OpenSEQ case it's not actually reading
from the intended target. Again, you might be surprised at all of the
disk reads that need to be done to get to the real data you're trying
to access. This could help to identify performance issues too.
http://technet.microsoft.com/en-us/sysinternals/bb795533.aspx

HTH
T











___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ / WRITESEQ and UniObjects

2011-11-04 Thread Steve Romanow
I don't know if we have enough information.  Does it start?  No output
whatsoever?  IIRC, you can tell writeseq not to cache and to write to
disk immediately.

On Fri, Nov 4, 2011 at 3:03 PM, Holt, Jake jh...@samsill.com wrote:
 I wrote a program to export some data using openseq/writeseq (to a local
 server drive, tried a UNC path too) and it works perfectly until I try
 to call it using UniObjects.  Is this normal behavior?  If so, anyway to
 make it work with UniObjects?
 ___
 U2-Users mailing list
 U2-Users@listserver.u2ug.org
 http://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ / WRITESEQ and UniObjects

2011-11-04 Thread Holt, Jake
It fails to write.  It gives the failure to open error as well, but I believe 
that is fairly standard if the file doesn't exist before hand.  It operations 
normally, just doesn't write the records to the file.

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Steve Romanow
Sent: Friday, November 04, 2011 2:11 PM
To: U2 Users List
Subject: Re: [U2] OPENSEQ / WRITESEQ and UniObjects

I don't know if we have enough information.  Does it start?  No output 
whatsoever?  IIRC, you can tell writeseq not to cache and to write to disk 
immediately.

On Fri, Nov 4, 2011 at 3:03 PM, Holt, Jake jh...@samsill.com wrote:
 I wrote a program to export some data using openseq/writeseq (to a 
 local server drive, tried a UNC path too) and it works perfectly until 
 I try to call it using UniObjects.  Is this normal behavior?  If so, 
 anyway to make it work with UniObjects?
 ___
 U2-Users mailing list
 U2-Users@listserver.u2ug.org
 http://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ / WRITESEQ and UniObjects

2011-11-04 Thread Colin Alfke
I'd guess it was some type of permission error. Does the user you are
connecting with through UniObjects have write permissions on the folder that
the open/writeseq is writing on?

hth
Colin Alfke
Calgary, Canada

-Original Message-
From: Holt, Jake

It fails to write.  It gives the failure to open error as well, but I
believe that is fairly standard if the file doesn't exist before hand.  It
operations normally, just doesn't write the records to the file.

-Original Message-
From: Steve Romanow

I don't know if we have enough information.  Does it start?  No output
whatsoever?  IIRC, you can tell writeseq not to cache and to write to disk
immediately.

On Fri, Nov 4, 2011 at 3:03 PM, Holt, Jake wrote:
 I wrote a program to export some data using openseq/writeseq (to a 
 local server drive, tried a UNC path too) and it works perfectly until 
 I try to call it using UniObjects.  Is this normal behavior?  If so, 
 anyway to make it work with UniObjects?


___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ / WRITESEQ and UniObjects

2011-11-04 Thread Steve Romanow
I typically will throw a touch filename before the openseq.  does
the uniobjects user have permissions on the disk?

Maybe try something innocuous to see if the job is executing at all.



On Fri, Nov 4, 2011 at 3:27 PM, Holt, Jake jh...@samsill.com wrote:
 It fails to write.  It gives the failure to open error as well, but I believe 
 that is fairly standard if the file doesn't exist before hand.  It operations 
 normally, just doesn't write the records to the file.

 -Original Message-
 From: u2-users-boun...@listserver.u2ug.org 
 [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Steve Romanow
 Sent: Friday, November 04, 2011 2:11 PM
 To: U2 Users List
 Subject: Re: [U2] OPENSEQ / WRITESEQ and UniObjects

 I don't know if we have enough information.  Does it start?  No output 
 whatsoever?  IIRC, you can tell writeseq not to cache and to write to disk 
 immediately.

 On Fri, Nov 4, 2011 at 3:03 PM, Holt, Jake jh...@samsill.com wrote:
 I wrote a program to export some data using openseq/writeseq (to a
 local server drive, tried a UNC path too) and it works perfectly until
 I try to call it using UniObjects.  Is this normal behavior?  If so,
 anyway to make it work with UniObjects?
 ___
 U2-Users mailing list
 U2-Users@listserver.u2ug.org
 http://listserver.u2ug.org/mailman/listinfo/u2-users

 ___
 U2-Users mailing list
 U2-Users@listserver.u2ug.org
 http://listserver.u2ug.org/mailman/listinfo/u2-users
 ___
 U2-Users mailing list
 U2-Users@listserver.u2ug.org
 http://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ / WRITESEQ and UniObjects

2011-11-04 Thread Holt, Jake
It was a permission issue -- I blame Friday.

Thanks.

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Colin Alfke
Sent: Friday, November 04, 2011 2:31 PM
To: 'U2 Users List'
Subject: Re: [U2] OPENSEQ / WRITESEQ and UniObjects

I'd guess it was some type of permission error. Does the user you are 
connecting with through UniObjects have write permissions on the folder that 
the open/writeseq is writing on?

hth
Colin Alfke
Calgary, Canada

-Original Message-
From: Holt, Jake

It fails to write.  It gives the failure to open error as well, but I believe 
that is fairly standard if the file doesn't exist before hand.  It operations 
normally, just doesn't write the records to the file.

-Original Message-
From: Steve Romanow

I don't know if we have enough information.  Does it start?  No output 
whatsoever?  IIRC, you can tell writeseq not to cache and to write to disk 
immediately.

On Fri, Nov 4, 2011 at 3:03 PM, Holt, Jake wrote:
 I wrote a program to export some data using openseq/writeseq (to a 
 local server drive, tried a UNC path too) and it works perfectly until 
 I try to call it using UniObjects.  Is this normal behavior?  If so, 
 anyway to make it work with UniObjects?


___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and the LOCKED Option

2011-10-28 Thread Wjhonson

Please provide the exact source, and the exact compilation error message




-Original Message-
From: Al DeWitt adew...@stylmark.com
To: u2-users u2-users@listserver.u2ug.org
Sent: Fri, Oct 28, 2011 2:21 pm
Subject: [U2] OPENSEQ and the LOCKED Option


Unidata 7.1.20 ECLTYPE P
 
Whenever I try to include the LOCKED option in the OPENSEQ statement my
est program does not compile.  If I leave it out it does compile.
 
When two users run this program one executes the OPENSEQ command and the
ther appears hung...no message, nothing.  When the first user closes
he file the second user continues on.
 
Since LOCKED appeared to allow me to tell the other users that the file
s locked and not to give up hope what do you folks do to get around
his dilemma?
 
Thanks.
 
Al
___
2-Users mailing list
2-us...@listserver.u2ug.org
ttp://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and the LOCKED Option

2011-10-28 Thread Colin Alfke
I've usually only used it where I expect one user to be accessing the file
at a time anyway. However, it should (mine does on UD 7.1.6) compile. You
are using an END before the next THEN or ELSE - that might do it.

hth
Colin Alfke
Calgary, Canada

-Original Message-
From: Al DeWitt

Unidata 7.1.20 ECLTYPE P

Whenever I try to include the LOCKED option in the OPENSEQ statement my
test program does not compile.  If I leave it out it does compile.

When two users run this program one executes the OPENSEQ command and the
other appears hung...no message, nothing.  When the first user closes
the file the second user continues on.

Since LOCKED appeared to allow me to tell the other users that the file
is locked and not to give up hope what do you folks do to get around
this dilemma?

Thanks.

Al


___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and the LOCKED Option

2011-10-28 Thread Al DeWitt
Here is my admittedly simple test program and the results:

001: IMPORT.FILE = FILE_IN.CSV   
002: CLOSE.IT = 1  
003: OPENSEQ DELTAIMPORT,IMPORT.FILE TO FILEIN   
004: LOCKED
005:   CRT 'FILE IS LOCKED BY SOMEONE ELSE' ; DUMMY='' ; INPUT DUMMY   
006: ELSE  
007:   ERR.CD = STATUS()   
008:   CRT 'ERROR CODE=':ERR.CD ; DUMMY='' ; INPUT DUMMY   
009:   CLOSE.IT = 0
010: END   
011: IF CLOSE.IT THEN  
012:   CRT 'HOORAY, FILE_IN IS OPENED' ; DUMMY='' ; INPUT DUMMY
013:   CLOSESEQ FILEIN 
014: END   
015: END   


*--: FIB

Filed ALD1 in file BP.

 

Compiling Unibasic: ..\..\..\FLOPROGS\DEV\DEV.IIBASE8\BP8.0\ALD1 in mode
'p'.  
main program: syntax error at or before

line 16 EOF

  ^

Expecting: ELSE

 

compilation failed


It works fine if I take out lines 4 - 5.

Al DeWitt


-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Wjhonson
Sent: Friday, October 28, 2011 4:39 PM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] OPENSEQ and the LOCKED Option


Please provide the exact source, and the exact compilation error message




-Original Message-
From: Al DeWitt adew...@stylmark.com
To: u2-users u2-users@listserver.u2ug.org
Sent: Fri, Oct 28, 2011 2:21 pm
Subject: [U2] OPENSEQ and the LOCKED Option


Unidata 7.1.20 ECLTYPE P
 
Whenever I try to include the LOCKED option in the OPENSEQ statement my
est program does not compile.  If I leave it out it does compile.
 
When two users run this program one executes the OPENSEQ command and the
ther appears hung...no message, nothing.  When the first user closes he
file the second user continues on.
 
Since LOCKED appeared to allow me to tell the other users that the file
s locked and not to give up hope what do you folks do to get around his
dilemma?
 
Thanks.
 
Al
___
2-Users mailing list
2-us...@listserver.u2ug.org
ttp://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and the LOCKED Option

2011-10-28 Thread Colin Alfke
You need to change line 6 to END ELSE (to end the locked clause)

-Original Message-
From: Al DeWitt

Here is my admittedly simple test program and the results:

001: IMPORT.FILE = FILE_IN.CSV   
002: CLOSE.IT = 1  
003: OPENSEQ DELTAIMPORT,IMPORT.FILE TO FILEIN   
004: LOCKED
005:   CRT 'FILE IS LOCKED BY SOMEONE ELSE' ; DUMMY='' ; INPUT DUMMY   
006: ELSE  
007:   ERR.CD = STATUS()   
008:   CRT 'ERROR CODE=':ERR.CD ; DUMMY='' ; INPUT DUMMY   
009:   CLOSE.IT = 0
010: END   
011: IF CLOSE.IT THEN  
012:   CRT 'HOORAY, FILE_IN IS OPENED' ; DUMMY='' ; INPUT DUMMY
013:   CLOSESEQ FILEIN 
014: END   
015: END   


*--: FIB

Filed ALD1 in file BP.

 

Compiling Unibasic: ..\..\..\FLOPROGS\DEV\DEV.IIBASE8\BP8.0\ALD1 in mode
'p'.  
main program: syntax error at or before

line 16 EOF

  ^

Expecting: ELSE

compilation failed


It works fine if I take out lines 4 - 5.

Al DeWitt


___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and the LOCKED Option

2011-10-28 Thread Al DeWitt
That did it!

Thank you very much.

Al DeWitt


-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Colin Alfke
Sent: Friday, October 28, 2011 5:01 PM
To: 'U2 Users List'
Subject: Re: [U2] OPENSEQ and the LOCKED Option

You need to change line 6 to END ELSE (to end the locked clause)

-Original Message-
From: Al DeWitt

Here is my admittedly simple test program and the results:

001: IMPORT.FILE = FILE_IN.CSV   
002: CLOSE.IT = 1  
003: OPENSEQ DELTAIMPORT,IMPORT.FILE TO FILEIN   
004: LOCKED
005:   CRT 'FILE IS LOCKED BY SOMEONE ELSE' ; DUMMY='' ; INPUT DUMMY   
006: ELSE  
007:   ERR.CD = STATUS()   
008:   CRT 'ERROR CODE=':ERR.CD ; DUMMY='' ; INPUT DUMMY   
009:   CLOSE.IT = 0
010: END   
011: IF CLOSE.IT THEN  
012:   CRT 'HOORAY, FILE_IN IS OPENED' ; DUMMY='' ; INPUT DUMMY
013:   CLOSESEQ FILEIN 
014: END   
015: END   


*--: FIB

Filed ALD1 in file BP.

 

Compiling Unibasic: ..\..\..\FLOPROGS\DEV\DEV.IIBASE8\BP8.0\ALD1 in mode
'p'.  
main program: syntax error at or before

line 16 EOF

  ^

Expecting: ELSE

compilation failed


It works fine if I take out lines 4 - 5.

Al DeWitt


___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and Abnormal termination of UV

2010-05-24 Thread Brian Leach
Wol

In BASIC, *EVERYTHING* is a string (apart from file variables). 
Therefore any comparison should be valid.

To be more precise, no.

UniVerse Basic is a run-time typed language (like PHP) not a string
language. So it gets the performance and storage benefits of real types, and
coerces between types under the cover. If you say For I = 1 To 10, and
examine I in the debugger, you will see that it is an integer, not a string.
If you later say I=FRED it will be coerced into a string, as will I :=
FRED or I2 = FRED.

In addition to file variables, there are plenty other structures that are
not coercible into strings: select list handles (from EXECUTE statement,
SELECT.  SOMELIST), XML DOM handles and BCI context handles to name but a
few.

It may seem pedantic, but these distinctions are important when selling the
benefits of language like UniVerse Basic. The word 'untyped' offends some
sectors of the programming community. 'run-time typed' is generally more
acceptable. (and it's funny how many developers sneer at the first mention
of these, until you follow up with the PHP analogy.. and suddenly they see
the light).

Brian




___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and Abnormal termination of UV

2010-05-21 Thread Jacques G.
If your file is opened, then comparing it to an empty string is what will 
cause an invalid data type error.


WHY!!!

If the datatypes don't match, then the result of the comparison is 
FALSE, not INVALID.

It is logically correct to do such a comparison. The result I am looking 
for is the logically correct response. It SHOULD NOT crash the program!

And it worked fine on INFORMATION, why not UV?

It is a bad idea to allow it, it encourages bad programming practices and it 
can hide a bug in your program for example if you do:

READ CAR FROM CARS ELSE CAR = ''
IF CARS #  ''  THEN

Here what was intended was to compare CAR to ''  not CARS but having the S 
there is a typo.
If we don't allow datatypes of different types being compared this bug has a 
greater chance of getting caught during development because the program will 
fail on comparing the file to a null string.

If you use FILEINFO it shows that you know that the variable you are testing is 
a file.

I've seen a similar case where a subroutine was expecting:

SUBROUTINE  ABC (MAT A, MAT B, MAT C)

A programmer only needed the contents of the matrix B and C to call it and did:

CALL ABC(,MAT B, MAT C)

Only thing Matrix ABC puts something in MAT A and since the programmer passed 
an empty string what happens is that the content of Matrix B is over-written 
causing data corruption.

It would probably have been a good idea to detect that since a Matrix was 
expected, it shouldn't be legal to pass a dynamic array to the subroutine.  

Most modern OOP programming languages don't allow for types of different kinds 
to be compared to one another without some way of casting them.  


  
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and Abnormal termination of UV

2010-05-21 Thread Anthony W. Youngman
In message 321088.49154...@web36901.mail.mud.yahoo.com, Jacques G. 
jacque...@yahoo.com writes
If your file is opened, then comparing it to an empty string is what 
will cause an invalid data type error.




WHY!!!



If the datatypes don't match, then the result of the comparison is
FALSE, not INVALID.



It is logically correct to do such a comparison. The result I am looking
for is the logically correct response. It SHOULD NOT crash the program!



And it worked fine on INFORMATION, why not UV?


It is a bad idea to allow it, it encourages bad programming practices 
and it can hide a bug in your program for example if you do:


READ CAR FROM CARS ELSE CAR = ''
IF CARS #  ''  THEN

Here what was intended was to compare CAR to ''  not CARS but having 
the S there is a typo.
If we don't allow datatypes of different types being compared this bug 
has a greater chance of getting caught during development because the 
program will fail on comparing the file to a null string.


If you use FILEINFO it shows that you know that the variable you are 
testing is a file.


The big problem with your attitude is that you are assuming a typed 
language - and even then it's invalid.


In BASIC, *EVERYTHING* is a string (apart from file variables). 
Therefore any comparison should be valid.


And, using your own words against you - it shows that you know that the 
variable you are testing is a file. What if I DON'T know (which is why 
I was doing the test!).


At the end of the day, an IF test for equality should return FALSE on a 
type mismatch, not CRASH. Because FALSE is the *correct* answer. That's 
what I absolutely HATE about artificial stupidity. It thinks it knows 
better than me, and gives me what it thinks I should have, not what I 
asked for.


Cheers,
Wol
--
Anthony W. Youngman pi...@thewolery.demon.co.uk
'Yings, yow graley yin! Suz ae rikt dheu,' said the blue man, taking the
thimble. 'What *is* he?' said Magrat. 'They're gnomes,' said Nanny. The man
lowered the thimble. 'Pictsies!' Carpe Jugulum, Terry Pratchett 1998
Visit the MaVerick web-site - http://www.maverick-dbms.org Open Source Pick
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and Abnormal termination of UV

2010-05-21 Thread fft2001

 I know what you're saying, but just to make sure we're precise I'll add a 
footnote.
The run-time machine doesn't have to find additional memory *each* time you add 
to a dynamic array (as you said perhaps just imprecisely).  Rather, your 
workspace arrays have certain fixed sizes and it's only when you go over this 
size that it will allocate you a new larger area and move the array there.  So 
for example, you get slots that are 50 bytes, 250 bytes, and so on, probably 
implementation dependent.  The run-time machine will allocate you a smaller 
area at first, until it knows you need a bigger one.

Alternatively, garbage collection will return to the available pool, the no 
longer used space for arrays that have shrunk.

I never did any testing to see if the garbage collector actually works *while* 
your program is running or only after the signal that the program is now 
finished.

 

 I do agree however with the observation that reading a large amount of data 
into a dynamic array is *most likely* causing the run-time machine to allocate 
you the entire size of that data in your own *workspace*.  Danger Will 
Robinson!  Warning! Warning!

When it runs out of memory/disk will it wait forever? Or will it halt the 
system?
Try again later, answer fuzzy.

Will Johnson




 

 

-Original Message-
From: John Hester jhes...@momtex.com
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Tue, May 18, 2010 12:31 pm
Subject: Re: [U2] OPENSEQ and Abnormal termination of UV


Reading my own response just made me realize what's going on.  I think
Jerry's response was right.  I remember many years ago (I won't say how
many) when we were on much slower hardware, explaining to a coworker
that it was better to use dimensioned arrays when possible because they
were faster to populate than dynamic arrays.  The reason they're faster
is because the necessary space for them is already reserved in memory.
A dynamic array has to go out and find add'l memory each time you add to
it.  Looks like putting a sequential file in a dimensioned array makes
it go out and reserve a block of memory the size of the entire file.  If
that's the case then making FILEVARS a dynamic array *should* work.

-John

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of John Hester
Sent: Tuesday, May 18, 2010 11:42 AM
To: U2 Users List
Subject: Re: [U2] OPENSEQ and Abnormal termination of UV

Yes, I see your point.  I wonder if the integer gets treated like a
string in the first instance.  I wonder what the result with FILEVARS1
would be.

-John

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Anthony W.
Youngman
Sent: Tuesday, May 18, 2010 7:45 AM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] OPENSEQ and Abnormal termination of UV

In message 
e6179e13392ec14aabcd5272c3aedd61124ec...@exchangesvr.momtex.com, John 
Hester jhes...@momtex.com writes
I think it's something along those lines, but I don't think it's trying
to stick the entire contents of the file into a variable.  What I think
OPENSEQ is doing is keeping track of the position where the EOF mark is
so it will know when the end of the file is reached.  For a file
greater
than 2GB in size, this position is an integer that takes more than 32
bits to store.  UV, being a 32-bit application, is not going to be able
to handle it.  The maximum positive integer value a 32-bit application
can reference is 2147483647.

The problem is, FV.FILE and FILEVARS(1) are *allegedly* *functionally* 
*identical*. An element of a dimensioned array, is supposed to be a 
normal variable in every way shape or form.

The problem is that, in this instance, it clearly isn't because the 
variable works while the element (allegedly identical) causes a crash.

I'd agree with Perry. It's a bug.
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

 
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and Abnormal termination of UV

2010-05-21 Thread Bill Haskett
...That's what I absolutely HATE about artificial stupidity. It 
thinks it knows better than me, and gives me what it thinks I should 
have, not what I asked for.


Then again, I can't imagine it thinks it should CRASH!  :-o

Bill


Anthony W. Youngman said the following on 5/21/2010 5:15 PM:
In message 321088.49154...@web36901.mail.mud.yahoo.com, Jacques G. 
jacque...@yahoo.com writes

[snipped]


[snipped]

At the end of the day, an IF test for equality should return FALSE on 
a type mismatch, not CRASH. Because FALSE is the *correct* answer. 
That's what I absolutely HATE about artificial stupidity. It thinks 
it knows better than me, and gives me what it thinks I should have, 
not what I asked for.


Cheers,
Wol

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and Abnormal termination of UV

2010-05-20 Thread Jacques G.
Oh - that reminds me of something else I'd call a bug. It might well have been 
fixed by now (I met it in 9.6) but you couldn't safely use a file variable in 
an IF statement. Can't remember the details, but it was something like


FVAR = 
some conditional code
OPEN FILE TO FVAR
more code
IF FVAR EQ  THEN
oh the file isn't open, so do whatever

If your file is opened, then comparing it to an empty string is what will cause 
an invalid data type error.   You want to do instead:

IF FILEINFO(FVAR,0) = 0 THEN

Or:

OPEN FILE TO FVAR THEN FLAG.OPEN = 1 ELSE FLAG.OPEN = 0
IF FLAG.OPEN THEN

One error I've seen:

READ CUSTOMER FROM CUSTOMER THEN...

The record item that is being read is the same name as the opened file 
variable... ouch !


  
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and Abnormal termination of UV

2010-05-20 Thread Jacques G.

Using dimmed matrixes is still a lot faster.  

If you have a dynamic array of 10,000 items and you wantA9995 when you 
extract it, it will parse the whole until it passes 9994 @AM then it will 
extract whatever is between the 9994 and 9995.
Having it in a dynamic array is like having a pointer to each @AM position.

This is why the REMOVE command was added for when a dynamic array is processed 
within a for loop.  The REMOVE command keeps track of the position of the last 
AM, VM, SVM used.

One exemple:   
DIM B(10)
A = CONVERT(],@AM,AA]BB]])
MATPARSE B FROM A USING @AM

B now has a pointer to each of the 4 elements of 4:
B(1) -  AA
B(2) - B
B(3) - 
B(4) - 

When you want the third row, you don't have to pass through the contents of 
B(1) and B(2) you have a pointer to the start of the string that contains 
.


I've used dimmed matrixes to speed sorts and binary search algorithms.

One other advantage of a dimmed matrix is that you can use it to pass several 
files as arguments to a subroutine.  With a dynamic array it can only be a file 
or a string.  You don't change a subroutine's signature if you pass  

call MYSUB(MAT FILES,MAT ARGV_IN, MAT ARGV_OUT)

This way you can add to the number of files and arguments of a subroutine 
without changing the number of arguments.  With dynamic arrays you would have 
to add more arguments to add more files. Ei from:

CALL MYSUB(FILE1, ARGV_IN, ARGV_OUT)

to 

CALL MYSUB(FILE1, FILE2, ARGV_IN, ARGV_OUT)

This means each program calling MYSUB has to be modified.



- Original Message 
From: John Hester jhes...@momtex.com
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Tue, May 18, 2010 3:31:25 PM
Subject: Re: [U2] OPENSEQ and Abnormal termination of UV

Reading my own response just made me realize what's going on.  I think
Jerry's response was right.  I remember many years ago (I won't say how
many) when we were on much slower hardware, explaining to a coworker
that it was better to use dimensioned arrays when possible because they
were faster to populate than dynamic arrays.  The reason they're faster
is because the necessary space for them is already reserved in memory.
A dynamic array has to go out and find add'l memory each time you add to
it.  Looks like putting a sequential file in a dimensioned array makes
it go out and reserve a block of memory the size of the entire file.  If
that's the case then making FILEVARS a dynamic array *should* work.

-John


  
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and Abnormal termination of UV

2010-05-20 Thread Anthony W. Youngman
In message 536051.22442...@web36905.mail.mud.yahoo.com, Jacques G. 
jacque...@yahoo.com writes

Oh - that reminds me of something else I'd call a bug. It might well have been 
fixed by now (I met it in 9.6) but you couldn't safely use a file variable
in an IF statement. Can't remember the details, but it was something like




FVAR = 
some conditional code
OPEN FILE TO FVAR
more code
IF FVAR EQ  THEN
oh the file isn't open, so do whatever


If your file is opened, then comparing it to an empty string is what will cause 
an invalid data type error.


WHY!!!

If the datatypes don't match, then the result of the comparison is 
FALSE, not INVALID.


It is logically correct to do such a comparison. The result I am looking 
for is the logically correct response. It SHOULD NOT crash the program!


And it worked fine on INFORMATION, why not UV?

Cheers,
Wol
--
Anthony W. Youngman pi...@thewolery.demon.co.uk
'Yings, yow graley yin! Suz ae rikt dheu,' said the blue man, taking the
thimble. 'What *is* he?' said Magrat. 'They're gnomes,' said Nanny. The man
lowered the thimble. 'Pictsies!' Carpe Jugulum, Terry Pratchett 1998
Visit the MaVerick web-site - http://www.maverick-dbms.org Open Source Pick
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and Abnormal termination of UV

2010-05-19 Thread Rex Gozar
 Anthony W. Youngman pi...@thewolery.demon.co.uk
 'Yings, yow graley yin! Suz ae rikt dheu,' said the blue man, taking the
 thimble. 'What *is* he?' said Magrat. 'They're gnomes,' said Nanny. The man
 lowered the thimble. 'Pictsies!' Carpe Jugulum, Terry Pratchett 1998
 Visit the MaVerick web-site - http://www.maverick-dbms.org Open Source
 Pick

Anthony,

Did you know that clicking on your maverick link in your signature
brings up the janitor's warehouse website?
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and Abnormal termination of UV

2010-05-18 Thread John Hester
Yes, I see your point.  I wonder if the integer gets treated like a
string in the first instance.  I wonder what the result with FILEVARS1
would be.

-John

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Anthony W.
Youngman
Sent: Tuesday, May 18, 2010 7:45 AM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] OPENSEQ and Abnormal termination of UV

In message 
e6179e13392ec14aabcd5272c3aedd61124ec...@exchangesvr.momtex.com, John 
Hester jhes...@momtex.com writes
I think it's something along those lines, but I don't think it's trying
to stick the entire contents of the file into a variable.  What I think
OPENSEQ is doing is keeping track of the position where the EOF mark is
so it will know when the end of the file is reached.  For a file
greater
than 2GB in size, this position is an integer that takes more than 32
bits to store.  UV, being a 32-bit application, is not going to be able
to handle it.  The maximum positive integer value a 32-bit application
can reference is 2147483647.

The problem is, FV.FILE and FILEVARS(1) are *allegedly* *functionally* 
*identical*. An element of a dimensioned array, is supposed to be a 
normal variable in every way shape or form.

The problem is that, in this instance, it clearly isn't because the 
variable works while the element (allegedly identical) causes a crash.

I'd agree with Perry. It's a bug.
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and Abnormal termination of UV

2010-05-18 Thread John Hester
Reading my own response just made me realize what's going on.  I think
Jerry's response was right.  I remember many years ago (I won't say how
many) when we were on much slower hardware, explaining to a coworker
that it was better to use dimensioned arrays when possible because they
were faster to populate than dynamic arrays.  The reason they're faster
is because the necessary space for them is already reserved in memory.
A dynamic array has to go out and find add'l memory each time you add to
it.  Looks like putting a sequential file in a dimensioned array makes
it go out and reserve a block of memory the size of the entire file.  If
that's the case then making FILEVARS a dynamic array *should* work.

-John

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of John Hester
Sent: Tuesday, May 18, 2010 11:42 AM
To: U2 Users List
Subject: Re: [U2] OPENSEQ and Abnormal termination of UV

Yes, I see your point.  I wonder if the integer gets treated like a
string in the first instance.  I wonder what the result with FILEVARS1
would be.

-John

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Anthony W.
Youngman
Sent: Tuesday, May 18, 2010 7:45 AM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] OPENSEQ and Abnormal termination of UV

In message 
e6179e13392ec14aabcd5272c3aedd61124ec...@exchangesvr.momtex.com, John 
Hester jhes...@momtex.com writes
I think it's something along those lines, but I don't think it's trying
to stick the entire contents of the file into a variable.  What I think
OPENSEQ is doing is keeping track of the position where the EOF mark is
so it will know when the end of the file is reached.  For a file
greater
than 2GB in size, this position is an integer that takes more than 32
bits to store.  UV, being a 32-bit application, is not going to be able
to handle it.  The maximum positive integer value a 32-bit application
can reference is 2147483647.

The problem is, FV.FILE and FILEVARS(1) are *allegedly* *functionally* 
*identical*. An element of a dimensioned array, is supposed to be a 
normal variable in every way shape or form.

The problem is that, in this instance, it clearly isn't because the 
variable works while the element (allegedly identical) causes a crash.

I'd agree with Perry. It's a bug.
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and Abnormal termination of UV

2010-05-18 Thread Symeon Breen
Surely it is just a pointer to the file and the position in that file - i
open many multi gigabyte files using openseq and i would not expect the udt
process to allocate tens of Gig at that time for the readseq operations ...
It should be a tiny piece of memory to act as a pointer !! ??

 

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of John Hester
Sent: 18 May 2010 20:31
To: U2 Users List
Subject: Re: [U2] OPENSEQ and Abnormal termination of UV

Reading my own response just made me realize what's going on.  I think
Jerry's response was right.  I remember many years ago (I won't say how
many) when we were on much slower hardware, explaining to a coworker
that it was better to use dimensioned arrays when possible because they
were faster to populate than dynamic arrays.  The reason they're faster
is because the necessary space for them is already reserved in memory.
A dynamic array has to go out and find add'l memory each time you add to
it.  Looks like putting a sequential file in a dimensioned array makes
it go out and reserve a block of memory the size of the entire file.  If
that's the case then making FILEVARS a dynamic array *should* work.

-John

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of John Hester
Sent: Tuesday, May 18, 2010 11:42 AM
To: U2 Users List
Subject: Re: [U2] OPENSEQ and Abnormal termination of UV

Yes, I see your point.  I wonder if the integer gets treated like a
string in the first instance.  I wonder what the result with FILEVARS1
would be.

-John

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Anthony W.
Youngman
Sent: Tuesday, May 18, 2010 7:45 AM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] OPENSEQ and Abnormal termination of UV

In message 
e6179e13392ec14aabcd5272c3aedd61124ec...@exchangesvr.momtex.com, John 
Hester jhes...@momtex.com writes
I think it's something along those lines, but I don't think it's trying
to stick the entire contents of the file into a variable.  What I think
OPENSEQ is doing is keeping track of the position where the EOF mark is
so it will know when the end of the file is reached.  For a file
greater
than 2GB in size, this position is an integer that takes more than 32
bits to store.  UV, being a 32-bit application, is not going to be able
to handle it.  The maximum positive integer value a 32-bit application
can reference is 2147483647.

The problem is, FV.FILE and FILEVARS(1) are *allegedly* *functionally* 
*identical*. An element of a dimensioned array, is supposed to be a 
normal variable in every way shape or form.

The problem is that, in this instance, it clearly isn't because the 
variable works while the element (allegedly identical) causes a crash.

I'd agree with Perry. It's a bug.
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and Abnormal termination of UV

2010-05-18 Thread John Hester
Only the UV or UD developers could say for sure, but I'd venture to
guess that multi-gigabyte sequential files weren't envisioned when the
dimensioned array code was written.  Maybe there's never been a request
to revisit it.  I quit using dimensioned arrays probably around the late
90's when faster hardware seemed to negate any performance advantage.

-John

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Symeon Breen
Sent: Tuesday, May 18, 2010 12:59 PM
To: 'U2 Users List'
Subject: Re: [U2] OPENSEQ and Abnormal termination of UV

Surely it is just a pointer to the file and the position in that file -
i
open many multi gigabyte files using openseq and i would not expect the
udt
process to allocate tens of Gig at that time for the readseq operations
...
It should be a tiny piece of memory to act as a pointer !! ??

 

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of John Hester
Sent: 18 May 2010 20:31
To: U2 Users List
Subject: Re: [U2] OPENSEQ and Abnormal termination of UV

Reading my own response just made me realize what's going on.  I think
Jerry's response was right.  I remember many years ago (I won't say how
many) when we were on much slower hardware, explaining to a coworker
that it was better to use dimensioned arrays when possible because they
were faster to populate than dynamic arrays.  The reason they're faster
is because the necessary space for them is already reserved in memory.
A dynamic array has to go out and find add'l memory each time you add to
it.  Looks like putting a sequential file in a dimensioned array makes
it go out and reserve a block of memory the size of the entire file.  If
that's the case then making FILEVARS a dynamic array *should* work.

-John
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and Abnormal termination of UV

2010-05-18 Thread Brian Leach
 Looks like putting a sequential file in a dimensioned array makes
it go out and reserve a block of memory the size of the entire file. 

Doubtful..

I'm guessing under the hood the array will resolve to a series of pointers
somewhere down the track, but those pointers will need to be cast to
different types depending on what is being stored in the array - a variable,
a file pointer, a sequential file pointer etc. So something in that cast
will be wrong - it might for example be that whatever structure controls a
sequential file originally contained a 32 bit address and now doesn't but
the cast is still expecting that, or that it gets copied with an alignment
change or something similar. 

In other words, typical C bug from a pretty unlikely occurrence.

Brian

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and Abnormal termination of UV

2010-05-18 Thread Anthony W. Youngman
In message 
e6179e13392ec14aabcd5272c3aedd61124ed...@exchangesvr.momtex.com, John 
Hester jhes...@momtex.com writes

Yes, I see your point.  I wonder if the integer gets treated like a
string in the first instance.  I wonder what the result with FILEVARS1
would be.


Illegal assignment.

You can't store a file descriptor in a dynamic array, because it's not a 
character string (it MIGHT be implemented as such, but it doesn't make 
sense to treat it as such, so it's a logical stupidity. I don't know of 
any MV implementation that permits this).


Cheers,
Wol


-John

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Anthony W.
Youngman
Sent: Tuesday, May 18, 2010 7:45 AM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] OPENSEQ and Abnormal termination of UV

In message
e6179e13392ec14aabcd5272c3aedd61124ec...@exchangesvr.momtex.com, John
Hester jhes...@momtex.com writes

I think it's something along those lines, but I don't think it's trying
to stick the entire contents of the file into a variable.  What I think
OPENSEQ is doing is keeping track of the position where the EOF mark is
so it will know when the end of the file is reached.  For a file

greater

than 2GB in size, this position is an integer that takes more than 32
bits to store.  UV, being a 32-bit application, is not going to be able
to handle it.  The maximum positive integer value a 32-bit application
can reference is 2147483647.


The problem is, FV.FILE and FILEVARS(1) are *allegedly* *functionally*
*identical*. An element of a dimensioned array, is supposed to be a
normal variable in every way shape or form.

The problem is that, in this instance, it clearly isn't because the
variable works while the element (allegedly identical) causes a crash.

I'd agree with Perry. It's a bug.
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


--
Anthony W. Youngman pi...@thewolery.demon.co.uk
'Yings, yow graley yin! Suz ae rikt dheu,' said the blue man, taking the
thimble. 'What *is* he?' said Magrat. 'They're gnomes,' said Nanny. The man
lowered the thimble. 'Pictsies!' Carpe Jugulum, Terry Pratchett 1998
Visit the MaVerick web-site - http://www.maverick-dbms.org Open Source Pick
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and Abnormal termination of UV

2010-05-17 Thread Perry Taylor
Just for giggles... what happens if you...

OPENSEQ '/tmp/file.txt' TO FV.TEMP ELSE ...
FILEVARS(1) = FV.TEMP 

??

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Rajesh Menon
Sent: Monday, May 17, 2010 2:56 PM
To: u2-users@listserver.u2ug.org
Subject: [U2] OPENSEQ and Abnormal termination of UV

Does anyone knows what is happening here:
I am trying to open a text file (over 4Gb) using OPENSEQ and storing the
file variable into a array as follows:
COMMON /MYPROG/ FILEVARS(10)
OPENSEQ /tmp/file.txt to FILEVARS(1) ELSE ...
This operation results abnormal termination with fault type error 11.
Fault occurred at address 1c (which is the OPENSEQ command.). If the
file size is less than 2147483647 bytes (2Gb), it works.

Opening the same file using a scalar file variable always work
irrespective of the file size.
OPENSEQ /tmp/file.txt TO FV.FILE ELSE ...

Any reason why the first method failing for +2Gb files? Any workarounds?

Universe: 10.2.7
AIX:  5.3

Thanks
Rajesh Menon

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

CONFIDENTIALITY NOTICE: This e-mail message, including any 
attachments, is for the sole use of the intended recipient(s) 
and may contain confidential and privileged information.  Any
unauthorized review, use, disclosure or distribution is 
prohibited. ZirMed, Inc. has strict policies regarding the 
content of e-mail communications, specifically Protected Health 
Information, any communications containing such material will 
be returned to the originating party with such advisement 
noted. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the 
original message.
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and Abnormal termination of UV

2010-05-17 Thread Dan Goble
You may want to check with your Systems Administrator to be sure your file 
system is setup to support files larger than 2gig

- Original Message -
From: u2-users-boun...@listserver.u2ug.org 
u2-users-boun...@listserver.u2ug.org
To: u2-users@listserver.u2ug.org u2-users@listserver.u2ug.org
Sent: Mon May 17 14:55:30 2010
Subject: [U2] OPENSEQ and Abnormal termination of UV

Does anyone knows what is happening here:
I am trying to open a text file (over 4Gb) using OPENSEQ and storing the file 
variable into a array as follows:
COMMON /MYPROG/ FILEVARS(10)
OPENSEQ /tmp/file.txt to FILEVARS(1) ELSE ...
This operation results abnormal termination with fault type error 11. Fault 
occurred at address 1c (which is the OPENSEQ command.). If the file size is 
less than 2147483647 bytes (2Gb), it works.

Opening the same file using a scalar file variable always work irrespective of 
the file size.
OPENSEQ /tmp/file.txt TO FV.FILE ELSE ...

Any reason why the first method failing for +2Gb files? Any workarounds?

Universe: 10.2.7
AIX:  5.3

Thanks
Rajesh Menon

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and Abnormal termination of UV

2010-05-17 Thread Rajesh Menon
I already tried that. Same Error and the fault occurring at FILEVAR(1) = 
FV.TEMP line.

Thanks,
Rajesh
-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Perry Taylor
Sent: Monday, May 17, 2010 11:59 AM
To: U2 Users List
Subject: Re: [U2] OPENSEQ and Abnormal termination of UV

Just for giggles... what happens if you...

OPENSEQ '/tmp/file.txt' TO FV.TEMP ELSE ...
FILEVARS(1) = FV.TEMP 

??

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Rajesh Menon
Sent: Monday, May 17, 2010 2:56 PM
To: u2-users@listserver.u2ug.org
Subject: [U2] OPENSEQ and Abnormal termination of UV

Does anyone knows what is happening here:
I am trying to open a text file (over 4Gb) using OPENSEQ and storing the
file variable into a array as follows:
COMMON /MYPROG/ FILEVARS(10)
OPENSEQ /tmp/file.txt to FILEVARS(1) ELSE ...
This operation results abnormal termination with fault type error 11.
Fault occurred at address 1c (which is the OPENSEQ command.). If the
file size is less than 2147483647 bytes (2Gb), it works.

Opening the same file using a scalar file variable always work
irrespective of the file size.
OPENSEQ /tmp/file.txt TO FV.FILE ELSE ...

Any reason why the first method failing for +2Gb files? Any workarounds?

Universe: 10.2.7
AIX:  5.3

Thanks
Rajesh Menon

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

CONFIDENTIALITY NOTICE: This e-mail message, including any 
attachments, is for the sole use of the intended recipient(s) 
and may contain confidential and privileged information.  Any
unauthorized review, use, disclosure or distribution is 
prohibited. ZirMed, Inc. has strict policies regarding the 
content of e-mail communications, specifically Protected Health 
Information, any communications containing such material will 
be returned to the originating party with such advisement 
noted. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the 
original message.
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and Abnormal termination of UV

2010-05-17 Thread Rajesh Menon
Yes file system is setup to support +2Gb files. As I mentioned I can open the 
file using a scalar file variable. Problem happening only with the combination 
of +2Gb and using array variable.

Thanks,
Rajesh

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Dan Goble
Sent: Monday, May 17, 2010 12:00 PM
To: 'u2-users@listserver.u2ug.org'
Subject: Re: [U2] OPENSEQ and Abnormal termination of UV

You may want to check with your Systems Administrator to be sure your file 
system is setup to support files larger than 2gig

- Original Message -
From: u2-users-boun...@listserver.u2ug.org 
u2-users-boun...@listserver.u2ug.org
To: u2-users@listserver.u2ug.org u2-users@listserver.u2ug.org
Sent: Mon May 17 14:55:30 2010
Subject: [U2] OPENSEQ and Abnormal termination of UV

Does anyone knows what is happening here:
I am trying to open a text file (over 4Gb) using OPENSEQ and storing the file 
variable into a array as follows:
COMMON /MYPROG/ FILEVARS(10)
OPENSEQ /tmp/file.txt to FILEVARS(1) ELSE ...
This operation results abnormal termination with fault type error 11. Fault 
occurred at address 1c (which is the OPENSEQ command.). If the file size is 
less than 2147483647 bytes (2Gb), it works.

Opening the same file using a scalar file variable always work irrespective of 
the file size.
OPENSEQ /tmp/file.txt TO FV.FILE ELSE ...

Any reason why the first method failing for +2Gb files? Any workarounds?

Universe: 10.2.7
AIX:  5.3

Thanks
Rajesh Menon

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and Abnormal termination of UV

2010-05-17 Thread Buffington, Wyatt
I far as I know. The OPENSEQ statement requires both a file name and a
record name.
(i.e.: OPENSEQ DATA.DIRECTORY, FLAT.FILE.NAME TO F.TEMP ELSE ...)

HTH


-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Rajesh Menon
Sent: Monday, May 17, 2010 2:09 PM
To: U2 Users List
Subject: Re: [U2] OPENSEQ and Abnormal termination of UV

I already tried that. Same Error and the fault occurring at FILEVAR(1) =
FV.TEMP line.

Thanks,
Rajesh
-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Perry Taylor
Sent: Monday, May 17, 2010 11:59 AM
To: U2 Users List
Subject: Re: [U2] OPENSEQ and Abnormal termination of UV

Just for giggles... what happens if you...

OPENSEQ '/tmp/file.txt' TO FV.TEMP ELSE ...
FILEVARS(1) = FV.TEMP 

??

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Rajesh Menon
Sent: Monday, May 17, 2010 2:56 PM
To: u2-users@listserver.u2ug.org
Subject: [U2] OPENSEQ and Abnormal termination of UV

Does anyone knows what is happening here:
I am trying to open a text file (over 4Gb) using OPENSEQ and storing the
file variable into a array as follows:
COMMON /MYPROG/ FILEVARS(10)
OPENSEQ /tmp/file.txt to FILEVARS(1) ELSE ...
This operation results abnormal termination with fault type error 11.
Fault occurred at address 1c (which is the OPENSEQ command.). If the
file size is less than 2147483647 bytes (2Gb), it works.

Opening the same file using a scalar file variable always work
irrespective of the file size.
OPENSEQ /tmp/file.txt TO FV.FILE ELSE ...

Any reason why the first method failing for +2Gb files? Any workarounds?

Universe: 10.2.7
AIX:  5.3

Thanks
Rajesh Menon

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

CONFIDENTIALITY NOTICE: This e-mail message, including any attachments,
is for the sole use of the intended recipient(s) and may contain
confidential and privileged information.  Any unauthorized review, use,
disclosure or distribution is prohibited. ZirMed, Inc. has strict
policies regarding the content of e-mail communications, specifically
Protected Health Information, any communications containing such
material will be returned to the originating party with such advisement
noted. If you are not the intended recipient, please contact the sender
by reply e-mail and destroy all copies of the original message.
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and Abnormal termination of UV

2010-05-17 Thread jpb-u2ug
Let me see, can it be because you are trying to cram over 4 GB of data into
a single cell. Unlike the OPEN statement that just puts the file variable
into a variable, the OPENSEQ opens the whole file to the variable.

Jerry Banker

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Rajesh Menon
Sent: Monday, May 17, 2010 1:56 PM
To: u2-users@listserver.u2ug.org
Subject: [U2] OPENSEQ and Abnormal termination of UV

Does anyone knows what is happening here:
I am trying to open a text file (over 4Gb) using OPENSEQ and storing the
file variable into a array as follows:
COMMON /MYPROG/ FILEVARS(10)
OPENSEQ /tmp/file.txt to FILEVARS(1) ELSE ...
This operation results abnormal termination with fault type error 11. Fault
occurred at address 1c (which is the OPENSEQ command.). If the file size is
less than 2147483647 bytes (2Gb), it works.

Opening the same file using a scalar file variable always work irrespective
of the file size.
OPENSEQ /tmp/file.txt TO FV.FILE ELSE ...

Any reason why the first method failing for +2Gb files? Any workarounds?

Universe: 10.2.7
AIX:  5.3

Thanks
Rajesh Menon

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and Abnormal termination of UV

2010-05-17 Thread Marc A Hilbert
What happens wif you open to regular variable then pass it over to the
array:
OPENSEQ  TO FVAR
FILEVARS(1) = FVAR
?
Regards,
Marc


-Mensaje original-
De: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] En nombre de Rajesh Menon
Enviado el: lunes, 17 de mayo de 2010 16:12
Para: U2 Users List
Asunto: Re: [U2] OPENSEQ and Abnormal termination of UV

Yes file system is setup to support +2Gb files. As I mentioned I can open
the file using a scalar file variable. Problem happening only with the
combination of +2Gb and using array variable.

Thanks,
Rajesh

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Dan Goble
Sent: Monday, May 17, 2010 12:00 PM
To: 'u2-users@listserver.u2ug.org'
Subject: Re: [U2] OPENSEQ and Abnormal termination of UV

You may want to check with your Systems Administrator to be sure your file
system is setup to support files larger than 2gig

- Original Message -
From: u2-users-boun...@listserver.u2ug.org
u2-users-boun...@listserver.u2ug.org
To: u2-users@listserver.u2ug.org u2-users@listserver.u2ug.org
Sent: Mon May 17 14:55:30 2010
Subject: [U2] OPENSEQ and Abnormal termination of UV

Does anyone knows what is happening here:
I am trying to open a text file (over 4Gb) using OPENSEQ and storing the
file variable into a array as follows:
COMMON /MYPROG/ FILEVARS(10)
OPENSEQ /tmp/file.txt to FILEVARS(1) ELSE ...
This operation results abnormal termination with fault type error 11. Fault
occurred at address 1c (which is the OPENSEQ command.). If the file size is
less than 2147483647 bytes (2Gb), it works.

Opening the same file using a scalar file variable always work irrespective
of the file size.
OPENSEQ /tmp/file.txt TO FV.FILE ELSE ...

Any reason why the first method failing for +2Gb files? Any workarounds?

Universe: 10.2.7
AIX:  5.3

Thanks
Rajesh Menon

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and Abnormal termination of UV

2010-05-17 Thread Perry Taylor
I'd call this one a bug.  I just tried the following on 10.2.7 on
RHEL5...

  OPENSEQ '/data/trax/CLM.IDX/OVER.30' TO SEQ.TEST ELSE ABORT

  STATUS FS FROM SEQ.TEST ELSE ABORT

  CLOSESEQ SEQ.TEST

  CRT 'FILE SIZE = ': FS6

I get...

FILE SIZE = 10146506752

But if I run...

  DIM FVARS(10)

  OPENSEQ '/data/trax/CLM.IDX/OVER.30' TO FVARS(1) ELSE ABORT

  STATUS FS FROM FVARS(1) ELSE ABORT

  CLOSESEQ FVARS(1)

  CRT 'FILE SIZE = ': FS6

I get...

Abnormal termination of UniVerse.
Fault type is 11.  Layer type is BASIC run machine.
Fault occurred in BASIC program PTEST at address 5a.


-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Marc A
Hilbert
Sent: Monday, May 17, 2010 3:41 PM
To: 'U2 Users List'
Subject: Re: [U2] OPENSEQ and Abnormal termination of UV

What happens wif you open to regular variable then pass it over to the
array:
OPENSEQ  TO FVAR
FILEVARS(1) = FVAR
?
Regards,
Marc


-Mensaje original-
De: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] En nombre de Rajesh Menon
Enviado el: lunes, 17 de mayo de 2010 16:12
Para: U2 Users List
Asunto: Re: [U2] OPENSEQ and Abnormal termination of UV

Yes file system is setup to support +2Gb files. As I mentioned I can
open
the file using a scalar file variable. Problem happening only with the
combination of +2Gb and using array variable.

Thanks,
Rajesh

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Dan Goble
Sent: Monday, May 17, 2010 12:00 PM
To: 'u2-users@listserver.u2ug.org'
Subject: Re: [U2] OPENSEQ and Abnormal termination of UV

You may want to check with your Systems Administrator to be sure your
file
system is setup to support files larger than 2gig

- Original Message -
From: u2-users-boun...@listserver.u2ug.org
u2-users-boun...@listserver.u2ug.org
To: u2-users@listserver.u2ug.org u2-users@listserver.u2ug.org
Sent: Mon May 17 14:55:30 2010
Subject: [U2] OPENSEQ and Abnormal termination of UV

Does anyone knows what is happening here:
I am trying to open a text file (over 4Gb) using OPENSEQ and storing the
file variable into a array as follows:
COMMON /MYPROG/ FILEVARS(10)
OPENSEQ /tmp/file.txt to FILEVARS(1) ELSE ...
This operation results abnormal termination with fault type error 11.
Fault
occurred at address 1c (which is the OPENSEQ command.). If the file size
is
less than 2147483647 bytes (2Gb), it works.

Opening the same file using a scalar file variable always work
irrespective
of the file size.
OPENSEQ /tmp/file.txt TO FV.FILE ELSE ...

Any reason why the first method failing for +2Gb files? Any workarounds?

Universe: 10.2.7
AIX:  5.3

Thanks
Rajesh Menon

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

CONFIDENTIALITY NOTICE: This e-mail message, including any 
attachments, is for the sole use of the intended recipient(s) 
and may contain confidential and privileged information.  Any
unauthorized review, use, disclosure or distribution is 
prohibited. ZirMed, Inc. has strict policies regarding the 
content of e-mail communications, specifically Protected Health 
Information, any communications containing such material will 
be returned to the originating party with such advisement 
noted. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the 
original message.
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and Abnormal termination of UV

2010-05-17 Thread John Hester
I think it's something along those lines, but I don't think it's trying
to stick the entire contents of the file into a variable.  What I think
OPENSEQ is doing is keeping track of the position where the EOF mark is
so it will know when the end of the file is reached.  For a file greater
than 2GB in size, this position is an integer that takes more than 32
bits to store.  UV, being a 32-bit application, is not going to be able
to handle it.  The maximum positive integer value a 32-bit application
can reference is 2147483647.

One workaround might be to use EXECUTE to shell out to an OS-level
command or script that parses the file out into multiple smaller temp
files that can then be accessed by UV.

-John

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of jpb-u2ug
Sent: Monday, May 17, 2010 12:33 PM
To: 'U2 Users List'
Subject: Re: [U2] OPENSEQ and Abnormal termination of UV

Let me see, can it be because you are trying to cram over 4 GB of data
into
a single cell. Unlike the OPEN statement that just puts the file
variable
into a variable, the OPENSEQ opens the whole file to the variable.

Jerry Banker

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Rajesh Menon
Sent: Monday, May 17, 2010 1:56 PM
To: u2-users@listserver.u2ug.org
Subject: [U2] OPENSEQ and Abnormal termination of UV

Does anyone knows what is happening here:
I am trying to open a text file (over 4Gb) using OPENSEQ and storing the
file variable into a array as follows:
COMMON /MYPROG/ FILEVARS(10)
OPENSEQ /tmp/file.txt to FILEVARS(1) ELSE ...
This operation results abnormal termination with fault type error 11.
Fault
occurred at address 1c (which is the OPENSEQ command.). If the file size
is
less than 2147483647 bytes (2Gb), it works.

Opening the same file using a scalar file variable always work
irrespective
of the file size.
OPENSEQ /tmp/file.txt TO FV.FILE ELSE ...

Any reason why the first method failing for +2Gb files? Any workarounds?

Universe: 10.2.7
AIX:  5.3

Thanks
Rajesh Menon

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] OPENSEQ and Abnormal termination of UV

2010-05-17 Thread aelwood
Normally when I run into a statement that doesn't like mv or dimmed arrays I 
just assign before or after

Like:
SEARCH.FOR = ABC1,J
LOCATE SEARCH.FOR IN DEF SETTING bla bla bla

or in this case

OPENSEQ '/data/trax/CLM.IDX/OVER.30' TO SEQ.TEST ELSE ABORT
FVARS(1) = SEQ.TEST

I haven't tested this to see if it works - I have my own dragons to slay right 
now  :-)

 Perry Taylor perry.tay...@zirmed.com wrote: 

=
I'd call this one a bug.  I just tried the following on 10.2.7 on
RHEL5...

  OPENSEQ '/data/trax/CLM.IDX/OVER.30' TO SEQ.TEST ELSE ABORT

  STATUS FS FROM SEQ.TEST ELSE ABORT

  CLOSESEQ SEQ.TEST

  CRT 'FILE SIZE = ': FS6

I get...

FILE SIZE = 10146506752

But if I run...

  DIM FVARS(10)

  OPENSEQ '/data/trax/CLM.IDX/OVER.30' TO FVARS(1) ELSE ABORT

  STATUS FS FROM FVARS(1) ELSE ABORT

  CLOSESEQ FVARS(1)

  CRT 'FILE SIZE = ': FS6

I get...

Abnormal termination of UniVerse.
Fault type is 11.  Layer type is BASIC run machine.
Fault occurred in BASIC program PTEST at address 5a.


-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Marc A
Hilbert
Sent: Monday, May 17, 2010 3:41 PM
To: 'U2 Users List'
Subject: Re: [U2] OPENSEQ and Abnormal termination of UV

What happens wif you open to regular variable then pass it over to the
array:
OPENSEQ  TO FVAR
FILEVARS(1) = FVAR
?
Regards,
Marc


-Mensaje original-
De: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] En nombre de Rajesh Menon
Enviado el: lunes, 17 de mayo de 2010 16:12
Para: U2 Users List
Asunto: Re: [U2] OPENSEQ and Abnormal termination of UV

Yes file system is setup to support +2Gb files. As I mentioned I can
open
the file using a scalar file variable. Problem happening only with the
combination of +2Gb and using array variable.

Thanks,
Rajesh

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Dan Goble
Sent: Monday, May 17, 2010 12:00 PM
To: 'u2-users@listserver.u2ug.org'
Subject: Re: [U2] OPENSEQ and Abnormal termination of UV

You may want to check with your Systems Administrator to be sure your
file
system is setup to support files larger than 2gig

- Original Message -
From: u2-users-boun...@listserver.u2ug.org
u2-users-boun...@listserver.u2ug.org
To: u2-users@listserver.u2ug.org u2-users@listserver.u2ug.org
Sent: Mon May 17 14:55:30 2010
Subject: [U2] OPENSEQ and Abnormal termination of UV

Does anyone knows what is happening here:
I am trying to open a text file (over 4Gb) using OPENSEQ and storing the
file variable into a array as follows:
COMMON /MYPROG/ FILEVARS(10)
OPENSEQ /tmp/file.txt to FILEVARS(1) ELSE ...
This operation results abnormal termination with fault type error 11.
Fault
occurred at address 1c (which is the OPENSEQ command.). If the file size
is
less than 2147483647 bytes (2Gb), it works.

Opening the same file using a scalar file variable always work
irrespective
of the file size.
OPENSEQ /tmp/file.txt TO FV.FILE ELSE ...

Any reason why the first method failing for +2Gb files? Any workarounds?

Universe: 10.2.7
AIX:  5.3

Thanks
Rajesh Menon

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

CONFIDENTIALITY NOTICE: This e-mail message, including any 
attachments, is for the sole use of the intended recipient(s) 
and may contain confidential and privileged information.  Any
unauthorized review, use, disclosure or distribution is 
prohibited. ZirMed, Inc. has strict policies regarding the 
content of e-mail communications, specifically Protected Health 
Information, any communications containing such material will 
be returned to the originating party with such advisement 
noted. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the 
original message.
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


RE: [U2] openseq question

2006-01-05 Thread Jeff Powell
Thank you all. It is working now with the VOC pointer. It is much
simpler now that I don't care what account I'm in.

One final question. 

I have downloaded many of the pdfs ( UniBasic command ref., Using
unidata, SB+ Solutions, ...) from the IBM site but where is this
documented? Are there any books ( online or otherwise ) that a novice to
unidata programming could refer to in cases like this? What I've looked
at so far is more like a quick reference and doesn't really dive into
detail. For example the difference handling absolute-path and VOC
pointer with using the full path vs. path,rec-id approach.


Thanks again,

Jeff


On Wed, 2006-01-04 at 19:04 -0700, Kevin King wrote:

 Jeff, if the VOC entry is MFG.DATA.IPS.TMP then the OPEN is:
 
 OPEN MFG.DATA.IPS.TMP, MTR.REC TO ...
 
 Not the concatenated thing you had in your post.
 
 -K
 ---
 u2-users mailing list
 u2-users@listserver.u2ug.org
 To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] openseq question

2006-01-05 Thread Allen E. Elwood
Gaaa!  no...most of the files I've uploaded were measly little files.  Tiny,
little itty bitty files.  Like specs on the wall small.  Mostly forecast
files where you just have 12 three to four char qty's for a couple thousand
parts.

And you gotta realize that people get used to their graphs.  In the
corporate world people like warm and fuzziesstuff that costs a lot of
system resources and adds no value but makes them feel good.  So they get to
see that the upload is going to take ten minutes so off to the break room
they go.  And yesI can guarantee that the files will be small because
the company doesn't exist any more ;)

Warm and fuzzies.  I had a morning report that I spent probably close to
1000 hours on, that would break out projections for the end of the month and
compare it to budget and do crazy stuff like show how much more warehouses
had to ship, or how much less to make the projection for the EOM.  Like, as
if seeing the shortage at the end of the month would make the customers
order more

Butit made the guy setting in the top floor at the big desk feel good.
Total waste of time, but he felt good.  Company is gone now, but he felt
good.

*

==
SCREEN.GRAPH:
  DONE.PCT=INT(((RECORDS.READ*100)/SELECTED)+.5)
  SMSG=DONE.PCT:' Percent Done, ':RECORDS.READ:' Records Read out of
':SELECTED:' selected'
  CC=40-(INT(LEN(SMSG)/2))
  CRT L(10):C(CC):SMSG:EOL
  DONE.CNTR=INT((DONE.PCT*60+50)/100)
  CRT L(12):C(10):STR(LX,DONE.CNTR)
  CRT L(13):C(10):STR(LX,DONE.CNTR)
  SMSG='Projected Finish Time :
':OCONVTIME()-WAS)/DONE.PCT)*100)+WAS,'MTHS')
  CC=40-(INT(LEN(SMSG)/2))
  CRT L(15):C(CC):SMSG:EOL
  SMSG='Current Time : ':OCONV(TIME(),'MTHS')
  CC=40-(INT(LEN(SMSG)/2))
  CRT L(16):C(CC):SMSG:EOL
  CRT L(20):C(1):
RETURN
* =
ACTUAL.FINISH.TIME:
  SMSG='Actual Finish Time : ':OCONV(TIME(),'MTHS')
  CC=40-(INT(LEN(SMSG)/2))
  CRT L(17):C(CC):SMSG:EOL
  CRT L(20):C(1):
RETURN
*

==

Allen E. Elwood
www.tortillafc.com


-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Timothy Snyder
Sent: Wednesday, January 04, 2006 19:12
To: u2-users@listserver.u2ug.org
Subject: RE: [U2] openseq question


Allen E. Elwood wrote on 01/04/2006 01:29:47 PM:

 I've always found it helpful to open the file/record in 'regular' mode
first
 to find out if the directory entry worked or possibly to write a null
record
 if it didn't.

So, if the O/S-level file is multi-megabytes, you're reading the whole
thing into memory?  That could cause problems with shared memory and will
certainly create a burden on the system.  It also kind of defeats the
purpose of using a sequential file, since you're reading the whole thing
in, then opening it again and reading through the entire file a second
time with READSEQ.  Since you've incurred the memory and performance hit
to pull the whole thing into a variable, you might as well waltz through
that variable to extract the lines an attribute at a time with REMOVE or
READNEXT.

If you're following this practice only on small files, and only
infrequently, it's probably OK, but how can you guarantee that will always
be the case?


Tim Snyder
Consulting I/T Specialist , U2 Professional Services
North American Lab Services
DB2 Information Management, IBM Software Group
717-545-6403
[EMAIL PROTECTED]
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] openseq question

2006-01-04 Thread Brian Leach
Jeff,

AFAIR OpenSeq on UniData looks for either a path name, or if you specify an
item id it looks for an item in a directory file (not a path). 

So you would need to either

A) OPENSEQ /tmp/ : MTR.REC TO F.MTR.ROW.FILE ... 

Or

B) create a file pointer to /tmp (e.g. named TMP) and then
 OPENSEQ TMP,MTR.REC TO F.MTR.ROW.FILE ...

Brian

 

 -Original Message-
 From: [EMAIL PROTECTED] 
 [mailto:[EMAIL PROTECTED] On Behalf Of Jeff Powell
 Sent: 04 January 2006 14:31
 To: u2 users group
 Subject: [U2] openseq question
 
 Happy New Year.
 
 I am having trouble with the openseq function in UniData. We 
 are operation in Pick mode.
 
 Openseq can't find the specified file at path,filename. Is 
 there an assumed prefix?
 
 Here is the code frag that is failing.
 
 MTR.FILE.PATH='/tmp'
 OPENSEQ  MTR.FILE.PATH, MTR.REC TO F.MTR.ROW.FILE ELSE
   EXECUTE '!touch ':MTR.FILE.PATH:/:MTR.REC
   OPENSEQ  MTR.FILE.PATH, MTR.REC TO F.MTR.ROW.FILE ELSE 
 CALL SB.DISP(3,TROUBLE OPENING
 :MTR.FILE.PATH:/:MTR.REC: [E:STATUS():])
 GO PGM.EXIT
   END
 END
 
 Thanks,
 
 Jeff
 ---
 u2-users mailing list
 u2-users@listserver.u2ug.org
 To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] openseq question

2006-01-04 Thread Baakkonen, Rodney A (Rod) 46K
Is it a permissions problem?

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Jeff Powell
Sent: Wednesday, January 04, 2006 8:31 AM
To: u2 users group
Subject: [U2] openseq question


Happy New Year.

I am having trouble with the openseq function in UniData. We are
operation in Pick mode.

Openseq can't find the specified file at path,filename. Is there an
assumed prefix?

Here is the code frag that is failing.

MTR.FILE.PATH='/tmp'
OPENSEQ  MTR.FILE.PATH, MTR.REC TO F.MTR.ROW.FILE ELSE
  EXECUTE '!touch ':MTR.FILE.PATH:/:MTR.REC
  OPENSEQ  MTR.FILE.PATH, MTR.REC TO F.MTR.ROW.FILE ELSE 
CALL SB.DISP(3,TROUBLE OPENING
:MTR.FILE.PATH:/:MTR.REC: [E:STATUS():])
GO PGM.EXIT
  END
END

Thanks,

Jeff
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] openseq question

2006-01-04 Thread Piers Angliss
Jeff,

I think Openseq looks either for a fully specified path to the file as in :
OPENSEQ /tmp/recordname TO F.MTR.ROW ELSE

or it understands the filename, recordname construct but looks for the
filename in the VOC, as in

OPENSEQ TMPFIL, recordname to F.MTR.ROW ELSE...
where TMPFIL is a DIR type VOC entry pointing to /tmp

but it can't cope with your construct which is effectively
OPENSEQ '/tmp', recordname

hth

Piers

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Jeff Powell
Sent: 04 January 2006 14:31
To: u2 users group
Subject: [U2] openseq question


Happy New Year.

I am having trouble with the openseq function in UniData. We are
operation in Pick mode.

Openseq can't find the specified file at path,filename. Is there an
assumed prefix?

Here is the code frag that is failing.

MTR.FILE.PATH='/tmp'
OPENSEQ  MTR.FILE.PATH, MTR.REC TO F.MTR.ROW.FILE ELSE
  EXECUTE '!touch ':MTR.FILE.PATH:/:MTR.REC
  OPENSEQ  MTR.FILE.PATH, MTR.REC TO F.MTR.ROW.FILE ELSE
CALL SB.DISP(3,TROUBLE OPENING
:MTR.FILE.PATH:/:MTR.REC: [E:STATUS():])
GO PGM.EXIT
  END
END

Thanks,

Jeff
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] openseq question

2006-01-04 Thread Jeff Powell
No. /tmp is an absolute path.


On Wed, 2006-01-04 at 09:47 -0500, Koser, Mike wrote:

 Jeff
 Is '/tmp' in the VOC?
 Mike
 
 
 -Original Message-
 From: Jeff Powell [mailto:[EMAIL PROTECTED]
 Sent: Wednesday, January 04, 2006 9:31 AM
 To: u2 users group
 Subject: [U2] openseq question
 
 
 Happy New Year.
 
 I am having trouble with the openseq function in UniData. We are
 operation in Pick mode.
 
 Openseq can't find the specified file at path,filename. Is there an
 assumed prefix?
 
 Here is the code frag that is failing.
 
 MTR.FILE.PATH='/tmp'
 OPENSEQ  MTR.FILE.PATH, MTR.REC TO F.MTR.ROW.FILE ELSE
   EXECUTE '!touch ':MTR.FILE.PATH:/:MTR.REC
   OPENSEQ  MTR.FILE.PATH, MTR.REC TO F.MTR.ROW.FILE ELSE 
 CALL SB.DISP(3,TROUBLE OPENING
 :MTR.FILE.PATH:/:MTR.REC: [E:STATUS():])
 GO PGM.EXIT
   END
 END
 
 Thanks,
 
 Jeff
 ---
 u2-users mailing list
 u2-users@listserver.u2ug.org
 To unsubscribe please visit http://listserver.u2ug.org/
 
 __
 This e-mail has been scanned by MCI Managed Email Content Service, using
 Skeptic(tm) technology powered by MessageLabs. For more information on MCI's
 Managed Email Content Service, visit http://www.mci.com.
 __
 
 __
 This e-mail has been scanned by MCI Managed Email Content Service, using 
 Skeptic(tm) technology powered by MessageLabs. For more information on MCI's 
 Managed Email  Content Service, visit http://www.mci.com.
 __
 ---
 u2-users mailing list
 u2-users@listserver.u2ug.org
 To unsubscribe please visit http://listserver.u2ug.org/

Jeff Powell

IT Manager
Industrial Piping Specialists
606 N. 145th Ave. E.
Tulsa, OK 74166
(918) 270-6311
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] openseq question

2006-01-04 Thread colin.alfke
Your syntax is a little off. When you use the seq.file.name, record.id
syntax then seq.file.name has to be a dir type file. You will have to
either create a voc entry for /tmp, eg.:

TMP.DIR
001 DIR
002 /tmp
003 D_VOC

And then you should be able to: MTR.FILE.PATH = TMP.DIR

Or you can OPENSEQ MTR.FILE.PATH:/MTR.REC

Hth
Colin Alfke
Calgary Canada

-Original Message-
From: Jeff Powell

Happy New Year.

I am having trouble with the openseq function in UniData. We 
are operation in Pick mode.

Openseq can't find the specified file at path,filename. Is 
there an assumed prefix?

Here is the code frag that is failing.

MTR.FILE.PATH='/tmp'
OPENSEQ  MTR.FILE.PATH, MTR.REC TO F.MTR.ROW.FILE ELSE
  EXECUTE '!touch ':MTR.FILE.PATH:/:MTR.REC
  OPENSEQ  MTR.FILE.PATH, MTR.REC TO F.MTR.ROW.FILE ELSE 
CALL SB.DISP(3,TROUBLE OPENING :MTR.FILE.PATH:/:MTR.REC:
[E:STATUS():])
GO PGM.EXIT
  END
END

Thanks,

Jeff
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] openseq question

2006-01-04 Thread Bob Woodward
You need to have MTR.FILE.PATH open as a file handle, first.  You can do
one of the following:

MTR.FILE.PATH='/tmp'
OPEN MTR.FILE.PATH TO MTR.FILE ELSE STOP
MTR.REC = 'RECID'
OPENSEQ MTR.FILE,MTR.REC TO F.MTR.ROW.FILE ELSE
  [what you already have]
END

Or open the full path directly:

MTR.FILE.PATH='/tmp'
MTR.REC='RECID'
OPENSEQ MTR.FILE.PATH:'/':MTR.REC TO F.MTR.ROW.FILE ELSE
  [what you already have]
END

BobW
 
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Jeff Powell
Sent: Wednesday, January 04, 2006 6:31 AM
To: u2 users group
Subject: [U2] openseq question

Happy New Year.

I am having trouble with the openseq function in UniData. We are
operation in Pick mode.

Openseq can't find the specified file at path,filename. Is there an
assumed prefix?

Here is the code frag that is failing.

MTR.FILE.PATH='/tmp'
OPENSEQ  MTR.FILE.PATH, MTR.REC TO F.MTR.ROW.FILE ELSE
  EXECUTE '!touch ':MTR.FILE.PATH:/:MTR.REC
  OPENSEQ  MTR.FILE.PATH, MTR.REC TO F.MTR.ROW.FILE ELSE 
CALL SB.DISP(3,TROUBLE OPENING
:MTR.FILE.PATH:/:MTR.REC: [E:STATUS():])
GO PGM.EXIT
  END
END

Thanks,

Jeff
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] openseq question

2006-01-04 Thread Kevin King
I've actually had problems with various versions of Unidata and
CLOSESEQ releasing the file when opening a full path.  Opening under a
VOC DIR-pointer has never exhibited that problem, so I'd recommend the
VOC pointer approach over using a full path.

-Kevin
[EMAIL PROTECTED]
http://www.PrecisOnline.com
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] openseq question

2006-01-04 Thread Dana Baron
Several years ago I created a little utility to open sequential files as
needed. It's pretty robust; hasn't given me much trouble over the years.
Like Kevin, I've had problems with the full path version of openseq, so my
utility converts full path mode to VOC pointer mode and creates the VOC
pointer if it doesn't already exist.

I'll include it below and attach it in text form.

Dana Baron
System Manager
Smugglers' Notch Resort


SUBROUTINE OPEN_UNIX_FILE (UNIX.FN, MODE, UNIX.FILE, ERR.CODE)
!**
!   SYSTEM: AHS
!   MODULE: UTILITY
!   PROGRAM:OPEN_UNIX_FILE
!
!   DESCRIPTION:This subroutine opens a sequential file. Sequential
!   files can be used to export Unidata data to UNIX.
!
!   Notes:  The parameters passed to this routine are:
!
!   UNIX.FN   - the full file name of the file to open.
!   MODE  - expects the following choices:
!   C - create a new file
!   U - update existing file (error message if not there)
!   UC- update the file if it exists, create a new file if
!   it doesn't exist.
!   UNIX.FILE - the file reference num returned to calling program
!   ERR.CODE - Error code to indicate results as follows:
!   0 = No error. Everthing is OK.
!   1 = (Fatal) Can't open the VOC item for the directory
!   2 = (Info) VOC item for directory already defined
!   3 = (Info) In C mode, file exists so renamed
!   4 = (Warning) In U mode, file does not exist
!   5 = (Fatal, calling program bug) Invalid mode parameter
!
!**
!   MODIFICATION HISTORY
!
! EDIT DATE WHO REASON/DESCRIPTION
!
! 07/12/96  GDB Created
!
! 11/14/97  GDB Added UC mode to update file if it exists, create
!   the file if it doesn't exist.
!
! 02/15/01  GDB Copied OPEN_VMS_FILE to OPEN_UNIX_FILE and modified
!   to work in Unix as part of conversion from VMS to Unix.
!**

TRUE = 1
FALSE = 0
ERR.CODE = 0

OPEN ,VOC TO VOC.FILE ELSE
PRINT CANT OPEN VOC!!!
ERR.CODE = 1
ABORT
END
!DEBUG
NUM.SLASH = DCOUNT(UNIX.FN, /)
UNIX.DIR = 
UNIX.ID = FIELD(UNIX.FN,/,NUM.SLASH)
FOR II = 2 TO NUM.SLASH - 1
UNIX.DIR = UNIX.DIR : / : FIELD(UNIX.FN,/,II)
NEXT II

VOC.ITEM = DIR:@AM:UNIX.DIR
READ TEST.ITEM FROM VOC.FILE , UNIX.DIR THEN
IF (TEST.ITEM2) = UNIX.DIR THEN
NULL
END ELSE
PRINT VOC ITEM ':UNIX.DIR:' DEFINED IN VOC AS  :
PRINT '' : TEST.ITEM : ''
ERR.CODE = 2
END
END ELSE
WRITE VOC.ITEM ON VOC.FILE , UNIX.DIR
END

BEGIN CASE
CASE MODE = C
PASS = 1
RENAME = FALSE
DONE = 0
NEW.UNIX.ID = UNIX.ID
LOOP UNTIL DONE DO
OPENSEQ UNIX.DIR, NEW.UNIX.ID TO UNIX.FILE THEN
PRINT FILE ALREADY EXISTS...RENAMING
NEW.UNIX.ID = UNIX.ID : _ : PASS
RENAME = TRUE
PASS = PASS + 1
ERR.CODE = 3
END ELSE
DONE = 1
END
REPEAT
IF RENAME = TRUE THEN
PRINT FILE RENAMED TO  : NEW.UNIX.ID
END

CASE MODE = U
DONE = 0
OPENSEQ UNIX.DIR, UNIX.ID TO UNIX.FILE ELSE
PRINT FILE DOES NOT EXIST
ERR.CODE = 4
END

CASE MODE = UC
DONE = 0
OPENSEQ UNIX.DIR, UNIX.ID TO UNIX.FILE ELSE
! File doesn't exist. A new file is created
END

CASE -1
PRINT Function called with a bad Mode parameter.
ERR.CODE = 5
END CASE

RETURN
SUBROUTINE OPEN_UNIX_FILE (UNIX.FN, MODE, UNIX.FILE, ERR.CODE)
!**
!   SYSTEM: AHS
!   MODULE: UTILITY
!   PROGRAM:OPEN_UNIX_FILE
!
!   DESCRIPTION:This subroutine opens a sequential file. Sequential
!   files can be used to export Unidata data to 

RE: [U2] openseq question

2006-01-04 Thread Allen E. Elwood
I've always found it helpful to open the file/record in 'regular' mode first
to find out if the directory entry worked or possibly to write a null record
if it didn't.

I like to have a graph display, and this way I can tell how many 'records'
(or AMCs in this case) I'm going to be processing so I can display the
forecasted time of completion.

 READ TRANSFER.REC FROM TRF, 'AKSS.FCST' ELSE
   SS='Attention, this function was unable to retrieve the Forecast file '
   SS:='from the net - Now Aborting Function!;b;e;a;c;h'
   CALL SCREEN.MSG(SS)
   GOTO Programmed_Abort
 END
 OPENSEQ TRANSFER, AKSS.FCST READONLY TO TRF.SEQ ELSE
   SS='This function was unable to access a record that was just written to
'
   SS='the TRANSFER directory. As a result, it cannot continue '
   SS='- now aborting!;b;c;h'
   CALL SCREEN.MSG(SS)
   GOTO Programmed_Abort
 END
 NBR.OF.ATTRS=DCOUNT(TRANSFER.REC,@AM)

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Jeff Powell
Sent: Wednesday, January 04, 2006 06:31
To: u2 users group
Subject: [U2] openseq question


Happy New Year.

I am having trouble with the openseq function in UniData. We are
operation in Pick mode.

Openseq can't find the specified file at path,filename. Is there an
assumed prefix?

Here is the code frag that is failing.

MTR.FILE.PATH='/tmp'
OPENSEQ  MTR.FILE.PATH, MTR.REC TO F.MTR.ROW.FILE ELSE
  EXECUTE '!touch ':MTR.FILE.PATH:/:MTR.REC
  OPENSEQ  MTR.FILE.PATH, MTR.REC TO F.MTR.ROW.FILE ELSE
CALL SB.DISP(3,TROUBLE OPENING
:MTR.FILE.PATH:/:MTR.REC: [E:STATUS():])
GO PGM.EXIT
  END
END

Thanks,

Jeff
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] openseq question

2006-01-04 Thread Bob Woodward
Hi Kevin

Do you recall which OS this was on?  I don't believe I've run into this
problem but I'm currently using Windows (2000 and 2003) but I've also
been on RS6000 and DG/UX.  All of this is with UV.

Thanks.

BobW
 

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Kevin King
Sent: Wednesday, January 04, 2006 9:36 AM
To: u2-users@listserver.u2ug.org
Subject: RE: [U2] openseq question

I've actually had problems with various versions of Unidata and
CLOSESEQ releasing the file when opening a full path.  Opening under a
VOC DIR-pointer has never exhibited that problem, so I'd recommend the
VOC pointer approach over using a full path.

-Kevin
[EMAIL PROTECTED]
http://www.PrecisOnline.com
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] openseq question

2006-01-04 Thread Jeff Powell
Thank you for all your helpful suggestions.

I am now looking at creating a VOC pointer as Kevin suggests below.
Actually I'll need to create two pointers one for the TEST account and
another for the LIVE account.

I had originally tried the PATH:FILE syntax before I found out that the
file needed to exist before it could be opened. So I went to the other
syntax hoping to resolve the non-existant file issue.

Here is the current function without the VOC pointer.

GOSUB GET.MTR.COUNTER
MTR.REC=MTR:OCONV(DATE(),D2/):OCONV(MTR.CTR,MR%4):.ROW
CONVERT / TO  IN MTR.REC
MTR.FILE.PATH='/tmp/MFG.DATA.IPS'
IF @PATH = /ud/TEST THEN
MTR.FILE.PATH=MTR.FILE.PATH:'.TEST'
END
MTR.FILE.PATH=MTR.FILE.PATH:'/tmp/'
OPENSEQ  MTR.FILE.PATH:MTR.REC TO F.MTR.ROW.FILE ELSE
EXECUTE '!touch ':MTR.FILE.PATH:MTR.REC
OPENSEQ  MTR.FILE.PATH:MTR.REC TO F.MTR.ROW.FILE ELSE 
CALL SB.DISP(3,TROUBLE OPENING
:MTR.FILE.PATH:MTR.REC: [E:STATUS():])
GO PGM.EXIT
END
END
WRITESEQ LASTREC APPEND ON F.MTR.ROW.FILE ELSE 
CALL SB.DISP(3,TROUBLE WRITING TO
:MTR.FILE.PATH:MTR.REC [E:STATUS():])
GO PGM.EXIT
END
CLOSESEQ F.MTR.ROW.FILE
RETURN

Thanks again.


On Wed, 2006-01-04 at 10:35 -0700, Kevin King wrote:

 I've actually had problems with various versions of Unidata and
 CLOSESEQ releasing the file when opening a full path.  Opening under a
 VOC DIR-pointer has never exhibited that problem, so I'd recommend the
 VOC pointer approach over using a full path.
 
 -Kevin
 [EMAIL PROTECTED]
 http://www.PrecisOnline.com
 ---
 u2-users mailing list
 u2-users@listserver.u2ug.org
 To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] openseq question

2006-01-04 Thread Kevin King
Do you recall which OS this was on?  I don't believe I've run into
this problem but I'm currently using Windows (2000 and 2003) but I've
also been on RS6000 and DG/UX.  All of this is with UV.

Unidata on Windows, as I recall.

-Kevin
[EMAIL PROTECTED]
http://www.PrecisOnline.com
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] openseq question

2006-01-04 Thread colin.alfke
Jeff;

I use a VOC pointer for exactly this reason. It doesn't matter which
account/where the directory is - I just need the VOC pointer that points
to it. It makes it really easy to transfer from TEST to LIVE.

Also, as Tim pointed out, you don't need the file to exist to open it.
In fact, I have a bunch of export routines that throw an error if the
file exists when it opens it.

Hth
Colin Alfke
Calgary Canada 

-Original Message-
From: Jeff Powell

Thank you for all your helpful suggestions.

I am now looking at creating a VOC pointer as Kevin suggests below.
Actually I'll need to create two pointers one for the TEST 
account and another for the LIVE account.

I had originally tried the PATH:FILE syntax before I found out 
that the file needed to exist before it could be opened. So I 
went to the other syntax hoping to resolve the non-existant file issue.

Here is the current function without the VOC pointer.

GOSUB GET.MTR.COUNTER
MTR.REC=MTR:OCONV(DATE(),D2/):OCONV(MTR.CTR,MR%4):.ROW
CONVERT / TO  IN MTR.REC
MTR.FILE.PATH='/tmp/MFG.DATA.IPS'
IF @PATH = /ud/TEST THEN
MTR.FILE.PATH=MTR.FILE.PATH:'.TEST'
END
MTR.FILE.PATH=MTR.FILE.PATH:'/tmp/'
OPENSEQ  MTR.FILE.PATH:MTR.REC TO F.MTR.ROW.FILE ELSE
EXECUTE '!touch ':MTR.FILE.PATH:MTR.REC
OPENSEQ  MTR.FILE.PATH:MTR.REC TO F.MTR.ROW.FILE ELSE 
CALL SB.DISP(3,TROUBLE OPENING 
:MTR.FILE.PATH:MTR.REC: [E:STATUS():])
GO PGM.EXIT
END
END
WRITESEQ LASTREC APPEND ON F.MTR.ROW.FILE ELSE 
CALL SB.DISP(3,TROUBLE WRITING TO 
:MTR.FILE.PATH:MTR.REC [E:STATUS():])
GO PGM.EXIT
END
CLOSESEQ F.MTR.ROW.FILE
RETURN

Thanks again.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] openseq question

2006-01-04 Thread Thomas Derwin
Unidata on Unix has this issue, too (at least the DEC Tru64 flavor) -- it holds 
onto the file lock after CLOSESEQ of a file OPENSEQed with the Unix path.

Don't know if it's been fixed in newer UD releases, but not likely a priority 
since OPENSEQ of a VOC pointer doesn't have the problem.

 [EMAIL PROTECTED] 01/04/06 2:53 PM 
Do you recall which OS this was on?  I don't believe I've run into
this problem but I'm currently using Windows (2000 and 2003) but I've
also been on RS6000 and DG/UX.  All of this is with UV.

Unidata on Windows, as I recall.

-Kevin
[EMAIL PROTECTED]
http://www.PrecisOnline.com
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


-
This e-mail and any attachments may contain CONFIDENTIAL
information, including PROTECTED HEALTH INFORMATION. If you are not
the intended recipient, any use or disclosure of this information
is STRICTLY PROHIBITED; you are requested to delete this e-mail and
any attachments, notify the sender immediately, and notify the
LabCorp Privacy Officer at [EMAIL PROTECTED] or call (877)
23-HIPAA / (877) 234-4722.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] openseq question

2006-01-04 Thread Kevin King
Actually I'll need to create two pointers one for the TEST account
and another for the LIVE account.

This is one of the great features of the VOC pointer; the LIVE account
can point to the directory it needs and the TEST account can point to
the directory it needs and the program doesn't have to be none the
wiser.  Of course, if the program needs to access both at the same
time that's a whole different issue...

-K
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] openseq question

2006-01-04 Thread Jeff Powell
Thanks again to everyone for all their help. I'm almost there.

I want to use the VOC pointer so I created the pointers in my Live and
Test VOC files, logged out and back in to ensure I was reading VOC but
I'm still not meeting with any success. When I attempt to reference the
pointer I get a Unintialized Variable warning during compile and 0
(zero) assumed error during execution. The path looks like
0/MTR01040600nn.ROW

LIST VOC F1 F2 F3 VERTICAL MFG.DATA.IPS.TMP 16:27:26 Jan 04 2006 1
VOC   MFG.DATA.IPS.TMP
F1DIR
F2/tmp/MFG.DATA.IPS.TEST/tmp
F3D_VOC

GOSUB GET.MTR.COUNTER
MTR.REC=MTR:OCONV(DATE(),D2/):OCONV(MTR.CTR,MR%4):.ROW
CONVERT / TO  IN MTR.REC
* -- The following line fails to compile
MTR.FILE.PATH=MFG.DATA.IPS.TMP
* -- Tim suggested the following WEOFSEQ approach to create a new file.
I'll remove the CRT statements after debugging is over.   
OPENSEQ MTR.FILE.PATH:/:MTR.REC TO F.MTR.ROW.FILE THEN
CRT 'Existing file'
END ELSE
CRT 'Creating new file'
END
WEOFSEQ F.MTR.ROW.FILE
WRITESEQ LASTREC APPEND ON F.MTR.ROW.FILE ELSE 
CALL SB.DISP(3,TROUBLE WRITING TO
:MTR.FILE.PATH:/:MTR.REC [E:STATUS():])
GO PGM.EXIT
END
CLOSESEQ F.MTR.ROW.FILE
RETURN


On Wed, 2006-01-04 at 14:38 -0700, Kevin King wrote:

 Actually I'll need to create two pointers one for the TEST account
 and another for the LIVE account.
 
 This is one of the great features of the VOC pointer; the LIVE account
 can point to the directory it needs and the TEST account can point to
 the directory it needs and the program doesn't have to be none the
 wiser.  Of course, if the program needs to access both at the same
 time that's a whole different issue...
 
 -K
 ---
 u2-users mailing list
 u2-users@listserver.u2ug.org
 To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] openseq question

2006-01-04 Thread Kevin King
Jeff, if the VOC entry is MFG.DATA.IPS.TMP then the OPEN is:

OPEN MFG.DATA.IPS.TMP, MTR.REC TO ...

Not the concatenated thing you had in your post.

-K
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] openseq question

2006-01-04 Thread [EMAIL PROTECTED]
Jeff Powell wrote:
 Thanks again to everyone for all their help. I'm almost
there.
 
 I want to use the VOC pointer so I created the pointers in
my Live and
 Test VOC files, logged out and back in to ensure I was
reading VOC but
 I'm still not meeting with any success. When I attempt to
 reference the
 pointer I get a Unintialized Variable warning during
compile and 0
 (zero) assumed error during execution. The path looks like
 0/MTR01040600nn.ROW 
 
 LIST VOC F1 F2 F3 VERTICAL MFG.DATA.IPS.TMP 16:27:26 Jan
04 2006 1
 VOC   MFG.DATA.IPS.TMP
 F1DIR
 F2/tmp/MFG.DATA.IPS.TEST/tmp
 F3D_VOC
 
 GOSUB GET.MTR.COUNTER

MTR.REC=MTR:OCONV(DATE(),D2/):OCONV(MTR.CTR,MR%4):.ROW
 CONVERT / TO  IN MTR.REC
 * -- The following line fails to compile
 MTR.FILE.PATH=MFG.DATA.IPS.TMP

Jeff,

You have set up MFG.DATA.IPS.TMP as a VOC pointer, but if
you reference it in BASIC without quotes, the compiler
thinks it is an unassigned variable.

So, step one, wrap the name of your VOC pointer in quotes.

However, you've said you want to use VOC pointers instead of
paths, so instead of appending a / and the record name,
you want to OPENSEQ the VOC name , the record name.

So, step two, use the VOC,record syntax, not the path
syntax:

OPENSEQ MFG.DATA.IPS.TMP,MTR.REC TO MTR.REC.VBLE ELSE
* remember in UniData, OPENSEQ creates automatically
WEOFSEQ MTR.REC.VBLE
END

Other points:

1) It really isn't a great idea to go creating application
specific subdirectories in /tmp.  Fill /tmp up with junk and
the system will crash sooner or later.

2) If you need the path of an opened file variable use
FILEINFO().

Cheers,

Ken
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] openseq question

2006-01-04 Thread Timothy Snyder
Allen E. Elwood wrote on 01/04/2006 01:29:47 PM:

 I've always found it helpful to open the file/record in 'regular' mode 
first
 to find out if the directory entry worked or possibly to write a null 
record
 if it didn't.

So, if the O/S-level file is multi-megabytes, you're reading the whole 
thing into memory?  That could cause problems with shared memory and will 
certainly create a burden on the system.  It also kind of defeats the 
purpose of using a sequential file, since you're reading the whole thing 
in, then opening it again and reading through the entire file a second 
time with READSEQ.  Since you've incurred the memory and performance hit 
to pull the whole thing into a variable, you might as well waltz through 
that variable to extract the lines an attribute at a time with REMOVE or 
READNEXT.

If you're following this practice only on small files, and only 
infrequently, it's probably OK, but how can you guarantee that will always 
be the case?


Tim Snyder
Consulting I/T Specialist , U2 Professional Services
North American Lab Services
DB2 Information Management, IBM Software Group
717-545-6403
[EMAIL PROTECTED]
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] openseq question

2006-01-04 Thread Logan, David (SST - Adelaide)
Further to this, you could also use the !GET.PATHNAME subroutine to get
the path and filename. A quick way to check rather than the expense of a
DB level OPEN.

Regards


---
** _/ **  David Logan 
***   _/ ***  ITO Delivery Specialist - Database
*_/*  Hewlett-Packard Australia Ltd
_/_/_/  _/_/_/    E-Mail: [EMAIL PROTECTED]
   _/  _/  _/  _/     Desk:   +618 8408 4273
  _/  _/  _/_/_/  Mobile: 0417 268 665
*_/   **
**  _/    Postal: 148 Frome Street,
   _/ **  Adelaide SA 5001
  Australia 
invent   
---

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Timothy Snyder
Sent: Thursday, 5 January 2006 1:42 PM
To: u2-users@listserver.u2ug.org
Subject: RE: [U2] openseq question

Allen E. Elwood wrote on 01/04/2006 01:29:47 PM:

 I've always found it helpful to open the file/record in 'regular' mode

first
 to find out if the directory entry worked or possibly to write a null 
record
 if it didn't.

So, if the O/S-level file is multi-megabytes, you're reading the whole 
thing into memory?  That could cause problems with shared memory and
will 
certainly create a burden on the system.  It also kind of defeats the 
purpose of using a sequential file, since you're reading the whole thing

in, then opening it again and reading through the entire file a second 
time with READSEQ.  Since you've incurred the memory and performance hit

to pull the whole thing into a variable, you might as well waltz through

that variable to extract the lines an attribute at a time with REMOVE or

READNEXT.

If you're following this practice only on small files, and only 
infrequently, it's probably OK, but how can you guarantee that will
always 
be the case?


Tim Snyder
Consulting I/T Specialist , U2 Professional Services
North American Lab Services
DB2 Information Management, IBM Software Group
717-545-6403
[EMAIL PROTECTED]
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] OPENSEQ filesize limit?

2005-08-19 Thread Ross Ferris
I would think that you have actually gone over the file size limit of
Linux ... tail  head may not REALLY be working (accurately).

I actually thought the limit was 2Gb (which is why the need for
partitioned files in the first place).

Happy to be wrong (not an active UD user), but had a similar problem
once when I copied a BIG file from a windows box to Linux across a Samba
Share

Ross Ferris
Stamina Software
Visage  Better by Design!

-Original Message-
From: [EMAIL PROTECTED] [mailto:owner-u2-
[EMAIL PROTECTED] On Behalf Of Eugene Perry
Sent: Friday, 19 August 2005 1:05 PM
To: u2-users@listserver.u2ug.org
Subject: [U2] OPENSEQ filesize limit?

Does OPENSEQ on Unidata have a limit to the size of the file that it
will
open?  We are running Unidata 6.0.13 on linux and have a problem
getting
OPENSEQ to work with a file that is 2.4 gigs.  We can use tail and head
and
have been able to copy the file etc.  So it is not permissions.  This
is
also
an application that has worked for a long time so it is not that it is
a
new
application.

Any ideas?
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] OPENSEQ filesize limit?

2005-08-19 Thread John Hester

Ross Ferris wrote:

I would think that you have actually gone over the file size limit of
Linux ... tail  head may not REALLY be working (accurately).

I actually thought the limit was 2Gb (which is why the need for
partitioned files in the first place).

Happy to be wrong (not an active UD user), but had a similar problem
once when I copied a BIG file from a windows box to Linux across a Samba
Share


There was a 2GB file size limit on the ext2 filesystem with the 2.3 
kernel, but I beleive that with the 2.4 kernel the max file size was 
upped to 2TB on ext2 and ext3 filesystems.


-John
--
John Hester
System  Network Administrator
Momentum Group Inc.
(949) 833-8886 x623
http://memosamples.com
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/