A quick look at the DI* routines I have (which are old), leads me to suggest that you look at the DD for the file defining ^AUPNPAT.  Look at ^AUPNPAT(0) to find the file number and then look at ^DD(file number,0,"SCR") and I'm guessing you'll find the culprit there as "I '$P(^DPT(Y,0),U,19)".  If that is the problem then someone should review the "SCR" nodes to ensure there are no similar problems lurking...

Of course the other problem is how to restart the process, and unfortunately I don't have any suggestions on that issue.

Marianne Follingstad
301 251 0139

Kevin Toppenberg wrote:

I had two patients that were duplicates--i.e. the same
 person, but with two different married names.

So I deleted one, and told fileman to change all
pointers from the former to the later.

(I had to take off a guard to do this)

It then scans through all the appropriate places and
changes the pointers.

But then it drops out after about 20-30 files.  I
never knew what was happening before, but I have
recently studied a bit on GTM debugging techniques,
and here is what I have come up with:

Screen log:

ROES ELIGIBILITY CONFIRMATION entries whose 'PATIENT'
pointers have been changed
                                               MAR
29,2005  20:12    PAGE 1
--------------------------------------------------------------------------------

          *** NO RECORDS TO PRINT ***
GTM>w $ECODE                  <---- notice drop-out
,M7,Z150372994,
GTM>w $ZSTATUS
150372994,SCR+1^DIO2,%GTM-E-GVUNDEF, Global variable
undefined: ^DPT(75002,0)
GTM>zprint SCR+1^DIO2
        X DIS(0) Q:'$T  G PASS:'$D(DIS(1))

GTM>w DIS(0)
S Y=D0 I $D(^AUPNPAT(Y,0)) X "I '$P(^DPT(Y,0),U,19)" W
$E(^AUPNPAT(Y,0),0)
GTM>w Y
75002
GTM>

It looks like the "^DPT(Y,0)" ought to be
"$G(^DPT(Y,0))"

Kevin

__________________________________________________
Do You Yahoo!?
Tired of spam?  Yahoo! Mail has the best spam protection around
http://mail.yahoo.com

-------------------------------------------------------
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

Reply via email to