For future reference then:
FM has an option to reindex a file which allows you to pick a
specific index.
Also, there are calls to DIK to do likewise. I believe the call for
a single index is IX^DIK.
On Jul 8, 2006, at 8:59 PM, Kevin Toppenberg wrote:
> Thanks Greg and Chris.
>
> I fixed it with this code:
>
> Kevin
>
>
>
> ReIndex
> ;"Purpose: To recreate the "B" index for the PATIENT file, adding the
> entries for aliases.
>
> new index
> set index=$ORDER(^DPT(0))
> if index>0 for do quit:(+index'>0)
> . if $data(^DPT(index,.01,0)) do
> . . new alias,IEN2
> . . set IEN2=$order(^DPT(index,.01,0))
> . . if +IEN2>0 for do quit:(+IEN2'>0)
> . . . set alias=$piece($get(^DPT(index,.01,IEN2,0)),"^",1)
> . . . if alias'="" set ^DPT("B",alias,index)=1
> . . . set IEN2=$order(^DPT(index,.01,IEN2))
> . set index=$ORDER(^DPT(index))
>
> quit
>
>
>
> On 7/8/06, Gregory Woodhouse <[EMAIL PROTECTED]> wrote:
>>
>>
>>
>> On Jul 8, 2006, at 6:11 AM, Kevin Toppenberg wrote:
>>
>>
>>
>> Anyway, does anyone have any ideas how to get the "B" index recreated
>>
>> properly? If I just reindex the file in fileman, I don't think that
>>
>> the aliases will be added. And come to think of it, maybe this is
>>
>> what I did at some point to break it in the first place. I am
>> able to
>>
>> write code to do this manually, but I wonder if there is another way
>>
>> that this "should" be done.
>>
>>
>>
>>
>> There may be a utility to rebuild this index documented in the
>> technical
>> manuals. Unfortunately, PIMS internals are pretty much outside my
>> area of
>> expertise.
>>
>>
>> Gregory Woodhouse
>> [EMAIL PROTECTED]
>>
>
>
> ----------------------------------------------------------------------
> ---
> Using Tomcat but need to do more? Need to support web services,
> security?
> Get stuff done quickly with pre-integrated technology to make your
> job easier
> Download IBM WebSphere Application Server v.1.0.1 based on Apache
> Geronimo
> http://sel.as-us.falkag.net/sel?
> cmd=lnk&kid=120709&bid=263057&dat=121642
> _______________________________________________
> Hardhats-members mailing list
> Hardhats-members@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/hardhats-members
-------------------------------------------------------------------------
Using Tomcat but need to do more? Need to support web services, security?
Get stuff done quickly with pre-integrated technology to make your job easier
Download IBM WebSphere Application Server v.1.0.1 based on Apache Geronimo
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=120709&bid=263057&dat=121642
_______________________________________________
Hardhats-members mailing list
Hardhats-members@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/hardhats-members
