Routine: ORY134

Package	Total	Call Graph
Order Entry Results Reporting	4	$$NMSP^ORCD TEXT^ORQ12 $$STATUS^ORQOR2 $$VALUE^ORX8
Kernel	3	^%ZTLOAD $$REPEAT^XLFSTR MES^XPDUTL
MailMan	1	^XMD
Registration	1	^VADPT

Entry Points

Name	Comments	DBIA/ICR reference
DQ	;Enter here for queued task
FIX	;This section will identify active orders with fractional dose problems
MAIL	;Send results of review in a mail message to initiator
PTID(IEN)	;Return pt name and 1A4U identifiers or -1 if unable to determine
UPDT()	;Function to determine if order has been updated yet.
DRUG()	;Get dispense drug or orderable item
PSNMGR(XMY)	;Add PSNMGR key holders to XMY array

Name	Line Occurrences (* Changed, ! Killed)
^OR(100 - [#100]	FIX+3, FIX+4, FIX+5, FIX+6, UPDT+3
^TMP("ORFIX"	DQ+1!, DQ+3!, FIX+8*, MAIL+27, MAIL+29, MAIL+31, MAIL+32, MAIL+33
^TMP("ORTXT"	DQ+3!, MAIL+6!, MAIL+8, MAIL+9, MAIL+10, MAIL+11, MAIL+12, MAIL+13, MAIL+14, MAIL+15 , MAIL+16, MAIL+17, MAIL+18, MAIL+19, MAIL+20, MAIL+21, MAIL+22, MAIL+23, MAIL+24, MAIL+25 , MAIL+26, MAIL+27, MAIL+28, MAIL+30, MAIL+33, MAIL+34
^XUSEC("PSNMGR"	PSNMGR+3

Name	Field # of Occurrence
DATE	FIX+1~, FIX+4*, FIX+5
DFN	PTID+1~, PTID+3*
DUZ	MAIL+4
I	MAIL+1~, MAIL+7, MAIL+8, MAIL+9, MAIL+10, MAIL+11, MAIL+12, MAIL+13, MAIL+14, MAIL+15* , MAIL+16, MAIL+17, MAIL+18, MAIL+19, MAIL+20, MAIL+21, MAIL+22, MAIL+23, MAIL+24, MAIL+25 , MAIL+26, MAIL+27, MAIL+28, MAIL+30, MAIL+33, MAIL+34, UPDT+1~, UPDT+4*
IEN	FIX+1~, FIX+5, FIX+6, FIX+8, MAIL+1~, MAIL+32, MAIL+33, PTID~, PTID+2, PTID+3 , UPDT+3, DRUG+2, DRUG+3
ORMSG	ORY134+5~, ORY134+12
ORMSG(1	ORY134+6*
ORMSG(2	ORY134+7*
ORMSG(3	ORY134+8*
ORMSG(4	ORY134+9*
ORMSG(5	ORY134+10*
ORMSG(6	ORY134+11*
PAT	FIX+1~, FIX+2, FIX+3, FIX+4, FIX+5, FIX+7, MAIL+1~, MAIL+31*, MAIL+32, MAIL+33
PTID	FIX+1~, FIX+7*, FIX+8
STA	MAIL+1~, MAIL+29*, MAIL+30, MAIL+31, MAIL+32, MAIL+33
TXT	UPDT+1~, UPDT+3, UPDT+4
TXT(	UPDT+4
U	FIX+6, FIX+8, UPDT+3
UPDT	UPDT+1~, UPDT+2, UPDT+4, UPDT+5
USER	PSNMGR+2~, PSNMGR+3*
VADM	PTID+1~
VADM(1	PTID+5, PTID+6
VADM(2	PTID+6
VALUE	DRUG+1~, DRUG+2, DRUG+3, DRUG+4
XMDUZ	MAIL+1~, MAIL+3*
XMSUB	MAIL+1~, MAIL+2*
XMTEXT	MAIL+1~, MAIL+5*
XMY	MAIL+1~, MAIL+4, PSNMGR~
XMY(	MAIL+4, PSNMGR+3
>> ZTDESC	ORY134+13*
>> ZTDTH	ORY134+13*
>> ZTIO	ORY134+13*
>> ZTRTN	ORY134+13*
>> ZTSAVE("DUZ"	ORY134+13*
ZTSK	ORY134+5~, ORY134+15