Print Page as PDF
YS MHAT LOOKUP ICR (5603)

YS MHAT LOOKUP    ICR (5603)

Name Value
NUMBER 5603
IA # 5603
FILE NUMBER 870
GLOBAL ROOT HLCS(870,
DATE CREATED 2011/02/12
CUSTODIAL PACKAGE HEALTH LEVEL SEVEN
USAGE Private
TYPE File
DBIC APPROVAL STATUS APPROVED
NAME YS MHAT LOOKUP
GENERAL DESCRIPTION
The Mental Health package requests permission to do a
FileMan lookup on the HL LOGICAL LINK (#870) file for the YS MHAT entry. We
wish to then do a EN^DIQ call to display the field values for that record. We
do not wish to edit any of the values.

Here is our code:

CKHL7    ;check hl7 status
N DIC,DA
W @IOF,!?15,"*** HL7 Check ***",!
S X="YS MHAT",DIC=870 D ^DIC
I +Y'>0 W !,"YS MHAT ERROR" Q  ;-->out
S DA=+Y D EN^DIQ
STATUS Active
KEYWORDS
  • MENTAL HEALTH
  • YS MHAT
DURATION Till Otherwise Agreed
ID HLCS(870,
SUBSCRIBING PACKAGE MENTAL HEALTH
DATE ACTIVATED 2011/02/14