MAGDMEDI ;WOIFO/LB - Routine for Medicine DICOM ID ; [ 06/20/2001 08:56 ]
Source file <MAGDMEDI.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 |
|---|---|---|
| DICOMID(RETURN,MAGMFILE,MAGMFIEN,MAGPROC,MAGDFN) | ;
|
|
| TYPE(FILE) | ;Set the id code for the Medicine file
; If we add addtl. Medicine files, the following will need to be chgd. |
|
| FILE(CODE) | ;Set the file number according to the Medicine id file code
; If we add addtl. Medicine files, the following will need to be chgd. ; Default is the Generalized Procedure/Consult Medicine file. |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^MAG(2005.03 - [#2005.03] | DICOMID+12 |
| Name | Line Occurrences |
|---|---|
| $$TYPE | DICOMID+18 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CODE | FILE~, FILE+4, FILE+5 |
| FILE | TYPE~, TYPE+4, TYPE+5 |
| MAGCODE | TYPE+2~, TYPE+3*, TYPE+4, TYPE+5*, TYPE+6 |
| MAGDFN | DICOMID~, DICOMID+10, DICOMID+15 |
| MAGFILE | FILE+3~, FILE+5*, FILE+6 |
| MAGID | DICOMID+8~, DICOMID+18*, DICOMID+19 |
| MAGMFIEN | DICOMID~, DICOMID+10, DICOMID+15, DICOMID+19 |
| MAGMFILE | DICOMID~, DICOMID+10, DICOMID+12, DICOMID+14, DICOMID+15, DICOMID+18 |
| MAGPROC | DICOMID~, DICOMID+15 |
| MCFILE | DICOMID+8~, DICOMID+14* |
| OK | DICOMID+8~, DICOMID+15*, DICOMID+16 |
| RETURN | DICOMID~, DICOMID+9*, DICOMID+13*, DICOMID+16*, DICOMID+19* |