Arrggg. I should have seen that. Thanks Kevin
--- Jim Self <[EMAIL PROTECTED]> wrote: > Kevin, > I am glad you got it working. The diff indicates > that your version has a blank line > inserted at row 41. That is the source of your bug. > Because it has fewer leading dots > (".") than the lines immediately preceding and > following, that blank line would break the > block of code and prevent execution of the lines > following. > > >Jim, > > > >Sorry for being slow on the uptake. > > > >OK. I downloaded your file, and sure enough, your > >version now works great. I did the diff between > your > >file (DIS1.m) and mine (DIS1.m.safe), and here it > is: > > > >[EMAIL PROTECTED] r]$ diff DIS1.m DIS1.m.safe > >41c41 > >< .;--following line modified per GFT to fix > >search with output transform on pointer, jas > >2005-03-23--; > >--- > >> > >42a43 > >> .;//kt modification of line above based on > >advice of George Timson 3/21/05 > >62,63d62 > >< > >< ;-- DIS1 -- Downloaded 25Mar05 from M2Web, > >vista.vmth.ucdavis.edu > >\ No newline at end of file > >[EMAIL PROTECTED] r]$ > > > >Not sure if there are enough differences there to > make > >a difference. Frankly, as long as it works, I've > seen > >enough of this function for quite a while. I think > >I'll leave it alone. > > > >I appreciate your great help! > > > >Kevin > > > > > > > > > >--- Jim Self <[EMAIL PROTECTED]> wrote: > > > >> Ahhh. I believe I gave you two links. The M2Web > >> routine viewer will deliver a given > >> routine in alternate forms depending on the file > >> extension following the routine name. The > >> main file extensions are .html (the default), > .txt > >> (for viewing the source in plain text, > >> lines delimited by cr-lf), and .m (for download, > >> lines delimited by lf). > >> > >> So here they are again: > >> > >> http://vista.vmth.ucdavis.edu/rtn/DIS1.m - click > >> this one for download to GT.M > >> > >> http://vista.vmth.ucdavis.edu/rtn/DIS1.html - > click > >> this one to view hypertext > >> > >> http://vista.vmth.ucdavis.edu/rtn/DIS1.txt - > click > >> this one to view plain text > >> > >> > >> You could also put a wildcard ("*") in the > routine > >> name of the html version to get a list > >> of routines available. For instance: > >> > >> http://vista.vmth.ucdavis.edu/rtn/DIS* > >> > >> I hope that helps. > >> > >> Also, the same thing applies to the routines on > the > >> wiki, except that the routines there > >> are not as current (unless they have been updated > in > >> the last week) and the old version of > >> the routine viewer there (^htRtn) doesn't support > >> wildcards. The version of ^DIS1 there > >> does appear to be the same version, but without > the > >> new patch. > >> > >> > >http://openforum.worldvista.org/mt-bin/m/rtn/DIS1.html > >> > http://openforum.worldvista.org/mt-bin/m/rtn/DIS1.m > >> > >> > >> >Jim, > >> > > >> >When I got the file from your link, it came with > >> the > >> >key words expanded, and with line numbers. How > >> could > >> >I get your original file? > >> > > >> >Thanks > >> >Kevin > >> > > >> >--- Jim Self <[EMAIL PROTECTED]> wrote: > >> > > >> >> Kevin wrote: > >> >> >> Did you see my note where I gave you a link > to > >> a > >> >> >> version of ^DIS1 where I inserted > >> >> >> George's fix? I tested it and the search > did > >> >> appear > >> >> >> to work correctly for me. > >> >> > > >> >> >Yes I did see your link. And my code looks > just > >> >> like > >> >> >yours now. Here it the line: > >> >> > > >> >> >GTM>zprint OUTX^DIS1 > >> >> >OUTX .I $D(^(2)),$P(^(0),U,2)'["D",DV'["=" > S > >> >> >M=0,Y="S Y="_Y_" "_$$OVFL(^(2))_" I > >> >> > "_$$XFORM("Y") Q > >> >> > >> >> > >> >> Since the vagaries of email make it difficult > to > >> >> read or trust MUMPS source code that you > >> >> see embedded in it, it might be helpful to do > a > >> diff > >> >> to compare different versions of the > >> >> routine, specifically, yours, mine, and the > >> >> original. > >> >> > >> >> You could use diff to prove that two versions > are > >> >> identical or to see how they are > >> >> different. For instance, if you were to rename > >> one > >> >> of them to DIS1x.m, then try > >> >> diff DIS1.m DIS1x.m > >> >> > >> >> >GTM> > >> >> > > >> >> >And, with this code in place, I am still > getting > >> >> the > >> >> >results posted on my last email. > >> >> > > >> >> >Did you have problems before putting in the > fix? > >> >> > >> >> Yes. The SemiVivA 0.4 database has one TIU > >> document > >> >> in it with ENTERED_BY = nvd. I > >> >> conducted a search on that before the fix > where > >> it > >> >> didn't work and after the fix where it > >> >> did. I had similar results with a database > from > >> the > >> >> 2.51 OpenVistA distribution. > >> >> > >> >> --------------------------------------- > > --------------------------------------- > Jim Self > Systems Architect, Lead Developer > VMTH Computer Services, UC Davis > (http://www.vmth.ucdavis.edu/us/jaself) > > > ------------------------------------------------------- > SF email is sponsored by - The IT Product Guide > Read honest & candid reviews on hundreds of IT > Products from real users. > Discover which products truly live up to the hype. > Start reading now. > http://ads.osdn.com/?ad_id=6595&alloc_id=14396&op=click > _______________________________________________ > Hardhats-members mailing list > Hardhats-members@lists.sourceforge.net > https://lists.sourceforge.net/lists/listinfo/hardhats-members > __________________________________ Do you Yahoo!? Yahoo! Small Business - Try our new resources site! http://smallbusiness.yahoo.com/resources/ ------------------------------------------------------- SF email is sponsored by - The IT Product Guide Read honest & candid reviews on hundreds of IT Products from real users. Discover which products truly live up to the hype. Start reading now. http://ads.osdn.com/?ad_id=6595&alloc_id=14396&op=click _______________________________________________ Hardhats-members mailing list Hardhats-members@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/hardhats-members