You shouldn't do that - kill ^%Z globals that is.  Killing ^%ZOSF should
be the only thing you do.  If you kill all %Z globals, you will lose
nodes that are not recreated by ^ZTMGRSET - These data nodes.

Global ^%ZIS(,0
^%ZIS(1,0)=DEVICE^3.5Is^39^39
^%ZIS(2,0)=TERMINAL TYPE^3.2I^197^188
^%ZIS(3.22,0)=DA RETURN CODES^3.22^15^15
^%ZIS(3.23,0)=LINE/PORT ADDRESS^3.23^^
^%ZIS(14.5,0)=VOLUME SET^14.5^1^1
^%ZIS(14.6,0)=UCI ASSOCIATION^14.6IO^^0
^%ZIS(14.7,0)=TASKMAN SITE PARAMETERS^14.7^1^1 

Global ^%ZISL
^%ZISL
 
^%ZISL(3.54,0)=RESOURCE^3.54^7^7
^%ZISL(3.54,1,0)=IBD RESOURCE^1
^%ZISL(3.54,2,0)=TIU/PXAPI RESOURCE^10
^%ZISL(3.54,3,0)=ORW/PXAPI RESOURCE^5
^%ZISL(3.54,4,0)=ORB NOTIFICATION RESOURCE^5
^%ZISL(3.54,5,0)=OR MOVEMENT RESOURCE^5
^%ZISL(3.54,6,0)=SCCV RESOURCE^1
^%ZISL(3.54,7,0)=ORW THREAD RESOURCE^9
^%ZISL(3.54,"B","IBD RESOURCE",1)=
^%ZISL(3.54,"B","OR MOVEMENT RESOURCE",5)=
^%ZISL(3.54,"B","ORB NOTIFICATION RESOURCE",4)=
^%ZISL(3.54,"B","ORW THREAD RESOURCE",7)=
^%ZISL(3.54,"B","ORW/PXAPI RESOURCE",3)=
^%ZISL(3.54,"B","SCCV RESOURCE",6)=
^%ZISL(3.54,"B","TIU/PXAPI RESOURCE",2)=
^%ZISL(4.281,0)=INTER-UCI TRANSFER^4.281^^
^%ZISL(14.8,0)=TASK SYNC FLAG^14.8^^
 
Global ^%ZTER(,0
^%ZTER(1,0)=ERROR LOG^3.075^59405^3
^%ZTER(2,0)=ERROR MESSAGES^3.076


-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
Schlehuber, Cameron
Sent: Thursday, September 16, 2004 8:24 PM
To: [EMAIL PROTECTED]
Subject: RE: [Hardhats-members] Getting started wtih VistA-GTM-ready

I'm learning as I go too.  I just used a utility that writes out all the
globals individually, and it picks up all the %Z* globals.  All of the
%Z* globals should be killed before D ^ZTMGRSET and then D ^DINIT (to
give FileMan a chance to pick the right OS, too.)  Actually, I should
probably simply not include the %Z* globals in the VistA-GTM-ready zip!

-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Beza,
Fil
Sent: Thursday, September 16, 2004 5:03 PM
To: [EMAIL PROTECTED]
Subject: RE: [Hardhats-members] Getting started wtih VistA-GTM-ready


It appears that your current %ZOSV is not the GT.M version but the Cache
one.

I suggest you KILL ^%ZOSF and DO ^ZTMGRSET again.  This will start you
from scratch. 

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


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

Reply via email to