RAHLEX ;HIRMFO/REL,CRT - RAD/NUC MED HL7 Voice Reporting Exception List; 02/02/99
Source file <RAHLEX.m>
Package | Total | Call Graph |
---|---|---|
Radiology Nuclear Medicine | 4 | SETTMP^RAHLEX WAIT^RAHLEX1 EN1^RASELCT D^RAUTL |
Registration | 3 | EN^VALM CLEAR^VALM1 CNTRL^VALM10 |
VA Fileman | 3 | ^%DT EN^DDIOL $$GET1^DIQ |
Kernel | 1 | $$REPEAT^XLFSTR |
Package | Total | Caller Graph |
---|---|---|
Radiology Nuclear Medicine | 3 | RA HL7 VOICE REPORTING ERRORS RAHLEX RAHLEX1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
DISDATE(SEP) | ; Display date in external form
; SEP is the separator between date and time - eg " " or "@" or " at " |
|
END | ; Tidy up variables after ENTRY call only
|
|
SETTMP | ;Create ^TMP workfile with sorted records on...
|
|
APPS | ; 1st prompt for Sending Applications to print
; skip prompt if there is only one Sending App. |
|
ETDT | ; Prompt for End Date (Must be after Start Date.. obviously!)
|
|
HEADER | ; Report/Page Header
|
|
LISTMAN | ; Call List Manager
|
|
EXIT | ; Tidy variables after function (including ListMan IO* and VALM*)
|
|
USER | ; Prompt for Users to include
; skip prompt if there is only one User on file. ; also there may be entries with no user!! |
|
ENTRY | ; List Manager Entry Point
|
|
STDT | ; Prompt for Start From Date
|
|
DISPLAY | ; Create ARRAY for List Manager display on ^TMP($J,"RAHLEX")
|
|
HELP | ; The '??' help ListMan Call:
|
Name | Field # of Occurrence |
---|---|
^%DT | STDT+7, ETDT+7 |
EN^DDIOL | RAHLEX+13, RAHLEX+18, APPS+22, STDT+2, STDT+8, ETDT+2, USER+24, HELP+2, HELP+3, HELP+26 |
$$GET1^DIQ | APPS+6, USER+8, SETTMP+7, SETTMP+13, SETTMP+17, SETTMP+23 |
SETTMP^RAHLEX | ENTRY+2 |
WAIT^RAHLEX1 | HELP+4 |
EN1^RASELCT | APPS+18, USER+20 |
D^RAUTL | DISDATE+2 |
EN^VALM | LISTMAN+1 |
CLEAR^VALM1 | EXIT+5, HELP+5 |
CNTRL^VALM10 | DISPLAY+11 |
$$REPEAT^XLFSTR | DISPLAY+9 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | GET1^DIQ |
^RADPT - [#70] | GET1^DIQ |
^HL(771 - [#771] | GET1^DIQ |
^RA(79.3 - [#79.3] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^RA(79.3 - [#79.3] | RAHLEX+15, APPS+3, APPS+5, USER+4, USER+5, USER+7, SETTMP+4, SETTMP+5 |
Name | Line Occurrences |
---|---|
DISDATE | DISPLAY+23 |
END | RAHLEX+19, APPS+23, STDT+10, ETDT+8, USER+25, ENTRY+5 |
EXIT | RAHLEX+15, APPS+20, STDT+10, ETDT+8, USER+22 |
LISTMAN | USER+4, USER+6 |
STDT | APPS+4, STDT+8 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%DT | STDT+3!, STDT+4*, STDT+7!, ETDT+3*, ETDT+7! |
%DT("A" | STDT+5*, ETDT+4* |
%DT("B" | ETDT+6* |
%DT(0 | STDT+6*, ETDT+5* |
DISYS | EXIT+2! |
DTOUT | STDT+10, ETDT+8, EXIT+1! |
HL | EXIT+1! |
HL7EX | ENTRY+3*, DISPLAY+20*, DISPLAY+22, EXIT+1! |
>> I | APPS+3* |
IOBOFF | EXIT+11! |
IOBON | EXIT+11! |
IOF | RAHLEX+11 |
IOINHI | EXIT+11! |
IOINORM | EXIT+11! |
IORVOFF | DISPLAY+11, EXIT+11! |
IORVON | DISPLAY+11, EXIT+11! |
IOUOFF | EXIT+11! |
IOUON | EXIT+11! |
LINE | DISPLAY+9*, DISPLAY+10, DISPLAY+22*, DISPLAY+24*, DISPLAY+25*, DISPLAY+26*, DISPLAY+27*, DISPLAY+28, DISPLAY+30*, DISPLAY+31 , END+1! |
PAGE | EXIT+1! |
POP | EXIT+1! |
RACLR | RAHLEX+16*, EXIT+5, EXIT+9! |
RACN | SETTMP+20*, SETTMP+21*, SETTMP+25, SETTMP+26, SETTMP+28!, DISPLAY+16*, DISPLAY+17, DISPLAY+18, DISPLAY+21, DISPLAY+26 , END+1! |
RADATE | SETTMP+9*, SETTMP+10, SETTMP+25, SETTMP+26, SETTMP+28!, DISPLAY+14*, DISPLAY+15, DISPLAY+16, DISPLAY+17, DISPLAY+18 , DISPLAY+21, END+1!, DISDATE+2, DISDATE+3 |
RADIC | APPS+12*, APPS+18, APPS+19!, USER+14*, USER+20, USER+21! |
RADIC("A" | APPS+14*, USER+16* |
RADIC("B" | APPS+15*, USER+17* |
RADIC("S" | APPS+16* |
RADIC(0 | APPS+13*, USER+15* |
RADPT | SETTMP+16*, SETTMP+17*, SETTMP+18*, SETTMP+25, SETTMP+26, SETTMP+28!, DISPLAY+15*, DISPLAY+16, DISPLAY+17, DISPLAY+18 , DISPLAY+21, DISPLAY+25, END+1! |
RAEXCP | SETTMP+23*, SETTMP+26, SETTMP+28!, DISPLAY+18*, DISPLAY+30, END+1! |
RAH | HELP+6!, HELP+26, HELP+28! |
RAH( | HELP+23* |
RAH(1 | HELP+7*, HELP+8* |
RAH(10 | HELP+17* |
RAH(11 | HELP+18* |
RAH(12 | HELP+19* |
RAH(13 | HELP+20* |
RAH(14 | HELP+21* |
RAH(15 | HELP+22* |
RAH(2 | HELP+9* |
RAH(3 | HELP+10*, HELP+25* |
RAH(4 | HELP+11*, HELP+25* |
RAH(5 | HELP+12*, HELP+24* |
RAH(6 | HELP+13* |
RAH(7 | HELP+14* |
RAH(8 | HELP+15* |
RAH(9 | HELP+16* |
RAHI | HELP+23*, HELP+28! |
RAHL7EDT | ETDT+9*, ETDT+10*, SETTMP+10, EXIT+1! |
RAHL7SDT | STDT+9*, ETDT+5, SETTMP+10, EXIT+1! |
RAHLA | APPS+6*, APPS+7, APPS+8! |
RAHLAIEN | APPS+3*, APPS+4, APPS+5*, APPS+6, APPS+7, APPS+8!, APPS+10! |
RAHLAPP | RAHLEX+4*, APPS+7, APPS+20, SETTMP+2, SETTMP+3, EXIT+3! |
RAHLEX | RAHLEX+5*, DISPLAY+5, DISPLAY+10, DISPLAY+19, DISPLAY+28, DISPLAY+31, EXIT+2! |
RAHLSEL | RAHLEX+6*, DISPLAY+21, EXIT+2! |
RAHLSRT | RAHLEX+8*, SETTMP+25, SETTMP+26, ENTRY+5, DISPLAY+3, DISPLAY+14, DISPLAY+15, DISPLAY+16, DISPLAY+17, DISPLAY+18 , DISPLAY+21, EXIT+2! |
RAHLU | USER+8*, USER+9, USER+10! |
RAHLUIEN | USER+4*, USER+5*, USER+6, USER+7*, USER+8, USER+9, USER+10!, USER+12! |
RAHLUSR | RAHLEX+7*, USER+9, USER+22, SETTMP+13, EXIT+3! |
RAINPUT | APPS+11*, APPS+18, APPS+19!, USER+13*, USER+20, USER+21! |
RAOLD | DISPLAY+3*, DISPLAY+7, DISPLAY+12*, END+1! |
RAPPI | SETTMP+3*, SETTMP+4, SETTMP+7, SETTMP+28! |
RAPPX | SETTMP+2*, SETTMP+3, SETTMP+28! |
RAQUIT | APPS+20, USER+22, END+1! |
RASEND | SETTMP+7*, SETTMP+25, SETTMP+26, SETTMP+28!, DISPLAY+3*, DISPLAY+7, DISPLAY+9, DISPLAY+11, DISPLAY+12, DISPLAY+14 , DISPLAY+15, DISPLAY+16, DISPLAY+17, DISPLAY+18, DISPLAY+21, END+1! |
RAUSER | SETTMP+12*, SETTMP+13*, SETTMP+14*, SETTMP+25, SETTMP+26, SETTMP+28!, DISPLAY+17*, DISPLAY+18, DISPLAY+21, DISPLAY+27 , END+1! |
RAUTIL | APPS+17*, APPS+18, APPS+19!, USER+19*, USER+20, USER+21! |
RAX | SETTMP+5*, SETTMP+9, SETTMP+12, SETTMP+16, SETTMP+20, SETTMP+28! |
RAXIEN | SETTMP+4*, SETTMP+5, SETTMP+23, SETTMP+25, SETTMP+28! |
SEP | DISDATE~, DISDATE+3 |
SPACES | DISPLAY+2*, DISPLAY+22, DISPLAY+24, DISPLAY+25, DISPLAY+26, END+1! |
TITLE | EXIT+2! |
U | STDT+10, ETDT+8, SETTMP+9, SETTMP+12, SETTMP+16, SETTMP+20 |
VALM | EXIT+7! |
VALMAR | EXIT+7! |
VALMBCK | EXIT+7!, HELP+27* |
VALMBG | EXIT+7! |
VALMCAP | EXIT+7! |
VALMCC | EXIT+7! |
VALMCNT | RAHLEX+9*, ENTRY+3*, DISPLAY+5*, DISPLAY+8*, DISPLAY+10, DISPLAY+11, DISPLAY+19*, DISPLAY+20*, DISPLAY+21, DISPLAY+28 , DISPLAY+29*, DISPLAY+31, EXIT+1!, EXIT+7! |
VALMDDF | EXIT+8! |
VALMDN | EXIT+8! |
VALMHDR | EXIT+8! |
VALMHDR(1 | HEADER+2* |
VALMIOXY | EXIT+8! |
VALMKEY | EXIT+8! |
VALMLFT | EXIT+8! |
VALMLST | EXIT+8! |
VALMMENU | EXIT+9! |
VALMMSGR | EXIT+9! |
VALMSG | ENTRY+7*, EXIT+9! |
VALMUP | EXIT+9! |
X | STDT+8, STDT+10, ETDT+8, EXIT+1!, HELP+1 |
XRADATE | DISPLAY+24, END+1!, DISDATE+3* |
Y | STDT+9, ETDT+9, SETTMP+28!, EXIT+1!, DISDATE+2*, DISDATE+3, DISDATE+4! |