Summary/Detail report not applicable (Radiology)
8 views
Skip to first unread message
bayan....@ehs.com.jo
Nov 25, 2009, 8:36:01 AM11/25/09
to Hardhats
Dear David
thanks a a lot for noticed me ...
If the user need to make Summary/Detail report (option name: RA
PERFORMIN RPTS) the system kick him out.
Thanks
thanks a a lot for noticed me ...
If the user need to make Summary/Detail report (option name: RA
PERFORMIN RPTS) the system kick him out.
Thanks
Sam Habiel
Nov 25, 2009, 3:21:42 PM11/25/09
to hard...@googlegroups.com
Bayan,
What do you mean by the system kicking him out? Do you see this (maybe your screen crashes so quickly that you don't see anything)
'Sorry about that, but an error has occurred: "
ZE=
If so, then check the error in the error trap.
EVE > Programmer Options > Error Processing > Error Trap Display
Dump the error to the screen using ^L and send it to hardhats.
Sam
> --
> http://groups.google.com/group/Hardhats
> To unsubscribe, send email to Hardhats-u...@googlegroups.com
What do you mean by the system kicking him out? Do you see this (maybe your screen crashes so quickly that you don't see anything)
'Sorry about that, but an error has occurred: "
ZE=
If so, then check the error in the error trap.
EVE > Programmer Options > Error Processing > Error Trap Display
Dump the error to the screen using ^L and send it to hardhats.
Sam
> http://groups.google.com/group/Hardhats
> To unsubscribe, send email to Hardhats-u...@googlegroups.com
bayan....@ehs.com.jo
Nov 25, 2009, 4:10:41 PM11/25/09
to Hardhats
Dear Sam,
thanks for quick response ...
when pick that option the connection to server is closed
SO I follow these procedures as you sent to me but I cant find ^L
(kindly notice that I cleared Error trap by 'Clean Error Trap
Option name: XUERTRP CLEAN` but the problem still exsit) !! I hope you
can help me to fix that
Select Systems Manager Menu Option: programmer Options
Select Programmer Options Option: error Processing
Select Error Processing Option: error Trap Display
1 error logged on 11/25/2009
1) <(UNDEF)>HDR+17^RAPM2 22:33:44 EHR,EHR 3668 /dev/
pts/1
No screened error
1 error logged on 11/25/2009
1) <(UNDEF)>HDR+17^RAPM2 22:33:44 EHR,EHR 3668 /dev/
pts/1
No screened error
Which error? > ?l
No 'CURRENT Don't show ERROR SCREENS' error screens have been
established
No 'CURRENT Don't record ERROR SCREENS' error screens have been
established
--all errors are currently logged.
Which error? > ???
1) <(UNDEF)>HDR+17^RAPM2 22:33:44 EHR,EHR 3668 /dev/
pts/1
Thanks
On Nov 25, 10:21 pm, Sam Habiel <sam.hab...@gmail.com> wrote:
> Bayan,
>
> What do you mean by the system kicking him out? Do you see this (maybe your screen crashes so quickly that you don't see anything)
> 'Sorry about that, but an error has occurred: "
> ZE=
>
> If so, then check the error in the error trap.
>
> EVE > Programmer Options > Error Processing > Error Trap Display
>
> Dump the error to the screen using ^L and send it to hardhats.
>
> Sam
>
thanks for quick response ...
when pick that option the connection to server is closed
SO I follow these procedures as you sent to me but I cant find ^L
(kindly notice that I cleared Error trap by 'Clean Error Trap
Option name: XUERTRP CLEAN` but the problem still exsit) !! I hope you
can help me to fix that
Select Systems Manager Menu Option: programmer Options
Select Programmer Options Option: error Processing
Select Error Processing Option: error Trap Display
1 error logged on 11/25/2009
1) <(UNDEF)>HDR+17^RAPM2 22:33:44 EHR,EHR 3668 /dev/
pts/1
No screened error
1 error logged on 11/25/2009
1) <(UNDEF)>HDR+17^RAPM2 22:33:44 EHR,EHR 3668 /dev/
pts/1
No screened error
Which error? > ?l
No 'CURRENT Don't show ERROR SCREENS' error screens have been
established
No 'CURRENT Don't record ERROR SCREENS' error screens have been
established
--all errors are currently logged.
Which error? > ???
1) <(UNDEF)>HDR+17^RAPM2 22:33:44 EHR,EHR 3668 /dev/
pts/1
Thanks
On Nov 25, 10:21 pm, Sam Habiel <sam.hab...@gmail.com> wrote:
> Bayan,
>
> What do you mean by the system kicking him out? Do you see this (maybe your screen crashes so quickly that you don't see anything)
> 'Sorry about that, but an error has occurred: "
> ZE=
>
> If so, then check the error in the error trap.
>
> EVE > Programmer Options > Error Processing > Error Trap Display
>
> Dump the error to the screen using ^L and send it to hardhats.
>
> Sam
>
Nancy Anthracite
Nov 25, 2009, 4:22:01 PM11/25/09
to hard...@googlegroups.com
For which error, put 1 (digit one) and then for which symbol, put ^L
--
Nancy Anthracite
Nancy Anthracite
Sam Habiel
Nov 25, 2009, 4:37:05 PM11/25/09
to hard...@googlegroups.com
Bayan,
My computer tells me that you wrote this message at 11:10pm your time. Isn't time to go to sleep?
You are on the right track. First, type "1" to select the error, then at the prompt that says "which symbol", type "^L". You will get several pages. Capture those and send them to hardhats.
Sam
My computer tells me that you wrote this message at 11:10pm your time. Isn't time to go to sleep?
You are on the right track. First, type "1" to select the error, then at the prompt that says "which symbol", type "^L". You will get several pages. Capture those and send them to hardhats.
Sam
David Whitten
Nov 25, 2009, 5:36:03 PM11/25/09
to hard...@googlegroups.com
Bayan,
the code where you mentioned an error:
MUMPS> WRITE $T(HDR+17^RAPM2)
. S X(3)=RAR(4.014,"1,"_DUZ(2)_",",.01,"E") ; Association
indicates only two variables which could be undefined: DUZ(2) or RAR(...)
If the DUZ(2) is your problem, then you need to define a Division for yourself in the NEW PERSON File #200. If the undefined is the RAR(...) variable, you need to define a value for the ASSOCIATIONS of your facility in the INSTITUTION File #4.
HDR(RATYP) ; Print appropriate header
U:RAIO IO S RAPG=$G(RAPG)+1
I RAPG>1!($E(IOST,1,2)="C-") W:RAIO @IOF
I $E(IOST,1,2)="P-",(RAPG>1) W:RAIO @IOF
S RAHD(0)=$S(RATYP="S":"Summary",RATYP="D":"Detail",1:"")
S RAHD(0)=RAHD(0)_" Verification Timeliness Report"
S RAIOM=$S(RATYP="S":80,1:IOM)
W:RAIO !?(RAIOM-$L(RAHD(0))\2),RAHD(0),?(RAIOM-10),"Page: ",$G(RAPG),!
I RATYP="S" S RAN=1 D
. S ^TMP($J,"RAPM",RAN)=" Summary Verification Time
liness Report Page: "_$G(RAPG) S RAN=RAN+1
. S ^TMP($J,"RAPM",RAN)="",RAN=RAN+1
;
D GETS^DIQ(4,DUZ(2),".01;14*;99","E","RAR","RAMSG")
K X
S X(1)=RAR(4,DUZ(2)_",",.01,"E") ; Name of facility
S X(2)=RAR(4,DUZ(2)_",",99,"E") ; Station Number
I $D(RAR(4.014)) D
. S X(3)=RAR(4.014,"1,"_DUZ(2)_",",.01,"E") ; Association
. S X(4)=RAR(4.014,"1,"_DUZ(2)_",",1,"E") ; Parent of Association
. S X(5)=$S(X(3)="VISN":X(4),1:"") ; should be VISN number
E S X(5)=""
the code where you mentioned an error:
MUMPS> WRITE $T(HDR+17^RAPM2)
. S X(3)=RAR(4.014,"1,"_DUZ(2)_",",.01,"E") ; Association
indicates only two variables which could be undefined: DUZ(2) or RAR(...)
If the DUZ(2) is your problem, then you need to define a Division for yourself in the NEW PERSON File #200. If the undefined is the RAR(...) variable, you need to define a value for the ASSOCIATIONS of your facility in the INSTITUTION File #4.
HDR(RATYP) ; Print appropriate header
U:RAIO IO S RAPG=$G(RAPG)+1
I RAPG>1!($E(IOST,1,2)="C-") W:RAIO @IOF
I $E(IOST,1,2)="P-",(RAPG>1) W:RAIO @IOF
S RAHD(0)=$S(RATYP="S":"Summary",RATYP="D":"Detail",1:"")
S RAHD(0)=RAHD(0)_" Verification Timeliness Report"
S RAIOM=$S(RATYP="S":80,1:IOM)
W:RAIO !?(RAIOM-$L(RAHD(0))\2),RAHD(0),?(RAIOM-10),"Page: ",$G(RAPG),!
I RATYP="S" S RAN=1 D
. S ^TMP($J,"RAPM",RAN)=" Summary Verification Time
liness Report Page: "_$G(RAPG) S RAN=RAN+1
. S ^TMP($J,"RAPM",RAN)="",RAN=RAN+1
;
D GETS^DIQ(4,DUZ(2),".01;14*;99","E","RAR","RAMSG")
K X
S X(1)=RAR(4,DUZ(2)_",",.01,"E") ; Name of facility
S X(2)=RAR(4,DUZ(2)_",",99,"E") ; Station Number
I $D(RAR(4.014)) D
. S X(3)=RAR(4.014,"1,"_DUZ(2)_",",.01,"E") ; Association
. S X(4)=RAR(4.014,"1,"_DUZ(2)_",",1,"E") ; Parent of Association
. S X(5)=$S(X(3)="VISN":X(4),1:"") ; should be VISN number
E S X(5)=""
bayan....@ehs.com.jo
Nov 26, 2009, 6:01:04 AM11/26/09
to Hardhats
Dear David
the Division is already defined in the NEW PERSON File #200.
Select DIVISION: PRINCE HAMZAH HOSPITAL//
but I'm not really understand how to define RAR(...) (SORRY)
the Division is already defined in the NEW PERSON File #200.
Select DIVISION: PRINCE HAMZAH HOSPITAL//
but I'm not really understand how to define RAR(...) (SORRY)
> On Wed, Nov 25, 2009 at 3:37 PM, Sam Habiel <sam.hab...@gmail.com> wrote:
> > Bayan,
>
> > My computer tells me that you wrote this message at 11:10pm your time.
> > Isn't time to go to sleep?
>
> > You are on the right track. First, type "1" to select the error, then at
> > the prompt that says "which symbol", type "^L". You will get several pages.
> > Capture those and send them to hardhats.
>
> > Sam
>
> > Bayan,
>
> > My computer tells me that you wrote this message at 11:10pm your time.
> > Isn't time to go to sleep?
>
> > You are on the right track. First, type "1" to select the error, then at
> > the prompt that says "which symbol", type "^L". You will get several pages.
> > Capture those and send them to hardhats.
>
> > Sam
>
bayan....@ehs.com.jo
Nov 26, 2009, 6:02:34 AM11/26/09
to Hardhats
Dear Sam
Yes it is Sam, but most of the time I work for late in the house and
is actually fun for me ...
Sorry I'm not sure if I meet you In Jordan or not, I'm bad with names
too :(
For which error, I put 1 (digit one) and then for which symbol,I put
^L and the result was:
$DEVICE=
$ECODE=,M6,Z150373850,
$ESTACK=7
$ETRAP=D UNWIND^ZU
$QUIT=0
$STACK=7
$STACK(000)=-run ^ZU
$STACK(000,"ECODE")=
$STACK(000,"PLACE")=R+2^XQ1
$STACK(000,"MCODE")= D @XQZ G OUT
$STACK(001)=DO
$STACK(001,"ECODE")=
$STACK(001,"PLACE")=START+3^RAPM
$STACK(001,"MCODE")= I RARPT="S"!(RARPT="B") S RAPG=0 D ^RAPM1
$STACK(002)=DO
$STACK(002,"ECODE")=
$STACK(002,"PLACE")=RAPM1+3^RAPM1
$STACK(002,"MCODE")= D HDR^RAPM2("S")
$STACK(003)=DO
$STACK(003,"ECODE")=
$STACK(003,"PLACE")=HDR+16^RAPM2
$STACK(003,"MCODE")= I $D(RAR(4.014)) D
$STACK(004)=DO
$STACK(004,"ECODE")=,M6,Z150373850,
$STACK(004,"PLACE")=HDR+17^RAPM2
$STACK(004,"MCODE")= . S X(3)=RAR(4.014,"1,"_DUZ(2)_",",.01,"E") ;
Association
$STACK(005)=DO
$STACK(005,"ECODE")=
$STACK(005,"PLACE")=ERR2+6^ZU
$STACK(005,"MCODE")= D ^%ZTER K %ZT ; Capture symbol table first!
$X $Y=0 2
$ZV=GT.M V5.3-003 Linux x86
%H=61681
%T=0
%XTT=
%ZT("^XUTL(""XQ"",$J)")=
%ZTER11I=EHR,EHR
%ZTER11N=1
%ZTER11S=
%ZTER11Z=0
%ZTER12A=0
%ZTER12B=\\013
%ZTERCNT=43
%ZTERH1=61691
%ZTERROR=
%ZTERRT=^%ZTER(1,61691,1,1)
%ZTERSUB=%ZTER11S)
%ZTERVAP=%ZT(
%ZTERVAR=%ZTERVAR
%ZTERZE=HDR+17^RAPM2, Undefined local variable: RAR(4.014,150373850,-
%GTM-E-UNDE
F
DILOCKTM=3
DISYS=19
DIW=|
DIWT=5,10,15,20,25
DN=1
DT=3091126
DTIME=5400
DUZ=105
DUZ(0)=@
DUZ(1)=
DUZ(2)=68
DUZ("AG")=O
DUZ("AUTO")=0
DUZ("BUF")=1
DUZ("LANG")=
IO=/dev/pts/1
IO(0)=/dev/pts/1
IO(1,"/dev/pts/1")=
IO("ERROR")=
IO("HOME")=50^/dev/pts/1
IO("ZIO")=/dev/pts/1
IOBS=$C(8)
IOF=#,$C(27,91,50,74,27,91,72)
IOHG=
IOM=80
ION=TELNET
IOPAR=
IOS=50
IOSL=24
IOST=C-VT102
IOST(0)=60
IOT=VTRM
IOUPAR=
IOXY=W $C(27,91)_((DY+1))_$C(59)_((DX+1))_$C(102)
J=3
POP=0
RA1=3091116
RAANS=0
RAANS2=0
RABDATE=3091106
RABEGDT=3091105.9999
RACAT=O
RACCESS(105,"DIV",68,1)=68^PRINCE HAMZAH HOSPITAL
RACCESS(105,"DIV",68,2)=68^PRINCE HAMZAH HOSPITAL
RACCESS(105,"DIV",68,3)=68^PRINCE HAMZAH HOSPITAL
RACCESS(105,"DIV",68,4)=68^PRINCE HAMZAH HOSPITAL
RACCESS(105,"DIV",68,5)=68^PRINCE HAMZAH HOSPITAL
RACCESS(105,"DIV",68,6)=68^PRINCE HAMZAH HOSPITAL
RACCESS(105,"DIV",68,7)=68^PRINCE HAMZAH HOSPITAL
RACCESS(105,"DIV",68,8)=68^PRINCE HAMZAH HOSPITAL
RACCESS(105,"DIV",68,11)=68^PRINCE HAMZAH HOSPITAL
RACCESS(105,"DIV-IMG","PRINCE HAMZAH HOSPITAL","CT SCAN")=
RACCESS(105,"DIV-IMG","PRINCE HAMZAH HOSPITAL","GENERAL RADIOLOGY")=
RACCESS(105,"DIV-IMG","PRINCE HAMZAH HOSPITAL","MAGNETIC RESONANCE
IMAGING")=
RACCESS(105,"DIV-IMG","PRINCE HAMZAH HOSPITAL","MAMMOGRAPHY")=
RACCESS(105,"DIV-IMG","PRINCE HAMZAH HOSPITAL","ULTRASOUND")=
RACCESS(105,"IMG",1,1)=^GENERAL RADIOLOGY
RACCESS(105,"IMG",1,6)=^GENERAL RADIOLOGY
RACCESS(105,"IMG",1,11)=^GENERAL RADIOLOGY
RACCESS(105,"IMG",3,5)=^ULTRASOUND
RACCESS(105,"IMG",3,8)=^ULTRASOUND
RACCESS(105,"IMG",4,4)=^MAGNETIC RESONANCE IMAGING
RACCESS(105,"IMG",5,2)=^CT SCAN
RACCESS(105,"IMG",5,7)=^CT SCAN
RACCESS(105,"IMG",9,3)=^MAMMOGRAPHY
RACCESS(105,"LOC",1)=4^PHH RADIOLOGY MAIN
RACCESS(105,"LOC",2)=5^PHH CT MAIN
RACCESS(105,"LOC",3)=6^PHH MAMMO
RACCESS(105,"LOC",4)=7^PHH MRI
RACCESS(105,"LOC",5)=8^PHH ULTRASOUND MAIN
RACCESS(105,"LOC",6)=9^PHH RADIOLOGY ER
RACCESS(105,"LOC",7)=10^PHH CT ER
RACCESS(105,"LOC",8)=11^PHH ULTRASOUND ER
RACCESS(105,"LOC",11)=145^PHH DENTAL
RACHKDIV=PRINCE HAMZAH HOSPITAL
RACN=111109-55
RACN0=55^173^2^O^^^^30^^N^87^^1^151^105^^41^3^^^3091111^30^^Y^^0^613^^^Y
RACNI=B
RADD=91
RADFN=
RADHT=
RADHV=
RADTE=3091117.1252
RADTI=
RAEDATE=3091116
RAENDDT=3091116.9999
RAEXST=2
RAHASR=1
RAHD(0)=Summary Verification Timeliness Report
RAIMGTY=MAMMOGRAPHY
RAIMGTYP=GENERAL RADIOLOGY
RAIO=1
RAIOM=80
RAITYP=1
RAMAXDT=3091116
RAMDIV=68
RAMDV=0^0^0^0^0^1^1^1^1^1^0^1^1^1^0^1^1^0^1^0^1^1^0^0^1^0^1^0^
RAMLC=3^0^PHH_GF_RADCLERK^2^PHH_GF_RADTECH^9^^0^^PHH_GF_RADTECH^^1^2
RAN=3
RANODIV=
RANUM=
RAPATNM=ZZALI,SAMER
RAPG=1
RAPOP=0
RAPRCN=ABDOMEN 2 VIEWS
RAPRIM=105
RAPRIMNM=HASHEM,BAYAN
RAQUIT=0
RAR(4,"68,",.01,"E")=PRINCE HAMZAH HOSPITAL
RAR(4,"68,",99,"E")=100PHH
RAR(4.014,"2,68,",.01,"E")=PARENT FACILITY
RAR(4.014,"2,68,",1,"E")=PRINCE HAMZAH HOSPITAL
RARAD=105
RARPT=S
RARPTDT=3091111.150642
RARPTST=V
RARPTTXT=41
RASELDIV=68
RASINCE=
RATDFHR=.161666666666666666
RATDFSEC=582
RATHRS=1
RATYP=S
RAVDFHR=.166666666666666666
RAVDFSEC=600
RAVERDT=3091111.1507
RAVHRS=1
U=^
X(1)=PRINCE HAMZAH HOSPITAL
X(2)=100PHH
XMDUZ=105
XQCH=SU
XQDIC=10512
XQJMP=0
XQPSM=U105,P5366
XQSV=10512^5366^RA TIMELINESS VER MENU^Verification
Timeliness^^M^^^^^^^^115
XQT=R
XQUSER=BAYAN HASHEM
XQVOL=EHR
XQXFLG=0^0
XQXFLG("GUI")=^
XQY=9680
XQY0=RA PERFORMIN RPTS^Summary/Detail report^^R^^^^^^^^115
XQZ=^RAPM
Y=0
Y(0)=NO
Z=Revision Act of 1976)."
^XUTL("XQ",$J,0)=3091126.120645
^XUTL("XQ",$J,1)=9P9^EVE^Systems Manager Menu^^M^1^^^^^^^^n^1^^^
^XUTL("XQ",$J,2)=5366U105,P5366^RA OVERALL^Rad/Nuc Med Total System
Menu^^M^^^6^
^^^^115^^1^1
^XUTL("XQ",$J,3)=5405U105,P5366^RA MGTRPTS^Management Reports
Menu^^M^^^^^^^^
^XUTL("XQ",$J,4)=10511U105,P5366^RA TIMELINESS MENU^Timeliness
Reports^^M^^^^^^^
^115
^XUTL("XQ",$J,5)=10512U105,P5366^RA TIMELINESS VER MENU^Verification
Timeliness^
^M^^^^^^^^115
^XUTL("XQ",$J,6)=9680U105,P5366^RA PERFORMIN RPTS^Summary/Detail
report^^R^^^^^^
^^115
^XUTL("XQ",$J,"DUZ")=105
^XUTL("XQ",$J,"DUZ(0)")=@
^XUTL("XQ",$J,"DUZ(1)")=
^XUTL("XQ",$J,"DUZ(2)")=68
^XUTL("XQ",$J,"DUZ(AG)")=O
^XUTL("XQ",$J,"DUZ(AUTO)")=0
^XUTL("XQ",$J,"DUZ(BUF)")=1
^XUTL("XQ",$J,"DUZ(LANG)")=
^XUTL("XQ",$J,"IO")=/dev/pts/1
^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-VT102
^XUTL("XQ",$J,"IOST(0)")=60
^XUTL("XQ",$J,"IOT")=VTRM
^XUTL("XQ",$J,"IOUPAR")=
^XUTL("XQ",$J,"IOXY")=W $C(27,91)_((DY+1))_$C(59)_((DX+1))_$C(102)
^XUTL("XQ",$J,"MIXED OS")=1
^XUTL("XQ",$J,"T")=6
^XUTL("XQ",$J,"XQM")=9
^XUTL("XQ",$J,"XQVOL")=EHR
^XUTL("XQ",$J,"XQW")=
$ZE= HDR+17^RAPM2, Undefined local variable: RAR(4.014,150373850,-%GTM-
E-UNDEF
. S X(3)=RAR(4.014,"1,"_DUZ(2)_",",.01,"E") ; Association
Last Global Ref: ^DD(4,99,0)
Thank you all
Yes it is Sam, but most of the time I work for late in the house and
is actually fun for me ...
Sorry I'm not sure if I meet you In Jordan or not, I'm bad with names
too :(
For which error, I put 1 (digit one) and then for which symbol,I put
^L and the result was:
$DEVICE=
$ECODE=,M6,Z150373850,
$ESTACK=7
$ETRAP=D UNWIND^ZU
$QUIT=0
$STACK=7
$STACK(000)=-run ^ZU
$STACK(000,"ECODE")=
$STACK(000,"PLACE")=R+2^XQ1
$STACK(000,"MCODE")= D @XQZ G OUT
$STACK(001)=DO
$STACK(001,"ECODE")=
$STACK(001,"PLACE")=START+3^RAPM
$STACK(001,"MCODE")= I RARPT="S"!(RARPT="B") S RAPG=0 D ^RAPM1
$STACK(002)=DO
$STACK(002,"ECODE")=
$STACK(002,"PLACE")=RAPM1+3^RAPM1
$STACK(002,"MCODE")= D HDR^RAPM2("S")
$STACK(003)=DO
$STACK(003,"ECODE")=
$STACK(003,"PLACE")=HDR+16^RAPM2
$STACK(003,"MCODE")= I $D(RAR(4.014)) D
$STACK(004)=DO
$STACK(004,"ECODE")=,M6,Z150373850,
$STACK(004,"PLACE")=HDR+17^RAPM2
$STACK(004,"MCODE")= . S X(3)=RAR(4.014,"1,"_DUZ(2)_",",.01,"E") ;
Association
$STACK(005)=DO
$STACK(005,"ECODE")=
$STACK(005,"PLACE")=ERR2+6^ZU
$STACK(005,"MCODE")= D ^%ZTER K %ZT ; Capture symbol table first!
$X $Y=0 2
$ZV=GT.M V5.3-003 Linux x86
%H=61681
%T=0
%XTT=
%ZT("^XUTL(""XQ"",$J)")=
%ZTER11I=EHR,EHR
%ZTER11N=1
%ZTER11S=
%ZTER11Z=0
%ZTER12A=0
%ZTER12B=\\013
%ZTERCNT=43
%ZTERH1=61691
%ZTERROR=
%ZTERRT=^%ZTER(1,61691,1,1)
%ZTERSUB=%ZTER11S)
%ZTERVAP=%ZT(
%ZTERVAR=%ZTERVAR
%ZTERZE=HDR+17^RAPM2, Undefined local variable: RAR(4.014,150373850,-
%GTM-E-UNDE
F
DILOCKTM=3
DISYS=19
DIW=|
DIWT=5,10,15,20,25
DN=1
DT=3091126
DTIME=5400
DUZ=105
DUZ(0)=@
DUZ(1)=
DUZ(2)=68
DUZ("AG")=O
DUZ("AUTO")=0
DUZ("BUF")=1
DUZ("LANG")=
IO=/dev/pts/1
IO(0)=/dev/pts/1
IO(1,"/dev/pts/1")=
IO("ERROR")=
IO("HOME")=50^/dev/pts/1
IO("ZIO")=/dev/pts/1
IOBS=$C(8)
IOF=#,$C(27,91,50,74,27,91,72)
IOHG=
IOM=80
ION=TELNET
IOPAR=
IOS=50
IOSL=24
IOST=C-VT102
IOST(0)=60
IOT=VTRM
IOUPAR=
IOXY=W $C(27,91)_((DY+1))_$C(59)_((DX+1))_$C(102)
J=3
POP=0
RA1=3091116
RAANS=0
RAANS2=0
RABDATE=3091106
RABEGDT=3091105.9999
RACAT=O
RACCESS(105,"DIV",68,1)=68^PRINCE HAMZAH HOSPITAL
RACCESS(105,"DIV",68,2)=68^PRINCE HAMZAH HOSPITAL
RACCESS(105,"DIV",68,3)=68^PRINCE HAMZAH HOSPITAL
RACCESS(105,"DIV",68,4)=68^PRINCE HAMZAH HOSPITAL
RACCESS(105,"DIV",68,5)=68^PRINCE HAMZAH HOSPITAL
RACCESS(105,"DIV",68,6)=68^PRINCE HAMZAH HOSPITAL
RACCESS(105,"DIV",68,7)=68^PRINCE HAMZAH HOSPITAL
RACCESS(105,"DIV",68,8)=68^PRINCE HAMZAH HOSPITAL
RACCESS(105,"DIV",68,11)=68^PRINCE HAMZAH HOSPITAL
RACCESS(105,"DIV-IMG","PRINCE HAMZAH HOSPITAL","CT SCAN")=
RACCESS(105,"DIV-IMG","PRINCE HAMZAH HOSPITAL","GENERAL RADIOLOGY")=
RACCESS(105,"DIV-IMG","PRINCE HAMZAH HOSPITAL","MAGNETIC RESONANCE
IMAGING")=
RACCESS(105,"DIV-IMG","PRINCE HAMZAH HOSPITAL","MAMMOGRAPHY")=
RACCESS(105,"DIV-IMG","PRINCE HAMZAH HOSPITAL","ULTRASOUND")=
RACCESS(105,"IMG",1,1)=^GENERAL RADIOLOGY
RACCESS(105,"IMG",1,6)=^GENERAL RADIOLOGY
RACCESS(105,"IMG",1,11)=^GENERAL RADIOLOGY
RACCESS(105,"IMG",3,5)=^ULTRASOUND
RACCESS(105,"IMG",3,8)=^ULTRASOUND
RACCESS(105,"IMG",4,4)=^MAGNETIC RESONANCE IMAGING
RACCESS(105,"IMG",5,2)=^CT SCAN
RACCESS(105,"IMG",5,7)=^CT SCAN
RACCESS(105,"IMG",9,3)=^MAMMOGRAPHY
RACCESS(105,"LOC",1)=4^PHH RADIOLOGY MAIN
RACCESS(105,"LOC",2)=5^PHH CT MAIN
RACCESS(105,"LOC",3)=6^PHH MAMMO
RACCESS(105,"LOC",4)=7^PHH MRI
RACCESS(105,"LOC",5)=8^PHH ULTRASOUND MAIN
RACCESS(105,"LOC",6)=9^PHH RADIOLOGY ER
RACCESS(105,"LOC",7)=10^PHH CT ER
RACCESS(105,"LOC",8)=11^PHH ULTRASOUND ER
RACCESS(105,"LOC",11)=145^PHH DENTAL
RACHKDIV=PRINCE HAMZAH HOSPITAL
RACN=111109-55
RACN0=55^173^2^O^^^^30^^N^87^^1^151^105^^41^3^^^3091111^30^^Y^^0^613^^^Y
RACNI=B
RADD=91
RADFN=
RADHT=
RADHV=
RADTE=3091117.1252
RADTI=
RAEDATE=3091116
RAENDDT=3091116.9999
RAEXST=2
RAHASR=1
RAHD(0)=Summary Verification Timeliness Report
RAIMGTY=MAMMOGRAPHY
RAIMGTYP=GENERAL RADIOLOGY
RAIO=1
RAIOM=80
RAITYP=1
RAMAXDT=3091116
RAMDIV=68
RAMDV=0^0^0^0^0^1^1^1^1^1^0^1^1^1^0^1^1^0^1^0^1^1^0^0^1^0^1^0^
RAMLC=3^0^PHH_GF_RADCLERK^2^PHH_GF_RADTECH^9^^0^^PHH_GF_RADTECH^^1^2
RAN=3
RANODIV=
RANUM=
RAPATNM=ZZALI,SAMER
RAPG=1
RAPOP=0
RAPRCN=ABDOMEN 2 VIEWS
RAPRIM=105
RAPRIMNM=HASHEM,BAYAN
RAQUIT=0
RAR(4,"68,",.01,"E")=PRINCE HAMZAH HOSPITAL
RAR(4,"68,",99,"E")=100PHH
RAR(4.014,"2,68,",.01,"E")=PARENT FACILITY
RAR(4.014,"2,68,",1,"E")=PRINCE HAMZAH HOSPITAL
RARAD=105
RARPT=S
RARPTDT=3091111.150642
RARPTST=V
RARPTTXT=41
RASELDIV=68
RASINCE=
RATDFHR=.161666666666666666
RATDFSEC=582
RATHRS=1
RATYP=S
RAVDFHR=.166666666666666666
RAVDFSEC=600
RAVERDT=3091111.1507
RAVHRS=1
U=^
X(1)=PRINCE HAMZAH HOSPITAL
X(2)=100PHH
XMDUZ=105
XQCH=SU
XQDIC=10512
XQJMP=0
XQPSM=U105,P5366
XQSV=10512^5366^RA TIMELINESS VER MENU^Verification
Timeliness^^M^^^^^^^^115
XQT=R
XQUSER=BAYAN HASHEM
XQVOL=EHR
XQXFLG=0^0
XQXFLG("GUI")=^
XQY=9680
XQY0=RA PERFORMIN RPTS^Summary/Detail report^^R^^^^^^^^115
XQZ=^RAPM
Y=0
Y(0)=NO
Z=Revision Act of 1976)."
^XUTL("XQ",$J,0)=3091126.120645
^XUTL("XQ",$J,1)=9P9^EVE^Systems Manager Menu^^M^1^^^^^^^^n^1^^^
^XUTL("XQ",$J,2)=5366U105,P5366^RA OVERALL^Rad/Nuc Med Total System
Menu^^M^^^6^
^^^^115^^1^1
^XUTL("XQ",$J,3)=5405U105,P5366^RA MGTRPTS^Management Reports
Menu^^M^^^^^^^^
^XUTL("XQ",$J,4)=10511U105,P5366^RA TIMELINESS MENU^Timeliness
Reports^^M^^^^^^^
^115
^XUTL("XQ",$J,5)=10512U105,P5366^RA TIMELINESS VER MENU^Verification
Timeliness^
^M^^^^^^^^115
^XUTL("XQ",$J,6)=9680U105,P5366^RA PERFORMIN RPTS^Summary/Detail
report^^R^^^^^^
^^115
^XUTL("XQ",$J,"DUZ")=105
^XUTL("XQ",$J,"DUZ(0)")=@
^XUTL("XQ",$J,"DUZ(1)")=
^XUTL("XQ",$J,"DUZ(2)")=68
^XUTL("XQ",$J,"DUZ(AG)")=O
^XUTL("XQ",$J,"DUZ(AUTO)")=0
^XUTL("XQ",$J,"DUZ(BUF)")=1
^XUTL("XQ",$J,"DUZ(LANG)")=
^XUTL("XQ",$J,"IO")=/dev/pts/1
^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-VT102
^XUTL("XQ",$J,"IOST(0)")=60
^XUTL("XQ",$J,"IOT")=VTRM
^XUTL("XQ",$J,"IOUPAR")=
^XUTL("XQ",$J,"IOXY")=W $C(27,91)_((DY+1))_$C(59)_((DX+1))_$C(102)
^XUTL("XQ",$J,"MIXED OS")=1
^XUTL("XQ",$J,"T")=6
^XUTL("XQ",$J,"XQM")=9
^XUTL("XQ",$J,"XQVOL")=EHR
^XUTL("XQ",$J,"XQW")=
$ZE= HDR+17^RAPM2, Undefined local variable: RAR(4.014,150373850,-%GTM-
E-UNDEF
. S X(3)=RAR(4.014,"1,"_DUZ(2)_",",.01,"E") ; Association
Thank you all
> My computer tells me that you wrote this message at 11:10pm your time. Isn't time to go to sleep?
>
> You are on the right track. First, type "1" to select the error, then at the prompt that says "which symbol", type "^L". You will get several pages. Capture those and send them to hardhats.
>
> Sam
>
>
> You are on the right track. First, type "1" to select the error, then at the prompt that says "which symbol", type "^L". You will get several pages. Capture those and send them to hardhats.
>
> Sam
>
Sam Habiel
Nov 26, 2009, 7:31:20 AM11/26/09
to hard...@googlegroups.com
The problem is in field 14, the associations subfile of the
institution file. I personally don't know what that field is used for;
and in typical fashion, it's barely documented. Here's what it says:
This multiple field is used to link groups of Institutions into associations.
Can you execute these commands and send us the output? I am attaching
my output as an example.
>>ZWRITE ^DIC(4,67,*)
^DIC(4,67,0)="VOE OFFICE INSTITUTION OLD^53^^^VOE EHR^^^^^^L"
^DIC(4,67,1)="17 Lakes Raod^^Nespelem^99155"
^DIC(4,67,2,0)="^4.03^1^1"
^DIC(4,67,2,1,0)="HABIEL,SAM^2^509.989.3732"
^DIC(4,67,3)=57
^DIC(4,67,4)="PO BOX 71^^NESPELEM^53^99155"
^DIC(4,67,6)=5
^DIC(4,67,7,0)="^4.014P^^"
^DIC(4,67,99)="^^^^E^^7"
^DIC(4,67,9999,0)="^4.9999A^1^1"
^DIC(4,67,9999,1,0)="VASTANUM^100"
^DIC(4,67,9999,"B","VASTANUM",1)=""
^DIC(4,67,"DIV")="N"
>>D GETS^DIQ(4,67,".01;14*;99","E","RAR","RAMSG")
>>ZWRITE RAR
RAR(4,"67,",.01,"E")="VOE OFFICE INSTITUTION OLD"
RAR(4,"67,",99,"E")=""
and then, can you print the entries for the Association multiple from Fileman:
Select OPTION: inqUIRE TO FILE ENTRIES
Output from what File: INSTITUTION// (67 entries)
Select INSTITUTION NAME: `67 VOE OFFICE INSTITUTION OLD WA IHS
Another one:
Standard Captioned Output? Yes// N (No)
First Print FIELD: ASSOCIATIONS (multiple)
First Print ASSOCIATIONS SUB-FIELD: ALL
Do you mean ALL the fields in the file? NO// YES
Then Print FIELD:
Heading (S/C): INSTITUTION List//
DEVICE: TELNET
INSTITUTION List NOV 26,2009@04:27 PAGE 1
ASSOCIATIONS PARENT OF ASSOCIATION
--------------------------------------------------------------------------------
My suspicion is that you don't need any associations in your system;
and once you get rid of the one there the report will run fine. But
don't do that yet.
Sam
institution file. I personally don't know what that field is used for;
and in typical fashion, it's barely documented. Here's what it says:
This multiple field is used to link groups of Institutions into associations.
Can you execute these commands and send us the output? I am attaching
my output as an example.
>>ZWRITE ^DIC(4,67,*)
^DIC(4,67,0)="VOE OFFICE INSTITUTION OLD^53^^^VOE EHR^^^^^^L"
^DIC(4,67,1)="17 Lakes Raod^^Nespelem^99155"
^DIC(4,67,2,0)="^4.03^1^1"
^DIC(4,67,2,1,0)="HABIEL,SAM^2^509.989.3732"
^DIC(4,67,3)=57
^DIC(4,67,4)="PO BOX 71^^NESPELEM^53^99155"
^DIC(4,67,6)=5
^DIC(4,67,7,0)="^4.014P^^"
^DIC(4,67,99)="^^^^E^^7"
^DIC(4,67,9999,0)="^4.9999A^1^1"
^DIC(4,67,9999,1,0)="VASTANUM^100"
^DIC(4,67,9999,"B","VASTANUM",1)=""
^DIC(4,67,"DIV")="N"
>>D GETS^DIQ(4,67,".01;14*;99","E","RAR","RAMSG")
>>ZWRITE RAR
RAR(4,"67,",.01,"E")="VOE OFFICE INSTITUTION OLD"
RAR(4,"67,",99,"E")=""
and then, can you print the entries for the Association multiple from Fileman:
Select OPTION: inqUIRE TO FILE ENTRIES
Output from what File: INSTITUTION// (67 entries)
Select INSTITUTION NAME: `67 VOE OFFICE INSTITUTION OLD WA IHS
Another one:
Standard Captioned Output? Yes// N (No)
First Print FIELD: ASSOCIATIONS (multiple)
First Print ASSOCIATIONS SUB-FIELD: ALL
Do you mean ALL the fields in the file? NO// YES
Then Print FIELD:
Heading (S/C): INSTITUTION List//
DEVICE: TELNET
INSTITUTION List NOV 26,2009@04:27 PAGE 1
ASSOCIATIONS PARENT OF ASSOCIATION
--------------------------------------------------------------------------------
My suspicion is that you don't need any associations in your system;
and once you get rid of the one there the report will run fine. But
don't do that yet.
Sam
Nancy Anthracite
Nov 26, 2009, 11:23:16 AM11/26/09
to hard...@googlegroups.com, Sam Habiel
Probably not related to this, but then again, maybe, let me mention this. I
can't recall where for sure, but I think it was with the old version of Care
Management, that I had to work to get things pointed at VOE OFFICE INSTITUTION
instead of VOE OFFICE INSTITUTION OLD to get it to work. Some things seemed
to use one and some the other for reasons that escape me. There must have
been something that changed in the early stages of the VistAOffice development
way back when.
--
Nancy Anthracite
can't recall where for sure, but I think it was with the old version of Care
Management, that I had to work to get things pointed at VOE OFFICE INSTITUTION
instead of VOE OFFICE INSTITUTION OLD to get it to work. Some things seemed
to use one and some the other for reasons that escape me. There must have
been something that changed in the early stages of the VistAOffice development
way back when.
Nancy Anthracite
bayan....@ehs.com.jo
Nov 26, 2009, 5:20:17 PM11/26/09
to Hardhats
Dear Sam, Nancy and David
I really appreciate your help, my problem was fixed thanks to you. I
just defined a VISN
value for the ASSOCIATIONS of my facility in the INSTITUTION File #4.
thanks a lot
On Nov 26, 6:23 pm, Nancy Anthracite <nanthrac...@earthlink.net>
wrote:
> > On Thu, Nov 26, 2009 at 3:02 AM, bayan.has...@ehs.com.jo
> ...
>
> read more »
I really appreciate your help, my problem was fixed thanks to you. I
just defined a VISN
value for the ASSOCIATIONS of my facility in the INSTITUTION File #4.
thanks a lot
On Nov 26, 6:23 pm, Nancy Anthracite <nanthrac...@earthlink.net>
wrote:
>
> read more »
Nancy Anthracite
Nov 26, 2009, 11:27:34 PM11/26/09
to hard...@googlegroups.com, bayan....@ehs.com.jo
Good Work! Can you please make an entry on the Wiki about this so others do
not have the same struggle you have had?
http://vistapedia.net If you do not have rights to post to it yet, let us
know so you can get them.
--
Nancy Anthracite
not have the same struggle you have had?
http://vistapedia.net If you do not have rights to post to it yet, let us
know so you can get them.
Nancy Anthracite
Sam Habiel
Nov 27, 2009, 12:37:17 AM11/27/09
to hard...@googlegroups.com
Bayan,
I think you have to delete the entry because your associated
institution is the same as the main institution. But you didn't post
the stuff as I asked you to.
Nancy, I don't think this belongs in the wiki. It's a bad config. It's
a good exercise in debugging.
Sam
I think you have to delete the entry because your associated
institution is the same as the main institution. But you didn't post
the stuff as I asked you to.
Nancy, I don't think this belongs in the wiki. It's a bad config. It's
a good exercise in debugging.
Sam
bayan....@ehs.com.jo
Nov 27, 2009, 11:17:24 AM11/27/09
to Hardhats
Dear Sam and Nancy
I don't what is the wiki is !!!
Sam, would you please tell me where and how to execute the commands
you sent; I'm not yet famelier with mumps because I'm junior.
The following entries for the Association multiple from Fileman:
OUTPUT FROM WHAT FILE: INSTITUTION//
Select INSTITUTION NAME: pRINCE HAMZAH HOSPITAL JO MC(M) 100PHH
ANOTHER ONE:
STANDARD CAPTIONED OUTPUT? Yes// n (No)
FIRST PRINT FIELD: assOCIATIONS (multiple)
FIRST PRINT ASSOCIATIONS SUB-FIELD: ALL
Do you mean ALL the fields in the file? NO// YES
THEN PRINT FIELD:
Heading (S/C): INSTITUTION LIST//
DEVICE: 0 TELNET
INSTITUTION LIST NOV 27,2009 18:05
PARENT FACILITY PRINCE HAMZAH HOSPITAL
Sam, did you mean I have to delete VISN and PARENT FACILITY entries ?
If you have any notes please let me know ...
Thanks a lot
On Nov 27, 7:37 am, Sam Habiel <sam.hab...@gmail.com> wrote:
> Bayan,
>
> I think you have to delete the entry because your associated
> institution is the same as the main institution. But you didn't post
> the stuff as I asked you to.
>
> Nancy, I don't think this belongs in the wiki. It's a bad config. It's
> a good exercise in debugging.
>
> Sam
>
> On Thu, Nov 26, 2009 at 8:27 PM, Nancy Anthracite
>
> ...
>
> read more »
I don't what is the wiki is !!!
Sam, would you please tell me where and how to execute the commands
you sent; I'm not yet famelier with mumps because I'm junior.
The following entries for the Association multiple from Fileman:
OUTPUT FROM WHAT FILE: INSTITUTION//
Select INSTITUTION NAME: pRINCE HAMZAH HOSPITAL JO MC(M) 100PHH
ANOTHER ONE:
STANDARD CAPTIONED OUTPUT? Yes// n (No)
FIRST PRINT FIELD: assOCIATIONS (multiple)
FIRST PRINT ASSOCIATIONS SUB-FIELD: ALL
Do you mean ALL the fields in the file? NO// YES
Heading (S/C): INSTITUTION LIST//
DEVICE: 0 TELNET
INSTITUTION LIST NOV 27,2009 18:05
PAGE 1
ASSOCIATIONS PARENT OF ASSOCIATION
--------------------------------------------------------------------------------
VISN
ASSOCIATIONS PARENT OF ASSOCIATION
--------------------------------------------------------------------------------
PARENT FACILITY PRINCE HAMZAH HOSPITAL
Sam, did you mean I have to delete VISN and PARENT FACILITY entries ?
If you have any notes please let me know ...
Thanks a lot
On Nov 27, 7:37 am, Sam Habiel <sam.hab...@gmail.com> wrote:
> Bayan,
>
> I think you have to delete the entry because your associated
> institution is the same as the main institution. But you didn't post
> the stuff as I asked you to.
>
> Nancy, I don't think this belongs in the wiki. It's a bad config. It's
> a good exercise in debugging.
>
> Sam
>
> On Thu, Nov 26, 2009 at 8:27 PM, Nancy Anthracite
>
> <nanthrac...@earthlink.net> wrote:
> > Good Work! Can you please make an entry on the Wiki about this so others do
> > not have the same struggle you have had?
>
> >http://vistapedia.net If you do not have rights to post to it yet, let us
> > know so you can get them.
>
> > Good Work! Can you please make an entry on the Wiki about this so others do
> > not have the same struggle you have had?
>
> >http://vistapedia.net If you do not have rights to post to it yet, let us
> > know so you can get them.
>
>
> read more »
JohnLeo Zimmer
Nov 27, 2009, 11:53:13 AM11/27/09
to hard...@googlegroups.com
Sam Habiel
Nov 27, 2009, 10:50:52 PM11/27/09
to hard...@googlegroups.com
Yes, go ahead, delete both the association subfile entries. It's a
nonsensical association since you are pointing to yourself. What you
just did was apply a bandaid and putting an entry in subfile ien 1
with no corresponding institution.
Sorry; I didn't know that you didn't know M.
Sam
nonsensical association since you are pointing to yourself. What you
just did was apply a bandaid and putting an entry in subfile ien 1
with no corresponding institution.
Sorry; I didn't know that you didn't know M.
Sam
bayan....@ehs.com.jo
Nov 28, 2009, 4:39:24 PM11/28/09
to Hardhats
Sorry for being late but I am in the Eid Al-Adha vacation ...
I delete both the association subfile entries and its still OK and the
connection did not closed.
thanks Sam :)
On Nov 28, 5:50 am, Sam Habiel <sam.hab...@gmail.com> wrote:
> Yes, go ahead, delete both the association subfile entries. It's a
> nonsensical association since you are pointing to yourself. What you
> just did was apply a bandaid and putting an entry in subfile ien 1
> with no corresponding institution.
>
> Sorry; I didn't know that you didn't know M.
>
> Sam
>
> On Fri, Nov 27, 2009 at 8:53 AM, JohnLeo Zimmer <johnleo...@gmail.com> wrote:
> > The wiki...http://vistapedia.net/
I delete both the association subfile entries and its still OK and the
connection did not closed.
thanks Sam :)
On Nov 28, 5:50 am, Sam Habiel <sam.hab...@gmail.com> wrote:
> Yes, go ahead, delete both the association subfile entries. It's a
> nonsensical association since you are pointing to yourself. What you
> just did was apply a bandaid and putting an entry in subfile ien 1
> with no corresponding institution.
>
> Sorry; I didn't know that you didn't know M.
>
> Sam
>
> > The wiki...http://vistapedia.net/
Reply all
Reply to author
Forward
0 new messages