Routine: VENPCC10

Package	Total	Call Graph
PCC New Encounter Form	16	(ERR1,ERR10,ERR11,ERR3,ERR5,ERR6,ERR7,ERR8,TXT)^VENPCC1 (DEMO,SPEC)^VENPCC1A EXT^VENPCC1B ($$CLASS,$$OSET,$$XSET,ALLERG,IF,SPEC)^VENPCC1C ARR^VENPCC1E HX^VENPCC1F (DX,VER22)^VENPCC1G (MED,PROB)^VENPCC1H VER25^VENPCC1L FORM^VENPCC1S HS^VENPCC2A ^VENPCCAK POP^VENPCCC $$OPN^VENPCCP ($$CFG,$$HEADER)^VENPCCU MOJODATA^VENPCCW
VA Fileman	1	NOW^%DTC

Package	Total	Caller Graph
PCC New Encounter Form	1	VENPCCW

Entry Points

Name	Comments	DBIA/ICR reference
HDR(DEPTIEN)	; EP - HEADER LINES
NEWIMM	; EP - NEW METHOD FOR GETTING IMM HX ; h9-h25
HS
BEF
NOOSET
HEAD25	; EP - MAKE HEADER GLOBAL FOR VERSION 25
NEW
TICK
DATA
MOJO
V22
PRINT(VISIT,VCN,DEPTIEN,PRV,DEFEF,DEFHS,APPT,VARS,EXT)	; EP-PRINT ENCOUNTER FORMS ; VISIT=visit ien, VCN=visit control id, PRV=providerien, DEFEF=default enc form IEN, DEFHS=default health summary IEN
V25
OSET
SYS(DFN,DEFEF)
ROS
HEAD	; EP - GET HEADER FILE ; TRADITIONAL WAY TO BUILD THE HEADER ARRAY
FORM
UNPACK(VARS)	; EP-FOR UNPACKING THE LOCAL VARIABLE LIST
EF
GO
CHKLST
SURV	; GET HEALTH MAINT REMINDER DATA
MRP()	; EP-RETURN THE MEDICAL RECORDS PRINTER GROUP
OLDSURV
CFG
NEWSURV	; EP - NEW METHOD FOR GETTING HEALTH MAINT REMINDER DATA ; h26-h50
ANMC
ORD

External References

Name	Field # of Occurrence
NOW^%DTC	GO+5
ERR1^VENPCC1	GO+2
ERR10^VENPCC1	EF+4
ERR11^VENPCC1	BEF
ERR3^VENPCC1	GO+4, GO+6
ERR5^VENPCC1	EF+5
ERR6^VENPCC1	EF+7, EF+9
ERR7^VENPCC1	HEAD+4
ERR8^VENPCC1	CFG
TXT^VENPCC1	MOJO+4, DATA
DEMO^VENPCC1A	EF+5
SPEC^VENPCC1A	EF+6
EXT^VENPCC1B	EF+10
$$CLASS^VENPCC1C	SYS+4
$$OSET^VENPCC1C	ORD
$$XSET^VENPCC1C	OSET+1, NOOSET+1, ROS+3, OLDSURV+3
ALLERG^VENPCC1C	EF+13
IF^VENPCC1C	SURV+4, NEWIMM+1
SPEC^VENPCC1C	EF+15
ARR^VENPCC1E	SURV+5, NEWSURV+1
HX^VENPCC1F	EF+14
DX^VENPCC1G	EF+7
VER22^VENPCC1G	V22
MED^VENPCC1H	EF+9
PROB^VENPCC1H	EF+8
VER25^VENPCC1L	V25
FORM^VENPCC1S	FORM
HS^VENPCC2A	HS
^VENPCCAK	ANMC, ANMC
POP^VENPCCC	CHKLST
$$OPN^VENPCCP	HEAD+7
$$CFG^VENPCCU	CFG
$$HEADER^VENPCCU	HEAD+5
MOJODATA^VENPCCW	MOJO, MOJO+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("TRAP"	PRINT+2
^AUPNPAT - [#9000001]	GO+6
^AUPNVSIT - [#9000010]	GO+2
^DIC(40.7 - [#40.7]	HDR+3
^DPT - [#2]	SYS+1
^TMP("VEN MON"	PRINT+6, HS+1!
^TMP("VEN TASK"	GO
^VA(200 - [#200]	PRINT+4
^VEN(7.4 - [#19707.4]	MRP+3, MRP+4
^VEN(7.41 - [#19707.41]	BEF, EF+2, EF+16, FORM, SYS+2, SYS+5, CHKLST
^VEN(7.42 - [#19707.42]	ORD+1, ORD+2
^VEN(7.46	MOJO+1
^VEN(7.49 - [#19707.49]	HEAD25+2, HEAD25+4, HEAD25+5
^VEN(7.5 - [#19707.5]	EF+1, HEAD+3
^VEN(7.62 - [#19707.62]	EF+15
^VEN(7.93 - [#19707.93]	OSET+1, NOOSET+1
^VEN(7.94 - [#19707.94]	ROS+1, ROS+3, OLDSURV+1, OLDSURV+3
^VEN(7.95 - [#19707.95]	PRINT+4, GO+7, HDR+2, MRP+2

Label References

Name	Line Occurrences
CFG	GO+1
HDR	EF+11
HEAD	EF+4
HEAD25	EF+3
HS	CFG+1, MOJO+4
NEWIMM	SURV+2
NEWSURV	SURV+2
OLDSURV	SURV+1, SURV+3
SYS	EF+12
TICK	CHKLST
UNPACK	PRINT+3

Naked Globals

Name	Field # of Occurrence
^(0	HDR+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	PRINT+6, NEW~, GO+5!, EF+16, UNPACK+1, UNPACK+2~, UNPACK+3, HEAD+2~, HEAD+5, HEAD+6 , HDR+1~, HDR+2, HDR+3*
%1	NEW~
%DT	NEW~
%H	GO+5!
%HELP	NEW~
%I	GO+5!
%Q	NEW~
%T	NEW~
%Y	NEW~
APPT	PRINT~, EF+5
CFIGIEN	NEW~, CFG*, EF+1, HEAD+3
CLASS	SYS+3~, SYS+4*, OSET+1, NOOSET+1, ROS+3, OLDSURV+3
CNT	HEAD25+1~, HEAD25+3, HEAD25+6, HEAD25+7
DATE	NEW~, GO+1, GO+3, GO+4, GO+5*
DEFEF	PRINT~, BEF, EF+2, EF+7, EF+12, EF+14, EF+15, EF+16, V22, V25 , ANMC, FORM, MOJO+1, HEAD+5, SYS~, SYS+2, SYS+5, CHKLST, ORD, OSET+1 , NOOSET+1, ROS+3, OLDSURV+3
DEFHS	PRINT~, HS
>> DEMODATA	EF+3, EF+4
DEPTIEN	PRINT~, PRINT+4, GO+7, EF+5, EF+7, EF+11, V22, V25, HS, HDR~ , HDR+2, MRP+2
DFN	NEW~, GO+1, GO+3, GO+6, EF+5, EF+6, EF+7, EF+8, EF+9, EF+12 , EF+13, EF+14, EF+15, V22, V25, ANMC, FORM, MOJO+4, DATA, HS , SYS~, SYS+1, SYS+4, CHKLST, OSET+1, NOOSET+1, ROS+3, SURV+5, OLDSURV+3, NEWSURV+1
DUZ(0	UNPACK+1
DUZ(2	ANMC
>> EFONLY	DATA+2
ERR	NEW~
EXT	PRINT~, EF+10
F	HEAD+2~, HEAD+6*, HEAD+7
FCIEN	NEW+1~
FFIEN	NEW+1~
HDR	HEAD25+1~
HDR25	NEW+1~, EF+2*
HGIEN	HEAD25+1~, HEAD25+2*, HEAD25+4, HEAD25+5
HIEN	HEAD25+1~, HEAD25+3, HEAD25+4, HEAD25+5, SYS+3~, ORD+1*, ORD+2
>> HSONLY	CFG+1, MOJO+4
I	UNPACK+2~, UNPACK+3, HEAD+2~, HEAD+9, HDR+1~
IEN	MRP+1~, MRP+2, MRP+3, MRP+4
>> JOB	PRINT+6, HS+1
LPFLAG	NEW+1~, GO+7*, CFG+1
MIEN	SYS+3~, ORD+3, OSET+1, NOOSET+1, ROS+2, ROS+3, OLDSURV+2, OLDSURV+3*
MMF	SYS+3~, ORD+2, OSET+1, NOOSET+1, ROS, ROS+1, ROS+3, OLDSURV, OLDSURV+1*, OLDSURV+3
MN	HEAD25+1~, HEAD25+5*, HEAD25+7
>> MOJOFLAG	PRINT+6, MOJO
MSG	NEW+1~
NAME	MRP+1~, MRP+4*, MRP+5
NEWIMM	SYS+3~, SYS+6*, SURV+1, SURV+2, SURV+4
NEWSURV	SYS+3~, SYS+5*, SURV+1, SURV+2
NOVISIT	GO+1~*
OGFLAG	CFG+1, MOJO+4!
OGONLY	MOJO+4*!, DATA+2
OSET	SYS+3~, ORD*, OSET, OSET+1
PATH2	NEW~, HEAD+3*, HEAD+4, HEAD+7
PCE	SYS+3~
PEIEN	NEW+1~
PIEN	NEW~
POP	NEW~, HEAD+7*, HEAD+8
PRV	PRINT~, PRINT+4, EF+5, EF+7, EF+9, V22, V25
SPECHOLD	EF+15~
SS	SYS+3~, ORD, OSET+1, NOOSET+1, TICK, ROS+3, OLDSURV+3
STOP	NEW+1~, EF!, EF+4, EF+5, EF+7, EF+9, DATA, HEAD+4, HEAD+8
TMP	NEW+1~, EF*, MOJO+1, MOJO+4, DATA+1, HEAD+9, HEAD25+7, HDR+4
TYPE	SYS+3~
U	PRINT+3*, GO+1, GO+3, GO+7, BEF, EF+1, EF+2, FORM, MOJO+1, UNPACK+3 , HEAD+9, HDR+2, HDR+3, MRP+2, MRP+4, SYS+5, CHKLST, ORD+2
UID	NEW+1~
VARS	PRINT~, PRINT+3!, UNPACK~, UNPACK+3
VCN	PRINT~, EF+5
>> VENDEBUG	GO
>> VENDEMO	GO+5
VER25	NEW+1~, EF+1*, EF+4
VISIT	PRINT~, GO+1*, GO+2, EF+5, V22, V25, FORM, HS
X	PRINT+2~, NEW+1~, GO+2, GO+3, GO+7, UNPACK+2~, UNPACK+3, HEAD+2~, HEAD+9, HDR+1~ , HDR+2, HDR+3, HDR+4
Y	NEW+1~, UNPACK+2~, UNPACK+3, HEAD+2~, HEAD+9

Marked Items

Name	Field # of Occurrence
$T(FORM^VENPCC1S	FORM
$T(MOJODATA^VENPCCW	MOJO
$T(POP^VENPCCC	CHKLST
$T(VER22^VENPCC1G	V22
$T(VER25^VENPCC1L	V25
$T(^VENPCCAK	ANMC

Customize PDF page

Package: PCC New Encounter Form

Routine: VENPCC10

Information

Source Information

Call Graph

Call Graph Total: 17

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items