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

Package: Order Entry Results Reporting

Routine: ORMBLDPS


Information

ORMBLDPS ;SLC/MKB-Build outgoing Pharmacy ORM msgs ;Jun 10, 2025@15:22:25

Source Information

Source file <ORMBLDPS.m>

Call Graph

Call Graph

Call Graph Total: 15

Package Total Call Graph
Order Entry Results Reporting 10 $$TRIM^ORBCMA32  RESP^ORCSAVE2  $$ESC^ORHLESC  ($$GETPSNM,$$OI2DD)^ORKPS  ($$MSH,$$PID,$$PV1,$$USID)^ORMBLD  ($$ADDFRQCV,$$HL7IVLMT,$$MOB)^ORMBLDP1  $$DURATION^ORMPS3  GETOC5^OROCAPI1  
SETHL7^ORSPECAUTH  DG1^ORWDBA3  
Kernel 3 ($$FMTHL7,$$NOW)^XLFDT  $$UP^XLFSTR  MSG^XQOR  
Inpatient Medications 1 $$ENDCM^PSJORUTL  
Pharmacy Data Management 1 ALL^PSS51P2  

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

Package Total Caller Graph
Order Entry Results Reporting 7 ORADDFQT  ORCDPS1  ORCMED  ORCSEND  ORINQIV  ORMBLD  ORWPS1  
Outpatient Pharmacy 1 PSOCLPRE  

Entry Points

Name Comments DBIA/ICR reference
PTR(NAME) ; -- Returns ptr value of prompt in Dialog file
NVA ; -- new Non-VA Meds order
OUT ; -- new Outpt Meds order [same as UD, +3 fields]
UD ; -- new Inpt (Unit Dose) Meds order
UD1
NVA1 ;introduces complex Non-VA order, removed 7 lines of code that only allowed one dosage
UD2
UD3
INSTR() ; -- Return text instructions for QT-8, instance I
RMVDRGNM(ORIG,OROI,OROUTPT) ;remove the drug name from the dosage string
HL7DUR() ; -- Returns HL7 form of duration X
HDQ
IV ; -- new IV Meds order
IV1
RXR(ROUTE) ; -- Returns RXR segment
ZRX(IFN,OUTPT) ; -- Returns ZRX segment
ZRN(IFN,ORMSG,I) ; -- Set ZRN segment
ORDCHKS ; -- Include order checks in OBX segments
HL7UNIT(X) ; -- Return coded element for volume/strength units
VER(IFN) ; -- Send msg for nurse-verified orders
REF(IFN,ROUTING,CLINIC) ; -- Send msg for refill request
ESC(STR) ;

External References

Name Field # of Occurrence
$$TRIM^ORBCMA32 RMVDRGNM+8
RESP^ORCSAVE2 IV+8
$$ESC^ORHLESC ESC+1
$$GETPSNM^ORKPS RMVDRGNM+7
$$OI2DD^ORKPS RMVDRGNM+5
$$MSH^ORMBLD VER+2, REF+3
$$PID^ORMBLD VER+2, REF+3
$$PV1^ORMBLD VER+3, REF+4
$$USID^ORMBLD NVA1+8, IV1+3, IV1+7
$$ADDFRQCV^ORMBLDP1 IV1+7
$$HL7IVLMT^ORMBLDP1 IV+25
$$MOB^ORMBLDP1 IV+7
$$DURATION^ORMPS3 UD1+4
GETOC5^OROCAPI1 ORDCHKS+2
SETHL7^ORSPECAUTH UD3+3
DG1^ORWDBA3 UD3+5, IV1+17
$$ENDCM^PSJORUTL NVA1+7
ALL^PSS51P2 RXR+4
$$FMTHL7^XLFDT NVA1+2, ORDCHKS+6, ORDCHKS+9, VER+4, REF+5
$$NOW^XLFDT VER+4, REF+5
$$UP^XLFSTR HL7DUR+3, HL7UNIT+3
MSG^XQOR VER+5, REF+7

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^OR(100 - [#100] UD+4, IV+6, IV+7, IV+22, ZRX+2, ZRX+5, ZRX+12, VER+1, VER+4, REF+1
, REF+5
^ORD(100.02 - [#100.02] ZRX+3
^ORD(100.98 - [#100.98] UD3+6
^ORD(101.41 - [#101.41] PTR+1
^ORD(101.42 - [#101.42] UD1+6, IV+20
^ORD(101.43 - [#101.43] IV1+2
^TMP("ORWORD" UD2+5, UD2+6, UD2+7, UD2+9, UD2+10, UD2+11, IV+28, IV+29, IV+30, ZRN+5
, ZRN+6, ZRN+8
^TMP($J RXR+3!, RXR+5, RXR+7!

Label References

Name Line Occurrences
$$ESC UD1+3, NVA1+9, UD2+6, UD3+8, INSTR+2, INSTR+9, IV+17, IV+23, IV+26, IV+29
, ORDCHKS+5, ORDCHKS+10
$$HL7DUR UD1+4
$$HL7UNIT IV1+3, IV1+7
$$INSTR UD1+9
$$PTR UD+5, UD+6, UD+7, UD+8, UD+9, UD+10, UD+11, UD2+2, INSTR+4, INSTR+7
, IV+4, IV+5, IV+9, IV+10, IV+11, IV+12, IV+13, IV+14, IV+15, IV+17
, IV+32, ZRX+8, ZRX+14, ZRN+3
$$RMVDRGNM INSTR+5
$$RXR UD3, IV+33
$$ZRX UD3+2, IV1+10
HDQ HL7DUR+2
ORDCHKS UD3+1, IV1+9
ZRN UD3+7

Naked Globals

Name Field # of Occurrence
^( UD2+7, UD2+11, IV+30, ZRN+8
^(8 ZRX+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADDFREQ IV+3~, IV+10*, IV1+7
ADDS IV+1~, IV+9*, IV1+4, IV1+5, IV1+6
ADMIN UD+1~, UD+6*, UD1+3
CLINIC REF~, REF+2*, REF+4
CNT IV+3~, ORDCHKS+1~*, ORDCHKS+4*, ORDCHKS+5
CONJ UD+1~, UD+10*, UD1+8
DFN IV+3~
DISPENSE UD+1~, NVA1+7*, NVA1+10
DOSE UD+1~, UD+8*, UD1+1, INSTR+1
DRUG UD+1~, UD+5*, NVA1+7, INSTR+2
DSPY UD2+1~, UD2+2*, UD2+3
DUR UD+1~, UD+8*, HL7DUR+1
DUZ VER+4, REF+5
I UD+1~, UD1*, UD1+1, UD1+3, UD1+6, UD1+7, UD1+8, NVA1+3*, NVA1+6*, UD2+4*
, UD2+6*, UD2+10*, UD2+11, UD3*, UD3+2*, UD3+3, UD3+5, UD3+7*, INSTR+1, INSTR+3
, INSTR+7, HL7DUR+1, IV+1~, IV+27*, IV+29*, IV+33*, IV1+3*, IV1+7*, IV1+15*, IV1+17
, ZRN~, ZRN+2, ZRN+7, ZRN+9, ORDCHKS+4*, ORDCHKS+5, ORDCHKS+6, ORDCHKS+8, ORDCHKS+9, ORDCHKS+10*
, HL7UNIT+1~, HL7UNIT+2*, HL7UNIT+3, HL7UNIT+4*
IEN RXR+1~
IFN UD+4, UD3+2, UD3+3, UD3+5, UD3+7, IV+6, IV+7, IV+8, IV+22, IV1+10
, IV1+17, ZRX~, ZRX+2, ZRX+5, ZRN~, ORDCHKS+2, ORDCHKS+3, ORDCHKS+5, ORDCHKS+6, ORDCHKS+7
, ORDCHKS+8, ORDCHKS+9, ORDCHKS+10, VER~, VER+1, VER+4, REF~, REF+1, REF+5
INDICATN UD+2~, UD+11*, UD3+8, IV+3~, IV+15*, IV+26
INST IV+1~, IV1*, IV1+1, IV1+3, IV1+5*, IV1+6, IV1+7
INSTR UD+1~, UD+6*, UD1, INSTR+3
IVLIMIT IV+2~, IV+4*, IV+24*, IV+25*
IVTYPE IV+3~, IV+5*, IV+6, IV+7*, IV+8, IV+17, IV+18, IV1+14
IVZRX IV+3~, IV1+10*, IV1+14*, IV1+15
J UD+1~, UD+12*, UD1+9*, NVA1+2*, NVA1+3*, NVA1+4*, UD2+5*, UD2+6, UD2+7*, UD2+9*
, UD2+10, UD2+11*, UD3*, IV+28~*, IV+29, IV+30*, ZRN+1~, ZRN+5*, ZRN+6, ZRN+8*
, ORDCHKS+8~*
K UD+1~, UD2+7*, UD2+11*, IV+28~, IV+30*, ZRN+1~, ZRN+6*, ZRN+7*, ZRN+9*
L UD+1~, NVA1+6*
NAME PTR~, PTR+1, RXR+1~, RXR+5*, RXR+8
NATURE ZRX+1~, ZRX+2*, ZRX+3*, ZRX+7
NVA NVA+1~*, UD1+4
OC ORDCHKS+1~, ORDCHKS+3*, ORDCHKS+5, ORDCHKS+6, ORDCHKS+7, ORDCHKS+8, ORDCHKS+9, ORDCHKS+10
OI UD+1~, UD+5*, NVA1+8
OITXT UD+1~, NVA1+8*, NVA1+9
OITXT2 UD+1~, NVA1+9*, NVA1+10
OR0 UD+3, NVA1+2, UD3+6, VER+1~*, VER+2, VER+3, REF+1~*, REF+2, REF+3, REF+4
ORBCMA IV+3~
ORC UD+1~, NVA1+3*, NVA1+4
ORC( UD+12*, UD1+9*, NVA1+3*, NVA1+4
ORC(2 NVA1+2*
ORDD RMVDRGNM+1~, RMVDRGNM+5*, RMVDRGNM+6, RMVDRGNM+7
ORDGNAME RMVDRGNM+1~, RMVDRGNM+7*, RMVDRGNM+8
>> ORDIALOG( UD1, UD1+1, UD1+3, UD1+6, UD1+7, UD1+8, NVA1+7, NVA1+8, UD2+3, UD2+4
, UD2+8, UD3, UD3+8, INSTR+1, INSTR+2, INSTR+3, INSTR+4, INSTR+7, HL7DUR+1, IV+5
, IV+14, IV+17, IV+23, IV+24, IV+26, IV+27, IV+33, IV1, IV1+1, IV1+3
, IV1+4, IV1+5, IV1+6, IV1+7, ZRX+8, ZRX+14, ZRN+4
>> ORIFN ZRX+12
ORIG RMVDRGNM~, RMVDRGNM+2, RMVDRGNM+6, RMVDRGNM+8*, RMVDRGNM+9, ZRX+1~, ZRX+5*
>> ORL REF+2
ORMSG UD3+3, UD3+7, ZRN~, VER+1~, VER+5, REF+1~, REF+7
ORMSG( UD2+10*, UD2+11*, UD3*, UD3+2*, IV+33*, IV1+3*, IV1+7*, IV1+15*, ZRN+2*, ZRN+7*
, ZRN+9*, ORDCHKS+5*, ORDCHKS+6*, ORDCHKS+8*, ORDCHKS+9*, ORDCHKS+10*
ORMSG(1 VER+2*, REF+3*
ORMSG(2 VER+2*, REF+3*
ORMSG(3 VER+3*, REF+4*
ORMSG(4 UD+4*, UD+12, NVA1+3*, IV+21*, IV+22*, VER+4*, REF+5*
ORMSG(5 NVA1+10*, UD2+3*, UD3+8*, IV+23*, IV+25*, IV+26*, REF+6*
ORMSG(6 UD2+6*, UD2+7*, IV+29*, IV+30*
>> ORNP REF+5
OROI INSTR+1~, INSTR+4*, INSTR+5, RMVDRGNM~, RMVDRGNM+5
OROUT RMVDRGNM+1~, RMVDRGNM+2*
OROUTPT RMVDRGNM~, RMVDRGNM+4
ORRET ORDCHKS+1~, ORDCHKS+2
ORRET( ORDCHKS+3, ORDCHKS+5, ORDCHKS+6, ORDCHKS+7, ORDCHKS+8, ORDCHKS+9, ORDCHKS+10
ORTITR ZRX+1~, ZRX+14*, ZRX+15
ORTYPE RMVDRGNM+1~, RMVDRGNM+3*, RMVDRGNM+4*, RMVDRGNM+5
OUTPT UD+1~, UD+3*, UD1+3, UD2, UD2+8, UD3+2, UD3+3, INSTR+5, INSTR+6, ZRX~
, ZRX+11, ZRX+12
PI UD+1~, UD+10*, UD2+8, UD2+9, UD2+10, UD2+11
PROVCOMM UD+1~, UD+9*, UD2+4, UD2+5, UD2+6, UD2+7
PSORIG ZRX+1~, ZRX+4*, ZRX+5*, ZRX+6*, ZRX+7
QT IV+1~, IV+17*, IV+18*, IV+20*, IV+21
QT1 UD+1~, UD1+5*, UD1+9
QT2 UD+1~, UD1+3*, UD1+9
QT3 UD+1~, UD1+4*, UD1+9
QT4 UD+1~
QT6 UD+1~, UD1+6*, UD1+9
QT7 UD+2~, UD1+7*, UD1+9
QT9 UD+1~, UD1+8*, UD1+9
QTY UD2+1~, UD2+2*, UD2+3
RATE IV+1~, IV+9*, IV+23*, IV+25
REFS UD2+1~, UD2+2*, UD2+3
ROUTE UD+1~, UD+9*, UD3, IV+3~, IV+32*, IV+33, RXR~, RXR+2, RXR+4, RXR+5
, RXR+8
ROUTING ZRX+1~, ZRX+8*, ZRX+11*, ZRX+12, REF~, REF+6
SC UD+1~
SCHED UD+1~, UD+6*, UD1+3
SCHTYPE UD+2~, UD+7*, UD1+7, IV+13*
SOLN IV+1~, IV+14*, IV1, IV1+1
ST ZRN+1~, ZRN+3*, ZRN+4, ZRN+5, ZRN+6, ZRN+8
STR IV+1~, IV+11*, IV1+7, ESC~, ESC+1
TXT ZRN+1~, ZRN+6*, ZRN+7, ZRN+8*, ZRN+9
TYPE ZRX+1~, ZRX+2*, ZRX+4, ZRX+6*, ZRX+7
U UD+3, UD+4, UD1+6, UD1+9, NVA1+2, NVA1+7, NVA1+9, UD3+6, IV+6, IV+7
, IV+17, IV+20, IV+22, IV1+2, RXR+8, ZRX+2, ZRX+3, ZRX+5, ORDCHKS+6, ORDCHKS+9
, HL7UNIT+4, VER+2, VER+3, REF+1, REF+2, REF+3, REF+4
UNIT HL7UNIT+1~, HL7UNIT+3*, HL7UNIT+4
UNITS INSTR+7~*, IV+1~, IV+11*, IV1+6
UNT INSTR+7~*, INSTR+8
URG UD+1~, UD+8*, UD1+6, IV+1~, IV+14*, IV+20
VOL IV+1~, IV+12*, IV1+3
WP IV+1~, IV+12*, IV+27, IV+28, IV+29, IV+30
X UD+1~, UD+4*, UD1+1*, UD1+5, NVA1+3*, NVA1+5, NVA1+6*, NVA1+7*, HL7DUR+1~*, HL7DUR+2
, HL7DUR+3, IV+3~, IV+22*, HL7UNIT~, HL7UNIT+2, HL7UNIT+3, HL7UNIT+4*
X1 HL7DUR+1~, HL7DUR+2*, HL7DUR+3, HL7DUR+4, IV+1~, IV1+1*, IV1+2*, IV1+3, IV1+6*, IV1+7
X2 HL7DUR+1~, HL7DUR+3*, HL7DUR+4, IV+1~, IV1+1*, IV1+2, IV1+3, IV1+6*, IV1+7
Y UD+1~, NVA1+4*, NVA1+5, NVA1+6, INSTR+1~*, INSTR+2, INSTR+3*, INSTR+5*, INSTR+8*, INSTR+9
, HL7DUR+1~, HL7DUR+2*, HL7DUR+4*, HDQ, HL7UNIT+1~, HL7UNIT+3*, HL7UNIT+4*, HL7UNIT+5
ZRN ZRN+1~
ZRX ZRX+1~, ZRX+7*, ZRX+12*, ZRX+15*, ZRX+16
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All