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 |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: YTXCHGL

Package: Mental Health

Routine: YTXCHGL


Information

YTXCHGL ;SLC/KCM - MH Exchange List Manager Calls ; 08-AUG-2016

Source Information

Source file <YTXCHGL.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
Kernel 4 ($$FMTE,$$NOW)^XLFDT  $$LOW^XLFSTR  DISP^XQORM1  OWNSKEY^XUSRB  
Mental Health 4 ($$SAVEHFS,BLDVIEW,CREATE,DELETE,INFO,INSTALL,LOADFILE)^YTXCHG  ($$CONFIRM,$$PICKTEST,$$PRMTNAME,EDITWP,LIST,PAUSE)^YTXCHGP  SPEC2TR^YTXCHGT  (FMADD,FMUPD)^YTXCHGU  
VA FileMan 3 BROWSE^DDBR  $$GET1^DIQ  ^DIR  
List Manager 2 EN^VALM  ($$SETFLD,FULL)^VALM1  
Registration 1 $$SITE^VASITE  

Entry Points

Name Comments DBIA/ICR reference
EN ; -- main entry point for YTXCHG MAIN
HDR ; -- header code
INIT ; -- init variables and list array
HELP ; -- help code
EXIT ; -- exit code
EXPND ; -- expand code
CREATE ; create new instrument exchange entry
REBUILD ; rebuild spec for existing exchange entry (with new date)
XREBUILD ; exit REBUILD here
DELETE ; delete instrument exchange entry
DRYRUN ; Trial install without database changes
INSTALL ; Install instrument exchange entry locally
BROWSE ; Browse instrument specification
SAVEHOST ; Save exchange entry to host file
LOADHOST ; Load exchange entry from host file
XLOADHST ; exit LOADHOST here
LOADURL ; Load exchange entry from URL
XLOADURL ; exit LOADURL here
LOAD2FM(XCHGREC) ; confirm and load into Fileman entry (file 601.95)
XINIT ; exit back to LM, update listing
XPAUSE ; exit back to LM, pause first
XREFR ; exit back to LM, refresh screen only
SELECT() ; return IEN for selection from list

External References

Name Field # of Occurrence
BROWSE^DDBR BROWSE+10
$$GET1^DIQ CREATE+7
^DIR SELECT+3
EN^VALM EN+1
$$SETFLD^VALM1 INIT+11, INIT+12, INIT+13, INIT+14
FULL^VALM1 EN+2, CREATE+1, REBUILD+1, INSTALL+1, BROWSE+1, LOADHOST+1, LOADURL+1
$$SITE^VASITE CREATE+7
$$FMTE^XLFDT INIT+14, CREATE+11, REBUILD+7, LOAD2FM+5
$$NOW^XLFDT CREATE+6
$$LOW^XLFSTR LOADURL+5
DISP^XQORM1 HELP+1
OWNSKEY^XUSRB INIT+3
$$SAVEHFS^YTXCHG SAVEHOST+6
BLDVIEW^YTXCHG BROWSE+9
CREATE^YTXCHG CREATE+12, REBUILD+15
DELETE^YTXCHG REBUILD+14, DELETE+5
INFO^YTXCHG REBUILD+5
INSTALL^YTXCHG INSTALL+7
LOADFILE^YTXCHG LOADHOST+6, LOADURL+8
$$CONFIRM^YTXCHGP REBUILD+13, DELETE+4, INSTALL+4, LOAD2FM+11
$$PICKTEST^YTXCHGP BROWSE+7
$$PRMTNAME^YTXCHGP CREATE+5, SAVEHOST+4, LOADHOST+4, LOADURL+4
EDITWP^YTXCHGP CREATE+9
LIST^YTXCHGP CREATE+4
PAUSE^YTXCHGP XPAUSE+1
SPEC2TR^YTXCHGT BROWSE+6
FMADD^YTXCHGU LOAD2FM+15
FMUPD^YTXCHGU LOAD2FM+14

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !!,"Creating:",?11,REC(.01)
  • Line Location: CREATE+10
Function Call: WRITE
  • Prompt: !,?11,$$FMTE^XLFDT(REC(.02),"5Z")
  • Line Location: CREATE+11
Function Call: WRITE
  • Prompt: !!," Rebuilding:",?14,INFO(.01)
  • Line Location: REBUILD+6
Function Call: WRITE
  • Prompt: !,?14,$$FMTE^XLFDT(INFO(.02),"5Z")
  • Line Location: REBUILD+7
Function Call: WRITE
  • Prompt: !,"Instruments:"
  • Line Location: REBUILD+8
Function Call: WRITE
  • Prompt: ?14,INFO("tests",I),!
  • Line Location: REBUILD+10
Function Call: WRITE
  • Prompt: !!,$S($G(DRYRUN):"Trial ",1:"")_"Installing "_$P(^YTT(601.95,XCHGIEN,0),U)
  • Line Location: INSTALL+5
Function Call: WRITE
  • Prompt: !,"*** No database changes will be made. ***",!
  • Line Location: INSTALL+6
Function Call: WRITE
  • Prompt: !,"No data to save."
  • Line Location: SAVEHOST+3
Function Call: WRITE
  • Prompt: !,$S(OK:"File saved.",1:"Save failed.")
  • Line Location: SAVEHOST+7
Function Call: WRITE
  • Prompt: !,"Only HTTP is currently supported."
  • Line Location: LOADURL+7
Function Call: WRITE
  • Prompt: !,"File is wrong format."
  • Line Location: LOAD2FM+2
Function Call: WRITE
  • Prompt: !
  • Line Location: LOAD2FM+3
Function Call: WRITE
  • Prompt: !,"This will load: "_XCHGREC(.01)
  • Line Location: LOAD2FM+4
Function Call: WRITE
  • Prompt: !," created on: "_$$FMTE^XLFDT(XCHGREC(.02),"5Z")
  • Line Location: LOAD2FM+5
Function Call: WRITE
  • Prompt: !," source: "_XCHGREC(.03)
  • Line Location: LOAD2FM+6
Function Call: WRITE
  • Prompt: !,"Description ---"
  • Line Location: LOAD2FM+7
Function Call: WRITE
  • Prompt: !,?3,^TMP("YTXCHG",$J,"WP",2,I,0)
  • Line Location: LOAD2FM+8
Function Call: WRITE
  • Prompt: !!,">>> This will OVERWRITE the current entry!"
  • Line Location: LOAD2FM+10
Function Call: WRITE
  • Prompt: !,$P(^YTT(601.95,XCHGIEN,0),U)_" loaded."
  • Line Location: LOAD2FM+16
Routine Call
  • DIR
  • Line Location:
    • SELECT+3
Routine Call
  • VALM
  • Line Location:
    • EN+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("YTXCHG" CREATE+2!, CREATE+8, CREATE+13!, REBUILD+4!, XREBUILD+1!, BROWSE+4!, BROWSE+5!, BROWSE+6, BROWSE+7, BROWSE+8
BROWSE+9, BROWSE+10, BROWSE+11!, BROWSE+12!, LOADHOST+2!, XLOADHST+2!, LOADURL+2!, XLOADURL+2!, LOAD2FM+8
^TMP("YTXLST" INIT+1!, INIT+15*, INIT+16*
^YTT(601.71 - [#601.71] REBUILD+11
^YTT(601.95 - [#601.95] INIT+5, INIT+6, INIT+7, INIT+8, DELETE+3, INSTALL+5, SAVEHOST+3, LOAD2FM+9, LOAD2FM+13, LOAD2FM+16

Label References

Name Line Occurrences
$$SELECT REBUILD+3, DELETE+2, INSTALL+3, BROWSE+3, SAVEHOST+2
INIT XINIT+1, XPAUSE+2
LOAD2FM LOADHOST+7, LOADURL+9
XINIT DELETE+6
XLOADHST LOADHOST+6
XLOADURL LOADURL+8
XPAUSE CREATE+14, REBUILD+16, INSTALL+8, SAVEHOST+8, XLOADHST+1, XLOADURL+1
XREBUILD REBUILD+13
XREFR CREATE+4, CREATE+5, REBUILD+3, DELETE+2, DELETE+4, INSTALL+3, INSTALL+4, BROWSE+3, BROWSE+7, BROWSE+13
SAVEHOST+2, SAVEHOST+3, SAVEHOST+5, LOADHOST+5, LOADURL+6, LOADURL+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CNT INIT+2~, INIT+4*, INIT+10*, INIT+11, INIT+15, INIT+16, INIT+17
DIR SELECT+1~
DIR(0 SELECT+2*
DIROUT SELECT+1~, SELECT+4
DIRUT SELECT+1~, SELECT+4
DRYRUN DRYRUN+1~*, INSTALL+5, INSTALL+6, INSTALL+7
DT INIT+2~, INIT+6*, INIT+7
DTOUT SELECT+1~, SELECT+4
DUOUT SELECT+1~, SELECT+4
DUZ CREATE+7
FULLNM SAVEHOST+1~, SAVEHOST+4*, SAVEHOST+5, SAVEHOST+6, LOADHOST+3~, LOADHOST+4*, LOADHOST+5, LOADHOST+6
I REBUILD+2~, REBUILD+9*, REBUILD+10, REBUILD+11, LOAD2FM+1~, LOAD2FM+8*
IEN INIT+2~, INIT+7*, INIT+8, INIT+16, SELECT+1~, SELECT+6*, SELECT+7
INFO REBUILD+2~, REBUILD+5, REBUILD+15
INFO( REBUILD+6, REBUILD+7
INFO("tests" REBUILD+9, REBUILD+10, REBUILD+11, REBUILD+12!
NAME BROWSE+2~, BROWSE+8*, BROWSE+10
NM INIT+2~, INIT+5*, INIT+6, INIT+7
NUM BROWSE+2~, BROWSE+7*, BROWSE+8, BROWSE+9
OK SAVEHOST+1~, SAVEHOST+6*, SAVEHOST+7
PKEY INIT+2~, INIT+3
PKEY(0 INIT+9
REC CREATE+3~, CREATE+12
REC( CREATE+5*, CREATE+6*, CREATE+7*, CREATE+9, CREATE+10, CREATE+11
REC(2 CREATE+8*, CREATE+9
REPLACE LOAD2FM+1~, LOAD2FM+9*, LOAD2FM+10, LOAD2FM+11, LOAD2FM+12
ROW INIT+2~, INIT+10*, INIT+11*, INIT+12*, INIT+13*, INIT+14*, INIT+15
STATS INSTALL+2~
TESTS CREATE+3~, CREATE+4, CREATE+12, REBUILD+2~, REBUILD+15
TESTS( REBUILD+11*
U INIT+9, INIT+12, INIT+13, INIT+14, CREATE+7, DELETE+3, INSTALL+5, LOAD2FM+16
URL LOADURL+3~, LOADURL+4*, LOADURL+5*, LOADURL+6, LOADURL+7, LOADURL+8
>> VALMAR SELECT+6
>> VALMBCK XINIT+1*, XPAUSE+2*, XREFR+1*
>> VALMCNT INIT+17*, SELECT+2
>> VALMHDR(1 HDR+1*
X HELP+1*, SELECT+1~
X0 INIT+2~, INIT+8*, INIT+9, INIT+12, INIT+13, INIT+14
XCHGIEN REBUILD+2~, REBUILD+3*, REBUILD+5, REBUILD+14, DELETE+1~, DELETE+2*, DELETE+3, DELETE+5, INSTALL+2~, INSTALL+3*
INSTALL+5, INSTALL+7, BROWSE+2~, BROWSE+3*, BROWSE+6, SAVEHOST+1~, SAVEHOST+2*, SAVEHOST+3, SAVEHOST+6, LOAD2FM+1~
, LOAD2FM+13*, LOAD2FM+14, LOAD2FM+15, LOAD2FM+16
XCHGNM DELETE+1~, DELETE+3*, DELETE+4
XCHGREC LOADHOST+3~, LOADHOST+6, LOADHOST+7, LOADURL+3~, LOADURL+8, LOADURL+9, LOAD2FM~, LOAD2FM+14, LOAD2FM+15
XCHGREC( LOAD2FM+2, LOAD2FM+4, LOAD2FM+5, LOAD2FM+6, LOAD2FM+9, LOAD2FM+13
Y SELECT+1~, SELECT+5, SELECT+6
YTXVRB INSTALL+2~, INSTALL+4*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All