I'm supprised GT.M doesn't support the ^$ROUTINE SSVN, but part of Kernel's job is to hide system quirks like this. Presumably, GT.M provides some other mechanism for listing routines so it should be possible to write GT.M specific code to do the same thing.
--- Kevin Toppenberg <[EMAIL PROTECTED]> wrote: > If ^$R() is part of the 95 M standard (as Ed de Moel's > reference seems to indicate it is), why doesn't GT.M > support it. Isn't it fair game for the VA to use? > > Kevin > > > --- "K.S. Bhaskar" <[EMAIL PROTECTED]> wrote: > > > Kevin -- > > > > GT.M does not implement SSVNs (Structured System > > Variable Names) and to > > the best of my knowledge VistA is not suppsoed to > > use them. > > > > -- Bhaskar > > > > On Mon, 2005-07-25 at 10:48 -0500, Kevin Toppenberg > > wrote: > > > I am getting a compile error I don't understand. > > > > > > GTM>zl "XPDR.m" > > > .S XPDJ=XPDI D:$D(^$R(XPDJ)) F S > > > > > XPDJ=$O(^$R(XPDJ)) Q:XPDJ=""!($P(XPDJ,XPDI)]"") D > > > > > ^----- > > > At column 21, line 21, source > > module > > > /usr/local/OpenVistA/r/XPDR.m > > > %GTM-E-GBLNAME, Either an identifier or a left > > > parenthesis is expected after a ^ in this context > > > > > > GTM> > > > > > > It seems to want a global name after the ^, but > > > according Ed de Moel, ^$R() is allowed. > > > > > > What is the problem? > > > > > > Kevin > > > > > > > > > __________________________________________________ > > > > > Do You Yahoo!? > > > Tired of spam? Yahoo! Mail has the best spam > > protection around > > > http://mail.yahoo.com > > > > > > > > > > > > ------------------------------------------------------- > > > > > SF.Net email is sponsored by: Discover Easy Linux > > Migration > > > Strategies > > > from IBM. Find simple to follow Roadmaps, > > straightforward articles, > > > informative Webcasts and more! Get everything you > > need to get up to > > > speed, fast. > > > http://ads.osdn.com/?ad_id=7477&alloc_id=16492&op=click > > > > > _______________________________________________ > > > Hardhats-members mailing list > > > Hardhats-members@lists.sourceforge.net > > > > > > https://lists.sourceforge.net/lists/listinfo/hardhats-members > > > > > > > > > > > > ------------------------------------------------------- > > SF.Net email is sponsored by: Discover Easy Linux > > Migration Strategies > > from IBM. Find simple to follow Roadmaps, > > straightforward articles, > > informative Webcasts and more! Get everything you > > need to get up to > > speed, fast. > > > http://ads.osdn.com/?ad_id=7477&alloc_id=16492&op=click > > _______________________________________________ > > Hardhats-members mailing list > > Hardhats-members@lists.sourceforge.net > > > https://lists.sourceforge.net/lists/listinfo/hardhats-members > > > > > __________________________________________________ > Do You Yahoo!? > Tired of spam? Yahoo! Mail has the best spam protection around > http://mail.yahoo.com > > > ------------------------------------------------------- > SF.Net email is sponsored by: Discover Easy Linux Migration > Strategies > from IBM. Find simple to follow Roadmaps, straightforward articles, > informative Webcasts and more! Get everything you need to get up to > speed, fast. http://ads.osdn.com/?ad_id=7477&alloc_id=16492&op=click > _______________________________________________ > Hardhats-members mailing list > Hardhats-members@lists.sourceforge.net > https://lists.sourceforge.net/lists/listinfo/hardhats-members > === Gregory Woodhouse <[EMAIL PROTECTED]> "Design quality doesn't ensure success, but design failure can ensure failure." --Kent Beck ------------------------------------------------------- SF.Net email is sponsored by: Discover Easy Linux Migration Strategies from IBM. Find simple to follow Roadmaps, straightforward articles, informative Webcasts and more! Get everything you need to get up to speed, fast. http://ads.osdn.com/?ad_id=7477&alloc_id=16492&op=click _______________________________________________ Hardhats-members mailing list Hardhats-members@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/hardhats-members
