Routine: PXBPSTP1

Information

PXBPSTP1 ;ISL/JVS - STOP CODE,ACTIVE,MULTIPLE ADD/DELETE ;7/24/96 08:24

Call Graph

Call Graph Total: 7

Package	Total	Call Graph
VA FileMan	4	^DIC WAIT^DICD EN^DIQ1 ^DIR
PCE Patient Care Encounter	3	RSET^PXBDREQ STP^PXBSTOR1 HELP^PXBUTL0

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
PCE Patient Care Encounter	1	PXBPSTP

Entry Points

Name	Comments	DBIA/ICR reference
ACTIVE(REQI,REQE)	;---Check to see if stop code is active on visit date
ADDM	;--------If Multiple STOP CODE entries have been entered.
DELM	;--------If Multiple deleting
PROMPT(PXBCNT)	;--DETERMINE WHERE PROMPT SHOULD START

External References

Name	Field # of Occurrence
^DIC	ADDM+8
WAIT^DICD	ADDM+6, DELM+4
EN^DIQ1	ACTIVE+6
^DIR	ADDM+18, DELM+28
RSET^PXBDREQ	ADDM+14
STP^PXBSTOR1	ADDM+13, DELM+14, DELM+23
HELP^PXBUTL0	ADDM+17, DELM+27

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,IOEDEOP,IORVON,"--INACTIVE!-",STOPE," was INACTIVE on the date of this ENCOUNTER.",IORVOFF Line Location: ACTIVE+8
Function Call: WRITE	Prompt: ! Line Location: ADDM+17
Function Call: WRITE	Prompt: ! Line Location: DELM+27
Routine Call	DIC Line Location: ADDM+8
Routine Call	DIR Line Location: ADDM+18 DELM+28

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^TMP("PXBDSTP"	PROMPT+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BAD	ADDM+2~, ADDM+15, ADDM+20, DELM+2~, DELM+25, DELM+30
BAD(	ADDM+9, ADDM+16, DELM+6, DELM+16, DELM+19, DELM+26
BDATA	ADDM+2~, ADDM+16, DELM+2~, DELM+26
DA	ACTIVE+1~, ACTIVE+6*
>> DATA	ADDM+4, ADDM+5, ADDM+6, ADDM+7, ADDM+19, ADDM+20, DELM+1, DELM+4, DELM+5, DELM+16 , DELM+29, DELM+30*
DELM	DELM+2~, DELM+3*
>> DIC	ACTIVE+6, ADDM+8
>> DIC(0	ADDM+8*
DIFF	PROMPT+2~, PROMPT+4*, PROMPT+5, PROMPT+6
>> DIQ	ACTIVE+6*
>> DIQ(0	ACTIVE+6*
DIR	ADDM+18!, DELM+28!
DIR(0	ADDM+18, DELM+28
DIRUT	ADDM+18!
DR	ACTIVE+1~, ACTIVE+6*
>> EDATA	ADDM+16, DELM+26
GONE	DELM+24!
GONE(	DELM+8, DELM+13, DELM+18, DELM+22
>> IDATE	ACTIVE+5
INACTIVE	ACTIVE+1~, ACTIVE+7
INACTIVE(	ACTIVE+7
>> IOEDEOP	ACTIVE+8
>> IORVOFF	ACTIVE+8
>> IORVON	ACTIVE+8
>> LINE	PROMPT+5, PROMPT+6, PROMPT+7
>> NF	ADDM+3, ADDM+6, ADDM+15, ADDM+20, DELM+3, DELM+4, DELM+25, DELM+30
>> NOT	ACTIVE+2, ACTIVE+7, ACTIVE+8, ACTIVE+9
OK	ACTIVE+1~, ADDM+2~
PXBCNT	ADDM+5, DELM+6, DELM+19, PROMPT~, PROMPT+4
PXBJ	DELM+2~, DELM+17*, DELM+18, DELM+19, DELM+21, DELM+22
PXBLEN	ADDM+2~, ADDM+3, ADDM+7, DELM+2~, DELM+3, DELM+5
>> PXBNSTP(	ADDM+11, ADDM+12
>> PXBPIECE	ADDM+7, ADDM+8, ADDM+9, ADDM+11, DELM+5, DELM+6, DELM+7, DELM+8, DELM+9, DELM+12 , DELM+13, DELM+15, DELM+16, DELM+17
>> PXBSKY(	DELM+12, DELM+21
>> PXI	ADDM+7, DELM+5
REQE	ACTIVE~, ACTIVE+4
REQI	ACTIVE~, ACTIVE+3, ADDM+10, DELM+11, DELM+12, DELM+20, DELM+21*
START	PROMPT+2~, PROMPT+3*, PROMPT+4
STOPE	ACTIVE+1~, ACTIVE+4*, ACTIVE+8
STOPI	ACTIVE+1~, ACTIVE+3*, ACTIVE+6
VISIT	ACTIVE+1~, ACTIVE+5*, ACTIVE+7
>> X	ADDM+8*
Y	ADDM+9, ADDM+10, ADDM+12, ADDM+19!, DELM+29!

Customize PDF page

Package: PCE Patient Care Encounter