I think you're looking at a program now.
PERFORM 'SELECT FILENAME BY PART BY.DSND DATE'
FIRST = 1
LOOP WHILE READNEXT ID DO
GOSUB READ.RECORD
IF ID = PREVIOUS.ID THEN CONTINUE
GOSUB OUTPUT.THIS.OLDEST.RECORD
PREVIOUS.ID = ID
REPEAT
STOP
READ.RECORD:
READ REC FROM FILENAME, ID ELSE {whatever you want for an error}
IF FIRST THEN
FIRST = ""
PREVIOUS.ID = ID
GOSUB OUTPUT.THIS.OLDEST.RECORD
END
RETURN
OUTPUT.THIS.OLDEST.RECORD
**parse the date and output**
RETURN
Something like the above NOT-DEBUGGED psudo program should work nicely.
hth,
Allen
-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Bruce Ordway
Sent: Thursday, October 06, 2005 11:03
To: '[email protected]'
Subject: [U2] Unidata TCL - beginner question - correction
Sorry,
My first post on this had an example that was a little ambiguous.
Not looking for GE or >=
Here is a more complete example
*********************************************
i.e. I have 8 records
@ID Part Date
1234 1589 12/2/04
1235 1589 11/6/03
1236 1589 10/1/05
1249 1589 10/2/05
1234 1590 12/6/04
1235 1590 11/5/01
1236 1590 1/10/05
1249 1590 2/23/05
***********************************************
I only want to see:
1249 1589 10/2/05
1249 1590 2/23/05
Can this be done with TCL?
I'm asking because I can do this in an Access query with MAX.
Hoping TCL can do the same as it would save me a lot of trouble.
If not TCL, then how about in a program?
Thanks again,
Bruce Ordway
Viking Engineering
763-586-1228
[EMAIL PROTECTED]
-------
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/
