Routine: PXBGCPT2

Package	Total	Call Graph
PCE Patient Care Encounter	3	(LOC,WIN17)^PXBCC ($$CPTSCREN,WAIT)^PXBUTL HELP^PXBUTL0
VA Fileman	2	LIST^DIC ^DIR

Package

Total

Call Graph

PCE Patient Care Encounter

(LOC,WIN17)^PXBCC ($$CPTSCREN,WAIT)^PXBUTL HELP^PXBUTL0

VA Fileman

LIST^DIC ^DIR

Package	Total	Caller Graph
PCE Patient Care Encounter	2	PXBHLP4 PXBPCPT

Package

Total

Caller Graph

PCE Patient Care Encounter

PXBHLP4 PXBPCPT

Entry Points

Name	Comments	DBIA/ICR reference
LOC	;--LOCATE CURSOR
PRMPT	;--PROMPT
FINISH	;--FINISH
PROMPT	;--PROMPT
SUB	;--LIST
VAL	;--VAL equal value
PRMPT2	;--Yes and No prompt
DOUBLE1(FROM)	;--Entry
SETUP	;--SET
START1	;--RECYCLE
LIST	;-DISPLAY LIST TO THE SCREEN
EXITNEW	;--EXIT
BACK	;
HEAD	;--HEAD
START	;
EXIT	;--EXIT
DOUBLE(FROM)	;--Entry
FORWARD	;
NEW	;
XXX

Name	Field # of Occurrence
LIST^DIC	START+5
^DIR	PROMPT+6, PRMPT+10, PRMPT2+6
LOC^PXBCC	PROMPT+1, PRMPT+2, LOC+1, PRMPT2+2
WIN17^PXBCC	PROMPT+1, PRMPT+1, PRMPT2+1
$$CPTSCREN^PXBUTL	XXX+3, XXX+12, XXX+23
WAIT^PXBUTL	XXX+4, XXX+13, XXX+24
HELP^PXBUTL0	XXX+34, XXX+35

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"NOT" Line Location: PXBGCPT2+5
Function Call: WRITE	Prompt: !!,"Enter '^' to quit, '-' for previous page." Line Location: PROMPT+2
Function Call: WRITE	Prompt: IOCUOFF,IOCUF,IOCUF Line Location: XXX+0
Function Call: WRITE	Prompt: IOCUON Line Location: XXX+16
Function Call: WRITE	Prompt: IOCUON Line Location: XXX+27
Function Call: WRITE	Prompt: ! Line Location: XXX+34
Function Call: WRITE	Prompt: ! Line Location: XXX+35
Function Call: WRITE	Prompt: ! Line Location: LIST+2
Function Call: WRITE	Prompt: ! Line Location: PRMPT+3
Function Call: WRITE	Prompt: !,"Enter '^' to quit" Line Location: PRMPT+4
Function Call: WRITE	Prompt: !," END OF LIST" Line Location: PRMPT+5
Function Call: WRITE	Prompt: IOEDEOP Line Location: LOC+2
Function Call: WRITE	Prompt: !,IOCUU,IOBON,"HELP SCREEN",IOSGR0,?(IOM-$L(TITLE))\2,IOINHI,TITLE,IOINLOW,IOELEOL Line Location: HEAD+1
Function Call: WRITE	Prompt: !!," E N D O F L I S T" Line Location: SUB+1
Routine Call	DIC Line Location: START+5
Routine Call	DIR Line Location: PROMPT+6 PRMPT+10 PRMPT2+6

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ICPT - [#81]	XXX+6, XXX+15, XXX+23, XXX+25, XXX+26
^ICPT("B"	START1+7, START1+9, XXX+2, XXX+3, XXX+6, XXX+9, XXX+10, XXX+12, XXX+15
^ICPT("C"	XXX+20, XXX+22
^TMP("PXBTANA"	FINISH+2, EXIT+1!, EXITNEW+1!, BACK+1, BACK+2, FORWARD+1, FORWARD+2, SUB+1, SUB+3, SUB+4 , SUB+5
^TMP("PXBTOTAL"	EXIT+1!, XXX+5, XXX+6, XXX+14, XXX+15, XXX+25, XXX+26, LIST+5, LIST+6, LIST+7 , VAL+1, EXITNEW+1!

Name	Line Occurrences
BACK	PROMPT+7
EXIT	PROMPT+9
FORWARD	PROMPT+8
HEAD	START+7
LIST	PRMPT+11
LOC	DOUBLE+5, START+7, LIST+2
PRMPT2	LIST+11
SETUP	START+4
START	PROMPT+7, PROMPT+8
SUB	START+7
VAL	LIST+1, PRMPT2+9

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BACK	DOUBLE+2~, DOUBLE+4, START+5, PROMPT+7, PROMPT+8, NEW+4
CNT	NEW+1~, SUB+3*
CODE	DOUBLE+2~, NEW+1~, XXX+21~, XXX+23, LIST+6, LIST+8, SUB+4*, SUB+6
>> CYCL	XXX+36*
CYCLE	NEW+1~
>> DATA	NEW+5, START1+5, START1+6, START1+7, START1+8, XXX+2, XXX+8, XXX+9, XXX+10, XXX+20 , XXX+34, XXX+35
>> DIC("S"	DOUBLE+6
DIR	EXIT+1!, EXITNEW+1!
DIR("?"	PROMPT+4, PRMPT+8
DIR("A"	PROMPT+3, PRMPT+6, PRMPT+7, PRMPT2+3
DIR("B"	PRMPT2+4*
DIR(0	PROMPT+5, PRMPT+9, PRMPT2+5*
DIRUT	PROMPT+9!, EXITNEW+1!
>> ERROR	XXX+36*
FIELD	DOUBLE+2~, START+5, NEW+1~, START1+3, SETUP+2
FILE	DOUBLE+2~, START+5, NEW+1~, START1+2, SETUP+1
FIRST	DOUBLE+3~, FINISH+2, NEW+2~, SUB+4, SETUP+1*, SETUP+2
FROM	DOUBLE~, DOUBLE1~
HEADING	DOUBLE+2~, NEW+1~, XXX+40, LIST+3, SUB+2, SETUP+3
>> IDATE	XXX+3, XXX+12, XXX+23
IEN	XXX+21~, XXX+22*, XXX+23, XXX+25, XXX+26
INDEX	NEW+1~, NEW+4*
>> IOBON	HEAD+1
>> IOCUF	XXX, XXX+20
>> IOCUOFF	XXX, XXX+20
>> IOCUON	XXX+16, XXX+27
>> IOCUU	HEAD+1
>> IOEDEOP	LOC+2
>> IOELEOL	HEAD+1
>> IOINHI	HEAD+1
>> IOINLOW	HEAD+1
IOM	HEAD+1
>> IOSGR0	HEAD+1
LL	START1+4~, START1+5*, START1+7, XXX+9
NAME	DOUBLE+2~, NEW+1~, LIST+7, LIST+8, SUB+5, SUB+6
NUM	DOUBLE+2~, DOUBLE+4, LIST+5
OK	NEW+1~
>> PXBCNT	PROMPT+1, PRMPT+1, PRMPT2+1
>> PXBMOD	XXX+4, XXX+13, XXX+24*
SCREEN	DOUBLE+2~, DOUBLE+3~, DOUBLE+4, DOUBLE+6, START+5, NEW+1~
>> SECOND	FINISH+2, SUB+5, SETUP+1*, SETUP+2
START	DOUBLE+2~, START+5, NEW+1~, NEW+5, START1+7, START1+9, XXX+2, XXX+9, XXX+10, BACK+1* , FORWARD+1*
START("IEN"	BACK+2, FORWARD+2
SUB	DOUBLE+2~, NEW+1~, NEW+5, LIST+4, LIST+5, LIST+6, LIST+7, LIST+8, PRMPT+4, PRMPT+6 , PRMPT+11, PRMPT+12, SUB+3, SUB+4, SUB+5, SUB+6
SUB2	NEW+2~, NEW+5, LIST+5, PRMPT+9
SUBT	XXX+2, XXX+3, XXX+5, XXX+6, XXX+7, XXX+10, XXX+11, XXX+12, XXX+14, XXX+15 , XXX+20*, XXX+22, XXX+26, XXX+28!
TANA	EXITNEW+2!
TEMP	DOUBLE+3~
TITLE	DOUBLE+2~, START+2, NEW+1~, START1+1, HEAD+1
TMP	START1+4~, XXX+1~
TMP(	XXX+7*, XXX+11
TOTAL	NEW+2~, XXX+2, XXX+4, XXX+5, XXX+6, XXX+13, XXX+14, XXX+15, XXX+24, XXX+25 , XXX+26, XXX+33, XXX+37, LIST+1, LIST+11, PRMPT+5, EXITNEW+2!
TT	START1+4~, START1+5*, START1+7, XXX+9
U	FINISH+2, XXX+6, XXX+15, XXX+23, XXX+25, XXX+26, VAL+1, SUB+1
>> VAL	PROMPT+9, FINISH+2, EXIT+2, VAL+1*, EXITNEW+3
>> X	PROMPT+7, PROMPT+8, FINISH+2, LIST+1, PRMPT+11, PRMPT+12, VAL+1, PRMPT2+7, PRMPT2+8
>> Y	PRMPT2+7, PRMPT2+8

Customize PDF page

Package: PCE Patient Care Encounter

Routine: PXBGCPT2

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: