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
