Matthew,

I see what you mean!  The problem is that VistA is an ever moving
target.  If the volunteers took the hours and hours needed to clean up
all these distros before releasing them, then a release might never
get done!

About the automatic deletions, the only thing point TO the PHARMACY
PATIENT file is file 59.7.  I found this out by checking VPE's DD, and
looking at pointers IN.  Now, all those records that you are going to
delete are invalid anyway, so killing them should be OK.  But you
might want to then look at file 59.7 and see if you need to clean IT
up.

Kevin


On 6/23/06, Matthew King <[EMAIL PROTECTED]> wrote:
> I've been experimenting with that. I can start with patient 3 and not
> knock out my test patients. My concern is when I do it manually, I get
> prompted to kill the references, but when I stuff ///@, there is no
> prompt and I think I still may have dangling references. Can I
> 1) reindex after the stuff @ or
> 2) make an input template somehow. I can't see how to do this one.
>
> You should see all that junk in there! Here is a sample:
> Select PHARMACY PATIENT NAME: 42  42
> ANOTHER ONE: 46
>
> NUMBER: 42                              NAME: 42
>   RX UPDATE: Backfill complete          FIRST SERVICE DATE: JUN 11, 1989
>   ACTUAL/HISTORICAL FLAG: HISTORICAL     CONVERSION COMPLETED?: IV
> VERIFIED
> ARCHIVE DATE: JUN 11, 1989
> RX LIST: 503353*497700*481902*519542
> ARCHIVE DATE: JUN 14, 1989
> RX LIST: 524282
> ARCHIVE DATE: JUN 16, 1989
> RX LIST: 519542A*538465*524282A*549966
> ARCHIVE DATE: JUN 20, 1989
> RX LIST: 519542B*538465A*524282B*555554*578924*578925
> ARCHIVE DATE: JUN 22, 1989
> RX LIST: 579548*579549*580925*580926*583775*599076*611071*614490*615408
> ARCHIVE DATE: FEB 22, 1992
> RX LIST: 579548A*579549A*616832*617892*618553*619849
> ARCHIVE DATE: MAR 05, 1992
> RX LIST: 611070*599076A*611071A*611071B
> ARCHIVE DATE: MAR 10, 1992
> RX LIST: 620539*622145*579548B*579549B*599076B*622145A*611071C
> ARCHIVE DATE: MAR 18, 1992
> RX LIST: 662522*662523*662524*662525*674296*692434*692435*699915
> ARCHIVE DATE: MAR 21, 1992
> RX LIST: 718011*719069*719068
> ARCHIVE DATE: AUG 09, 1994
> RX LIST: 753630*753631*753632*776885
> PRESCRIPTION PROFILE: 100009904
>   STATUS (c): UNKNOWN                   ACTIVE (c): 0
> PRESCRIPTION PROFILE: 100009905
>   STATUS (c): UNKNOWN                   ACTIVE (c): 0
> PRESCRIPTION PROFILE: 100009906
>   STATUS (c): UNKNOWN                   ACTIVE (c): 0
> PRESCRIPTION PROFILE: 100035018
>   STATUS (c): UNKNOWN                   ACTIVE (c): 0
> PRESCRIPTION PROFILE: 100035019
>   STATUS (c): UNKNOWN                   ACTIVE (c): 0
> PRESCRIPTION PROFILE: 100035020
>   STATUS (c): UNKNOWN                   ACTIVE (c): 0
> PRESCRIPTION PROFILE: 100035021
>   STATUS (c): UNKNOWN                   ACTIVE (c): 0
> PRESCRIPTION PROFILE: 100063119
>
> Enter RETURN to continue or '^' to exit:
>
> WOW!!!
>
> Matthew M. King, MD
> Medical Director
> Clinica Adelante, Inc
> Surprise, Arizona 85374
> [EMAIL PROTECTED]
>
>
> -----Original Message-----
> From: Kevin Toppenberg [mailto:[EMAIL PROTECTED]
> Sent: Friday, June 23, 2006 2:35 PM
> To: hardhats-members@lists.sourceforge.net
> Subject: Re: [Hardhats-members] Pharmacy Patient file (55)
>
> It looks to me like you have dangling pointers that point to patients
> that are no longer there.  You could see if can simply delete all
> entries in the file by doing something like this:
>
>
> INPUT TO WHAT FILE: PHARMACY PATIENT//
> EDIT WHICH FIELD: ALL// .01///@
>     WARNING: THIS MEANS AUTOMATIC DELETION!!    NAME
> THEN EDIT FIELD:
>
>
> Select PHARMACY PATIENT NAME: ^LOOP
> EDIT ENTRIES BY: NUMBER//
> START WITH NUMBER: FIRST//
>
>
>
>           *** NO RECORDS TO PRINT ***
>
>     LOOP ENDED!
>
>
> Select PHARMACY PATIENT NAME:
>
>
> In my examples, I have no entries in the file, so none are shown.
>
> This may kill the entries for the two sample patients you have, which
> might make dangling pointers elsewhere.  I'm not sure, but it should
> be safe (I think)
>
> Kevin
>
>
>
>
> 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

Reply via email to