©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
TIULRR ; SLC/JM - Restricted Record Library functions ;7/17/01
Source file <TIULRR.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 2 | ^DIC $$GET1^DIQ |
| Registration | 1 | FULL^VALM1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| INITRR(ASKONCE) | ; Initializes Restricted Record List
; If ASKONCE is true, calls to PTRES will only ask once for any given ; patient. If they answer no it will not ask again. If ASKONCE is ; false, it will continue to ask on the same patient until they ; answer Yes (used when called from list manager) |
|
| PTRES(DFN) | ; Returns TRUE if patient is restricted
|
|
| DOCRESX | ||
| DOCRES(TIUDA) | ||
| KILLRR | ; Kills the Restricted Record List
|
|
| DOCCHK(TIUDA) | ||
| CHECK(DFN) |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DGSL(38.1 - [#38.1] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TIU(8925 - [#8925] | DOCRES+2, DOCCHK+1 |
| ^VA(200 - [#200] | INITRR+6 |
| Name | Line Occurrences |
|---|---|
| $$CHECK | PTRES+19, DOCCHK+1 |
| $$PTRES | DOCRES+3 |
| DOCRESX | DOCRES+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ADD | PTRES+25~, PTRES+26*, PTRES+27*, PTRES+28*, PTRES+29 |
| ASKONCE | INITRR~, INITRR+18 |
| DFN | PTRES~, PTRES+4, PTRES+9, PTRES+19, PTRES+30, CHECK~, CHECK+2 |
| DIC | CHECK+1~, CHECK+2* |
| DIC(0 | CHECK+2* |
| DOADD | PTRES+18~, PTRES+20*, PTRES+23*, PTRES+24 |
| DOCHECK | PTRES+5~, PTRES+6*, PTRES+13*, PTRES+16 |
| DONE | PTRES+8~, PTRES+9*, PTRES+10, PTRES+13* |
| DTOUT | PTRES+18~, PTRES+20 |
| DUOUT | PTRES+18~, PTRES+20 |
| DUZ | INITRR+6, INITRR+12, INITRR+14 |
| I | PTRES+8~, PTRES+10*, PTRES+11, PTRES+14 |
| IDX | PTRES+8~, PTRES+11*, PTRES+12, PTRES+14 |
| MSG | INITRR+5~, INITRR+6*, INITRR+7, INITRR+10 |
| SRCH | PTRES+8~, PTRES+9*, PTRES+11 |
| TIUBAD | PTRES+2~, PTRES+3*, PTRES+6*, PTRES+14*, PTRES+15*, PTRES+22*, PTRES+30, PTRES+31 |
| TIUD0 | DOCRES+1~, DOCRES+2*, DOCRES+3 |
| TIUDA | DOCRES~, DOCRES+2, DOCCHK~, DOCCHK+1 |
| TIURRECL | INITRR+8!, INITRR+13!, INITRR+17*, KILLRR+1, KILLRR+3!, PTRES+1, PTRES+7, PTRES+10, PTRES+27, PTRES+28 , PTRES+29*, PTRES+30 |
| TIURRECL( | PTRES+11, PTRES+14, PTRES+28, PTRES+29*, PTRES+30* |
| TIURRECL("DUZ" | INITRR+12, INITRR+14* |
| TIURRECL("ONCE" | INITRR+18*, PTRES+14, PTRES+23 |
| TIURRECL("RCNT" | INITRR+15*, INITRR+16, KILLRR+2*, KILLRR+3 |
| TIUY | DOCRES+1~*, DOCRES+3*, DOCRESX |
| U | DOCRES+2, DOCRES+3, PTRES+9, PTRES+29, PTRES+30, DOCCHK+1 |
| >> VALMAR | INITRR+9, PTRES+17 |
| X | CHECK+1~, CHECK+2* |
| Y | PTRES+18~, PTRES+19*, PTRES+22, PTRES+23, CHECK+1~, CHECK+4 |