MAGSPID ;WOIFO/SF,DAC,JSL - PATIENT DATA UTILITIES ; 22 Jul 2021 12:00 PM
Source file <MAGSPID.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 |
|---|---|---|
| PIDLABEL() | ;
|
|
| DEM(LOC) | ;For IHS, call DEM^VADPT but reset DUZ(2) to the instrument division
|
|
| ISIHS() | ;Is this IHS site? (P123)
; This function is used on both VistA and the DICOM gateway ; In VistA DUZ("AG") will be used to determine if a site is an IHS site ; On the DICOM gateway the DICOM GATEWAY PARAMETER (#2006.563) file will be checked |
|
| PROD(FORCE) | ;;Check if it is the PRODUCTION TYPE - MAG WORK ITEM (field#4, Input Transform)
|
|
| CHKNMSPC | ;check IHS test/production account setting
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^MAG(2006.1 - [#2006.1] | CHKNMSPC+4 |
| ^MAG(2006.19 - [#2006.19] | CHKNMSPC+5, CHKNMSPC+6 |
| ^MAGDICOM(2006.563 - [#2006.563] | ISIHS+4 |
| ^XTV(8989.3 - [#8989.3] | CHKNMSPC+14* |
| Name | Line Occurrences |
|---|---|
| $$ISIHS | PIDLABEL+1, PROD+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DIR | CHKNMSPC+1~, CHKNMSPC+9! |
| DIR("A" | CHKNMSPC+8*, CHKNMSPC+9* |
| DIR("B" | CHKNMSPC+8* |
| DIR(0 | CHKNMSPC+8*, CHKNMSPC+9* |
| DUZ("AG" | ISIHS+4 |
| DUZ(2 | DEM+3, DEM+4*, DEM+6*, PROD+7 |
| FN | CHKNMSPC+1~, CHKNMSPC+6*, CHKNMSPC+7, CHKNMSPC+8, CHKNMSPC+10*, CHKNMSPC+12, CHKNMSPC+13 |
| FORCE | PROD~, PROD+5 |
| LC | PROD+1~ |
| LOC | DEM~, DEM+3*, DEM+4 |
| MAGDA | CHKNMSPC+1~, CHKNMSPC+5*, CHKNMSPC+6 |
| MAGPL | CHKNMSPC+1~, CHKNMSPC+2*, CHKNMSPC+3, CHKNMSPC+4, CHKNMSPC+13 |
| NAME | CHKNMSPC+1~, CHKNMSPC+5*, CHKNMSPC+6 |
| NWNAME | CHKNMSPC+1~, CHKNMSPC+4*, CHKNMSPC+10, CHKNMSPC+13 |
| SID | PROD+1~ |
| SITE | PROD+1~, PROD+7*, PROD+8, CHKNMSPC+2 |
| TMPDUZ2 | DEM+4*, DEM+6! |
| U | CHKNMSPC+4, CHKNMSPC+6, CHKNMSPC+14 |
| VERSION | PROD+1~ |
| X | PROD+1~ |
| Y | PROD+1~, CHKNMSPC+9, CHKNMSPC+10, CHKNMSPC+12 |