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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: YTQRQAD

Package: Mental Health

Routine: YTQRQAD


Information

YTQRQAD ;SLC/KCM - RESTful Calls for Instrument Admin ; 1/25/2017

Source Information

Source file <YTQRQAD.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 3 $$NAMEFMT^XLFNAME  $$UP^XLFSTR  OP^XQCHK  
Registration 2 TFL^VAFCTFU2  $$SITE^VASITE  
Mental Health 1 SETERROR^YTQRUTL  
VA FileMan 1 $$GET1^DIQ  

Entry Points

Name Comments DBIA/ICR reference
PID(ARGS,RESULTS) ; get patient identifiers
APPROXY() ; return 1 if this call is via application proxy
LSTALL(ARGS,RESULTS) ; get a list of all instruments
LSTCPRS(ARGS,RESULTS) ; get a list of all instruments
GETSPEC(ARGS,RESULTS) ; get an instrument specification
MV2TMP(SPEC) ; Load spec into ^TMP("YTQ-JSON",$J), cleaning up line feeds
GETDOC(DOCNAME,RESULTS) ; set ^TMP with contents of the document named
WRCLOSE(ARGS,DATA) ; noop call for closing Delphi wrapper
VARYAUDC(ASMT) ; modify the AUDC based on patient sex in ^TMP("YTQ-JSON",$J)
PERSONS(ARGS,RESULTS) ; GET /api/mha/persons/:match
USERS(ARGS,RESULTS) ; GET /api/mha/users/:match
RESET ; clear the ^XTMP("YTQASMT") nodes
; WARNING -- calling this (at RESET+3) will erase all current assignments

External References

Name Field # of Occurrence
$$GET1^DIQ PERSONS+10, PERSONS+12, USERS+9, USERS+12, USERS+15
TFL^VAFCTFU2 PID+15
$$SITE^VASITE PID+23
$$NAMEFMT^XLFNAME PERSONS+7, USERS+6
$$UP^XLFSTR PERSONS+2, USERS+2
OP^XQCHK APPROXY+1
SETERROR^YTQRUTL PID+18, PID+29, PID+31, GETSPEC+4, GETSPEC+7, GETSPEC+10, GETDOC+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,NM
  • Line Location: RESET+5

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] PID+31, PID+33, PID+34, VARYAUDC+3
^TMP("YTQ-JSON" GETSPEC+1!, GETSPEC+13, MV2TMP+2!, MV2TMP+4*, MV2TMP+8*, GETDOC+1!, GETDOC+5*, GETDOC+6!, GETDOC+7, VARYAUDC+5
, VARYAUDC+6, VARYAUDC+7, VARYAUDC+10*, PERSONS+16!, PERSONS+17*, PERSONS+18, USERS+24!, USERS+25*, USERS+26
^VA(200 - [#200] PERSONS+3, PERSONS+4, USERS+3, USERS+4
^XTMP( RESET+4, RESET+6!
^XTMP("YTQASMT-SET-" VARYAUDC+2
^YTT(601.71 - [#601.71] GETSPEC+5, GETSPEC+6
^YTT(601.712 - [#601.712] GETSPEC+8, GETSPEC+9, MV2TMP+3, MV2TMP+6, MV2TMP+7
^YTT(601.96 - [#601.96] GETDOC+2, GETDOC+3, GETDOC+5

Label References

Name Line Occurrences
GETDOC LSTALL+1, LSTCPRS+1
MV2TMP GETSPEC+11
VARYAUDC GETSPEC+12

Naked Globals

Name Field # of Occurrence
^( MV2TMP+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ARGS PID~, LSTALL~, LSTCPRS~, GETSPEC~, WRCLOSE~, PERSONS~, USERS~
ARGS("assignmentid" GETSPEC+12
ARGS("dfn" PID+2
ARGS("instrumentName" GETSPEC+3
ARGS("match" PERSONS+2, USERS+2
ASMT VARYAUDC~, VARYAUDC+2
DATA WRCLOSE~
DFN PID+1~, PID+2*, PID+11, PID+14*, PID+25, PID+27*, PID+29, PID+31, PID+32, PID+33
, PID+34, VARYAUDC+1~, VARYAUDC+2*, VARYAUDC+3
DOCNAME GETDOC~, GETDOC+2, GETDOC+3, GETDOC+4
DONE VARYAUDC+1~, VARYAUDC+5*, VARYAUDC+10*
EDIPI PID+14~*, PID+15, PID+18, PID+29
I MV2TMP+1~, MV2TMP+3*, MV2TMP+6*, MV2TMP+7, VARYAUDC+1~, VARYAUDC+5*, VARYAUDC+6, VARYAUDC+7, VARYAUDC+10, USERS+1~
, USERS+18~, USERS+19*
IEN GETDOC+2~*, GETDOC+3*, GETDOC+4, GETDOC+5, PERSONS+1~, PERSONS+4*, PERSONS+6, PERSONS+10, PERSONS+12, USERS+1~
, USERS+4*, USERS+9, USERS+12, USERS+15, USERS+21
J MV2TMP+1~, MV2TMP+3*, MV2TMP+4*, MV2TMP+8
L PID+26~*, PID+27
LABEL USERS+1~, USERS+6*, USERS+10, USERS+13, USERS+16, USERS+20*, USERS+22
LROOT PERSONS+1~, PERSONS+2*, PERSONS+3, USERS+1~, USERS+2*, USERS+3
NM PERSONS+1~, PERSONS+3*, PERSONS+4, PERSONS+7, PERSONS+9, PERSONS+14, USERS+1~, USERS+3*, USERS+4, USERS+6
, USERS+7, USERS+16, RESET+3~, RESET+4*, RESET+5, RESET+6
PREVLBL USERS+1~, USERS+2*, USERS+10, USERS+13, USERS+16*
PREVNM PERSONS+1~, PERSONS+2*, PERSONS+9, PERSONS+14*, USERS+1~, USERS+2*, USERS+7, USERS+16*
QUAL PERSONS+1~, PERSONS+10*, PERSONS+11, PERSONS+12*, PERSONS+13, USERS+1~, USERS+6*, USERS+9*, USERS+10, USERS+12*
, USERS+13, USERS+15*, USERS+16, USERS+17, USERS+19
R PID+24~, PID+25*, PID+26
RESULTS PID~, LSTALL~, LSTALL+1, LSTCPRS~, LSTCPRS+1, GETSPEC~, GETSPEC+13*, GETDOC~, GETDOC+7*, PERSONS~
, PERSONS+15, PERSONS+18*, USERS~, USERS+23, USERS+26*
RESULTS("dfn" PID+32*
RESULTS("name" PID+33*
RESULTS("persons" PERSONS+6*, PERSONS+7*, PERSONS+8*, PERSONS+11*, PERSONS+13*, USERS+21*, USERS+22*
RESULTS("pid" PID+34*, PID+35
RESULTS("ssn" PID+35*
ROOT PERSONS+1~, PERSONS+2*, PERSONS+3, USERS+1~, USERS+2*, USERS+3
SEQ PERSONS+1~, PERSONS+2*, PERSONS+5*, PERSONS+6, PERSONS+7, PERSONS+8, PERSONS+11, PERSONS+13, USERS+1~, USERS+2*
, USERS+5*, USERS+21, USERS+22
SPEC GETSPEC+2~, GETSPEC+8*, GETSPEC+9, GETSPEC+11, MV2TMP~, MV2TMP+3, MV2TMP+6, MV2TMP+7
STA PID+23~*, PID+27
TEST GETSPEC+2~, GETSPEC+5*, GETSPEC+6*, GETSPEC+7, GETSPEC+8
TESTNM GETSPEC+2~, GETSPEC+3*, GETSPEC+5, GETSPEC+6, GETSPEC+7, GETSPEC+12
U PID+18, PID+23, PID+27, PID+33, PID+34, APPROXY+1, VARYAUDC+3, USERS+9, USERS+10, USERS+12
, USERS+13, USERS+15, USERS+19
X MV2TMP+1~, MV2TMP+3*, MV2TMP+4, MV2TMP+5, USERS+18~*, USERS+19*, USERS+20
X0 VARYAUDC+1~, VARYAUDC+7*, VARYAUDC+8, VARYAUDC+9
X1 VARYAUDC+1~, VARYAUDC+8*, VARYAUDC+10
X2 VARYAUDC+1~, VARYAUDC+9*, VARYAUDC+10
XQOPT APPROXY+1~
Y MV2TMP+1~, MV2TMP+6, MV2TMP+7*, MV2TMP+8
>> YTQRERRS PID+11
YTTFL PID+15~
YTTFL( PID+25, PID+26
YTTFL(1 PID+18
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All