Routine: VENPCC1C

Information

VENPCC1C ; IHS/OIT/GIS - MORE DATA MINING FOR ENCOUNTER FORMS 09 Mar 2004 8:15 AM ;

Call Graph

Call Graph Total: 7

Package	Total	Call Graph
Immunization Tracking	3	IMMBI^BIAPCHS ($$VER,VER)^BILOGO IMMHX^BIRPC
PCC New Encounter Form	3	ART^VENPCC1L $$NEWIMM^VENPCCS2 $$CFG^VENPCCU
Patient Care Component	1	PROBACHK^APCHS40

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
PCC New Encounter Form	2	VENPCC10 VENPCC1A

Entry Points

Name	Comments	DBIA/ICR reference
IX(X,CMD,IEN)	; EP-1=SET, 2=MMF, 3=DELETE
MCR(DFN)	; EP-MEDICARE
OK(SS,DFN,MIEN,PTYPE,CLASS,DEFEF)	; EP-CHECK FOR PATIENT TYPE MATCH
XSET(SS,DFN,MIEN,MMF,CLASS,DEFEF)	; EP-SET MAIL MERGE FIELDS INTO TMP ARRAY
OSET(DEFEF)	; EP - RETURN SET IEN IF THE TEMPLATE IS ASSOCIATED WITH A SET
ALLERG(APCHSPAT)	; EP-ALLERGIES
SPEC(DFN,DEFEF)	; EP-GET DATA FOR OCXS
SETA(PIEN)	;
CLASS(DFN)	; EP-GIVEN THE DFN RETURN THE PATIENT CLASS FOR SITE PREFERENCES ; 1=INFANT,2=CHILD,3=ADULT MALE,4=ADULT FEMALE
INS(DFN)
AX(X,CMD,IEN)	; EP-1=SET, 2=OGRP, 3=PGRP, 4=DELETE
TPC(DFN)	; EP-THIRD PARTY COVERAGE
C2
C1
MCD(DFN)	; EP-MEDICAID ; SHOW EXPIRATION DATE IF MCD IS CURRENT
PVT(DFN)	; EP-PRIVATE INSURANCE
IF	; EP-ENABLE IMMUNIZATION FORECASTING AT SITES THAT SUPPORT IMMUNIZATION FORECASTING

External References

Name	Field # of Occurrence
PROBACHK^APCHS40	ALLERG+7
IMMBI^BIAPCHS	IF+1
$$VER^BILOGO	IF+1
VER^BILOGO	IF+1
IMMHX^BIRPC	IF+7
ART^VENPCC1L	ALLERG+2
$$NEWIMM^VENPCCS2	IF+1
$$CFG^VENPCCU	ALLERG+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNMCD - [#9000004]	MCD+3, MCD+4
^AUPNMCD("B"	MCD+3
^AUPNMCR - [#9000003]	MCR+3, MCR+4
^AUPNMCR("B"	MCR+2
^AUPNPROB - [#9000011]	ALLERG+5, SETA+3
^AUPNPROB("AC"	ALLERG+4
^AUPNPRVT - [#9000006]	PVT+3
^AUTNINS - [#9999999.18]	PVT+5, PVT+10
^AUTNPOV - [#9999999.27]	SETA+4
^DD("DD"	MCD+8
^DPT - [#2]	CLASS+3, TPC+1
^ICD9 - [#80]	ALLERG+6
^TMP("VEN PRNT"	XSET+3, XSET+9, XSET+10, IF+3
^VEN(	XSET+2, XSET+5, XSET+7, OK+3
^VEN(7.41 - [#19707.41]	ALLERG+3, SETA+2, OSET+5
^VEN(7.42 - [#19707.42]	IX+6, IX+7, SPEC+8
^VEN(7.5 - [#19707.5]	ALLERG+2
^VEN(7.61 - [#19707.61]	SPEC+4, SPEC+5
^VEN(7.62 - [#19707.62]	SPEC+2, SPEC+3
^VEN(7.92 - [#19707.92]	OSET+2
^VEN(7.93 - [#19707.93]	IX+2, IX+5, IX+9, IX+10!, AX+2, AX+5, AX+13, AX+14!, OSET+3
^VEN(7.94 - [#19707.94]	IF+5

Label References

Name	Line Occurrences
$$MCD	TPC+3
$$MCR	TPC+3
$$OK	XSET+4
$$PVT	TPC+3
$$TPC	INS+1
SETA	ALLERG+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	C1, C2, IF+1~!, IF+2~, IF+5, IX+4~, AX+4~, PVT+1~, PVT+3, PVT+4 , MCD+1~, MCD+4, MCD+5, MCR+1~, MCR+4*, MCR+5
A	TPC+2~, TPC+3*, TPC+4, TPC+5, TPC+6
AGE	CLASS+2~, CLASS+6*, CLASS+7
APCHSDFN	ALLERG+1~, ALLERG+3, ALLERG+4, ALLERG+5, ALLERG+7
APCHSNKA	ALLERG+1~, ALLERG+7*
APCHSP	ALLERG+1~, ALLERG+6*, ALLERG+7
APCHSPAT	ALLERG~, ALLERG+2, ALLERG+4
B	TPC+2~, TPC+3*, TPC+5, TPC+6
BIDE	IF+2~, IF+7
BIDE(	IF+6*
C	TPC+2~, TPC+3*, TPC+7, TPC+8
CIEN	SPEC+1~, SPEC+2*, SPEC+3
CLASS	XSET~, XSET+4, OK~, OK+2
CMD	IX~, IX+3, IX+6, IX+9, AX~, AX+3, AX+6, AX+7, AX+8, AX+9 , AX+13
D1	PVT+1~, PVT+4, PVT+6, MCD+1~, MCD+5, MCD+6, MCD+7, MCR+1~, MCR+5*, MCR+6
D2	PVT+1~, PVT+4, PVT+7, MCD+1~, MCD+5, MCD+8, MCD+9, MCD+10, MCR+1~, MCR+5* , MCR+7
DATE	IF+2~, IF+11*, IF+12, IF+14
DEFEF	XSET~, XSET+4, OK~, ALLERG+3, SETA+2, OSET~, OSET+1, OSET+5, SPEC~, SPEC+2
DFN	XSET~, XSET+4, OK~, INS~, INS+1, CLASS~, CLASS+3, IF+1, IF+7, TPC~ , TPC+1, TPC+3, PVT~, PVT+3, MCD~, MCD+3, MCR~, MCR+2, SPEC~
DIEN	MCD+1~, MCD+3, MCD+4, MCR+1~, MCR+3, MCR+4
DOB	CLASS+2~, CLASS+3*, CLASS+4, CLASS+6
DT	CLASS+6, PVT+6, PVT+7, MCD+9, MCR+6, MCR+7
EIEN	SPEC+1~, SPEC+3*, SPEC+4, SPEC+5
FLD	AX+4~, AX+6, AX+7, AX+8, AX+9, AX+10, AX+12
FORM	OK+1~
GRP	IF+2~, IF+11, IF+12, IF+14, IF+16, AX+4~, AX+12*, AX+13, AX+14
GRP(	IF+14*, IF+16
HDR	SPEC+1~, SPEC+8*, SPEC+10, SPEC+12
HIEN	SPEC+1~, SPEC+6*, SPEC+8
I	IF+2~, IF+6, IF+8
ICD	ALLERG+1~
IEN	IX~, IX+2, IX+5, IX+9, IX+10, AX~, AX+2, AX+5, AX+13, AX+14
IIEN	ALLERG+1~, ALLERG+5, ALLERG+6, PVT+1~, PVT+4, PVT+5, PVT+10
IMM	IF+2~, IF+11*, IF+12, IF+14
INO	PVT+1~, PVT+4*, PVT+9
LINE	IF+2~, IF+4*, IF+7, IF+9, IF+10
MAX	ALLERG+1~, ALLERG+3*, ALLERG+4, SETA+7
MAXDT	MCD+1~, MCD+2, MCD+6, MCD+7
MAXNARR	SETA+1~, SETA+2*, SETA+8
MIEN	XSET~, XSET+2, XSET+4, XSET+5, XSET+7, OK~, OK+3, MCD+1~, MCD+2, MCD+3 , MCD+4, MCR+1~, MCR+2*, MCR+3, MCR+4
MM	SPEC+1~
MMF	XSET~, XSET+9, XSET+10, C1, C2, IX+4~, IX+6, IX+7, IX+8, IX+9 , IX+10
N	IF+2~, IF+10*
NAME	PVT+1~, PVT+5*, PVT+9
NARR	SETA+1~, SETA+4*, SETA+5, SETA+8
NIEN	SETA+1~, SETA+3*, SETA+4
OK	ALLERG+1~
OSET	OSET+4~, OSET+5*, OSET+6
PCE	SPEC+1~, SPEC+7*, SPEC+11
PGRP	AX+4~, AX+6, AX+7, AX+8, AX+9, AX+10, AX+12
PIEN	SETA~, SETA+3
POST	IF+2~, IF+4, IF+5, IF+14
PRE	IF+2~, IF+4, IF+5, IF+14
PTYPE	XSET+1~, XSET+2*, XSET+4, OK~, OK+2
SET	IX+4~, IX+6, IX+7, IX+8, IX+9, IX+10, AX+4~, AX+6, AX+7, AX+8* , AX+9*, AX+10, AX+13, AX+14
SEX	CLASS+2~, CLASS+3*, CLASS+4, CLASS+7
>> SPECHOLD(	SPEC+10, SPEC+12*
SS	XSET~, XSET+2, XSET+4, XSET+5, XSET+7, XSET+9, OK~, OK+3
STATUS	PVT+1~, PVT+10*, PVT+11
STG	IX+4~, IX+5, IX+6, IX+7, AX+4~, AX+5, AX+6, AX+7, AX+8, AX+9 , TPC+2~, TPC+3, TPC+4, TPC+5, TPC+6, TPC+7, TPC+8, TPC+9, TPC+10, PVT+1~ , PVT+2, PVT+8, PVT+9, PVT+11, PVT+13, MCD+1~, MCD+2, MCD+9, MCD+10, MCD+11* , MCD+13
TAG	XSET+1~, XSET+7, XSET+8, OK+1~, OK+3, OK+4, SPEC+1~, SPEC+4*, SPEC+9
TMP	XSET+1~, XSET+3, C1, C2, SETA+7, SETA+8, IF+1~, IF+2~, IF+3*, IF+8 , IF+16
TOT	ALLERG+1~, ALLERG+3, ALLERG+4, SETA+6, SETA+7, SETA+8, IF+2~, IF+4, IF+16
TPIEN	PVT+1~, PVT+2, PVT+3
U	XSET+2, XSET+6, XSET+9, C1, C2, ALLERG+2, ALLERG+3, ALLERG+5, ALLERG+6, SETA+2 , SETA+3, SETA+4, CLASS+3, IF+5, IF+9, IF+10, IX+6, IX+7, AX+6, AX+7 , AX+8, AX+9, OSET+5, TPC+9, PVT+4, PVT+5, PVT+8, PVT+10, MCD+5, MCR+5 , SPEC+6, SPEC+7, SPEC+8
VAL	XSET+1~, XSET+6*, XSET+9, XSET+10, SPEC+1~, SPEC+11
X	XSET+1~, XSET+5, XSET+6, XSET+9, C1, C2, OK+1~, OK+5, CLASS+2~, CLASS+3 , CLASS+7, CLASS+8, IF+2~, IF+10, IF+11, IX~, IX+1, IX+6, IX+7, AX~ , AX+1, AX+6, AX+7, AX+8, SPEC+1~, SPEC+5, SPEC+6, SPEC+7, SPEC+10, SPEC+11* , SPEC+12
Y	IF+2~, MCD+1~, MCD+8*, MCD+9, MCD+10
Z	IF+2~, IF+9*, IF+10

Marked Items

Name	Field # of Occurrence
$T(IMMBI^BIAPCHS	IF+1
$T(VER^BILOGO	IF+1

Customize PDF page

Package: PCC New Encounter Form

Routine: VENPCC1C

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items