MAGSPID ;WOIFO/SF,DAC,JSL - PATIENT DATA UTILITIES ; 22 Jul 2021 12:00 PM
Source file <MAGSPID.m>
| 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
|
