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

Package: Mental Health

Routine: YTXCHGI


Information

YTXCHGI ;SLC/KCM - Instrument Specification Import ; 9/15/2015

Source Information

Source file <YTXCHGI.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Mental Health 4 BLDMAP^YTXCHGM  TR2WP^YTXCHGT  ($$ISO2FM,$$MKSUBS,FMADD,FMDEL,FMUPD,LOG)^YTXCHGU  ($$COLLIDE,$$ISONLY,ADDIDX,BLDTEST,DELIDX)^YTXCHGV  
Text Integration Utility 1 $$DDEFIEN^TIUFLF7  
VA FileMan 1 GETS^DIQ  

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 YS218PST  YS221PST  YS234PST  YS236PST  YS250PST  YTXCHGT  

Entry Points

Name Comments DBIA/ICR reference
IMPTREE(TREE,YTXDRY) ; updates database from object tree source
; TREE : name of array containing object tree
; .YTXLOG: array of log info (count, errors)
; YTXDRY: 1 if just doing a dry run of the install
DEPTH1(FILE,ARRAY) ; loop 1 level deep in .ARRAY(1) to save in FILE
; FILE: file number
; ARRAY(n): subscript name for level n
DEPTH2(FILE,ARRAY) ; loop 2 levels deep in .ARRAY to save in FILE
; FILE: file number
; ARRAY(n): subscript name for level n
DEPTH3(FILE,ARRAY) ; loop 3 levels deep in .ARRAY to save in FILE
; FILE: file number
; ARRAY(n): subscript name for level n
PROCESS(FILE,IDX) ; using instances identified in IDX to save values to FILE
; expects: MAP,DONE,TSTIEN
; FILE: file number
; IDX: index values used to replace ?n subscripts
FMSAVE(UPDTYPE,FILE,REC,IEN) ; add/update file
DIFFREC(FILE,IEN,REC) ; return 0 if identical, 1 if changed, 2 if absent
; expects MAP
; will modify .REC to remove empty fields that need no update
WP2REC(TREEREF,FIELD,REC) ; parse CRLF delimited JSON TREE text into ^TMP
SHOWREC(UPDTYPE,FILE,REC,IEN) ; show record
DELETES(TSTIEN) ; delete records no longer used by instrument
; expects YTXDRY,YTXVRB (if defined)
; uses "leftover" entries in ^TMP("YTXCHGI",$J,"ENTRY",file,ien)
CHKNOTE(NAME) ; Return 1 if a default note should be added
ADDNOTE(NAME) ; Add default note for this instrument

External References

Name Field # of Occurrence
GETS^DIQ DIFFREC+13
$$DDEFIEN^TIUFLF7 ADDNOTE+5, ADDNOTE+6, ADDNOTE+7, ADDNOTE+8
BLDMAP^YTXCHGM IMPTREE+16
TR2WP^YTXCHGT WP2REC+5
$$ISO2FM^YTXCHGU PROCESS+19
$$MKSUBS^YTXCHGU PROCESS+13
FMADD^YTXCHGU FMSAVE+14
FMDEL^YTXCHGU DELETES+13
FMUPD^YTXCHGU FMSAVE+11
LOG^YTXCHGU FMSAVE+3, FMSAVE+4, DELETES+10, ADDNOTE+14
$$COLLIDE^YTXCHGV FMSAVE+5
$$ISONLY^YTXCHGV DELETES+9
ADDIDX^YTXCHGV FMSAVE+16
BLDTEST^YTXCHGV IMPTREE+14
DELIDX^YTXCHGV DELETES+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$S(UPDTYPE=0:"Nop ",UPDTYPE=1:"Upd ",UPDTYPE=2:"Add ",1:"??? "),FILE,":",IEN,?20
  • Line Location: SHOWREC+7
Function Call: WRITE
  • Prompt: X
  • Line Location: SHOWREC+8
Function Call: WRITE
  • Prompt: !,"Del ",FILE,":",IEN
  • Line Location: DELETES+11
Function Call: WRITE
  • Prompt: !,"Old ",FILE,":",IEN
  • Line Location: DELETES+14

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("YTXCHG" PROCESS+10!, PROCESS+35!, DIFFREC+30, WP2REC+4!, WP2REC+5, WP2REC+6, SHOWREC+5
^TMP("YTXCHGI" IMPTREE+10!, IMPTREE+14, IMPTREE+29!, PROCESS+34!, DELETES+5, DELETES+6
^YTT( DIFFREC+5
^YTT(601.71 - [#601.71] IMPTREE+12, CHKNOTE+2, CHKNOTE+3, ADDNOTE+2, ADDNOTE+3, ADDNOTE+4

Label References

Name Line Occurrences
$$CHKNOTE IMPTREE+15
$$DIFFREC PROCESS+31
ADDNOTE IMPTREE+28
DELETES IMPTREE+27
DEPTH1 IMPTREE+24
DEPTH2 IMPTREE+25
DEPTH3 IMPTREE+26
FMSAVE PROCESS+32, ADDNOTE+13
PROCESS IMPTREE+23, DEPTH1+5, DEPTH2+5, DEPTH3+6
SHOWREC FMSAVE+7
WP2REC PROCESS+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ARRAY IMPTREE+18~, IMPTREE+19*, IMPTREE+22*, IMPTREE+23, IMPTREE+24, IMPTREE+25, IMPTREE+26, DEPTH1~, DEPTH2~, DEPTH3~
ARRAY( IMPTREE+22*
ARRAY(1 DEPTH1+5, DEPTH2+4, DEPTH2+5, DEPTH3+4, DEPTH3+5, DEPTH3+6
ARRAY(2 DEPTH2+5, DEPTH3+5, DEPTH3+6
ARRAY(3 DEPTH3+6
CSLT ADDNOTE+1~, ADDNOTE+7*, ADDNOTE+8*, ADDNOTE+9, ADDNOTE+12
DONE IMPTREE+9~
DONE( PROCESS+28, PROCESS+33*
ERRS DIFFREC+8~
FIELD PROCESS+11~, PROCESS+12*, PROCESS+13, PROCESS+15, PROCESS+16, PROCESS+18, PROCESS+19, PROCESS+20, PROCESS+21, WP2REC~
, WP2REC+4, WP2REC+5, WP2REC+6
FILE IMPTREE+9~, IMPTREE+20*, IMPTREE+23, IMPTREE+24, IMPTREE+25, IMPTREE+26, DEPTH1~, DEPTH1+5, DEPTH2~, DEPTH2+5
, DEPTH3~, DEPTH3+6, PROCESS~, PROCESS+12, PROCESS+13, PROCESS+15, PROCESS+16, PROCESS+19, PROCESS+20, PROCESS+28
, PROCESS+31, PROCESS+32, PROCESS+33, PROCESS+34, FMSAVE~, FMSAVE+5, FMSAVE+7, FMSAVE+11, FMSAVE+14, FMSAVE+15
, FMSAVE+16, DIFFREC~, DIFFREC+5, DIFFREC+13, DIFFREC+14, DIFFREC+15, DIFFREC+17, DIFFREC+18, DIFFREC+19, DIFFREC+24
, SHOWREC~, SHOWREC+7, DELETES+3~, DELETES+5*, DELETES+6, DELETES+7, DELETES+9, DELETES+11, DELETES+13, DELETES+14
FILESEQ IMPTREE+9~, IMPTREE+17*, IMPTREE+20, IMPTREE+21
FLD DIFFREC+6*, DIFFREC+8~, DIFFREC+12*, DIFFREC+14*, DIFFREC+15, DIFFREC+16, DIFFREC+17, DIFFREC+18, DIFFREC+19, DIFFREC+23*
, DIFFREC+24, DIFFREC+27*, DIFFREC+28, DIFFREC+29, DIFFREC+30, DIFFREC+32, SHOWREC+1~, SHOWREC+2*, SHOWREC+4, SHOWREC+5
, SHOWREC+6
FLDS DIFFREC+8~, DIFFREC+9*, DIFFREC+12*, DIFFREC+13
I IMPTREE+22*, DEPTH1+3~, DEPTH1+5, DEPTH2+3~, DEPTH2+5, DEPTH3+3~, DEPTH3+6
I(1 DEPTH1+4*, DEPTH1+5*, DEPTH2+4*, DEPTH2+5, DEPTH3+4*, DEPTH3+5, DEPTH3+6
I(2 DEPTH2+5*, DEPTH3+5*, DEPTH3+6
I(3 DEPTH3+6*
IDX PROCESS~, PROCESS+13
IEN PROCESS+11~, PROCESS+25*, PROCESS+27, PROCESS+28, PROCESS+31, PROCESS+32, PROCESS+33, PROCESS+34, FMSAVE~, FMSAVE+5
, FMSAVE+7, FMSAVE+11, FMSAVE+14, FMSAVE+15, FMSAVE+16, DIFFREC~, DIFFREC+5, DIFFREC+9, SHOWREC~, SHOWREC+7
, DELETES+3~, DELETES+6*, DELETES+7, DELETES+9, DELETES+11, DELETES+13, DELETES+14, CHKNOTE+1~, CHKNOTE+2*, CHKNOTE+3
, ADDNOTE+1~, ADDNOTE+2*, ADDNOTE+3, ADDNOTE+4, ADDNOTE+13
IENS DIFFREC+8~, DIFFREC+9*, DIFFREC+13, DIFFREC+14, DIFFREC+17, DIFFREC+18, DIFFREC+19, DIFFREC+24
LN DIFFREC+8~, DIFFREC+18*, DIFFREC+31*
LOOP IMPTREE+9~, IMPTREE+21*, IMPTREE+22
MAP IMPTREE+9~, IMPTREE+16
MAP( PROCESS+12, PROCESS+15, PROCESS+16, PROCESS+19, PROCESS+20, DIFFREC+15
MAP("store" IMPTREE+17, IMPTREE+20, IMPTREE+21
NAME CHKNOTE~, CHKNOTE+2, ADDNOTE~, ADDNOTE+2
NEW DIFFREC+8~, DIFFREC+9*, DIFFREC+28*, DIFFREC+31*, DIFFREC+32*, DIFFREC+33*, DIFFREC+35
NOTE ADDNOTE+1~, ADDNOTE+5*, ADDNOTE+6*, ADDNOTE+9, ADDNOTE+11
OLD DIFFREC+8~, DIFFREC+9*, DIFFREC+16*, DIFFREC+18*, DIFFREC+19*, DIFFREC+20*, DIFFREC+35
OWNED DELETES+3~
REC PROCESS+11~, PROCESS+16, PROCESS+22, PROCESS+31, PROCESS+32, FMSAVE~, FMSAVE+7, FMSAVE+11, FMSAVE+14, DIFFREC~
, WP2REC~, SHOWREC~, ADDNOTE+1~, ADDNOTE+13
REC( PROCESS+18*, PROCESS+19*, PROCESS+20*, PROCESS+21*, PROCESS+25, PROCESS+26!, DIFFREC+6!, DIFFREC+12, DIFFREC+23, DIFFREC+24!
, DIFFREC+27, DIFFREC+29, DIFFREC+32, WP2REC+6*, SHOWREC+2, SHOWREC+5, SHOWREC+6
REC(28 ADDNOTE+10*
REC(29 ADDNOTE+11*
REC(30 ADDNOTE+12*
REF PROCESS+11~, PROCESS+14*, PROCESS+16, PROCESS+17, PROCESS+18, PROCESS+19, PROCESS+20, PROCESS+21
SUBS PROCESS+11~, PROCESS+13*, PROCESS+14
TREE IMPTREE~, IMPTREE+12, IMPTREE+15, IMPTREE+28, DEPTH1+5, DEPTH2+4, DEPTH2+5, DEPTH3+4, DEPTH3+5, DEPTH3+6
, PROCESS+14
TREEREF WP2REC~, WP2REC+1, WP2REC+2, WP2REC+5
TSTIEN IMPTREE+9~, IMPTREE+12*, IMPTREE+14, IMPTREE+27, FMSAVE+15*, FMSAVE+16, DELETES~, DELETES+7, DELETES+9
U CHKNOTE+3, ADDNOTE+3, ADDNOTE+4
UPDOK FMSAVE+1~, FMSAVE+5*, FMSAVE+11
UPDTYPE PROCESS+11~, PROCESS+31*, PROCESS+32, FMSAVE~, FMSAVE+2, FMSAVE+4, FMSAVE+5, FMSAVE+7, FMSAVE+11, FMSAVE+13
, SHOWREC~, SHOWREC+7
VALS DIFFREC+8~
VALS( DIFFREC+14, DIFFREC+17, DIFFREC+18, DIFFREC+19, DIFFREC+24
WPREF DIFFREC+8~, DIFFREC+30*, DIFFREC+31
X SHOWREC+1~, SHOWREC+2*, SHOWREC+3*, SHOWREC+4*, SHOWREC+5*, SHOWREC+6*, SHOWREC+8
YTXDRY IMPTREE~, FMSAVE+7, FMSAVE+8, DELETES+11, DELETES+12, DELETES+14
YTXERRS IMPTREE+9~
YTXNOTE IMPTREE+9~, IMPTREE+15*, IMPTREE+28
>> YTXVRB FMSAVE+7, DELETES+11, DELETES+14
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All