Routine: VENPCCG2

Package	Total	Call Graph
VA Fileman	3	^DIC ^DIE ^DIK
PCC New Encounter Form	2	NARR^VENPCCG3 $$ICD^VENPCCU
IHS VA Utilities	1	^XBFMK
Kernel	1	(CLOSE,OPEN)^%ZISH

Package	Total	Caller Graph
PCC New Encounter Form	2	VENPCC1P VENPCCG

Entry Points

Name	Comments	DBIA/ICR reference
GETNARR	; get most freq. prov. narr. used for this icd code dmh 8/31/2000
CLN
END	;
FILE	; --EP-- CALLED FROM VENPCCG1
S1
ICD	;
STUFF(GIEN,PIEN,STG)	; NEW WAY TO STORE PREFERENCES
NEWAGSEX	; save out actual counts for age and sex groups not 1 or 0
INM(CODE)	;
CLEAN(GIEN,PIEN)	; CLEAN OUT THE OLD ENTRIES IN THE FILE FOR THIS PROVIDER AND ICD GROUP

External References

Name	Field # of Occurrence
CLOSE^%ZISH	END+4
OPEN^%ZISH	NEWAGSEX+3
^DIC	STUFF+22
^DIE	S1+4
^DIK	CLEAN+11
NARR^VENPCCG3	GETNARR+9
$$ICD^VENPCCU	INM+2
^XBFMK	FILE+7, CLEAN+13

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Creating text files......" Line Location: FILE+3
Function Call: WRITE	Prompt: !!,"Saving new preference list..." Line Location: CLN+0
Function Call: WRITE	Prompt: OUTREC,! Line Location: CLN+12
Function Call: WRITE	Prompt: !!,"Cleaning out this user's old preference list..." Line Location: CLEAN+1
Routine Call	DIE Line Location: S1+4
Routine Call	DIC Line Location: STUFF+22

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^VEN(7.34 - [#19707.34]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUTNPOV - [#9999999.27]	GETNARR+8
^ICD9 - [#80]	ICD+13, INM+3
^TMP("VEN PREF"	FILE+6!
^VA(200 - [#200]	CLEAN+4, STUFF+3
^VEN(7.33 - [#19707.33]	CLEAN+3, STUFF+2
^VEN(7.34 - [#19707.34]	CLEAN+6, CLEAN+7, STUFF+19, S1+4

Label References

Name	Line Occurrences
$$INM	CLN+6
CLEAN	CLN
GETNARR	ICD+14
ICD	FILE+4
S1	STUFF+19
STUFF	CLN+11

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	INM+1~, INM+2, INM+3, INM+4
AF	STUFF+4~, STUFF+15*
AG	NEWAGSEX+13, NEWAGSEX+14, NEWAGSEX+16, NEWAGSEX+18, NEWAGSEX+19, NEWAGSEX+21, END+1!
>> AGEBUK	ICD+15, ICD+16, ICD+17, ICD+19
>> AGESEX	ICD+20, ICD+22, ICD+23, ICD+25
AM	STUFF+4~, STUFF+14*
>> C	CLN+1, CLN+2, CLN+3, CLN+4, CLN+6, CLN+8
CHLD	STUFF+4~, STUFF+11*
CODE	ICD+13, ICD+19, ICD+21, ICD+25, NEWAGSEX+17, NEWAGSEX+18*, NEWAGSEX+19, NEWAGSEX+20, NEWAGSEX+21, END+1! , INM~, INM+2
CT	NEWAGSEX+14, NEWAGSEX+16, NEWAGSEX+18, NEWAGSEX+22, END+1!
DA	CLEAN+2~, CLEAN+5, CLEAN+6, CLEAN+7, STUFF+5~, STUFF+19, STUFF+23, S1+4
DES	ICD+18, ICD+19, ICD+24, ICD+25, NEWAGSEX+15, NEWAGSEX+16, NEWAGSEX+18, NEWAGSEX+19, NEWAGSEX+21, END+1!
>> DESALL	ICD+11*, ICD+12, ICD+21
DIC	STUFF+5~, STUFF+20*, S1
DIC(0	STUFF+20*
DIE	STUFF+5~, S1*
DIK	CLEAN+2~, CLEAN+5*, STUFF+5~
>> DLAYGO	STUFF+20*
DR	STUFF+5~, S1+1, S1+2, S1+3*
>> DXPRV	CLN, CLN+11
FREQ	END+1!
GIEN	CLEAN~, CLEAN+3, CLEAN+10, STUFF~, STUFF+2, STUFF+18
>> I	CLN+9*
ICD	STUFF+4~, STUFF+7*, STUFF+18
ICDNAME	CLN+6*, CLN+8, END+1!
>> ICDPTR	ICD+8, ICD+9, ICD+10, ICD+12, ICD+13, ICD+16, ICD+17, ICD+22, ICD+23, GETNARR+3 , GETNARR+4
ICDTXT	STUFF+4~, STUFF+9*
INF	STUFF+4~, STUFF+10*
IO	NEWAGSEX+4
MOST	GETNARR+1!, GETNARR+5, GETNARR+6
>> MOSTPNP	GETNARR+5, GETNARR+6, GETNARR+8
NAME	ICD+19, ICD+25, NEWAGSEX+19, NEWAGSEX+20, CLN+5, CLN+8, END+1!, GETNARR+10*
>> NARR	GETNARR+8*, GETNARR+10
>> NEWDXP	FILE+3, NEWAGSEX+2, CLN, CLN+11, END+2
OUTREC	CLN+8, CLN+9, CLN+10*, CLN+11, CLN+12, END+1!
>> PATH	NEWAGSEX+3
PIEN	CLEAN~, CLEAN+4, CLEAN+9, STUFF~, STUFF+3, STUFF+18, STUFF+21
>> PNP	GETNARR+2, GETNARR+3, GETNARR+4, GETNARR+5, GETNARR+6
>> POP	NEWAGSEX+3
>> PROVFLG	ICD+2, ICD+3, CLN+10
PVAL	CLN+9*, END+1!
>> QUIET	CLN, CLEAN+1
REC	CLN+3*, CLN+5, CLN+7, END+1!
RECA	CLN+4*, CLN+9, END+1!
SF	STUFF+4~, STUFF+17*
SM	STUFF+4~, STUFF+16*
STG	STUFF~, STUFF+1, STUFF+7, STUFF+8, STUFF+9, STUFF+10, STUFF+11, STUFF+12, STUFF+13, STUFF+14 , STUFF+15, STUFF+16, STUFF+17
T	STUFF+4~, STUFF+6*, STUFF+7, STUFF+8, STUFF+9, STUFF+10, STUFF+11, STUFF+12, STUFF+13, STUFF+14 , STUFF+15, STUFF+16, STUFF+17
TF	STUFF+4~, STUFF+13*
TM	STUFF+4~, STUFF+12*
>> TMP	FILE+2, FILE+5, ICD+2, ICD+6, ICD+7, ICD+9, ICD+10, ICD+12, ICD+16, ICD+17 , ICD+19, ICD+21, ICD+22, ICD+23, ICD+25, NEWAGSEX+1, NEWAGSEX+6, NEWAGSEX+14, NEWAGSEX+16, NEWAGSEX+18 , NEWAGSEX+19, NEWAGSEX+20, NEWAGSEX+21*, CLN+2, CLN+3, CLN+4, END+3, GETNARR+3, GETNARR+4
TOT	ICD+10, ICD+11, ICD+17, ICD+18, ICD+23, ICD+24, CLN+7, CLN+10, END+1!
>> TOTPN	GETNARR+4*, GETNARR+5, GETNARR+6
TXT	STUFF+4~, STUFF+8*
U	CLEAN+10, INM+3
UID	STUFF+4~, STUFF+18*, STUFF+19
>> VENFLNO	NEWAGSEX+1*, NEWAGSEX+3, END+3
VENIO	FILE+2~, NEWAGSEX+4*, CLN+12, END+4
X	CLEAN+2~, CLEAN+7, CLEAN+8, CLEAN+9, CLEAN+10, STUFF+5~, STUFF+21
Y	STUFF+5~, STUFF+22, STUFF+23

Customize PDF page

Package: PCC New Encounter Form

Routine: VENPCCG2

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: