Routine: PRCPCSO1

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Information

PRCPCSO1 ;WISC/RFJ-surgery order supplies ; 06/23/2009 2:26 PM

Source Information

Source file <PRCPCSO1.m>

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
IFCAP	5	PATLINK^PRCPCSOR SHOWCC^PRCPCSOU ($$ADDNEW,NEWORDER)^PRCPOPUS (ADD,SHOWWHO)^PRCPULOC $$YN^PRCPUYN

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
IFCAP	1	PRCPCSOR

Entry Points

Name	Comments	DBIA/ICR reference
AUTOORD	; automatically create order

External References

Name	Field # of Occurrence
PATLINK^PRCPCSOR	AUTOORD+15
SHOWCC^PRCPCSOU	AUTOORD+2
$$ADDNEW^PRCPOPUS	AUTOORD+11
NEWORDER^PRCPOPUS	AUTOORD+9
ADD^PRCPULOC	AUTOORD+13
SHOWWHO^PRCPULOC	AUTOORD+12
$$YN^PRCPUYN	AUTOORD+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: AUTOORD+5
Function Call: WRITE	Prompt: !!,"CREATING ORDER:" Line Location: AUTOORD+8
Function Call: WRITE	Prompt: " NUMBER ",ORDERNO Line Location: AUTOORD+16

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PRCP(445.3 - [#445.3]	AUTOORD+12

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	AUTOORD+5*, AUTOORD+6, AUTOORD+7
>> OPCODE	AUTOORD+2
>> OPDATEI	AUTOORD+2
>> ORDERDA	AUTOORD+9, AUTOORD+11, AUTOORD+12*, AUTOORD+13, AUTOORD+15
ORDERNO	AUTOORD+1~, AUTOORD+10*, AUTOORD+11, AUTOORD+16
>> PRCPFLAG	AUTOORD+7*
>> PRCPPAT	AUTOORD+15
>> PRCPPRIM	AUTOORD+9, AUTOORD+11
>> PRCPSECO	AUTOORD+11
>> PRCPSURG	AUTOORD+15
>> X	AUTOORD+9, AUTOORD+10
>> XH	AUTOORD+4*
>> XH(1	AUTOORD+4*
>> XH(2	AUTOORD+4*
>> XP	AUTOORD+3*