Routine: VENPCCS2

Information

VENPCCS2 ; IHS/OIT/GIS - POPULATE OCX IMMUNIZATIONS OBJECT AND MAIL MERGRE FIELDS ; 16 Nov 2007 10:04 AM

Source Information

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
Immunization Tracking	3	IMMBI^BIAPCHS ($$VER,VER)^BILOGO (IMMFORC,IMMHX)^BIRPC
PCC New Encounter Form	1	$$STRIP^VENPCCU
VA Fileman	1	^%DT

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
PCC New Encounter Form	1	VENPCC1C

Entry Points

Name	Comments	DBIA/ICR reference
FORMAT()	; EP-FORMAT THE OUTPUT STRINGS
CLN	; EP CLEAN OUT IMMUNIZATIONS
STG
IWARN(DFN)	; EP-RETURN IMMUNIZATION WARNINGS
ANAL(STG1,STG2)	; EP-ANALYSIS OF THE HX AND FORCAST STRINGS
FMT
NEWHX(STG,LINE)	; EP-NEW IMM HISTORY
IMM(DFN)	; EP-GET IMMUNIZATION DATA AND RETURN IT IN A FORMATTED STRING
NEWIMM(DFN)	; EP-GET DATA FROM NEW IMMUNIZATION PACKAGE
ABORT
NEWFORC(STG,LINE)	; EP-NEW IMMINUZATION FORECASTS
FORC(STG)	; EP-RESET THE HEALTH MAINT REMINDERS FOR IMMUNIZATIONS TO ACCOMODATE THE "FORECAST BOX"

Name	Field # of Occurrence
^%DT	ANAL+9
IMMBI^BIAPCHS	IMM+6, NEWIMM+3
$$VER^BILOGO	IMM+6
VER^BILOGO	IMM+6
IMMFORC^BIRPC	IMM+5, IMM+8
IMMHX^BIRPC	IMM+4, IMM+7
$$STRIP^VENPCCU	ANAL+21, NEWFORC+6, NEWHX+4, NEWHX+6, NEWHX+8, NEWHX+10

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVIMM - [#9000010.11]	ANAL+12
^AUTTIMM - [#9999999.14]	ANAL+26, ANAL+28, NEWFORC+10
^AUTTIMM("D"	ANAL+24, NEWFORC+9
^BISERT - [#9002084.93]	ANAL+26
^DD(9000010.11	ANAL+13
^DPT - [#2]	IMM+1
^ICPT - [#81]	ANAL+28
^TMP("VEN PRNT"	FORC+2, CLN+2, NEWFORC+2, NEWHX+2, NEWHX+28, NEWHX+30*

Name	Line Occurrences
$$FORMAT	FMT
$$NEWIMM	IMM+6
ANAL	STG
CLN	FMT+2, NEWIMM+2
FORC	FMT+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	ANAL+12, ANAL+13, FORC+12*, NEWFORC+1~
%DT	ANAL+1~, ANAL+9*
%T	NEWIMM+4!
%Y	NEWIMM+4!
A	FORC+1~, FORC+5*
ARR	NEWIMM+1~, NEWIMM+3, NEWIMM+5
ARR(	NEWIMM+7, NEWHX+25
ARR(999	NEWHX+21
B	ANAL+1~, ANAL+2, ANAL+4, ANAL+5, ANAL+6, ANAL+7, ANAL+8, ANAL+9, ANAL+20, FORC+1~ , FORC+6, FORC+7
BIDLLID	NEWIMM+4!
BIDLLP	NEWIMM+4!
BIDLLRUN	NEWIMM+4!
BIFDT	NEWIMM+4!
BIRESULT	NEWIMM+4!
BISITE	NEWIMM+4!
CNT	FORMAT+1~, FORMAT+3, FORMAT+5, FORMAT+12, FORMAT+14, FORMAT+15, NEWIMM+1~, NEWIMM+6, NEWFORC+8, NEWFORC+12 , NEWFORC+13
CNT1	FORMAT+1~, FORMAT+11*, FORMAT+12
CNT2	FORMAT+1~, FORMAT+12, FORMAT+13, FORMAT+16
CPT	ANAL+1~, ANAL+24, ANAL+28, ANAL+30, FORC+1~, FORC+6, FORC+10, NEWFORC+1~, NEWFORC+9, NEWFORC+10* , NEWFORC+11*, NEWFORC+12
CPTIEN	ANAL+1~, ANAL+28*
DATE	NEWHX+1~, NEWHX+7*, NEWHX+14, NEWHX+22
DFN	IMM~, IMM+1, IMM+6, IMM+7, IMM+8, IWARN~, NEWIMM~, NEWIMM+3
DUE	ANAL+22, ANAL+30, NEWHX+1~, NEWHX+3, NEWHX+13*, NEWHX+16
DX	NEWIMM+4!
DY	NEWIMM+4!
FSTG	FORC+1~, FORC+3, FORC+8, FORC+9, FORC+10, FORC+12
GBL	NEWFORC+1~, NEWFORC+2, NEWFORC+12, NEWHX+1~, NEWHX+2, NEWHX+21, NEWHX+22
HX	FORMAT+1~
I	FORC+1~, FORC+4, FORC+12, CLN+1~, CLN+3*
ICLASS	ANAL+1~, ANAL+4, ANAL+14, ANAL+15, ANAL+23, ANAL+24, ANAL+30, ANAL+33, ANAL+34, FORMAT+1~ , FORMAT+3, FORMAT+4, FORMAT+5, FORMAT+6, FORMAT+10, FORMAT+11, FORMAT+12, FORMAT+13, FORMAT+16
IDATE	ANAL+1~, ANAL+9, ANAL+11, ANAL+15
IIEN	ANAL+1~, ANAL+12, ANAL+24, ANAL+25, ANAL+26, ANAL+28, FORMAT+1~, FORMAT+2, NEWFORC+1~, NEWFORC+9 , NEWFORC+10
ILOC	ANAL+1~, ANAL+7*, ANAL+15
IMM	ANAL+1~, ANAL+5, ANAL+15, ANAL+20, ANAL+21, ANAL+23, ANAL+30, FORC+1~, FORC+5, FORC+9 , NEWHX+1~, NEWHX+5*, NEWHX+13, NEWHX+15, NEWHX+16, NEWHX+17, NEWHX+21, NEWHX+22, NEWHX+23, NEWHX+27
IR	ANAL+1~, ANAL+13, ANAL+14, FORMAT+1~, FORMAT+4, FORMAT+5, FORMAT+6
IRNO	ANAL+1~, ANAL+12*, ANAL+13
ISTG	NEWIMM+1~, NEWIMM+6, NEWIMM+12, NEWIMM+13, NEWHX+15, NEWHX+16, NEWHX+17*
LAST	NEWIMM+1~, NEWIMM+6, NEWHX+15, NEWHX+16, NEWHX+17, NEWHX+21, NEWHX+23*
LINE	NEWIMM+1~, NEWIMM+6, NEWIMM+7, NEWFORC~, NEWHX~, NEWHX+25
LOC	NEWHX+1~, NEWHX+11*, NEWHX+14, NEWHX+22
>> MCNT	NEWIMM+6, NEWHX+20, NEWHX+21*, NEWHX+22
N	FORC+1~, FORC+3, FORC+12
NEXT	NEWHX+1~, NEWHX+25*, NEWHX+26, NEWHX+29
ORD	FORMAT+1~, FORMAT+9, FORMAT+12, FORMAT+14, FORMAT+16, FORMAT+18*, FORMAT+21
PCE1	ANAL+1~, ANAL+3*, ANAL+15
PCE2	ANAL+1~, ANAL+19*, ANAL+30
STG	IMM+2~, IMM+6, FMT, FMT+3, FMT+4, ANAL+1~, FORC~, FORC+3, FORC+4, FORC+5 , FORC+6, FORC+7, NEWFORC~, NEWFORC+3, NEWFORC+4, NEWFORC+5, NEWHX~, NEWHX+4, NEWHX+6, NEWHX+8 , NEWHX+10
STG1	IMM+2~, IMM+7, ABORT, STG, ANAL~, ANAL+3, ANAL+17!
STG2	IMM+2~, IMM+8, ABORT, STG, ANAL~, ANAL+19, ANAL+32!
>> STNO	ANAL+26*
STYPE	ANAL+1~, ANAL+8, ANAL+15, ANAL+24, ANAL+26, ANAL+27, ANAL+30, ANAL+33, ANAL+34, FORMAT+1~ , FORMAT+9, FORMAT+10*, FORMAT+11, FORMAT+12, FORMAT+13, FORMAT+16
TMP	IMM+2~, IMM+3, IMM+6, FMT+1, ANAL+14, ANAL+15, ANAL+30, ANAL+33, ANAL+34, FORMAT+4 , FORMAT+10, FORMAT+11, FORMAT+12, FORMAT+13, FORMAT+16, FORC+1~, FORC+2, FORC+12, CLN+1~, CLN+2* , CLN+3, NEWFORC+13, NEWHX+12, NEWHX+13, NEWHX+19, NEWHX+27
TOT	FORC+1~, FORC+4*
TYPE	NEWIMM+1~, NEWIMM+6, NEWIMM+8, NEWIMM+9, NEWIMM+10, NEWHX+1~, NEWHX+9, NEWHX+14, NEWHX+22
U	ANAL+3, ANAL+12, ANAL+13, ANAL+19, ANAL+26, ANAL+28, FORC+8, FORC+12, NEWFORC+10
VIIEN	ANAL+1~, ANAL+6*, ANAL+12
WARN	FORMAT+1~, FORMAT+2, FORMAT+5, FORMAT+6*, FORMAT+8, NEWHX+1~
>> WFLG	FMT+2, ANAL+14, ANAL+18, FORMAT+4, FORMAT+8
X	IMM+2~, IMM+4, IMM+5, ANAL+1~, ANAL+3, ANAL+4, ANAL+5, ANAL+6, ANAL+7, ANAL+8 , ANAL+9, ANAL+19, ANAL+20, NEWIMM+1~, NEWIMM+7, NEWIMM+8, NEWIMM+9, NEWFORC+1~, NEWFORC+4, NEWFORC+5 , NEWFORC+6, NEWFORC+7, NEWFORC+9, NEWFORC+12, NEWFORC+13, NEWHX+1~, NEWHX+4, NEWHX+5, NEWHX+6, NEWHX+7 , NEWHX+8, NEWHX+9, NEWHX+10, NEWHX+11, NEWHX+28, NEWHX+29*, NEWHX+30
XY	NEWIMM+4!
Y	ANAL+1~, ANAL+10, ANAL+11, ANAL+13, NEWFORC+1~, NEWHX+1~, NEWHX+27, NEWHX+28, NEWHX+30
YES	FORC+1~, FORC+3*, FORC+4, FORC+5, FORC+6
Z	NEWHX+1~, NEWHX+14*, NEWHX+17

Customize PDF page

Package: PCC New Encounter Form

Routine: VENPCCS2

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items

Name	Field # of Occurrence
$T(IMMBI^BIAPCHS	IMM+6
$T(IMMFORC^BIRPC	IMM+5
$T(IMMHX^BIRPC	IMM+4
$T(VER^BILOGO	IMM+6