RAORDU ;HISC/CAH - AISC/RMO-Update Request Status ; Feb 14, 2025@07:59:30
Source file <RAORDU.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SETLOG | ||
| SETORD | ;Create request in OE/RR file and add OE/RR order number to file 75.1
; if oe/rr v.3 or greater send an hl7 message when creating a new request/order. |
|
| OERR | ;Set ^XUTL("OR",$J,"RA",IFN of oerr,IFN of Rad/Nuc Med order)
|
|
| DELETE | ||
| ORVR() | ;returns version number of OE/RR
|
|
| ORQUIK() | ;returns 1 if CPRS Order Dialogue file 101.41 exists
|
|
| SITE() | ; Determine the value of RADIV
; +$P(RA1,"^",22)=Requesting Location ; +$P(RA2,"^",15)=Division (pntr to 40.8) |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^RAO(75.1 - [#75.1] | Classic Fileman Calls |
| ^RA(79.2 - [#79.2] | Classic Fileman Calls |