Routine: PXCEHELP

Package	Total	Call Graph
Automated Information Collection System	1	GETLST^IBDF18A
Kernel	1	DISP^XQORM1
Registration	1	(CLEAR,FULL)^VALM1
VA Fileman	1	^DIR

Package	Total	Caller Graph
PCE Patient Care Encounter	14	PXBAPI1 PXBAPI2 PXCE PXCEAE PXCEAE2 PXCECSTP PXCEEXP PXCEINTR PXCESDAM PXCESK PXCEVFI1 PXCEVFI2 PXCEVFIL PXUTLSTP

Entry Points

Name	Comments	DBIA/ICR reference
PROTX
PAUSE	;
PROTOCOL	; Help for protocols
HELP	;
NEWENC	;Displays warning before adding a new historical encounter.
ITEM(XQORNOD,TAB)	; Show descriptions of items
UPPER(X)	; Convert lower case X to UPPER CASE
INTRFACE(PXCEHLOC,PXCECATS,PXCELIST)	;
CONTINUE()	; Pagination control
STOP(PROMPT,SCROLL)	; Call DIR at bottom of screen
STOPX
MENU(XQORNOD)	; Unwind protocol menus for help
CONTX
WAIT	;

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: HELP+6
Function Call: WRITE	Prompt: !,?5,$P(PXCEHLST(PXCEINDX),"^",2) Line Location: HELP+9
Function Call: WRITE	Prompt: !,$P(PXCEHLST(PXCEINDX),"^",1),?10,$P(PXCEHLST(PXCEINDX),"^",2) Line Location: HELP+10
Function Call: WRITE	Prompt: !,?10,$P(PXCEHLST(PXCEINDX),"^",2) Line Location: HELP+11
Function Call: WRITE	Prompt: ! Line Location: HELP+14
Function Call: WRITE	Prompt: !!,"This will create a historical encounter for documenting a clinical encounter" Line Location: NEWENC+1
Function Call: WRITE	Prompt: !,"only and will not be used by Scheduling, Billing or Workload credit." Line Location: NEWENC+2
Function Call: WRITE	Prompt: ! Line Location: PAUSE+2
Function Call: WRITE	Prompt: ! Line Location: PAUSE+5
Function Call: WRITE	Prompt: ! Line Location: WAIT+2
Function Call: WRITE	Prompt: ! Line Location: WAIT+6
Function Call: WRITE	Prompt: !!,"Enter selection by typing the name, or abbreviation.",!,"Enter '??' for additional details.",! Line Location: PROTOCOL+4
Function Call: WRITE	Prompt: ! Line Location: STOP+3
Routine Call	DIR Line Location: PAUSE+4 WAIT+5 STOP+6

Name	Line Occurrences (* Changed, ! Killed)
^ORD(101 - [#101]	MENU+3, MENU+4, MENU+5, MENU+7, ITEM+2, ITEM+3, ITEM+5, ITEM+6

Name	Field # of Occurrence
DA	STOP+1~
DIR	PAUSE+1~, WAIT+1~, STOP+1~
DIR("?"	STOP+5*
DIR("A"	WAIT+3, STOP+4
DIR(0	PAUSE+3, WAIT+4, STOP+4*
>> DIROUT	PROTOCOL+6
DIRUT	PROTOCOL+1~, MENU+6, ITEM+4, ITEM+5, ITEM+6, STOP+6!
DTOUT	PROTOCOL+1~, STOP+7
DUOUT	PROTOCOL+1~
IOF	CONTINUE+3
>> IOINHI	ITEM+3
>> IOINORM	ITEM+3
IOSL	HELP+12, HELP+13, CONTINUE+2, STOP+3
IOST	STOP+2
ORU	PROTOCOL+1~
ORUPRMT	PROTOCOL+1~
PROMPT	STOP~, STOP+4
PXCECATS	HELP+1, HELP+2, INTRFACE~, INTRFACE+9
PXCECODE	HELP+3~, HELP+5*, HELP+10
PXCEHLOC	HELP+1, INTRFACE~, INTRFACE+7
>> PXCEHLST	HELP+1, HELP+2, HELP+5
>> PXCEHLST(	HELP+8, HELP+9, HELP+10, HELP+11
PXCEINDX	HELP+3~, HELP+7, HELP+8, HELP+9, HELP+10, HELP+11, HELP+12, HELP+13
PXCEINTF	INTRFACE+4~, INTRFACE+5*, INTRFACE+6, INTRFACE+7
PXCELIST	INTRFACE~, INTRFACE+3, INTRFACE+7, INTRFACE+8, INTRFACE+9
SCROLL	STOP~, STOP+3
TAB	ITEM~, ITEM+3, ITEM+6
TIUI	MENU+1~, MENU+3, MENU+4, MENU+5, MENU+6, MENU+7, ITEM+1~, ITEM+5*, ITEM+6
TIUJ	MENU+1~, MENU+4*, MENU+5
TIUSEQ	MENU+1~
TIUSEQ(	MENU+4, MENU+5*, MENU+6, MENU+7
TIUX	PROTOCOL+1~*, PROTOCOL+3, PROTOCOL+5, PROTOCOL+6
U	MENU+4, MENU+5, ITEM+2, ITEM+3, STOP+7
>> VALMBCK	PROTX*
VALMDDF	PROTOCOL+1~
VALMPGE	PROTOCOL+1~
X	PROTOCOL+1, STOP+1~, UPPER~, UPPER+1
XQORNOD	PROTOCOL+6, MENU~, MENU+3, MENU+4, MENU+5, ITEM~, ITEM+2, ITEM+3, ITEM+5, ITEM+6
>> XQORPOP	PROTOCOL+6*
>> XQORQUIT	PROTOCOL+6*
Y	HELP+3~, HELP+4, HELP+8, HELP+13, CONTINUE+1~, CONTINUE+2, CONTINUE+3, CONTX, STOP+1~, STOP+2 , STOP+6, STOP+7*, STOPX

Name	Field # of Occurrence
$T(INTRFACE^@(3)	INTRFACE+5