Routine: VPRDCRC

Information

VPRDCRC ;SLC/MKB,AGP -- Compute CRC32 for VistA data ;7/26/13 11:09am

Package	Total	Call Graph
Kernel	3	^%ZTLOAD $$CRC32^XLFCRC ($$FMADD,$$NOW)^XLFDT
Virtual Patient Record	2	$$TAG^VPRDJ ENCODE^VPRJSON
Master Patient Index VistA	1	$$GETDFN^MPIF001
Toolkit	1	$$GET^XPAR

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 2

Package	Total	Caller Graph
Virtual Patient Record	2	VPR GET CHECKSUM VPRDJ

Entry Points

Name	Comments	DBIA/ICR reference
CHECK(VPRCRC,FILTER)	; -- Return CRC32 checksums of VistA data ; RPC = VPR GET CHECKSUM ; where FILTER("system") = name of calling/client system ; FILTER("patientId") = DFN or DFN;ICN ; FILTER("domain") = name of desired data type (see VPRDJ0) ; FILTER("uid") = single item id to return [opt] ; FILTER("start") = start date.time of search [opt] ; FILTER("stop") = stop date.time of search [opt] ; FILTER("queued") = true or false
QUEUED(FILTER,NODE,SYS,DFN)	; -- start job to generate checksums
EN(FILTER)	; -- Return CRC values of requested data in ^XTMP(node,"data") as JSON
EN1	; [entry point for queued job]
ENCODE	; -- return list(s) of checksums as JSON
ENQ
PREP	; -- reformat ^TMP("VPRCRC",$J) for JSON utility -> ^TMP("VPRCRCF",$J)
GET(LIST,CRC)	; -- compute CRC32 value for LIST of strings
ONE(ARRAY,COLL)	; -- process one data item [save result in ^TMP]
GET1(ARRAY,COLL)	; -- process one data item [return result]
ALL()	; -- return string for all types of data
ATTR(X)	; -- return list of attributes needed for collection X
TEST(FILTER)	;

External References

Name	Field # of Occurrence
^%ZTLOAD	QUEUED+6
$$GETDFN^MPIF001	EN1+9
$$TAG^VPRDJ	EN1+21
ENCODE^VPRJSON	ENCODE+2
$$CRC32^XLFCRC	GET+2
$$FMADD^XLFDT	CHECK+23, QUEUED+2
$$NOW^XLFDT	QUEUED+4, QUEUED+5, QUEUED+8, EN1+26, ENCODE+3
$$GET^XPAR	CHECK+19

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$D(OUT) Line Location: TEST+5

Used in RPC

RPC Name	Call Tags
VPR GET CHECKSUM	CHECK

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	EN1+10
^TMP("VPRCRC"	EN1+4!, EN1+25, EN1+28, EN1+29, EN1+30, EN1+32, EN1+33, ENQ!, PREP+3, PREP+4 , PREP+5, PREP+6, ONE+5*
^TMP("VPRCRCF"	EN1+4!, ENCODE+2, ENQ!, PREP+4, PREP+6
^TMP("VPRDCRC"	CHECK+13!, CHECK+25, CHECK+26, CHECK+33, CHECK+34
^XTMP(	CHECK+23, CHECK+25, CHECK+27!, CHECK+30, CHECK+31!, CHECK+32, CHECK+34, QUEUED+2, QUEUED+5, QUEUED+6 , QUEUED+7, QUEUED+8, QUEUED+9, EN1+26, ENCODE+2, ENCODE+3*

Label References

Name	Line Occurrences
$$ALL	EN1+18
$$ATTR	ONE+2, GET1+2
@(	EN1+22
CHECK	TEST+4
EN	CHECK+24
ENQ	EN1+24
GET	EN1+29, EN1+32, ONE+4, GET1+4
PREP	ENCODE+1
QUEUED	CHECK+30

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ARRAY	ONE~, ONE+2, ONE+3, ONE+4, GET1~, GET1+3
ATTR	ONE+1~, ONE+3, GET1+1~, GET1+3
COLL	ONE~, ONE+2, ONE+5, GET1~, GET1+2
CRC	EN1+2~, EN1+25, EN1+26, EN1+29, EN1+30, EN1+32, EN1+33, GET~, GET+1, GET+2* , ONE+1~, ONE+4, ONE+5, GET1+1~, GET1+4, GET1+5
DCNT	PREP+1~, PREP+2*
DFN	CHECK+12~, CHECK+15, CHECK+17, CHECK+23, CHECK+30, QUEUED~, QUEUED+2, QUEUED+3, EN1+2~, EN1+7 , EN1+8, EN1+9, EN1+10
DOMAIN	PREP+1~, PREP+2, PREP+3, PREP+4, PREP+5, PREP+6
DONE	TEST+1~, TEST+2, TEST+3, TEST+6
DT	CHECK+23, QUEUED+2
FILTER	CHECK~, CHECK+24, CHECK+30, QUEUED~, EN~, TEST~, TEST+4
FILTER("domain"	EN1+16
FILTER("node"	CHECK+18*, EN1+11
FILTER("patientId"	CHECK+15, EN1+7
FILTER("queued"	CHECK+16
FILTER("start"	EN1+14
FILTER("stop"	EN1+15
FILTER("system"	CHECK+14
FILTER("uid"	EN1+16
I	GET+1~, GET+2
ICN	EN1+2~, EN1+8*, EN1+9
ITEM	GET1+1~, GET1+4
ITEM(	GET1+3*
LIST	GET~, GET+2, ONE+1~, ONE+2, ONE+3, GET1+1~, GET1+2, GET1+3
NODE	CHECK+12~, CHECK+17, CHECK+18, CHECK+23, CHECK+25, CHECK+27, CHECK+30, CHECK+31, CHECK+32, CHECK+34 , QUEUED~, QUEUED+2, QUEUED+5, QUEUED+6, QUEUED+7, QUEUED+8, QUEUED+9, EN1+2~, EN1+11, EN1+26 , ENCODE+2, ENCODE+3
OUT	TEST+1~, TEST+4, TEST+5, TEST+6
QUEUED	CHECK+12~, CHECK+16*, CHECK+22
SYS	CHECK+12~, CHECK+14*, CHECK+17, CHECK+23, CHECK+30, QUEUED~, QUEUED+2
TYPE	EN1+2~, EN1+20, EN1+21, EN1+28, EN1+29, EN1+30
U	CHECK+23, QUEUED+2, ONE+3, GET1+3
UCNT	PREP+1~, PREP+5, PREP+6
UID	EN1+2~, EN1+16, EN1+17, EN1+24, EN1+25, PREP+1~, PREP+5, PREP+6, ONE+1~, ONE+2* , ONE+5
VPRCRC	CHECK~, CHECK+13!, CHECK+26, CHECK+32, CHECK+33, EN1+3~, EN1+7
VPRI	EN1+3~, EN1+13, ONE+6
VPRID	EN1+3~, EN1+17*
VPRMAX	EN1+3~, EN1+13*
VPRP	EN1+2~, EN1+20*
VPRSTART	EN1+3~, EN1+14*
VPRSTOP	EN1+3~, EN1+15*
VPRSYS	CHECK+12~, CHECK+19*
VPRTN	EN1+2~, EN1+21*, EN1+22
VPRTYPE	EN1+3~, EN1+16, EN1+17, EN1+18*, EN1+20, EN1+25, EN1+31
X	ATTR~, ATTR+2, ATTR+3, ATTR+4, ATTR+5, ATTR+6, ATTR+7, ATTR+8, ATTR+9, ATTR+10 , ATTR+11, ATTR+12, ATTR+13, ATTR+14, ATTR+15, ATTR+16, ATTR+17, ATTR+18, ATTR+19, ATTR+20 , ATTR+21, ATTR+22, ATTR+23, ATTR+24, ATTR+25
Y	ATTR+1~, ATTR+2, ATTR+3, ATTR+4, ATTR+5, ATTR+6, ATTR+7, ATTR+8, ATTR+9, ATTR+10 , ATTR+11, ATTR+12, ATTR+13, ATTR+14, ATTR+15, ATTR+16, ATTR+17, ATTR+18, ATTR+19, ATTR+20 , ATTR+21, ATTR+22, ATTR+23, ATTR+24, ATTR+25*, ATTR+26
ZTDESC	QUEUED+1~, QUEUED+3*
ZTDTH	QUEUED+1~, QUEUED+4*
ZTIO	QUEUED+1~, QUEUED+4*
ZTRTN	QUEUED+1~, QUEUED+3*
ZTSAVE	QUEUED+1~
ZTSAVE("FILTER("	QUEUED+4*
ZTSK	QUEUED+1~, QUEUED+6, QUEUED+9

Marked Items

Name	Field # of Occurrence
$T(@VPRTN	EN1+21

Customize PDF page

Package: Virtual Patient Record