Routine: PXBPSTP

Package	Total	Call Graph
PCE Patient Care Encounter	9	(LOC,REVSTP,TERM,WIN17)^PXBCC RSET^PXBDREQ DSTP4^PXBDSTP $$DOUBLE1^PXBGSTP2 EN1^PXBHLP0 ($$ACTIVE,ADDM,DELM)^PXBPSTP1 WHICH^PXBPWCH (CASE,TIMES)^PXBUTL CPTMNO^PXBUTL0
VA Fileman	1	^DIC

Package

Total

Call Graph

(LOC,REVSTP,TERM,WIN17)^PXBCC RSET^PXBDREQ DSTP4^PXBDSTP $$DOUBLE1^PXBGSTP2 EN1^PXBHLP0 ($$ACTIVE,ADDM,DELM)^PXBPSTP1 WHICH^PXBPWCH (CASE,TIMES)^PXBUTL
CPTMNO^PXBUTL0

^DIC

Package	Total	Caller Graph
PCE Patient Care Encounter	1	PXBMSTP

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
S2	;-----Fourth Stop Code Entry point
S1	;-----Third Stop Code Entry point
M	;-----IF Multiple entries can be added
LI	;-----If picked a line number--no for it reason at this time
S	;-----Second Stop Code Entry point
STP	;-----First Stop Code Entry point
SFIN	;-----Finish up the Variables of the STOP CODE
STPX	;-----Exit the routine and clean up the variabLES

Name	Line Occurrences
Function Call: WRITE	Prompt: IOUON,"Previous Entry: ",$G(PXBNSTPL(1)) Line Location: STP+1
Function Call: WRITE	Prompt: " " Line Location: STP+1
Function Call: WRITE	Prompt: IOUOFF Line Location: STP+2
Function Call: WRITE	Prompt: !,"Enter '+' for next page, '-' for previous page." Line Location: S+2
Function Call: WRITE	Prompt: !,"Enter a STOP CODE: " Line Location: S+3
Function Call: WRITE	Prompt: IOELEOL Line Location: S+3
Function Call: WRITE	Prompt: !,"Enter ",IOINHI,"NEXT",IOINLOW," STOP CODE: " Line Location: S+4
Function Call: WRITE	Prompt: IOELEOL Line Location: S+4
Function Call: READ	Timeout: DTIME Variable: DATA Line Location: S+5
Function Call: WRITE	Prompt: !,"You cannot select main STOP CODE "_$G(STOPC) Line Location: S1+6
Function Call: WRITE	Prompt: DATA Line Location: S1+8
Function Call: WRITE	Prompt: IOEDEOP Line Location: S2+1
Function Call: WRITE	Prompt: IORC Line Location: S2+7
Function Call: WRITE	Prompt: IOCUB,IOECH Line Location: LI+2
Function Call: WRITE	Prompt: "--"_$P(PXBSAM($O(PXBKY($P(STP,"^",2),0))),"^",2) Line Location: SFIN+14
Routine Call	DIC Line Location: LI+28 SFIN+2

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVSIT - [#9000010]	STP+6, STP+7, STP+8
^DIC(40.7 - [#40.7]	STP+7
^DISV(	S1+8, SFIN+7*
^SC - [#44]	STP+6, STP+7, STP+8

Name	Field # of Occurrence
>> DATA	S+5, S1+1, S1+2, S1+3, S1+4, S1+6, S1+8, S1+9, S2+3, S2+4 , S2+7, LI+8, LI+10, LI+11, LI+12, LI+15, LI+22, LI+23, LI+27, LI+28 , SFIN+13, STPX+1
DIC	STP+3~, LI+28, SFIN+2
DIC("S"	STP+9*
DIC(0	LI+28, SFIN+2
>> DOUBLEQQ	STP+5, LI+8, LI+23
DTIME	S+5
DUZ	S1+8, SFIN+7
EDATA	STP+3~, S+5, S1+3, S1+4, S1+8, LI+23, LI+28
>> FROM	STP+5*
HERE	LI+9*, SFIN+1!
>> I	STP+1*
>> IOEDEOP	S2+1
>> IOELEOL	S+3, S+4
>> IOINHI	S+4
>> IOINLOW	S+4
>> IORC	S2+7
>> IOSC	STP+4
>> IOUOFF	STP+2
>> IOUON	STP+1
>> LEAVE	S1+1*
LINE	STP+3~, LI+12*
>> NF	M+2, M+5
>> NLINE	LI+13*
NOT	STP+3~, SFIN+13*!
>> PXBCNT	S+1, S+2, S2+7, LI+10, LI+19
>> PXBDIC	S2+3*
>> PXBEXIT	S1+9, STPX+1
>> PXBKY(	LI+8, LI+10, LI+12, SFIN+8, SFIN+9, SFIN+14
>> PXBNSTP(	SFIN+5, SFIN+6
>> PXBNSTPL	STP+1
>> PXBNSTPL(1	STP+1, SFIN+7*
>> PXBSAM(	SFIN+14
>> PXBSKY(	SFIN+8, SFIN+9
>> PXBUT	S1+1, S2+4
>> PXBVST	STP+6, STP+7, STP+8
>> PXBWIN	LI+19
>> PXKSTP	S+3, S+4
Q	LI+11!, LI+12, LI+13, LI+14
Q(	LI+13
>> REQE	SFIN+11, SFIN+13, STPX+2
>> REQI	SFIN+8, SFIN+9, SFIN+10*, SFIN+13
SELINE	STP+3~, SFIN+8, SFIN+9
STOPC	STP+3~, STP+7*, S1+6
STOPI	STP+3~, STP+8*
>> STP	SFIN+4*, SFIN+7, SFIN+11, SFIN+14
TIMED	STP+3~, STP+5*, S1+1
>> VAL	LI+27*, LI+28
>> WHAT	LI+27, STPX+1
>> X	LI+28, SFIN+2
XFLAG	STP+3~, LI+12*, LI+15
>> Y	LI+15, LI+23, LI+27*, SFIN+2, SFIN+3, SFIN+10
>> Y(0	SFIN+4, SFIN+5, SFIN+6, SFIN+8, SFIN+9

Information