Routine: PSONEW3

Customize PDF page

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

Information

PSONEW3 ;IHS/DSD/JCM - EDIT TEMPLATE DURING NEW RX ORDER ENTRY ; 10/17/92 11:43 [ 07/23/96 6:14 PM ]

Source Information

Source file <PSONEW3.m>

Call Graph

Call Graph Total: 4

Package	Total	Call Graph
Outpatient Pharmacy	4	PROV^PSODIR (COPIES,DAYS,PTSTAT,QTY,REFILL,SIG)^PSODIR1 (CLERK,CLINIC,EXP,FILLDT,ISSDT,MW,RMK)^PSODIR2 ^PSODRG

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: 5

Package	Total	Caller Graph
Outpatient Pharmacy	5	PSODIR PSODIR1 PSODIR2 PSODIR3 PSONEW2

Entry Points

Name	Comments	DBIA/ICR reference
START	;
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
END	;
JUMP	;

External References

Name	Field # of Occurrence
PROV^PSODIR	4
COPIES^PSODIR1	11
DAYS^PSODIR1	8
PTSTAT^PSODIR1	3+1
QTY^PSODIR1	7
REFILL^PSODIR1	9
SIG^PSODIR1	10
CLERK^PSODIR2	15
CLINIC^PSODIR2	5
EXP^PSODIR2	14
FILLDT^PSODIR2	2
ISSDT^PSODIR2	1
MW^PSODIR2	12
RMK^PSODIR2	13
^PSODRG	6

Label References

Name	Line Occurrences
@(	1+1, 2+1, 3+3, 4+1, 5+1, 6+1, 7+1, 8+2, 9+2, 10+1 , 11+1, 12+1, 13+1, 14+1, 15+1
END	1+1, 2+1, 3+3, 4+1, 5+1, 6+1, 7+1, 8+2, 9+2, 10+1 , 11+1, 12+1, 13+1, 14+1, 15+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DUZ("AG"	14
>> POERR	3
>> PSOID	3
>> PSONEW	1, 2, 3+1, 4, 5, 7, 8, 9, 10, 11 , 12, 13, 14, 15
>> PSONEW("DFLG"	START+1*, 1+1, 2+1, 3+3, 4+1, 5+1, 6+1, 7+1, 8+2, 9+2 , 10+1, 11+1, 12+1, 13+1, 14+1, 15+1
>> PSONEW("FIELD"	START+1, 1+1, 2+1, 3+3, 4+1, 5+1, 6+1, 7+1, 8+2, 9+2 , 10+1, 11+1, 12+1, 13+1, 14+1, 15+1, JUMP+1
>> PSONEW("FLD"	1, 2, 3+1, 4, 5, 6, 7, 8, 9, 10 , 11, 12, 13, 14, 15*, JUMP+1
>> PSONEW("ISSUE	DATE" , 3*
PSONEW3	START+1*, END+1!
>> Y	JUMP+1