Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: YSCLDIS

Package: Mental Health

Routine: YSCLDIS


Information

YSCLDIS ;HINOI/RTW,HEC/hrubovcak - DISCONTINUE CLOZAPINE PATIENT STATUS ;8 Nov 2019 15:21:58

Source Information

Source file <YSCLDIS.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA FileMan 5 ^%DTC  LIST^DIC  DT^DICRW  ^DIE  $$GET1^DIQ  
Kernel 1 ($$DT,$$FMADD,$$FMDIFF,$$NOW)^XLFDT  
MailMan 1 SENDMSG^XMXAPI  
Mental Health 1 DMG^YSCLTST5  
Registration 1 $$SITE^VASITE  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Mental Health 3 YSCL122P  YSCL154P  YSCLTST5  

Entry Points

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
XTMPZRO ;
ADD2TXT(L) ; add line L to the Message text

External References

Name Field # of Occurrence
^%DTC OPT+10, INP+14
LIST^DIC START+7, OPT+2, INP+4, INP+7
DT^DICRW START+1
^DIE DSCNPT+4, MSGTRNS+14
$$GET1^DIQ START+12, START+13, START+15, OPT+4, OPT+5, OPT+6, OPT+8, INP+9, INP+10, INP+12
MSGTRNS+4, YSXMTEXT+17, YSXMTEXT+18, YSXMTEXT+19
$$SITE^VASITE MSGTRNS+8
$$DT^XLFDT XTMPZRO+2
$$FMADD^XLFDT START+5, XTMPZRO+2
$$FMDIFF^XLFDT START+16
$$NOW^XLFDT SVPTINFO+2, MSGTRNS+11, MSGTRNS+14, XTMPZRO+3
SENDMSG^XMXAPI MSGTRNS+10
DMG^YSCLTST5 START+18, START+25

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^PSDRUG - [#50] GET1^DIQ
^PSRX - [#52] GET1^DIQ
^PS(55 - [#55] Classic Fileman Calls,  GET1^DIQ
55.03 LIST^DIC
55.06 GET1^DIQ,  LIST^DIC
55.07 LIST^DIC
^YSCL(603.01 - [#603.01] LIST^DIC
^YSCL(603.03 - [#603.03] Classic Fileman Calls
^XTV(8989.3 - [#8989.3] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("XMERR" MSGTRNS+2!
^TMP($J START+6!, START+20*, MSGTRNS+2!, MSGTRNS+9, MSGTRNS+16!, ADD2TXT+2*
^XTMP("YSCLDIS" SVPTINFO+3*, SVPTINFO+4*, MSGTRNS+11*, XTMPZRO+2, XTMPZRO+4*

Label References

Name Line Occurrences
ADD2TXT YSXMTEXT+13, YSXMTEXT+14, YSXMTEXT+21, YSXMTEXT+22
DSCNPT START+18, START+25
INP START+23
MSGTRNS START+27
OPT START+22
SVPTINFO START+18, START+25
XTMPZRO START+6
YSXMTEXT MSGTRNS+6

Naked Globals

Name Field # of Occurrence
^(0 ADD2TXT+2*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
C SVPTINFO+1~, SVPTINFO+2*, SVPTINFO+3, XTMPZRO+1~, XTMPZRO+2*, XTMPZRO+3*, XTMPZRO+4, ADD2TXT+2~*
DA DSCNPT+3~, DSCNPT+4*, MSGTRNS+13~, MSGTRNS+14*
DFN START+4~, START+9*, START+12, START+13, START+15, START+20, OPT+2, INP+4, INP+7, INP+10
INP+12, SVPTINFO+3, SVPTINFO+4, DSCNPT+4, YSXMTEXT+12*, YSXMTEXT+15*, YSXMTEXT+17, YSXMTEXT+18, YSXMTEXT+19, YSXMTEXT+20
DIE DSCNPT+3~, DSCNPT+4*, MSGTRNS+13~, MSGTRNS+14*
DR DSCNPT+3~, DSCNPT+4*, MSGTRNS+13~, MSGTRNS+14*
DT START+5, START+16, START+20, OPT+9, OPT+10, INP+13, INP+14
DUZ MSGTRNS+10
J SVPTINFO+1~, SVPTINFO+2*, SVPTINFO+3, YSXMTEXT+1~, YSXMTEXT+22*, XTMPZRO+1~, XTMPZRO+2*, XTMPZRO+3
L ADD2TXT~, ADD2TXT+1*, ADD2TXT+2
N SVPTINFO+1~, SVPTINFO+2*, SVPTINFO+3, SVPTINFO+4
U START+20, SVPTINFO+3, MSGTRNS+8, MSGTRNS+11, XTMPZRO+3
X START+4~, OPT+1~, OPT+10, INP+3~, INP+14
X1 OPT+1~, OPT+10*, INP+3~, INP+14*
X2 OPT+1~, OPT+10*, INP+3~, INP+14*
XMERR MSGTRNS+1~
Y START+4~, MSGTRNS+8*, YSXMTEXT+12*, YSXMTEXT+13
YSBODY MSGTRNS+1~, MSGTRNS+9*, MSGTRNS+10
YSCLDRG OPT+1~, OPT+4*, OPT+5, INP+3~, INP+8*, INP+9
YSCLFLDA OPT+1~, OPT+10*, OPT+11
YSCLFLDT OPT+1~, OPT+6*, OPT+10
YSCLIPT INP+3~, INP+5*, INP+6
YSCLOPT OPT+1~, OPT+3*, OPT+4
YSCLORDA INP+3~, INP+14*, INP+15
YSCLORDT INP+3~, INP+10*, INP+14
YSCLPT START+4~, START+10!, YSXMTEXT+16!
YSCLPT("clozStatus" START+13*, START+14, SVPTINFO+4
YSCLPT("dataFound?" START+20*, START+22, START+23, OPT+3, OPT+9*, OPT+11*, INP+5, INP+13*, INP+15*
YSCLPT("disconReason" START+18*, START+24*, SVPTINFO+2, SVPTINFO+3, YSXMTEXT+20*, YSXMTEXT+22
YSCLPT("newReg?" START+21*, START+24, OPT+7*, INP+11*
YSCLPT("numDays" START+16*, START+17, START+19
YSCLPT("ptName&last4" YSXMTEXT+19*, YSXMTEXT+21
YSCLPT("reg#" START+12*, START+17, START+20
YSCLPT("regDate" START+15*, START+16, START+20, OPT+6, INP+10
YSCLPT("ssnLast4" YSXMTEXT+18*, YSXMTEXT+19
YSCLRSN YSXMTEXT+1~
YSCLRSN( YSXMTEXT+22
YSCLRSN(1 YSXMTEXT+2*, YSXMTEXT+3*, YSXMTEXT+4*
YSCLRSN(2 YSXMTEXT+5*, YSXMTEXT+6*, YSXMTEXT+7*
YSCLRSN(3 YSXMTEXT+8*, YSXMTEXT+9*, YSXMTEXT+10*
YSCLRX OPT+1~, OPT+4*, OPT+6, OPT+8
YSCLSPDT OPT+1~, OPT+8*, OPT+9, INP+3~, INP+12*, INP+13
YSDSPDRG INP+3~
YSDSPDRG("DILIST" INP+8
YSEND START+4~, START+5*
YSFMCLOZ START+4~
YSFMCLOZ("DILIST" START+9
YSFROM MSGTRNS+1~
YSITE MSGTRNS+1~
YSLINE INP+3~, INP+6*, INP+7, INP+10, INP+12
YSLN START+4~, START+9*
YSPTDISC START+4~
YSPTDISC( SVPTINFO+3*, YSXMTEXT+12, YSXMTEXT+15, YSXMTEXT+20
YSUNTDOS OPT+1~, INP+3~
YSUNTDOS("DILIST" OPT+3, OPT+4, INP+5, INP+6
YSXMDUZ MSGTRNS+1~
YSXMINSTR MSGTRNS+1~, MSGTRNS+10
YSXMINSTR("FROM" MSGTRNS+7*
YSXMSUBJ MSGTRNS+1~, MSGTRNS+8*, MSGTRNS+10
YSXMTO MSGTRNS+1~, MSGTRNS+10
YSXMTO("G.CLO ZAPINE ROLL-UP@DOMAIN.EXT" , MSGTRNS+4*
YSXMTO("G.PSOCLOZ" MSGTRNS+5*
YSXMZ MSGTRNS+1~, MSGTRNS+10, MSGTRNS+11
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All