©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
TIULP1 ; SLC/JER - More functions determining privilege ;1/19/95 17:49
Source file <TIULP1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CANDEL(DA) | ; Check whether user has authority to delete record
|
|
| CANSEND(TIUDA) | ; Checks of user can send DCS back to transcription
|
|
| CANDELX | ||
| READYX | ;Exit for READYSIG
|
|
| ADDAX | ;Exit for CANADDA
|
|
| CANEDITA(TIUDA,TIUY) | ;Checks if an Addendum can be edited
|
|
| EDITAX | ;Exit for CANEDITA
|
|
| READYSIG(DA) | ;Check if user is provider & rec is ready for signature
|
|
| CANADDA(DA) | ;Checks if an Addendum can be added
|
|
| CANAMNX | ||
| CANAMND(TIUDA) | ; Checks whether user can amend a discharge summary
|
| Name | Field # of Occurrence |
|---|---|
| $$READ^TIUU | CANSEND+6 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TIU(8925 - [#8925] | CANADDA+3, CANEDITA+3, CANEDITA+4, CANEDITA+5, READYSIG+2, CANSEND+2, CANSEND+5, CANAMND+2 |
| ^XUSEC("PROVIDER" | READYSIG+3 |
| ^XUSEC("TIU AUTHOR" | READYSIG+3 |
| ^XUSEC("TIU MANAGER" | CANEDITA+14, CANEDITA+18, CANDEL+2 |
| ^XUSEC("TIU SERVICE CHIEF" | CANEDITA+6 |
| ^XUSEC("TIU SURROGATE" | CANEDITA+21, READYSIG+3 |
| Name | Line Occurrences |
|---|---|
| ADDAX | CANADDA+2, CANADDA+4, CANADDA+8, CANADDA+10 |
| CANAMNX | CANAMND+4 |
| CANDELX | CANDEL+2 |
| EDITAX | CANEDITA+3 |
| Name | Field # of Occurrence |
|---|---|
| ^(13 | CANADDA+3 |
| ^(15 | CANADDA+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACT | CANADDA+8, CANADDA+9, CANADDA+10, CANADDA+11, CANEDITA+1~, CANEDITA+5*, CANEDITA+7, CANEDITA+10, CANEDITA+12, CANEDITA+15 , CANEDITA+16, CANEDITA+18, CANEDITA+21, CANEDITA+22, CANEDITA+23, CANEDITA+26, READYSIG+1~, READYSIG+2*, READYSIG+5, READYSIG+8 , CANSEND+1~, CANSEND+2*, CANSEND+3, CANSEND+4, CANSEND+6, CANAMND+1~, CANAMND+2*, CANAMND+3, CANAMND+4 |
| COSIGN | CANEDITA+1~, CANEDITA+5*, CANEDITA+15, CANEDITA+19, CANEDITA+24, CANEDITA+25, CANEDITA+26 |
| DA | CANADDA~, CANADDA+2, CANADDA+3, CANEDITA+1~, CANEDITA+4*, CANEDITA+5, CANEDITA+10, CANEDITA+12, CANEDITA+15, CANEDITA+16 , CANEDITA+19, CANEDITA+25, CANEDITA+26, READYSIG~, READYSIG+2, CANDEL~, CANSEND+5 |
| DUZ | CANADDA+8, CANADDA+10, CANEDITA+6, CANEDITA+14, CANEDITA+16, CANEDITA+18, CANEDITA+21, CANEDITA+26, READYSIG+3, CANDEL+2 |
| SIGN | CANEDITA+1~, CANEDITA+5*, CANEDITA+15, CANEDITA+19, CANEDITA+25, CANEDITA+26 |
| TIU0 | CANADDA+1~, CANADDA+3*, CANADDA+4 |
| TIU13 | CANADDA+1~, CANADDA+3* |
| TIU15 | CANADDA+1~, CANADDA+3* |
| TIUCHIEF | CANEDITA+1~, CANEDITA+6*, CANEDITA+21, CANEDITA+26 |
| TIUCNT | CANEDITA+1~, CANEDITA+2*, CANEDITA+10*, CANEDITA+12*, CANEDITA+15*, CANEDITA+16*, CANEDITA+19*, CANEDITA+22*, CANEDITA+23*, CANEDITA+24* , CANEDITA+25*, CANEDITA+26*, EDITAX+1 |
| TIUDA | CANEDITA~, CANEDITA+3, CANEDITA+4, CANSEND~, CANSEND+2, CANAMND~, CANAMND+2 |
| >> TIUMRT | CANEDITA+14, CANEDITA+18 |
| >> TIUPRM1 | CANEDITA+10, CANEDITA+12, CANEDITA+14, CANEDITA+22, CANEDITA+23, READYSIG+4, READYSIG+6, CANSEND+4 |
| TIUX | CANADDA+8, CANADDA+9*, CANADDA+10, CANADDA+11*, CANADDA+12*, ADDAX+1*, ADDAX+2, CANEDITA+1~, EDITAX+1*, EDITAX+2 |
| >> TIUXCRP | CANEDITA+8, CANEDITA+18 |
| TIUY | CANADDA+1~, CANADDA+2*, CANADDA+4*, CANEDITA~, READYSIG+1~, READYSIG+2*, READYSIG+5*, READYSIG+8*, READYSIG+10*, READYX+1 , CANSEND+1~, CANSEND+3*, CANSEND+4*, CANSEND+5*, CANSEND+6*, CANSEND+7, CANAMND+1~, CANAMND+3*, CANAMND+4*, CANAMND+5* , CANAMNX |
| TIUY( | CANEDITA+10*, CANEDITA+12*, CANEDITA+15*, CANEDITA+16*, CANEDITA+19*, CANEDITA+22*, CANEDITA+23*, CANEDITA+24*, CANEDITA+25*, CANEDITA+26* , EDITAX+1 |
| U | CANADDA+4, CANADDA+8, CANADDA+9, CANADDA+10, CANADDA+11, ADDAX+1, CANEDITA+3, CANEDITA+5, CANEDITA+10, CANEDITA+12 , CANEDITA+14, CANEDITA+15, CANEDITA+16, CANEDITA+18, CANEDITA+21, CANEDITA+22, CANEDITA+23, CANEDITA+26, READYSIG+4, READYSIG+5 , READYSIG+6, READYSIG+8, CANSEND+3, CANSEND+4, CANSEND+5, CANSEND+6, CANAMND+3, CANAMND+4 |
| Y | CANDEL+1~, CANDEL+2*, CANDEL+3*, CANDELX |