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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: YTXCHGT

Package: Mental Health

Routine: YTXCHGT


Information

YTXCHGT ;SLC/KCM - JSON / Tree Conversions ; 9/15/2015

Source Information

Source file <YTXCHGT.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Mental Health 6 QTASK^YTSCOREV  FILE96^YTWJSONF  EXPORT^YTXCHGE  IMPTREE^YTXCHGI  SHOSUMM^YTXCHGP  (BACKUP,LOG,NEWDATE)^YTXCHGU  
Virtual Patient Record 1 (DECODE,ENCODE)^VPRJSON  

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: 6

Package Total Caller Graph
Mental Health 6 YTXCHG  YTXCHGE  YTXCHGI  YTXCHGL  YTXCHGU  YTXUTL  

Entry Points

Name Comments DBIA/ICR reference
MHA2TR(TEST,DEST) ; Load MHA test into DEST tree
TR2MHA(TREE,YTXDRY) ; Save SRC tree into MHA file entries
; TREE: closed reference to node that represents 1 instrument
; YTXDRY: defined and true if this is just a dry run
TR2JSON(SRC,DEST) ; Convert tree representation to JSON
JSON2TR(SRC,DEST) ; Convert JSON to tree representation
; returns 1 if converted without error
; SRC contains JSON representation
; DEST is $NA value and should be empty
SPEC2TR(XCHGIEN,DEST) ; Convert JSON WP entry in 601.95 to tree representation
; returns 1 if converted without error
; DEST is $NA value and should be empty
ADDEND(XCHGIEN) ; Process any contents in addendum
; example: {"ignoreConflicts": ["601.72:6488","601.72:6491","601.72:6734"]}
CHKSCORE(XCHGIEN) ; Check addendum for instruments that should be re-scored
; example: {"rescoreInstruments":["PCL-5"]}
ADD2TR(XCHGIEN,ARRAY) ; Load Addendum JSON into TREE
JSON2WP(SRC,DEST) ; Convert JSON array (n) to WP array (n,0)
WP2TR(SRC,DEST) ; Convert FM WP field to tree representation
; SRC: glvn of source array
; DEST: glvn of destination array
TR2WP(SRC,DEST) ; Convert tree representation to FM WP
; SRC: glvn of source array (JSON node with wp text)
; DEST: glvn of destination array (will add [line,0] nodes)
SPLITLN(SRC,DEST,MAX) ; Split JSON lines into lines of MAX length
TEST2WP ; test TR2WP entry point

External References

Name Field # of Occurrence
DECODE^VPRJSON JSON2TR+5, SPEC2TR+7, ADD2TR+4
ENCODE^VPRJSON TR2JSON+5
QTASK^YTSCOREV CHKSCORE+8
FILE96^YTWJSONF TR2MHA+21
EXPORT^YTXCHGE MHA2TR+1
IMPTREE^YTXCHGI TR2MHA+10, TR2MHA+15
SHOSUMM^YTXCHGP TR2MHA+11, TR2MHA+16
BACKUP^YTXCHGU TR2MHA+14
LOG^YTXCHGU TR2MHA+8, TR2MHA+17, TR2JSON+6, JSON2TR+6, SPEC2TR+9, ADD2TR+5
NEWDATE^YTXCHGU TR2MHA+20

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("YTXCHG" TR2JSON+2, SPEC2TR+3!, SPEC2TR+6*, SPEC2TR+7, SPEC2TR+8!
^XTMP("YTXIDX" ADDEND+4!, ADDEND+7*
^YTT(601.71 - [#601.71] CHKSCORE+6, CHKSCORE+7
^YTT(601.95 - [#601.95] SPEC2TR+6, ADD2TR+2

Label References

Name Line Occurrences
ADD2TR ADDEND+3, CHKSCORE+3
ADDEND SPEC2TR+10
SPLITLN TR2JSON+7
TR2WP TEST2WP+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ARRAY ADDEND+2~, ADDEND+3, CHKSCORE+2~, CHKSCORE+3, ADD2TR~
ARRAY("ignoreConflicts" ADDEND+5, ADDEND+6
ARRAY("rescoreInstruments" CHKSCORE+4, CHKSCORE+5
DEST MHA2TR~, MHA2TR+1, TR2JSON~, TR2JSON+4, TR2JSON+7, JSON2TR~, JSON2TR+5, SPEC2TR~, SPEC2TR+7, JSON2WP~
, JSON2WP+2, WP2TR~, WP2TR+3, WP2TR+6, WP2TR+7, TR2WP~, TR2WP+5, TR2WP+9, TR2WP+10, SPLITLN~
, SPLITLN+5
>> DRYRUN TR2MHA+17
I SPEC2TR+4~, SPEC2TR+6*, ADDEND+2~, ADDEND+5*, ADDEND+6, CHKSCORE+2~, CHKSCORE+4*, CHKSCORE+5, ADD2TR+1~, ADD2TR+2*
, JSON2WP+1~, JSON2WP+2*, TR2WP+3~, TR2WP+6*, TR2WP+7, SPLITLN+1~, SPLITLN+3*, SPLITLN+4
IEN CHKSCORE+2~, CHKSCORE+6*, CHKSCORE+7, CHKSCORE+8
INTERIM TR2JSON+1~, TR2JSON+2*, TR2JSON+3, TR2JSON+5, TR2JSON+7, TR2JSON+8
J TR2WP+3~, TR2WP+5*, TR2WP+8*, TR2WP+9, TR2WP+10
JSON TEST2WP+1~
JSON("wp" TEST2WP+2*, TEST2WP+3*, TEST2WP+4*, TEST2WP+5
JSONERR TR2JSON+1~, TR2JSON+6, JSON2TR+4~, JSON2TR+6, SPEC2TR+4~, SPEC2TR+9, ADD2TR+1~, ADD2TR+5
JSONERR(1 TR2JSON+6, JSON2TR+6, SPEC2TR+9, ADD2TR+5
JSONTMP ADD2TR+1~, ADD2TR+3
JSONTMP( ADD2TR+2*
LN WP2TR+4~*, WP2TR+5*, WP2TR+6, WP2TR+7, TR2WP+3~, TR2WP+4*, TR2WP+5*, TR2WP+9, TR2WP+10*, SPLITLN+1~
, SPLITLN+3*, SPLITLN+5*
MAX SPLITLN~, SPLITLN+2*, SPLITLN+5
NEWDT TR2MHA+3~, TR2MHA+19*, TR2MHA+20
OK TR2JSON+1~
PREFIX TR2MHA+3~, TR2MHA+4*, TR2MHA+8
REV CHKSCORE+2~, CHKSCORE+7*, CHKSCORE+8
SEQ TR2MHA+3~, TR2MHA+5*, TR2MHA+7, TR2MHA+10, TR2MHA+14, TR2MHA+15, TR2MHA+19, TR2MHA+21
SRC TR2JSON~, TR2JSON+5, JSON2TR~, JSON2TR+5, JSON2WP~, JSON2WP+2, WP2TR~, WP2TR+5, WP2TR+6, WP2TR+7
, TR2WP~, TR2WP+4, TR2WP+6, TR2WP+7, SPLITLN~, SPLITLN+3, SPLITLN+4
TEST MHA2TR~, MHA2TR+1
TESTNM TR2MHA+3~, TR2MHA+7*, TR2MHA+8, TR2MHA+20
TEXT TEST2WP+1~
TEXT(2 TEST2WP+5
TREE TR2MHA~, TR2MHA+5, TR2MHA+7, TR2MHA+10, TR2MHA+14, TR2MHA+15, TR2MHA+19, TR2MHA+21
U TR2JSON+4, CHKSCORE+7, WP2TR+3
X ADDEND+2~, ADDEND+6*, ADDEND+7, CHKSCORE+2~, CHKSCORE+5*, CHKSCORE+6, TR2WP+3~, TR2WP+4*, TR2WP+5, TR2WP+7*
, TR2WP+8, TR2WP+9, TR2WP+10, SPLITLN+1~, SPLITLN+4*, SPLITLN+5*
XCHGIEN SPEC2TR~, SPEC2TR+6, SPEC2TR+10, ADDEND~, ADDEND+3, CHKSCORE~, CHKSCORE+3, ADD2TR~, ADD2TR+2
YTXDRY TR2MHA~, TR2MHA+4, TR2MHA+10, TR2MHA+14, TR2MHA+15, TR2MHA+16, TR2MHA+18
YTXLOG TR2MHA+6~*, TR2MHA+11, TR2MHA+13!*, TR2MHA+16
YTXLOG("added" TR2MHA+20
YTXLOG("conflict" TR2MHA+11
YTXLOG("updated" TR2MHA+20
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All