Routine: VENPCC1E

Package	Total	Call Graph
PCC New Encounter Form	3	$$OPN^VENPCCP DEL^VENPCCP1 $$CFG^VENPCCU
Kernel	2	$$STATUS^%ZISH ($$FMADD,$$FMTE)^XLFDT
Patient Care Component	2	SURV^APCHS11 ($$INAC,INAC)^APCHSMU
VA Fileman	2	^%DT ^DIC

Package	Total	Caller Graph
PCC New Encounter Form	1	VENPCC10

Entry Points

Name	Comments	DBIA/ICR reference
EXDT(DATE,A)	; EP-EXTERNAL DATE TO INTERNAL FM FORMAT. IF A=1, RETURN DAY ONLY
ITEM(DFN)	; EP-GET EACH ITEM AND STORE RESULTS
STRIP(X)	; EP-STRIP BLANKS OFF THE END
REF(DFN,DEFEF)	; EP - PATIENT REFUSALS (h1 - h8)
MAMMO(DFN,IDATE)	; EP-GIVEN A DFN, RETURN THE LAST MAMMOGRAM h4
LAST(DFN,TYPE,DATE)	; EP-RETURN THE LAST VALUE FOR A PATIENT ON A GIVEN DATE
CREF(FILE)	; EP-GIVEN A V FILE NUMBER, RETURN THE CLOSED REF
LINE	; EP-INC LINE
RAW(APCHSPAT,APCHSTYP)	; EP-GET RAW HMR TEXT
ARR(DFN)	; EP-SAVE SURVEILANNCE INFO IN A TMP ARRAY

External References

Name	Field # of Occurrence
^%DT	EXDT+3
$$STATUS^%ZISH	LINE+2
SURV^APCHS11	RAW+4
$$INAC^APCHSMU	MAMMO+3
INAC^APCHSMU	MAMMO+3
^DIC	LAST+15
$$OPN^VENPCCP	ARR+9, ARR+10
DEL^VENPCCP1	ARR+11
$$CFG^VENPCCU	ARR+6
$$FMADD^XLFDT	REF+8
$$FMTE^XLFDT	REF+19

Interaction Calls

Name	Line Occurrences
Function Call: READ	Timeout: 30 Variable: X Line Location: LINE+2
Routine Call	DIC Line Location: LAST+15

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^APCHSCTL("B"	ARR+5
^APCHSURV("B"	LAST+4, LAST+5, MAMMO+2
^AUPNPREF - [#9000022]	REF+16
^AUPNPREF("AA"	LAST+45, REF+1, REF+11, REF+13, REF+14, REF+15
^AUPNVLAB - [#9000010.09]	LAST+25
^AUPNVSK - [#9000010.12]	LAST+33
^AUPNVXAM - [#9000010.13]	LAST+40
^BWPCD - [#9002086.1]	MAMMO+7, MAMMO+12
^BWPCD("AA"	MAMMO+6
^BWPCD(0	MAMMO+3
^DIC - [#1]	CREF+2, LAST+12
^DPT - [#2]	ARR+2, ARR+3
^TMP("VEN PRNT"	ITEM+2, REF+3
^TMP("VEN SURV"	ITEM+3
^VEN(7.41 - [#19707.41]	REF+4
^VEN(7.5 - [#19707.5]	ARR+6
^VEN(7.96 - [#19707.96]	LAST+4, LAST+6, LAST+13, LAST+14

Label References

Name	Line Occurrences
$$CREF	LAST+20
$$EXDT	LAST+9
$$LAST	ITEM+14
$$STRIP	ITEM+8, ITEM+10, ITEM+12
ITEM	ARR+12
REF	ARR+13

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	ARR+1~, ARR+3, ARR+4, LAST+3~, LAST+4, LAST+6, ITEM+1~, MAMMO+1~, MAMMO+3, MAMMO+7 , MAMMO+8, REF+2~, REF+18*, REF+19
%DT	EXDT+1~, EXDT+2*, LAST+3~
%T	RAW+1~
%Y	RAW+1~
A	EXDT~, EXDT+5
AGE	ARR+1~, ARR+4*, ARR+5
AMQQTAXN	RAW+1~
APCHSBRK	RAW+1~, RAW+3*
APCHSBWR	RAW+1~
APCHSCKP	RAW+1~, RAW+3*
APCHSCVD	RAW+1~, RAW+2*
APCHSERR	RAW+1~
APCHSNPG	RAW+1~, RAW+3*
APCHSPAT	RAW~
APCHSTYP	RAW~
CNT	ITEM+1~, ITEM+5, ITEM+14, ITEM+18, REF+2~, REF+10, REF+13, REF+14, REF+15, REF+20 , REF+21
CREF	LAST+3~, LAST+20*, LAST+22
DATE	EXDT~, EXDT+2, LAST~, LAST+1, LAST+9, ITEM+1~, ITEM+10, ITEM+11, ITEM+14, ITEM+15 , REF+2~, REF+19*, REF+21
DAYS	REF+2~, REF+7*, REF+8
DDH	RAW+1~, LAST+3~
DEFEF	ARR+13, REF~, REF+4
DFN	ARR~, ARR+2, ARR+3, ARR+7, ARR+11, ARR+12, ARR+13, LAST~, LAST+1, LAST+22 , LAST+45, ITEM~, ITEM+14, MAMMO~, MAMMO+6, REF~, REF+1, REF+11, REF+13, REF+14 , REF+15
DIC	LAST+3~, LAST+12*
DIC(0	LAST+12*
DT	ARR+4, REF+8
E	RAW+1~
FIEN	REF+2~, REF+13*, REF+14, REF+15
FILE	ARR+1~, ARR+7, ARR+9, ARR+10, CREF~, CREF+2, LAST+3~, LAST+6, LAST+7, LAST+12 , LAST+45, REF+2~, REF+10, REF+11, REF+12, REF+13, REF+14, REF+15
FORC	ITEM+1~, ITEM+12, ITEM+13, ITEM+17
GBL	ITEM+1~, ITEM+3*, ITEM+6, ITEM+7
HSIEN	ARR+1~, ARR+5*
I	LINE+1~, LINE+5, ITEM+1~, ITEM+4, STRIP+1~, STRIP+3, STRIP+4
IDATE	LAST+3~, LAST+10, LAST+22, LAST+45, MAMMO~, MAMMO+5, MAMMO+6
IDT	REF+2~, REF+14*, REF+15
IOM	ARR+1~, ARR+8*
IOSL	ARR+1~, ARR+8*
IOST	ARR+1~, ARR+8*
LDT	LAST+3~, LAST+9*, LAST+10
LIEN	LAST+3~, LAST+12, LAST+13, LAST+14
LINE	ARR+1~, ITEM+1~, ITEM+5, ITEM+6, ITEM+7
LUV	LAST+3~, LAST+12, LAST+16, LAST+17*, LAST+19, LAST+21
MAXDT	REF+2~
MIDT	REF+2~, REF+8*, REF+14
MOS	REF+2~, REF+5, REF+6, REF+7
OREF	LAST+3~
PATH	ARR+1~, ARR+6*, ARR+9, ARR+10, ARR+11
PCE	LAST+3~, LAST+21*
PIEN	MAMMO+1~, MAMMO+2, MAMMO+6, MAMMO+7, MAMMO+9
POP	ARR+1~, ARR+9, ARR+10
PTED	REF+2~, REF+9*, REF+12
RES	LAST+3~, LAST+25, LAST+28, LAST+29, LAST+34, LAST+35, LAST+36
RIEN	REF+2~, REF+15*, REF+16
SDATE	LAST+3~
SIEN	LAST+3~, LAST+5*, LAST+6, LAST+13, LAST+14
SPEC	LAST+3~, LAST+6*, LAST+11
STG	ITEM+1~, ITEM+7, ITEM+8, ITEM+10, ITEM+12, ITEM+15, ITEM+16, ITEM+17, ITEM+18, REF+2~ , REF+4*, REF+5, REF+9
STOP	MAMMO+1~, MAMMO+5, MAMMO+6, MAMMO+9, MAMMO+11, MAMMO+12
TIEN	LAST+3~, LAST+21*, LAST+22, LAST+45
TMP	LINE+5, ARR+1~, ARR+7, ARR+14, ITEM+1~, ITEM+2, ITEM+4, ITEM+18, REF+2~, REF+3* , REF+21
TOT	REF+2~
TYPE	LAST~, LAST+1, LAST+4, LAST+5, LAST+26, ITEM+1~, ITEM+8*, ITEM+14, ITEM+15
U	ARR+3, LAST+6, LAST+16, LAST+21, LAST+25, LAST+33, LAST+40, MAMMO+7, MAMMO+12, REF+5 , REF+9, REF+17, REF+18
UNITS	LAST+3~, LAST+6*, LAST+27
VAL	LAST+21, LAST+22, LAST+23!, LAST+25, LAST+26, LAST+27, LAST+28, LAST+29, LAST+30!, LAST+33 , LAST+35, LAST+36, LAST+37!, LAST+40, LAST+41!, LAST+42, LAST+45, LAST+47, ITEM+1~, ITEM+14 , ITEM+16, MAMMO+1~, MAMMO+12*, MAMMO+13, MAMMO+14
VFILE	LAST+3~, LAST+6*, LAST+7, LAST+20, LAST+24, LAST+32, LAST+39
VIEN	LAST+3~, LAST+22*, LAST+25, LAST+33, LAST+40, REF+2~
WHAT	REF+2~, REF+17*, REF+21
X	LINE+1~, LINE+2, LINE+3, LINE+4, LINE+5, CREF+1~, CREF+2, CREF+3, CREF+4, CREF+5 , EXDT+1~, EXDT+2, LAST+3~, LAST+11, LAST+14, LAST+33, LAST+34, ITEM+1~, ITEM+8, ITEM+10* , ITEM+12, STRIP~, STRIP+2, STRIP+3, STRIP+4, MAMMO+1~, REF+2~, REF+16*, REF+17, REF+18
Y	EXDT+1~, EXDT+4, EXDT+5, EXDT+6, LAST+3~, LAST+15, LAST+17, ITEM+1~, STRIP+1~, STRIP+3

Marked Items

Name	Field # of Occurrence
$T(INAC^APCHSMU	MAMMO+3

Customize PDF page

Package: PCC New Encounter Form

Routine: VENPCC1E

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items