Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: VPRSDAG

Package: Virtual Patient Record

Routine: VPRSDAG


Information

VPRSDAG ;SLC/MKB -- SDA GMR utilities ;10/25/18 15:29

Source Information

Source file <VPRSDAG.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
General Medical Record - Vitals 3 EN1^GMRVUT0  $$FIELD^GMVGETVT  GETREC^GMVUTL  
Functional Independence 1 (GC,PRM)^RMIMRP  
Lexicon Utility 1 $$CODE^LEXTRAN  
Problem List 1 GETFLDS^GMPLEDT3  
Text Integration Utility 1 EXTRACT^TIULQ  
VA FileMan 1 GETS^DIQ  
Virtual Patient Record 1 $$RANGE^VPRDGMV  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
VA FileMan 2 ^DDE  ITEM  

Entry Points

Name Comments DBIA/ICR reference
PROB1(IEN) ; -- get info for single problem [ID Action]
SCTTEXT(CODE,IEN) ; -- get Preferred Text for SCT Code
PROBCMT(IEN) ; -- return list of comments in
; DLIST(#) = id ^ date ^ user ^ type ^ facility ^ text
DELETED(IEN,FLD) ; -- return 1 or 0, if FLD value was recently deleted
FIM1(IEN) ; -- get info for one set of measurements [ID Action]
FIMS ; -- get DLIST(#)=name^value of each score
; Returns VPRFIMS = Assessment type(s) for ProblemDetail
TOTAL(NODE) ; -- Return total of scores, or "" if incomplete
VIT1(IEN) ; -- get info for one Vital measurement, returns VPRGMV=^(0)
VITQUAL ; -- build DLIST(#)=Qualifiers [code^name]
VITCODE(IEN,SFN) ; -- return [first] code for vital type
; SubFileNumber = 120.518 for Vital Type
; 120.522 for Vital Qualifier

External References

Name Field # of Occurrence
GETS^DIQ VITCODE+4
GETFLDS^GMPLEDT3 PROB1+3
EN1^GMRVUT0 VIT1+10
$$FIELD^GMVGETVT VIT1+4
GETREC^GMVUTL VIT1+2
$$CODE^LEXTRAN SCTTEXT+3
GC^RMIMRP FIM1+2
PRM^RMIMRP FIM1+1
EXTRACT^TIULQ FIM1+5
$$RANGE^VPRDGMV VIT1+14

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNPROB - [#9000011] PROB1+1, SCTTEXT+2, PROBCMT+3, PROBCMT+4
^GMPL(125.8 - [#125.8] DELETED+3, DELETED+4, DELETED+5
^TMP("VPRGMV" VIT1+6
^UTILITY($J VIT1+11, VIT1+13!

Label References

Name Line Occurrences
$$TOTAL FIMS+8

Naked Globals

Name Field # of Occurrence
^( PROBCMT+3, PROBCMT+4, VIT1+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BMI VIT1+8~, VIT1+11*, VIT1+12
CODE SCTTEXT~, SCTTEXT+3
>> DDEOUT PROB1+1*, FIM1+1*, VIT1+1*, VIT1+3*
DFN VIT1+8~, VIT1+9*
>> DLIST( PROBCMT+7*, FIMS+12*, FIMS+13*, FIMS+14*, VITQUAL+3*
DT SCTTEXT+2
FAC PROBCMT+2~, PROBCMT+3*, PROBCMT+6
FLD DELETED~, DELETED+2*, DELETED+6
GMPDT SCTTEXT+1~, SCTTEXT+2*, SCTTEXT+3
GMPFLD PROB1+2!
GMPORIG PROB1+2!
GMRVSTR VIT1+8~, VIT1+9*
GMRVSTR(0 VIT1+9*
I PROBCMT+2~, PROBCMT+3*, PROBCMT+4, PROBCMT+7, DELETED+1~, DELETED+3*, DELETED+4*, DELETED+5, FIMS+2~, FIMS+7*
FIMS+8, FIMS+9, TOTAL+1~, TOTAL+2*, VITQUAL+1~, VITQUAL+3*
IDT VIT1+8~, VIT1+10*, VIT1+11
IEN PROB1~, PROB1+1, PROB1+3, SCTTEXT~, SCTTEXT+2, PROBCMT~, PROBCMT+3, PROBCMT+4, PROBCMT+7, DELETED~
, DELETED+2*, DELETED+3, DELETED+4, FIM1~, FIM1+2, VIT1~, VIT1+1*, VIT1+2, VIT1+6, VIT1+11
, VITCODE~, VITCODE+4
IENS VITCODE+3~, VITCODE+5*, VITCODE+6
J PROBCMT+2~, PROBCMT+4*, PROBCMT+7, FIMS+2~, FIMS+13*
LAST DELETED+1~, DELETED+3*, DELETED+4
LEX SCTTEXT+1~
LEX("P" SCTTEXT+4
LEXY SCTTEXT+1~, SCTTEXT+3*, SCTTEXT+4
N PROBCMT+2~*, PROBCMT+7*, FIMS+2~, FIMS+3*, FIMS+12*, FIMS+13*, FIMS+14*
NAMES FIMS+2~, FIMS+4*, FIMS+5*, FIMS+6*, FIMS+13
NODE TOTAL~, TOTAL+2
NOTE FIM1+4~*, FIM1+5, FIM1+6
QUALS VITQUAL+1~, VITQUAL+2*, VITQUAL+3
SCORES FIMS+2~, FIMS+8*, FIMS+13
SFN VITCODE~, VITCODE+4, VITCODE+5, VITCODE+6
SUM FIMS+2~, FIMS+8*, FIMS+14, TOTAL+1~, TOTAL+2*, TOTAL+3
TYPE FIMS+2~, FIMS+9*, FIMS+10, FIMS+12
U SCTTEXT+2, PROBCMT+5, PROBCMT+6, PROBCMT+7, DELETED+6, FIM1+4, FIMS+13, TOTAL+2, VIT1+4, VIT1+6
, VIT1+9, VIT1+11, VIT1+12, VITQUAL+3
>> VPRANGE VIT1+14*
VPRC VITCODE+3~
VPRC( VITCODE+5, VITCODE+6
>> VPRFIMS FIMS+3*, FIMS+10*, FIMS+15*
>> VPRGMV VIT1+3*, VIT1+4, VIT1+6*, VIT1+9, VIT1+10, VIT1+12*
>> VPRM FIM1+2
>> VPRM( FIMS+7, FIMS+8
>> VPRM("TIU" FIM1+6*
>> VPRM(1 FIM1+4
>> VPRSITE FIM1+1
>> VPRSITE(1 FIM1+1
VPRTIU FIM1+4!
VPRTIU( FIM1+6
>> VPRTYPE VIT1+4*, VIT1+5, VIT1+9, VIT1+11, VIT1+14
>> VPRV VIT1+2
>> VPRV(0 VIT1+3
>> VPRV(5 VITQUAL+2
X PROBCMT+2~, PROBCMT+4*, PROBCMT+5, PROBCMT+6, DELETED+1~, DELETED+5*, DELETED+6, FIMS+2~, FIMS+13*, TOTAL+1~
, TOTAL+2*, VITQUAL+1~, VITQUAL+3*
Y SCTTEXT+1~*, SCTTEXT+4*, SCTTEXT+5, PROBCMT+6*, PROBCMT+7, DELETED+1~, DELETED+2*, DELETED+4, DELETED+6*, DELETED+7
, VITCODE+3~, VITCODE+6*, VITCODE+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All