It also might be a good idea to DO ^DINIT again after you DO ^ZTMGRSET.
-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of K.S.
Bhaskar
Sent: Thursday, September 16, 2004 3:53 PM
To: [EMAIL PROTECTED]
Subject: RE: [Hardhats-members] Getting started wtih VistA-GTM-ready
Fil --
Thanx for such a fast response. I didn't realize that it was necessary
to do that with the VistA-GTM-ready download. Anyway, I used ^%RI to
load the routines. When I execute ^ZTMGRSET, I get:
GTM>d ^ZTMGRSET
ZTMGRSET Version 8.0 **34,36,69,94,121,127,136,191,275**
HELLO! I exist to assist you in correctly initializing the
current account.%GTM-E-INVFCN, Invalid function name
At M source location UCI+1^%ZOSV
UCI+1^%ZOSV is the line S Y=$ZU(5)_","_^%ZOSF("VOL") Q. Since $ZU is
not a valid GT.M function, I can see where the error is coming from. It
looks like some non-GT.M code is not protected.
-- Bhaskar
On Thu, 2004-09-16 at 18:31, Beza, Fil wrote:
> Did you retrieve and load the xu-8-275.rtn file and the companion
> readme.
>
> The readme file says:
>
> xu-8-275.rtn is a copy of the routines from patch XU*8*275 in %RS
> format.
> This will allow a GT.M site to use %RI to load the routines.
> After loading the routines run ^ZTMGRSET.
> Once done, a GT.M site can load a KIDS distribution file (as all
> patches are posted on this ftp site) and not have to rely on a mailman
> connection.
>
>
> -----Original Message-----
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED] On Behalf Of
K.S.
> Bhaskar
> Sent: Thursday, September 16, 2004 3:24 PM
> To: [EMAIL PROTECTED]
> Subject: [Hardhats-members] Getting started wtih VistA-GTM-ready
>
> I downloaded VistA-GTM-ready from ftp://ftp.va.gov/vista/software, and
> extracted the routines and globals. I placed the former in a
> directory, and loaded the latter into a database. Ignoring
> compilation errors from lines of code that are not legitimate GT.M
> source (since VistA protects these with if statements), I got:
>
> GTM>d P^DI
>
> VA FileMan 22.0
>
> %GTM-E-INVCMD, Invalid command keyword encountered
> LGRX^%ZOSV
> ^-----
> %GTM-E-ERRWZTRAP, Error while processing $ZTRAP
>
> Then I tried d ^ZTMGRSET, and encountered:
>
> GTM>d ^ZTMGRSET
>
> ZTMGRSET Version 8.0 **34,36,69,94,121,127,136,191,275**
> HELLO! I exist to assist you in correctly initializing the
> current account.
> %GTM-E-INVCMD, Invalid command keyword encountered
> LGRX^%ZOSV
> ^-----
> %GTM-E-ERRWZTRAP, Error while processing $ZTRAP
>
> I confess that I am a certified complete VistA newbie. What am I
> missing? LGRX^%ZOSV is just the command Q "". Thank you very much in
> advance for any assistance.
>
> -- Bhaskar
>
>
> **********************************************************************
> **
> ***
> This electronic mail transmission contains confidential and/or
> privileged information intended only for the person(s) named.
> Any use, distribution, copying or disclosure by another person is
> strictly prohibited.
> **********************************************************************
> **
> ***
>
> NOTE: Ce courriel est destine exclusivement au(x) destinataire(s)
> mentionne(s) ci-dessus et peut contenir de l'information privilegiee,
> confidentielle et/ou dispensee de divulgation aux termes des lois
> applicables. Si vous avez recu ce message par erreur, ou s'il ne vous
> est pas destine, veuillez le mentionner immediatement a l'expediteur
> et effacer ce courriel.
>
>
>
>
>
> -------------------------------------------------------
> This SF.Net email is sponsored by: YOU BE THE JUDGE. Be one of 170
> Project Admins to receive an Apple iPod Mini FREE for your judgement
> on who ports your project to Linux PPC the best. Sponsored by IBM.
> Deadline: Sept. 24. Go here: http://sf.net/ppc_contest.php
> _______________________________________________
> Hardhats-members mailing list
> [EMAIL PROTECTED]
> https://lists.sourceforge.net/lists/listinfo/hardhats-members
>
>
> -------------------------------------------------------
> This SF.Net email is sponsored by: YOU BE THE JUDGE. Be one of 170
> Project Admins to receive an Apple iPod Mini FREE for your judgement
> on who ports your project to Linux PPC the best. Sponsored by IBM.
> Deadline: Sept. 24. Go here: http://sf.net/ppc_contest.php
> _______________________________________________
> Hardhats-members mailing list
> [EMAIL PROTECTED]
> https://lists.sourceforge.net/lists/listinfo/hardhats-members
-------------------------------------------------------
This SF.Net email is sponsored by: YOU BE THE JUDGE. Be one of 170
Project Admins to receive an Apple iPod Mini FREE for your judgement on
who ports your project to Linux PPC the best. Sponsored by IBM.
Deadline: Sept. 24. Go here: http://sf.net/ppc_contest.php
_______________________________________________
Hardhats-members mailing list
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/hardhats-members
-------------------------------------------------------
This SF.Net email is sponsored by: YOU BE THE JUDGE. Be one of 170
Project Admins to receive an Apple iPod Mini FREE for your judgement on
who ports your project to Linux PPC the best. Sponsored by IBM.
Deadline: Sept. 24. Go here: http://sf.net/ppc_contest.php
_______________________________________________
Hardhats-members mailing list
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/hardhats-members
