MAGDSTA0 ;WOIFO/PMK - Study Tracker - Automatic CMP/RET ; Nov 08, 2022@14:32:16
Source file <MAGDSTA0.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 |
|---|---|---|
| INITXTMP(OUTPUTEXCEL) | ; initialize ^XTMP for Study Tracker's automatic CMP/RET
; This is different from INITXTMP^MAGDSTQ0 |
|
| SAVE(OUTPUTEXCEL,OUTPUT,CONCATENATE) | ; save output to ^XTMP
|
|
| KILL(TITLE,TODAY) | ; remove old ^XTMP files
|
|
| LIST(MYSERVICE,LIST) | ; get list of ^XTMP("MAG Study Tracker *" entries for service
|
|
| COPYPARM(NORMALRUN) | ; copy last run's parameters for the next run
|
|
| DIRECTION(SORTORDER) | ; return the direction for $order
; 1 = normal order ; -1 = reverse order |
|
| NEXTDATE(DATE,DIRECTION) | ; get the next date, but not in the future
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP("MAG" | INITXTMP+10, COPYPARM+2*, COPYPARM+3*, COPYPARM+4*, COPYPARM+5*, COPYPARM+7*, COPYPARM+14*, COPYPARM+18*, COPYPARM+19*, COPYPARM+20* , COPYPARM+23*, COPYPARM+24*, COPYPARM+25*, COPYPARM+30*, COPYPARM+31*, COPYPARM+35* |
| ^XTMP( | INITXTMP+4, INITXTMP+9*, INITXTMP+10*, INITXTMP+11*, INITXTMP+12*, INITXTMP+13, SAVE+4, SAVE+5, SAVE+8*, KILL+3 , KILL+5!, LIST+6, LIST+7 |
| Name | Line Occurrences |
|---|---|
| $$DIRECTION | COPYPARM+9 |
| $$NEXTDATE | COPYPARM+18, COPYPARM+23 |
| KILL | INITXTMP+6 |
| Name | Field # of Occurrence |
|---|---|
| ^( | SAVE+5*, SAVE+8* |
| ^(1 | INITXTMP+12* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> BATCHSIZE | COPYPARM+31 |
| >> BEGDATE | COPYPARM+23 |
| CONCATENATE | SAVE~, SAVE+2*, SAVE+5 |
| >> CONSULTSERVICES | COPYPARM+35 |
| DATE | NEXTDATE~, NEXTDATE+3 |
| >> DFN | COPYPARM+14 |
| DIRECTION | COPYPARM+1~, COPYPARM+9*, COPYPARM+18, COPYPARM+23, COPYPARM+30, NEXTDATE~, NEXTDATE+3 |
| DUZ | INITXTMP+11 |
| >> ENDDATE | COPYPARM+18 |
| >> HOURS | COPYPARM+5 |
| I | LIST+1~, LIST+3*, LIST+8*, LIST+11, COPYPARM+1~ |
| LIST | LIST~, LIST+2! |
| LIST( | LIST+8* |
| LIST(0 | LIST+3*, LIST+8* |
| >> MAGSTXTMP | SAVE+3* |
| MYSERVICE | LIST~, LIST+7 |
| NEXTDATE | NEXTDATE+1~, NEXTDATE+3*, NEXTDATE+4*, NEXTDATE+5 |
| NORMALRUN | COPYPARM~, COPYPARM+18, COPYPARM+23 |
| NOW | INITXTMP+2~, INITXTMP+5*, INITXTMP+8, NEXTDATE+1~, NEXTDATE+2*, NEXTDATE+4 |
| OUTPUT | SAVE~, SAVE+5, SAVE+8 |
| OUTPUTEXCEL | INITXTMP~, INITXTMP+8*, INITXTMP+9, INITXTMP+10, INITXTMP+11, INITXTMP+12, SAVE~, SAVE+3, SAVE+4, SAVE+5 , SAVE+8, KILL+1~, KILL+2*, KILL+3*, KILL+5, LIST+1~, LIST+5*, LIST+6*, LIST+7, LIST+8 |
| PURGE | INITXTMP+2~, INITXTMP+7*, INITXTMP+9 |
| >> QRSCP | COPYPARM+2, COPYPARM+7 |
| >> SCANMODE | COPYPARM+3, COPYPARM+12, COPYPARM+16, COPYPARM+28 |
| SORTORDER | COPYPARM+4, COPYPARM+9, COPYPARM+17, DIRECTION~, DIRECTION+3 |
| SS4 | SAVE+1~, SAVE+4*, SAVE+5, SAVE+7*, SAVE+8 |
| >> STUDYDATE | COPYPARM+19, COPYPARM+24 |
| >> STUDYIEN | COPYPARM+30 |
| TITLE | INITXTMP+2~, INITXTMP+3*, INITXTMP+4, INITXTMP+6, INITXTMP+8, INITXTMP+9, INITXTMP+13, KILL~, KILL+2, LIST+1~ , LIST+4* |
| TODAY | INITXTMP+2~, INITXTMP+5*, INITXTMP+6, INITXTMP+7, INITXTMP+9, KILL~, KILL+5 |
| X | KILL+1~, KILL+5* |
| >> XTMPSS | SAVE+3* |
