Routine: RGVCCMR2

Information

RGVCCMR2 ;GAI/TMG,ALS-CMOR ACTIVITY SCORE GENERATOR (PART 2) ;10-6-1997

Call Graph

Call Graph Total: 6

Package	Total	Call Graph
VA FileMan	3	^%DT NOW^%DTC ^DIE
Kernel	2	($$FMADD,$$NOW)^XLFDT $$VERSION^XPDUTL
Outpatient Pharmacy	1	EN^PSOORDER

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

Package	Total	Caller Graph
Master Patient Index VistA	2	MPIFQUE3 MPIFQUE4
Toolkit	2	XDRDSHOW XDRMERG0
Clinical Information Resource Network	1	RGVCCMR1

Entry Points

Name	Comments	DBIA/ICR reference
EN
BATCH
ALLPTS
STOP
CALC	;API ENTRY POINT DBIA #2710
CALCI
OPT	; outpatient visit section ; each visit valued as follows: current fy = 30 pts. ; fy - 1 = 20 pts ; fy - 2 = 10 pts ; primary care visits (based on the PCCODE array) = 50 pts each in ; addition to the visit value ; XRCODE = ien of xray stop code LRCODE = ien of lab stop code ; encounters with a stop code for lab or xray are not counted to ; avoid duplication since lab & xray are counted separately ; in the XR & LR sections
ADM	; past admission section ; each admission valued as follows: current fy = 50 pts ; fy - 1 = 40 pts ; fy - 2 = 30 pts
XRAY	; radiololgy section - each radiology exam valued at 20 pts
RX	; prescription section
LR	; laboratory section ; "CH" = chemistry; "CY" = cytotology; "EM" = electron microscopy; ; "MI = microbiology; "SP" = surgical pathology ; each lab test done in the past year is valued at 10 points
FILE	; file score & date calculated in appropriate locations in the ; PATIENT file 'MPI' node ; scores are filed even if zero ; FILEFLG variable used to illiminate unnecessary statistcal processing
KILL
CKPT
COUNT

External References

Name	Field # of Occurrence
^%DT	BATCH, CALCI, XRAY+2, LR+5
NOW^%DTC	EN+2, EN+4, BATCH+1, STOP+2, CALCI+7
^DIE	FILE+5
EN^PSOORDER	RX+10
$$FMADD^XLFDT	EN+6, RX+7
$$NOW^XLFDT	EN+6
$$VERSION^XPDUTL	RX+6

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DPT - [#2]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DGPT - [#45]	ADM+4, ADM+6
^DGPT("B"	ADM+4
^DIC(40.7 - [#40.7]	OPT+10, OPT+12, OPT+13
^DPT - [#2]	ALLPTS+3, LR+5
^LR - [#63]	LR+5, LR+6
^PS(55 - [#55]	RX+7
^PSRX - [#52]	RX+9
^RARPT - [#74]	XRAY+3
^RARPT("C"	XRAY+3
^RGSITE(991.8 - [#991.8]	BATCH+2, BATCH+3, ALLPTS+1, ALLPTS+3, ALLPTS+6, STOP, STOP+1, STOP+4*, OPT+10
^SCE - [#409.68]	OPT+14
^SCE("C"	OPT+14
^TMP("PSOR"	RX+3!, RX+10, RX+11, RX+12!
^XTMP("RGVCCMR"	EN+1!, EN+2, EN+3!, EN+6, BATCH+2, BATCH+4, ALLPTS, ALLPTS+2, ALLPTS+6, ALLPTS+8 , ALLPTS+9, ALLPTS+10, STOP+3, FILE+6, COUNT, COUNT+2

Label References

Name	Line Occurrences
BATCH	EN+2
CALCI	ALLPTS+6
CKPT	ALLPTS+4
COUNT	STOP+5
KILL	STOP+5
STOP	ALLPTS+3

Naked Globals

Name	Field # of Occurrence
^(	LR+6
^(0	ALLPTS+3, OPT+14, ADM+4, XRAY+3, RX+9, LR+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	EN+2, BATCH+2, STOP+3, STOP+4, CALCI+7, KILL+3!
%DT	BATCH, CALC+9~, CALCI, XRAY+2, LR+5, KILL+3!
ADM	CALC+9~, ADM+4!, KILL!
ADM(	ADM+5, ADM+6
APSTDT	CALC+9~, CALCI+1*, KILL!
DA	CALC+9~, FILE+5*, KILL!
DGS0	KILL!
DIC	KILL!
DIE	CALC+9~, FILE+5*, KILL!
DPT0	ALLPTS+3*, KILL!, CKPT
DR	CALC+9~, FILE+5*, KILL!
DT	BATCH, CALCI+1, CALCI+7, RX+7
FILEFLG	ALLPTS+5, ALLPTS+7, CALC+9~, FILE+4, KILL+3!
LRCODE	CALC+9~, OPT+13*, OPT+15, KILL!
LRDFN	CALC+9~, LR+5*, LR+6, KILL!
LRSCORE	CALC+9~, LR+5, LR+6, LR+7, KILL!
LRSTDT	CALC+9~, LR+5*, LR+6, KILL!
NUM	KILL+1!
NXLR	CALC+9~, LR+6*, KILL+1!
NXPC	CALC+9~, OPT+10*, KILL+3!
NXPTF	CALC+9~, ADM+4*, ADM+6, KILL+1!
NXRX	CALC+9~, RX+3*, RX+9, RX+11, KILL+1!
NXSCE	CALC+9~, OPT+14*, KILL+1!
NXXR	CALC+9~, XRAY+3*, KILL+1!
PCCODE	CALC+9~, OPT+10!, OPT+11*, KILL+1!
PCCODE(	OPT+10*, OPT+17, OPT+18
PSOVER	CALC+9~, RX+6*, RX+8, RX+10, KILL+3!
PTF0	ADM+4*, ADM+5, ADM+6, KILL+1!
PTFD	CALC+9~
PTNAM	KILL+1!, CKPT*, CKPT+1
QUIT	ALLPTS+4, KILL+2!, CKPT+1, CKPT+2*
RARPT0	XRAY+3*, XRAY+4, KILL+2!
RARPTD	CALC+9~
RATE	KILL+2!, COUNT*, COUNT+2
RATING	ALLPTS+9*, ALLPTS+10, KILL+2!
RGDFN	EN+1, EN+2, EN+3, BATCH+2, ALLPTS+3, ALLPTS+6, OPT+14, ADM+4, XRAY+3, RX+7 , RX+10, LR+5, FILE+5, KILL!
RGRXST	CALC+9~, RX+11*!
RUNTYPE	EN+1*, EN+2, EN+3, BATCH+2, BATCH+3, KILL+3!
RX	CALC+9~, RX+3!, KILL+2!
RX(	RX+9, RX+11
RXDT	CALC+9~, RX+7*, KILL+2!
RXIEN	CALC+9~, RX+7*, RX+9, RX+10, RX+11, KILL+2!
SCE0	OPT+14*, OPT+15, OPT+16, OPT+17, OPT+18, KILL+2!
SCED	CALC+9~
SCORE	ALLPTS+8, ALLPTS+9, CALC+9~, CALCI, OPT+16, OPT+17, OPT+18, ADM+5, ADM+6, XRAY+4* , RX+9, RX+11, LR+7*, KILL+2!
SSN	KILL+2!, CKPT*, CKPT+2
STDT	CALC+9~, CALCI*, OPT+16, ADM+5, KILL+2!
TEST	CALC+9~, LR+5*, LR+6, KILL+2!
U	EN*, EN+6, BATCH+2, BATCH+3, ALLPTS+1, ALLPTS+3, ALLPTS+6, STOP, STOP+1, STOP+4 , OPT+10, OPT+15, OPT+16, OPT+17, OPT+18, ADM+5, ADM+6, XRAY+3, XRAY+4, RX+9 , LR+6, CKPT
VISIT	CALC+9~, OPT+14!, KILL+2!
VISIT(	OPT+16, OPT+17, OPT+18*
X	BATCH, CALC+9~, CALCI, XRAY+2, LR+5, KILL+2!
XRAY	CALC+9~, XRAY+3!, KILL+3!
XRAY(	XRAY+4*
XRCODE	CALC+9~, OPT+12*, OPT+15, KILL+3!
XRSTDT	XRAY+2*, XRAY+3, KILL+3!
Y	BATCH, CALCI, CALCI+1, XRAY+2, LR+5, KILL+3!
YR	CALC+9~, CALCI+1*, OPT+16, ADM+5, KILL+3!
>> ZTQUEUED	KILL+4
>> ZTREQ	KILL+4*

Customize PDF page

Package: Clinical Information Resource Network