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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: ORMPS3

Package: Order Entry Results Reporting

Routine: ORMPS3


Information

ORMPS3 ;SLC/MKB - Process Pharmacy ORM msgs cont ;05/08/2008 10:32

Source Information

Source file <ORMPS3.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Order Entry Results Reporting 6 $$DOSES^ORCACT4  EN^ORCSAVE  ORDTEXT^ORCSAVE1  (DATES,RELEASE,RESP,SIGSTS)^ORCSAVE2  $$UNESC^ORHLESC  $$UNESC^ORMPS2  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Order Entry Results Reporting 3 ORMPS  ORMPS1  ORMPS2  

Entry Points

Name Comments DBIA/ICR reference
PTR(X) ; -- Return ptr to prompt OR GTX X
PARENT ; -- create parent order for backdoor complex renewals
; Expects ORIFN, ORIG, ORDIALOG()
P0 ; -- just add conjunction, new dose if DAD already exists
P1 ; -- set up links
NTE(ID) ; -- Return subscript of NTE|ID segment
NTXT(NTE) ; -- Return string of text in ORMSG(NTE)
ZSC() ; -- Return subscript of ZSC segment
NUMADDS() ; -- count number of additives to determine type
DURATION(X) ; -- Returns "# units" from U# format
UPD ; -- Compare ORMSG to order, update responses [from SC^ORMPS]
; Also expects ORIFN,ORNP,ORCAT,OR3,RXE,ZRX,PKGIFN
VALUE(IFN,ID,INST) ; -- Returns value of prompt by identifier ID
VALTXT(IFN,ID) ; -- Return string of text for prompt ID [assumes single instance]
; ID may be identifier name or Response IEN

External References

Name Field # of Occurrence
$$DOSES^ORCACT4 PARENT+4, P0+2
EN^ORCSAVE PARENT+6
ORDTEXT^ORCSAVE1 P0+18
DATES^ORCSAVE2 PARENT+10
RELEASE^ORCSAVE2 PARENT+9
RESP^ORCSAVE2 UPD+8, UPD+11, UPD+14, UPD+16, UPD+19, UPD+20
SIGSTS^ORCSAVE2 PARENT+10
$$UNESC^ORHLESC NTXT+2, NTXT+3
$$UNESC^ORMPS2 UPD+24, UPD+25

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^OR(100 - [#100] PARENT+3, PARENT+5, PARENT+7*, PARENT+8*, PARENT+11!, P0+2, P0+4*, P0+5*, P0+9*, P0+10*
, P0+11*, P0+12, P0+13, P0+14*, P0+15*, P0+17, P0+18!, P1+1*, P1+2, UPD+5
, UPD+6, UPD+21, UPD+23!, UPD+24*, UPD+25*, UPD+26*, UPD+27*, VALUE+1, VALUE+3, VALTXT+3
, VALTXT+4, VALTXT+5
^ORD(101.41 - [#101.41] PTR+1, P0+8
^TMP("ORWORD" P0+14, P0+17!*

Label References

Name Line Occurrences
$$NTE UPD+21
$$NTXT UPD+22
$$PTR P0+3, P0+7, P0+12
$$VALTXT UPD+22
$$VALUE UPD+8, UPD+11, UPD+14, UPD+19, UPD+20
$$ZSC UPD+27
P1 PARENT+5

Naked Globals

Name Field # of Occurrence
^( P0+13, P1+2*, VALTXT+4, VALTXT+5
^(0 PARENT+11*, P0+13*, P1+2*, UPD+6*
^(1 P0+4*, P0+9*, VALUE+3
^(3 PARENT+7*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CNT NUMADDS+1~*, NUMADDS+2*, NUMADDS+3, UPD+23~, UPD+24*, UPD+25*, UPD+26
DA P0+1~, P0+2*, P0+3*, P0+4, P0+5, P0+8*, P0+9, P0+10, P0+11, P0+12*
, P0+13, P0+14, P0+15, P0+17, VALTXT+2~, VALTXT+3*, VALTXT+4, VALTXT+5
DT UPD+26
HDR PARENT+3~, P1+2*
I P0+1~, P0+13*, P0+14*, P0+15, NTE+1~*, NTE+2*, NTXT+1~, NTXT+3*, ZSC+1~*, ZSC+2*
, NUMADDS+1~*, NUMADDS+2*, UPD+2~, UPD+3*, UPD+4*, UPD+5*, UPD+6, UPD+25*, VALUE+2~*, VALUE+3*
, VALTXT+2~, VALTXT+4*, VALTXT+5*
ID P0+1~, P0+3*, P0+4, P0+8*, P0+9, P0+10, NTE~, NTE+1*, NTE+2, VALUE~
, VALUE+1, VALUE+3, VALTXT~, VALTXT+2*, VALTXT+3
IFN VALUE~, VALUE+1, VALUE+3, VALTXT~, VALTXT+2*, VALTXT+3, VALTXT+4, VALTXT+5
INST P0+1~, P0+2*, P0+4, P0+5*, P0+9, VALUE~, VALUE+2*, VALUE+3
J P0+1~, P0+14*
NTE NTXT~, NTXT+1*, NTXT+2, NTXT+3, UPD+2~, UPD+21*, UPD+22, UPD+24, UPD+25
>> OR3 UPD+4
>> ORCAT UPD+9
ORDER UPD+2~, UPD+3*, UPD+8, UPD+11, UPD+14, UPD+16, UPD+19, UPD+20, UPD+21, UPD+22
, UPD+23, UPD+24, UPD+25, UPD+26, UPD+27
>> ORDIALOG( P0+7, P0+9
>> ORDUZ PARENT+9
ORIFN PARENT+6~, PARENT+7, PARENT+8, PARENT+9, PARENT+10, PARENT+11, P1+1, P1+2, UPD+3, UPD+5
, UPD+6
ORIFNDAD PARENT+3~, PARENT+5*, PARENT+8*, P0+2, P0+4, P0+5, P0+9, P0+10, P0+11, P0+12
, P0+13, P0+14, P0+15, P0+17, P0+18, P1+1, P1+2
>> ORIG PARENT+3
ORIGDAD PARENT+3~*, PARENT+4, PARENT+5, PARENT+7, PARENT+8
>> ORLOG PARENT+9, PARENT+11
>> ORMSG NTE+2, NTXT+2, NTXT+3, ZSC+2, NUMADDS+2, UPD+24, UPD+25
>> ORNATR PARENT+9
>> ORNP UPD+6
>> ORSTRT PARENT+10
>> ORVP PARENT+11
P P0+1~, P0+6*, P0+7, P0+12*
PI UPD+2~, UPD+21*, UPD+22, UPD+23, UPD+24, UPD+25, UPD+26
>> PKGIFN UPD+17
PTR P0+1~, P0+3*, P0+4, P0+7*, P0+8, P0+9, P0+14, P0+17
>> RXE NTE+1, ZSC+1, NUMADDS+1, UPD+7, UPD+10, UPD+13, UPD+18
SEG NTE+1~, NTE+2*, ZSC+1~, ZSC+2*
U PARENT+3, PARENT+5, PARENT+7, PARENT+8, PARENT+11, P0+4, P0+8, P0+9, P0+11, P0+15
, P1+1, P1+2, ZSC+2, UPD+4, UPD+6, UPD+7, UPD+10, UPD+13, UPD+26, VALUE+3
X PTR~, PTR+1, P0+1~, P0+13*, NUMADDS+1~, NUMADDS+2*, DURATION~, DURATION+1, DURATION+2, UPD+2~
, UPD+6*, UPD+7*, UPD+8, UPD+10*, UPD+11, UPD+13*, UPD+14, UPD+15, UPD+18*, UPD+19
Y NTE+1~*, NTE+2*, NTE+3, NTXT+1~, NTXT+2*, NTXT+3*, NTXT+4, ZSC+1~*, ZSC+2*, ZSC+3
, DURATION+1~, DURATION+3*, DURATION+4, VALUE+2~*, VALUE+3*, VALUE+4, VALTXT+2~, VALTXT+4*, VALTXT+5*, VALTXT+6
Y1 DURATION+1~, DURATION+2*, DURATION+3
Y2 DURATION+1~, DURATION+2*, DURATION+3
>> ZRX UPD+20
ZSC UPD+2~, UPD+27*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All