Or you could write a program to find and re-engineer the dicts for you! If it's just a few, obviously doing it manually would be faster, but if you're talking hundreds, then a program is an option...
Allen E. Elwood www.tortillafc.com -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Behalf Of Bill Haskett Sent: Monday, January 09, 2006 14:15 To: [email protected] Subject: RE: [U2] [UD] How to determine the File Name within a dictionary called Subroutine Thanks, David. I was trying to avoid changing a bunch of dictionaries but I guess I've got some more re-engineering to do. :-( Bill > -----Original Message----- > From: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED] On Behalf Of > David A. Green > Sent: Monday, January 09, 2006 6:28 AM > To: [email protected] > Subject: RE: [U2] [UD] How to determine the File Name within > a dictionary called Subroutine > > Can you send it into the Subroutine as a parameter? > > SUBR("MY.SUB", @FILENAME, Dict_Name, etc. ) > > -----Original Message----- > From: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED] On Behalf Of Bill Haskett > Sent: Friday, January 06, 2006 2:04 PM > To: [email protected] > Subject: [U2] [UD] How to determine the File Name within a > dictionary called Subroutine > > As I trudge along with a client conversion I've noticed a > difficulty using @FILENAME within a BASIC program...it works > fine in UniVerse but fails to compile in UniData ("P" > Ecltype). I'm trying to determine, in a subroutine called > from a virtual definition, if the file being processed needs > to be opened. Code looks like: > > CurrFileName = @FILENAME > IF CurrFileName = "EMPLOYEES" THEN > ReturnValue = @RECORD<15> > END ELSE > ReturnValue = @RECORD<12> > END > RETURN > > I can use @FILENAME in a virtual dictionary definition but > not in BASIC. > How do I get the variable of the file being processed in a > query, in UniData? > > Since the same code runs on U2 and D3 I'd like to keep this > business rule in the subroutine, that can be used by both. > > Thanks, any help would be appreciated. > > Bill Haskett > ------- > 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/ ------- 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/
