Routine: ORY138

Customize PDF page

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

Info
Source
Call Graph
Entry Points
External References
Global Variables Directly Accessed
Label References
Naked Globals
Local Variables

Information

ORY138 ;SLC/DAN ;3/14/02 15:31

Source Information

Source file <ORY138.m>

Call Graph

Call Graph Total: 12

Package	Total	Call Graph
Order Entry Results Reporting	4	$$NMSP^ORCD SETALL^ORDD100 ES^ORDD100A $$VALUE^ORX8
Kernel	3	^%ZTLOAD ($$FMADD,$$NOW)^XLFDT MES^XPDUTL
VA Fileman	2	^DIE EN^DIQ1
MailMan	1	^XMD
Registration	1	(,INP)^VADPT
Toolkit	1	$$GET^XPAR

Entry Points

Name	Comments	DBIA/ICR reference
PTNM(IEN)	;Return pt name or -1 if unable to determine
XREF(IEN,DG,NDG)	;Update xrefs for TO field
FIXPPDG	;This section will fix incorrect package pointer and display group problems.
INSTDT(PATCH)	;Returns installation date patch first installed at site
FIXES	;This section will add missing AE Xrefs from active orders
MAIL	;Send results of cleanup in a mail message to initiator
GETIEN(STDT)	;Find first IEN associated with given start date
CHKACT	;Compares current action field with actual current action and updates if necessary
ADM(IEN,ENTERED)	;Determine if patient was inpatient when order was entered
DQ	;Enter here for queued task

External References

Name	Field # of Occurrence
^%ZTLOAD	ORY138+15
^DIE	XREF+3
EN^DIQ1	FIXPPDG+20, FIXPPDG+21
$$NMSP^ORCD	FIXES+9, FIXPPDG+17
SETALL^ORDD100	CHKACT+4
ES^ORDD100A	FIXES+16
$$VALUE^ORX8	FIXPPDG+25
^VADPT	PTNM+4
INP^VADPT	ADM+7
$$FMADD^XLFDT	FIXPPDG+3
$$NOW^XLFDT	FIXES+5
^XMD	MAIL+31
$$GET^XPAR	FIXES+4
MES^XPDUTL	ORY138+13, ORY138+16

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(9.4 - [#9.4]	FIXPPDG+7, FIXPPDG+8, FIXPPDG+11
^OR(100 - [#100]	FIXES+6, FIXES+7, FIXES+8, FIXES+9, FIXES+10, FIXES+11, FIXES+13, FIXES+14, FIXES+17, FIXPPDG+14 , FIXPPDG+15, FIXPPDG+27, FIXPPDG+28, FIXPPDG+35, FIXPPDG+36, GETIEN+3, GETIEN+4, ADM+3, XREF+2!, CHKACT+2 , CHKACT+3, CHKACT+4*
^ORD(100.98 - [#100.98]	FIXPPDG+9, FIXPPDG+10, FIXPPDG+12
^TMP("ORFIX"	DQ+2!, DQ+4!, FIXES+17, FIXES+18, FIXPPDG+27, FIXPPDG+28, FIXPPDG+29, FIXPPDG+35, FIXPPDG+36, FIXPPDG+38 , FIXPPDG+39*, MAIL+11, MAIL+12, MAIL+20, MAIL+22, MAIL+24, MAIL+26, MAIL+28
^TMP("ORTXT"	DQ+4!, MAIL+6!, MAIL+8, MAIL+9, MAIL+10, MAIL+11, MAIL+12, MAIL+13, MAIL+15, MAIL+16 , MAIL+17, MAIL+18, MAIL+19, MAIL+20, MAIL+21, MAIL+23, MAIL+25, MAIL+27, MAIL+28, MAIL+30
^XPD(9.7 - [#9.7]	INSTDT+2, INSTDT+3

Name	Line Occurrences
$$ADM	FIXPPDG+33
$$GETIEN	FIXPPDG+4
$$INSTDT	FIXPPDG+2
$$PTNM	FIXES+12, FIXPPDG+22
CHKACT	FIXES+10
FIXES	DQ+3
FIXPPDG	DQ+3
MAIL	DQ+3
XREF	FIXPPDG+29, FIXPPDG+38

Name	Field # of Occurrence
^(	GETIEN+4, CHKACT+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACT	CHKACT+1~, CHKACT+3*, CHKACT+4
ADMITTED	FIXPPDG+1~, FIXPPDG+33*, FIXPPDG+34, FIXPPDG+37, FIXPPDG+38
BADDG	FIXPPDG+1~, FIXPPDG+12*, FIXPPDG+13, FIXPPDG+19
BADPKG	FIXPPDG+1~, FIXPPDG+11*, FIXPPDG+13, FIXPPDG+19
CNT	FIXES+1~, FIXES+2, FIXES+17, FIXES+18, FIXPPDG+1~, FIXPPDG+6, FIXPPDG+19, FIXPPDG+39
CURACT	CHKACT+1~, CHKACT+2*, CHKACT+4
CURDT	FIXES+1~, FIXES+5*, FIXES+13
DA	FIXES+1~, FIXES+15, FIXPPDG+1~, FIXPPDG+20!, FIXPPDG+21!, XREF+1~, XREF+3
DATE	FIXES+1~, FIXES+7, FIXES+8, FIXPPDG+1~, FIXPPDG+2, FIXPPDG+3*, FIXPPDG+4
DFN	ADM+2~, ADM+3, ADM+4, ADM+5, PTNM+1~, PTNM+3*
DG	FIXPPDG+1~, FIXPPDG+18*, FIXPPDG+19, FIXPPDG+21, FIXPPDG+29, FIXPPDG+38, XREF~, XREF+2
>> DGN	FIXPPDG+21*, FIXPPDG+29, FIXPPDG+38
DIC	FIXPPDG+1~, FIXPPDG+20!, FIXPPDG+21!
DIE	XREF+1~, XREF+3*
DIK	FIXPPDG+1~
DIQ	FIXPPDG+20!, FIXPPDG+21!
DONE	GETIEN+1~, GETIEN+2, GETIEN+3, GETIEN+4
DR	FIXPPDG+1~, FIXPPDG+20!, FIXPPDG+21!, XREF+1~, XREF+3*
DUZ	MAIL+4
EDG	FIXPPDG+1~, FIXPPDG+37*, FIXPPDG+38
ENTERED	FIXPPDG+1~, FIXPPDG+32*, FIXPPDG+33, ADM~, ADM+6
ERR	DQ+1~, FIXPPDG+5, FIXPPDG+13, MAIL+14, MAIL+17, MAIL+20
I	MAIL+1~, MAIL+7, MAIL+8, MAIL+9, MAIL+10, MAIL+11, MAIL+12, MAIL+13, MAIL+15, MAIL+16* , MAIL+17, MAIL+18, MAIL+19, MAIL+20, MAIL+21, MAIL+23, MAIL+25, MAIL+27, MAIL+28, MAIL+29 , MAIL+30, CHKACT+1~, CHKACT+3
IDG	FIXPPDG+1~, FIXPPDG+9*, FIXPPDG+13, FIXPPDG+37
IEN	FIXES+1~, FIXES+8, FIXES+9, FIXES+10, FIXES+11, FIXES+13, FIXES+14, FIXES+15, FIXES+17, FIXPPDG+1~ , FIXPPDG+4, FIXPPDG+5, FIXPPDG+14, FIXPPDG+15, FIXPPDG+25, FIXPPDG+27, FIXPPDG+28, FIXPPDG+29, FIXPPDG+33, FIXPPDG+35 , FIXPPDG+36, FIXPPDG+38, GETIEN+1~, GETIEN+2, GETIEN+4, GETIEN+5, INSTDT+1~, INSTDT+2, INSTDT+3, ADM~ , ADM+3, PTNM~, PTNM+2, PTNM+3, XREF~, XREF+2, XREF+3, CHKACT+2, CHKACT+3, CHKACT+4
IPKG	FIXPPDG+1~, FIXPPDG+7*, FIXPPDG+13, FIXPPDG+36
>> J	MAIL+26*, MAIL+27, MAIL+28
LASTRUN	FIXES+1~, FIXES+4*, FIXES+5
NDG	XREF~, XREF+3
ODG	FIXPPDG+1~, FIXPPDG+10*, FIXPPDG+13, FIXPPDG+29, FIXPPDG+37
OPKG	FIXPPDG+1~, FIXPPDG+8*, FIXPPDG+13, FIXPPDG+28
OR0	FIXPPDG+1~, FIXPPDG+15*, FIXPPDG+16, FIXPPDG+18, FIXPPDG+22, FIXPPDG+24, FIXPPDG+32, XREF+2
ORARRAY	FIXPPDG+1~, FIXPPDG+20!, FIXPPDG+21!
ORARRAY(	FIXPPDG+20, FIXPPDG+21
>> ORD	MAIL+24*, MAIL+25, MAIL+26, MAIL+28
ORMSG	ORY138+7~, ORY138+13
ORMSG(1	ORY138+8*
ORMSG(2	ORY138+9*
ORMSG(3	ORY138+10*
ORMSG(4	ORY138+11*
ORMSG(5	ORY138+12*
PAT	FIXES+1~, FIXES+3, FIXES+6, FIXES+7, FIXES+8, FIXES+12, MAIL+22*, MAIL+23, MAIL+24, MAIL+26 , MAIL+28
PATCH	INSTDT~, INSTDT+2
PCLASS	FIXPPDG+1~, FIXPPDG+24*, FIXPPDG+27, FIXPPDG+35
PKG	FIXPPDG+1~, FIXPPDG+16*, FIXPPDG+17, FIXPPDG+19, FIXPPDG+20, FIXPPDG+28, FIXPPDG+36
>> PKGN	FIXPPDG+20*, FIXPPDG+28, FIXPPDG+36
PTNAME	FIXES+1~, FIXES+12, FIXES+17, FIXPPDG+1~, FIXPPDG+22, FIXPPDG+23, FIXPPDG+27, FIXPPDG+28, FIXPPDG+29, FIXPPDG+35 , FIXPPDG+36, FIXPPDG+38
STDT	GETIEN~, GETIEN+3*, GETIEN+4
STOPDT	FIXES+1~, FIXES+13*, FIXES+14, FIXES+17
TYPE	FIXPPDG+1~, FIXPPDG+25*, FIXPPDG+26, FIXPPDG+31
U	FIXES+9, FIXES+13, FIXPPDG+16, FIXPPDG+18, FIXPPDG+22, FIXPPDG+24, FIXPPDG+27, FIXPPDG+28, FIXPPDG+32, FIXPPDG+35 , FIXPPDG+36, FIXPPDG+39, MAIL+11, MAIL+12, INSTDT+3, ADM+3, XREF+2, CHKACT+2, CHKACT+3, CHKACT+4
VADM	PTNM+1~
VADM(1	PTNM+5, PTNM+6
VAIN	ADM+2~
VAIN(1	ADM+8
VAINDT	ADM+2~, ADM+6*
XMDUZ	MAIL+1~, MAIL+3*
XMSUB	MAIL+1~, MAIL+2*
XMTEXT	MAIL+1~, MAIL+5*
XMY	MAIL+1~
XMY(	MAIL+4*
>> ZTDESC	ORY138+14*
>> ZTDTH	ORY138+14*
>> ZTIO	ORY138+14*
>> ZTRTN	ORY138+14*
>> ZTSAVE("DUZ"	ORY138+14*
ZTSK	ORY138+7~, ORY138+16

Customize PDF page

Package: Order Entry Results Reporting

Routine: ORY138

Call Graph Total: 12