MAGVD001 ;WOIFO/BT,NST,DAC,PMK - Delete Study By Accession Number ; Feb 15, 2022@10:23:58
Source file <MAGVD001.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 |
|---|---|---|
| DELSTUDY | ; Delete Study by Accession Number (option MAG SYS-DELETE STUDY)
|
|
| GETACC() | ; Get Accession Number
|
|
| GETACCHELP | ; double quote help message
|
|
| ISMSKOK(Y) | ; Verify accession number format - 0 invalid; 1 - valid
|
|
| ISPATSEN(MAGDFN) | ; Return 1 if patient for the study is a sensitive, 0 otherwise
|
|
| CONFSENS() | ; Continue processing confirmation for sensitive patient
|
|
| GETRSN() | ; Select reason for deletion
|
|
| CONFIRM(ACCNUM) | ; Confirmation - last chance to cancel
|
|
| UC(STR) | ;Convert to upper case
|
| Name | Field # of Occurrence |
|---|---|
| EN^DDIOL | DELSTUDY+7, DELSTUDY+8, DELSTUDY+11, DELSTUDY+16, DELSTUDY+17, DELSTUDY+21, DELSTUDY+22 |
| SETLOG^DGSEC | DELSTUDY+13 |
| ^DIC | GETRSN+6 |
| ^DIR | GETACC+9, CONFSENS+4, CONFIRM+4 |
| $$GMRCIEN^MAGDFCNV | ISMSKOK+7 |
| $$UP^MAGDFCNV | ISMSKOK+3 |
| $$SENSEMP^MAGUPSE | ISPATSEN+2 |
| $$CONFIRM^MAGVD001 | DELSTUDY+17 |
| $$CONFSENS^MAGVD001 | DELSTUDY+11 |
| $$GETACC^MAGVD001 | DELSTUDY+5 |
| $$GETRSN^MAGVD001 | DELSTUDY+15 |
| $$ISPATSEN^MAGVD001 | DELSTUDY+10 |
| $$UC^MAGVD001 | CONFSENS+5 |
| DELACC^MAGVD002 | DELSTUDY+18 |
| SHOWINFO^MAGVD004 | DELSTUDY+14 |
| GIBYACC^MAGVD007 | DELSTUDY+6 |
| $$STATSEP^MAGVRS41 | DELSTUDY+3 |
| $$NOW^XLFDT | GETRSN+2 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^MAG(2005.88 - [#2005.88] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("UPPERCASE" | UC+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACCNUM | DELSTUDY+1~, DELSTUDY+5*, DELSTUDY+6, DELSTUDY+14, DELSTUDY+17, CONFIRM~, CONFIRM+2 |
| DG1 | DELSTUDY+2~, DELSTUDY+12* |
| DGOPT | DELSTUDY+2~, DELSTUDY+12* |
| DIC | DELSTUDY+2~, GETRSN+1~, GETRSN+4* |
| DIC("A" | GETRSN+5* |
| DIC("S" | GETRSN+4* |
| DIC("W" | GETRSN+4* |
| DIC(0 | DELSTUDY+12*, GETRSN+4* |
| DIR | GETACC+1~, CONFSENS+1~, CONFIRM+1~ |
| DIR("?" | GETACC+6*, GETACC+7*, GETACC+8*, CONFSENS+3* |
| DIR("??" | GETACC+5* |
| DIR("A" | GETACC+3*, GETACC+4*, CONFSENS+2*, CONFIRM+2* |
| DIR("B" | CONFIRM+3* |
| DIR(0 | GETACC+2*, CONFSENS+2*, CONFIRM+2* |
| DTOUT | GETRSN+1~, GETRSN+7 |
| DUOUT | GETRSN+1~, GETRSN+7 |
| ERR | DELSTUDY+1~, DELSTUDY+20*, DELSTUDY+22 |
| MAGARR | DELSTUDY+2~, DELSTUDY+6, DELSTUDY+8, DELSTUDY+14, DELSTUDY+18 |
| MAGARR(1 | DELSTUDY+9 |
| MAGDFN | DELSTUDY+1~, DELSTUDY+9*, DELSTUDY+10, DELSTUDY+12, ISPATSEN~, ISPATSEN+2 |
| OK | ISMSKOK+1~, ISMSKOK+2*, ISMSKOK+5*, ISMSKOK+6*, ISMSKOK+7*, ISMSKOK+8*, ISMSKOK+10 |
| OUT | DELSTUDY+2~, DELSTUDY+6, DELSTUDY+7, DELSTUDY+18, DELSTUDY+19, DELSTUDY+20 |
| REASON | DELSTUDY+1~, DELSTUDY+15*, DELSTUDY+16, DELSTUDY+18 |
| RES | DELSTUDY+2~, DELSTUDY+19*, DELSTUDY+21 |
| SENSEMP | DELSTUDY+1~, DELSTUDY+10*, DELSTUDY+11, DELSTUDY+13, ISPATSEN+1~, ISPATSEN+2*, ISPATSEN+3 |
| SSEP | DELSTUDY+2~, DELSTUDY+3*, DELSTUDY+7, DELSTUDY+19, DELSTUDY+20 |
| STR | UC~, UC+2 |
| TODAY | GETRSN+1~, GETRSN+2* |
| U | GETRSN+9 |
| X | GETACC+1~, CONFSENS+1~, GETRSN+1~, CONFIRM+1~, UC+1~, UC+2* |
| Y | DELSTUDY+2~, DELSTUDY+12*, GETACC+1~, GETACC+10*, GETACC+11, ISMSKOK~, ISMSKOK+3*, ISMSKOK+5, ISMSKOK+6, ISMSKOK+7 , ISMSKOK+8, CONFSENS+1~, CONFSENS+5, GETRSN+1~, GETRSN+8, GETRSN+9, CONFIRM+1~, CONFIRM+5, UC+1~, UC+3 |