RE: [U2] Unidata Time in Milliseconds?

2008-01-30 Thread Rotella, Leon M.
Also, try looking into $OPTION TIME.MILLISECONDS   ...   I remember
awhile back that it switches milliseconds on and off..(?).

Leon.

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Adam Eccleshall
Sent: Wednesday, January 30, 2008 11:35 AM
To: u2-users@listserver.u2ug.org
Subject: RE: [U2] Unidata Time in Milliseconds?

Hi,

SYSTEM(12) returns the current local time in milliseconds.

Adam 

 -Original Message-
 From: [EMAIL PROTECTED] 
 [mailto:[EMAIL PROTECTED] On Behalf Of Kevin King
 Sent: 30 January 2008 15:16
 To: u2-users@listserver.u2ug.org
 Subject: [U2] Unidata Time in Milliseconds?
 
 I got an interesting request today to store time from Unidata 
 in milliseconds.  Other than multiplying the TIME() value to 
 convert it to a millisecond resolution, is there any function 
 in Unidata that returns time in milliseconds?
 
 -K2
 ---
 u2-users mailing list
 u2-users@listserver.u2ug.org
 To unsubscribe please visit http://listserver.u2ug.org/
 

This electronic message contains information from CACI International Inc
or
subsidiary companies, which may be confidential, proprietary,
privileged or otherwise protected from disclosure.  The information is
intended to be used solely by the recipient(s) named above.  If you are
not
an intended recipient, be aware that any review, disclosure, copying,
distribution or use of this transmission or its contents is prohibited.
If
you have received this transmission in error, please notify us
immediately
at [EMAIL PROTECTED]
Viruses: Although we have taken steps to ensure that this e-mail and 
attachments are free from any virus, we advise that in keeping with good

computing practice the recipient should ensure they are actually virus
free.

CACI Limited. Registered in England  Wales. Registration No. 1649776.
CACI House, Avonmore Road, London, W14 8TS.
---
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] select statement with single quotes

2007-10-12 Thread Rotella, Leon M.
Try.  SELECT filename = \[']\

LEON. 

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Bill Haskett
Sent: Friday, October 12, 2007 1:40 PM
To: u2-users@listserver.u2ug.org
Subject: RE: [U2] select statement with single quotes

This bug also exists in UniData!  Also, when you get the...

Enter New line to continue...

...question at the end of a page of missing quote:...'... errors, you
can't enter
'Q' to quit!  You have to [Ctrl]+C to quit.  I tried in both Pick and
UniData modes
with no success.  This select statement works fine in D3.  I couldn't
check jBase or
QM though.

On a side note, it never ceases to amaze me that this anachronistic end
of page
comment is still around.  Hasn't it been thirty years since a [New Line]
key existed
on any keyboard?  :-)

Bill

-Original Message-
From: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED] On Behalf Of Jerry Banker
Sent: Friday, October 12, 2007 8:30 AM
To: u2-users@listserver.u2ug.org
Subject: RE: [U2] select statement with single quotes

Have you tried using the LIKE option?

SELECT CUSTOMER WITH NAME LIKE ...'...


-Original Message-
From: Charlie Rubeor [mailto:[EMAIL PROTECTED] 
Sent: Friday, October 12, 2007 10:21 AM
To: u2-users@listserver.u2ug.org
Subject: [U2] select statement with single quotes

Unidata 6.1, this statement fails.

:SELECT CUSTOMER WITH NAME = [']
missing quote:...'''...
.
.
.

There are no indices on the file and it is not only related to the 
CUSTOMER file.  Any filename and field will result in the same error 
message.  For example, 

SELECT VENDOR WITH ADDRESS = [']

results in the same message.  Is this a known issue?  More importantly,
is 
there an option or setting that I can change to fix it?

--
Charlie Rubeor
Senior Database Administrator
Wiremold/Legrand
60 Woodlawn Street
West Hartford, CT  06110
Tel: 860-233-6251 x3498
Fax: 860-523-3690
Email: [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/
---
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] [u2] : Cleaner Case Statement

2007-07-25 Thread Rotella, Leon M.
Just to be different...

Why not add a new label called Check.2 put it right before the label
Check.B

Then the code would look like:

 
  begin case
case Ans = 'A'  ;  gosub Check.A
case Ans = 'B'  ;  gosub Check.B   
case Ans = '2'  ;  gosub Check.2
case 1 ; gosub error.condition or null  
  end   case

This would help from a maintenance standpoint, if later on Check.2
needed it's own code differing than Check.B




-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Dave Davis
Sent: Wednesday, July 25, 2007 1:22 PM
To: u2-users@listserver.u2ug.org
Subject: RE: [U2] [u2] : Cleaner Case Statement

Not good if answer is not limited to one character wide.

Isn't ON  GOSUB out of style?

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Manu Fernandes
Sent: Wednesday, July 25, 2007 12:44 PM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] [u2] : Cleaner Case Statement

Try this 

ON index('AB2',Ans,1) GOSUB Check.A, Check.B, Check.B

Manu
- Original Message -
From: Brutzman, Bill [EMAIL PROTECTED]
To: u2-users@listserver.u2ug.org
Sent: Wednesday, July 25, 2007 5:48 PM
Subject: [U2] [u2] : Cleaner Case Statement


 How can this structure be cleaned-up?
 
  begin case
case Ans = 'A'  ;  gosub Check.A
case Ans = 'B'  ;  gosub Check.B   
case Ans = '2'  ;  gosub Check.B  
  end   case
 
 The following is more difficult to read.
 
  begin case
case Ans = 'A'   ;  gosub Check.A
case Ans = 'B' or Ans = '2'  ;  gosub Check.B   
  end   case
 
 I would like something like...
 
  begin case
case Ans = 'A'  ;  gosub Check.A
case Ans = 'B'
case Ans = '2'  ;  gosub Check.B  
  end   case
 
 so that the gosub Check.B command is not repeated.  I have tried a 
 few alternatives without a victory.
 
 Suggestions would be appreciated.
 
 --Bill
 ---
 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-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] Finding last day of month

2005-06-02 Thread Rotella, Leon M.
Here's yet another way...


END.OF.MONTH
0001   EDATES =
31:@FM:29:@FM:31:@FM:30:@FM:31:@FM:30:@FM:31:@FM:31:@FM:
30:@FM:31
 :@FM:30:@FM:31
0002   PRINT INPUT DATE MMDD - : ; INPUT ODATE
0003   EYEAR = ODATE[1,4]
0004   EMONTH = ODATE[5,2]
0005   EDAY = EDATESEMONTH
0006   EDATE = EYEAR:EMONTH:EDAY
0007   IDATE = ICONV(EDATE,'D')
0008   IF STATUS() THEN
0009  EDATE -= 1
0010   END
0011   PRINT ODATE,EDATE

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