Yes that's correct. I think now I'll have to get down to the routine.
Usha
----- Original Message -----
From: "Kevin Toppenberg" <[EMAIL PROTECTED]>
To: <hardhats-members@lists.sourceforge.net>
Sent: Thursday, June 02, 2005 6:42 PM
Subject: Re: [Hardhats-members] Uninstall a patch
I think that I did not want registration questions
asked, so I cut that out. I just wanted basic
demographics (name, DOB, SSNum etc)
You could look at the original registration code (let
me know if you need help finding this), and compare it
to what I did. You could then see the part you want
added back in. It sounds like all you want removed is
the part where it calls the MPI.
Kevin
--- Usha <[EMAIL PROTECTED]> wrote:
> The "All done" message is dispalyed and new patients
> can also be added by
> the routine. The only problem is that it does not
> ask for registration
> details.
>
> Thanks
> Usha
> ----- Original Message -----
> From: "Kevin Toppenberg" <[EMAIL PROTECTED]>
> To: <hardhats-members@lists.sourceforge.net>
> Sent: Thursday, June 02, 2005 4:26 PM
> Subject: Re: [Hardhats-members] Uninstall a patch
>
>
> Well, you are calling the code from a GTM prompt, so
> when it is done, it will go back to the GTM prompt.
> YOu could alter the code to add a final line: write
> "all done. goodbye.",! to see if the final line is
> reached.
>
> Is your patient being added to the database the way
> you want?
>
> Kevin
>
>
> --- Usha <[EMAIL PROTECTED]> wrote:
>
> > The screen shots of the ZSHOW "*" and $ZSTATUS are
> > given below
> >
> > GTM>d EDITPT^TMGMISC(1)
> > .....
> > CONSISTENCY CHECKER TURNED OFF!!
> > Patient is exempt from Copay.
> >
> >
> > GTM>ZSHOW "*"
> > $DEVICE=""
> > $ECODE=""
> > $ESTACK=0
> > $ETRAP=""
> > $HOROLOG="60053,34299"
> > $IO="/dev/pts/1"
> > $JOB=4246
> > $KEY=""
> > $PRINCIPAL="/dev/pts/1"
> > $QUIT=0
> > $REFERENCE="^DPT(30,""VET"")"
> > $STACK=0
> > $STORAGE=2147483647
> > $SYSTEM="47,gtm_sysid"
> > $TEST=0
> > $TLEVEL=0
> > $TRESTART=0
> > $X=0
> > $Y=20
> > $ZA=0
> > $ZB=$C(13)
> > $ZCMDLINE=""
> > $ZCOMPILE=""
> > $ZCSTATUS=0
> > $ZDATEFORM=0
> > $ZDIRECTORY="/home/vista/OpenVistA/"
> > $ZEDITOR=0
> > $ZEOF=0
> > $ZERROR=""
> > $ZGBLDIR="/usr/local/OpenVistA/g/mumps.gld"
> > $ZININTERRUPT=0
> > $ZINTERRUPT="IF $ZJOBEXAM()"
> > $ZIO="/dev/pts/1"
> > $ZJOB=0
> > $ZLEVEL=1
> > $ZMAXTPTIME=0
> > $ZMODE="INTERACTIVE"
> > $ZPOSITION="^GTM$DMOD"
> > $ZPROCESS=""
> > $ZPROMPT="GTM>"
> >
>
$ZROUTINES="/home/vista/OpenVistA/o(/home/vista/OpenVistA/r)
> > /usr/local/OpenVist
> > A/o(/usr/local/OpenVistA/r)
> > /usr/local/gtm"
> > $ZSOURCE=""
> > $ZSTATUS=""
> > $ZSTEP="B"
> > $ZSYSTEM=0
> > $ZTEXIT=""
> > $ZTRAP="G OPNERR^%ZIS4"
> > $ZVERSION="GT.M V4.4-004 Linux x86"
> > $ZYERROR=""
> > %H="60053,34287"
> > CURR=0
> > DA=30
> > DFN=30
> > DGCLPR=""
> > DGFC="^1"
> > DGNEW=""
> > DGNOCITY=1
> > DGNOCOPF=0
> > DGPH=""
> > DGRPSCE1=""
> > DGUNK=1
> > DISYS=19
> > DT=3050602
> > DTIME=300
> > DUZ=0
> > DUZ(0)=""
> > IO="/dev/pts/1"
> > IO(0)="/dev/pts/1"
> > IO(1,"/dev/pts/1")=""
> > IO("ERROR")=""
> > IO("HOME")="38^/dev/pts/1"
> > IOBS="$C(8)"
> > IOF="#,$C(27,91,50,74,27,91,72)"
> > IOHG=""
> > IOM=80
> > ION="GTM-UNIX-TELNET"
> > IOPAR=""
> > IOS=38
> > IOSL=24
> > IOST="C-VT100"
> > IOST(0)=9
> > IOT="VTRM"
> > IOUPAR=""
> > IOXY="W $C(27,91)_((DY+1))_$C(59)_((DX+1))_$C(72)"
> > POP=0
> > SSN="702-05-3005P"
> > U="^"
> > VET=1
> > X=15
> > XX=""
> > Z="'^'"
> > /dev/pts/1 OPEN TERMINAL NOCENE NOPAST NOESCA
> > NOREADS TYPE WIDTH=80 LENG=24
> > LOCK ^DPT(30) LEVEL=3
> > LOCK ^TMP(30,REGISTRATION IN PROGRESS) LEVEL=1
> > ^GTM$DMOD (Direct mode)
> >
> > GTM>W $ZSTATUS
> >
> >
> > GTM>
> >
> > Does this mean that no error occurred? If yes,
> then
> > why did the routine come
> > back to the GT.M prompt?
> >
> > Usha
> >
> > ----- Original Message -----
> > From: <[EMAIL PROTECTED]>
> > To: <hardhats-members@lists.sourceforge.net>
> > Sent: Wednesday, June 01, 2005 8:12 PM
> > Subject: Re: [Hardhats-members] Uninstall a patch
> >
> >
> > > >
> > > > As far as I can understand, the routine does
> not
> > ask for a registration
> > > > time.
> > > > After taking the PATIENT NAME from the user,
> it
> > displays the different
> > > > screens and then the following message is
> > displayed.
> > > >
> > > > CONSISTENCY CHECKER TURNED OFF!!
> > > > Patient is exempt from Copay.
> > > >
> > > > And the it returns to the GT.M prompt.
> > > >
> > > > Usha
> > >
> > > Usha,
> > > Anytime a VistA program returns arbitrarily to
> the
> > GT.M prompt, I am wary.
> > > In contrast to some MUMPS implementations, GT.M
> > does not write the error
> > > variables to the string if code flow generates
> an
> > error and returns to
> > > the prompt.
> > >
> > > When this occurs, I usually use the ZSHOW "*"
> > command and look at the
> > system
> > > variables. The variable $ZSTATUS is usually
> > indicative of an error, if
> > > one has occurred.
> > >
> > > Could you tell us if you got an error when it
> > returned?
> > >
> > > David
> > >
> > >
>
=== message truncated ===
__________________________________
Discover Yahoo!
Use Yahoo! to plan a weekend, have fun online and more. Check it out!
http://discover.yahoo.com/
-------------------------------------------------------
This SF.Net email is sponsored by Yahoo.
Introducing Yahoo! Search Developer Network - Create apps using Yahoo!
Search APIs Find out how you can build Yahoo! directly into your own
Applications - visit http://developer.yahoo.net/?fr=offad-ysdn-ostg-q22005
_______________________________________________
Hardhats-members mailing list
Hardhats-members@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/hardhats-members
-------------------------------------------------------
This SF.Net email is sponsored by Yahoo.
Introducing Yahoo! Search Developer Network - Create apps using Yahoo!
Search APIs Find out how you can build Yahoo! directly into your own
Applications - visit http://developer.yahoo.net/?fr=offad-ysdn-ostg-q22005
_______________________________________________
Hardhats-members mailing list
Hardhats-members@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/hardhats-members
