©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
RAUTL0 ;HISC/CAH,FPT,GJC-Utility Routine ; 20 Apr 2011 7:15 PM
Source file <RAUTL0.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| STAT | ;TASKMAN ENTRY POINT TO UPDATE STATUS OF ONE REPORT
|
|
| EN | ;Entry point to credit x-ray clinic stops
|
|
| NOGO | ||
| STATM1 | ; Update statuses of multiple reports
|
|
| UPSTAT | ;QUEUE ONE REPORT TO UPDATE STATUS
|
|
| EXIT | ||
| UPSTATM | ;QUEUE MULTIPLE REPORTS TO UPDATE STATUSES
|
|
| STPCDE(RA0,RA1,RA2,RA3,RA4) | ; Bulletin for Stop Code Credit error
; RA0 -> stop code numbers seperated by "^"'s (if not null) ; RA1 -> Rad/Nuc Med user (DUZ) RA2 -> Patient (RADFN) ; RA3 -> Inverse Xam D/T (RADTI) RA4 -> Exam node (RACNI) |
|
| STATM | ;TASKMAN ENTRY POINT TO UPDATE STATUSES OF MULTIPLE REPORTS
|
|
| CON |
| Name | Field # of Occurrence |
|---|---|
| ^%ZTLOAD | UPSTAT+9, UPSTATM+4 |
| $$GET1^DIQ | UPSTAT+4, UPSTATM+2 |
| $$ACTCODE^RACPTMSC | STPCDE+18 |
| $$NAMCODE^RACPTMSC | EN+5, STPCDE+17 |
| $$ORVR^RAORDU | STAT+4, STATM1+4 |
| ^RARTFLDS | STAT+6, STATM1+5 |
| STUFF^RARTST | STAT+2, STATM+1 |
| $$SSN^RAUTL | STPCDE+9 |
| OENOTE^RAUTL00 | STAT+6, STATM1+6 |
| UP1^RAUTL1 | STAT+2, STATM+1 |
| RASET^RAUTL2 | STAT+2, STATM+1 |
| $$PCE^RAWORK | EN+1 |
| EN3^SDACS | EN+8 |
| $$FMTE^XLFDT | STPCDE+44 |
| ^XMB | STPCDE+47 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^%ZIS(1 - [#3.5] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(40.7 - [#40.7] | CON, STPCDE+31 |
| ^DPT - [#2] | STPCDE+11 |
| ^RA(79 - [#79] | UPSTAT+3, UPSTATM+1 |
| ^RA(79.1 - [#79.1] | EN+6, STPCDE+24, STPCDE+26 |
| ^RADPT - [#70] | EN+9*, STPCDE+5, STPCDE+9, STPCDE+10 |
| ^RAMIS(71 - [#71] | EN+4, EN+7, STPCDE+12 |
| ^SC - [#44] | STPCDE+26 |
| ^TMP($J | STATM+1, STATM1+2 |
| ^VA(200 - [#200] | STPCDE+4, STPCDE+8 |
| ^XMB(3.6 - [#3.6] | STPCDE+47 |
| Name | Line Occurrences |
|---|---|
| CON | EN+7 |
| EXIT | EN+9 |
| NOGO | EN+2, EN+4, EN+6, EN+8 |
| STATM1 | STATM+1 |
| STPCDE | NOGO+2 |
| Name | Field # of Occurrence |
|---|---|
| ^("PC" | EN+6 |
| ^(0 | EN+4, EN+7, CON |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> D0 | STAT+5*, STATM1+5* |
| >> DFN | EN+3* |
| DT | EN+5 |
| DUZ | UPSTAT+5, UPSTATM+3, NOGO+1, NOGO+2 |
| I | UPSTAT+5*, UPSTATM+3*, EN+7*, EXIT! |
| J | EN+7*, CON, EXIT! |
| K | CON*, EXIT! |
| >> ORBXDATA | STAT+4*, STATM1+4* |
| ORIFN | STATM1+6! |
| ORNOTE | STATM1+6! |
| >> ORVP | STAT+4*, STATM1+4* |
| RA0 | STPCDE~, STPCDE+23, STPCDE+29, STPCDE+30 |
| RA1 | STATM+1*, STATM1+2, STPCDE~, STPCDE+4, STPCDE+8 |
| RA2 | STPCDE~, STPCDE+5, STPCDE+8, STPCDE+9, STPCDE+10, STPCDE+11 |
| RA3 | STPCDE~, STPCDE+5, STPCDE+9, STPCDE+10 |
| RA4 | STPCDE~, STPCDE+5, STPCDE+10 |
| RAAB | STATM1+2*, STATM1+6! |
| RACASE | STPCDE+6~, STPCDE+10*, STPCDE+44 |
| >> RACNI | STAT+3, STATM1+3, EN+9, NOGO+1, NOGO+2 |
| RACPT | STPCDE+6~, STPCDE+17*, STPCDE+19*, STPCDE+20*, STPCDE+45 |
| RACPT(0 | STPCDE+16*, STPCDE+17, STPCDE+18 |
| RACPT(4 | STPCDE+18*, STPCDE+20 |
| RADFN | STAT+3, STAT+4, STATM1+3, STATM1+4, EN+2, EN+3, EN+9, NOGO+1, NOGO+2, STPCDE+6~ , STPCDE+8* |
| >> RADTE | EN+2, EN+3 |
| >> RADTI | STAT+3, STATM1+3, EN+9, NOGO+1, NOGO+2 |
| >> RADUZ | UPSTAT+5, UPSTAT+6, UPSTATM+3 |
| >> RAEXFLD | STAT+5*, STATM1+5* |
| >> RAF1 | STAT+2*, STATM+1* |
| >> RAHLTCPB | UPSTAT+8 |
| RAI | STPCDE+6~, STPCDE+29*, STPCDE+30 |
| RAIO | UPSTAT+3~*, UPSTAT+4, UPSTATM+1~*, UPSTATM+2 |
| RALENFLG | STPCDE+6~, STPCDE+7*, STPCDE+29, STPCDE+33* |
| >> RAMDIV | UPSTAT+3, UPSTATM+1, EN+2, EN+3 |
| >> RAMLC | EN+2, EN+6, STPCDE+24, STPCDE+26 |
| RAPAT | STPCDE+6~, STPCDE+11*, STPCDE+44 |
| RAPC | STPCDE+24~*, STPCDE+25, STPCDE+26 |
| RAPR | EXIT! |
| >> RAPRIT | EN+2, EN+4, EN+7 |
| RAPROC | STPCDE+6~, STPCDE+21*, STPCDE+22*, STPCDE+45 |
| RAPROC(0 | STPCDE+12*, STPCDE+16, STPCDE+21 |
| >> RAQUEUED | UPSTAT+10 |
| RAREGX | STPCDE+6~, STPCDE+9*, STPCDE+11 |
| >> RARPT | STAT+2, STAT+4, STAT+5, STATM+1*, STATM1+4, STATM1+5 |
| >> RARTDT | STATM+1*, STATM1+2 |
| RASAVE | STAT+1~, STATM1+1~ |
| RASAVE("RACNI" | STAT+3*, STATM1+3* |
| RASAVE("RADFN" | STAT+3*, STATM1+3* |
| RASAVE("RADTI" | STAT+3*, STATM1+3* |
| RASDC | EN+2*, CON*, NOGO+1, NOGO+2, EXIT! |
| RASSN | STPCDE+6~, STPCDE+9*, STPCDE+44 |
| RASTOP | STPCDE+6~, STPCDE+25*, STPCDE+26*, STPCDE+29*, STPCDE+33, STPCDE+34*, STPCDE+36, STPCDE+37*, STPCDE+45 |
| RASTOP(1 | STPCDE+31*, STPCDE+32 |
| RASTOP(2 | STPCDE+30*, STPCDE+31, STPCDE+32 |
| RASTOP(3 | STPCDE+32*, STPCDE+33, STPCDE+34 |
| RAUSER | STPCDE+7~, STPCDE+8*, STPCDE+45 |
| RAXAM | STPCDE+7~, STPCDE+10*, STPCDE+12 |
| RAXDT | STPCDE+7~, STPCDE+11*, STPCDE+17, STPCDE+18, STPCDE+44 |
| SDATE | EN+3*, EXIT! |
| SDC | EN+3*, CON*, EXIT! |
| SDCPT | EXIT! |
| SDCPT(1 | EN+6*, EN+8 |
| SDCTYPE | EN+8*, EXIT! |
| SDERR | EN+8, EXIT! |
| SDIV | EN+3*, EXIT! |
| >> SDMSG | EN+3* |
| SDUZ | UPSTAT+5*, UPSTAT+9!, UPSTATM+3*, UPSTATM+4! |
| X | UPSTAT+10*, EN+4*, EN+5*, EN+6, EXIT! |
| X1 | EN+6*, EXIT! |
| XMB | STPCDE+7~, STPCDE+46*, STPCDE+47 |
| XMB(1 | STPCDE+44* |
| XMB(2 | STPCDE+44* |
| XMB(3 | STPCDE+44* |
| XMB(4 | STPCDE+44* |
| XMB(5 | STPCDE+45* |
| XMB(6 | STPCDE+45* |
| XMB(7 | STPCDE+45* |
| XMB(8 | STPCDE+45* |
| XMB0 | STPCDE+48! |
| XMC0 | STPCDE+48! |
| XMDT | STPCDE+48! |
| XMM | STPCDE+48! |
| XMMG | STPCDE+48! |
| >> Y | STAT+2*, STATM+1* |
| >> ZTDESC | UPSTAT+5*, UPSTATM+3* |
| >> ZTDTH | UPSTAT+5*, UPSTATM+3* |
| >> ZTIO | UPSTAT+4*, UPSTATM+2* |
| >> ZTQUEUED | STAT+7, STATM+2, EN+8, EN+9, NOGO |
| >> ZTREQ | STAT+7*, STATM+2* |
| >> ZTRTN | UPSTAT+4*, UPSTATM+2* |
| >> ZTSAVE( | UPSTAT+5*, UPSTATM+3* |
| >> ZTSAVE("RADUZ" | UPSTAT+6* |
| >> ZTSAVE("RAHLTCPB" | UPSTAT+8* |
| >> ZTSK | UPSTAT+10, UPSTATM+4 |