Routine: PXCE

Call Graph Total: 19

Package	Total	Call Graph
PCE Patient Care Encounter	9	$$SOURCE^PXAPIUTL GETVIEN^PXCEAE DATE9S^PXCEDATE EN^PXCEEXP PAUSE^PXCEHELP (MAKELIST,NEWHOSL1)^PXCENEW (NEWPAT1,PATKILL)^PXCEPAT ($$SELAPPM,FNL)^PXCESDAM $$PKG2IEN^VSIT
Registration	4	KVA^VADPT EN^VALM ($$SETSTR,FULL)^VALM1 CLEAN^VALM10
Scheduling	3	EN^SDGAF $$PCLINE^SDPPTEM ($$COLLAT,$$ELSTAT,$$MHCLIN,$$NEWGAF)^SDUTL2
VA Fileman	2	C^%DTC ^DIR
Kernel	1	$$FMTE^XLFDT

Package

Total

Call Graph

$$SOURCE^PXAPIUTL GETVIEN^PXCEAE DATE9S^PXCEDATE EN^PXCEEXP PAUSE^PXCEHELP (MAKELIST,NEWHOSL1)^PXCENEW (NEWPAT1,PATKILL)^PXCEPAT ($$SELAPPM,FNL)^PXCESDAM
$$PKG2IEN^VSIT

Registration

KVA^VADPT EN^VALM ($$SETSTR,FULL)^VALM1 CLEAN^VALM10

Scheduling

EN^SDGAF $$PCLINE^SDPPTEM ($$COLLAT,$$ELSTAT,$$MHCLIN,$$NEWGAF)^SDUTL2

VA Fileman

C^%DTC ^DIR

Kernel

$$FMTE^XLFDT

Package	Total	Caller Graph
PCE Patient Care Encounter	10	PXCE ENCOUNTER DATA ENTRY PXCE ENCOUNTER ENTRY & DELETE PXCE ENCOUNTER ENTRY NO DELETE PXCE ENCOUNTER ENTRY SUPER PXCE ENCOUNTER VIEWER PXCEAE PXCEEXP PXCEINTR PXCENEW PXCEPAT

Package

Total

Caller Graph

PCE Patient Care Encounter

PXCE ENCOUNTER DATA ENTRY PXCE ENCOUNTER ENTRY & DELETE PXCE ENCOUNTER ENTRY NO DELETE PXCE ENCOUNTER ENTRY SUPER PXCE ENCOUNTER VIEWER PXCEAE PXCEEXP PXCEINTR
PXCENEW PXCEPAT

Entry Points

Name	Comments	DBIA/ICR reference
ASKLOOP
HDR	; -- header code
SKIP
EN1(PXCEKEYS)	;Does not checks for provider
START1	;
EN(PXCEKEYS)	;Checks for provider
EXPND	; -- expand code
SEL1(HELP,PXCEADD)	; Select 1 visit ; If the $GET(PXCEADD) is non zero then will ; add to the prompt "add a new encounter"
SETDATES	;
START	;
INIT	; -- init variables and list array
EXIT	; -- exit code
EXITALL	; Exit of whole program
GAF	;;
DONE	; -- exit action for protocol
GAFQ
SETUP	;

External References

Name	Field # of Occurrence
C^%DTC	SETUP+5, SETUP+7, SETUP+9, SETUP+11
^DIR	SETUP+4, SEL1+18, ASKLOOP+5, GAF+6, GAF+15, GAF+32
$$SOURCE^PXAPIUTL	START1+15
GETVIEN^PXCEAE	GAF+8
DATE9S^PXCEDATE	SETDATES+7
EN^PXCEEXP	EXPND+1
PAUSE^PXCEHELP	SEL1+9
MAKELIST^PXCENEW	INIT+1
NEWHOSL1^PXCENEW	SETUP+17
NEWPAT1^PXCEPAT	SETUP+16
PATKILL^PXCEPAT	EXITALL+1
$$SELAPPM^PXCESDAM	GAF+9
FNL^PXCESDAM	EXIT+5
EN^SDGAF	GAF+27
$$PCLINE^SDPPTEM	HDR+6
$$COLLAT^SDUTL2	HDR+32, GAF+20
$$ELSTAT^SDUTL2	HDR+28, GAF+19
$$MHCLIN^SDUTL2	HDR+23, HDR+32, GAF+2, GAF+20
$$NEWGAF^SDUTL2	HDR+33, GAF+21
KVA^VADPT	EXITALL+2
EN^VALM	START1+25, START1+26, START1+28, START1+29
$$SETSTR^VALM1	HDR+23, HDR+25
FULL^VALM1	START1+30, EXIT+1, GAF+22
CLEAN^VALM10	EXIT+2
$$PKG2IEN^VSIT	START1+16
$$FMTE^XLFDT	HDR+16, HDR+36, GAF+26

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$C(7),"Selection '",Y,"' is not a valid choice." Line Location: SEL1+8
Function Call: WRITE	Prompt: ! Line Location: GAF+23
Function Call: WRITE	Prompt: !,"Warning: Patient is deceased." Line Location: GAF+24
Function Call: WRITE	Prompt: !,"Current GAF: "_+$P(PXGAF,U,2) Line Location: GAF+25
Function Call: WRITE	Prompt: $S($P(PXGAF,U,3)>0:", from "_$$FMTE^XLFDT($P(PXGAF,U,3),"D"),1:", Date Unavailable") Line Location: GAF+26
Routine Call	VALM Line Location: START1+25 START1+26 START1+28 START1+29
Routine Call	DIR Line Location: SETUP+4 SEL1+18 ASKLOOP+5 GAF+6 GAF+15 GAF+32

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVSIT - [#9000010]	HDR+31, GAF+16, GAF+17, GAF+18
^DPT - [#2]	GAF+18
^PX(815 - [#815]	START1+14, SETUP+5, SETUP+7, SETUP+9, SETUP+11
^SC - [#44]	HDR+11
^TMP("PXCE"	EXIT+3!
^TMP("PXCEIDX"	HDR+30, HDR+31, EXIT+4!, SEL1+4, GAF+8
^TMP("SDAMIDX"	GAF+9
^VA(200 - [#200]	START+2

Name	Line Occurrences
ASKLOOP	ASKLOOP+9
EXITALL	START1+31
SETDATES	SETUP+15
SETUP	START1+19
SKIP	GAF+2
START	PXCE+19
START1	EN1+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%B	START1+5!
DA	START1+5!, SETUP+1~, SETUP+4!, SEL1+12~, SEL1+20~, ASKLOOP+6!
DFN	START1+12~, SETUP+3
DIE	START1+5!
DIR	SETUP+1~, SETUP+4!, SEL1+12~, SEL1+20~, ASKLOOP+6!, GAF+6!, GAF+15!, GAF+32!
DIR("?"	SEL1+16, SEL1+17, ASKLOOP+2, ASKLOOP+3, ASKLOOP+4*
DIR("A"	SETUP+4, SEL1+13, SEL1+14, SEL1+15, ASKLOOP+1, GAF+4, GAF+5, GAF+12, GAF+13, GAF+14 , GAF+30, GAF+31
DIR("B"	SEL1+15*
DIR(0	SETUP+4, SEL1+13, ASKLOOP, GAF+3, GAF+11, GAF+29
DIRUT	START1+18!, START1+19, SETUP+4, ASKLOOP+7
DNM	START1+5!
DQ	START1+5!
DR	START1+5!
DT	SETUP+5, SETUP+7, SETUP+9, SETUP+11, HDR+6
>> DTOUT	SEL1+18
DUZ	START+2
HELP	SEL1~, SEL1+17, ASKLOOP+3, ASKLOOP+4
I	START1+5!
MAX	SEL1+3~, SEL1+4*, SEL1+7, SEL1+13, SEL1+14, SEL1+15, ASKLOOP, ASKLOOP+1, ASKLOOP+9
PXCE9BEG	START1+8~
PXCE9END	START1+8~
PXCEADD	SEL1~, SEL1+11
PXCECONT	START1+10~, START1+21, START1+22!
PXCEDBEG	START1+8~, SETDATES+2, SETDATES+5, HDR+16
PXCEDBHL	START1+9~, SETUP+10*, SETDATES+2
PXCEDBP	START1+9~, SETUP+6*, SETDATES+5
PXCEDEHL	START1+9~, SETUP+12*, SETDATES+3
PXCEDEND	START1+8~, SETDATES+3, SETDATES+6, HDR+16
PXCEDEP	START1+9~, SETUP+8*, SETDATES+6
>> PXCEGAF	HDR+33*, HDR+34, HDR+36
>> PXCEGDT	HDR+36*, HDR+37
>> PXCEGPR	HDR+36*
>> PXCEGSC	HDR+36*, HDR+37
>> PXCEGST	HDR+34*, HDR+35
PXCEHIT	HDR+27!, HDR+30, HDR+37*
PXCEHLC	HDR+26~, HDR+31*, HDR+32
PXCEHLOC	START1+7~, SETUP+17*, HDR+11, HDR+23, GAF+2
PXCEKEYS	PXCE+17~, PXCE+18, EN1~, EN~, START+2, START1+3, START1+23
PXCEPAT	START1+7~, SETUP+16*, HDR+6, HDR+28, HDR+33
PXCEPAT("NAME"	HDR+7
PXCEPAT("SSN"	HDR+8
PXCEPKG	START1+11~, START1+16*
PXCESOR	START1+11~, START1+15*
PXCESTA	HDR+26~, HDR+28*, HDR+32
PXCEUSEL	SETUP+2~, SETUP+3, SETUP+4, SETUP+13, SETUP+14, SETUP+16, SETUP+17
PXCEVIEN	GAF+1~, GAF+9*, GAF+10, GAF+12, GAF+13, GAF+16, GAF+17, GAF+18
PXCEVIEW	START1+6~, START1+14, START1+21, START1+24, START1+27, SETUP+13, SETUP+14*, SETDATES+1, HDR+5, HDR+11 , HDR+19, HDR+23, HDR+24
>> PXCEZZ	HDR+29, HDR+30, HDR+31
PXDATA	GAF+1~, GAF+18*, GAF+20
PXDFN	GAF+1~, GAF+16*, GAF+18, GAF+19, GAF+21, GAF+27
PXDSS	GAF+1~, GAF+17*, GAF+20
PXELIG	GAF+1~, GAF+19*, GAF+20
>> PXGAF	GAF+21*, GAF+24, GAF+25, GAF+26
PXLNX	HDR+1!, HDR+2, HDR+7, HDR+8, HDR+9, HDR+11, HDR+12, HDR+13, HDR+16, HDR+19 , HDR+20, HDR+23, HDR+25, HDR+37
PXPCP	HDR+1!, HDR+2, HDR+6, HDR+13
>> SDAMLIST	HDR+19
SDAMTYP	START1+6~, SETUP+13, SETUP+14
SDB	START1+5!
SDBEG	START1+8~
SDCLN	START1+5!
SDEND	START1+8~
SDFN	START1+5!, HDR+33
U	GAF+18, GAF+20, GAF+24, GAF+25, GAF+26
>> VALMBCK	DONE+1, GAF+10, SKIP*
VALMHDR	HDR+1!
VALMHDR(	HDR+7, HDR+8, HDR+9, HDR+11, HDR+13, HDR+16, HDR+19, HDR+23, HDR+25, HDR+37
>> VALMSG	HDR+39, DONE+2
X	START1+5!, SETUP+1~, SETUP+6, SETUP+8, SETUP+10, SETUP+12, SEL1+3~, SEL1+18, ASKLOOP+7
X1	SETUP+2~, SETUP+5, SETUP+7, SETUP+9, SETUP+11
X2	SETUP+2~, SETUP+5, SETUP+7, SETUP+9, SETUP+11
XQORNOD	START1+5!
XQORNOD(0	SEL1+5
Y	SETUP+1~, SETUP+4, SEL1+3~, SEL1+5, SEL1+6, SEL1+7, SEL1+8, SEL1+10, SEL1+18, ASKLOOP+7 , ASKLOOP+8*, ASKLOOP+9, ASKLOOP+10

Customize PDF page

Package: PCE Patient Care Encounter