Re: [U2] READU ... THEN _or_ ELSE but not both?

2004-10-30 Thread FFT2001
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

Re: [U2] READU ... THEN _or_ ELSE but not both?

2004-10-30 Thread FFT2001
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

Re: [U2] READU ... THEN _or_ ELSE but not both?

2004-10-29 Thread Mark Johnson
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

RE: [U2] READU ... THEN _or_ ELSE but not both?

2004-10-29 Thread Kryka, Richard
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

RE: [U2] READU ... THEN _or_ ELSE but not both?

2004-10-29 Thread CDMI
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

RE: [U2] READU ... THEN _or_ ELSE but not both?

2004-10-29 Thread Horn, John
> 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

RE: [U2] READU ... THEN _or_ ELSE but not both?

2004-10-29 Thread Kevin King
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

RE: [U2] READU ... THEN _or_ ELSE but not both?

2004-10-29 Thread Pingilley, Ron
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

RE: [U2] READU ... THEN _or_ ELSE but not both?

2004-10-29 Thread Bob Woodward
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:

Re: [U2] READU ... THEN _or_ ELSE but not both?

2004-10-29 Thread Allen Egerton
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,