I never used &UFD& before - I like that one. 

-----Original Message-----
From: [email protected] 
[mailto:[email protected]] On Behalf Of Allen Egerton
Sent: Tuesday, April 30, 2013 11:57 AM
To: U2 Users List
Subject: Re: [U2] Help needed..

OPEN "", "&UFD&" TO F.UFD ELSE STOP "CAN'T OPEN UFD"
READ D.UFD FROM F.UFD, "xxx.tabdelimitedname" ELSE
CRT "Can't read tab-delimited file from current directory"
STOP
END
OPEN "", "OTHERFILE" TO F.OTHER ELSE
CRT "Can't open OTHERFILE file to retrieve data from"
STOP
END

REM1 = 999
LOOP WHILE REM1 NE 0
REMOVE LINE FROM D.UFD SETTING REM1
K.OTHER = FIELD(LINE, TABCHAR, 1)
READ D.OTHER FROM F.OTHER, K.OTHER THEN
ONE = D.OTHER<1>
TWO = D.OTHER<2>
do something with the fields...
END ELSE
CRT "Cant' read record ": K.OTHER: " from OTHERFILE."
END
REPEAT
*
CRT "DONE"
STOP


-- 
Allen Egerton; [email protected]

_______________________________________________
U2-Users mailing list
[email protected]
http://listserver.u2ug.org/mailman/listinfo/u2-users

Reply via email to