Some health factors don't contain a category, and they crash a CPRS report as a result

[shabiel]

No description provided.

[shabiel]

Still an issue:

Current $IO: /tmp/ORU_27391_65190_34112.Current $ZIO: /dev/null^0^4^0
$ZE= ADDHF+21^PXRHS07, Global variable undefined: ^AUTTHF(0'0),150372994,-%YDB-E
-GVUNDEF
Last Global Ref: ^%ZOSF("ERRTN")
 S HFCNAME=$P(^AUTTHF(HFCAT,0),U,1)
$DEVICE=0
$ECODE=,M7,Z150372994,
$ESTACK=16
$ETRAP=D UNWIND^ORWRP Q
$QUIT=0
$STACK=26
$STACK(000)=-direct 
$STACK(000,"ECODE")=
$STACK(000,"PLACE")=GTMLNCH+6^%ZISTCPS
$STACK(000,"MCODE")= D VAR,@RTN
$STACK(001)=DO
$STACK(001,"ECODE")=
$STACK(001,"PLACE")=RESTART+3^XWBTCPM
$STACK(001,"MCODE")= U XWBTDEV D MAIN
$STACK(002)=DO
$STACK(002,"ECODE")=
$STACK(002,"PLACE")=MAIN+1^XWBTCPM
$STACK(002,"MCODE")= F  D  Q:XWBTBUF="#BYE#"
$STACK(003)=DO
$STACK(003,"ECODE")=
$STACK(003,"PLACE")=MAIN+14^XWBTCPM
$STACK(003,"MCODE")= . D CALLP^XWBPRS(.XWBR,$G(XWBDEBUG)) ;Read the NEW Msg para
meters and call RPC
$STACK(004)=DO
$STACK(004,"ECODE")=
$STACK(004,"PLACE")=CALLP+10^XWBPRS
$STACK(004,"MCODE")= I '+ERR D
$STACK(005)=DO
$STACK(005,"ECODE")=
$STACK(005,"PLACE")=CALLP+11^XWBPRS
$STACK(005,"MCODE")= . D CAPI(.XWBP,XWB("PARAM"))
$STACK(006)=DO
$STACK(006,"ECODE")=
$STACK(006,"PLACE")=CAPI+15^XWBPRS
$STACK(006,"MCODE")= D @XWBCALL S XWBCALL2=XWBCALL ;Save call for debug
$STACK(007)=DO
$STACK(007,"ECODE")=
$STACK(007,"PLACE")=RPT+46^ORWRP
$STACK(007,"MCODE")= D @OUT
$STACK(008)=DO
$STACK(008,"ECODE")=
$STACK(008,"PLACE")=HSQUERY+6^ORDV01
$STACK(008,"MCODE")= I '$L($P(ID,";",2)),$P(ID,";",3),$L($T(HSTYPE^ORWRP1)) D HS
TYPE^ORWRP1(ROOT,ORDFN,$P(ID,";",3),.ORALPHA,.OROMEGA,.ORDTRNG,.REMOTE) Q
$STACK(009)=DO
$STACK(009,"ECODE")=
$STACK(009,"PLACE")=HSTYPE+1^ORWRP1
$STACK(009,"MCODE")= D START^ORWRP(80,"HSTYPEB^ORWRP1(.ROOT,.ORDFN,.ORHS,.ALPHA,
.OMEGA,.DTRANGE,.REMOTE,.ORMAX,.ORFHIE)")
$STACK(010)=DO
$STACK(010,"ECODE")=
$STACK(010,"PLACE")=START+11^ORWRP
$STACK(010,"MCODE")= D @GOTO
$STACK(011)=DO
$STACK(011,"ECODE")=
$STACK(011,"PLACE")=HSTYPEB+6^ORWRP1
$STACK(011,"MCODE")= D ENCWA^GMTS
$STACK(012)=DO
$STACK(012,"ECODE")=
$STACK(012,"PLACE")=ENCWA+22^GMTS
$STACK(012,"MCODE")= D EN^GMTS1
$STACK(013)=DO
$STACK(013,"ECODE")=
$STACK(013,"PLACE")=START+7^GMTS1
$STACK(013,"MCODE")= W:$E(IOST)="C"&('$D(GMTSOBJ)) @IOF D OUTPUT
$STACK(014)=DO
$STACK(014,"ECODE")=
$STACK(014,"PLACE")=OUTPUT+10^GMTS1
$STACK(014,"MCODE")= F  S GMTSEGN=$O(GMTSEG(GMTSEGN)) Q:GMTSEGN=""  D  I $D(GMTS
QIT),(GMTSQIT="") Q
$STACK(015)=DO
$STACK(015,"ECODE")=
$STACK(015,"PLACE")=OUTPUT+12^GMTS1
$STACK(015,"MCODE")= . S GMTSE=$P(GMTSEG(GMTSEGN),U,2) D SEGMNT D:GMTSEGN=GMTSEG
C LASTPG
$STACK(016)=DO
$STACK(016,"ECODE")=
$STACK(016,"PLACE")=SEGMNT+42^GMTS1
$STACK(016,"MCODE")= D @($P(GMTSEGR,";",1)_U_$P(GMTSEGR,";",2))
$STACK(017)=DO
$STACK(017,"ECODE")=
$STACK(017,"PLACE")=HFACT+1^GMTSPXFP
$STACK(017,"MCODE")= K ^TMP("PXF",$J) D HF^PXRHS07(DFN,GMTSBEG,GMTSEND,GMTSNDM) 
Q:'$D(^TMP("PXF",$J))
$STACK(018)=DO
$STACK(018,"ECODE")=
$STACK(018,"PLACE")=HF+43^PXRHS07
$STACK(018,"MCODE")= I '$D(ITEMS) D HFALL(DFN,BEGDT,ENDDT,OCCLIM)
$STACK(019)=DO
$STACK(019,"ECODE")=
$STACK(019,"PLACE")=HFALL+4^PXRHS07
$STACK(019,"MCODE")= F  S HFIEN=$O(^PXRMINDX(9000010.23,"PI",DFN,HFIEN)) Q:(HFIE
N="")  D
$STACK(020)=DO
$STACK(020,"ECODE")=
$STACK(020,"PLACE")=HFALL+6^PXRHS07
$STACK(020,"MCODE")= . F  S DATE=$O(^PXRMINDX(9000010.23,"PI",DFN,HFIEN,DATE),-1
) Q:(DATE="")!(CNT'<OCCLIM)  D
$STACK(021)=DO
$STACK(021,"ECODE")=
$STACK(021,"PLACE")=HFALL+8^PXRHS07
$STACK(021,"MCODE")= .. F  S VHFIEN=$O(^PXRMINDX(9000010.23,"PI",DFN,HFIEN,DATE,
VHFIEN)) Q:(VHFIEN="")!(CNT'<OCCLIM)  D
$STACK(022)=DO
$STACK(022,"ECODE")=
$STACK(022,"PLACE")=HFALL+9^PXRHS07
$STACK(022,"MCODE")= ... I $$ADDHF(HFIEN,VHFIEN,BEGDT,ENDDT)=1 S CNT=CNT+1
$STACK(023)=$$
$STACK(023,"ECODE")=,M7,Z150372994,
$STACK(023,"PLACE")=ADDHF+21^PXRHS07
$STACK(023,"MCODE")= S HFCNAME=$P(^AUTTHF(HFCAT,0),U,1)
$STACK(024)=DO
$STACK(024,"ECODE")=
$STACK(024,"PLACE")=ERR+4^ORWRP
$STACK(024,"MCODE")= D @^%ZOSF("ERRTN") ;file error
$X $Y=0 4
$ZV=GT.M V6.3-007 Darwin x86_64
%DT=T
%Y=1
%ZIS=0N
%ZT("^XUTL(""XQ"",$J)")=
ALPHA=1820803
BEGDT=1820803
CNT=0
D0=6004
DATE=3110302
DFN=241
DILOCKTM=3
DIRECT=
DISYS=19
DT=3190626
DTIME=3600
DTRANGE=50000
DUZ=158
DUZ(0)=
DUZ(1)=
DUZ(2)=4197
DUZ("AG")=E
DUZ("AUTHENTICATION")=AVCODES
DUZ("AUTO")=1
DUZ("BUF")=1
DUZ("LANG")=
DUZ("LOA")=2
ENDDT=3190626.235959
ENT=HSQUERY
ERR=0
EVENTDT=3110302
EXAMID=
GMA=
GMI=1
GMJ=1
GMOOTXT=Patient Care Encounter Package not yet installed
GMPLUSER=1
GMPXCM=
GMPXCMOD=N
GMPXHLOC=
GMPXICDF=
GMPXNARR=
GMRA=0^0^111^0
GMSEL=
GMSUPRES=
GMTS=***********************
GMTS1=6809372.76
GMTS2=8179196
GMTSAGE=36
GMTSBEG=1820803
GMTSDBL=
GMTSDLM=0
GMTSDOB=03/28/1983
GMTSDTC=3190626.092832
GMTSDTM=06/26/2019 09:28
GMTSE=204
GMTSEG(1)=1^204
GMTSEGC=1
GMTSEGH=HF - Health Factors
GMTSEGI(204)=1
GMTSEGL=
GMTSEGN=1
GMTSEGR=HFACT;GMTSPXFP
GMTSEND=3190626.235959
GMTSEQ=1
GMTSHDR=***********************  CONFIDENTIAL  SUMMARY   pg. 1 *****************
******
GMTSLO=3
GMTSLOCK=
GMTSLPG=0
GMTSNDM=-1
GMTSNPG=0
GMTSPG=1
GMTSPHDR("DOB")=DOB: 03/28/1983
GMTSPHDR("DOBS")=64
GMTSPHDR("NMSSN")=CROOKS415,COLEEN678    999-23-9664
GMTSPHDR("WARDRB")= 
GMTSPHDR("WARDRBS")=39.5
GMTSPNF=1
GMTSPNM=CROOKS415,COLEEN678
GMTSPRM=HF
GMTSPX1=3190626.235959
GMTSPX2=1820803
GMTSPXD1=06/26/2019
GMTSPXD2=08/03/1882
GMTSRB=
GMTSSN=999-23-9664
GMTSTITL=
GMTSWARD=
GMTSWRIT=1
GOTO=HSTYPEB^ORWRP1(.ROOT,.ORDFN,.ORHS,.ALPHA,.OMEGA,.DTRANGE,.REMOTE,.ORMAX,.OR
FHIE)
HFCAT=0
HFIEN=5775
HFNAME=SYN CP RESPIRATORY THERAPY (SCT:53950000)
HSTAG=;;204;
HSTYPE=
ID=;;204;;PALM DESERT HOSPITAL;999;;;OR_HF;
IO=/tmp/ORU_27391_65190_34112.DAT
IO(0)=/dev/null
IO(1,0)=
IO(1,"/dev/null")=
IO(1,"/tmp/ORU_27391_65190_34112.DAT")=
IO("CLNM")=192.168.1.131
IO("ERROR")=
IO("HOME")=39^/dev/null
IO("IP")=192.168.1.131
IO("ZIO")=/dev/null
IOBS=$C(8)
IOF=#
IOHG=
IOM=80
ION=OR WORKSTATION
IOPAR=
IOS=23
IOSL=64
IOST=P-OTHER
IOST(0)=16
IOT=HFS
IOUPAR=
IOXY=
J=
LCNT=0
MSG=-1^No Patient Postings on file
NUM=0
OCCLIM=999
OMEGA=3190626.235959
ORALPHA=1820803
ORDFN=241
ORDTRNG=50000
ORHANDLE=ORWRP
ORHFS=ORU_27391_65190_34112.DAT
ORHS=204
ORIO=OR WORKSTATION
OROMEGA=3190626.235959
ORSUB=ORDATA
ORTOTAL=5
ORWCLVER=1.0.31.116
PNAME=Syn Cp Respiratory Therapy (Sct:53950000)
POP=0
REMOTE=0
RM=80
ROOT=^TMP("ORDATA",27391,1)
RPC=
RPTID=OR_HF
RTN=ORDV01
SEX=F
SITE=PALM DESERT HOSPITAL;999
SNAME=
TAB=R
TEMP=SYN CP RESPIRATORY THERAPY (SCT:53950000)^^0^^^^^Y^^F
TMP0=5775^241^6004
TMP12=3110302
TYPE=1
U=^
VADM(1)=CROOKS415,COLEEN678
VADM(2)=999239664^999-23-9664
VADM(3)=2830328^MAR 28,1983
VADM(4)=36
VADM(5)=F^FEMALE
VADM(6)=
VADM(7)=
VADM(8)=
VADM(9)=
VADM(10)=S
VADM(11)=1
VADM(12)=1
VADM(13)=
VADM(13,1)=
VAERR=0
VAIN(1)=
VAIN(2)=
VAIN(3)=
VAIN(4)=
VAIN(5)=
VAIN(6)=
VAIN(7)=
VAIN(8)=
VAIN(9)=
VAIN(10)=
VAIN(11)=
VALUE(1)=3171030.203633^OCT 30,2017@20:36:33
VALUE(2)=241^CROOKS415,COLEEN678
VALUE(3)=8^HEIGHT
VALUE(4)=3171030.203633^OCT 30,2017@20:36:33
VALUE(5)=0^
VALUE(6)=158^PROVIDER,UNKNOWN SYNTHEA
VALUE(7)=67^67
VALUE(8)=^
VALUE(9)=^
VALUE(10)=^
VALUE(11,1)=^
VALUE(12,1)=^
VDATA=3110302.1936^PALM DESERT HOSPITAL^A^^GENERAL MEDICINE^
VHFIEN=479
X=3190626
X0=ORRPW PCE HEALTH FACT^OR_HF^1^5^ORDV01^HSQUERY^6^R^^^^V^250^^^^^^^^204
X2=^^Health Factors^PCE Health factors all^^HSTYPEB^ORWRPP1
X4=
XPARSYS=100;DIC(4.2,
XQCY0=OR CPRS GUI CHART^CPRSChart version 1.0.31.116^^B^54^^^^^^^
XQMES=1
XQVOL=ROU
XQXFLG=0^0
XQXFLG("ASO")=1
XQXFLG("LLOG")=3190530.172327
XQY=8552
XQY0=OR CPRS GUI CHART
XR=[XWB]
XUCI=VAH
XUDEV=0
XUENV=VAH^ROU^saichiko^ROU:saichiko
XUF=0
XUF(.3)=158
XUFAC=0
XUIOP=
XUOSVER=6.3-007
XUVOL=ROU^^30
XWB(0,"LENV")=3
XWB(0,"RT")=0
XWB(0,"TYPE")=1
XWB(0,"VER")=1
XWB(2,"RNAM")=ORWRP
XWB(2,"RPC")=ORWRP REPORT TEXT
XWB(2,"RTAG")=RPT
XWB(2,"VER")=0
XWB(5,"P",0)=241
XWB(5,"P",1)=OR_HF:HEALTH FACTORS~;;204;
XWB(5,"P",2)=
XWB(5,"P",3)=50000
XWB(5,"P",4)=
XWB(5,"P",5)=0
XWB(5,"P",6)=0
XWB(5,"XWB",7)=
XWB("PARAM")=XWB(5,"P",0),XWB(5,"P",1),XWB(5,"P",2),XWB(5,"P",3),XWB(5,"P",4),XW
B(5,"P",5),XWB(5,"P",6)
XWBAPVER=0
XWBCALL=RPT^ORWRP(.XWBY,XWB(5,"P",0),XWB(5,"P",1),XWB(5,"P",2),XWB(5,"P",3),XWB(
5,"P",4),XWB(5,"P",5),XWB(5,"P",6))
XWBCALL2=
XWBCLMAN=192.168.1.131
XWBDEBUG=0
XWBENVL=3
XWBERROR=
XWBNULL=/dev/null
XWBOS=GT.M
XWBP=^TMP("ORDATA",27391,1)
XWBPRT=0
XWBPTYPE=4
XWBR=^TMP("ORDATA",27391,1)
XWBRBUF=
XWBSEC=
XWBT("BF")=#
XWBT("PCNT")=1
XWBTBUF=
XWBTCMD=
XWBTDEV=0
XWBTIME=180
XWBTIME(1)=5
XWBTIP=192.168.1.131
XWBTSKT=0
XWBVER=1.108
XWBWRAP=1
XWBY=^TMP("ORDATA",27391,1)
ZTSK=125357
ZTSK("D")=65190,34060
^XUTL("XQ",$J,0)=3190626.092724
^XUTL("XQ",$J,"DUZ")=158
^XUTL("XQ",$J,"DUZ(0)")=
^XUTL("XQ",$J,"DUZ(1)")=
^XUTL("XQ",$J,"DUZ(2)")=4197
^XUTL("XQ",$J,"DUZ(AG)")=E
^XUTL("XQ",$J,"DUZ(AUTHENTICATION)")=AVCODES
^XUTL("XQ",$J,"DUZ(AUTO)")=1
^XUTL("XQ",$J,"DUZ(BUF)")=1
^XUTL("XQ",$J,"DUZ(LANG)")=
^XUTL("XQ",$J,"DUZ(LOA)")=2
^XUTL("XQ",$J,"IO")=/dev/null
^XUTL("XQ",$J,"IO(""CLNM"")")=192.168.1.131
^XUTL("XQ",$J,"IO(""IP"")")=192.168.1.131
^XUTL("XQ",$J,"IOBS")=$C(8)
^XUTL("XQ",$J,"IOF")=#
^XUTL("XQ",$J,"IOM")=132
^XUTL("XQ",$J,"ION")=
^XUTL("XQ",$J,"IOPAR")=
^XUTL("XQ",$J,"IOS")=0
^XUTL("XQ",$J,"IOSL")=64
^XUTL("XQ",$J,"IOST")=P-OTHER
^XUTL("XQ",$J,"IOST(0)")=16
^XUTL("XQ",$J,"IOT")=TRM
^XUTL("XQ",$J,"IOUPAR")=
^XUTL("XQ",$J,"IOXY")=
^XUTL("XQ",$J,"XQVOL")=ROU