Routine: VENPCCQ

Package	Total	Call Graph
VA Fileman	2	^DIC ^DIE
IHS VA Utilities	1	^XBFMK
Kernel	1	($$FMADD,$$FMDIFF,$$FMTE)^XLFDT
PCC New Encounter Form	1	$$NDT^VENPCCQ

Package	Total	Caller Graph
PCC New Encounter Form	3	VENPCCQ VENPCCQ1 VENPCCQ2

Entry Points

Name	Comments	DBIA/ICR reference
DOBAGE(DFN,DATE)	; EP - GIVEN A DFN, RETURN THE DOB AGE IN MONTHS
NAME(X)	; EP - FROM TRIGGER IN VEN EHP KB ASQ FILE ; CONVERT # MOS TO ASQ FILE NAME
ASQAGE(DFN,DATE)	; EP - GIVEN A DFN AND REFERENCE DATE (DEFAULTS TO TODAY), RETURN THE ASQ AGE IN MM.DD FORMAT; E.G., "30.15"
ASQNOW	; EP -GET TODAYS ASQ MONTH AND CUTOFF SCORES
INT(OUT,IN)	; EP - RPC: VEN ASQ INTERVENTION FORM ; GIVEN A DFN, RETURNT THE NAME OF THE APPROPRIATE ASQ INTERVENTION FORM
ASQ	; EP - GET ASQ SCORES IN u40-u52 ; WCM UPGRADE
AD1	; DEAD CODE FROM ASQ VER 2.0
ASQDTR(DFN)	; EP - GIVEN A DFN RETURN THE DATE RANGE FOR THE NEXT ASQ
A1
INIT
A2
ASQIEN(M)	; EP - GIVEN THE ASQ AGE IN MONTHS, RETURN THE CURRENT ASQ FORM IEN^IEN OF THE NEXT FORM ; REVISED FOR ASQ3
ITEMS
NDT(DOB,AGE)	; ADD MM.DD TO AN FM DOB
UGA(OUT,IN)	; EP - RPC: VEN ASQ UPDATE GESTATIONAL AGE ; GIVEN ASQ DFN AND GA VALUE (DFN\|VAL), UPDATE THE TX FILE AND RPMS
HOLD(OUT,IN)	; EP - POPULATE THE ASQ HOLDING FILE ; IN=PATIENT DFN, OUT="IEN1~IEN2" ; DEAD CODE
AIEN
PATIENT(OUT,IN)	; EP - RPC: VEN ASQ GET PATIENT ID ; GIEN A CHART #, RETURN PATIENT IDENTIFIERS
DATA(OUT,IN)	; EP - RPC: VEN ASQ GET DATA ; IN = DFN
M(DOB)
ASQDOB(DFN)	; EP - GIVEN A DFN, RETURN THE ADJUSTED (ASQ) DOB
ASQX	; EP - MEASUREMENT VALIDATION - VALIDATE ASQ SCORE
PLK	; EP - FOR ALT PROCESSING OF HRN
PAGE
GA(DFN,GA)	; EP - FILE THE GA

Name	Field # of Occurrence
^DIC	GA+3, PLK+1
^DIE	GA+5
$$NDT^VENPCCQ	VENPCCQ+5
^XBFMK	GA+6, PLK+9
$$FMADD^XLFDT	ASQDOB+6, NDT+11
$$FMDIFF^XLFDT	A1+13
$$FMTE^XLFDT	ASQ+9, ITEMS+6, ITEMS+7, ITEMS+8, PAGE, PLK+5

Name	Line Occurrences
Function Call: WRITE	Prompt: $$NDT^VENPCCQ(3050101,30.15) Line Location: VENPCCQ+5
Function Call: WRITE	Prompt: !,$$ASQIEN(M) Line Location: VENPCCQ+6
Routine Call	DIE Line Location: GA+5
Routine Call	DIC Line Location: GA+3 PLK+1

RPC Name	Call Tags
VEN ASQ GET PATIENT ID	PATIENT
VEN ASQ GET DATA	DATA
VEN ASQ GET INTERVENTION FORM	INT
VEN ASQ UPDATE GESTATIONAL AGE	UGA

FileNo	Call Tags
^AUPNPAT - [#9000001]	Classic Fileman Calls
^AUPNBMSR - [#9000024]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^AUPNBMSR - [#9000024]	ASQDOB+5, PAGE+8, HOLD+4, GA+5, PLK+7
^AUPNPAT - [#9000001]	PAGE+1
^AUPNVSIT - [#9000010]	ASQ+8
^AUPNVWC - [#9000010.46]	ASQ+5, ASQ+7
^AUPNVWC("AA"	ASQ+2, ASQ+4
^DIC(5 - [#5]	PAGE+6
^DPT - [#2]	INT+3, DOBAGE+4, ASQDOB+2, INIT, PAGE+2, PAGE+3, PAGE+4, PAGE+5, PAGE+6, PAGE+7 , HOLD+3, HOLD+4, PLK+4, PLK+6, UGA+6
^VEN(7.14 - [#19707.14]	ASQ+15, ASQNOW+3, ASQIEN+6, ASQIEN+7, ASQIEN+8, ASQIEN+9, AIEN+8, AIEN+9, AIEN+10, AIEN+11 , AIEN+12, AIEN+13, AIEN+14, AIEN+15, ASQDTR+6, AD1+1, ITEMS+12, ITEMS+14

Name	Line Occurrences
$$ASQAGE	ASQNOW+1, INT+5, ASQDTR+3, ITEMS+10
$$ASQDOB	ASQAGE+3, ASQDTR+2, ITEMS+4
$$ASQDTR	PAGE
$$ASQIEN	VENPCCQ+6, ASQNOW+2, ASQDTR+4, ITEMS+11
$$DOBAGE	ASQDOB+4
$$M	VENPCCQ+6
$$NDT	ASQDTR+8
A1	M
A2	ASQDOB+4
AD1	AD1+2, AD1+13
GA	UGA+8
PAGE	ITEMS+10, ITEMS+11

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	ASQ+5, ASQ+6, ASQ+12, ASQNOW+3, ASQNOW+4, ASQNOW+5, ASQNOW+6, ASQNOW+7, ASQNOW+8, ASQNOW+9 , INT+4~, INT+5, INT+6, ASQDOB+1~, ASQDOB+6, ASQIEN+2~, ASQIEN+9, ASQDTR+1~, ASQDTR+4, ASQDTR+5 , ASQDTR+6, ASQDTR+7, NDT+3~, DATA+3~, ITEMS+2, ITEMS+3, GA+1~, PATIENT+3~, UGA+5~, ASQX+1~ , ASQX+2, ASQX+3, ASQX+4, ASQX+5
AGE	ASQIEN+2~, ASQIEN+5, ASQIEN+6, ASQIEN+7, ASQIEN+9, NDT~, NDT+1, NDT+4, NDT+5
>> AGE1	ASQDTR+7*, ASQDTR+8
>> AGE2	ASQDTR+7*, ASQDTR+8
ASQ	DATA+3~, ITEMS+9, ITEMS+12, ITEMS+13, PAGE+9
ASQM	ASQDTR+1~, AD1+1*, AD1+2, AD1+4
AUPNDAYS	PATIENT+3~
AUPNDOB	PATIENT+3~, PLK+5
AUPNDOD	PATIENT+3~, PLK+2
AUPNPAT	PATIENT+3~, PLK+3, PLK+4, PLK+6, PLK+7, PLK+8
AUPNSEX	PATIENT+3~, PLK+8
B	DATA+3~, INIT+2, PAGE+9, PATIENT+3~, PATIENT+4, PLK+8
BDT	ASQAGE+1~, A1+12*, A1+13
CDOB	DATA+3~, ITEMS+4, ITEMS+5, ITEMS+7*, PAGE+9
CHART	DATA+3~, INIT+1, PAGE+1, PAGE+9
CITY	DATA+3~, INIT+1, PAGE+5, PAGE+9
D	ASQDTR+1~, NDT+3~, NDT+5, NDT+11, AD1+3, AD1+12
D1	M~, ASQAGE+1~, A1, A1+5, A1+11, A1+12, DOBAGE+3~, DOBAGE+5*, DOBAGE+10
D2	M~, ASQAGE+1~, A1+2, A1+5, DOBAGE+3~, DOBAGE+7, DOBAGE+10
DA	GA+1~, GA+4*, GA+5
DATE	ASQAGE~, ASQAGE+2, A1+1, A1+2, A1+13, DOBAGE~, DOBAGE+6, DOBAGE+7, ASQDTR+1~
DDT	ASQAGE+1~, A1+13, A1+14, A1+15
DFN	ASQ+2, ASQ+4, ASQNOW+1, INT+4~, INT+5, ASQAGE~, ASQAGE+3, DOBAGE~, DOBAGE+1, DOBAGE+4 , ASQDOB~, ASQDOB+2, ASQDOB+4, ASQDOB+5, ASQDTR~, ASQDTR+2, ASQDTR+3, DATA+3~, INIT+2, ITEMS+4 , ITEMS+10, PAGE, PAGE+1, PAGE+2, PAGE+3, PAGE+4, PAGE+5, PAGE+6, PAGE+7, PAGE+8 , HOLD+3, HOLD+4, GA~, GA+2, UGA+5~, UGA+6, UGA+8
DIC	GA+1~, GA+2, GA+4, PATIENT+5
DIC(0	GA+2, PATIENT+5
DIE	GA+1~, GA+4*
>> DLAYGO	GA+2*
DOB	VENPCCQ+6~, M~, ASQAGE+1~, ASQAGE+3, A1, DOBAGE+3~, DOBAGE+4, DOBAGE+5, ASQDOB+1~, ASQDOB+2 , ASQDOB+3, ASQDOB+6, A2, A2+1, ASQDTR+1~, ASQDTR+2, ASQDTR+8, NDT~, NDT+1, NDT+6 , NDT+7, NDT+10, AD1+3, DATA+3~, ITEMS+1, ITEMS+5, ITEMS+6, PAGE+9, HOLD+4, PATIENT+3~ , PLK+5, PLK+8
DR	GA+1~, GA+4*
DT	ASQAGE+2, A1+1, DOBAGE+1, DOBAGE+6, A2, AD1+13, ITEMS+8
DT1	NDT+3~, NDT+10*, NDT+11
DUZ(2	PAGE+1
FIN	ASQDTR+1~, ASQDTR+8, ASQDTR+9, AD1+12, AD1+14
>> FMDT	ASQ+8*, ASQ+9
GA	ASQDOB+1~, ASQDOB+5, ASQDOB+6, DATA+3~, INIT+2, PAGE+8, PAGE+9, HOLD+4, HOLD+5, GA~ , PATIENT+3~, PLK+7, PLK+8, UGA+5~, UGA+7, UGA+8
HRN	PATIENT+3~, PATIENT+4*, PATIENT+5
>> IDT	ASQ+1, ASQ+2, ASQ+4
IEN	ASQIEN+2~, ASQIEN+7, ASQIEN+8, ASQIEN+12, AIEN+1, AIEN+3, AIEN+8, AIEN+9, AIEN+10, AIEN+11 , AIEN+12, AIEN+13, AIEN+14, AIEN+15, ASQDTR+1~, ASQDTR+5, ASQDTR+6, AD1+1, AD1+2, AD1+13*
IEN2	ASQIEN+2~, AIEN+2, AIEN+3, AIEN+7, AIEN+9, AIEN+11, AIEN+13, AIEN+15
IN	INT~, INT+3, INT+5, DATA~, INIT, INIT+2, HOLD~, HOLD+3, PATIENT~, PATIENT+2 , PATIENT+4, UGA~, UGA+3, UGA+6, UGA+7
ISTG	ASQIEN+2~, ASQIEN+5, ASQIEN+12, AIEN+1, AIEN+2
ISTG2	ASQIEN+2~
M	VENPCCQ+6~, M~, ASQNOW+1, ASQNOW+2, ASQAGE+1~, A1+6, A1+7, A1+8, A1+15, DOBAGE+3~ , DOBAGE+11, DOBAGE+12, ASQIEN~, ASQIEN+3, ASQIEN+4, AIEN, AIEN+6, AIEN+8, AIEN+9, AIEN+10 , AIEN+12, AIEN+14, AIEN+15, ASQDTR+1~, ASQDTR+3, ASQDTR+4, NDT+3~, NDT+4, NDT+6, NDT+7 , AD1+2, AD1+3, AD1+4, AD1+5, AD1+6, AD1+9, DATA+3~, ITEMS+10*, ITEMS+11
M1	M~, ASQAGE+1~, A1, A1+3, A1+4, A1+8, DOBAGE+3~, DOBAGE+5, DOBAGE+8, DOBAGE+9
M2	M~, ASQAGE+1~, A1+2, A1+3, A1+4, DOBAGE+3~, DOBAGE+7, DOBAGE+8, DOBAGE+9
MD	M~, ASQAGE+1~, A1+4, A1+5, A1+6, DOBAGE+3~, DOBAGE+9, DOBAGE+10, DOBAGE+11
MDT	ASQAGE+1~, A1+8, A1+9, A1+10*, A1+12
MF	ASQDTR+1~, AD1+9, AD1+10, AD1+11*, AD1+12
>> MN	ASQ+13*, ASQ+14, ASQ+16
MOM	DATA+3~, INIT+1, PAGE+2, PAGE+9, PATIENT+3~, PLK+6*, PLK+8
>> MONTH	ITEMS+9, ITEMS+13, PAGE+9
MS	ASQDTR+1~, AD1+6, AD1+7, AD1+8*, AD1+12
NAME	INT+4~, DATA+3~, ITEMS, PAGE+9, PATIENT+3~, PLK+4, PLK+8
NDT	NDT+3~, NDT+11*, NDT+12
NEXT	DATA+3~, INIT+1, PAGE, PAGE+9
NM	NDT+3~, NDT+7, NDT+8, NDT+9*, NDT+10
NY	NDT+3~, NDT+6, NDT+8, NDT+10
OUT	INT~, INT+2, INT+10, DATA~, DATA+2, PAGE+9, HOLD~, HOLD+3, PATIENT~, PATIENT+4 , PLK+8, UGA~, UGA+2, UGA+9*
PAGE	DATA+3~, ITEMS+9, ITEMS+14, PAGE+9
PCE	ASQ+11, ASQ+12, ASQ+15, ASQIEN+2~, ASQIEN+5, ASQIEN+10, ASQIEN+11, ASQIEN+12, AIEN, AIEN+1 , AIEN+2
PHONE	DATA+3~, INIT+1, PAGE+3, PAGE+9
>> QIEN	ASQNOW+2*, ASQNOW+3
REF	UGA+5~
REL	DATA+3~, INIT+1, PAGE+2, PAGE+9
SEX	DATA+3~, ITEMS+3*, PAGE+9
START	ASQDTR+1~, ASQDTR+8, ASQDTR+9, AD1+12, AD1+13, AD1+14
STATE	DATA+3~, INIT+1, PAGE+6, PAGE+9
STG	ASQIEN+2~, ASQIEN+5, ASQIEN+11, AIEN, DATA+3~, INIT*, ITEMS, ITEMS+1, ITEMS+2
STOP	ASQ+1, ASQ+2, ASQ+4, ASQ+10, ASQIEN+2~, ASQIEN+8*, ASQIEN+11
STREET	DATA+3~, INIT+1, PAGE+4, PAGE+9
>> TMP	ASQ+10, ASQ+14, ASQ+16, ASQNOW+4, ASQNOW+5, ASQNOW+6, ASQNOW+7, ASQNOW+8, ASQNOW+9
TODAY	DATA+3~, ITEMS+8*
U	ASQ+7, ASQ+12, ASQ+15, ASQNOW+4, ASQNOW+5, ASQNOW+6, ASQNOW+7, ASQNOW+8, ASQNOW+9, DOBAGE+4 , ASQDOB+2, ASQDOB+5, ASQIEN+8, ASQIEN+11, ASQIEN+12, AIEN, AIEN+1, AIEN+2, AIEN+3, AIEN+9 , AIEN+11, AIEN+13, AIEN+15, ASQDTR+5, ASQDTR+7, ASQDTR+9, AD1+14, ITEMS, ITEMS+1, ITEMS+2 , ITEMS+14, PAGE, PAGE+2, PAGE+3, PAGE+4, PAGE+5, PAGE+6, PAGE+7, PAGE+8, HOLD+4 , PLK+4, PLK+6, PLK+7
>> VDT	ASQ+9*, ASQ+10
>> VIEN	ASQ+7*, ASQ+8
>> WCIEN	ASQ+3, ASQ+4, ASQ+5, ASQ+7
X	ASQ+12, ASQ+15, ASQ+16, NAME~, NAME+2, NAME+3, NAME+4, NAME+5, INT+4~, INT+6* , INT+7, INT+8, INT+10, ASQIEN+2~, AIEN+10, AIEN+11, AIEN+12, AIEN+13, AIEN+14, NDT+3~ , DATA+3~, ITEMS+11, ITEMS+12, ITEMS+14, PAGE, PAGE+1, PAGE+2, PAGE+3, PAGE+4, PAGE+5* , PAGE+6, PAGE+7, PAGE+8, GA+1~, GA+2, PATIENT+3~, PATIENT+5*, UGA+5~, ASQX+2, ASQX+3! , ASQX+4, ASQX+5!
>> XGA	HOLD+5*
Y	INT+4~, INT+7, INT+9, INT+10, ASQIEN+2~, AIEN+9, AIEN+11, AIEN+13, AIEN+15, ASQDTR+1~ , NDT+3~, AD1+3, AD1+4, AD1+5*, AD1+6, AD1+9, DATA+3~, GA+1~, GA+3, GA+4 , PATIENT+3~, PLK+1, UGA+5~, ASQX+1~
Y1	M~, ASQAGE+1~, A1, A1+4, A1+7, DOBAGE+3~, DOBAGE+5, DOBAGE+9
Y2	M~, ASQAGE+1~, A1+2, A1+3, A1+4, DOBAGE+3~, DOBAGE+7, DOBAGE+8, DOBAGE+9
YD	M~, ASQAGE+1~, A1+4, A1+6, DOBAGE+3~, DOBAGE+9, DOBAGE+11
YDT	ASQAGE+1~, A1+7, A1+9, A1+12
YF	ASQDTR+1~, AD1+9, AD1+10, AD1+12
YS	ASQDTR+1~, AD1+6, AD1+7, AD1+12
Z	ASQ+10, ASQ+13, INT+4~, ASQIEN+2~, AIEN*, NDT+3~, DATA+3~, UGA+5~, ASQX+1~
ZIP	DATA+3~, INIT+1, PAGE+7, PAGE+9

Customize PDF page

Package: PCC New Encounter Form

Routine: VENPCCQ

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

Used in RPC

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: