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 |  Local Variables  | All
Print Page as PDF
Routine: VPRUTILS

Package: Virtual Patient Record

Routine: VPRUTILS


Information

VPRUTILS ;SLC/AGP -- VPR utilities routine ;8/14/13 11:22

Source Information

Source file <VPRUTILS.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 4 $$CRC16^XLFCRC  ($$FMADD,$$FMTHL7)^XLFDT  $$BASE^XLFUTL  $$KSP^XUPARAM  
Toolkit 1 $$GET^XPAR  

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: 14

Package Total Caller Graph
Virtual Patient Record 14 VPRDJ  VPRDJ00  VPRDJ01  VPRDJ02  VPRDJ03  VPRDJ04  VPRDJ04A  VPRDJ05  
VPRDJ05V  VPRDJ06  VPRDJ07  VPRDJ08  VPRDJ09  VPRP2I  

Entry Points

Name Comments DBIA/ICR reference
SETERROR(RESULT,ERROR,EXTERROR,DATA) ; -- error text for JSON
SETERRTX(TEMP,ERROR) ;
SETTEXT(X,VALUE) ; -- format word processing
SPLITVAL(NODE,ARRAY) ; -- split a value into a list
SETPROV(NODE,PROV) ; -- providers
SETUID(DOMAIN,PAT,ID,ADDDATA) ; -- create uid string
SETFCURN(DOMAIN,FACILITY,VALUE) ; -- create facility urn
SETVURN(DOMAIN,VALUE) ; -- create VA urn
SYS() ; -- return hashed system name
SETNCS(CODESET,VALUE) ; -- create national codeset urn
JSONDT(X) ; -- convert FileMan DT to HL7 DT for JSON
FACILITY(X,Y) ; -- add facility info to array for JSON
; X=STATION NUMBER^STATION NAME
; Y=Variable array name
; >D FACILITY^VPRUTILS("500^CAMP MASTER","LAB")

External References

Name Field # of Occurrence
$$CRC16^XLFCRC SYS+1
$$FMADD^XLFDT SETERROR+3
$$FMTHL7^XLFDT JSONDT+2
$$BASE^XLFUTL SYS+1
$$GET^XPAR SETUID+2
$$KSP^XUPARAM SYS+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^XTMP( SETERROR+3*, SETERROR+5*

Label References

Name Line Occurrences
$$SETUID SETPROV+1
$$SETVURN SPLITVAL+5
SETERRTX SETERROR+6, SETERROR+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADDDATA SETUID~, SETUID+4
ARRAY SPLITVAL~
ARRAY( SPLITVAL+2, SPLITVAL+3, SPLITVAL+5, SPLITVAL+6*
CNT SETERROR+1~, SETERRTX+2*, SETERRTX+3, SPLITVAL+1~, SPLITVAL+3*, SPLITVAL+4
CODESET SETNCS~, SETNCS+1
D JSONDT+1~, JSONDT+4*, JSONDT+6
DATA SETERROR~, SETERROR+5
DATE JSONDT+1~, JSONDT+2*, JSONDT+3, JSONDT+4, JSONDT+5!, JSONDT+6*, JSONDT+7*, JSONDT+8
DOMAIN SETUID~, SETUID+3, SETFCURN~, SETFCURN+1, SETVURN~, SETVURN+2
DT SETERROR+3
ERROR SETERROR~, SETERROR+6, SETERRTX~
ERROR( SETERRTX+2, SETERRTX+3
EXTERROR SETERROR~, SETERROR+8
FACILITY SETFCURN~, SETFCURN+1
FIELD SPLITVAL+1~, SPLITVAL+5*
FIRST SETTEXT+1~, SETTEXT+2*
I SETTEXT+1~, SETTEXT+3*, SETTEXT+4, SETTEXT+6
ID SETUID~, SETUID+3
LINE SETTEXT+1~, SETTEXT+4*, SETTEXT+6
M JSONDT+1~, JSONDT+4*, JSONDT+6
NAME SPLITVAL+1~, SPLITVAL+2*, SPLITVAL+3, SPLITVAL+5, SPLITVAL+6
NODE SPLITVAL~, SPLITVAL+4, SETPROV~, SETPROV+1, SETPROV+2
PAT SETUID~, SETUID+3
PROV SETPROV~
PROV("providerName" SETPROV+2*
PROV("providerUid" SETPROV+1*
RESULT SETERROR~, SETUID+1~, SETUID+3*, SETUID+4*, SETUID+5, SETVURN+1~*, SETVURN+2*, SETVURN+3
RESULT("error" SETERROR+6*, SETERROR+7*, SETERROR+8*
RESULT("success" SETERROR+4*
SYS SETUID+1~, SETUID+2*, SETUID+3
TEMP SETERROR+1~, SETERROR+6, SETERROR+8, SETERRTX~, SETERRTX+1*, SETERRTX+3*
TIME JSONDT+1~, JSONDT+3*, JSONDT+7
U SETERROR+3, SPLITVAL+4, SPLITVAL+5, SETPROV+2
VALUE SETTEXT~, SETTEXT+6, SPLITVAL+1~, SPLITVAL+4*, SPLITVAL+5*, SPLITVAL+6, SETFCURN~, SETFCURN+1, SETVURN~, SETVURN+2
, SETNCS~, SETNCS+1
>> VPRSYS SETUID+2
VPRTEMP SETERROR+1~, SETERROR+2*, SETERROR+3, SETERROR+5, SETERROR+7
X SETTEXT~, SETTEXT+3, SETTEXT+4, JSONDT~, JSONDT+2, FACILITY~, FACILITY+5, FACILITY+6
XCNT SETERROR+1~, SETERROR+5*, SETERROR+7
Y JSONDT+1~, JSONDT+4*, JSONDT+6, FACILITY~, FACILITY+5, FACILITY+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All