Greg,
Thanks for your replies. I was overlooking Fileman's
search function.
But I'll also check out FIND1^DIC.
I still would like to know why my searches were
failing in the screen log I posted, though. It's not
always reassuring when you just find another solution,
but never know why plan A failed.
Thanks
Kevin
--- Greg Woodhouse <[EMAIL PROTECTED]> wrote:
> Oh...and most of the time, I find it easier just to
> use $$FIND1^DIC
>
> S MYDA=$$FIND1^DIC(19,,"M","HL MAIN",,,"MROOT") W
> MYDA
> 8235
>
> or, if you don't need any error messages, just
>
> S MYDA=$$FIND1^DIC(19,,"M","HL MAIN") W MYDA
> 8235
>
> will do as well.
>
> --- Greg Woodhouse <[EMAIL PROTECTED]> wrote:
>
> > Here's an example (using the OPTION file and
> looking for "HL MAIN"):
> >
> >
> > >>D FIND^DIC(19,,"@;.01;1;1.1","M","HL
> MAIN","*",,,,"OUT","MROOT")
> >
> > >>ZW OUT
> > OUT("DILIST",0)=1^*^0^
> > OUT("DILIST",0,"MAP")=.01^1^1.1
> > OUT("DILIST",2,1)=8235
> > OUT("DILIST","ID",1,.01)=HL MAIN MENU
> > OUT("DILIST","ID",1,1)=HL7 Main Menu
> > OUT("DILIST","ID",1,1.1)=HL7 MAIN MENU
> >
> > >>
> > --- Kevin Toppenberg <[EMAIL PROTECTED]> wrote:
> >
> > > I can't figure out why sometime FIND^DIC is
> > > successful, and sometimes it is not. It seems
> to
> > > depend on what fields I request vs. whether the
> > > patient has data for those fields, and whether
> or not
> > > I use flags of "M" or not.
> > >
> > > Here is a long screen log of various tries, with
> some
> > > succeeding and some not. Note that this is a
> real
> > > patient, so I xx'd out the DOB and SSNum.
> > >
> > > Any ideas?
> > >
> > > Thanks
> > > Kevin
> > >
> > >
> > >
> > >
> > > GTM>set value="WIGLE,Gordon s"
> > >
> > > GTM>do
> > >
>
FIND^DIC(2,"","","M",value,"*","","","","Matches","TMGMsg")
> > >
> > > GTM>zwr Matches(*)
> > > Matches("DILIST",0)="1^*^0^"
> > >
> >
>
Matches("DILIST",0,"MAP")="FID(.03)^FID(.09)^FID(.301)^FID(391)^FID(994)"
> > > Matches("DILIST",1,1)="WIGLE,GORDON S"
> > > Matches("DILIST",2,1)=68158
> > > Matches("DILIST","ID",1,.03)="09/13/19xx"
> > > Matches("DILIST","ID",1,.09)=xxxxxxxx
> > > Matches("DILIST","ID",1,.301)=""
> > > Matches("DILIST","ID",1,391)=""
> > > Matches("DILIST","ID",1,994)=""
> > > Matches("DILIST","ID","WRITE",1,1)=""
> > >
> > > GTM>kill Matches
> > >
> > > GTM>do
> > >
>
FIND^DIC(2,"","","M",value,"*","","","","Matches","TMGMsg")
> > >
> > > GTM>zwr Matches(*)
> > > Matches("DILIST",0)="1^*^0^"
> > >
> >
>
Matches("DILIST",0,"MAP")="FID(.03)^FID(.09)^FID(.301)^FID(391)^FID(994)"
> > > Matches("DILIST",1,1)="WIGLE,GORDON S"
> > > Matches("DILIST",2,1)=68158
> > > Matches("DILIST","ID",1,.03)="09/13/19xx"
> > > Matches("DILIST","ID",1,.09)=xxxxxxxxxxxxx
> > > Matches("DILIST","ID",1,.301)=""
> > > Matches("DILIST","ID",1,391)=""
> > > Matches("DILIST","ID",1,994)=""
> > > Matches("DILIST","ID","WRITE",1,1)=""
> > >
> > > GTM>kill Matches
> > >
> > > GTM>do
> > >
>
FIND^DIC(2,"","","",value,"*","","","","Matches","TMGMsg")
> > >
> > > GTM>zwr Matches(*)
> > > Matches("DILIST",0)="1^*^0^"
> > >
> >
>
Matches("DILIST",0,"MAP")="FID(.03)^FID(.09)^FID(.301)^FID(391)^FID(994)"
> > > Matches("DILIST",1,1)="WIGLE,GORDON S"
> > > Matches("DILIST",2,1)=68158
> > > Matches("DILIST","ID",1,.03)="09/13/19xx"
> > > Matches("DILIST","ID",1,.09)=xxxxxxxxxxx
> > > Matches("DILIST","ID",1,.301)=""
> > > Matches("DILIST","ID",1,391)=""
> > > Matches("DILIST","ID",1,994)=""
> > > Matches("DILIST","ID","WRITE",1,1)=""
> > >
> > > GTM>set Fields="@;.01;.02;.03;.09;22700"
> > >
> > > GTM>do
> > >
>
FIND^DIC(2,"","",Fields,value,"*","","","","Matches","TMGMsg")
> > >
> > > GTM>zwr Matches(*)
> > > %GTM-E-UNDEF, Undefined local variable: Matches
> > >
> > > GTM>set Fields="@;.01;.02;.03"
> > >
> > > GTM>do
> > >
>
FIND^DIC(2,"","",Fields,value,"*","","","","Matches","TMGMsg")
> > >
> > > GTM>zwr Matches(*)
> > > %GTM-E-UNDEF, Undefined local variable: Matches
> > >
> > > GTM>set Fields="@;.01"
> > >
> > > GTM>do
> > >
>
FIND^DIC(2,"","",Fields,value,"*","","","","Matches","TMGMsg")
> > >
> > > GTM>zwr Matches(*)
> > > %GTM-E-UNDEF, Undefined local variable: Matches
> > >
> > > GTM>set Fields=""
> > >
> > > GTM>do
> > >
>
FIND^DIC(2,"","",Fields,value,"*","","","","Matches","TMGMsg")
> > >
> > > GTM>zwr Matches(*)
> > > Matches("DILIST",0)="1^*^0^"
> > >
> >
>
Matches("DILIST",0,"MAP")="FID(.03)^FID(.09)^FID(.301)^FID(391)^FID(994)"
> > > Matches("DILIST",1,1)="WIGLE,GORDON S"
> > > Matches("DILIST",2,1)=68158
> > > Matches("DILIST","ID",1,.03)="09/13/19xx"
> > > Matches("DILIST","ID",1,.09)=xxxxxxxxxxx
> > > Matches("DILIST","ID",1,.301)=""
> > > Matches("DILIST","ID",1,391)=""
> > > Matches("DILIST","ID",1,994)=""
> > > Matches("DILIST","ID","WRITE",1,1)=""
> > >
> > > GTM>set Fields="@;.01;.02;.03"
> > >
> > > GTM>do
> > >
>
FIND^DIC(2,"","M",Fields,value,"*","","","","Matches","TMGMsg")
> > >
> > > GTM>zwr Matches(*)
> > > %GTM-E-UNDEF, Undefined local variable: Matches
> > >
> > > GTM>set Fields=""
> > >
> > > GTM>do
> > >
>
FIND^DIC(2,"","M",Fields,value,"*","","","","Matches","TMGMsg")
> > >
> > > GTM>zwr Matches(*)
> > > %GTM-E-UNDEF, Undefined local variable: Matches
> > >
> > > GTM>do
> > >
>
FIND^DIC(2,"","",Fields,value,"*","","","","Matches","TMGMsg")
> > >
> > > GTM>zwr Matches(*)
> > > Matches("DILIST",0)="1^*^0^"
> > >
> >
>
Matches("DILIST",0,"MAP")="FID(.03)^FID(.09)^FID(.301)^FID(391)^FID(994)"
> > > Matches("DILIST",1,1)="WIGLE,GORDON S"
> > > Matches("DILIST",2,1)=68158
> > > Matches("DILIST","ID",1,.03)="09/13/19xx"
> > > Matches("DILIST","ID",1,.09)=xxxxxxxxxxx
> > > Matches("DILIST","ID",1,.301)=""
> > > Matches("DILIST","ID",1,391)=""
> > > Matches("DILIST","ID",1,994)=""
> > > Matches("DILIST","ID","WRITE",1,1)=""
> > >
> > >
> > >
>
=== message truncated ===
__________________________________
Do you Yahoo!?
Meet the all-new My Yahoo! - Try it today!
http://my.yahoo.com
-------------------------------------------------------
This SF.Net email is sponsored by: IntelliVIEW -- Interactive Reporting
Tool for open source databases. Create drag-&-drop reports. Save time
by over 75%! Publish reports on the web. Export to DOC, XLS, RTF, etc.
Download a FREE copy at http://www.intelliview.com/go/osdn_nl
_______________________________________________
Hardhats-members mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/hardhats-members
