Routine: PXBGCPT4

Package	Total	Call Graph
PCE Patient Care Encounter	3	CPT^PXBAICS (LOC,WIN17)^PXBCC HELP1^PXBUTL1
Automated Information Collection System	1	GETLST^IBDF18A
DRG Grouper	1	($$MOD,$$MODP)^ICPTMOD
VA Fileman	1	^DIR

Package

Total

Call Graph

PCE Patient Care Encounter

CPT^PXBAICS (LOC,WIN17)^PXBCC HELP1^PXBUTL1

Automated Information Collection System

GETLST^IBDF18A

DRG Grouper

($$MOD,$$MODP)^ICPTMOD

VA Fileman

^DIR

Package	Total	Caller Graph
PCE Patient Care Encounter	1	PXBHLP4

Package

Total

Caller Graph

PCE Patient Care Encounter

PXBHLP4

Entry Points

Name	Comments	DBIA/ICR reference
LOC	;--LOCATE CURSOR
PRMPT	;---WRITE PROMPT HERE
SUB	;--DISPLAY LIST TO THE SCREEN
VAL	;-----Set the VAL equal to the value
PRMPT2	;-----Yes and No prompt if only one choice
DOUBLE1(FROM)	;--Entry point
SETUP	;-SETP VARIABLES
START1	;--RECYCLE POINT
LIST	;-DISPLAY LIST TO THE SCREEN
EXITNEW	;--EXIT
BACK	;
HEAD	;--HEAD
FORWARD	;
NEW	;

Name	Field # of Occurrence
^DIR	PRMPT+10, PRMPT2+6
GETLST^IBDF18A	START1+3
$$MOD^ICPTMOD	START1+19
$$MODP^ICPTMOD	START1+18
CPT^PXBAICS	START1+3
LOC^PXBCC	PRMPT+2, LOC+1, PRMPT2+2
WIN17^PXBCC	PRMPT+1, PRMPT2+1
HELP1^PXBUTL1	START1+30

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"THIS IS NOT AN ENTRY POINT" Line Location: PXBGCPT4+5
Function Call: WRITE	Prompt: IOCUU,IOCUU,!,IOELEOL Line Location: START1+25
Function Call: WRITE	Prompt: ! Line Location: START1+27
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 Line Location: HEAD+1
Function Call: WRITE	Prompt: ?(IOM-$L(TITLE))\2,IOINHI,TITLE,IOINLOW,IOELEOL Line Location: HEAD+2
Function Call: WRITE	Prompt: !!," E N D O F L I S T" Line Location: SUB+1
Routine Call	DIR Line Location: PRMPT+10 PRMPT2+6

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ICPT - [#81]	START1+11
^ICPT("B"	START1+11
^TMP("PXBTANA"	EXITNEW+1!, BACK+1, BACK+2, FORWARD+1, FORWARD+2, SUB+1, SUB+4, SUB+5
^TMP("PXBTOTAL"	START1+14, START1+15, START1+21*, LIST+6, LIST+9, LIST+10, LIST+14, LIST+17, VAL+1, VAL+3 , VAL+4, EXITNEW+1!

Name	Line Occurrences
EXITNEW	PRMPT+13
LIST	PRMPT+11
LOC	START1+27, LIST+2
PRMPT2	LIST+21
VAL	PRMPT2+9

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> BACK	NEW+5*
>> CLINIC	START1+3
CNT	NEW+3~, START1+7, START1+13, START1+14, START1+15, START1+21, START1+22, SUB+3, SUB+4
CNUM	NEW+3~, LIST+5, LIST+7, LIST+8, LIST+16
CODE	NEW+3~, START1+9, START1+10, START1+11, START1+14, START1+18, LIST+9, LIST+11
CONT	NEW+3~, NEW+6, LIST+4, LIST+8, LIST+12, LIST+13, LIST+16
CYCLE	NEW+2~
>> DATA	NEW+6
DIR	EXITNEW+1!
DIR("?"	PRMPT+8*
DIR("A"	PRMPT+6, PRMPT+7, PRMPT2+3*
DIR("B"	PRMPT2+4*
DIR(0	PRMPT+9, PRMPT2+5
DIRUT	PRMPT+13!
DTIME	START1+31
FIELD	NEW+2~, SETUP+1*
FILE	NEW+2~, SETUP+1*
FROM	DOUBLE1~
HEADING	NEW+2~, START1+36, LIST+3, SUB+2, SETUP+2
INDEX	NEW+2~, NEW+5*
>> IOBON	HEAD+1
>> IOCUU	START1+25, HEAD+1
>> IOEDEOP	LOC+2
>> IOELEOL	START1+25, HEAD+2
>> IOINHI	HEAD+2
>> IOINLOW	HEAD+2
IOM	START1+29, HEAD+2
>> IOSGR0	HEAD+1
MNUM	NEW+3~, LIST+5, LIST+8, LIST+15, LIST+16
MODSTR	NEW+3~, START1+19, START1+20, START1+21, LIST+17, LIST+18, VAL+2, VAL+4, EXITNEW+3
NAME	NEW+2~, START1+12, START1+15, LIST+10, LIST+11, SUB+5*, SUB+6
OK	NEW+2~, START1+31*
PRV	NEW+3~
>> PXBCNT	PRMPT+1, PRMPT2+1
PXBPMT	NEW+3~
PXBPMT(	START1+8, START1+9, START1+12, START1+17, START1+18
PXBPMT(0	START1+5, START1+6
PXMDIEN	NEW+3~, START1+18*, START1+19
QT	NEW+3~, LIST+5, LIST+6, LIST+8, LIST+14, LIST+16*
>> RESULTS	START1+28*, START1+29
SCREEN	NEW+2~
START	NEW+2~, NEW+6, BACK+1, FORWARD+1*
START("IEN"	BACK+2, FORWARD+2
SUB	NEW+2~, NEW+6, START1+7, START1+8, START1+9, START1+12, START1+17, START1+18, LIST+4, LIST+6* , LIST+8, LIST+9, LIST+10, LIST+11, LIST+14, LIST+16, LIST+17, PRMPT+4, PRMPT+6, PRMPT+11 , PRMPT+12, SUB+3, SUB+4, SUB+5, SUB+6
SUB2	NEW+3~, NEW+6, LIST+6, PRMPT+9
SUBM	NEW+3~, NEW+6, START1+16, START1+17, START1+18, START1+21, LIST+12, LIST+14, LIST+16, LIST+17 , VAL+2, VAL+3*, VAL+4
TANA	EXITNEW+2!
TITLE	NEW+2~, START1+1*, HEAD+2
TOTAL	NEW+3~, START1+5, START1+22, START1+25, START1+32*, LIST+21, PRMPT+5, EXITNEW+2!
U	START1+9, START1+11, START1+12, START1+20, START1+21, LIST+4, LIST+8, LIST+12, LIST+13, LIST+16 , LIST+18, VAL+4, EXITNEW+3
>> VAL	PRMPT+13, VAL+1, EXITNEW+3
>> X	PRMPT+11, PRMPT+12, VAL+1, VAL+3, VAL+4, PRMPT2+7, PRMPT2+8*
>> Y	PRMPT2+7, PRMPT2+8

Customize PDF page

Package: PCE Patient Care Encounter

Routine: PXBGCPT4

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items