ISIJUTL9 ; ISI/JHC - ISI Rad subroutines ; 10/17/2022
Source file <ISIJUTL9.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ERR | ;
|
|
| MGRREV2(CLIENT) | ; Return 1/0 for Manager Revision-2 is enabled
; Input CLIENT optional: ; "CLIENT" indicates Client-side Tab changes only concern ; Else, concern is Server-side processes disabled/enabled |
|
| UJOCHECK(OUT) | ;
; Check to see if UJO National Patient ID (#2,400000000) exists. ; Used to verify this is an EHS/EHSI system |
|
| LSTSTATU(LSTID,HDATE) | ; Exam list statistics update
; LSTID = ien of Exam list requested by user ; HDATE = $H of date to be filed; default is today |
|
| WEEKOF(H) | ; Calculate a "week-of" date for input $H value
|
|
| LSTSTATD | ; Exam list statistics dump
|
|
| LISTDEFS | ; dump out exam list definitions
; |
|
| END |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | VFIELD^DILFD |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("ERRTN" | ERR+2 |
| ^ISI(23452 | LSTSTATU+5 |
| ^MAG(2006.631 - [#2006.631] | LSTSTATU+7, LISTDEFS+4 |
| ^MAG(2006.69 - [#2006.69] | MGRREV2+4 |
| Name | Line Occurrences |
|---|---|
| $$WEEKOF | LSTSTATU+9 |
| @( | ERR+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> %H | WEEKOF+1* |
| >> BY | LSTSTATD+4* |
| CLIENT | MGRREV2~, MGRREV2+6*, MGRREV2+7 |
| CT | LSTSTATU+3~, LSTSTATU+15*, LSTSTATU+23*, LSTSTATU+31*, LSTSTATU+33* |
| DAT | LSTSTATU+3~, LSTSTATU+9*, LSTSTATU+21, LSTSTATU+24 |
| >> DHD | LSTSTATD+3* |
| >> DIC | LSTSTATD+2* |
| >> DIOEND | LSTSTATD+5* |
| DUZ(2 | LSTSTATU+27, LSTSTATU+29, LSTSTATU+32, LSTSTATU+35 |
| FIL | LSTSTATU+3~, LSTSTATU+5*, LSTSTATU+6, LSTSTATU+11, LSTSTATU+13, LSTSTATU+15, LSTSTATU+16, LSTSTATU+17, LSTSTATU+19, LSTSTATU+21 , LSTSTATU+23, LSTSTATU+24, LSTSTATU+25, LSTSTATU+27, LSTSTATU+29, LSTSTATU+31, LSTSTATU+32, LSTSTATU+33, LSTSTATU+35, LISTDEFS+3~ , LISTDEFS+4*, LISTDEFS+6, LISTDEFS+9, LISTDEFS+11 |
| >> FLDS | LSTSTATD+4* |
| H | WEEKOF~, WEEKOF+1, WEEKOF+2, WEEKOF+3 |
| HDATE | LSTSTATU~, LSTSTATU+4*, LSTSTATU+9 |
| I | LISTDEFS+3~, LISTDEFS+10*, LISTDEFS+11* |
| IEN | LSTSTATU+3~, LSTSTATU+13*, LSTSTATU+14, LSTSTATU+15*, LSTSTATU+16, LSTSTATU+19, LSTSTATU+21, LSTSTATU+23, LSTSTATU+24, LSTSTATU+25 , LSTSTATU+27, LSTSTATU+29, LSTSTATU+31, LSTSTATU+32, LSTSTATU+33, LSTSTATU+35, LISTDEFS+3~, LISTDEFS+6*, LISTDEFS+8, LISTDEFS+9 , LISTDEFS+11 |
| IENDAT | LSTSTATU+3~, LSTSTATU+21*, LSTSTATU+22, LSTSTATU+23*, LSTSTATU+24, LSTSTATU+29, LSTSTATU+31, LSTSTATU+32, LSTSTATU+33 |
| IENSIT | LSTSTATU+3~, LSTSTATU+29*, LSTSTATU+30, LSTSTATU+31*, LSTSTATU+32, LSTSTATU+33 |
| >> L | LSTSTATD+2* |
| LSTID | LSTSTATU~, LSTSTATU+7, LSTSTATU+13, LSTSTATU+16 |
| LSTNUM | LISTDEFS+3~, LISTDEFS+5*, LISTDEFS+6*, LISTDEFS+7 |
| >> MAGRY | ERR+1 |
| OUT | UJOCHECK~, UJOCHECK+4!, UJOCHECK+5*, UJOCHECK+6 |
| U | MGRREV2+4, LSTSTATU+15, LSTSTATU+23, LSTSTATU+31, LSTSTATU+32, LSTSTATU+33, LISTDEFS+10 |
| X | MGRREV2+4~*, MGRREV2+5, MGRREV2+7*, MGRREV2+8*, MGRREV2+9, LSTSTATU+3~, LSTSTATU+15*, LSTSTATU+23*, LSTSTATU+31*, LSTSTATU+33* , WEEKOF+3, WEEKOF+4, LISTDEFS+3~, LISTDEFS+9*, LISTDEFS+10, LISTDEFS+11* |
| >> X1 | WEEKOF+3* |
| >> X2 | WEEKOF+3* |