Mike, From your description, it is not clear that the problem is within the
application. The first error in order that you report is connection lost.
A dropped connection could cause the 'list index out-of-bounds' error. It
is possible that adding a title caused the amount of data returned on
I likely won't get to this again
before Monday.
Lloyd Milligan wrote:
Mike, From your description, it is not clear that the problem is within
the
application. The first error in order that you report is connection
lost.
A dropped connection could cause the 'list index out-of-bounds
In the meantime, until Cameron is able to resave the routines, use this
simple expedient - 1) Copy GT.M routine ^%RI to ^ZZRI. 2) Modify routine
^ZZRI at noopen+7 as follows and recompile it -
f u %ZD w:$P=%ZD !,Routine: r x s x=$p(x,^) q:'$l(x) i
$l(x),$e(x)?1a!($e(x)=%),$e(x,2,99)?.an d
Marcus, this is one line, not two. The compile error may have been caused
by having one space instead of two between the q[uit] and i[f]. It is
impossible to say without seeing the error.
The program will not work with the IF command on a second line. The entire
rest of the line must be
Glad you got it working, Marcus. I don't know why your messages are coming
as attachments rather than in the message body.
I should have thought of this earlier, but in case anyone else is interested
the modified routine import routine is attached. Note the name ZZRI, not
%ZZRI. Copy to
Glad the edit worked this time, Marcus. I tried to attach the modified
routine for importing the June FOIA routines in the new format, but the
message/attachment was rejected by the Hardhats list server.
Lloyd
- Original Message -
From: Marcus Malcom [EMAIL PROTECTED]
To:
The June 2006 FOIA VistA for GT.M. has a disconnect between EVAL^%ZTLOAD1
and ORDER^%ZOSV that causes ZTSAVE(NMSP*) to fail.
Here is EVAL+2^%ZTLOAD1 -
I ZT1[*,$P(ZT1,*)'[( S X=^%ZTSK(ZTSK,.3,,Y=ZT1 D ORDER^%ZOSV Q
Here is ORDER+2^%ZOSV
I $D(X1(*))#2 D DOLRO Q
The problem appears to be that
topic please?
Lloyd
- Original Message -
From: Greg Woodhouse [EMAIL PROTECTED]
To: Lloyd Milligan [EMAIL PROTECTED];
hardhats-members@lists.sourceforge.net
Sent: Tuesday, July 11, 2006 11:20 AM
Subject: Re: [Hardhats-members] Error affecting some tasked jobs
--- Lloyd Milligan [EMAIL
When an application queues a task it usually saves variables for use by the
task when it runs. Variables may be saved individually, or as arrays with
descendants, etc. One of the supported ways of saving variables is a
wildcard format, in which all variables belonging to a namespace are
Sorry, I probably misled you in saying that ZISFGTM would work properly as
^%ZISF. It worked for me because I used OPEN PARAMETERS in the HFS device
definition, thereby bypassing a problematic part. However, the following
change to ^%ZISF (_ZISF.m) works for asking mode.
Insert a line before
I have not been following this thread. However, I reported several months
ago that ^ZTMGRSET does not copy ^%ZISF for GT.M. You have to copy it
explicitly. This causes KIDS load not to work, etc. There is no ZISFGUX.m.
However, the GTM version appears to work okay. Thus, in the routine
Re: "How canwe findwhich routinethis process is
running?"
This article by Bhaskar https://sourceforge.net/docman/display_doc.php?docid=19563group_id=11026dated
October 2003 suggests a method for implementing "job examine" in GT.M. It
is a non-trivial project.
Lloyd
- Original
Joseph, Regarding this specific excerpt from your post,
. . .
Usha tried unsuccessfully to get an answer to a specific
question on Hardhats on the problem of HL7 connectivity from an
OpenVistA installation we had done on Suse Linux using the
latest Pacific Hui version 3.0 . . .
Here are the
:[EMAIL PROTECTED] On Behalf Of
Michael
Zacharias
Sent: Tuesday, March 07, 2006 2:57 PM
To: hardhats-members@lists.sourceforge.net
Subject: Re: [Hardhats-members] HOME Device again...
All I get is a numeric value...
Michael
--- Lloyd Milligan [EMAIL PROTECTED] wrote:
From the programmer prompt
From the programmer prompt WRITE $I. Then set the $I field value to the
left non-numeric part of the value displayed.
Lloyd
- Original Message -
From: Michael Zacharias [EMAIL PROTECTED]
To: hardhats-members@lists.sourceforge.net
Sent: Tuesday, March 07, 2006 1:25 PM
Subject:
Keven, In your example you would enter TMG(22711, without the quotes, in
other words the global reference without ^.
Lloyd
- Original Message -
From: Kevin Toppenberg [EMAIL PROTECTED]
To: Hardhats Sourceforge hardhats-members@lists.sourceforge.net
Sent: Friday, February 24, 2006
This question has been answered previously. The ADMINISTRATION SCHEDULE
file (51.1) must contain at least one entry with PACKAGE PREFIX LR. For
example,
NAME: ONE TIME PACKAGE PREFIX: LR
TYPE OF SCHEDULE: ONE-TIME
Lloyd
- Original Message -
From: Marc
The RPC BROKER SITE PARAMETERS file has an input transform on the .01
field,S DINUM=1. To change the domain that entry 1 points to you
could temporarily disable this transform, e.g.substitute S X=X or
something. Don't create another entry--use the existing entry 1. I
believe it is harmless
Title: Re: [Hardhats-members] OpenVistA Sample data, installation on Fedora
Those are compile errors, not execute. Observe that the errors
reference source routines. GT.M compiles the entire routine, not just the
part that is reachable in the GT.M context--GT.M is not trying to execute
The most common cause of this problem is that long lines within the KID
file have split into two (or more) lines. This can happen if the file was
saved from a text editor with auto line wrap, for example. Below
about the 5th line, subsequent lines up to the end-of-file indicator must
John Clemens writes, it is trivial to parse the message and store the data
where you want it. To this I would like to add that it is non-trivial to
match commercial HIS business practices to VistA business rules, a necessary
requirement when processing inbound ADT and encounters etc. to VistA.
Yes, that is the right one.
- Original Message -
From: K.S. Bhaskar [EMAIL PROTECTED]
To: hardhats-members@lists.sourceforge.net
Sent: Wednesday, September 07, 2005 10:04 AM
Subject: [Hardhats-members] Correct CPRSChart.exe for Aug 25, 2005 FOIA
Release
Is the correct
I am not an expert but it is an easy experiment -
Select Programmer Options Option: programmer mode%GTM-I-BREAK, Break
instruction
encountered
At M source location PRGMODE+4^%ZOSV
GTM
- Original Message -
From:
Greg Kreis
To: hardhats-members@lists.sourceforge.net
28, 2005 10:33 PM
Subject: Re: [Hardhats-members] There is a new FOIA CACHE.dat release as of
Aug. 25
What does your perl command do that is different from:
S %DIRECTORY=appropriate value
D STRIPCR^ZOSVGUX(%DIRECTORY)
- Original Message -
From: Lloyd Milligan [EMAIL PROTECTED
I did not find this to be necessary. After extracting the routines
^ZTMGRSET runs without renaming anything. Possibly something has changed in
the August distribution to make this work?
Lloyd
- Original Message -
From: Nancy Anthracite [EMAIL PROTECTED]
To:
Summarizing previous Hardhats posts.. Unzip the
VistA-GTM-UNIX-ZTMGRSET-ready.zip file to a scratch directory. Navigate to
that directory and use this (from Bhaskar, August 2004) -
for i in *.zwr ; do mupip load $i ; done
This assumes you've already created the database, etc. To load
Reset the field INHIBIT LOGONS? in the VOLUME SET file to NO.
- Original Message -
From:
Anna Joseph
To: hardhats-members@lists.sourceforge.net
Sent: Thursday, July 14, 2005 7:59
AM
Subject: [Hardhats-members] == Sorry,
all activity on this volume set is being
e of times. Recommended
programming practices for VistA are published here http://www.hardhats.org/tools/sac96.html.
Lloyd
- Original Message -
From:
Lloyd
Milligan
To: hardhats-members@lists.sourceforge.net
Sent: Wednesday, June 22, 2005 12:17
PM
Subject: Re: [Hardha
Title: RE: [Hardhats-members] UPDATE^DIE
The symbol table contents at the point of error (P, XUIEN, etc.) suggest
the immediate cause may relate to the IENS. Try "+1," to create a single
new entry.
I am not accustomed to reading Cache Object Script. It doesn't look
right toNEW variables
Just a week or two ago someone else posted the same question. To
eliminate the lookup ambiguity of the NULL device, either name or rename other
OS NULL devices to something different from NULL, like NT NULL, _or_ remove the
mnemonic NULL from these other OS NULL devices. You want to have
Documentation of Host File devices is found in Chapter 18 of the Kernel
Systems Manual. The GTM-UNIX-HFS entry in your message does not include a
value for ASK HFS I/O OPERATION. This would allow specifying the file mode,
i.e. read or write, etc. at the time of device selection.
What does this discussion have to do with VistA or with the specific
subject of this post VistaWeb Missing Apps?
Lloyd
- Original Message -
From: Kevin Toppenberg [EMAIL PROTECTED]
To: hardhats-members@lists.sourceforge.net
Sent: Monday, June 13, 2005 12:56 PM
Subject: RE:
Mark, The RPCTest program should work with any GT.M version, or for that
matter any M platform that supports VistA. Yesterday you said you were
still seeing the same error recorded in the Kernel error log as before. Is
this still the case? If so, this error cannot be ignored. Are you able
I think it is essential first to understand the event recorded in the Kernel
error trap. Unfortunately the summary you quoted appears to reflect a
generated error and is uninformative. It is possible the full error listing
might reveal additional clues. Try entering ^L at the Which symbol?
May I suggest that you also rename the other-OS null DEVICE entries to
eliminate ambiguity of the lookup name NULL.
Lloyd
- Original Message -
From: Mark Goudie [EMAIL PROTECTED]
To: hardhats-members@lists.sourceforge.net
Sent: Wednesday, June 01, 2005 11:55 AM
Subject: Re:
It appears you have verified that the listener is running and that your
(client) firewall is not blocking callback. Have you checked the VistA
Kernel error log for any relevant entries? From the programmer prompt, DO
^XTER and so forth.
Lloyd
- Original Message -
From: Mark Goudie
Ewaen, The "Clinical Info Resource Network - RG" package (RG_1_0.KID) is
already installed in VistA, as distributed in recent years. It would be a
mistake to install it again, as the installed version includes patches.
That having been said, VistA packages and patches may be downloaded from
No, but I think there is a path length limitation. Try it from a short
path, if you are not already doing so.
Lloyd
- Original Message -
From: Thurman Pedigo [EMAIL PROTECTED]
To: hardhats-members@lists.sourceforge.net
Sent: Wednesday, May 25, 2005 6:58 PM
Subject: RE:
Also, the OPEN PARAMETERS are wrong. The value "WNS" is
Cache-specific. That may not matter. If it still doesn't work after
removing "WNS" Iwould suggest simulating what ^XPDIL does, to
troubleshoot. In other words, from the GT.M command prompt -
S
GT.M attempts to compile the whole routine, even though part of it is not
reachable in the GT.M context. I think Bhaskar explained in an old message
how to compile all the routines once at the beginning, thereby avoiding
these annoying interruptions (but I don't remember the details).
This
Response time logging must be enabled, else this error could not have been
reached. Does VistA for GT.M include the resource usage routine ^%ZOSVKR?
The Kernel System Parameters volume set multiple has a switch to disable
response time logging if this routine is not present.
Lloyd
-
This has something to do with initials being an output transform. If you
use INTERNAL(ENTERED BY), EQUALS, 73 it should work.
Lloyd
- Original Message -
From: Kevin Toppenberg [EMAIL PROTECTED]
To: hardhats-members@lists.sourceforge.net
Sent: Sunday, March 20, 2005 7:59 AM
Subject: Re:
Sent: Sunday, March 20, 2005 8:33 AM
Subject: Re: [Hardhats-members] Another example of Fileman Search being
unreliable
Ok, that does work.
But as far as I am concerned, THIS IS A BUG!
Any reasonable user (and seasoned Fileman users on
this board) can't figure this out.
Kevin
--- Lloyd Milligan
In January 2003 Hardhats had 5 postings per day (average), in January 2004,
11 postings per day, and in the first month of the current year, 16 per day.
This growth in activity is a positive sign, on the one hand. On the other
hand it represents an increased burden to the reader whose
Here are some things to check: First, PARAMETERS DVB HFS
SCRATCH, EC HFS SCRATCH, MD HFS SCRATCH and PSB HFS SCRATCH. (There may be
others.)Next, DEVICES OR WORKSTATION and OR WINDOWS
HFS. Finally routines ^ORWRP, ^ORWRP16 and ^PSBUTL. You
should find the problem somewhere among these
The BDK32 for Delphi 7 creates two RPC Broker components, RPCBroker and
CCOWRPCBroker. Neither will compile in my environment. Although the
CCOWRPCBroker component has a different name and icon than the RPCBroker
component, compiling an application containing either component reaches
CCOW=DISABLE in the start
up parameters.
Stephen K. Miyasato
Pacific Telehealth and Technology Hui
- Original Message -
From: Lloyd Milligan [EMAIL PROTECTED]
To: hardhats-members@lists.sourceforge.net
Sent: Thursday, February 24, 2005 8:48 AM
Subject: [Hardhats-members] XWB*1.1*40 compile
Nancy suggests to Think of the archives of this mailing list as a FAQ...
I agree. But are the complete archives now accessible? As I recall we had
trouble with the topica list archives.
Lloyd
- Original Message -
From: Nancy Anthracite [EMAIL PROTECTED]
To:
The ward must have a GL order.
Lloyd
- Original Message -
From: Nick James [EMAIL PROTECTED]
To: hardhats mailing list hardhats-members@lists.sourceforge.net
Sent: Tuesday, February 08, 2005 7:10 AM
Subject: [Hardhats-members] Cant admit a patient
Hi
I used the Admit a patient option
This is the ADA cross-reference on the PATIENT file. There may be an
option to fix this, but if the original registration was interrupted by an
error you can kill the x-ref entry, i.e. K ^DPT(ADA,1,DFN) where DFN is
the patient internal entry number.
Lloyd
- Original Message -
From:
That is interesting. According to the GT.M Programmer Manual (chapter 9)
the virtual page length of a sequential file can be set using the LENGTH=
parameter. For example, LENGTH=80 would set the page length to 80 lines (to
agree with the IOSL value). You could try adding this to the OPEN
. Is this a
field of M code that gets executed, or are they
parameters like this:
OPEN Filename:(My Open Parameters):TIMEOUT
Would I put LENGTH=80 in the OPEN PARAMETERS field, or
SET LENGTH=80?
Thanks
Kevin
--- Lloyd Milligan [EMAIL PROTECTED] wrote:
That is interesting. According to the GT.M
Programmer Manual
Normally if a device or file isn't open you would expect an error, not an
indefinite hang. From your previous Email, Kevin, the device is defined as
TYPE: TERMINAL. This should be HFS, not TERMINAL. But I doubt this relates
to the problem.
Since TIU prints in the background I would suggest
be
helpful to improve the DEVICE definition a little and then simplify the
background printing experiment.
Lloyd
- Original Message -
From: Lloyd Milligan [EMAIL PROTECTED]
To: hardhats-members@lists.sourceforge.net
Sent: Wednesday, January 12, 2005 4:54 PM
Subject: Re: [Hardhats-members
Under Cache for Linux the print queue name can be specified in the DEVICE
file $I field and nothing special is required to make printing work.
However, under GT.M I think that steps similar to those you outline below
are needed. You can use the PRE-OPEN EXECUTE field to set the
Your logon DEVICE (console or Telnet, etc.) should have ASK DEVICE set to
yes. This is a DEVICE file field, not the same as ASK DEVICE AT LOGIN.
Lloyd
- Original Message -
From: Kevin Toppenberg [EMAIL PROTECTED]
To: Hardhats Sourceforge hardhats-members@lists.sourceforge.net
Sent:
report)
CLOSE $I
Does that seem right?
Thanks
Kevin
--- Lloyd Milligan [EMAIL PROTECTED] wrote:
Under Cache for Linux the print queue name can be
specified in the DEVICE
file $I field and nothing special is required to
make printing work.
However, under GT.M I think that steps similar to
those you
in an
earlier post).
I think I am making progress. I'll post a summary
here when I get it working.
Thanks all!
Kevin
--- Lloyd Milligan [EMAIL PROTECTED] wrote:
Your logon DEVICE (console or Telnet, etc.) should
have ASK DEVICE set to
yes. This is a DEVICE file field, not the same as
ASK DEVICE
I tried a simple experiment using K X as the input transform. This makes
any new input value invalid. Lookup of existing values worked the same as
before, which proves, I think, that the input transform is not involved, as
Steve says.
Lloyd
- Original Message -
From: steven mcphelan
Congratulations Kevin! That's a tremendous achievement.
Lloyd
- Original Message -
From: Kevin Toppenberg [EMAIL PROTECTED]
To: Hardhats Sourceforge hardhats-members@lists.sourceforge.net
Sent: Tuesday, December 21, 2004 4:50 PM
Subject: [Hardhats-members] Up and running
Hey All,
Just
Internet Connection Firewall
blocking communication, and I want to try flushing
(temporarily) my iptables on linux to see if that
helps.
Any input on any of this would be appreciated!
Kevin
--- Lloyd Milligan [EMAIL PROTECTED] wrote:
Kevin, Yes, that looks okay. I should have said
,-piece, not ^-piece
] CPRS connection problems
Lloyd,
Thanks. I saw your name in the code, so I know you
hve knowledge in this area.
Also, I see the command LOG^ZUTIL(...) How do I
read these log files/entries?
I'm hoping you have some input on my other post too.
:-)
Thanks
Kevin
--- Lloyd Milligan [EMAIL PROTECTED
Kevin, The most likely cause of the NetCall error that you observed is that
the call to $$NEWJOB^XWBTCPL failed. When this call fails it is most
likely due to a VOLUME SET name conflict between XWBVOL, which takes its
value from the second ^-piece of the return variable Y after Xecuting
Near the bottom of this long message is the following comment -
D ^XUP from the GT.M prompt results in a VistA application complaint
about a terminal device not being configured in the database. I have no
idea what to do about it.
This evening I burned a DVD from Bhaskar's
If the broker listener is running it will have a lock. Use 'lke show'
to display locks. Also, it should appear in a 'netstat -a' view. I
am not familiar with this version of the listener. It might be interesting
to compare it to the working one in SemiViva 0.4. Perhaps some difference
would
My experience is that 25 processes is more than sufficient for demonstrating
VistA, including CPRS, MailMan and HL7. The only drawback is that TaskMan
cannot be started automatically from Cache startup, as doing that uses the
one available slot and prevents interactive logon. However, TaskMan
Thanks Dan and Fil for pointing out that the operative routine for linux is
^ZOSVGUX, not ^ZOSVGTM -mystery solved. I knew it was GUX, but the GTM name
jumped out and grabbed me!
Lloyd
- Original Message -
From: Daniel Gray [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Monday,
I'm not sure what the question is but it is the so-called box name that
refers to something outside VistA. In the old GT.M / VistA environment that
I am running (Red Hat 7.1 and GT.M V4.3-001A) the box value comes from
'hostname -s' via a GT.M zsystem call. However, kernel patch 275 has
Your screen scrape shows (Process Entry) unavailable. This is puzzling
because the protocol IBCNB LIST PROCESS SCREEN itself has no screen. Once
you get past this point, keys are needed. For example, IBCNB PROCESS ACCEPT
requires the IB INSURANCE SUPERVISOR key.
I would suggest to examine
: Lloyd Milligan [EMAIL PROTECTED]
Reply-To: [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Subject: Re: [Hardhats-members] RE: Patient's Insurance Info
Date: Thu, 18 Nov 2004 12:31:24 -0500
Your screen scrape shows (Process Entry) unavailable. This is puzzling
because the protocol IBCNB LIST PROCESS SCREEN
vista, then how come the open vista
distribution has it?
Thanks
Madhavi
From: Lloyd Milligan [EMAIL PROTECTED]
Reply-To: [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Subject: Re: [Hardhats-members] RE: Patient's Insurance Info
Date: Thu, 18 Nov 2004 14:51:49 -0500
Deja vu. A long time ago I assisted
I think the input file specification should be entered at the Input Device?
prompt, replacing the default terminal. Also, does the
/usr/local/OpenVistA/r/ path exist? It doesn't appear in the gtmroutines
list.
Lloyd
- Original Message -
From: Kevin Toppenberg [EMAIL PROTECTED]
To:
Greg is having trouble posting through a web interface and asked me to post
this reply -
Original Message
Subject: Re: [Hardhats-members] What is DINUM'ed field?
Date: Fri, 08 Oct 2004 14:41:45 -0400
From: Greg Kreis [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
References:
On Sat, 2004-09-11 at 22:14, Lloyd Milligan wrote:
I did the following experiment - 1) Install CPRS (patch 187) and the
demo
dataset to a computer that did not have XP SP2 installed. 2) Confirm
that
CPRS connects and works normally using s=localhost p=9300. 3) Install
SP2.
4) Retest in the SP2
, and double click again, another set of numbers come up (I
didn't write them) and the same thing happens.
Molly
Lloyd Milligan wrote:
The value '3040908.151442' is a FileMan date.time (Wednesday at 3:14:42
PM).
This can hardly be a coincidence. To have retrieved a FileMan date the
client
75 matches
Mail list logo