Account Options

  1. Sign in
The old Google Groups will be going away soon, but your browser is incompatible with the new version.
Google Groups Home
« Groups Home
Hardhats
+ new post
Home
About this group
Join this group
Error on Fileman lookup.
Options
There are currently too many topics in this group that display first. To make this topic appear first, remove this option from another topic.
There was an error processing your request. Please try again.
flag
   7 messages - Collapse all  -  Translate all to Translated (View all originals)
The group you are posting to is a Usenet group. Messages posted to this group will make your email address visible to anyone on the Internet.
Your reply message has not been sent.
Your post was successful
 
From:
To:
Cc:
Followup To:
Add Cc | Add Followup-to | Edit Subject
Subject:
Validation:
For verification purposes please type the characters you see in the picture below or the numbers you hear by clicking the accessibility icon. Listen and type the numbers you hear
 
Kevin Toppenberg  
View profile  
 More options Aug 27 2012, 10:35 pm
From: Kevin Toppenberg <kdt...@gmail.com>
Date: Mon, 27 Aug 2012 19:35:05 -0700 (PDT)
Local: Mon, Aug 27 2012 10:35 pm
Subject: Error on Fileman lookup.
Print | Individual message | Show original | Report this message | Find messages by this author

I am having a crash when I try to select the box-vol pair to edit for with
my TASKMAN SITE PARAMETERS file (14.7)

this is what it looks like from the command line:

ASTRON>do P^DI

MSC FileMan 22.1036

Identity = `168  TOPPENBERG,KEVIN S     kst          MD

Select OPTION: 1  ENTER OR EDIT FILE ENTRIES

INPUT TO WHAT FILE: TASKMAN SITE PARAMETERS//
EDIT WHICH FIELD: ALL//

Select TASKMAN SITE PARAMETERS BOX-VOLUME PAIR: ?
    Answer with TASKMAN SITE PARAMETERS BOX-VOLUME PAIR:
   EHR:poweredge
   %GTM-E-UNDEF, Undefined local variable: DO
                At M source location 10+1^DICQ1

ASTRON>w $ZPOS,!,$ZSTATUS
10+1^DICQ1
150373850,10+1^DICQ1,%GTM-E-UNDEF, Undefined local variable: DO
ASTRON>

Here is ^XTER output.  I got this by logging in with ^ZU and then going
through menu options to edit the site parameters, and generating the crash
there.  By the way, this crash caused GT.M to drop out to the linux prompt.
But not before information for ^XTER got saved.

$DEVICE=
$ECODE=,M6,Z150373850,M6,Z150373850,M6,Z150373850,M6,Z150373850,M6,Z1503738 50,M6
,Z150373850,M6,Z150373850,M6,Z150373850,M6,Z150373850,M6,Z150373850,M6,Z150 37385
0,M6,Z150373850,M6,Z150373850,M6,Z150373850,M6,Z150373850,M6,Z150373850,M6, Z1503
73850
,M6,Z150373850,M6
$ESTACK=10
$ETRAP=D UNWIND^ZU
$QUIT=0
$STACK=11
$STACK(000)=-dir
$STACK(000,"ECODE")=
$STACK(000,"PLACE")=+1^GTM$DMOD
$STACK(000,"MCODE")=
$STACK(001)=DO
$STACK(001,"ECODE")=
$STACK(001,"PLACE")=F^DII
$STACK(001,"MCODE")=F S DIC=DIK,DIC(0)="AEQZ" D ^DIC K DIC,DIK G Q:Y<0 S
X=$P(Y(
0),U,2,99) K Y D @X W !!! D Q G NOKL
$STACK(002)=DO
$STACK(002,"ECODE")=
$STACK(002,"PLACE")=DIC^DIA2
$STACK(002,"MCODE")=DIC W !! G Q^DIB:$D(DTOUT) D L S
DIA(1)=+Y,DIA(9)=$P(Y,U,3)
I Y>0 D DIE,^DIA3:'$D(DA) G DIC
$STACK(003)=DO
$STACK(003,"ECODE")=
$STACK(003,"PLACE")=L^DIA2
$STACK(003,"MCODE")=L K Y,I,J,F,DIC S (DIC,DIE)=DIA,DIC(0)="QEALM" D  K DIE
S DI
E=DIA Q
$STACK(004)=DO
$STACK(004,"ECODE")=
$STACK(004,"PLACE")=L+1^DIA2
$STACK(004,"MCODE")= .N DIA,DR D ^DIC ;could go to a custom lookup that
deranges
 these variables
$STACK(005)=DO
$STACK(005,"ECODE")=
$STACK(005,"PLACE")=RTN+3^DIC
$STACK(005,"MCODE")=
$STACK(006)=DO
$STACK(006,"ECODE")=
$STACK(006,"PLACE")=RTN+4^DIC
$STACK(006,"MCODE")=
$STACK(007)=DO
$STACK(007,"ECODE")=
$STACK(007,"PLACE")=DSPHLP+4^DICQ
$STACK(007,"MCODE")= I DIC(0)]"" D DQ Q:$G(DINOKILL)
$STACK(008)=DO
$STACK(008,"ECODE")=
$STACK(008,"PLACE")=DQ1+16^DICQ
$STACK(008,"MCODE")= D EN^DICQ1
$STACK(009)=DO
$STACK(009,"ECODE")=
$STACK(009,"PLACE")=L+6^DICQ1
$STACK(009,"MCODE")= D 0 Q
$STACK(010)=DO
$STACK(010,"ECODE")=,M6,Z150373850,
$STACK(010,"PLACE")=10+1^DICQ1
$STACK(010,"MCODE")= I DZ?1."?" S DST=" " D DS^DIEQ S
DST=$$EZBLD^DIALOG(8069,$P
(DO,U)) D DS^DIEQ D:DZ="?" HP
$STACK(011)=
$STACK(011,"ECODE")=
$STACK(011,"PLACE")=
$STACK(011,"MCODE")=
$X $Y=3 3
$ZV=GT.M V5.3-004A Linux x86
%=
%ZT("^XUTL(""XQ"",$J)")=
%ZTER11I=EHR,EHR
%ZTER11N=7
%ZTER11S=
%ZTER11Z=0
%ZTER12A=0
%ZTER12B=\\013
%ZTERCNT=65
%ZTERH1=62696
%ZTERROR=
%ZTERRT=^%ZTER(1,62696,1,7)
%ZTERSUB=%ZTER11S)
%ZTERVAP=%ZT(
%ZTERVAR=%ZTERVAR
%ZTERZE=10+1^DICQ1, Undefined local variable: DO,150373850,-%GTM-E-UNDEF
D=B
DD=102
DDD=3
DDH=1
DDH(1,"T")=
DIACCESS=1
DIALLVAL=1
DIBEGIX=B
DIBEGSUB=1
DIC=^%ZIS(14.7,
DIC(0)=AEMQL
DICNT=1
DIDONE=0
DIENS=,
DIFIELDS=@;IX
DIFILE=14.7
DIFILE(14.7)=^%ZIS(14.7)
DIFILE(14.7,"O")=^%ZIS(14.7,
DIFILEI=14.7
DIFILEI(14.7)=^%ZIS(14.7)
DIFILEI(14.7,"O")=^%ZIS(14.7,
DIFLAGS=MPh
DIFROM=
DIFROM(1)=
DIFROM(2)=
DIFROM("IEN")=
DIIENS=,
DILN=21
DILOCKTM=3
DINDEX=B
DINDEX(1)=
DINDEX(1,"FIELD")=.01
DINDEX(1,"FILE")=14.7
DINDEX(1,"GET")=DIVAL=$P(DI0NODE,U,1)
DINDEX(1,"LENGTH")=30
DINDEX(1,"MORE?")=0
DINDEX(1,"PROMPT")=BOX-VOLUME PAIR
DINDEX(1,"ROOT")=^%ZIS(14.7,DINDEX)
DINDEX(1,"TYPE")=F
DINDEX(1,"USE")=0
DINDEX(1,"WAY")=1
DINDEX(2)=0
DINDEX(2,"ROOT")=^%ZIS(14.7,DINDEX,DINDEX(1))
DINDEX(2,"WAY")=1
DINDEX("#")=1
DINDEX("AT")=1
DINDEX("FLIST")=^.01^
DINDEX("FLISTD")=^.01^
DINDEX("IXTYPE")=R
DINDEX("START")=B
DINDEX("WAY")=1
DIPART(1)=
DIPGM=
DIRECUR=0
DISCR("F")=
DISCR("S")=
DISYS=19
DIUPRITE=0
DIVAL(0)=1
DIVAL(1)=IX
DIX=B
DIX(1)=
DIX(1,"FIELD")=.01
DIX(1,"FILE")=14.7
DIX(1,"GET")=DIVAL=$P(DI0NODE,U,1)
DIX(1,"LENGTH")=30
DIX(1,"MORE?")=0
DIX(1,"PROMPT")=BOX-VOLUME PAIR
DIX(1,"ROOT")=^%ZIS(14.7,DINDEX)
DIX(1,"TYPE")=F
DIX(1,"USE")=0
DIX(1,"WAY")=1
DIX(2)=0
DIX(2,"ROOT")=^%ZIS(14.7,DINDEX,DINDEX(1))
DIX(2,"WAY")=1
DIX("#")=1
DIX("AT")=1
DIX("FLIST")=^.01^
DIX("FLISTD")=^.01^
DIX("IXTYPE")=R
DIX("START")=B
DIX("WAY")=1
DIY=99
DIZ=21
DT=3120827
DTIME=9600
DUZ=168
DUZ(0)=@
DUZ(1)=
DUZ(2)=69
DUZ("AG")=O
DUZ("AUTO")=1
DUZ("BUF")=1
DUZ("LANG")=1
DZ=?
IO=/dev/pts/4
IO(0)=/dev/pts/4
IO(1,"/dev/pts/4")=
IO("ERROR")=
IO("HOME")=50^/dev/pts/4
IO("IP")=192.168.3.161
IO("ZIO")=/dev/pts/4
IOBS=$C(8)
IOF=#,$C(27,91,50,74,27,91,72)
IOM=80
ION=TELNET
IOS=50
IOSL=24
IOST=C-VT100
IOST(0)=9
IOT=VTRM
IOXY=W $C(27,91)_((DY+1))_$C(59)_((DX+1))_$C(72)
U=^
X=
XMDUZ=168
XQCH=SITE
XQDIC=218
XQJMP=0
XQPSM=P10974
XQSV=218^10974^XUTM PARAMETER EDIT^Edit Taskman Parameters^^M^^^^^^^^^^
XQT=E
XQUSER=KEVIN S TOPPENBERG
XQV=
XQVOL=EHR
XQW=29
XQXFLG=1^0
XQXFLG("GUI")=^
XQY=225
XQY0=XUTM BVPAIR^Site Parameters Edit^^E^^^^^^^^
XQZ=DIC,DIC(0),DIC("A"),DIC("B"),DIC("S"),DIC("W"),D
Y=0
^XUTL("XQ",$J,0)=3120827.222528
^XUTL("XQ",$J,1)=10974P10974^TMG ADAM^Adam^^M^168^^^^^^^212^y
^XUTL("XQ",$J,2)=9P10974^EVE^Systems Manager Menu^^M^^^^^^^^^n^1^^^
^XUTL("XQ",$J,3)=200P10974^XUTM MGR^Taskman Management^^M^^^^^^^^^^1^^
^XUTL("XQ",$J,4)=207P10974^XUTM UTIL^Taskman Management
Utilities^^M^^^^^^^^^^
^XUTL("XQ",$J,5)=218P10974^XUTM PARAMETER EDIT^Edit Taskman
Parameters^^M^^^^^^^
^^^
^XUTL("XQ",$J,6)=225P10974^XUTM BVPAIR^Site Parameters Edit^^E^^^^^^^^
^XUTL("XQ",$J,"DUZ")=168
^XUTL("XQ",$J,"DUZ(0)")=@
^XUTL("XQ",$J,"DUZ(1)")=
^XUTL("XQ",$J,"DUZ(2)")=69
^XUTL("XQ",$J,"DUZ(AG)")=O
^XUTL("XQ",$J,"DUZ(AUTO)")=1
^XUTL("XQ",$J,"DUZ(BUF)")=1
^XUTL("XQ",$J,"DUZ(LANG)")=1
^XUTL("XQ",$J,"IO")=/dev/pts/4
^XUTL("XQ",$J,"IO(""IP"")")=192.168.3.161
^XUTL("XQ",$J,"IOBS")=$C(8)
^XUTL("XQ",$J,"IOF")=#,$C(27,91,50,74,27,91,72)
^XUTL("XQ",$J,"IOM")=80
^XUTL("XQ",$J,"ION")=TELNET
^XUTL("XQ",$J,"IOPAR")=
^XUTL("XQ",$J,"IOS")=50
^XUTL("XQ",$J,"IOSL")=24
^XUTL("XQ",$J,"IOST")=C-VT100
^XUTL("XQ",$J,"IOST(0)")=9
^XUTL("XQ",$J,"IOT")=VTRM
^XUTL("XQ",$J,"IOUPAR")=
^XUTL("XQ",$J,"IOXY")=W $C(27,91)_((DY+1))_$C(59)_((DX+1))_$C(72)
^XUTL("XQ",$J,"MIXED OS")=1
^XUTL("XQ",$J,"T")=6
^XUTL("XQ",$J,"XQM")=10974
^XUTL("XQ",$J,"XQVOL")=EHR
^XUTL("XQ",$J,"XQW")=

$ZE= 10+1^DICQ1, Undefined local variable: DO,150373850,-%GTM-E-UNDEF

 I DZ?1."?" S DST=" " D DS^DIEQ S DST=$$EZBLD^DIALOG(8069,$P(DO,U)) D
DS^DIEQ D:
DZ="?" HP

Last Global Ref: ^TMP("DIERR",22579)

Any help is always appreciated.

Kevin


 
You must Sign in before you can post messages.
To post a message you must first join this group.
Please update your nickname on the subscription settings page before posting.
You do not have the permission required to post.
Nancy Anthracite  
View profile  
 More options Aug 27 2012, 10:43 pm
From: Nancy Anthracite <nanthrac...@earthlink.net>
Date: Mon, 27 Aug 2012 22:43:34 -0400
Local: Mon, Aug 27 2012 10:43 pm
Subject: Re: [Hardhats] Error on Fileman lookup.
Print | Individual message | Show original | Report this message | Find messages by this author
Try S DUZ=168 D ^XUP and then dropping back and running it.  I suspect you
will have the same problem, but just to check the usual things I fowl up to
get that out of the way ....
--
Nancy Anthracite


 
You must Sign in before you can post messages.
To post a message you must first join this group.
Please update your nickname on the subscription settings page before posting.
You do not have the permission required to post.
Sam Habiel  
View profile  
 More options Aug 27 2012, 11:50 pm
From: Sam Habiel <sam.hab...@gmail.com>
Date: Mon, 27 Aug 2012 20:50:05 -0700
Local: Mon, Aug 27 2012 11:50 pm
Subject: Re: [Hardhats] Error on Fileman lookup.
Print | Individual message | Show original | Report this message | Find messages by this author

Run ^DINIT. Make sure that you pick either MSC Fileman or regular Fileman,
not a combination (i.e. put the whole set in the r directory). I think
that's the issue: you are running some old routines with new data
structures or the converse.

Sam

On Mon, Aug 27, 2012 at 7:43 PM, Nancy Anthracite <nanthrac...@earthlink.net


 
You must Sign in before you can post messages.
To post a message you must first join this group.
Please update your nickname on the subscription settings page before posting.
You do not have the permission required to post.
Kevin Toppenberg  
View profile  
 More options Aug 28 2012, 6:59 am
From: Kevin Toppenberg <kdt...@gmail.com>
Date: Tue, 28 Aug 2012 03:59:46 -0700 (PDT)
Local: Tues, Aug 28 2012 6:59 am
Subject: Re: [Hardhats] Error on Fileman lookup.
Print | Individual message | Show original | Report this message | Find messages by this author

Nancy,

No change.

Kevin

ASTRON>set DUZ=168

ASTRON>do ^XUP

Setting up programmer environment
This is a PRODUCTION account.

Terminal Type set to: C-VT100

Select OPTION NAME:
ASTRON>do P^DI

MSC FileMan 22.1036

Select OPTION: 1  ENTER OR EDIT FILE ENTRIES

INPUT TO WHAT FILE: TASKMAN SITE PARAMETERS//
EDIT WHICH FIELD: ALL//

Select TASKMAN SITE PARAMETERS BOX-VOLUME PAIR: ?
    Answer with TASKMAN SITE PARAMETERS BOX-VOLUME PAIR:
   EHR:poweredge

ASTRON>w $ZSTATUS
150373850,10+1^DICQ1,%GTM-E-UNDEF, Undefined local variable: DO
ASTRON>


 
You must Sign in before you can post messages.
To post a message you must first join this group.
Please update your nickname on the subscription settings page before posting.
You do not have the permission required to post.
Kevin Toppenberg  
View profile  
 More options Aug 28 2012, 7:01 am
From: Kevin Toppenberg <kdt...@gmail.com>
Date: Tue, 28 Aug 2012 04:01:51 -0700 (PDT)
Local: Tues, Aug 28 2012 7:01 am
Subject: Re: [Hardhats] Error on Fileman lookup.
Print | Individual message | Show original | Report this message | Find messages by this author

Sam,

I just ran ^DINIT.  It didn't ask me if I wanted MSC or regular Fileman.
 But it did run through the initialization process.

But the error is acting the same.  Crashes out on lookup.

Thanks

Kevin


 
You must Sign in before you can post messages.
To post a message you must first join this group.
Please update your nickname on the subscription settings page before posting.
You do not have the permission required to post.
Sam Habiel  
View profile  
 More options Aug 28 2012, 11:39 am
From: Sam Habiel <sam.hab...@gmail.com>
Date: Tue, 28 Aug 2012 08:39:10 -0700
Local: Tues, Aug 28 2012 11:39 am
Subject: Re: [Hardhats] Error on Fileman lookup.
Print | Individual message | Show original | Report this message | Find messages by this author

Kevin, put MSC Fileman in the r directory so that you are not running a mix
while patching.

Sam


 
You must Sign in before you can post messages.
To post a message you must first join this group.
Please update your nickname on the subscription settings page before posting.
You do not have the permission required to post.
Kevin Toppenberg  
View profile  
 More options Aug 29 2012, 8:49 pm
From: Kevin Toppenberg <kdt...@gmail.com>
Date: Wed, 29 Aug 2012 17:49:32 -0700 (PDT)
Local: Wed, Aug 29 2012 8:49 pm
Subject: Re: [Hardhats] Error on Fileman lookup.
Print | Individual message | Show original | Report this message | Find messages by this author

Just a followup:  I did download MSC fileman from here:
http://www.hardhats.org/fileman/MSC.html

I saved all my DI* routines to a safe place.
I extracted the routines from the .zip and put them in my /r routine folder
From the mumps command line I then ran ^DINIT and walked through the
process.

The error has corrected.  Sam was right.  Thanks!

Kevin


 
You must Sign in before you can post messages.
To post a message you must first join this group.
Please update your nickname on the subscription settings page before posting.
You do not have the permission required to post.
End of messages
« Back to Discussions « Newer topic     Older topic »

Create a group - Google Groups - Google Home - Terms of Service - Privacy Policy
©2013 Google