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 |  Entry Points |  External References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: YTXCHGS

Package: Mental Health

Routine: YTXCHGS


Information

YTXCHGS ;SLC/KCM - MH Exchange Sample Code ; 08-AUG-2016

Source Information

Source file <YTXCHGS.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
Mental Health 1 ($$INCLUDE,INSTALLQ)^YTXCHG  

Entry Points

Name Comments DBIA/ICR reference
PRE ; nothing necessary
POST ; post-init
; UPDSET^YTXCHG("TAG","RTN") will loop through the array returned by TAG^RTN
; and install the specification supplied by that Instrument Exchange entry
; name.
;
SCREEN ; sample line to put in DATA SCREEN of KIDS build
; $$INCLUDE^YTXCHG(Y,"TAG","RTN") calls TAG^RTN to get an array of
; instrument exchange entries to include in the build. It sets Y
; to true if the entry should be included.
;
XCHGLST(ARRAY) ; return array of instrument exchange entries
; ARRAY(cnt,1)=instrument exchange entry name
; ARRAY(cnt,2)=instrument exchange entry creation date
ENTRIES ; New MHA instruments ^ Exchange Entry Date

External References

Name Field # of Occurrence
$$INCLUDE^YTXCHG SCREEN+5
INSTALLQ^YTXCHG POST+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ARRAY XCHGLST~
ARRAY( XCHGLST+6*, XCHGLST+7*
I XCHGLST+4~, XCHGLST+5*, XCHGLST+6, XCHGLST+7
U XCHGLST+6, XCHGLST+7
X XCHGLST+4~, XCHGLST+5*, XCHGLST+6, XCHGLST+7
>> Y SCREEN+5

Marked Items

Name Field # of Occurrence
$T(ENTRIES+I XCHGLST+5
Info |  Source |  Call Graph |  Entry Points |  External References |  Local Variables |  Marked Items  | All