MAGGTSR ;WOIFO/GEK - SURGERY CASE LIST ; [ 06/20/2001 08:57 ]
Source file <MAGGTSR.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 |
|---|---|---|
| GET(MAGRY,MAGDFN,DATA) | ;RPC [MAGGSUR GET]
; Call to get list of Patient Surgery procedures ; MAGDFN = Patient DFN ; DATA = For Future Use. |
|
| C1 | ;This is the New Call, which has Non-OR, but doesn't have Scheduled
|
|
| E1 | ;Now merge the lists from each of the two calls to Surgery Routines.
|
|
| IMGCT(SRFIEN) | ;
; Count of images for this Surgery Case ; If more than one group (or image) ; then return "Group count : total images" i.e. "3:134" ; else return count of Images i.e. "4" |
|
| IMAGE(MAGRY,DATA) | ;
; Called with the IEN of the Surgery package ^SRF(170,x ; We'll return a list of images. |
|
| GETLIST | ; called from other points in this routine, when SRFIEN is defined
; and returns a list in MAGRY(1..n) ; We'll make a tmp list of just the image IEN's ; splitting groups into individual image entries. |
| RPC Name | Call Tags |
|---|---|
| MAGGSUR GET | GET |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | GET+7 |
| ^MAG(2005 - [#2005] | IMGCT+9, GETLIST+7, GETLIST+8, GETLIST+9 |
| ^SRF - [#130] | IMGCT+8, IMAGE+5, IMAGE+6, GETLIST+5, GETLIST+6 |
| ^TMP("MAGGX" | GETLIST+18! |
| ^TMP($J | GET+6!, GET+19*, C1+6, C1+7*, E1+1, E1+3, E1+4, E1+5, GETLIST+4!, GETLIST+8* , GETLIST+9*, GETLIST+10, GETLIST+13 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AI | GET+5~ |
| CA1 | GET+5~, GET+13 |
| CA1( | GET+16, GET+17, GET+18, GET+19 |
| CA1(0 | GET+14 |
| CA2 | GET+5~, C1+1, C1+2, C1+3, C1+4 |
| CT | IMGCT+6~, IMGCT+7*, IMGCT+12*, IMGCT+13, IMGCT+14, GETLIST+5*, GETLIST+11*, GETLIST+14*, GETLIST+15, GETLIST+17 |
| DATA | GET~, IMAGE~, IMAGE+4 |
| DTX | GET+5~, GET+18*, GET+19, E1+2*, E1+3*, E1+4, E1+5 |
| GCT | IMGCT+6~, IMGCT+7*, IMGCT+11*, IMGCT+13 |
| I | GET+5~, GET+16*, GET+17, GET+18, GET+19, C1+3*, C1+4, E1+2*, E1+5*, E1+8 , GETLIST+5*, GETLIST+6 |
| ICT | IMGCT+6~, IMGCT+9*, IMGCT+10*, IMGCT+12 |
| J | IMGCT+6~, IMGCT+7*, IMGCT+8*, IMGCT+9 |
| MAGDFN | GET~, GET+7, GET+13, C1+1 |
| >> MAGFILE | GETLIST+15 |
| MAGIEN | IMAGE+3~, GETLIST+6*, GETLIST+7, GETLIST+8, GETLIST+9 |
| MAGQUIET | GETLIST+12*, GETLIST+16! |
| MAGRY | GET~, IMAGE~ |
| MAGRY( | E1+5*, GETLIST+15* |
| MAGRY(0 | GET+7*, GET+9*, GET+14*, E1+1*, E1+8*, IMAGE+5*, IMAGE+6*, GETLIST+10*, GETLIST+17* |
| MAGRY(1 | GET+10* |
| >> MAGXX | GETLIST+14* |
| NAME | GET+5~, GET+7*, GET+14, E1+1, E1+8 |
| SDAT | GET+5~, C1+4*, C1+6, C1+7 |
| SRFDA | GET+5~, E1+2*, E1+4*, E1+5 |
| SRFIEN | IMGCT~, IMGCT+8, IMAGE+3~, IMAGE+4*, IMAGE+5, IMAGE+6, GETLIST+5, GETLIST+6, GETLIST+10 |
| U | GET+7, GET+17, GET+18, GET+19, C1+6, C1+7, IMGCT+9, GETLIST+6, GETLIST+9 |
| Y | GET+5~ |
| >> Z | GETLIST+9*, GETLIST+11*, GETLIST+13*, GETLIST+14 |
