Re: [U2] [JOB] Epicor is now in Denver?

2013-10-29 Thread Al DeWitt
The offices in Minneapolis houses Epicor 9 (I believe the current flagship ERP 
system) as well as the Manage 2000 folks.  

Albert DeWitt, CPIM
Sr. Programmer Analyst
Stylmark, Inc.
Minneapolis MN 55432 | USA


-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Hilk, Brandon
Sent: Monday, October 28, 2013 12:29 PM
To: U2 Users List
Subject: Re: [U2] [JOB] Epicor is now in Denver?

They have a building just outside Minneapolis as well. Not sure which business 
units belong to which campuses.

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


[U2] SB: Character Mode Works Great, GUI Does Not

2013-08-09 Thread Al DeWitt
I am creating a simple screen.  Two fields.  The Before Process in the 
Definition defines @KEY, reads @RECORD and loads @RECORD6 into @WORK1 which 
is displayed on the screen (lines of text).

@WORK1 is a multivalue field.  The Before Process invokes the text editior.  
The user is allowed to manipulate text.

When the user presses F2 to exit the text editor and goes to the second field 
and the length of the MV field is displayed and if it is greater than 350 it 
displays an error and returns the user to the field to shorten it.  Once things 
are good it will write the new field to the file (WRITEV) and exit the screen.

Everything works in character mode.  The text field displays, etc.  However, it 
GUI the text field is blank.  REGEN.GUI does nothing to fix the problem.

Any ideas.

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


[U2] OPENSEQ

2013-08-05 Thread Al DeWitt
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
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 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 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


[U2] SBClient , TU.DDE.WRITE and WIFI

2013-07-27 Thread Al DeWitt
I have a program that opens an Excel template on a network drive and outputs 
rows of data.

When I have a direct connection (wire) it works fine.  However, WIFI it opens 
the Excel template; acts like it's doing its thing and goes to EOJ, but nothing 
outputs to Excel.

I tried it using WIFI + VPN and then tried my company's internal WIFI.  Doesn't 
work in either case.

Is it a technology issue, a port issue or ?

Any help would be appreciated.

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.commailto:adew...@stylmark.com
www.stylmark.comhttp://www.stylmark.com

Stylmark is a proud member of RDI, ARE, NGA
You can now find Stylmark on 
LinkedInhttp://www.linkedin.com/companies/stylmark-inc.?trk=fc_badge and 
Facebookhttp://www.facebook.com/pages/Stylmark-Inc/103003036425013?v=info

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


[U2] SBClient Issue

2013-07-18 Thread Al DeWitt

SB+ / SBClient 5.4.2

We have a custom report that was written using paragraphs and the DDE 
functionality.  Our process is to

1)Open an Excel Worksheet

2)Run the report which outputs to the worksheet.

We are encountering situations where the report appears to work normally but 
not all the data is written to Excel.  This was first noticed on Excel 2010, 
but I am able to reproduce this on Excel 2003 as well.

Is there some temporary file or buffer in SB+/SBClient that I might need to 
expand the size of?  If so what is the name of it?

Thanks.

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


[U2] OT: Monitoring Program: Can This Be Done?

2013-06-26 Thread Al DeWitt
Tried sending this to sbsolutions but it didn't appear  to get there so I'll 
try here in hopes some of you are using SB+/SBClient

We are having an issue where we are using all of our licenses by midday.

Our current procedure is to send out a broadcast e-mail asking those who are 
not using the application to log off SBClient.

We believe that what is happening is that certain PCs on the shop floor have 
SBClient started; some activity recorded and then the user walks away from the 
workstation leaving the particular screen open.

I have been asked to inquire if there is a way I can write a C# program to be 
installed on certain (shop floor) PCs to log SBClient activity (keystrokes?) 
with a timestamp.  This program would then read the last activity timestamp, 
compare it to the current time and if the interim is greater than a certain 
number of minutes execute a series of Escape strokes to back the app out to the 
close screen and thus free up licenses.

Has anybody attempted this?  If so can you share what you did?

Thanks.

Albert DeWitt, CPIM
Sr. Programmer Analyst

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


Re: [U2] WRITESEQ Error

2013-04-12 Thread Al DeWitt
We found the cause to this problem and I thought I'd share it with you.

The file we append sits on a virtual PC.  The VOC pointer is 
\\file-server\share-name\folder-name

This PC is configured for automatic windows updates and automatically restarts. 
 We had Patch Tuesday.  The PC restarted fine and automatically started the 
application, however, the share-name stopped working.

When the IT person tried to restart it he didn't do it correctly.  Now that we 
have correctly recreated share-name all is well.

Thanks for all your help.

Al DeWitt


 -Original Message-
 From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-
 boun...@listserver.u2ug.org] On Behalf Of Woodward, Bob
 Sent: Thursday, April 11, 2013 6:34 PM
 To: U2 Users List
 Subject: Re: [U2] WRITESEQ Error
 
 I quite often found that the file had either not been sequentially opened, or 
 it had
 been closed before the writeseq command.
 
 -Original Message-
 From: u2-users-boun...@listserver.u2ug.org
 [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Al DeWitt
 Sent: Thursday, April 11, 2013 3:56 PM
 To: 'U2 Users List'
 Subject: Re: [U2] WRITESEQ Error
 
 I initially thought it was a permissions issue as well, however, I am a domain
 admin and I get the same error.  If it is a permissions error than something 
 has
 changed that I am not aware of.
 
 Al DeWitt
 
  -Original Message-
  From: Wjhonson [mailto:wjhon...@aol.com]
  Sent: Thursday, April 11, 2013 5:53 PM
  To: u2-users@listserver.u2ug.org
  Subject: Re: [U2] WRITESEQ Error
 
  Here 9 points to a permissions issue
 
  http://u2-universe-unidata.1073795.n5.nabble.com/Unidata-6-1-AIX-quot-
  write- error-errno-9-quot-on-WRITESEQ-td6781.html
 
 
 
 
 
 
 
 
 
  -Original Message-
  From: Kevin King ke...@precisonline.com
  To: U2 Users List u2-users@listserver.u2ug.org
  Sent: Thu, Apr 11, 2013 3:44 pm
  Subject: Re: [U2] WRITESEQ Error
 
 
  Al brings up a good point though... Where would one find what error 9
  means exactly?  I scanned the documentation and didn't see any mention
 
  of an error 9 for WRITESEQ or even described in STATUS() which is
  where a lot of the IO errors show up.
 
 
  On Thu, Apr 11, 2013 at 3:45 PM, Wjhonson wjhon...@aol.com wrote:
 
   You're first test is always permissions.
   Permissions, permissions, I hate them.
  
  
  
  
  
  
  
  
   -Original Message-
   From: Al DeWitt adew...@stylmark.com
   To: (u2-users@listserver.u2ug.org) u2-users@listserver.u2ug.org
   Sent: Thu, Apr 11, 2013 2:10 pm
   Subject: [U2] WRITESEQ Error
  
  
   I have a program that has been working fine until today.  The users
   are now experiencing an error at the following statement #:
  
   508: WRITESEQ RECRD APPEND ON FILEIN ELSE
   ... at line 508 write error, errno = 9
  
   Can someone tell me what errno 9 is and what my cause it?The
 file
   resides on
   a virtual XP machine that runs a third-party app that reads this
 file.
  
   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
 ___
 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] WRITESEQ Error

2013-04-11 Thread Al DeWitt
I have a program that has been working fine until today.  The users are now 
experiencing an error at the following statement #:

508: WRITESEQ RECRD APPEND ON FILEIN ELSE
... at line 508 write error, errno = 9

Can someone tell me what errno 9 is and what my cause it?The file resides 
on a virtual XP machine that runs a third-party app that reads this file.

Thanks.

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


Re: [U2] WRITESEQ Error

2013-04-11 Thread Al DeWitt
I initially thought it was a permissions issue as well, however, I am a domain 
admin and I get the same error.  If it is a permissions error than something 
has changed that I am not aware of.

Al DeWitt

 -Original Message-
 From: Wjhonson [mailto:wjhon...@aol.com]
 Sent: Thursday, April 11, 2013 5:53 PM
 To: u2-users@listserver.u2ug.org
 Subject: Re: [U2] WRITESEQ Error
 
 Here 9 points to a permissions issue
 
 http://u2-universe-unidata.1073795.n5.nabble.com/Unidata-6-1-AIX-quot-write-
 error-errno-9-quot-on-WRITESEQ-td6781.html
 
 
 
 
 
 
 
 
 
 -Original Message-
 From: Kevin King ke...@precisonline.com
 To: U2 Users List u2-users@listserver.u2ug.org
 Sent: Thu, Apr 11, 2013 3:44 pm
 Subject: Re: [U2] WRITESEQ Error
 
 
 Al brings up a good point though... Where would one find what error 9 means
 exactly?  I scanned the documentation and didn't see any mention of an error 
 9 for
 WRITESEQ or even described in STATUS() which is where a lot of the IO errors
 show up.
 
 
 On Thu, Apr 11, 2013 at 3:45 PM, Wjhonson wjhon...@aol.com wrote:
 
  You're first test is always permissions.
  Permissions, permissions, I hate them.
 
 
 
 
 
 
 
 
  -Original Message-
  From: Al DeWitt adew...@stylmark.com
  To: (u2-users@listserver.u2ug.org) u2-users@listserver.u2ug.org
  Sent: Thu, Apr 11, 2013 2:10 pm
  Subject: [U2] WRITESEQ Error
 
 
  I have a program that has been working fine until today.  The users
  are now experiencing an error at the following statement #:
 
  508: WRITESEQ RECRD APPEND ON FILEIN ELSE
  ... at line 508 write error, errno = 9
 
  Can someone tell me what errno 9 is and what my cause it?The file
  resides on
  a virtual XP machine that runs a third-party app that reads this file.
 
  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
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


[U2] FW: Clearing Input Buffer

2013-02-22 Thread Al DeWitt
I have an input screen (built with System Builder) where data can either be 
entered manually or via a barcode scanner.  The screen has 3 text boxes for 
input.  The barcode option fills two of the text boxes and is supposed to land 
on the third box to await input.  However, the scanner must be adding an extra 
return or something because when I scan it  the third field's Process After 
executes.

What can I do to flush the input buffer at the end of my validation routine on 
my second field...or is it better to do this on the Process Before on my third 
field.

It's more of a nuisance but it would look more professional if I could make it 
clean.

Thanks.
Albert DeWitt, CPIM
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] FW: Clearing Input Buffer

2013-02-22 Thread Al DeWitt
How do I flush the buffer?  What is the name or function I need?  I can't put 
my finger on the right page in the Unidata manuals.

Thanks.

Al DeWitt


 -Original Message-
 From: Kevin King [mailto:ke...@precisonline.com]
 Sent: Friday, February 22, 2013 1:25 PM
 To: U2 Users List
 Subject: Re: [U2] FW: Clearing Input Buffer
 
 I would think flushing the input buffer in either location would be 
 sufficient,
 assuming the problem is as you described.  I've seen situations where there's
 something in the second field, for example, that is data stacking something 
 new
 and the data stacking from the gun is conflicting with that.  If you're 
 confident
 that's not the case, flushing the input before that third field should 
 suffice.
 
 On Fri, Feb 22, 2013 at 12:20 PM, Al DeWitt adew...@stylmark.com wrote:
 
  I have an input screen (built with System Builder) where data can
  either be entered manually or via a barcode scanner.  The screen has 3
  text boxes for input.  The barcode option fills two of the text boxes
  and is supposed to land on the third box to await input.  However, the
  scanner must be adding an extra return or something because when I
  scan it  the third field's Process After executes.
 
  What can I do to flush the input buffer at the end of my validation
  routine on my second field...or is it better to do this on the Process
  Before on my third field.
 
  It's more of a nuisance but it would look more professional if I could
  make it clean.
 
  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] Clearing Input Buffer

2013-02-22 Thread Al DeWitt
Ding, ding, ding; we have a winner!

Apparently the scanner I was using had a CR suffix.  When I changed it to a Tab 
suffix it worked fine without needing to clear the buffer.

Thanks for all the input.

Al DeWitt


 -Original Message-
 From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-
 boun...@listserver.u2ug.org] On Behalf Of John Solie
 Sent: Friday, February 22, 2013 1:53 PM
 To: 'U2 Users List'
 Subject: Re: [U2] Clearing Input Buffer
 
 You'd probably be better off trying to find the configuration barcodes for the
 scanner that control what character it sends after the data.
 
 
 John Solie * Systems Analyst, Information Systems * www.phsyes.com
 Professional Hospital Supply * 42500 Winchester Road, Temecula, CA 92590
 Tel. 951-296-2600 ext. 1226  Fax 951-296-2625   jso...@phsyes.com
 
 Leading the Market through Innovative Solutions
 
 IMPORTANT: The sender intends that this electronic message is for exclusive 
 use
 by the person to whom it is addressed.  This message may contain information 
 that
 is confidential or privileged and exempt from disclosure under applicable 
 law.  If
 the reader of this message is not an intended recipient, be aware that any
 disclosure, dissemination, distribution or copying of this communication, or 
 the
 use of its contents, is prohibited without prior written consent from PHS.
 
 Please consider the environment before printing this email.
 
 -Original Message-
 From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-
 boun...@listserver.u2ug.org] On Behalf Of Al DeWitt
 Sent: Friday, February 22, 2013 11:21 AM
 To: (u2-users@listserver.u2ug.org)
 Subject: [U2] FW: Clearing Input Buffer
 
 I have an input screen (built with System Builder) where data can either be
 entered manually or via a barcode scanner.  The screen has 3 text boxes for 
 input.
 The barcode option fills two of the text boxes and is supposed to land on the 
 third
 box to await input.  However, the scanner must be adding an extra return or
 something because when I scan it  the third field's Process After executes.
 
 What can I do to flush the input buffer at the end of my validation routine 
 on my
 second field...or is it better to do this on the Process Before on my third 
 field.
 
 It's more of a nuisance but it would look more professional if I could make 
 it clean.
 
 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] Select Statement Invalid

2012-07-12 Thread Al DeWitt
Have never used PROCs.  I was, however, able to adapt this and it worked
great!

Thanks.

Al DeWitt


-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Eric Neu
Sent: Wednesday, July 11, 2012 7:43 PM
To: U2 Users List
Subject: Re: [U2] Select Statement Invalid

This works

001: PQ 
002: HSELECT WIPMTLRQ WITH @ID =
003: H 240573]
004: H 292508]
005: H 235115]
006: H 203346]
007: H 219843]
008: H 170808]
009: H 203304]
010: P  
011: HSAVE-LIST WIPMTLRQ
012: P  
Bottom. 



-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Wally Terhune
Sent: Wednesday, July 11, 2012 5:10 PM
To: U2 Users List
Subject: Re: [U2] Select Statement Invalid

Paragraphs run in U mode.
Change it to a proc or change the syntax


Wally Terhune
Technical Support Engineer
Rocket Software
4600 South Ulster Street, Suite 1100 **Denver, CO 80237 **USA
t: +1 720 475 8055 **e: wterh...@rocketsoftware.com **w:
rocketsoftware.com/u2




-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Al DeWitt
Sent: Wednesday, July 11, 2012 5:19 PM
To: u2-users@listserver.u2ug.org
Subject: [U2] Select Statement Invalid

Unidata 7.1.20, pick flavor

 

I have this quick paragraph to select records based on partial keys:

001: PA


002: SELECT WIPMTLRQ WITH @ID =
299486]302667]318583]337991]374396]376742]382767]385661]
398932]415256]445409]453821]

454353]478175]478845]502457]


Bottom.


However, this is what I get when I run it: No data retrieved from
current (S)SELECT statement.

Yet if I run SELECT WIPMTLRQ WITH @ID = 299486]

 

I get records returned.

 

What am I missing?

 

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


[U2] Select Statement Invalid

2012-07-11 Thread Al DeWitt
Unidata 7.1.20, pick flavor

 

I have this quick paragraph to select records based on partial keys:

001: PA


002: SELECT WIPMTLRQ WITH @ID =
299486]302667]318583]337991]374396]376742]382767]385661]
398932]415256]445409]453821]

454353]478175]478845]502457]


Bottom.


However, this is what I get when I run it: No data retrieved from
current (S)SELECT statement.

Yet if I run SELECT WIPMTLRQ WITH @ID = 299486]

 

I get records returned.

 

What am I missing?

 

Thanks.

 

Albert DeWitt, CPIM

 

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


[U2] FW: Multivalue Question

2012-06-07 Thread Al DeWitt
Unidata 7.1.20 Pick Flavor

 

I am going to end up with a situation where I will have a multivalue
field that contains 5500 +/- values.  Each value will be 5-characters
long.

 

I'm concerned that this will issues with the following statement: X =
RECORD31

 

I've tried searching the manuals and can't find a good answer.

 

Appreciate your input.

 

Albert DeWitt, CPIM

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


[U2] Unidata 7.1.20 Pick Flavor Selecting Multi-Values

2011-11-10 Thread Al DeWitt
I'm am trying to help out my users by helping them make sense of what they have 
done to themselves.  The field in question, Bin Number, is alphanumeric.  About 
three quarters of the entries are all numeric and one quarter are alphanumeric. 
 Below is a perfect example of my issue.

 

LIST INVWHS 27814*001 F1 F2 F3 12:43:18 NOV 10 2011 1   

CPN*WH Qty On Hand Shipping Qty Bin Number

  

27814*001  158 070300 

SO76127   

 

My users want all the numeric sorted from lowest value to highest value as if 
the field was actually numeric.  My thought was to add to V-desc fields.  One 
that determines if the value is numeric or not (ALD.NUM.BIN)  and the other is 
the length of the field(ALD.BIN.LN).  This would sort based on the length of 
the value.  The greater the length the greater the value.  So the 10001 should 
print after  and not in the vicinity of 1000 as it's doing now.

 

My first question is:  How do I make ALD.NUM.BIN report the condition of both 
values.  As you can see below it only shows the first value.  I'm thinking I 
need a -SUBR statement but can't find a list of them in the Unidata manuals.

 

LIST INVWHS 27814*001 F3 ALD.NUM.BIN ALD.BIN.LN 12:45:51 NOV 10 2011 1   

CPN*WH Bin Number Num Bin Bin Ln   

   

27814*001  703001  5   

   SO76127 7   

 

Here is the dictionary item (it was built using System Builder):

 

Top of ALD.NUM.BIN in DICT INVWHS, 9 lines, 215 characters. 

001: I  

002: SUBR(SB.SMART.QUERY,'MK':@FM:'E;@1;C3;@6;X;Z#;I2;C1;J1;C0',@ID,@RECORD,@F

ILE.NAME,@NV)   

003:

004: Num Bin

005: 1R 

006: MV 

007:

 

Assuming everything works correctly I need to modify my select statement:

Before I change:

SELECT INVWHS WITH WHS = 001 BY.EXP BIN

Followed up with READNEXT CPN.WHS,BIN.LOCATION

 

After I change my select to:

SELECT INVWHS WITH WHS = 001 BY.EXP ALD.NUM.BIN BY.EXP ALD.BIN.LN BY.EXP BIN

 

Which results in:

Top of ALD.TEST004 in SAVEDLISTS, 1,657 lines, 33,139 characters. 

*---: L   

1322: 27814*001ý1ü1ý-5ü-5 

 

Top of ALD.TEST005 in SAVEDLISTS, 1,330 lines, 26,939 characters.

*---: L  

0447: 27814*001ý1ü2ý-5ü-5

 

How should I modify my READNEXT statement so that BIN.LOCATION returns the 
correct value for each value?

 

 

Thanks.

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


[U2] OPENSEQ and the LOCKED Option

2011-10-28 Thread 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 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] Sequential Files Question

2010-09-09 Thread Al DeWitt
This is what finally worked.  I was hoping to do it w/o having to create
a VOC entry, but that was not to be.

Thank you all for your help. 


Al DeWitt

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Colin Alfke
Sent: Wednesday, September 08, 2010 11:57 PM
To: 'U2 Users List'
Subject: Re: [U2] Sequential Files Question

Al;

I use the following code:

OPENSEQ 'OUTPUT.FILE', 'APCHECKS' TO OUTFILE THEN
  CRT 'APCHECKS ALREADY EXISTS'
  STOP
END
* code to build each line goes here
MORE.DATA = 1
LOOP WHILE MORE.DATA DO
  LINE = 'data' 'L#9':MORE.DATA 'L#25':'still more data' 'L#20'
  WRITESEQ LINE APPEND ON OUTFILE ELSE CRT 'NOT AT END OF APCHECKS'
  MORE.DATA += 1
  IF MORE.DATA = 25 THEN MORE.DATA = 0
REPEAT
CLOSESEQ OUTFILE

Where OUTPUT.FILE is a VOC item (which means I can change the location
of the file without recompiling/changing code):
DIR
C:\OUTPUT
D_VOC

Using the THEN construct means the program will stop if that item
already exists so you won't overwrite any existing data. Technically,
the file won't actually exist until you do the WRITESEQ, but it won't
matter that it won't already exist, it will create it. You can't really
deal with OUTFILE as a variable - it's really a (type of) file handle.
The WRITESEQ will fly through the file - you don't have to worry about
creating a large array - it will just keep writing until it hits the
limit (not sure if it's the OS limit or UniData's 2GB limit).

Hth
Colin Alfke
Calgary, Canada

-Original Message-
From: Al DeWitt

I GET THE FOLLOWING MESSAGE [FATAL ERROR: - Cannot open file
C:\OUTPUT\APCHECKS1002] and I'm sent to the colon prompt. 

Al DeWitt

-Original Message-
From: Dan McGrath

If you run this code:

OPENSEQ FNAME TO OUTFILE ON ERROR
   STOP 'FATAL ERROR: - Cannot open file ':FNAME END THEN
   STOP 'FATAL ERROR: - Already exiting file called: ':FNAME END ELSE
   CRT FILE OPEN SUCCEEDED!
   WRITESEQ Dummy data ON OUTFILE THEN NULL END

What happens?


-Original Message-
From: Al DeWitt

I forgot to mention that I'm on Windows.

My output path is: C:\OUTPUT\
My file name isAPCHECKS where is a counter that gets incremented
each time the program is run.

FNAME would be C:\OUTPUT\APCHECKS so that my statement would read:
OPENSEQ FNAME TO OUTFILE...

However, since APCHECKS would be unique each time it doesn't exist.


BTW when I try to display OUTFILE it gives me an Unitialized Variable,
zero assumed error.

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


[U2] Sequential Files Question

2010-09-08 Thread Al DeWitt
Unidata 7.1.20
 
I've never dealt with sequential files, but I have a need to output
records to a text file.  Each record will be a series of fixed-length
fields.  Each file will need to be created at the time of opening.  The
destination will be a Windows folder on one of our servers.  I will be
using OPENSEQ to open the file.  However, since each file needs to be
created at time of opening what do I use to create the file?  My reading
of OPENSEQ doesn't indicate that it will create it automatically if it
doesn't exist.
 
Thanks.
 
Al DeWitt
 
 
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Sequential Files Question

2010-09-08 Thread Al DeWitt
I forgot to mention that I'm on Windows.

My output path is: C:\OUTPUT\
My file name isAPCHECKS where is a counter that gets incremented
each time the program is run.

FNAME would be C:\OUTPUT\APCHECKS so that my statement would read:
OPENSEQ FNAME TO OUTFILE...

However, since APCHECKS would be unique each time it doesn't exist.


BTW when I try to display OUTFILE it gives me an Unitialized Variable,
zero assumed error.

Al DeWitt

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Dan McGrath
Sent: Wednesday, September 08, 2010 6:29 PM
To: U2 Users List
Subject: Re: [U2] Sequential Files Question

Yes, it will. 

Note: It will drop into the 'ELSE' clause if the file didn't exist to
start with.

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Al DeWitt
Sent: Thursday, September 09, 2010 8:55 AM
To: u2-users@listserver.u2ug.org
Subject: [U2] Sequential Files Question

Unidata 7.1.20
 
I've never dealt with sequential files, but I have a need to output
records to a text file.  Each record will be a series of fixed-length
fields.  Each file will need to be created at the time of opening.  The
destination will be a Windows folder on one of our servers.  I will be
using OPENSEQ to open the file.  However, since each file needs to be
created at time of opening what do I use to create the file?  My reading
of OPENSEQ doesn't indicate that it will create it automatically if it
doesn't exist.
 
Thanks.
 
Al DeWitt
 
 
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

__
This email has been scanned by the MessageLabs Email Security System.
For more information please visit http://www.messagelabs.com/email
__

###
The information transmitted in this message and attachments (if any) is
intended only for the person or entity to which it is addressed. The
message may contain confidential and/or privileged material.  Any
review, retransmission, dissemination or other use of or taking of any
action in reliance upon this information by persons or entities other
than the intended recipient is prohibited.  If you received this in
error, please contact the sender and delete the material from any
computer.

The intended recipient of this e-mail may only use, reproduce, disclose
or distribute the information contained in this e-mail and any attached
files with the permission of IMB.

###
___
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] Sequential Files Question

2010-09-08 Thread Al DeWitt
I GET THE FOLLOWING MESSAGE [FATAL ERROR: - Cannot open file
C:\OUTPUT\APCHECKS1002] and I'm sent to the colon prompt. 


Al DeWitt

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Dan McGrath
Sent: Wednesday, September 08, 2010 7:20 PM
To: U2 Users List
Subject: Re: [U2] Sequential Files Question

If you run this code:

OPENSEQ FNAME TO OUTFILE ON ERROR
   STOP 'FATAL ERROR: - Cannot open file ':FNAME END THEN
   STOP 'FATAL ERROR: - Already exiting file called: ':FNAME END ELSE
   CRT FILE OPEN SUCCEEDED!
   WRITESEQ Dummy data ON OUTFILE THEN NULL END

What happens?


-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Al DeWitt
Sent: Thursday, September 09, 2010 10:03 AM
To: U2 Users List
Subject: Re: [U2] Sequential Files Question

I forgot to mention that I'm on Windows.

My output path is: C:\OUTPUT\
My file name isAPCHECKS where is a counter that gets incremented
each time the program is run.

FNAME would be C:\OUTPUT\APCHECKS so that my statement would read:
OPENSEQ FNAME TO OUTFILE...

However, since APCHECKS would be unique each time it doesn't exist.


BTW when I try to display OUTFILE it gives me an Unitialized Variable,
zero assumed error.

Al DeWitt

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Dan McGrath
Sent: Wednesday, September 08, 2010 6:29 PM
To: U2 Users List
Subject: Re: [U2] Sequential Files Question

Yes, it will. 

Note: It will drop into the 'ELSE' clause if the file didn't exist to
start with.

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Al DeWitt
Sent: Thursday, September 09, 2010 8:55 AM
To: u2-users@listserver.u2ug.org
Subject: [U2] Sequential Files Question

Unidata 7.1.20
 
I've never dealt with sequential files, but I have a need to output
records to a text file.  Each record will be a series of fixed-length
fields.  Each file will need to be created at the time of opening.  The
destination will be a Windows folder on one of our servers.  I will be
using OPENSEQ to open the file.  However, since each file needs to be
created at time of opening what do I use to create the file?  My reading
of OPENSEQ doesn't indicate that it will create it automatically if it
doesn't exist.
 
Thanks.
 
Al DeWitt
 
 
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

__
This email has been scanned by the MessageLabs Email Security System.
For more information please visit http://www.messagelabs.com/email
__

###
The information transmitted in this message and attachments (if any) is
intended only for the person or entity to which it is addressed. The
message may contain confidential and/or privileged material.  Any
review, retransmission, dissemination or other use of or taking of any
action in reliance upon this information by persons or entities other
than the intended recipient is prohibited.  If you received this in
error, please contact the sender and delete the material from any
computer.

The intended recipient of this e-mail may only use, reproduce, disclose
or distribute the information contained in this e-mail and any attached
files with the permission of IMB.

###
___
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

__
This email has been scanned by the MessageLabs Email Security System.
For more information please visit http://www.messagelabs.com/email
__

###
The information transmitted in this message and attachments (if any) is
intended only for the person or entity to which it is addressed. The
message may contain confidential and/or privileged material.  Any
review, retransmission, dissemination or other use of or taking of any
action in reliance upon this information by persons or entities other
than the intended recipient is prohibited.  If you received this in
error, please contact the sender and delete the material from any
computer.

The intended recipient

[U2] Different Number of Arguments Error

2010-05-21 Thread Al DeWitt
I have downloaded one of the barcode programs ( PLS.BAR128) to test
barcode printing.  I needed to make two changes.  One was the name
change to fit within our naming convention and the other was the name of
a the variable VALUE because it's a reserved word in System Builder.
 
So I have this statement:CALL SB.PROCESS('SYS9008,0\1\0\110022')
 
It's calling a basic subroutine whose first line is this:
SUBROUTINE SYSS9008.1 (WIDTH, HEIGHT, ORIEN, MYDATA) 
 
I'm getting this error: In
..\..\..\FLOPROGS\DEV\DEV.IIBASE8\BP8.0\_SYSS9008.1 at line 141 Error,
SUBROUTINE 'SYSS9008.1' has different number of arguments than its CALL
statement.
It never gets to 141.  I put display statments early on in the program
to display WIDTH, HEIGHT, ORIEN AND MYDATA.  It doesn't even get to that
point.
 
I count the number of variables the subroutine wants and I count the
number I'm passing and, to me, they appear to be the same.  What am I
missing?
 
Thanks.
 
Albert DeWitt
Sr. Programmer Analyst
Stylmark, Inc.
763.574.8705 (V)
763-574-1052 (F)
adew...@stylmark.com mailto:adew...@stylmark.com 
 
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


[U2] Windows 2003, UniData 7.1.20: Please Explain This Message

2009-11-10 Thread Al DeWitt
I noticed in UDT.ERRLOG the following message:
 
Tue Nov 10 09:25:05 Warning - The size of CFORDER (ino=207201,
dno=2154331439, cwd=E:\AVANTE95\FLODATA\LIVE\LIVE.DATA) is approaching
system limitation.
 
According to Windows the size is 1,612,720kb in size and I know that the
limit is 2-GB.What I'm wondering is; is the message the result of
the file expanding beyond a certain threshhold (say 1.5-GB) and it
starts this message or does the database thing it's much larger than
it's showing?  If it's a threshhold situation is there a way of changing
the limit to say 1.8-GB so that it's really more if a warning?
 
Thanks.
 
Albert DeWitt
Sr. Programmer Analyst
Stylmark, Inc.
763.574.8705 (V)
763-574-1052 (F)
adew...@stylmark.com mailto:adew...@stylmark.com 
 
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Windows 2003, UniData 7.1.20: Please Explain This Message

2009-11-10 Thread Al DeWitt
Thanks Susan, you were correct. 


Al DeWitt
Stylmark, Inc.
763.574.8705 (V)
763.574.1052 (F)
adew...@stylmark.com

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Susan Lynch
Sent: Tuesday, November 10, 2009 11:03 AM
To: U2 Users List
Subject: Re: [U2] Windows 2003, UniData 7.1.20: Please Explain This
Message

Al, it should be the STATIC_GROWTH_WARN_SIZE in section 2.2 your
udt.config file.

I suspect that the U2 engineers set it low enough that an administrator
would have time to schedule sufficient downtime to memresize the file to
a dynamic file, even if it is a rapidly growing file.

Susan Lynch

- Original Message -
From: Al DeWitt adew...@stylmark.com
To: u2-users@listserver.u2ug.org
Sent: 11/10/2009 11:40 AM
Subject: [U2] Windows 2003, UniData 7.1.20: Please Explain This Message


I noticed in UDT.ERRLOG the following message:

 Tue Nov 10 09:25:05 Warning - The size of CFORDER (ino=207201,
 dno=2154331439, cwd=E:\AVANTE95\FLODATA\LIVE\LIVE.DATA) is approaching
 system limitation.

 According to Windows the size is 1,612,720kb in size and I know that
the
 limit is 2-GB.What I'm wondering is; is the message the result of
 the file expanding beyond a certain threshhold (say 1.5-GB) and it
 starts this message or does the database thing it's much larger than
 it's showing?  If it's a threshhold situation is there a way of
changing
 the limit to say 1.8-GB so that it's really more if a warning?

 Thanks.

 Albert DeWitt
 Sr. Programmer Analyst
 Stylmark, Inc.
 763.574.8705 (V)
 763-574-1052 (F)
 adew...@stylmark.com mailto:adew...@stylmark.com

 ___
 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] What Next?

2008-08-19 Thread Al DeWitt
For the last 14 years or so I have been doing programming support and
light DBA work; first in Universe (Prime Information) and now in Unidata
(Pick).  I'm basically a one-trick pony (UniBasic and System Builder)
because my goal has always been to move into a business analyst role,
but that has never worked out (I'm too IT).



Last fall I decided to stop trying to pursue that and stay in what I'm
doing.  So now I need to decide what I should invest my educational
dollars.  I want to stay in application development and support because
I like better than techie stuff.  So what would you suggest I begin
learning that would keep me reasonably employable in the future?



Thanks.



Albert DeWitt

Sr. Programmer Analyst

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


[U2] UniData Dict Item Question

2008-07-17 Thread Al DeWitt
I don't do these enough to get this right in the first 10 or so tries.
Can one of you more knowledgeable people tell me what's wrong with this
Derived Value?



V(IF BTC9000_MFGLOC1 = '' THEN 'CRB' ELSE IF BTC9000_MFGLOC1 = 'WAR' OR
BTC9000_MFGLOC1 = 'CFB' THEN BTC9000_MFGLOC2 ELSE BTC9000_MFGLOC1)



Thanks.



Albert DeWitt

Sr. Programmer Analyst

Stylmark, Inc.

763.574.8705 (V)

763-574-1052 (F)

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


[U2] Dictionary Help

2007-11-19 Thread Al DeWitt
UniData 6.1 + System Builder



I have a COMBO box that got change way back when.  Nobody knows way it
was changed as the person who did has long since left the company.  I
want to revert it back to standard.  However I want to know all the
dictionary items that use it.



I'm thinking I need to write a utility that does the following:



1.  Selects all files from the VOC.
2.  Searches the files' dictionary to find any items where the
string 'TXD' if found in attribute 2 of the dictionary item.
3.  If I get a get, display the filename and the item name.



What's the most efficient way to do this?



Thanks.



Albert DeWitt

Sr. Programmer Analyst

Stylmark, Inc.

763.574.8705 (V)

763-574-1052 (F)

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


[U2] Dictionary Help!

2007-07-23 Thread Al DeWitt
UniData 6.0.12.



I'm trying to remember where there is list of subroutines I can use when
creating v-descriptors/i-descriptors.  Since I don't do it very often I
have forgotten which manual they can be found in.



Can anybody enlighten me?



Thanks.



Albert DeWitt

Sr. Programmer Analyst

Stylmark, Inc.

763.574.8705 (V)

763-574-1052 (F)

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


[U2] ODBC Error

2006-07-18 Thread Al DeWitt
Has anybody know what this error means?



SQL Status: IM985

Error code: 81001



[Ardent][UniData ODBC Driver][UniData RDBMS][IBM][SQL Client][RPC] error
code = 81001





Albert L. DeWitt Jr.

Senior Programmer Analyst

Stylmark, Inc.

(V) 763-574-8705

(F) 763-574-1052

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


RE: [U2] client ip

2006-06-06 Thread Al DeWitt
You can see it when using UniAdmin.  Will this work?

Al DeWitt
Stylmark, Inc.
763-574-8705
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Craig Peterson
Sent: Tuesday, June 06, 2006 1:43 PM
To: u2-users@listserver.u2ug.org
Subject: [U2] client ip

Is there a Unidata command for determining a client IP address?


CONFIDENTIALITY NOTICE:
This is a transmission from American Physicians Service Group (APS), its
subsidiaries,
affiliates or other entities authorized to be represented by the APS
group.
This transmission is
intended only for the personal and confidential use by addressee(s)
named
above.  This message
may contain information which is confidential and/or proprietary.  If
you are
not the addressee or
intended recipient of this message, you are hereby notified that you
have
received this transmission
in error and that any review, dissemination, disclosure, copying or
distribution or use of the contents
of this message is strictly prohibited.  If you have received this
transmission in error, please delete
the original message and notify the APS Network Administrator
immediately at
1-800-252-3628.  Internet
and e-mail communications are APS property and APS reserves the right to
review any message that is a
product of its network.
---
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] Newbies need love too

2006-01-31 Thread Al DeWitt
I went to a classes offered by my vendor.  There are no UniVerse for
Dummies books, but there are some really knowledgeable consultants out
there.  Ask your vendor for some names.  Bring him/her in for a couple
of days' introduction.  Then let your people play for a month.  Then
bring the consultant back for a week of solid level 1, level 2 training.

I think that, along with all the help and advice you will get from the
kind folks here will get your people through.

My $.02 worth of advice.

Al DeWitt
Stylmark, Inc.
763-574-8705

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Walter Vaughan
Sent: Tuesday, January 31, 2006 4:34 PM
To: u2-users@listserver.u2ug.org
Subject: [U2] Newbies need love too

We are looking extremely hard at moving our company to an MRP/DM
vertical 
solution written to run on the UniVerse platform. Our internal staff has
dozens 
of years experience with filePro, mySQL, PHP, perl... yet we have no
experience 
among the four of us working with UniVerse or any MultiValued/Pick DBMS.

The whole concept doesn't scare us since it appears to be a mashing
together of 
a lot of concepts that we already are familiar with.

HOWEVER.

What about the newbies? Don't we get any love? I have went through every
google 
term I could think of to come up with a simple This is how you get
started with 
a UniVerse. I have installed the personal editions and have the server
running, 
but I have no clue as to really creating a database, defining a table,
inserting 
data into a record, retrieving data from a record, and applying business
logic 
to fields.

Is there not a UniVerse for Dummies website? Our sales rep asked his 
programmer and he said, I learned it 20 years ago, I don't know how you
would 
learn it today.

I have 23 and 28 year old programers that will have to live with this
solution 
for the next 20 years. They're bright, but in order to get them excited
about 
this platform I need to let them experiment.

Any website pointers will be appreciated.

Thanks,

Walter Vaughan
Vice President
Steele Rubber Products, Inc.
---
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] Sort help needed

2005-11-08 Thread Al DeWitt
This solved my problem.

Thanks for all the suggestions.

Al

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Bob Woodward
Sent: Monday, November 07, 2005 6:23 PM
To: u2-users@listserver.u2ug.org
Subject: RE: [U2] Sort help needed

The problem is your ELSE POS=0 statement.  You need something like
this:
LOCATE PART.NBR IN RECORD14 BY AL SETTING POS ELSE
   INSERT...
END

In a THEN condition, the value is already in RECORD14.  You only
need to do an INSERT when it's not found.  When it's not found, POS will
contain the position that the new value should be in so just use it.
Don't override the value by setting it to zero.

BobW

 -Original Message-
 From: [EMAIL PROTECTED] [mailto:owner-u2-
 [EMAIL PROTECTED] On Behalf Of Al DeWitt
 Sent: Monday, November 07, 2005 3:27 PM
 To: u2-users@listserver.u2ug.org
 Subject: [U2] Sort help needed
 
 Environment: UniData - Pick Flavor
 
 
 
 I'm trying to build a multi-value field in part number order.
 
 
 
 I begin with LOCATE PART.NBR IN RECORD14 BY AL SETTING POS ELSE
POS
 = 0
 
 
 
 The first time through RECORD14 is empty.  The second time
RECORD14
 has one value.  If PART.NBR is of greater value than what is now in
 RECORD14 then I want PART.NBR to be the second value, if it is of
 lesser value than I want PART.NBR to be inserted before the value in
 RECORD14.
 
 
 
 I will then do a second LOCATE to see where PART.NBR is stored
 (RECORD14,x) and use that position to insert data into associated
 attributes.
 
 
 
 My problem is that I haven't done this in a while and when I did it
was
 in Universe.  So not only am I suffering a senior moment I'm dealing
 with a language barrier.
 
 
 
 Any help would be greatly appreciated.
 
 
 
 Thanks.
 
 
 
 Al DeWitt
 
 Stylmark, Inc.
 ---
 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/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


[U2] Sort help needed

2005-11-07 Thread Al DeWitt
Environment: UniData - Pick Flavor



I'm trying to build a multi-value field in part number order.



I begin with LOCATE PART.NBR IN RECORD14 BY AL SETTING POS ELSE POS
= 0



The first time through RECORD14 is empty.  The second time RECORD14
has one value.  If PART.NBR is of greater value than what is now in
RECORD14 then I want PART.NBR to be the second value, if it is of
lesser value than I want PART.NBR to be inserted before the value in
RECORD14.



I will then do a second LOCATE to see where PART.NBR is stored
(RECORD14,x) and use that position to insert data into associated
attributes.



My problem is that I haven't done this in a while and when I did it was
in Universe.  So not only am I suffering a senior moment I'm dealing
with a language barrier.



Any help would be greatly appreciated.



Thanks.



Al DeWitt

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


RE: [U2] Mixing flavors

2005-09-01 Thread Al DeWitt
Wally Terhune wrote:
NAMED COMMON or 'blank' COMMON?
How 'blank' COMMON is stacked in UniData is different in basictypes and MAY
trigger some application mis-behaviors.

Since we are running System Builder (Avanti) and I am using the standard 
includes it appears it is using named COMMON from DMSKELCODE.

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


[U2] Mixing flavors

2005-08-31 Thread Al DeWitt
I was wondering if any of you have experience in running systems with
mixed flavors?  What I mean is that your running UniData or Universe in
Flavor A, but some of your programs are Flavor B because you need a
particular functionality that Flavor B provides.



We run Pick flavored UniData (BASICTYPE P).  Thanks to your input I
accomplished a task by writing a program using BASICTYPE U.  I spoke
with my vendor (Epicor) and they were a little hesitant to say that it
was ok.  They mentioned that the different BASICTYPEs utilize the Common
Block differently.  I confess that I don't understand COMMON all that
well.



So do any of you run mixed systems?  If so, what do you do to keep the
flavors from stepping on each other?



Thanks.



Al DeWitt

Stylmark, Inc.

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


[U2] Formatting Data Update

2005-08-26 Thread Al DeWitt
Thanks to all your help I was able to finally get it working.

However, it did mean that I had to compile as a BASICTYPE U and not as a 
BASICTYPE P.  I did this by writing a little paragraph that does the 
following:

PA
BASICTYPE U
BASIC BP EPCS9010.4
CATALOG BP EPCS9010.4 DIRECT FORCE
BASICTYPE P


I have to do this in every account I move this program to because our software 
(Avanti) runs as BASICTYPE P.

My question: Is there something I can put in the source code of my program that 
tells it to compile as a BASICTYPE U so that when I do:

OS.ED BP EPCS9010.4
  FIBCDF

It compiles as BASICTYPE U?  

I'm concerned that when I need to recompile all the BP entries in mass using a 
select list this program will compile back to the default BASICTYPE P and it 
stops working.

Thanks.

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


[U2] Formatting Data

2005-08-24 Thread Al DeWitt
Yesterday I posed the question about reformatting a multi-value down to
l or more lines of no more than 55 characters each.  I received some
great suggestions, but I can't get them to work.  The FMT command
doesn't seem to want to return anthing more than the first 55
characters.  Below I have mocked up comments coming in and how I need
them to reformat.



I have tried converting all the sub-value marks to spaces and then using
FMT.  I have tried FMT without converting the sub-value marks.  Nothing
seems to work.  Any help would be appreciated.



Thanks.



Input Data



Fourscore and seven years ago our fathers brought forth on this
continent a new nation,@SM

conceived in liberty, and dedicated to the proposition that all men are
created [EMAIL PROTECTED]

@SM

Now we are engaged in a great civil war, testing whether that nation or
any nation [EMAIL PROTECTED]

conceived and so dedicated can long endure.  We are met on a great
battlefield of [EMAIL PROTECTED]

war.  We have come to dedicate a portion of that field as a final
resting place [EMAIL PROTECTED]

those who here gave their lives that that nation might live.  It is
altogether [EMAIL PROTECTED]

and proper that we should do this.



Reformatted to no more than 55 characters per line.



Fourscore and seven years ago our fathers brought [EMAIL PROTECTED]

on this continent a new nation, conceived in liberty,@SM

and dedicated to the proposition that all men [EMAIL PROTECTED]

created [EMAIL PROTECTED]

@SM

Now we are engaged in a great civil war, testing [EMAIL PROTECTED]

that nation or any nation so conceived and so [EMAIL PROTECTED]

can long endure.  We are met on a great battlefield [EMAIL PROTECTED]

that war.  We have come to dedicate a portion of [EMAIL PROTECTED]

field as a final resting place forthose who here [EMAIL PROTECTED]

their lives that that nation might live.  It [EMAIL PROTECTED]

altogether fitting and proper that we should do this.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] Formatting Data

2005-08-24 Thread Al DeWitt
Part of the problem, I believe is that our ECLTYPE and BASICTYPE are P,
Pick.  Commands are not working the way I expect because I'm approaching
this from a UV mindset (I can't help it, it's what I know).  

I'm being told that NEWLINE = FMT(TRIM(LINE),'55T') would turn
'Fourscore and seven years ago our fathers brought forth on this
continent a new nation,' into 'Fourscore and seven years ago our fathers
brought [EMAIL PROTECTED]
'on this continent a new nation,'  However, the command: NEWLINE =
FMT(TRIM(LINE),'55T') does not work.  It just gives me the letter T.

The command: NEWLINE = FMT(TRIM(LINE),'T#55') sort of works.  
If LINE = 'Fourscore and seven years ago our fathers brought forth on
this continent a new nation,', 
the FMT command produces 'TFourscore and seven years ago our fathers
brought forth' but loses 'on this continent a new nation,'

I don't think UniData's Pick flavor is up to the task, but I'm open to
any ideas.
--Al
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Brutzman, Bill
Sent: Wednesday, August 24, 2005 6:02 PM
To: 'u2-users@listserver.u2ug.org'
Subject: RE: [U2] Formatting Data

Consider Socratic Programming... that is, break the problem down into
elemental pieces.

Please consider broadcasting a few lines of the bug-laden code.

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


[U2] Formatting Help

2005-08-22 Thread Al DeWitt
I have a multi-value field within a multi-value field (sub-values).  The
length of each sub-value can be up to 70 characters.  I need to reformat
and print the value so that each sub-value is no longer than 55
characters.  To complicate matters I need to know ahead of time how many
lines the reformatted value takes up so that if it's greater than the
page length I can do a page eject and new headings before I print the
value.  I've never do this before so how should I approach this?



Al DeWitt

Stylmark, Inc.

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


[U2] Stopping HP Laser Printer line creep

2004-11-19 Thread Al DeWitt
UniData 6.0.12
SB+ 5.2.4

I have a basic program that originally ran on a line printer to print
preprinted forms.  I am converting it to print on a laser.  I'm having
problem with line creep.  Each succeeding page will begin printing one
line lower than the preceding one.  I originally had a set-up string set
up in the Printer Class in SB+.  This didn't help and actually hurt
because it was cutting off the first lines of information on the second
and succeeding pages.

I tried Executing a SETPTR statement in the code, but the SETPTR
Verbiage displayed on the page if I placed it after the PRINTER ON stmt
and didn't seem to do anything when I placed it before.

I have spend way too much time on this little project.  Anybody have any
suggestions?  Going to Optio or Universe is not an option.

Al DeWitt
Stylmark, Inc.
763-574-8705
[EMAIL PROTECTED]
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/


[U2] Copying _HOLD_ records to Windows folders

2004-09-16 Thread Al DeWitt
UniData 6.0.12, Realty Flavor
 
I have a program that, thanks to many of you, reads entries in the _HOLD_
file copies them to another name based upon information found in the first
record.  Sort of like this:
 
READ HOLD.REC FROM HOLD.FILE,ID ELSE HOLD.REC = ''
IF HOLD.REC THEN
  NEW.NAME = TRIM(HOLD.REC1[40,30])
  WRITE HOLD.REC ON HOLD.FILE,NEW.NAME
END
 
I'm being requested to have the program write the renamed record to a
Windows folder that the user can update:
 
WINDOWS.FOLDER = \\SERVER.NAME\HOME\MONTHEND\CURRENT.MONTH
file://\\SERVER.NAME\HOME\MONTHEND\CURRENT.MONTH 
READ HOLD.REC FROM HOLD.FILE,ID ELSE HOLD.REC = ''
IF HOLD.REC THEN
  NEW.NAME = TRIM(HOLD.REC1[40,30])
  WRITE HOLD.REC ON WINDOWS.FOLDER,NEW.NAME
END
 
I know I can't just 'write' it to the folder.  But I know there has to be a
way to do this through UniBasic.  Any ideas?
 
Thanks.

Al DeWitt 
Stylmark, Inc. 
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]  
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/


[U2] Creating a comma seperated flat file in UniData.

2004-07-15 Thread Al DeWitt
OS: Windows 2K
U2: UniData 6.0.6
System Builder 5.2.4
 
I'm suffering a senior moment.  I need to output a comma separated file to
disk for importation into a 3rd party application.  System Builder is too
cumbersome (from what I can see) and want to do it in UniBasic.  However, I
have forgotten how to the command(s) to create a new flat file in an
existing folder.  So some examples would be helpful.
 

Al DeWitt 
Stylmark, Inc. 
763-574-8705 
[EMAIL PROTECTED] 
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/


[U2] Monitoring a count of users logged on

2004-06-26 Thread Al DeWitt
 PROTECTED]
Subject: Re: [U2] Monitoring a count of users logged on

You'll need a way to save the fourth line of the listuser output to the 
end of a log file along with a timestamp.

UNIX or Windows?

At 04:09 PM 6/24/2004, Al DeWitt wrote:
I need to be able to monitor the number of users logged into the server.  I
would want this to run periodically (say every 10 minutes) Monday through
Friday, 08:00 - 15:00.  I would like the output to go to a text file for
later analysis.  The output could be as simple as Date, Time, # of Users
logged in.

Is this something I can do via UniAdmin?  Do I need to write a basic
program
and run it as a phantom?

Thanks.

Al DeWitt
Stylmark, Inc.
763-574-8705
[EMAIL PROTECTED]

- ---
Kent Walker - Datatel Analyst
Information Technology - U.C. Hastings College of the Law
415-565-4635


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

--

Date: Fri, 25 Jun 2004 10:47:37 -0500
From: Tom Dodds [EMAIL PROTECTED]
Subject: RE: [U2] Proc

How about Batch Strings?

Tom Dodds
[EMAIL PROTECTED]
630-235-2975

Outside of a dog, a book is man's best friend. Inside of a dog it's too
dark to read.
Groucho Marx


- -Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Lyn Marshall
Sent: Friday, June 25, 2004 10:13 AM
To: [EMAIL PROTECTED]
Subject: RE: [U2] Proc


There are some of us who learned proc before Pick/Basic even, back when
Microdata had the ability to open, read and write to files from within
procs!  I don't miss *those* good ol' days!

Lyn Marshall
J  B Group, Inc.


- -Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Steve Mayo
Sent: Wednesday, June 23, 2004 7:29 AM
To: [EMAIL PROTECTED]
Subject: Re: [U2] Proc

Thank you all for the linksand to think I thought proc was dead and gone
;-)


Steve,

Try 
http://www-306.ibm.com/software/data/u2/pubs/library/100univ/univ_101.h
tml
for the UniVerse Guide to ProVerb, Version 10.1 (G251-1922-00), which
is a
reasonably complete Proc manual - IBM calls it ProVerb rather than
Proc!

Susan M. Lynch
F.W. Davison  Company, Inc.

CONFIDENTIALITY NOTICE:
This e-mail message, and any accompanying documents, is for the sole
use
of
the intended recipient(s) and may contain confidential and privileged 
information.  Any unauthorized review, use, disclosure, distribution or 
copying is prohibited.  If you are not the intended recipient, please 
contact our office by email or by telephone at (508) 747-7261 and 
immediately destroy all copies of the original message.

- Original Message -
From: Steve Mayo [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Wednesday, June 23, 2004 4:42 AM
Subject: [U2] Proc


 I know it's a dirty word, but I am in the need of a proc manual. My 
 client has over 200 procs of which some are very esoteric.

 Any help would be appreciated.

 Steve Mayo
 Oasis Automation
 ---
 u2-users mailing list
 [EMAIL PROTECTED]
 To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/



CONFIDENTIAL NOTICE:  This e-mail and any attachments may contain 
confidential and privileged information. If you are not the intended 
recipient, please notify the sender immediately by return e-mail, 
delete this e-mail and destroy any copies. Any dissemination or use of 
this information by a person other than the intended recipient is 
unauthorized and may be illegal.
- ---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/
- ---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/

--

Date: Fri, 25 Jun 2004 12:02:24 -0400
From: Stevenson, Charles [EMAIL PROTECTED]
Subject: RE: Re[2]: [U2] Monitoring a count of users logged on

I do something similar on UV starting with 
   `cat /.uvhome`/bin/uvlictool report_lic
instead of UD's:
/usr/ud60/bin/listuser

(A question about uvlictool came up in the Universe Database Hang
thread this week.)

 -Original Message-
 From: Bill Pizer
 
 I have this running every 60 minutes for UniData:
  
 totallogins=`/usr/ud60/bin/listuser |head -4| tail -1 |awk 
 '{print $6}'` wwwlogins=`ps -eaf |grep udapi_slave |grep -v 
 grep | wc -l |sed s/ //g` ssllogins=`ps -eaf |grep udtelnet 
 |grep -v grep |wc -l |sed s/ //g` 
 dat=`date`
  echo 
 TOT=$totallogins,WWW=$wwwlogins,SSL=$ssllogins $dat  
 /tmp/count_udt

--

Date: Fri, 25 Jun 2004 13:16:54 -0400
From: Chuck Mongiovi [EMAIL PROTECTED]
Subject: [U2] COMO capturing EXECUTE output

Does anyone know how to make COMO *NOT* capture EXECUTE output .. I'm
doing something like this:

001 EXECUTE ANY COMMAND CAPTURING STUFF
002 { CHECK STUFF FOR ERRORS }
003