RAPROD2 ;HIRMFO/GJC-Display Med & Radiopharm values for exams ;12/12/96 13:35
Source file <RAPROD2.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 |
Package | Total | Caller Graph |
---|---|---|
Radiology Nuclear Medicine | 3 | RADRPT1A RAPROD RAPROD1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
PHARM(RADA) | ; Display Pharmaceutical default data for Exam displays
; Input: RADA -> ien for the Examinations (50) multiple. ; in the following format: RACNI_","_RADTI_","_RADFN_"," ; *** Called only if $O(^RADPT(RADFN,"DT",RADTI,"P",RACNI,"RX",0)) *** |
|
RDIO(RADA) | ; Display Radiopharmaceutical default data for Exam displays
; Input: RADA -> ien of the Nuc Med Exam Data record (file 70.2) ; *** Called only if $P(^RADPT(RADFN,"DT",RADTI,"P",RACNI,0),U,28)>0 *** |
|
TRN1(X) | ; Translate Radiopharmaceutical field name to a shorter length.
|
|
HDR | ; Pharmaceutical/Radiopharmaceutical Header
|
|
CMHIST(RADFN,RADTI,RACNI) | ;main body
|
|
EXIT | ;clean up symbol table, message to user
|
|
CMHDR | ; print header
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | GET1^DIQ |
70.03 | GETS^DIQ |
^RADPTN - [#70.2] | GETS^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^RADPT - [#70] | CMHIST+10, CMHIST+11, CMHIST+13 |
^UTILITY($J | CMHIST+20! |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> DIWF | CMHIST+21* |
>> DIWL | CMHIST+21* |
>> DIWR | CMHIST+21* |
IOF | PHARM+7, RDIO+6, HDR+1, CMHIST+7, CMHDR+1 |
IOM | PHARM+6, RDIO+5, CMHIST+6, EXIT+2, CMHDR+2, CMHDR+4 |
IOSL | PHARM+7, PHARM+19, RDIO+6, RDIO+12, CMHIST+17, CMHIST+19 |
IOST | CMHIST+7 |
RA1 | PHARM+4~*, PHARM+9*, PHARM+11, PHARM+12, PHARM+15, PHARM+21, PHARM+26, PHARM+30 |
RAADT | CMHIST+14*, CMHIST+18, EXIT+3! |
RAAU | CMHIST+15*, CMHIST+18, EXIT+3! |
RACH2 | EXIT+3! |
RACHNG2 | EXIT+3! |
RACMDT | CMHIST+8*, CMHIST+10*, CMHIST+11, EXIT+4! |
RACMU | CMHIST+14*, CMHIST+16, EXIT+3! |
RACNI | CMHIST~, CMHIST+10, CMHIST+11, CMHIST+13 |
RACNT | PHARM+4~, PHARM+10*, PHARM+13*, PHARM+17*, PHARM+20*, PHARM+23*, PHARM+25*, PHARM+28*, RDIO+3~, RDIO+9* , RDIO+13*, RDIO+14, RDIO+15*, HDR+1* |
RADA | PHARM~, PHARM+5, RDIO~, RDIO+4 |
RADARY | RDIO+3~, RDIO+5 |
RADARY( | RDIO+8, RDIO+10, RDIO+11, RDIO+13, RDIO+17 |
RADFN | CMHIST~, CMHIST+10, CMHIST+11, CMHIST+13 |
RADTI | CMHIST~, CMHIST+10, CMHIST+11, CMHIST+13 |
RAFLDS | RDIO+3~, RDIO+9*, RDIO+10*, RDIO+11, RDIO+13 |
RAHD | CMHIST+5*, EXIT+3!, CMHDR+2 |
RAHDR | PHARM+4~, PHARM+6*, PHARM+8, RDIO+3~, RDIO+5*, RDIO+7, HDR+1 |
RAIEN | CMHIST+11*, CMHIST+13, EXIT+3! |
RAIENS | RDIO+3~, RDIO+4*, RDIO+8*, RDIO+10, RDIO+11, RDIO+13, RDIO+17 |
RALINE | CMHIST+6*, EXIT+3!, CMHDR+4 |
RAOPUT | RDIO+3~, RDIO+13*, RDIO+14 |
RAPG | CMHIST+7*, EXIT+3!, CMHDR+1* |
RAPHARM | PHARM+4~, PHARM+5 |
RAPHARM( | PHARM+9, PHARM+11, PHARM+12, PHARM+15, PHARM+21, PHARM+26, PHARM+30 |
RASUB | PHARM+4~*, PHARM+9, PHARM+11, PHARM+12, PHARM+15, PHARM+21, PHARM+26, PHARM+30 |
RAX | PHARM+16~*, PHARM+17, PHARM+22~*, PHARM+23, PHARM+27~*, PHARM+28 |
>> RAXIT | PHARM+4*, PHARM+7*, PHARM+9, PHARM+19*, RDIO+4*, RDIO+6*, RDIO+8, RDIO+10, RDIO+12*, CMHIST+8* , CMHIST+10, CMHIST+17*, CMHIST+19* |
RAY | EXIT+4! |
RAY(0 | CMHIST+13*, CMHIST+14, CMHIST+15, EXIT+2 |
U | CMHIST+14, CMHIST+15 |
X | RDIO+3~, TRN1~, TRN1+1, TRN1+2, TRN1+3, TRN1+4, TRN1+5, TRN1+6, CMHIST+5~, CMHIST+16* , CMHIST+18, CMHIST+20 |
Y | RDIO+3~ |