PRINT 'Filename : ': INPUT FNAME IF FNAME='' THEN STOP IF INDEX(FNAME,'/',1) THEN OPENPATH FNAME TO FILE ELSE STOP 201,FNAME END ELSE OPEN '',FNAME TO FILE ELSE STOP 201,FNAME END INDICES=INDICES(FILE) MAXI=DCOUNT(INDICES,@AM) FOR II=1 TO MAXI INDEX=INDICES<II> ATTRIBUTES=INDICES(FILE,INDEX) PATHNAME=ATTRIBUTES<1,5> PRINT INDEX 'L#10':' ':PATHNAME NEXT II
-------------- Original message -------------- From: "Perry Taylor" <[EMAIL PROTECTED]> > Hello, All. > > Is anyone aware of a supported UniVerse method for determining > programmatically > which I_FILENAME/INDEX.nnn file corresponds to a particular index of a given > file? I know I can look in the I_FILENAME/INDEX.MAP file but I wanted to > avoid > parsing an unpublished file structure. > > Any ideas? > > Thanks > > Perry Taylor > ZirMed > 626 West Main St , 6th Floor b Louisville, KY 40202 > www.zirmed.com > > > > CONFIDENTIALITY NOTICE: This e-mail message, including any attachments, is > for > the sole use of the intended recipient(s) and may contain confidential and > privileged information. Any unauthorized review, use, disclosure or > distribution is prohibited. ZirMed, Inc. has strict policies regarding the > content of e-mail communications, specifically Protected Health Information, > any > communications containing such material will be returned to the originating > party with such advisement noted. If you are not the intended recipient, > please > contact the sender by reply e-mail and destroy all copies of the original > message. > ------- > 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/
