YSCLDIS ;HINOI/RTW,HEC/HRUBOVCAK - DISCONTINUE CLOZAPINE PATIENT STATUS ; Jun 12, 2023@17:11
Source file <YSCLDIS.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
START | ; called from XMIT^YSCLTST5
|
|
OPT | ; Outpatient orders
|
|
INP | ;Inpatient Orders
; YSDSPDRG - DISPENSE DRUG (sub-file 55.07) ; YSUNTDOS - UNIT DOSE (sub-file 55.07) |
|
SVPTINFO | ; save reason for discontinue
|
|
DSCNPT | ; discontinue patient in file #55
; ^DD(55,54,0) = 'CLOZAPINE STATUS^S' ; ^DD(55,56,0) = 'DEMOGRAPHICS SENT^S' |
|
MSGTRNS | ; transmit message
|
|
YSXMTEXT | ; build message of discontinued clozapine patients data for NCC
; YS*5.01*227 - Change to use Fileman parameter field instead of hard-coded discontinue period |
|
XTMPZRO | ;
|
|
ADD2TXT(L) | ; add line L to the Message text
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
^PS(55 - [#55] | Classic Fileman Calls, GET1^DIQ |
^YSCL(603.01 - [#603.01] | LIST^DIC |
^YSCL(603.03 - [#603.03] | Classic Fileman Calls, GET1^DIQ |
^XTV(8989.3 - [#8989.3] | GET1^DIQ |