Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: ORMPS2

Package: Order Entry Results Reporting

Routine: ORMPS2


Information

ORMPS2 ;SLC/MKB - Process Pharmacy ORM msgs cont ;04/01/2008

Source Information

Source file <ORMPS2.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
Order Entry Results Reporting 10 ($$ACTION,RESPONSE)^ORCSAVE  ORDTEXT^ORCSAVE1  (DATES,RELEASE,SIGN,SIGSTS,STATUS)^ORCSAVE2  SETALL^ORDD100  $$UNESC^ORHLESC  $$FIND^ORM  $$HL7IVLMT^ORMBLDP1  ($$RXC,$$RXO,$$RXR)^ORMPS  
($$NTE,$$NTXT,$$NUMADDS,$$VALTXT,$$ZSC)^ORMPS3  PRINTS^ORWD1  
VA Fileman 1 ^DIE  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Order Entry Results Reporting 4 ORMPS  ORMPS1  ORMPS3  ORY94A  

Entry Points

Name Comments DBIA/ICR reference
UNESC(STRING) ;
RO ; -- Replacement order (finished)
CHANGED() ; -- Compare ORMSG to order ORIFN, return 1 if different
VALUE(ID) ; -- Return value of ID in ^OR(100,+ORIFN,4.5,"ID")
CHQ
FINISHED() ; -- new order [SN^ORMPS] due to finishing?
IVX() ; -- Compare ORMSG to Inpt order ORIFN if IV, return 0 if 'diff or 'IV
IVLIM(IVDUR) ;
IV1
WQ
PCOMM ; -- Get Provider Comments from previous order, when changed
UNESCARR(ARR) ;
RO1 ; -Update sts of order to active, last action to dc/edit:
RO2 ; -Update responses, get/save new order text:
WPX() ; -- Compare comments in @ORMSG@(NTE) with order ORIFN
; Returns 1 if different, or 0 if same
PTR(X) ; -- Return ptr to prompt OR GTX X

External References

Name Field # of Occurrence
^DIE RO2+7
$$ACTION^ORCSAVE RO+12
RESPONSE^ORCSAVE RO2+1
ORDTEXT^ORCSAVE1 RO2+1
DATES^ORCSAVE2 RO1+5
RELEASE^ORCSAVE2 RO1+6
SIGN^ORCSAVE2 RO1+9
SIGSTS^ORCSAVE2 RO1+9
STATUS^ORCSAVE2 RO1+4
SETALL^ORDD100 RO1+4
$$UNESC^ORHLESC UNESC+1
$$FIND^ORM IV1
$$HL7IVLMT^ORMBLDP1 CHANGED+6
$$RXC^ORMPS IVX+2, RO+6
$$RXO^ORMPS CHANGED+7, RO+6
$$RXR^ORMPS IV1+5
$$NTE^ORMPS3 WPX+3, CHANGED+15, CHANGED+17
$$NTXT^ORMPS3 WPX+3, CHANGED+21
$$NUMADDS^ORMPS3 IVX+6
$$VALTXT^ORMPS3 WPX+4, CHANGED+20
$$ZSC^ORMPS3 RO2+11
PRINTS^ORWD1 RO2+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^OR(100 - [#100] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^OR(100 - [#100] FINISHED+2, IVX+3, IV1+12, IV1+13, IV1+14, IV1+15, IV1+16, CHANGED+15, CHANGED+16, CHANGED+17
, VALUE+2, VALUE+3, RO1+1, RO1+2*, RO1+3*, RO1+8, RO2+1!, RO2+2*, RO2+5, RO2+8*
, RO2+11*, PCOMM+3, PCOMM+4, PCOMM+5
^ORD(100.98 - [#100.98] IVX+3, RO2+5
^ORD(101.41 - [#101.41] PTR+1
^ORD(101.43 - [#101.43] IVX+7, IV1+17
^TMP("ORWORD" RO+3!, PCOMM+5*
^VA(200 - [#200] RO+4

Label References

Name Line Occurrences
$$IVX CHANGED+9
$$PTR IV1+7, RO+11
$$UNESC UNESCARR+5
$$VALUE IVX+7, IVX+10, IV1+1, IV1+4, IV1+6, CHANGED+4, CHANGED+11, CHANGED+12, RO+11
$$WPX CHANGED+3
@( RO+8
CHQ CHANGED+2, CHANGED+11, CHANGED+12, CHANGED+16, CHANGED+19
UNESCARR UNESCARR+4

Naked Globals

Name Field # of Occurrence
^( RO1+1
^(0 RO1+1, RO2+2*
^(1 IV1+16
^(3 RO1+3
^(6 RO1+3!
^(8 RO2+8*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADMIN RO+2~
ARR UNESCARR~, UNESCARR+1, UNESCARR+2, UNESCARR+3, UNESCARR+5
DA RO2+6~, RO2+7*
DG IVX+1~, IVX+3*, IVX+4
DIE RO2+6~, RO2+7*
DR RO2+6~, RO2+7*
DURU IVLIM+2~*, IVLIM+3*, IVLIM+5, IVLIM+6, IVLIM+7, IVLIM+8
DURV IVLIM+2~*, IVLIM+3*, IVLIM+4*, IVLIM+5, IVLIM+6, IVLIM+7, IVLIM+8
I IVX+1~, IV1+7*, IV1+8*, IV1+11*, IV1+12, IV1+14, IV1+15*, IV1+16, CHANGED+1~, VALUE+1~
, VALUE+2*, VALUE+3, UNESCARR+1~*, UNESCARR+2, UNESCARR+3, UNESCARR+5, PCOMM+1~, PCOMM+3*, PCOMM+4, PCOMM+5
ID VALUE~, VALUE+1, VALUE+2
IND UNESCARR+2~*, UNESCARR+4
INST IVX+1~, IV1+13*, IV1+14, IV1+19*, IV1+20, IV1+21, IV1+24*, IV1+25
IVDUR IVLIM~, IVLIM+1, IVLIM+3, IVLIM+4*, IVLIM+5*, IVLIM+6*, IVLIM+7*, IVLIM+8*, IVLIM+9
IVTYPE RO+2~
J IVX+1~, IV1+12*, IV1+13, IV1+14
NEWSTS RO+1~, RO1+3*, RO1+4
NTE WPX+2~, WPX+3*, CHANGED+1~, CHANGED+15*, CHANGED+16, CHANGED+17*, CHANGED+18, CHANGED+19, CHANGED+21*, CHANGED+22
OI IVX+1~, IVX+7*, IV1+16*, IV1+17
OI0 IVX+1~, IV1+16*, IV1+18, IV1+19, IV1+23, IV1+24
OLD PCOMM+1~, PCOMM+2*, PCOMM+3, PCOMM+4, PCOMM+5
ORA IVX+1~, IV1+7*, IV1+18
ORB IVX+1~, IV1+7*, IV1+23
>> ORCAT CHANGED+2, RO+8, RO2+11
ORDA RO+1~, RO+12*, RO+13, RO1+1, RO1+3, RO1+6, RO1+9, RO2+1, RO2+8, RO2+9
>> ORDCNTRL RO2+9*
ORDG RO+1~, RO2+5, RO2+7
ORDIALOG RO+1~, RO2+2
ORDIALOG( RO+11*, PCOMM+6*, PCOMM+7*
>> ORERR RO+4*, RO+5*, RO+7*, RO+8, RO+13*
>> ORIFN FINISHED+3*, WPX+4, IVX+3, IV1+12, IV1+13, IV1+14, IV1+15, IV1+16, CHANGED+15, CHANGED+16
, CHANGED+17, CHANGED+20, VALUE+2, VALUE+3, RO+6*, RO+7, RO+12, RO1+1, RO1+2, RO1+3
, RO1+4, RO1+5, RO1+6, RO1+8, RO1+9, RO2+1, RO2+2, RO2+5, RO2+7, RO2+8
, RO2+9*, RO2+10, RO2+11, PCOMM+2
ORIG FINISHED+1~, FINISHED+2*, FINISHED+3
ORIG4 FINISHED+1~, FINISHED+2*, FINISHED+3
>> ORL RO2+10
>> ORMSG IVX+8, IV1+8, CHANGED+16
>> ORNATR RO1+6
>> ORNOW RO+12, RO1+6
>> ORNP RO+4, RO+12
ORP RO+1~, RO2+10
ORP(1 RO2+10*
ORPKG RO+1~, RO2+2
ORSIG RO+1~, RO1+8*, RO1+9
>> ORSTOP RO1+5
>> ORSTRT RO1+5
>> ORSTS RO1+3, RO1+4
>> ORWHO RO+12, RO1+6
ORX IVX+1~, RO+1~, RO1+1*, RO1+2, RO1+8, RO1+9
ORX( IV1+9*, IV1+14*
ORX("A" IV1+18, IV1+19, IV1+22!, IV1+28
ORX("B" IV1+23, IV1+24, IV1+26!, IV1+28
ORX("STRENGTH" IV1+20
ORX("UNITS" IV1+21
ORX("VOLUME" IV1+25
>> PC PCOMM+5, PCOMM+6, PCOMM+7
PI CHANGED+1~, CHANGED+17*, CHANGED+18, CHANGED+19, CHANGED+20*, CHANGED+22
>> PKGIFN RO2+8
PSOI IVX+1~, IVX+7*, IVX+8, IV1+17*, IV1+18, IV1+19, IV1+22, IV1+23, IV1+24, IV1+26
RATE IVX+1~, IV1*, IV1+1*, IV1+2*, IV1+3
RXC IVX+1~, IVX+2*, IVX+8, IV1+7, RO+1~, RO+6*, RO+8, RO+11
>> RXE IV1, CHANGED+11, CHANGED+12, RO+5
RXO RO+1~, RO+6*
RXR IVX+1~, IV1+5*, IV1+6
SIG CHANGED+1~, CHANGED+15*, CHANGED+16
SPINST WPX+2~, WPX+3*, WPX+5
STR IVX+1~, IV1+19*, IV1+20
STRING UNESC~, UNESC+1
TRXO CHANGED+1~, CHANGED+7*
TYPE FINISHED+1~, FINISHED+2*, FINISHED+3, UNESCARR+3~*, UNESCARR+4, UNESCARR+5
U IVX+3, IVX+7, IVX+8, IVX+9, IV1, IV1+6, IV1+9, IV1+13, IV1+17, IV1+18
, IV1+19, IV1+23, IV1+24, CHANGED+7, RO1+1, RO1+2, RO1+3, RO1+8, RO2+2, RO2+5
, RO2+8
UNT IVX+1~, IV1*, IV1+1, IV1+19*, IV1+21
VOL IVX+1~, IV1+24*, IV1+25
X WPX+2~, WPX+4*, WPX+5, IVX+1~, IV1+1*, IV1+2*, IV1+3, CHANGED+1~, CHANGED+4*, CHANGED+5
, CHANGED+6*, PTR~, PTR+1
X1 IVX+9~*, IVX+10, CHANGED+1~, CHANGED+5, CHANGED+7*
X2 IVX+9~*, IVX+10
X3 IVX+9~, IVX+10*
XC IVX+1~, IVX+8*, IVX+9, IV1+8*, IV1+9
Y FINISHED+1~*, FINISHED+3*, FINISHED+4, WPX+2~*, WPX+5*, WQ, IVX+1~, IVX+2*, IVX+4, IVX+5*
, IVX+6*, IVX+8*, IVX+10*, IV1+1, IV1+3*, IV1+4*, IV1+6*, IV1+15, IV1+20*, IV1+21*
, IV1+25*, IV1+27*, IV1+28*, IV1+29, CHANGED+1~*, CHANGED+3*, CHANGED+5*, CHANGED+9*, CHANGED+11*, CHANGED+12*
, CHANGED+16*, CHANGED+22*, CHQ, VALUE+1~, VALUE+3*, VALUE+4
>> ZRX FINISHED+2, IVX+5, IV1+4, PCOMM+2
ZSC RO+1~, RO2+11*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All