Routine: PXCEAE

Information

PXCEAE ;ISL/dee,ISA/KWP - Main routine for the List Manager display of a visit and related v-files ;04/26/99

Source Information

Source file <PXCEAE.m>

Call Graph

Call Graph Total: 16

Package	Total	Call Graph
PCE Patient Care Encounter	12	($$SEL1,DONE)^PXCE BUILD^PXCEAE1 $$SEL^PXCEAE2 $$DISPLY08^PXCECSTP $$DATE^PXCEDATE (PAUSE,WAIT)^PXCEHELP PATINFO^PXCEPAT APPCHECK^PXCESDAM CHECK^PXCEVFI5 EVENT^PXKMAIN ($$LOCK,UNLOCK)^PXUALOCK ($$CREATE,DELETE)^PXUAXTMP
Registration	3	EN^VALM FULL^VALM1 CLEAN^VALM10
Kernel	1	DISP^XQORM1

Caller Graph

Caller Graph Total: 3

Package	Total	Caller Graph
PCE Patient Care Encounter	3	PXCE PXCEEXP PXCESDAM

Entry Points

Name	Comments	DBIA/ICR reference
DEL	; -- delete a V-File entries
QUIT
EN	;+ -- main entry point for PXCE DISPLAY VISIT
HDR	; -- header code
DO1(PXCEFIDX,WHATDO,WHATTODO)	;Process one V-File entry
EDIT	; -- edit a V-File entry
DOMANY(PXCEFIDX,WHATDO,WHATTODO)	;Process one or more V-File entries
KEYS(PXCEPROT,PXCEEND)	;Set up ^XQORM("KEY") array so that can edit an item by having its ; number be and action to edit it.
EXPND	; -- expand code
INIT	; -- init variables and list array
EXIT	; -- exit code
GETVIEN	;Ask the user which visit.
HELP	; -- help code

External References

Name	Field # of Occurrence
$$SEL1^PXCE	GETVIEN+3
DONE^PXCE	EXPND+3
BUILD^PXCEAE1	INIT+1, EXPND+2
$$SEL^PXCEAE2	DOMANY+7, DOMANY+9
$$DISPLY08^PXCECSTP	HDR+13
$$DATE^PXCEDATE	HDR+12
PAUSE^PXCEHELP	GETVIEN+19
WAIT^PXCEHELP	GETVIEN+12, DEL+1, DO1+10
PATINFO^PXCEPAT	EN+10
APPCHECK^PXCESDAM	GETVIEN+7
CHECK^PXCEVFI5	EXIT+5
EVENT^PXKMAIN	EXIT+9
$$LOCK^PXUALOCK	EN+19
UNLOCK^PXUALOCK	EN+22, EN+24
$$CREATE^PXUAXTMP	EN+21
DELETE^PXUAXTMP	EN+24
EN^VALM	EN+23
FULL^VALM1	DOMANY+5
CLEAN^VALM10	EXIT+7
DISP^XQORM1	HELP+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,$C(7),"Can not update future encounters." Line Location: GETVIEN+11
Function Call: WRITE	Prompt: !!,"This is a historical encounter for documenting a clinical encounter only" Line Location: GETVIEN+17
Function Call: WRITE	Prompt: !,"and will not be used by Scheduling, Billing or Workload credit." Line Location: GETVIEN+18
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Function Call: WRITE	Prompt: !!!,$C(7),"Error: You do not have delete access." Line Location: DEL+1
Function Call: WRITE	Prompt: "??",$C(7) Line Location: DOMANY+10
Function Call: WRITE	Prompt: !!!,$C(7),"You cannot edit stop codes." Line Location: DO1+10
Routine Call	VALM Line Location: EN+23

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVSIT - [#9000010]	EN+9, EN+12, GETVIEN+10, GETVIEN+15, HDR+1, HDR+6, DO1+11
^DPT - [#2]	GETVIEN+15
^ORD(101 - [#101]	KEYS+3
^SC - [#44]	HDR+9
^TMP("PXCEAE"	EXIT+8!
^TMP("PXCEAEIX"	EXIT+8!, DO1+7
^TMP("PXCEIDX"	GETVIEN+5
^TMP("VALM DATA"	EN+25
^VA(200 - [#200]	EN+18
^XTMP("PXLCKUSR"	EN+18

Name	Line Occurrences
@(	DO1+12
DO1	DOMANY+16, DOMANY+19, DOMANY+20
DOMANY	EDIT+3, DEL+2
INIT	DOMANY+21

Name	Field # of Occurrence
^("EXP"	EN+25

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DT	GETVIEN+10
DUZ	EN+21
PXCEAEVW	EN+5~, INIT+1, EXPND+1, EXPND+2
PXCEAPPM	GETVIEN+15*, EXIT+10!
PXCECAT	DO1+6~, DO1+9, DO1+10, DO1+11, DO1+12
PXCEDELV	DOMANY+4~, DOMANY+15, DOMANY+18*, DOMANY+20
PXCEEND	KEYS~, KEYS+4
>> PXCEEXIT	EXIT+5
PXCEFIDX	EDIT+1~, EDIT+2, EDIT+3, DOMANY~, DOMANY+7, DOMANY+9*, DOMANY+11, DOMANY+13, DO1~, DO1+7
PXCEFIEN	DO1+6~, DO1+8*, DO1+11
PXCEFIX1	DOMANY+12~, DOMANY+13*, DOMANY+14, DOMANY+15, DOMANY+16, DOMANY+17
PXCEFIX2	DOMANY+12~, DOMANY+17*, DOMANY+18, DOMANY+19
PXCEHLOC	EN+12~*
PXCEHLST	EN+3~
PXCEINDX	KEYS+2~, KEYS+4, DOMANY+12~, DOMANY+13
>> PXCEKEYS	EN+15, EN+25, DEL+1
>> PXCENOER	DO1+10*
PXCEONE	DO1+6~, DO1+7*, DO1+8, DO1+9
PXCEPAT	EN+8~, EN+9*, EN+10
PXCEPAT("NAME"	HDR+7
PXCEPAT("SSN"	HDR+8
PXCEPIEN	KEYS+2~, KEYS+3*, KEYS+4
PXCEPROT	KEYS~, KEYS+3
PXCEVDEL	EN+6~*
PXCEVIDX	GETVIEN+1~, GETVIEN+2, GETVIEN+3, GETVIEN+4, GETVIEN+5
PXCEVIEN	EN+1, EN+9, EN+12, EN+17, GETVIEN+5*, GETVIEN+7, GETVIEN+8, GETVIEN+10, GETVIEN+13!, GETVIEN+15 , GETVIEN+16!, HDR+1, HDR+6, INIT+1, EXIT+10!, EXPND+2
PXMSG	EN+16~, EN+17, EN+18, EN+19
PXQUIT	EXIT+3~, EXIT+4*
PXRESVAL	EN+16~, EN+19, EN+20, EN+21, EN+22
PXUSR	EN+16~, EN+18*
PXVISIEN	EN+16~, EN+17*, EN+18, EN+19, EN+21, EN+22, EN+24
>> VALMBCK	INIT+2*
>> VALMEVL	EN+25
VALMHDR	HDR+2!, INIT+2!
VALMHDR(1	HDR+7, HDR+8, HDR+9*
VALMHDR(2	HDR+12, HDR+13
>> VALMQUIT	HDR+1*
>> VALMSG	HDR+15*
VISIT0	HDR+3~, HDR+6*, HDR+9, HDR+12, HDR+13
WHATDO	DOMANY~, DOMANY+4, DOMANY+6, DOMANY+8, DOMANY+15, DOMANY+16, DOMANY+18, DOMANY+19, DOMANY+20, DO1~ , DO1+10
WHATTODO	DOMANY~, DOMANY+16, DOMANY+19, DOMANY+20, DO1~, DO1+12
>> X	HELP+1*
>> XQORM("KEY"	KEYS+4*
>> XQORNOD(0	GETVIEN+2, EDIT+2
>> Y	GETVIEN+16

Customize PDF page

Package: PCE Patient Care Encounter

Routine: PXCEAE

Information

Source Information

Call Graph

Call Graph Total: 16

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: