EXECUTE "SELECT DICT (This.File) WITH F2 = (This.Field.Nbr)" CAPTURING OUTPUT IF @SELECTED <= 0 THEN you have a problem READNEXT DICT.ID ELSE (get out) EXECUTE "CLEARSELECT" ; Get out (since you're happy with the 1st hit)
Laure Hansen, City of Redwood City - Information Technology 1017 Middlefield Road - Redwood City, CA 94063 Office 650-780-7087 - Cell 650-207-3235 - Fax 650-556-9204 lhan...@redwoodcity.org o Please think green before printing this e-mail Subscribe to receive Redwood City E-News, news releases, or other documents via email: Click here to register/subscribe -----Original Message----- From: owner-u2-us...@listserver.u2ug.org [mailto:owner-u2-us...@listserver.u2ug.org] On Behalf Of Brutzman, Bill Sent: Friday, May 15, 2009 1:48 PM To: u2-users@listserver.u2ug.org Subject: RE: [U2] 1. This is not done from an SB+ screen. 2. While there could be "multiple hits" I would be happy to grab the first one, better yet, see what all of the multiple hits are. If there are no hits, it would tell me that I should manually specify these blank fields in the DICT. Thanks for responding. --B -----Original Message----- From: owner-u2-us...@listserver.u2ug.org [mailto:owner-u2-us...@listserver.u2ug.org] On Behalf Of Israel, John R. Sent: Friday, May 15, 2009 4:27 PM To: 'u2-users@listserver.u2ug.org' Subject: RE: [U2] Is this done from a SB+ screen? If so, you should be able to pull from one of their variables. If not, you would have to do a select on the DICT to find the one you want. The problem here is what to do it you get multiple hits or no hits? John Israel Sr. Programmer/Analyst Dayton Superior Corporation 721 Richard St. Dayton, OH 45342 937-866-0711 x44380 -----Original Message----- From: owner-u2-us...@listserver.u2ug.org [mailto:owner-u2-us...@listserver.u2ug.org] On Behalf Of Brutzman, Bill Sent: Friday, May 15, 2009 4:16 PM To: u2-users@listserver.u2ug.org Subject: [U2] >From within UniBasic, I need to determine the name of a DICTionary field, given the dict field number. While I have the beginnings of some code, some help is needed. This.Field.Nbr = R.Change<14> This.File = R.Change<11> open "DICT", This.File to Dict.This.File else null read R.This from Dict.This.File, WHAT.DO.I.USE.HERE else null Field.Name = R.This<This.Field.Nbr> --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/
