MAGNUID1 ;WOIFO/NST - DICOM UID generator ; 15 Oct 2010 12:45 AM
Source file <MAGNUID1.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 |
|---|---|---|
| NEWUID(MAGRY,SITE,SUBROOT,ROOTOWNER) | ; Generates a new DICOM UID
|
|
| DATETIME() | ; Get Date time
|
|
| CONVS2N(STRTOCNV) | ; Convert a string to a unique number
; The string should include characters from "0" to "Z" ; If other character is found -1 will be return ; Before the conversion all characters are converted to upper case |
| FileNo | Call Tags |
|---|---|
| ^MAGD(2006.15 - [#2006.15] | FIND1^DIC |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^MAGD(2006.15 - [#2006.15] | NEWUID+11, NEWUID+16, NEWUID+17, NEWUID+26, NEWUID+30, NEWUID+37 |
| Name | Line Occurrences |
|---|---|
| $$CONVS2N | NEWUID+14 |
| $$DATETIME | NEWUID+13 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CNT | NEWUID+1~, NEWUID+21*, NEWUID+22*, NEWUID+24, NEWUID+35, NEWUID+44 |
| DTSTAMP | NEWUID+1~, NEWUID+13*, NEWUID+22, NEWUID+24, NEWUID+28, NEWUID+34, NEWUID+44 |
| ERR | CONVS2N+4~, CONVS2N+5*, CONVS2N+10, CONVS2N+12*, CONVS2N+16 |
| FACTOR | CONVS2N+4~, CONVS2N+7*, CONVS2N+13, CONVS2N+14* |
| I | CONVS2N+4~, CONVS2N+10*, CONVS2N+11 |
| LASTCNT | NEWUID+1~, NEWUID+19*, NEWUID+21, NEWUID+24 |
| LASTUPDATE | NEWUID+2~, NEWUID+18*, NEWUID+22, NEWUID+24, NEWUID+28 |
| MAGNFDA | NEWUID+3~, NEWUID+33! |
| MAGNFDA( | NEWUID+34*, NEWUID+35* |
| MAGNXE | NEWUID+3~ |
| MAGNXE("DIERR" | NEWUID+39 |
| MAGRESA | NEWUID+3~, NEWUID+40 |
| MAGRESA(1 | NEWUID+41 |
| MAGRY | NEWUID~, NEWUID+5*, NEWUID+9*, NEWUID+12*, NEWUID+15*, NEWUID+25*, NEWUID+29*, NEWUID+41*, NEWUID+45*, NEWUID+46* |
| RESULT | CONVS2N+4~, CONVS2N+6*, CONVS2N+13*, CONVS2N+17 |
| ROOT | NEWUID+1~, NEWUID+11*, NEWUID+12, NEWUID+44 |
| ROOTIEN | NEWUID+2~, NEWUID+8*, NEWUID+9, NEWUID+11, NEWUID+16, NEWUID+17, NEWUID+26, NEWUID+30, NEWUID+34, NEWUID+35 , NEWUID+37 |
| ROOTOWNER | NEWUID~, NEWUID+7*, NEWUID+8 |
| SITE | NEWUID~, NEWUID+5, NEWUID+14 |
| STRTOCNV | CONVS2N~, CONVS2N+8*, CONVS2N+10, CONVS2N+11 |
| SUBROOT | NEWUID~, NEWUID+6*, NEWUID+44 |
| UID | NEWUID+2~, NEWUID+44*, NEWUID+45, NEWUID+46 |
| UNISITE | NEWUID+1~, NEWUID+14*, NEWUID+15, NEWUID+44 |
| X | NEWUID+2~, NEWUID+17*, NEWUID+18, NEWUID+19, CONVS2N+4~, CONVS2N+11*, CONVS2N+12, CONVS2N+13 |