In a message dated 10/29/2004 2:58:52 PM Pacific Daylight Time,
[EMAIL PROTECTED] writes:
> DONELOK = 0
> LOOP UNTIL DONELOK = 1 DO
> READU LOKREC FROM CUSTOMERFILE,CUSTID LOCKED
> CRT TIMEDATE():\ port \:SYSTEM(18):\ file CUSTOMER item \:CUSTID:\locked!\
> ; SLEEP 1
> END THEN DONELOK = 1 ELSE
In a message dated 10/29/2004 2:24:37 PM Pacific Daylight Time,
[EMAIL PROTECTED] writes:
> READU R.XBWU FROM F.XBWU, X.ONE.ID LOCKED
> CRT 'XBWU RECORD IS LOCKED, IGNORE IT'
> END THEN
> X.LOCKED = '1'
> END ;*END READU
>
> IF X.LOCKED = '1' THEN
> CRT 'OBTAINED LOCK ON XBWU RECORD'
> R
L PROTECTED]>
Sent: Friday, October 29, 2004 5:48 PM
Subject: RE: [U2] READU ... THEN _or_ ELSE but not both?
> I like this format:
>
> READU RECORD FROM FILE, ID LOCKED
>
> END THEN
>
> END ELSE
>
> END
>
> Dick Kryka
> Director of App
I like this format:
READU RECORD FROM FILE, ID LOCKED
END THEN
END ELSE
END
Dick Kryka
Director of Applications
CCCS of Greater Denver, Inc.
Paragon Financial Services
303-632-2226
[EMAIL PROTECTED]
-Original Message-
From: [EMAIL PROTECTED]
[mail
Wendy - here's a snippet:
DONELOK = 0
LOOP UNTIL DONELOK = 1 DO
READU LOKREC FROM CUSTOMERFILE,CUSTID LOCKED
CRT TIMEDATE():\ port \:SYSTEM(18):\ file CUSTOMER item \:CUSTID:\locked!\
; SLEEP 1
END THEN DONELOK = 1 ELSE LOKREC = '' ; DONELOK = 1
REPEAT
notice the LOCKED END THEN ELSE
Ste
> On Behalf Of Wendy Smoak
>
> Am I reading this right? When I READU I can either have a THEN or
an
> ELSE, but not both? (That it does not compile with both tends to
> confirm that...)
This snippet of code compiles on Unidata 6.0:
ID="???"
OPEN "","VOC" TO BLA
A READU can have all three, actually, at least on Unidata.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Wendy Smoak
Sent: Friday, October 29, 2004 3:08 PM
To: [EMAIL PROTECTED]
Subject: [Norton AntiSpam] [U2] READU ... THEN _or_ ELSE but not both?
>Fr
Wendy,
We're on UV 10.1.2, on AIX. We have the READU..LOCKED..THEN..ELSE logic in
MANY of our programs:
READU dyn.arr FROM F.FILE1,rec.id LOCKED
***handle the locked condition
END THEN
* do the update
END ELSE
* type in the right item-id, dude!
END
If you have an examp
See below for modification.
Bob Woodward
Programmer/Analyst
Harbor Wholesale Grocery
[EMAIL PROTECTED]
> -Original Message-
> From: [EMAIL PROTECTED] [mailto:owner-u2-
> [EMAIL PROTECTED] On Behalf Of Wendy Smoak
> Sent: Friday, October 29, 2004 2:08 PM
> To: [EMAIL PROTECTED]
> Subject:
On Fri, 29 Oct 2004 14:07:56 -0700, you wrote:
>From the documentation:
>
>READU dyn.array.var FROM [file.var,] record.ID.expr [LOCKED statements]
>[ON ERROR statements] {THEN statements [END] | ELSE statements [END]}
>
>Am I reading this right? When I READU I can either have a THEN or an
>ELSE,
10 matches
Mail list logo