©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
ORWU16 ; SLC/KCM - General Utilites for Windows Calls 16bit
Source file <ORWU16.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 2 | HASH^XUSHSHP $$DECRYP^XUSRB1 |
| VA Fileman | 2 | ^%DT FIELD^DID |
| Registration | 1 | WIN^DGPMDDCF |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ACTLOC(LOC) | ; Function
; Returns 1 (true) if active hospital location, otherwise 0 (false) |
|
| NEWPERS(Y,DIR,FROM,KEY) | ; Return a bolus from the NEW PERSON file
; .Return Array, Direction, Starting Text |
|
| VALIDSIG(ESOK,X) | ; procedure
|
|
| DEVICE(Y) | ; Return a list of devices
|
|
| USERINFO(Y) | ; procedure
; return DUZ^NAME^SIGNAUTH^ISPROVIDER for the current user ; I DUZ=1085 S DUZ=1298 ; CHANGE ID **** DON'T EXPORT **** |
|
| URGENCY(Y) | ; -- retrieve set values from dd for discharge summary urgency
|
|
| VALDT(Y,X,%DT) | ; Validate date/time entry
|
|
| HOSPLOC(Y,DIR,FROM) | ; Return a bolus from the HOSPITAL LOCATION file
; .Return Array, Direction, Starting Text |
| RPC Name | Call Tags |
|---|---|
| ORWU16 USERINFO | USERINFO |
| ORWU16 VALIDSIG | VALIDSIG |
| ORWU16 HOSPLOC | HOSPLOC |
| ORWU16 VALDT | VALDT |
| ORWU16 NEWPERS | NEWPERS |
| ORWU16 DEVICE | DEVICE |
| FileNo | Call Tags |
|---|---|
| ^TIU(8925 - [#8925] | FIELD^DID |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZIS(1 - [#3.5] | DEVICE+2, DEVICE+3, DEVICE+4, DEVICE+5 |
| ^%ZIS(2 - [#3.2] | DEVICE+3 |
| ^SC - [#44] | ACTLOC+2, ACTLOC+3, ACTLOC+4 |
| ^SC("B" | HOSPLOC+5, HOSPLOC+6, HOSPLOC+11, HOSPLOC+12 |
| ^VA(200 - [#200] | USERINFO+3, VALIDSIG+3, NEWPERS+5, NEWPERS+6, NEWPERS+11, NEWPERS+12 |
| ^XUSEC( | NEWPERS+6, NEWPERS+12 |
| ^XUSEC("ORELSE" | USERINFO+4 |
| ^XUSEC("OREMAS" | USERINFO+4 |
| ^XUSEC("ORES" | USERINFO+4 |
| ^XUSEC("PROVIDER" | USERINFO+5 |
| Name | Line Occurrences |
|---|---|
| $$ACTLOC | HOSPLOC+7, HOSPLOC+13 |
| Name | Field # of Occurrence |
|---|---|
| ^( | DEVICE+2 |
| ^(1 | DEVICE+5 |
| ^(90 | DEVICE+5 |
| ^(91 | DEVICE+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %DT | VALDT~, VALDT+1* |
| CNT | HOSPLOC+2~*, HOSPLOC+5, HOSPLOC+8, HOSPLOC+11, NEWPERS+2~*, NEWPERS+5, NEWPERS+8, NEWPERS+11 |
| D0 | ACTLOC+2~, ACTLOC+3* |
| >> DEV | DEVICE+1*, DEVICE+2*, DEVICE+5 |
| DIR | HOSPLOC~, HOSPLOC+4, HOSPLOC+10, NEWPERS~, NEWPERS+4, NEWPERS+10 |
| DT | ACTLOC+5 |
| DUZ | USERINFO+3, USERINFO+4, USERINFO+5, VALIDSIG+3 |
| ESOK | VALIDSIG~, VALIDSIG+1*, VALIDSIG+3* |
| FROM | HOSPLOC~, HOSPLOC+5*, HOSPLOC+6, HOSPLOC+7, HOSPLOC+11*, HOSPLOC+12, HOSPLOC+13, NEWPERS~, NEWPERS+5*, NEWPERS+6 , NEWPERS+7, NEWPERS+11*, NEWPERS+12, NEWPERS+13 |
| I | HOSPLOC+2~, HOSPLOC+5*, HOSPLOC+7, HOSPLOC+8, HOSPLOC+11*, HOSPLOC+13, NEWPERS+2~, NEWPERS+5*, NEWPERS+7, NEWPERS+8 , NEWPERS+11*, NEWPERS+13, DEVICE+1*, DEVICE+5*, URGENCY+1~, URGENCY+3* |
| IEN | HOSPLOC+2~, HOSPLOC+6*, HOSPLOC+7, HOSPLOC+12*, HOSPLOC+13, NEWPERS+2~, NEWPERS+6*, NEWPERS+7, NEWPERS+12*, NEWPERS+13 , DEVICE+2*, DEVICE+3, DEVICE+4, DEVICE+5 |
| KEY | NEWPERS~, NEWPERS+2*, NEWPERS+6, NEWPERS+12 |
| LOC | ACTLOC~, ACTLOC+2, ACTLOC+3, ACTLOC+4 |
| ORDD | URGENCY+1~ |
| ORDD("POINTER" | URGENCY+3 |
| U | USERINFO+3, USERINFO+4, USERINFO+5, VALIDSIG+3, ACTLOC+5, DEVICE+4, DEVICE+5 |
| X | VALIDSIG~, VALIDSIG+1*, VALIDSIG+3, ACTLOC+2~, ACTLOC+3, ACTLOC+4*, ACTLOC+5, VALDT~, URGENCY+1~, URGENCY+3* |
| Y | USERINFO~, USERINFO+3*, USERINFO+4*, USERINFO+5*, HOSPLOC~, NEWPERS~, DEVICE~, VALDT~, URGENCY~ |
| Y( | HOSPLOC+7*, HOSPLOC+8*, HOSPLOC+13*, NEWPERS+7*, NEWPERS+8*, NEWPERS+13*, DEVICE+5*, URGENCY+3* |